#contents *課題 [#j45ab55a] 今までに住んだことのある2文字以上の地名(旧地名でも可)を書く。 *ロボットの説明 [#v4494ce6] **台車 [#s43b57fd] **紙に対してペンを横移動させる [#t10042a4] **ペンの上下 [#m3936cce] *プログラムと説明 [#hb4b45f4] #define PEN_UP OnFwd(OUT_B);Wait(10);Off(OUT_B);//ペンを上げる #define PEN_DOWN OnRev(OUT_B);Wait(10);Off(OUT_B);//ペンを下げる。 sub lengthways() //縦方向に書く { PEN_DOWN; OnFwd(OUT_C); Wait(40); Off(OUT_C); PEN_UP; } sub lengthways_half_reverse()//縦半分を書く { OnRev(OUT_C); Wait(20); Off(OUT_C); } sub lengthways_reverse()//縦逆向きに書く { PEN_DOWN; OnRev(OUT_C); Wait(40); Off(OUT_C); PEN_UP; } sub sideways()//横方向に書く { PEN_DOWN; OnFwd(OUT_A); Wait(10); Off(OUT_A); PEN_UP; } sub sideways_half()//横半分を書く { OnFwd(OUT_A); Wait(6); Off(OUT_A); } sub sideways_reverse()//横逆向きに書く { PEN_DOWN; OnRev(OUT_A); Wait(10); Off(OUT_A); PEN_UP; } task main() { sideways();//「井」1画目 OnFwd(OUT_C);//下 Wait(20);//伸ばした Off(OUT_C); sideways_reverse();//2画目を横逆向きに書く OnRev(OUT_C);//縦左側の準備 Wait(25); Off(OUT_C); OnFwd(OUT_A); Wait(); Off(OUT_A); lengthways();//3画目の縦左側を書く OnRev(OUT_C); Wait(5); Off(OUT_C); lengthways_reverse();//4画目縦逆向きに書き「井」完成 OnRev(OUT_A); Wait(15); Off(OUT_A); OnFwd(OUT_C); Wait(100); Off(OUT_C);//田の左端上に来た lengthways();// sideways_half(); lengthways_reverse(); sideways_half(); lengthways(); sideways_reverse(); lengthways_half_reverse(); sideways(); lengthways_half_reverse(); sideways_reverse(); } *まとめ [#p3e1728a]