[[2004/B1/28班練習問題]]

*台から落ちないロボット [#l8bf118d]

 task main()
 {
     SetSensor(SENSOR_1, SENSOR_TOUCH); //タッチセンサーの設定
     SetSensor(SENSOR_3, SENSOR_TOUCH); 
 
     while(true)
     {
         OnFwd(OUT_A+OUT_C) ;
         until (SENSOR_1 || SENSOR_3 == 1) ; //どちらかのセンサーが反応するまで直進
         {
               if (SENSOR_1 == 1) //右センサーが反応した場合
               {
               OnRev(OUT_A+OUT_C) ; Wait(50); //後退
               OnFwd(OUT_A) ; Wait(150); //左回転
               OnFwd(OUT_A+OUT_C) ; //前進
               }
               if (SENSOR_3 == 1) //左センサーが反応した場合
               {
               OnRev(OUT_A+OUT_C) ; Wait(50); //後退
               OnFwd(OUT_C) ; Wait(150); //右回転
               OnFwd(OUT_A+OUT_C) ; //前進
               }
         }
     }
 }


小さな箱の上で動かすと意外とたのしい。w
小さな箱の上で動かすと、よりたのしい。

トップ   編集 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS