[[2004/A4]]

* 目次 [#y1555203]

#contents

ここでは4班が作成したプログラムを紹介しときます。
正確な測定とかはまったくしないで本能の赴くままに作ったので、ロボットなのに野性の感で動いてます。(おい
* ハートを描くロボット(必須) [#te935b8a]
task main()~
{~
 OnRev(OUT_A + OUT_C);
 Wait(100);
 Off(OUT_A+OUT_C);
 Wait(100);
 
 SetPower(OUT_C,7);
 OnRev(OUT_C); //右上側のカーブ
 Wait(400);
 Off(OUT_A+OUT_C);
 Wait(100);
 
 SetPower(OUT_A,7);SetPower(OUT_C,1);
 OnFwd(OUT_A); //左上側のカーブ
 Wait(400);
 Off(OUT_A+OUT_C);
 Wait(100);
 
 SetPower(OUT_A,1); SetPower(OUT_C,1);
 OnFwd(OUT_A + OUT_C); //左下側の辺
 Wait(100);
 Off(OUT_A+OUT_C);
}

* 台から落ちないロボット(必須) [#c9a7d7fb]
task main ()~
{~
    SetSensor(SENSOR_1, SENSOR_LIGHT);
    SetSensor(SENSOR_3, SENSOR_LIGHT);
    repeat(10){
    OnFwd(OUT_A+OUT_C);
    until (SENSOR_1 < 40)||(SENSOR_3 < 40);       //センサーの値が40未満
                                                                           //(適当に調節)になるまで
                                                                           // 次の命令を実行しない
    OnRev(OUT_A+OUT_C);
    Wait(50);
    OnFwd(OUT_A);OnRev(OUT_C);
    Wait(94);}
    Off(OUT_A+OUT_C);
    
}

* ラインをトレースするロボット(必須) [#e3f49e3e]
task main ()~
{~
 SetSensor(SENSOR_1,SENSOR_LIGHT); 
 SetSensor(SENSOR_3,SENSOR_LIGHT); 
 SetPower(OUT_A,1);SetPower(OUT_C,1);
 
 OnFwd(OUT_A+OUT_C);
 while(true){
           if(SENSOR_1<45) { 
           OnFwd(OUT_C); OnRev(OUT_A);
           until(SENSOR_1>45);
           OnFwd(OUT_C+OUT_A);}
 
           if(SENSOR_3<45) {
           OnFwd(OUT_A); OnRev(OUT_C);
           until(SENSOR_3>45);
           OnFwd(OUT_C+OUT_A);}
 
            }
}

task main ()~
{~
 SetSensor(SENSOR_1,SENSOR_LIGHT); 
 SetSensor(SENSOR_3,SENSOR_LIGHT); 
 SetPower(OUT_A,7);SetPower(OUT_C,7);
 
 OnFwd(OUT_A+OUT_C);
 while(true){
           if(SENSOR_1>45) { 
           OnFwd(OUT_A); OnRev(OUT_C);
           until(SENSOR_1<45);
           OnFwd(OUT_C+OUT_A);}
 
           if(SENSOR_3>45) {
           OnFwd(OUT_C); OnRev(OUT_A);
           until(SENSOR_3<45);
           OnFwd(OUT_C+OUT_A);}
 
            }
}

* 光を追いかけるロボット(必須) [#h3efe532]
* 演奏するロボット(必須) [#v018acde]

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