[[2005/B2/MemberOnly/光に向かって進むロボ]]

 task main()
 {
   SetSensor(SENSOR_1, SENSOR_LIGHT);
   int hikari = 0;    //光の強さの値(初期値0)
   
   
   
   int mt;
   
   
   while (true)
   {
   ClearTimer(0);
   ClearTimer(1);
   hikari = 0;
   
   while (Timer(1) < 50)//5秒間回る(一周回る
   {     
   OnFwd(OUT_A);OnRev(OUT_C);
   
        if (SENSOR_1 > hikari)
         {
         hikari=SENSOR_1;
         mt = FastTimer(0);//一番光の強かったときの時間を記憶
         }
   
   }
   int lt;
   lt = FastTimer(0);
   
   OnFwd(OUT_C);OnRev(OUT_A);Wait(lt - mt);//一番光の強い方向を向く
   OnFwd(OUT_A+OUT_C);Wait(300);//3秒間直進
   }
 }
-[[ここ>まいける(TA)#y8259022]]を参照して下さい。 -- [[まいける(TA)]] &new{2006-02-09 (木) 00:29:57};

#comment

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