*書道ロボット [#o5bd7aa3]

**1 ロボット [#m49b12b9]

**2 プログラミング [#u9df1c12]


 #define F 80
 #define B 90
 #define W 95
 #define right OnFwd(OUT_AC);Wait(F);Off(OUT_AC);OnFwd(OUT_A);OnRev(OUT_C);Wait(W);Off(OUT_AC);OnRev(OUT_AC);Wait(B);Off(OUT_AC);
 #define left OnFwd(OUT_AC);Wait(F);Off(OUT_AC);OnFwd(OUT_C);OnRev(OUT_A);Wait(W);Off(OUT_AC);OnRev(OUT_AC);Wait(B);Off(OUT_AC);
 #define straight(t) OnFwd(OUT_AC);Wait(t);Off(OUT_AC); 
 #define back(t) OnRev(OUT_AC);Wait(t);Off(OUT_AC);
 #define up OnFwd(OUT_B);
 #define down OnRev(OUT_B);

 sub kami()
 {
     up;
     straight(30);
     left;
     down;
     Wait(50);
     straight(30);
     up;
     back(30);
     right;
     down;
     Wait(50);
     straight(45);
     up;
     left;
     back(30);
     down;
     Wait(50);
     straight(60);
 }

 sub mati()
 {
     straight(15);
     up;
     left;
     down;
     Wait(50);
     straight(45);
     up;
     left;
     back(30);
     down;
     Wait(50);
     straight(90);
     up;
     back(15);
     right;
     down;
     Wait(50);
     straight(30);
     up;
     left;
     back(15);
     down;
     Wait(50);
     repeat(4) {
         straight(30);
         up;
         left;
         down;
         Wait(50);
     }
 }

 task main()
 {
     kami();
     up;
     straight(60);
     down;
     Wait(50);
     mati();
     Off(OUT_B);
 }


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