課題1 似顔絵を書くロボット

ロボット本体

プログラム

#define pen_down OnFwd(OUT_B);Wait(10);Off(OUT_B);//ペンを上げる
#define pen_up OnRev(OUT_B);Wait(12);Off(OUT_B);//ペンを下げる
#define go_straight(t) OnFwd(OUT_AC);Wait(t);Off(OUT_AC);//前に進むためのプログラム
#define back OnRev(OUT_AC);Wait(100);Off(OUT_AC);//後ろに進むためのプログラム
#define turn_left(t) OnRev(OUT_A);OnFwd(OUT_C);Wait(t);Off(OUT_AC);//左に旋回
#define turn_right(t) OnFwd(OUT_A);OnRev(OUT_C);Wait(t);Off(OUT_AC);//右に旋回
#define write_line(t) pen_down;go_straight(t);pen_up;//線を(t)書く

task main()
{
   write_line(250);
   turn_right(210);
   back;
   write_line(200);
   turn_right(210);
   back;
   write_line(200);
   turn_right(210);
   back;
   write_line(200);
   turn_right(210);
   back;
   write_line(250);
   turn_right(210);
   back;
   write_line(200);
   turn_right(210);
   back;
   write_line(200);
   turn_right(210);
   back;
   write_line(200);
   turn_right(630);
   back;//輪郭を書く

   go_straight(50);
   write_line(130);
   go_straight(50);
   write_line(130);
   go_straight(50);//眉毛を書く

   turn_left(425);
   back;
   go_straight(50);
   turn_left(425);
   back;
   go_straight(100);
   write_line(50);
   go_straight(100);
   write_line(50);//目を書く

   turn_right(425);
   back;
   go_straight(250);
   turn_right(425);
   back;
   write_line(200);//口を書く

   go_back(100);
   turn_left(425);
   back;
   go_straight(100);
   write_line(100);//鼻を書く
}

トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2012-06-15 (金) 16:43:15 (2627d)