- 履歴一覧
- 2007b/A3/一戸 は削除されています。
***「戸」のプログラム [#eea93047]
void go_straight(int t) //ペンを(上から下へ)進める
{OnFwd(OUT_C);Wait(t);Off(OUT_C)}
void go_back(int t) //ペンを(下から上へ)戻す
{OnRev(OUT_C); Wait(t);Off(OUT_C)}
void go_right(int t) //ペンを右に動かす
{OnFwd(OUT_B);wait(t);Off(OUT_B);}
void go_left(int t) //ペンを左に動かす
{OnRev(OUT_B);Wait(t);Off(OUT_B);}
void go_up(int t) //ペンを上げる
{OnFwd(OUT_A);Wait(t);Off(OUT_A);}
void go_down(int t) //ペンを下げる
{ OnRev(OUT_A); Wait(t);Off(OUT_A);}
task main()
{go_right(50);//一画目
go_up(30);//ペンを上げる
go_straight(50);go_left(150);//二画目の始めまで移動
go_down(30);//ペンを下げる
go_right(250);go_straight(50);//二画目
go_up(30);//ペンを上げる
go_left(250);//三画目の始めまで移動
go_down(30);//ペンを下ろす
go_right(250);//三画目
go_up(30);//ペンを上げる
go_left(250);go_back(50);//四画目の始めまで移動
go_down(30);//ペンを下ろす
go_straight(50);//四画目
SetPower(OUT_B,1);SetPower(OUT_C,5);//「はらい」のためのギアチェンジ
OnRev(OUT_B);OnFwd(OUT_C);Wait(50);Float(OUT_B+OUT_C);}//はらい