- 追加された行はこの色です。
- 削除された行はこの色です。
[[2019a/Member]]
*課題内容 [#he70000e]
+都道府県名、地名の中から漢字2文字12画以上のものをロボットで書く。
+紙はA4、四隅をテープで固定可能。
*選んだ文字 [#kd711894]
私の地元の「三朝」です。
私の地元の「三朝」(みささ)です。
恐らく知らない人が多いと思いますが…
&refhttps://ja.m.wikipedia.org/wiki/%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB:Japan_Tottori_MitokuSan_Nageiredo_DSC01248.jpg
↑↑こんなのあります。
&ref(nageire.jpg);
↑↑こんなのあります.興味のある方は「投入堂」で検索してみてください
*ロボットの設計 [#b2559492]
&ref(rob1.jpg);
&ref(rob2.jpg);
x-y-z軸タイプにしました.y軸方向はタイヤ,x軸方向はレールを作りその上を走らせます.z軸はペンの上げ下げのみを行います.
*プログラム [#i2cbb51b]
#define pen_up OnRev(OUT_C,30);Wait(300);Off(OUT_C);Wait(100);
#define pen_down OnFwd(OUT_C,30);Wait(300);Off(OUT_C);Wait(100);
#define shut Off(OUT_A);Off(OUT_B);Off(OUT_C);
#define rest Wait(100);
まず,ペンの上げ下げ,停止,静止を定義する.
task main ()
{
OnFwd(OUT_B,25);
Wait(800);
shut;
pen_up;
OnFwd(OUT_A,25);
Wait(300);
shut;
pen_down;
OnRev(OUT_B,25);
Wait(800);
shut;
pen_up;
OnFwd(OUT_A,25);
Wait(300);
shut;
rest;
OnRev(OUT_B,25);
Wait(200);
shut;
rest;
pen_down;
OnFwd(OUT_B,25);
Wait(1200);
shut;
rest;
pen_up;
ここまで「三」を書く,横棒→縦移動の繰り返し
OnFwd(OUT_A,25);Wait(450);shut;rest;
OnRev(OUT_B,25);Wait(1200);shut;rest;
pen_down
OnFwd(OUT_B,25);Wait(600);shut;
pen_up;
OnFwd(OUT_A,25);Wait(200);shut;rest;
pen_down;
OnRev(OUT_B,25);Wait(600);shut;
pen_up
OnFwd(OUT_A,25);Wait(200);shut;rest;
pen_down;
OnFwd(OUT_B,25);Wait(600);shut;
pen_up;
OnFwd(OUT_A,25);Wait(200);shut;rest;
pen_down;
OnRev(OUT_B,25);Wait(600);shut;
pen_up
OnFwd(OUT_A,25);Wait(200);shut;rest;
pen_down;
OnFwd(OUT_B,25);Wait(600);shut;
pen_up;rest;
OnRev(OUT_B,25);Wait(300);shut;rest;
OnRev(OUT_A,25);Wait(1000);shut;rest;
OnFwd(OUT_A,25);Wait(400);shut;rest;
pen_up;
OnRev(OUT_B,25);Wait(300);shut;rest;
pen_down;
OnFwd(OUT_A,25);Wait(400);shut;
pen_up;
OnRev(OUT_A,25);Wait(400);shut;rest;
OnFwd(OUT_B,25);Wait(600);shut;
pen_down;
OnFwd(OUT_A,25);Wait(400);shut;rest;
pen_up;
OnRev(OUT_B,25);Wait(300);shut;rest;
pen_down;
OnFwd(OUT_A,25);Wait(400);shut;
pen_up;
OnFwd(OUT_B,25);Wait(400);shut;
pen_down;
OnRev(OUT_A,25);Wait(1200);shut;rest;
OnFwd(OUT_B,25);Wait(500);shut;rest;
OnFwd(OUT_A,25);Wait(1200);shut;
pen_up;
OnRev(OUT_A,25);Wait(400);shut;
pen_down;
OnFwd(OUT_B,25);Wait(500);shut;rest;
pen_up;
OnRev(OUT_A,25);Wait(400);shut;
pen_down;
OnRev(OUT_B,25);Wait(500);shut;
}
「朝」は横棒をすべて書いてから縦棒を書く.
全体的にプログラムが長くなってしまったのが反省点
*まとめ [#x0ca35c9]
x軸を移動する仕組みが空回りをしたり抵抗を受けたりして進まないことがしばしばあった.
モーターの前進,後進で出力に差があり調整が難しかった.
&ref(misa.jpg);
完成作品です.次第に左に寄っていくのがわかります.