2005/C5/しょう/四角
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
|
ログイン
]
開始行:
[[2005/C5/しょう]]
*四角を書くロボット [#ibaefd3e]
int g;
int b;
int r;
int l;
sub go ()
{
OnFwd (OUT_A+OUT_C);
Wait (g);
Off (OUT_A+OUT_C);
}
sub back ()
{
OnRev (OUT_A+OUT_C);
Wait (b);
Off (OUT_A+OUT_C);
}
sub tr ()
{
OnFwd (OUT_A);
OnRev (OUT_C);
Wait (r);
Off (OUT_A+OUT_C);
}
sub tl ()
{
OnFwd (OUT_C);
OnRev (OUT_A);
Wait (l);
Off (OUT_A+OUT_C);
}
task main ()
{
repeat (4)
{
g=150;
go ();
r=135;
tr ();
}
}
終了行:
[[2005/C5/しょう]]
*四角を書くロボット [#ibaefd3e]
int g;
int b;
int r;
int l;
sub go ()
{
OnFwd (OUT_A+OUT_C);
Wait (g);
Off (OUT_A+OUT_C);
}
sub back ()
{
OnRev (OUT_A+OUT_C);
Wait (b);
Off (OUT_A+OUT_C);
}
sub tr ()
{
OnFwd (OUT_A);
OnRev (OUT_C);
Wait (r);
Off (OUT_A+OUT_C);
}
sub tl ()
{
OnFwd (OUT_C);
OnRev (OUT_A);
Wait (l);
Off (OUT_A+OUT_C);
}
task main ()
{
repeat (4)
{
g=150;
go ();
r=135;
tr ();
}
}
ページ名: