#define pen_down OnRev(OUT_A);Wait(80);Off(OUT_A); #define pen_up OnFwd(OUT_A);Wait(80);Off(OUT_A);//ペン上下 task main() { pen_down; //一画目スタート OnFwd(OUT_B+OUT_C); Wait(50); OnRev(OUT_C); Wait(88); OnFwd(OUT_C); Wait(50); Off(OUT_B+OUT_C); pen_up; //一画目終わり Wait(50); OnFwd(OUT_C); OnRev(OUT_B); Wait(100); OnRev(OUT_C); Wait(50); Off(OUT_B+OUT_C); Wait(30); pen_down; //二画目スタート OnFwd(OUT_B+OUT_C); Wait(50); Off(OUT_B+OUT_C); Wait(30); pen_up; //二画目終わり OnRev(OUT_B+OUT_C); Wait(50); OnFwd(OUT_B); Wait(10); pen_down; //三画目ドン! OnFwd(OUT_B+OUT_C); Wait(50); OnRev(OUT_B); Wait(88); OnFwd(OUT_B); Wait(50); OnRev(OUT_C); Wait(88); OnFwd(OUT_C); Wait(50); OnRev(OUT_C); Wait(88); OnFwd(OUT_C); Wait(25); Off(OUT_B+OUT_C); Wait(50); pen_up; //三画目終了、「弘」左側「弓」完了 OnRev(OUT_B+OUT_C); Wait(55); OnFwd(OUT_C); Wait(63); OnRev(OUT_C); Wait(140); Off(OUT_B+OUT_C); Wait(50); pen_down; //四画目始め! OnFwd(OUT_B+OUT_C); Wait(140); OnRev(OUT_B); Wait(150); OnFwd(OUT_B); Wait(85); Off(OUT_B+OUT_C); pen_up; //四画目終わり OnFwd(OUT_C); OnRev(OUT_B); Wait(40); OnRev(OUT_B+OUT_C); Wait(10); Off(OUT_B+OUT_C); pen_down; //最後の五画目スタート OnFwd(OUT_C+OUT_B); Wait(65); Off(OUT_C+OUT_B); pen_up; //「弘」完成〜! }
コメントをお願いします。