2006a/C2/課題３左/君が代 の履歴ソース(No.2)

• 履歴一覧
• 差分 を表示
• 現在との差分 を表示
• 2006a/C2/課題３左/君が代 へ行く。
  • 1 (2006-07-06 (木) 11:21:48)
  • 2 (2006-07-06 (木) 13:21:59)

[[2006a/C2/課題３左]]


#hr
CENTER:&size(25){君が代};
#hr


 
RIGHT:カウンタ&counter;
RIGHT:[[ロボティクス入門ゼミ]]
RIGHT:[[2006a/C2/課題３左]]


 #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);
               }
   }