2004/B6/音楽をならすロボット の変更点

• 追加された行はこの色です。
• 削除された行はこの色です。
• 2004/B6/音楽をならすロボット へ行く。
• 2004/B6/音楽をならすロボット の差分を削除

[[2004/B6/33班]]

音楽をならすロボット
----
 #define Do  523
 #define re  587
 #define mi  659
 #define fa  698
 #define so  784
 #define ra  880
 #define si  988
 task play_music()
 {
  while (true)
   {
    PlayTone(Do,20); Wait(25);
    PlayTone(re,20); Wait(25);  
    PlayTone(mi,20); Wait(45); 
    PlayTone(Do,20); Wait(25);
    PlayTone(re,20); Wait(25);  
    PlayTone(mi,20); Wait(45);
    PlayTone(so,20); Wait(25);
    PlayTone(mi,20); Wait(25);
    PlayTone(re,20); Wait(25);
    PlayTone(Do,20); Wait(25);
    PlayTone(re,20); Wait(25);
    PlayTone(mi,20); Wait(25);
    PlayTone(re,20); Wait(45);
    PlayTone(Do,20); Wait(25);
    PlayTone(re,20); Wait(25);  
    PlayTone(mi,20); Wait(45); 
    PlayTone(Do,20); Wait(25);
    PlayTone(re,20); Wait(25);  
    PlayTone(mi,20); Wait(45);
    PlayTone(so,20); Wait(25);
    PlayTone(mi,20); Wait(25);
    PlayTone(re,20); Wait(25);
    PlayTone(Do,20); Wait(25);
    PlayTone(re,20); Wait(25);
    PlayTone(mi,20); Wait(25);
    PlayTone(Do,20); Wait(45);
    PlayTone(ra,20); Wait(25);
    PlayTone(ra,20); Wait(25);
    PlayTone(so,20); Wait(25);
    PlayTone(ra,20); Wait(25);
    PlayTone(ra,20); Wait(25);
    PlayTone(ra,20); Wait(25);
    PlayTone(so,20); Wait(45);
    PlayTone(mi,20); Wait(25);
    PlayTone(mi,20); Wait(25);
    PlayTone(re,20); Wait(25);
    PlayTone(re,20); Wait(25);
    PlayTone(Do,20); Wait(40);
   }
  {
   PlayTone(Do,20); Wait(25);
   PlayTone(re,20); Wait(25);  
   PlayTone(mi,20); Wait(45); 
   PlayTone(Do,20); Wait(25);
   PlayTone(re,20); Wait(25);  
   PlayTone(mi,20); Wait(45);
   PlayTone(so,20); Wait(25);
   PlayTone(mi,20); Wait(25);
   PlayTone(re,20); Wait(25);
   PlayTone(Do,20); Wait(25);
   PlayTone(re,20); Wait(25);
   PlayTone(mi,20); Wait(25);
   PlayTone(re,20); Wait(45);
   PlayTone(Do,20); Wait(25);
   PlayTone(re,20); Wait(25);  
   PlayTone(mi,20); Wait(45); 
   PlayTone(Do,20); Wait(25);
   PlayTone(re,20); Wait(25);  
   PlayTone(mi,20); Wait(45);
   PlayTone(so,20); Wait(25);
   PlayTone(mi,20); Wait(25);
   PlayTone(re,20); Wait(25);
   PlayTone(Do,20); Wait(25);
   PlayTone(re,20); Wait(25);
   PlayTone(mi,20); Wait(25);
   PlayTone(Do,20); Wait(45);
   PlayTone(ra,20); Wait(25);
   PlayTone(ra,20); Wait(25);
   PlayTone(so,20); Wait(25);
   PlayTone(ra,20); Wait(25);
   PlayTone(ra,20); Wait(25);
   PlayTone(ra,20); Wait(25);
   PlayTone(so,20); Wait(45);
   PlayTone(mi,20); Wait(25);
   PlayTone(mi,20); Wait(25);
   PlayTone(re,20); Wait(25);
   PlayTone(re,20); Wait(25);
   PlayTone(Do,20); Wait(40);
  }
 }
 task main()
 {
  start play_music;
 }
----