2004/C6/練習問題

製作者 火炉壬

#define mawaru OnRev(OUT_A);

#define zenshin OnFwd(OUT_A);

task main() {

   ClearMessage();
   until(Message()!=0);
   if(Message()==1)mawaru;Wait(500);Off(OUT_A);
   if(Message()==2)zenshin;Wait(500);Off(OUT_A);
   
   ClearMessage();
   mawaru;
   SendMessage(1);
   Wait(500);
   Off(OUT_A);

}

このページはmy-myが担当しました。

/*

   送られたメッセージに従って左右に回転するロボットのプログラム(54班の作品)

/

#define turn_left OnRev(OUT_A);

#define go_straight OnFwd(OUT_A); task main() { Wait(500);

  ClearTimer(0);while ( Timer(0) <= 10 ) { SendMessage(1); }  // 最初の 5秒間 1 を送信する
   while (true)
   {
       ClearMessage();           // Message() を 0 に設定
       until (Message() != 0);   // Message() に 0 以外の値が入るまで待つ
       if ( Message() == 1 ) {turn_left;
       Wait(500);    // 1 を受信したときには左回転
       Off(OUT_A);SendMessage(1);}
       if ( Message() == 2) {go_straight;
       Wait(1500);Off(OUT_A);//2を受信したときには前進
       SendMessage(2);}

} }


トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2005-01-31 (月) 17:50:40 (5315d)