- 追加された行はこの色です。
- 削除された行はこの色です。
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 original()
task unknown()
{
while(true)
{
PlayTone(C,15);Wait(5);
PlayTone(F,55);Wait(5);
PlayTone(A,15);Wait(5);
PlayTone(H,55);Wait(5);
PlayTone(C,15);Wait(20);
PlayTone(F,55);Wait(60);
PlayTone(A,15);Wait(20);
PlayTone(H,55);Wait(60);
PlayTone(F,15);Wait(5);
PlayTone(Bf,15);Wait(5);
PlayTone(Dx,15);Wait(5);
PlayTone(Fx,15);Wait(5);
PlayTone(Dx,15);Wait(5);
PlayTone(H,55);Wait(5);
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(5);
PlayTone(Bf,15);Wait(5);
PlayTone(G,15);Wait(5);
PlayTone(C,15);Wait(5);
PlayTone(Bf,15);Wait(5);
PlayTone(B,15);Wait(5);
PlayTone(G,15);Wait(5);
PlayTone(C,15);Wait(5);
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(5);
PlayTone(E,35);Wait(5);
PlayTone(D,35);Wait(5);
PlayTone(C,55);Wait(15);
PlayTone(G,15);Wait(20);
PlayTone(E,35);Wait(40);
PlayTone(D,35);Wait(40);
PlayTone(C,55);Wait(60);
}
}
task main()
{
SetSensor(SENSOR_1, SENSOR_TOUCH);
if(SENSOR_1==1);
{
start original ;
OnFwd(OUT_A+OUT_B);
until (SENSOR_1 == 1);
stop original ;
Off(OUT_A+OUT_B);
}}
#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)
{
PlayTone(H,15);Wait(5);
PlayTone(B,15);Wait(5);
PlayTone(H,15);Wait(5);
PlayTone(Dx,15);Wait(5);
PlayTone(Ex,35);Wait(5);
PlayTone(G,35);Wait(5);
PlayTone(A,35);Wait(5);
PlayTone(B,35);Wait(5);
PlayTone(H,55);Wait(15);
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(H,15);Wait(5);
PlayTone(B,15);Wait(5);
PlayTone(H,15);Wait(5);
PlayTone(Dx,15);Wait(5);
PlayTone(Ex,35);Wait(5);
PlayTone(G,35);Wait(5);
PlayTone(A,35);Wait(5);
PlayTone(B,35);Wait(5);
PlayTone(H,55);Wait(15);
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(Gx,15);Wait(5);
PlayTone(Ax,15);Wait(5);
PlayTone(Gx,15);Wait(5);
PlayTone(Ex,15);Wait(5);
PlayTone(Fx,15);Wait(5);
PlayTone(Gx,15);Wait(5);
PlayTone(Fx,15);Wait(5);
PlayTone(Dx,15);Wait(5);
PlayTone(Ex,15);Wait(5);
PlayTone(Fx,15);Wait(5);
PlayTone(Ex,15);Wait(5);
PlayTone(H,15);Wait(5);
PlayTone(Dx,55);Wait(15);
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,12);Wait(8);
PlayTone(Ax,12);Wait(8);
PlayTone(Gx,12);Wait(8);
PlayTone(Ex,12);Wait(8);
PlayTone(Fx,12);Wait(8);
PlayTone(Gx,12);Wait(8);
PlayTone(Fx,12);Wait(8);
PlayTone(Dx,12);Wait(8);
PlayTone(Ex,12);Wait(8);
PlayTone(Fx,12);Wait(8);
PlayTone(Ex,12);Wait(8);
PlayTone(H,12);Wait(8);
PlayTone(Dx,55);Wait(15);
PlayTone(H,15);Wait(5);
PlayTone(B,15);Wait(5);
PlayTone(H,15);Wait(5);
PlayTone(Dx,15);Wait(5);
PlayTone(Ex,35);Wait(5);
PlayTone(G,35);Wait(5);
PlayTone(A,35);Wait(5);
PlayTone(B,35);Wait(5);
PlayTone(H,55);Wait(15);
PlayTone(Ex,15);Wait(5);
PlayTone(Dx,15);Wait(5);
PlayTone(Ex,15);Wait(5);
PlayTone(Fx,15);Wait(5);
PlayTone(Gx,35);Wait(5);
PlayTone(G,35);Wait(5);
PlayTone(A,35);Wait(5);
PlayTone(B,35);Wait(5);
PlayTone(H,55);Wait(15);
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]]