[[2004/B2/演奏するロボット]] #define Do 523 #define Dos 554 #define Re 587 #define Res 622 #define Mi 659 #define Fa 698 #define Fas 740 #define So 784 #define Sos 831 #define Ra 880 #define Ras 932 #define Si 988 #define DO 1047 #define RE 1175 task play_music(){ PlayTone(So,20);Wait(40); #define Do 523 #define Dos 554 #define Re 587 #define Res 622 #define Mi 659 #define Fa 698 #define Fas 740 #define So 784 #define Sos 831 #define Ra 880 #define Ras 932 #define Si 988 #define DO 1047 #define RE 1175 task play_music(){ P layTone(So,20);Wait(40); PlayTone(So,20);Wait(25); PlayTone(Do,50);Wait(50); PlayTone(Re,50);Wait(50); PlayTone(Mi,50);Wait(50); PlayTone(Fa,50);Wait(50); PlayTone(So,40);Wait(60); PlayTone(DO,80);Wait(100); PlayTone(Si,40);Wait(40); PlayTone(Ra,20);Wait(25); PlayTone(Ra,50);Wait(60); PlayTone(So,30);Wait(50); PlayTone(Fas,30);Wait(35); PlayTone(Fas,30);Wait(30); PlayTone(Ra,30);Wait(30); PlayTone(So,50);Wait(50); PlayTone(Mi,50);Wait(80); PlayTone(Mi,20);Wait(40); PlayTone(Mi,20);Wait(25); PlayTone(Mi,50);Wait(55); PlayTone(Mi,50);Wait(50); PlayTone(Fas,50);Wait(50); PlayTone(Sos,50);Wait(50); PlayTone(Ra,50);Wait(60); PlayTone(Ra,30);Wait(30); PlayTone(Si,30);Wait(30); PlayTone(DO,30);Wait(30); PlayTone(RE,60);Wait(80); PlayTone(Ra,30);Wait(35); PlayTone(Ra,30);Wait(30); PlayTone(RE,25);Wait(30); PlayTone(RE,50);Wait(50); PlayTone(DO,50);Wait(50); PlayTone(Si,50);Wait(50); PlayTone(Ra,50);Wait(50); }