[[2017a/Member]] #contents #define pen_down OnFwd(OUT_A,25);Wait(180);Off(OUT_A);//ペンを下げる #define pen_up OnFwd(OUT_A,-25);Wait(220);Off(OUT_A);//ペンを上げる sub ONE()//1画目 { pen_down; OnFwd(OUT_C,-25); Wait(1240); Off(OUT_C); pen_up; } sub TWO()//2画目 { OnFwd(OUT_C,25); Wait(1240); Off(OUT_C); pen_down; OnFwd(OUT_B,-35); Wait(800); Off(OUT_B); OnFwd(OUT_C,-25); Wait(1240); Off(OUT_C); pen_up; } sub THREE()//3画目 { OnFwd(OUT_C,25); Wait(600); Off(OUT_C); OnFwd(OUT_B,35); Wait(800); Off(OUT_B); pen_down; OnFwd(OUT_B,-35); Wait(800); Off(OUT_B); OnFwd(OUT_B,-35); pen_up; } sub FOUR()//4画目 { OnFwd(OUT_B,35); Wait(950); Off(OUT_B); OnFwd(OUT_C,-25); Wait(650); Off(OUT_C); pen_down; OnFwd(OUT_B,-35); Wait(800); Off(OUT_B); pen_up; } task main ()//メイン { ONE(); TWO(); THREE(); FOUR(); }