ここには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); } } }