task main()
 {
 start unknown;
 }
 
 #define C 523
 #define D 587
 #define E 659
 #define F 698
 #define G 784
 #define A 880
 #define Bf 932
 #define H 1047
 #define Dx 1175
 #define Fx 1397
 
 task unknown()
 {
 while(true)
 {
 PlayTone(C,15);Wait(20);
 PlayTone(F,55);Wait(60);
 PlayTone(A,15);Wait(20);
 PlayTone(H,55);Wait(60);
 
 PlayTone(F,15);Wait(20);
 PlayTone(Bf,15);Wait(20);
 PlayTone(Dx,15);Wait(20);
 PlayTone(Fx,15);Wait(20);
 PlayTone(Dx,15);Wait(20);
 PlayTone(H,55);Wait(60);
 
 PlayTone(B,15);Wait(20);
 PlayTone(Bf,15);Wait(20);
 PlayTone(G,15);Wait(20);
 PlayTone(C,15);Wait(20);
 PlayTone(Bf,15);Wait(20);
 PlayTone(B,15);Wait(20);
 PlayTone(G,15);Wait(20);
 PlayTone(C,15);Wait(20);
 PlayTone(G,15);Wait(20);
 
 PlayTone(G,15);Wait(20);
 PlayTone(E,35);Wait(40);
 PlayTone(D,35);Wait(40);
 PlayTone(C,55);Wait(60);
 }
 }

 #define G 784
 #define A 880
 #define B 988
 #define H 1047
 #define Dx 1175
 #define Ex 1319
 #define Fx 1397
 #define Gx 1568
 #define Ax 1760
 
 task matsuri()
 {
 while(true)
 {
 repeat(2)
 {
 PlayTone(H,15);Wait(20);
 PlayTone(B,15);Wait(20);
 PlayTone(H,15);Wait(20);
 PlayTone(Dx,15);Wait(20);
 PlayTone(Ex,35);Wait(40);
 PlayTone(G,35);Wait(40);
 PlayTone(A,35);Wait(40);
 PlayTone(B,35);Wait(40);
 PlayTone(H,55);Wait(80);
 } 
 PlayTone(Gx,15);Wait(20);
 PlayTone(Ax,15);Wait(20);
 PlayTone(Gx,15);Wait(20);
 PlayTone(Ex,15);Wait(20);
 PlayTone(Fx,15);Wait(20);
 PlayTone(Gx,15);Wait(20);
 PlayTone(Fx,15);Wait(20);
 PlayTone(Dx,15);Wait(20);
 PlayTone(Ex,15);Wait(20);
 PlayTone(Fx,15);Wait(20);
 PlayTone(Ex,15);Wait(20);
 PlayTone(H,15);Wait(20);
 PlayTone(Dx,55);Wait(80);
 
 PlayTone(Gx,12);Wait(20);
 PlayTone(Ax,12);Wait(20);
 PlayTone(Gx,12);Wait(20);
 PlayTone(Ex,12);Wait(20);
 PlayTone(Fx,12);Wait(20);
 PlayTone(Gx,12);Wait(20);
 PlayTone(Fx,12);Wait(20);
 PlayTone(Dx,12);Wait(20);
 PlayTone(Ex,12);Wait(20);
 PlayTone(Fx,12);Wait(20);
 PlayTone(Ex,12);Wait(20);
 PlayTone(H,12);Wait(20);
 PlayTone(Dx,55);Wait(80);
 
 PlayTone(H,15);Wait(20);
 PlayTone(B,15);Wait(20);
 PlayTone(H,15);Wait(20);
 PlayTone(Dx,15);Wait(20);
 PlayTone(Ex,35);Wait(40);
 PlayTone(G,35);Wait(40);
 PlayTone(A,35);Wait(40);
 PlayTone(B,35);Wait(40);
 PlayTone(H,55);Wait(80);
 
 PlayTone(Ex,15);Wait(20);
 PlayTone(Dx,15);Wait(20);
 PlayTone(Ex,15);Wait(20);
 PlayTone(Fx,15);Wait(20);
 PlayTone(Gx,35);Wait(40);
 PlayTone(G,35);Wait(40);
 PlayTone(A,35);Wait(40);
 PlayTone(B,35);Wait(40);
 PlayTone(H,55);Wait(80);
 }
 }




[[2006b/A1/kuroneko]]

トップ   編集 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS