*井を書くプログラム [#bf7021a8]
 #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); //ペンをあげて終わり



トップ   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS