2005/A1

ソース

 //壁伝いロボ

 //A1 Harada

 

#define back    20 //
#define rotate  60

task main ()
{
        SetSensor(SENSOR_1, SENSOR_TOUCH);
        SetSensor(SENSOR_3, SENSOR_TOUCH);

        OnFwd(OUT_A+OUT_C);
        until(SENSOR_1 == 1);

        while(true)
       {
       if(SENSOR_3 == 0)
                         {
                          if(SENSOR_1 == 1)
                                     {
                                      OnFwd(OUT_A+OUT_C);
                                      until ((SENSOR_1 == 0) || (SENSOR_3 == 1)) ;
                                     }
                                     
                          else
                                     {
                                      OnFwd (OUT_C);Float(OUT_A);
                                      until ((SENSOR_1 == 1) || (SENSOR_3 == 1)) ;
                                     }
                         }
       else
                     {
                      OnRev (OUT_A+OUT_C); Wait(back);
                      Off (OUT_A+OUT_C);
                      OnFwd (OUT_A); OnRev (OUT_C); Wait(rotate);
                     }
                     
        }
}

トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2005-11-25 (金) 14:35:04