[[2005/C1/山口]] *書道ロボット [#zf52fa78] sub go_straight() { OnFwd(OUT_B); OnRev(OUT_A); OnRev(OUT_C); Wait(27); OnRev(OUT_A); OnFwd(OUT_C); Wait(67); OnRev(OUT_C+OUT_A); Wait(15); Off(OUT_A+OUT_C); } sub turn_right() { OnFwd(OUT_A+OUT_C); Wait(25); OnFwd(OUT_A+OUT_C); OnRev(OUT_B); Wait(64); Off(OUT_A+OUT_C); } sub turn_left() { OnFwd(OUT_A);OnRev(OUT_C); Wait(98); OnFwd(OUT_A+OUT_C); OnRev(OUT_B); Wait(65); OnRev(OUT_A+OUT_C);OnFwd(OUT_B); Wait(37); } task main() { OnRev(OUT_B); Wait(50); OnFwd(OUT_A+OUT_C);OnRev(OUT_B); Wait(70); go_straight(); turn_right(); OnFwd(OUT_B); Wait(30); OnFwd(OUT_C);OnRev(OUT_A); Wait(80); turn_left(); OnRev(OUT_C); OnFwd(OUT_A); Wait(68); OnRev(OUT_B); Wait(50); OnFwd(OUT_A+OUT_C);OnRev(OUT_B); Wait(20); OnRev(OUT_A); OnFwd(OUT_C+OUT_B); Wait(98); OnRev(OUT_A+OUT_C); Wait(27); OnRev(OUT_B); Wait(50); OnFwd(OUT_A+OUT_C);Rev(OUT_B); Wait(65); Off(OUT_A+OUT_C+OUT_B); }