2005/B4/オシム監督
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
|
ログイン
]
開始行:
*はじめてのプログラミング 四角形を描くように走るレゴ [#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]
while (true) {
if (SENSOR_1 < 40) {
OnFwd(OUT_A);
Off(OUT_C);
} else {
Off(OUT_A);
OnFwd(OUT_C);
}
}
}
終了行:
*はじめてのプログラミング 四角形を描くように走るレゴ [#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]
while (true) {
if (SENSOR_1 < 40) {
OnFwd(OUT_A);
Off(OUT_C);
} else {
Off(OUT_A);
OnFwd(OUT_C);
}
}
}
ページ名: