- 追加された行はこの色です。
- 削除された行はこの色です。
*課題 [#z6f25288]
パートナーの似顔絵を書く。
*メンバー紹介 [#b6aaa1d6]
両角和峰(もろずみかずたか)と、両角将吾(もろずみしょうご)と、川嶋健太(かわしまけんた)の3人です。
*ロボットの紹介 [#xbf2b90c]
#ref(./DSCN0348.JPG,100%)
**ロボットの動き [#y51a3a2f]
・前後左右に移動可能。
・ペンの上下動が可能。
**苦労したところ [#u093412c]
*両角和峰の似顔絵(テーマ:川嶋健太) [#k1e2ac6d]
#ref(./DSCN0361.JPG,around,80%,両角和峰の似顔絵)
これが実際にロボットが書いた似顔絵です。&br;
全然似てないんだけど... しかも写真の撮り方間違えました(笑)
#clear
**両角和峰のプログラム [#m8af98bf]
#define START OnFwd(OUT_A+OUT_C); // 前進
#define STOP Off(OUT_A+OUT_C); // 停止
#define UP OnFwd(OUT_B);Wait(20);Off(OUT_B); // ペンを上げる
#define DOWN OnRev(OUT_B);Wait(20);Off(OUT_B); // ペンを下げる
#define BACK OnRev(OUT_A+OUT_C); // 後退
#define CIRCLE OnFwd(OUT_C);OnRev(OUT_A); // 反時計回り
#define RECIRCLE OnFwd(OUT_A);OnRev(OUT_C); // 時計回り
task main()
{
SetPower(OUT_B,1);
SetPower(OUT_A,2);
SetPower(OUT_C,2);
DOWN;
OnFwd(OUT_C); // 輪郭はじめ
OnFwd(OUT_C); // 輪郭はじめ
Wait(1100);
STOP; // 輪郭終わり
STOP; // 輪郭終わり
UP;
BACK;
Wait(25);
STOP;
CIRCLE;
Wait(75);
STOP;
START;
Wait(10); // 目はじめ
Wait(10); // 目はじめ
STOP;
DOWN;
START;
Wait(35);
STOP;
UP;
START;
Wait(30);
STOP;
DOWN;
START;
Wait(35);
STOP;
UP; // 目終わり
BACK;
Wait(30);
STOP;
CIRCLE;
Wait(80);
STOP;
DOWN;
OnFwd(OUT_C); // 鼻はじめ
Wait(45);
Off(OUT_C); // 鼻終わり
UP;
START;
Wait(45);
STOP;
CIRCLE;
Wait(100);
STOP;
DOWN;
RECIRCLE; // 口はじめ
Wait(100);
STOP; // 口終わり
UP;
RECIRCLE;
Wait(205);
STOP;
START;
Wait(65);
STOP;
DOWN;
RECIRCLE; // 眉毛はじめ
Wait(110);
STOP;
UP;
CIRCLE;
Wait(85);
STOP;
BACK;
Wait(60);
STOP;
RECIRCLE;
Wait(100);
STOP;
START;
Wait(78);
STOP;
DOWN;
CIRCLE;
Wait(115);
STOP; // 眉毛終わり
UP;
START;
Wait(100);
STOP;
}
**反省点、工夫したところ、感想 [#h0ca7b8c]
・髪の毛を書くことができなくて残念だった。
・時間をかけ過ぎてしまったので、もっとゆとりを持って完成させたい。
・プログラムが長くなってしまったので、簡潔に書ければよかったなと思いました。
・輪郭を丸型にするために、片方のタイヤだけ回したことや後退や回転を使って書くことによって眉毛を作ったのが工夫できたところだと思います。
・最初はプログラムがうまく絡みあわず、顔の部分をロボットで書くのは難しかったけど、だんだんと顔が作れてたし、プログラムを打つことが楽しかったです。
・また、あまり似てはいませんでしたが、完成できてよかったです。
*両角将吾の似顔絵(テーマ:両角和峰) [#tb416e5f]
**両角将吾のプログラム [#s8b9a5ea]
**反省点 [#r745526f]
*川嶋健太の似顔絵(テーマ:両角将吾) [#ka02bd83]
#ref(./DSCN0360_1-0.JPG,100%,川嶋健太の似顔絵)
**川嶋健太のプログラム [#tcdd0e54]
#define DOWN OnRev(OUT_B);Wait(8);Off(OUT_B);
#define UP OnFwd(OUT_B);Wait(6);Off(OUT_B);
#define GO OnFwd(OUT_A+OUT_C);
#define STOP Off(OUT_A+OUT_C);
#define BACK OnRev(OUT_A+OUT_C);
#define CIR OnFwd(OUT_C);OnRev(OUT_A);
#define REV OnFwd(OUT_A);OnRev(OUT_C);
#define DOWN OnRev(OUT_B);Wait(8);Off(OUT_B); //ペンを下ろす
#define UP OnFwd(OUT_B);Wait(6);Off(OUT_B); //ペンを上げる
#define GO OnFwd(OUT_A+OUT_C); //前進する
#define STOP Off(OUT_A+OUT_C); //停止する
#define CIR OnFwd(OUT_C);OnRev(OUT_A); //反時計回りに円を描く
#define REV OnFwd(OUT_A);OnRev(OUT_C); //時計回りに円を描く
task main ()
{
OnFwd(OUT_C);
OnFwd(OUT_C); //輪郭作成開始
Wait(425);
STOP;
GO;
Wait(30);
STOP;
OnFwd(OUT_C);
Wait(395);
STOP;
GO;
STOP; //輪郭完成
GO; //耳作成開始
Wait(35);
STOP;
CIR;
Wait(95);
STOP;
STOP; //耳完成
UP;
CIR;
Wait(18);
STOP;
GO;
Wait(15);
STOP;
DOWN;
GO;
DOWN; //右目作成開始
GO;
Wait(30);
STOP;
STOP; //右目完成
UP;
GO;
Wait(20);
STOP;
DOWN;
DOWN; //左目作成開始
GO;
Wait(30);
STOP;
STOP; //左目完成
UP;
GO;
Wait(15);
STOP;
CIR;
Wait(150);
STOP;
REV;
Wait(355);
Wait(355);
STOP;
DOWN;
DOWN; //眼鏡の左部分作成開始
REV;
Wait(400);
STOP;
STOP; //眼鏡の左部分完成
UP;
GO;
Wait(55);
STOP;
DOWN;
DOWN; //眼鏡の右部分作成開始
REV;
Wait(400);
STOP;
STOP; //眼鏡の右部分完成
UP;
REV;
Wait(150);
STOP;
DOWN;
GO;
Wait(35);
STOP;
CIR;
Wait(50);
STOP;
UP;
GO;
Wait(35);
STOP;
REV;
Wait(300);
STOP;
DOWN;
REV;
Wait(60);
STOP;
UP;
GO;
Wait(170);
STOP;
}
**反省点 [#e262e118]
*コメントをどうぞ [#t98af556]
#comment