「井」を書くプログラム†
#define MOVE1 50
#define MOVE2 400
#define MOVE3 400
task main()
{OnRev(OUT_A+OUT_C);
Wait(MOVE3);
Off(OUT_A+OUT_C); //一画目
OnRev(OUT_B);
Wait(MOVE1);
Off(OUT_B); //ペンをあげる
OnFwd(OUT_A);OnRev(OUT_C);
Wait(MOVE2);
Off(OUT_A+OUT_C);
OnFwd(OUT_A+OUT_C);
Wait(100);
Off(OUT_A+OUT_C);
OnFwd(OUT_C);OnRev(OUT_A);
Wait(MOVE2);
Off(OUT_A+OUT_C);
OnFwd(OUT_A+OUT_C);
Wait(MOVE3);
Off(OUT_A+OUT_C); //二画目へ移動
OnFwd(OUT_B);
Wait(MOVE1);
Off(OUT_B); //ペンを下げる
OnRev(OUT_A+OUT_C);
Wait(MOVE3);
Off(OUT_A+OUT_C); //二画目
OnRev(OUT_B);
Wait(MOVE1);
Off(OUT_B); //ペンをあげる
OnFwd(OUT_C);OnRev(OUT_A);
Wait(MOVE2);
Off(OUT_A+OUT_C);
OnFwd(OUT_A+OUT_C);
Wait(200);
Off(OUT_A+OUT_C);
OnFwd(OUT_A);OnRev(OUT_C);
Wait(MOVE2);
Off(OUT_A+OUT_C);
OnFwd(OUT_A+OUT_C);
Wait(650);
Off(OUT_A+OUT_C);
OnFwd(OUT_C);OnRev(OUT_A);
Wait(MOVE2);
0ff(OUT_A+OUT_C); //三画目へ移動
OnFwd(OUT_B);
Wait(MOVE1);
Off(OUT_B); //ペンを下げる
OnRev(OUT_A+OUT_C);
Wait(600);
Off(OUT_A+OUT_C); //三画目
OnRev(OUT_B);
Wait(MOVE1);
Off(OUT_B); //ペンをあげる
OnFwd(OUT_C);OnRev(OUT_A);
Wait(MOVE2);
Off(OUT_A+OUT_C);
OnFwd(OUT_A+OUT_C);
Wait(100);
Off(OUT_A+OUT_C);
OnFwd(OUT_A);OnRev(OUT_C);
Wait(MOVE2);
Off(OUT_A+OUT_C);
OnFwd(OUT_A+OUT_C);
Wait(600);
Off(OUT_A+OUT_C); //四画目へ移動
OnFwd(OUT_B);
Wait(MOVE1);
Off(OUT_B); //ペンを下げる
OnRev(OUT_A+OUT_C);
Wait(600);
Off(OUT_A+OUT_C); //四画目
OnRev(OUT_B);
Wait(MOVE1);
Off(OUT_B);} //ペンをあげて終わり
課題1左に戻る