[[2004/A4/11班]] #define Do 523 #define Re 587 #define Mi 659 #define Fa 698 #define Sol 784 #define Ra 880 #define Ti 988 task play_music() { while (true) { PlayTone(Sol,30); Wait(40); PlayTone(Fa,30); Wait(40); PlayTone(Mi,40); Wait(50); PlayTone(Re,15); Wait(20); PlayTone(Mi,15); Wait(20); PlayTone(Fa,15); Wait(20); PlayTone(Re,15); Wait(20); PlayTone(Do,40); Wait(40); PlayTone(Mi,15); Wait(20); PlayTone(Fa,15); Wait(20); PlayTone(Sol,15); Wait(20); PlayTone(Mi,15); Wait(20); PlayTone(Re,15); Wait(20); PlayTone(Mi,15); Wait(20); PlayTone(Fa,15); Wait(20); PlayTone(Re,15); Wait(20); PlayTone(Mi,15); Wait(20); PlayTone(Fa,15); Wait(20); PlayTone(Sol,15); Wait(20); PlayTone(Mi,15); Wait(20); PlayTone(Re,15); Wait(20); PlayTone(Mi,15); Wait(20); PlayTone(Fa,15); Wait(20); PlayTone(Re,15); Wait(20); Wait(20); } } task main() { SetSensor(SENSOR_1, SENSOR_TOUCH); start play_music ; OnFwd(OUT_A+OUT_B); until (SENSOR_1 == 1); stop play_music ; Off(OUT_A+OUT_B); }