[[2005/B2]] ・ロボコンのプログラムに関するめも sub cub() { OnFwd(OUT_A+OUT_C); while((SENSOR_1 > 50) || (SENSOR_3 > 50)) { if (SENSOR_1 < 50) { OnFwd(OUT_C);OnRev(OUT_A); } if (SENSOR_3 < 50) { OnFwd(OUT_A);OnRev(OUT_C); } if ((SENSOR_1 > 50) && (SENSOR_3 > 50)) { OnFwd(OUT_A+OUT_C); } } Off(OUT_A+OUT_C); } task main() { SetSensor(SENSOR_1, SENSOR_LIGHT); SetSensor(SENSOR_3, SENSOR_LIGHT); OnFwd(OUT_A+OUT_C); until((SENSOR_1< 50) && (SENSOR_3 < 50)); OnFwd(OUT_A+OUT_C);Wait(40); OnFwd(OUT_C);OnRev(OUT_A);Wait(200); cub(); OnFwd(OUT_A+OUT_C);Wait(30); OnFwd(OUT_C);OnRev(OUT_A);Wait(200); OnFwd(OUT_A+OUT_C);Wait(50); OnFwd(OUT_A+OUT_C);Wait(100); Off(OUT_A+OUT_C);Wait(200); OnFwd(OUT_A);OnRev(OUT_C);Wait(200); OnFwd(OUT_A+OUT_C);Wait(50); cub(); Off(OUT_A+OUT_C); }