2006a/C2/課題3左


君が代を演奏するプログラム

カウンタ630
ロボティクス入門ゼミ
2006a/C2/課題3左に戻る
#define Do 262 
#define re 294 
#define mi 330 
#define fa 349
#define so 392
#define ra 440
#define si 494
#define Do2 523
#define re2 587
#define t 5 //これらは
#define n 5  //

task main()
  { 
  
  while(true){

     PlayTone(re,15*n);Wait(20*n+t);//ki-
    PlayTone(Do,15*n);Wait(20*n+t);//mi-
     PlayTone(re,15*n);Wait(20*n+t); //ga-
      PlayTone(mi,15*n);Wait(20*n+t);//la
    
        PlayTone(so,15*n);Wait(20*n+t);//yo
      PlayTone(mi,15*n);Wait(20*n+t);//lo
     PlayTone(re,30*n);     Wait(35*n+t);//walalaaa

      PlayTone(mi,15*n);Wait(20*n+t);//ti
        PlayTone(so,15*n);Wait(20*n+t);//yo
         PlayTone(ra,15*n);Wait(20*n+t);//ni
        PlayTone(so,5*n);Wait(10*n+t/2);
         PlayTone(ra,5*n+t);Wait(10*n+t);//ii
      
            PlayTone(re2,15*n);Wait(20*n+t);//yala
          PlayTone(si,15*n);Wait(20*n+t);//ti
         PlayTone(ra,15*n);Wait(20*n+t); //yo
        PlayTone(so,15*n);Wait(20*n+t);//nili
     
      PlayTone(mi,15*n);Wait(20*n+t*2);//sa
        PlayTone(so,15*n);Wait(20*n+t*2);//zala 
         PlayTone(ra,30*n);     Wait(35*n+t); //re
       
            PlayTone(re2,15*n); Wait(20*n+t);//i
           PlayTone(Do2,15*n); Wait(20*n+t);//si
            PlayTone(re2,30*n);     Wait(35*n+t);//noloo
    
      PlayTone(mi,15*n);Wait(20*n+t); //i
        PlayTone(so,15*n);Wait(20*n+t);//wa
         PlayTone(ra,15*n);Wait(20*n+t);//o
        PlayTone(so,15*n);Wait(20*n+t);//to
     
     PlayTone(mi,25*n);Wait(30*n+t); //nalala~
      PlayTone(so,5*n);    Wait(10*n+t);//ri
          PlayTone(re,30*n);Wait(40*n+t);//tele~~
     
        PlayTone(ra,15*n);Wait(20*n+t);//ko~
          PlayTone(Do2,15*n);Wait(20*n+t); //ke~
           PlayTone(re2,30*n);Wait(35*n+t);//nolloo~

          PlayTone(Do2,15*n);Wait(20*n+t);//mu
            PlayTone(re2,15*n);Wait(20*n+t);//lu
        PlayTone(ra,15*n);Wait(20*n+t); //su
       PlayTone(so,15*n);Wait(20*n+t);//lu
 
        PlayTone(ra,15*n);Wait(20*n+t);//ma
       PlayTone(so,5*n);Wait(10*n+t);PlayTone(mi,5*n);Wait(10*n+t); //lala
    PlayTone(re,30*n);   
Wait(35*n+t);//dele
     
    Wait(200);
              }
  }

ロボティクス入門ゼミ
2006a/C2/課題3左に戻る

トップ   編集 凍結 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2006-07-08 (土) 17:13:15