*「水」とロボットに書かせる [#z3e37fde]
ロボットに水と書かせるこの課題まず水とかけるようにペンの上げ下げに悪戦苦闘し、その後プログラム制作にも苦労しています。


Before

-水?
 task main()
 #define PEN 12
 {
 OnFwd(OUT_B); 
 Wait(PEN);
 Off(OUT_B);
 OnFwd(OUT_A+OUT_C);
 Wait(200);
 Off(OUT_A+OUT_C);
 
 OnRev(OUT_B);
 Wait(PEN);
 Off(OUT_B);
 OnFwd(OUT_A);
 OnRev(OUT_C);
 Wait(140);
 Off(OUT_A+OUT_C);
 OnFwd(OUT_A+OUT_C);
 Wait(170);
 Off(OUT_A+OUT_C);
 OnFwd(OUT_A);
 OnRev(OUT_C);
 Wait(105);
 Off(OUT_A+OUT_C); 
 
 OnFwd(OUT_B);
 Wait(PEN);
 Off(OUT_B);
 OnFwd(OUT_A+OUT_C);
 Wait(50);
 Off(OUT_A+OUT_C);
 OnRev(OUT_B);
 Wait(PEN);
 Off(OUT_B);
 
 OnFwd(OUT_A);
 OnRev(OUT_C);
 Wait(50);
 Off(OUT_A+OUT_C);
 
 OnFwd(OUT_B);
 Wait(PEN);
 Off(OUT_B);
 OnFwd(OUT_A+OUT_C);
 Wait(110);
 Off(OUT_A+OUT_C);
 OnRev(OUT_B);
 Wait(PEN);
 Off(OUT_B); 
 
 OnFwd(OUT_A);
 OnRev(OUT_C);
 Wait(170);
 Off(OUT_A+OUT_C);
 OnFwd(OUT_A+OUT_C);
 Wait(260);
 Off(OUT_A+OUT_C);
 OnFwd(OUT_A);
 OnRev(OUT_C);
 Wait(170);
 Off(OUT_A+OUT_C);
 
 OnFwd(OUT_B);
 Wait(PEN);
 Off(OUT_B);
 OnFwd(OUT_A+OUT_C);
 Wait(90);
 Off(OUT_A+OUT_C);
 OnRev(OUT_B);
 Wait(PEN);
 Off(OUT_B); 
 
 OnFwd(OUT_C);
 OnRev(OUT_A);
 Wait(20);
 
 OnFwd(OUT_B);
 Wait(PEN);
 Off(OUT_B);
 OnFwd(OUT_A+OUT_C);
 Wait(100);
 Off(OUT_A+OUT_C);
 OnRev(OUT_B);
 Wait(PEN);
 Off(OUT_B);
 }


after

ロボット
→写真をのせたいのですが、方法が不明のため後日


*現在の進行状況 [#zafe3c14]

なんとか「水」書けました!!うまくいけば、かなり普通「水」です(1画目が直線なのは気にしないでください)。
ただし、少し問題があります。それはペンを回転させて「書く」「書かない」を調節しているため、最初のペンの「角度」「高さ」によって誤差が生じるため、「水」っぽくないこともちらほらです!
 「では回転式を止めて、上下式にすればいいじゃないか!」とつっこみたくなるところですが、そうすると、線がかなり真っ直ぐの直線になるため、その作戦は遂行しませんでした。微妙にくにゃくにゃしている方が「水」っぽい!ということに気づいてしまった僕たちはその感性を大切にして、あくまで回転式を貫きました!!半分手抜きのようにも思えますが、


現在の出来栄えを動画でとっているため、のせたいのですが、方法が不明のため後日

(細かいことをいえば方法は先生がHPに記載してくださったので、わかりますが、なぜか失敗しているといった状態です)


**水のプログラム [#db94c91a]
 task main()
 #define PEN 12
 {
 OnFwd(OUT_A+OUT_C);
 Wait(6);
 Off(OUT_A+OUT_C);
 OnFwd(OUT_B); 
 Wait(PEN);
 Off(OUT_B);
 OnFwd(OUT_A+OUT_C);
 Wait(144);
 Off(OUT_A+OUT_C);
 OnRev(OUT_B);
 Wait(PEN);
 Off(OUT_B);

 OnFwd(OUT_A);
 OnRev(OUT_C);
 Wait(162);
 Off(OUT_A+OUT_C);
 OnFwd(OUT_A+OUT_C);
 Wait(150);
 Off(OUT_A+OUT_C);
 OnFwd(OUT_A);
 OnRev(OUT_C);
 Wait(80);
 Off(OUT_A+OUT_C);

 OnFwd(OUT_B);
 Wait(PEN);
 Off(OUT_B);
 OnFwd(OUT_A+OUT_C);
 Wait(58);
 Off(OUT_A+OUT_C);
 OnRev(OUT_B);
 Wait(PEN);
 Off(OUT_B);

 OnRev(OUT_A+OUT_C);
 Wait(45);
 Off(OUT_A+OUT_C);
 OnFwd(OUT_C);
 OnRev(OUT_A);
 Wait(20);
 Off(OUT_A+OUT_C);

 OnFwd(OUT_A+OUT_C);
 Wait(40);
 Off(OUT_A+OUT_C);

 OnFwd(OUT_B);
 Wait(PEN);
 Off(OUT_B);
 OnRev(OUT_A+OUT_C);
 Wait(80);
 Off(OUT_A+OUT_C);
 OnRev(OUT_B);
 Wait(PEN);
 Off(OUT_B);

 OnFwd(OUT_A);
 OnRev(OUT_C);
 Wait(20);
 Off(OUT_A+OUT_C);
 OnFwd(OUT_A+OUT_C);
 Wait(150);
 Off(OUT_A+OUT_C);

 OnFwd(OUT_B);
 Wait(PEN);
 Off(OUT_B);
 OnRev(OUT_A+OUT_C);
 Wait(63);
 Off(OUT_A+OUT_C);
 OnRev(OUT_B);
 Wait(PEN);
 Off(OUT_B);
 OnRev(OUT_A+OUT_C);
 Wait(5);
 Off(OUT_A+OUT_C);

 OnRev(OUT_A+OUT_C);
 Wait(25);
 Off(OUT_A+OUT_C);

 OnFwd(OUT_A);
 OnRev(OUT_C);
 Wait(75);

 OnFwd(OUT_A+OUT_C);
 Wait(60);       
 Off(OUT_A+OUT_C);
 OnFwd(OUT_B);
 Wait(PEN);
 Off(OUT_B);
 OnFwd(OUT_A+OUT_C);
 Wait(100);
 Off(OUT_A+OUT_C);
 OnRev(OUT_B);
 Wait(PEN);
 Off(OUT_B);
 }


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