[[戻る>2005/A6]]
*製作中のプログラム [#c4c4fb09]

**机の周りを回るロボット [#if1dd803]

 #define back_time 50                  //
 
 task main()
 {
    SetSensor(SENSOR_1, SENSOR_TOUCH);
    SetSensor(SENSOR_3, SENSOR_TOUCH);
 
    OnFwd(OUT_A+OUT_C);               //
 
    while(true)
    {
        if(SENSOR_1==0)               //左センサーが離れる
        { 
             OnRev(OUT_A+OUT_C);
             Wait(back_time);         //
             Off(OUT_C);              //
             OnFwd(OUT_A);            // 左に曲がる
             until(SENSOR_1==1);      //
             OnFwd(OUT_C);            //
        } 
        
        if(SENSOR_1==1)&&(SENSOR_3==1)
        { 
             OnRev(OUT_A+OUT_C);
             Wait(back_time);
             Off(OUT_A);              //
             OnFwd(OUT_C);            // 右に曲がる
             until((SENSOR_1==1)&&(SENSOR_3==0));
             OnFwd(OUT_A);
        }  
 
    }
    
 }

#comment

*製作したプログラム 『これまでの流れ』 [#c0e77817]

**一番最初に作ったプログラム [#cb967754]
 //初めてロボットを動かした時のプログラム
 
 task main()
 {
   OnFwd(OUT_A);
   OnFwd(OUT_C);
   Wait(110);
   Off(OUT_A+OUT_C);
 }                     // ただ進んで止まるだけ

#comment

**二番目に作った三角形を書くプログラム [#tc0fe390]
 //『repeat』プログラムを使えば簡単だった・・・
 
 task main()
 {
   OnFwd(OUT_A+OUT_C);
   Wait(150);
   OnFwd(OUT_A);
   OnRev(OUT_C);
   Wait(110);
   OnFwd(OUT_A+OUT_C);
   Wait(150);
   OnFwd(OUT_A);
   OnRev(OUT_C);
   Wait(110);
   OnFwd(OUT_A+OUT_C);
   Wait(150);
   OnFwd(OUT_A);
   OnRev(OUT_C);
   Wait(110);
   OnFwd(OUT_A+OUT_C);
   Wait(150);
 }                     // 正三角形の軌跡を残すだけ

#comment

**課題1についてのプログラム [#r8c50d1d]
[[2005/A6/課題1/一班/コンドのプログラム]]

トップ   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS