2005/C4/机の周りを移動するプログラム2
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
|
ログイン
]
開始行:
[[2005/C4/だいすけ]]
task main()
{
SetSensor(SENSOR_1,SENSOR_TOUCH);
SetSensor(SENSOR_3,SENSOR_TOUCH);
OnFwd(OUT_A+OUT_C);
until((SENSOR_1 == 0) && (SENSOR_3 == 0));
Off(OUT_A);
while (true)
{
if ((SENSOR_1 == 0) && (SENSOR_3 == 0))
{
Off(OUT_A);
OnFwd(OUT_C);
until((SENSOR_1 == 1) && (SENSOR_3 == 0));
}
if ((SENSOR_1 == 1) && (SENSOR_3 == 0))
{
Off(OUT_C);
OnFwd(OUT_A);
}
if ((SENSOR_1 == 1) && (SENSOR_3 == 1))
{
OnRev(OUT_A+OUT_C);
Wait(83);
Off(OUT_C);
OnFwd(OUT_A);
Wait(210);
}
}
}
終了行:
[[2005/C4/だいすけ]]
task main()
{
SetSensor(SENSOR_1,SENSOR_TOUCH);
SetSensor(SENSOR_3,SENSOR_TOUCH);
OnFwd(OUT_A+OUT_C);
until((SENSOR_1 == 0) && (SENSOR_3 == 0));
Off(OUT_A);
while (true)
{
if ((SENSOR_1 == 0) && (SENSOR_3 == 0))
{
Off(OUT_A);
OnFwd(OUT_C);
until((SENSOR_1 == 1) && (SENSOR_3 == 0));
}
if ((SENSOR_1 == 1) && (SENSOR_3 == 0))
{
Off(OUT_C);
OnFwd(OUT_A);
}
if ((SENSOR_1 == 1) && (SENSOR_3 == 1))
{
OnRev(OUT_A+OUT_C);
Wait(83);
Off(OUT_C);
OnFwd(OUT_A);
Wait(210);
}
}
}
ページ名: