- 追加された行はこの色です。
- 削除された行はこの色です。
[[2006a/C2/課題3左]]
#hr
CENTER:&size(25){ねこふんじゃったを演奏するプログラム };
#hr
RIGHT:カウンタ&counter;
RIGHT:[[ロボティクス入門ゼミ]]
RIGHT:[[2006a/C2/課題3左に戻る>2006a/C2/課題3左#kadai3kyokusyoukai]]
#define Do 523
#define Re 587
#define Mi 659
#define Fa 698
#define So 784
#define Ra 880
#define Si 988
#define Do2 1047
task music(){
while(1){
Wait(20);
PlayTone(Ra,5); Wait(10);
PlayTone(So,5); Wait(10);
PlayTone(Do,15); Wait(20);
PlayTone(Do2,5); Wait(20);
PlayTone(Do2,5); Wait(20);
PlayTone(Ra,5); Wait(10);
PlayTone(So,5); Wait(10);
PlayTone(Do,15); Wait(15);
PlayTone(Do2,5); Wait(20);
PlayTone(Do2,5); Wait(20);
PlayTone(Ra,5); Wait(10);
PlayTone(So,5); Wait(10);
PlayTone(Do,15); Wait(20);
PlayTone(Do2,15); Wait(20);
PlayTone(So,15); Wait(20);
PlayTone(Do2,15); Wait(20);
PlayTone(Ra,15); Wait(20);
PlayTone(Si,5); Wait(20);
PlayTone(Si,5); Wait(20);
PlayTone(Ra,5); Wait(10);
PlayTone(So,5); Wait(10);
PlayTone(Re,15); Wait(20);
PlayTone(Si,5); Wait(20);
PlayTone(Si,5); Wait(20);
PlayTone(Ra,5); Wait(10);
PlayTone(So,5); Wait(10);
PlayTone(Re,15); Wait(20);
PlayTone(Si,5); Wait(20);
PlayTone(Si,5); Wait(20);
PlayTone(Ra,5); Wait(10);
PlayTone(So,5); Wait(10);
PlayTone(Re,15); Wait(20);
PlayTone(Si,15); Wait(20);
PlayTone(Ra,15); Wait(20);
PlayTone(Si,15); Wait(20);
PlayTone(Do2,5); Wait(20);
PlayTone(Do2,5); Wait(20);
PlayTone(Do2,5); Wait(20);
}
}
----------
RIGHT:[[ロボティクス入門ゼミ]]
RIGHT:[[2006a/C2/課題3左に戻る>2006a/C2/課題3左#kadai3kyokusyoukai]]