2005/B6/課題24040
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
|
ログイン
]
開始行:
[[2005/B6/課題2]]
ここにはB6L(05F4040B)のプログラムを表示します。
task main()
{
SetSensor(SENSOR_1, SENSOR_TOUCH); //左側についているバンパーにタッチセンサーがついています。
SetSensor(SENSOR_3, SENSOR_TOUCH); //右側についているバンパーにタッチセンサーがついています。
OnFwd(OUT_A+OUT_C);
while(true)
{
if(SENSOR_3 == 1) //右のバンパーが接している時
{
OnRev(OUT_A) ; Wait(15); //方向転換します。
OnFwd(OUT_A) ; Wait(20); //直進します。
}
if((SENSOR_1 == 1) && (SENSOR_3 == 1)) //左右のバンパーが接している、つまり前方にぶつかった場合
{
OnRev(OUT_A+OUT_C) ; Wait(30); //バックします
OnFwd(OUT_C) ; Wait(30); // 方向転換します。
OnFwd(OUT_A); // 直進します。
}
if(SENSOR_3 == 0) //右のバンパーが接していないとき
{
OnRev(OUT_A+OUT_C);Wait(30);
OnFwd(OUT_C);Wait(5);
OnFwd(OUT_A+OUT_C);Wait(30);Wait(25);
OnRev(OUT_C);Wait(40);
OnFwd(OUT_C);Wait(50);
}
if(SENSOR_1 == 1) //左のバンパーが接しているとき
{
OnRev(OUT_C+OUT_A);Wait(30);
OnFwd(OUT_C);Wait(60);
OnFwd(OUT_A);Wait(30);
}
}
}
終了行:
[[2005/B6/課題2]]
ここにはB6L(05F4040B)のプログラムを表示します。
task main()
{
SetSensor(SENSOR_1, SENSOR_TOUCH); //左側についているバンパーにタッチセンサーがついています。
SetSensor(SENSOR_3, SENSOR_TOUCH); //右側についているバンパーにタッチセンサーがついています。
OnFwd(OUT_A+OUT_C);
while(true)
{
if(SENSOR_3 == 1) //右のバンパーが接している時
{
OnRev(OUT_A) ; Wait(15); //方向転換します。
OnFwd(OUT_A) ; Wait(20); //直進します。
}
if((SENSOR_1 == 1) && (SENSOR_3 == 1)) //左右のバンパーが接している、つまり前方にぶつかった場合
{
OnRev(OUT_A+OUT_C) ; Wait(30); //バックします
OnFwd(OUT_C) ; Wait(30); // 方向転換します。
OnFwd(OUT_A); // 直進します。
}
if(SENSOR_3 == 0) //右のバンパーが接していないとき
{
OnRev(OUT_A+OUT_C);Wait(30);
OnFwd(OUT_C);Wait(5);
OnFwd(OUT_A+OUT_C);Wait(30);Wait(25);
OnRev(OUT_C);Wait(40);
OnFwd(OUT_C);Wait(50);
}
if(SENSOR_1 == 1) //左のバンパーが接しているとき
{
OnRev(OUT_C+OUT_A);Wait(30);
OnFwd(OUT_C);Wait(60);
OnFwd(OUT_A);Wait(30);
}
}
}
ページ名: