task main()

{

   OnFwd(OUT_A+OUT_C)
   Wait(300);
   OnRev(OUT_C);
   OnFwd(OUT_A);
   Wait(200);
   OnFwd(OUT_A+OUT_C)
   Wait(300);    
}

左のプログラム

task main() {

    OnRev(OUT_B);
    Wait(10);
    OnFwd(OUT_A+OUT_C);
    Wait(100);
    OnFwd(OUT_B);
    Wait(50);
    OnRev(OUT_C+OUT_A);
    Wait(200);
    OnFwd(OUT_C);
    OnRev(OUT_A);
    Wait(125);
    OnFwd(OUT_A+OUT_C);
    Wait(60);
    OnRev(OUT_B);
    Wait(5);
    OnFwd(OUT_A+OUT_C);
    Wait(190);
    OnFwd(OUT_B);
    Wait(50);
    OnRev(OUT_A+OUT_C);
    Wait(230);
    OnFwd(OUT_A);
    OnRev(OUT_C);
    Wait(125);
    OnFwd(OUT_A+OUT_C);
    Wait(75);
    OnRev(OUT_B);
    Wait(10);
    OnFwd(OUT_A+OUT_C);
    Wait(110);
    OnFwd(OUT_B);
    Wait(50);
    OnRev(OUT_A+OUT_C);
    Wait(200);
    OnFwd(OUT_C);
    OnRev(OUT_A);
    Wait(90);
    OnFwd(OUT_A+OUT_C);
    Wait(95);
    OnRev(OUT_B);
    Wait(10);
    OnFwd(OUT_A+OUT_C);
    Wait(70);
    OnFwd(OUT_B);
    Wait(50);
    OnRev(OUT_A+OUT_C);
    Wait(160);
    OnFwd(OUT_A);
    OnRev(OUT_C);
    Wait(73);
    OnFwd(OUT_B);
    Wait(5);
    OnRev(OUT_B);
    Wait(10);
    OnFwd(OUT_A+OUT_C);
    Wait(180);
    OnFwd(OUT_B);
    Off(OUT_A+OUT_B+OUT_C);
    }

touch task main() {

   SetSensor(SENSOR_1,SENSOR_TOUCH); 
   SetSensor(SENSOR_3,SENSOR_TOUCH);
   while(true)
   {
   OnFwd(OUT_C);
   until(SENSOR_1==1);
   OnFwd(OUT_A+OUT_C);
   until((SENSOR_1==1)&&(SENSOR_3==1));
   OnRev(OUT_A+OUT_C);
   Wait(50);
   OnFwd(OUT_A);
   OnRev(OUT_C);
   Wait(105);
   }

}


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