[[戻る>2005/A6]]
*製作中のプログラム [#c4c4fb09]
 #define t_u  494
 #define r  587
 #define m  659
 #define f  698
 #define s 784
 #define ra 880
 #define t 988
 #define d_u 1047
 #define r_u 1175
 #define m_u 1319
 int M_1 = 5 , M_2 = 10 , M_3 = 15 , M_4 = 20 , M_5 = 30 ;
 
 task play_music()
  {
    PlayTone(m,15); Wait(M_3); 
    PlayTone(t_u,10); Wait(M_2);
    PlayTone(t_u,10); Wait(M_2);   
    PlayTone(m,15); Wait(M_3);
    PlayTone(r,5); Wait(M_1);     
    PlayTone(m,10); Wait(M_2);     
    PlayTone(f,10); Wait(M_3);       // ブレス
    
    PlayTone(s,15); Wait(M_3);    
    PlayTone(f,5); Wait(M_1);
    PlayTone(s,10); Wait(M_2);
    PlayTone(d_u,10); Wait(M_2);         
    PlayTone(t,20); Wait(M_5);
    
    PlayTone(d_u,15); Wait(M_3);
    PlayTone(t,5); Wait(M_1);
    PlayTone(d_u,10); Wait(M_2);
    PlayTone(r_u,10); Wait(M_2);
    PlayTone(m_u,15); Wait(M_3);
    PlayTone(m_u,10); Wait(M_2);
    PlayTone(t,10); Wait(M_2);
    PlayTone(s,10); Wait(M_3);       // ブレス
    
    PlayTone(f,10); Wait(M_2);
    PlayTone(ra,10); Wait(M_2);
    PlayTone(s,15); Wait(M_3);
    PlayTone(f,5); Wait(M_1);
    PlayTone(m,20); Wait(M_5);
 }
[[A6 TOP>2005/A6]]
&size(30){&color(purple,pink){ロボコンではロボットの上部(ベルトコンベア,アーム)を担当};};

 #define music_time 3000
 
 task main()
  {    
    ClearTimer(0);             // Timer(0)をリセットする
    start play_music;         // 演奏を開始
    
    while(Timer(0) <= music_time)
     {
       OnFwd(OUT_A + OUT_C);   // 尻尾、うぉんちゅーが右に動く
       SendMessage(1);         // Message(1)を送る
       Wait(150);              // 1.5秒間待つ
       
       OnRev(OUT_A + OUT_C);   // 尻尾、ねずちゅーが左に動く 
       SendMessage(2);         // Message(2)を送る
       Wait(150);              // 1.5秒間待つ       
     }
    
    SendMessage(3);            // Message(3)を送る
    until(SendMessage() == 4); // Message(4)を受け取るまで送り続ける
    stop play_music ;          // 演奏を停止
    Float(OUT_A+OUT_B);        // 動きも停止
  }

 #define first OnRev(OUT_A);OnFwd(OUT_C);
 #define second OnFwd(OUT_A);OnRev(OUT_C);
 #define fin Float(OUT_A+OUT_C);SendMessage(4);
 
 task main()
  {
     while (true)
      {
         ClearMessage();                 // Message() を 0 に設定
         until (Message() != 0);         // Message() に 0 以外の値が入るまで待つ
         
         if ( Message() == 1 ) first;    // 1 を受信したときにはAの動きを見せる
         if ( Message() == 2 ) second;   // 2 を受信したときにはBの動きを見せる
         if ( Message() == 3 ) fin;      // 3 を受信したときには止まる
      }
  }  
*製作したプログラム 『これまでの流れ』 [#c0e77817]

**一番最初に作ったプログラム [#cb967754]
 // 初めてロボットを動かした時のプログラム
 
 task main()
 {
   OnFwd(OUT_A);
   OnFwd(OUT_C);
   Wait(110);
   Off(OUT_A+OUT_C);
 }                     // ただ進んで止まるだけ

#comment

**二番目に作った三角形を書くプログラム [#tc0fe390]
 //『repeat』プログラムを使えば簡単だった・・・
 
 task main()
 {
   OnFwd(OUT_A+OUT_C);
   Wait(150);
   OnFwd(OUT_A);
   OnRev(OUT_C);
   Wait(110);
   OnFwd(OUT_A+OUT_C);
   Wait(150);
   OnFwd(OUT_A);
   OnRev(OUT_C);
   Wait(110);
   OnFwd(OUT_A+OUT_C);
   Wait(150);
   OnFwd(OUT_A);
   OnRev(OUT_C);
   Wait(110);
   OnFwd(OUT_A+OUT_C);
   Wait(150);
 }                     // 正三角形の軌跡を残すだけ

#comment

 task main()                // 『repeat』を使ったプログラム
  {
   repeat(3)
    {
      OnFwd(OUT_A+OUT_C);
      Wait(150);            // 一つの辺の軌跡を書く
      OnFwd(OUT_A);
      OnRev(OUT_C);
      Wait(110);            // 一つの角の軌跡を書く
    }
 
  }

 
#comment

**課題1についてのプログラム [#r8c50d1d]
[[2005/A6/課題1/一班/コンドのプログラム]]

**課題2についてのプログラム [#efca2f18]
[[2005/A6/課題2左]]

**課題3についてのプログラム [#z5951019]
[[2005/A6/課題3左]]

**課題4についてのプログラム [#qf1d30ff]
[[2005/A6/課題4左/コンド]]

**課題5についてのプログラム [#m6e160bf]
[[2005/A6/課題5]]
&color(blue,yellow){(主に猫の構造担当)};


トップ   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS