2005/B2

壁に沿って動くロボット

task main() {

   SetSensor(SENSOR_1, SENSOR_TOUCH);
   SetSensor(SENSOR_2, SENSOR_TOUCH);
       
   OnFwd(OUT_A+OUT_C);          
   
   while (true)
   {
        if (SENSOR_2== 1)            //前に付けたセンサーが押された時
        {
            OnRev(OUT_A+OUT_C);
	     Wait(10);    
	 
	     OnFwd(OUT_A);              
            OnRev(OUT_C); Wait(95);   //左に90°回転
	     OnFwd(OUT_A+OUT_C);Wait(55);
	 }   
	  
        if (SENSOR_1== 0)           //壁からロボットが離れた時
        {
           OnFwd(OUT_C);             
           OnRev(OUT_A);  Wait(1);  //壁に向かって戻る。
        }      
         else
         {  
            OnFwd(OUT_A+OUT_C);
         }
	  }
	     

}


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