[[ロボティクス入門ゼミ]] [[戻る>2005/A6]] sub pen_down(){ Off(OUT_A+OUT_C); OnFwd(OUT_B); Wait(100); Off(OUT_B); } sub pen_up(){ Off(OUT_A+OUT_C); OnRev(OUT_B); Wait(100); Off(OUT_B); } task main(){ repeat(5){ pen_down(); pen_up(); } }