〜第2回 ロボット製作〜

◆壁に沿って走るロボット

・プログラミィング

task main()
{
   SetSensor(SENSOR_1,SENSOR_TOUCH); //センサ1がタッチセンサで
                                     //あると宣言                             
   SetSensor(SENSOR_3,SENSOR_TOUCH); //センサ3がタッチセンサで
                                     //あると宣言 
   OnFwd(OUT_A+OUT_C); //前進               
   until(SENSOR_1 == 1 || SENSOR_3 == 1);//1がオン又は3がオン
   Off(OUT_A+OUT_C);
   while(true) //以下のことを繰り返す    
   {
       if (SENSOR_1 == 1) //もし1がオンなら
       {
           OnFwd(OUT_A+OUT_C);
           until(SENSOR_1 == 0 || SENSOR_3 == 1);
           Off(OUT_A+OUT_C);
       }
       if(SENSOR_3 == 1)
       {
           OnFwd(OUT_A);
           OnRev(OUT_C);
           Wait(105);
           Off(OUT_A);
           OnFwd(OUT_A+OUT_C);
           until(SENSOR_1 == 1);
           Off(OUT_A+OUT_C);
       } else {
           OnFwd(OUT_C);
           until(SENSOR_1 == 1);
           Off(OUT_C);
       }
   }      
}        

◎工夫・苦労をした点

◆ロボットについて...

◎構成 ◎工夫・苦労をした点


トップ   編集 凍結 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2005-12-05 (月) 16:37:49