2004/A5/台から落ちないロボット
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
|
ログイン
]
開始行:
[[2004/A5/練習問題]]
プログラム
task main()
{
SetSensor(SENSOR_1, SENSOR_TOUCH); //端子1をタッチセンサーとする
while(true)
{
OnFwd(OUT_A+OUT_C); // 前に進む
until (SENSOR_1 == 0); // センサーが机と離れる(落ちそうになる)
OnRev(OUT_A+OUT_C); Wait(200); //落ちないようにその場で回転する
OnFwd(OUT_A); Wait(100); // 右回りで進む そして10秒待つ
OnFwd(OUT_C); //左回りで進む
}
}
終了行:
[[2004/A5/練習問題]]
プログラム
task main()
{
SetSensor(SENSOR_1, SENSOR_TOUCH); //端子1をタッチセンサーとする
while(true)
{
OnFwd(OUT_A+OUT_C); // 前に進む
until (SENSOR_1 == 0); // センサーが机と離れる(落ちそうになる)
OnRev(OUT_A+OUT_C); Wait(200); //落ちないようにその場で回転する
OnFwd(OUT_A); Wait(100); // 右回りで進む そして10秒待つ
OnFwd(OUT_C); //左回りで進む
}
}
ページ名: