2006b/A6/R Room/あおっページ/「弘」のプログラム
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
|
ログイン
]
開始行:
[[2006b/A6/R Room/あおっページ]]
#contents
*プログラム「弘」[#p6773482]
#define pen_down OnRev(OUT_A);Wait(80);Off(OUT_A);
#define pen_up OnFwd(OUT_A);Wait(80);Off(OUT_A);//ペン上下
task main()
{
pen_down; //一画目スタート
OnFwd(OUT_B+OUT_C);
Wait(50);
OnRev(OUT_C);
Wait(88);
OnFwd(OUT_C);
Wait(50);
Off(OUT_B+OUT_C);
pen_up; //一画目終わり
Wait(50);
OnFwd(OUT_C);
OnRev(OUT_B);
Wait(100);
OnRev(OUT_C);
Wait(50);
Off(OUT_B+OUT_C);
Wait(30);
pen_down; //二画目スタート
OnFwd(OUT_B+OUT_C);
Wait(50);
Off(OUT_B+OUT_C);
Wait(30);
pen_up; //二画目終わり
OnRev(OUT_B+OUT_C);
Wait(50);
OnFwd(OUT_B);
Wait(10);
pen_down; //三画目ドン!
OnFwd(OUT_B+OUT_C);
Wait(50);
OnRev(OUT_B);
Wait(88);
OnFwd(OUT_B);
Wait(50);
OnRev(OUT_C);
Wait(88);
OnFwd(OUT_C);
Wait(50);
OnRev(OUT_C);
Wait(88);
OnFwd(OUT_C);
Wait(25);
Off(OUT_B+OUT_C);
Wait(50);
pen_up; //三画目終了、「弘」左側「弓」完了
OnRev(OUT_B+OUT_C);
Wait(55);
OnFwd(OUT_C);
Wait(63);
OnRev(OUT_C);
Wait(140);
Off(OUT_B+OUT_C);
Wait(50);
pen_down; //四画目始め!
OnFwd(OUT_B+OUT_C);
Wait(140);
OnRev(OUT_B);
Wait(150);
OnFwd(OUT_B);
Wait(85);
Off(OUT_B+OUT_C);
pen_up; //四画目終わり
OnFwd(OUT_C);
OnRev(OUT_B);
Wait(40);
OnRev(OUT_B+OUT_C);
Wait(10);
Off(OUT_B+OUT_C);
pen_down; //最後の五画目スタート
OnFwd(OUT_C+OUT_B);
Wait(65);
Off(OUT_C+OUT_B);
pen_up; //「弘」完成〜!
}
コメントをお願いします。
#comment
終了行:
[[2006b/A6/R Room/あおっページ]]
#contents
*プログラム「弘」[#p6773482]
#define pen_down OnRev(OUT_A);Wait(80);Off(OUT_A);
#define pen_up OnFwd(OUT_A);Wait(80);Off(OUT_A);//ペン上下
task main()
{
pen_down; //一画目スタート
OnFwd(OUT_B+OUT_C);
Wait(50);
OnRev(OUT_C);
Wait(88);
OnFwd(OUT_C);
Wait(50);
Off(OUT_B+OUT_C);
pen_up; //一画目終わり
Wait(50);
OnFwd(OUT_C);
OnRev(OUT_B);
Wait(100);
OnRev(OUT_C);
Wait(50);
Off(OUT_B+OUT_C);
Wait(30);
pen_down; //二画目スタート
OnFwd(OUT_B+OUT_C);
Wait(50);
Off(OUT_B+OUT_C);
Wait(30);
pen_up; //二画目終わり
OnRev(OUT_B+OUT_C);
Wait(50);
OnFwd(OUT_B);
Wait(10);
pen_down; //三画目ドン!
OnFwd(OUT_B+OUT_C);
Wait(50);
OnRev(OUT_B);
Wait(88);
OnFwd(OUT_B);
Wait(50);
OnRev(OUT_C);
Wait(88);
OnFwd(OUT_C);
Wait(50);
OnRev(OUT_C);
Wait(88);
OnFwd(OUT_C);
Wait(25);
Off(OUT_B+OUT_C);
Wait(50);
pen_up; //三画目終了、「弘」左側「弓」完了
OnRev(OUT_B+OUT_C);
Wait(55);
OnFwd(OUT_C);
Wait(63);
OnRev(OUT_C);
Wait(140);
Off(OUT_B+OUT_C);
Wait(50);
pen_down; //四画目始め!
OnFwd(OUT_B+OUT_C);
Wait(140);
OnRev(OUT_B);
Wait(150);
OnFwd(OUT_B);
Wait(85);
Off(OUT_B+OUT_C);
pen_up; //四画目終わり
OnFwd(OUT_C);
OnRev(OUT_B);
Wait(40);
OnRev(OUT_B+OUT_C);
Wait(10);
Off(OUT_B+OUT_C);
pen_down; //最後の五画目スタート
OnFwd(OUT_C+OUT_B);
Wait(65);
Off(OUT_C+OUT_B);
pen_up; //「弘」完成〜!
}
コメントをお願いします。
#comment
ページ名: