2009aへ戻る
目次
お絵かきロボットの製作。
パートナーの顔を描くロボットを作る。
詳細は2009a/練習問題、課題1の項を参照。
俺のプログラム(別ページに飛びます)
#define A OUT_A #define B OUT_B #define C OUT_C #define up_pen OnFwd(B);Wait(50) #define doun_pen Off(B);OnRev(B);Wait(2);Wait(90);Float(B) #define hidari OnFwd(A);OnRev(C);Wait(100);Off(A+C) #define migi OnFwd(C);OnRev(A);Wait(100);Off(A+C) #define leftme doun_pen;Wait(90);OnFwd(A+C);Wait(40);Off(A+C);up_pen; #define rightme doun_pen;Wait(90);OnRev(A+C);Wait(40);Off(A+C);up_pen task main () { SetPower(B,2); doun_pen;//顔の輪郭を書く OnFwd(A); Wait(830); Off(A); up_pen; hidari;左に曲がる OnRev(A+C); Wait(20); Off(A+C); leftme;//左目を書く OnRev(A+C); Wait(80); Off(A+C); rightme;//右目を書く migi;右に曲がる OnFwd(A+C); Wait(70); Off(A+C); Wait(50); hidari; OnFwd(A+C); Wait(10); doun_pen;//口を書く Wait(20); up_pen; OnRev(A+C); Wait(45); Off(A+C); hidari; OnRev(A+C);//鼻の位置まで下がる Wait(10); Off(A+C); doun_pen;//鼻を書く OnRev(A+C); Wait(18); Off(A+C); up_pen; Off(A+C+B); }