*はじめてのプログラミング  四角形を描くように走るレゴ [#hd76dc1f]

*課題1 「左」という字を書くことのできるすごい書道ロボット☆ [#x7e02456]
 task main ()
 task main()
 {
    SetSensor(SENSOR_1, SENSOR_LIGHT);
 OnFwd(OUT_A+OUT_C);Wait(200);Off(OUT_A+OUT_C);
 OnRev(OUT_B);Wait(50);Off(OUT_B);
 OnRev(OUT_A+OUT_C);Wait(100);Off(OUT_A+OUT_C);
 OnFwd(OUT_C);Wait(150);Off(OUT_C);
 OnFwd(OUT_B);Wait(50);Off(OUT_B);
 OnRev(OUT_A+OUT_C);Wait(270);Off(OUT_A+OUT_C);
 OnRev(OUT_B);Wait(50);Off(OUT_B);
 OnFwd(OUT_A+OUT_C);Wait(150);Off(OUT_A+OUT_C);
 OnFwd(OUT_A);Wait(165);Off(OUT_A);
 OnFwd(OUT_B);Wait(50);Off(OUT_B);
 OnRev(OUT_A+OUT_C);Wait(80);Off(OUT_A+OUT_C);
 OnRev(OUT_B);Wait(50);Off(OUT_B);
 OnFwd(OUT_C);Wait(180);Off(OUT_C);
 OnRev(OUT_A+OUT_C);Wait(130);Off(OUT_A+OUT_C);
 OnFwd(OUT_B);Wait(50);Off(OUT_B);
 OnRev(OUT_A+OUT_C);Wait(60);Off(OUT_A+OUT_C);
 OnFwd(OUT_C);Wait(230);Off(OUT_C);
 OnRev(OUT_A+OUT_C);Wait(150);Off(OUT_A+OUT_C);
 OnFwd(OUT_B);Wait(50);Off(OUT_B);
 OnRev(OUT_A+OUT_C);Wait(150);Off(OUT_A+OUT_C);
 OnRev(OUT_B);Wait(50);Off(OUT_B);

**線の上を走る、いわばライントレース [#x56eb582]
*線の上を走る、いわばライントレース [#x56eb582]
 while (true) {
        if (SENSOR_1 < 40) {   
            OnFwd(OUT_A);
            Off(OUT_C);
        } else {                      
            Off(OUT_A);
            OnFwd(OUT_C);
        }
    }
 }

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