2004/C6/練習問題/双方向通信
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
|
ログイン
]
開始行:
[[2004/C6/練習問題]]
製作者 火炉壬
#define mawaru OnRev(OUT_A);
#define zenshin OnFwd(OUT_A);
task main()
{
ClearMessage();
until(Message()!=0);
if(Message()==1)mawaru;Wait(500);Off(OUT_A);
if(Message()==2)zenshin;Wait(500);Off(OUT_A);
ClearMessage();
mawaru;
SendMessage(1);
Wait(500);
Off(OUT_A);
}
このページはmy-myが担当しました。
/*
送られたメッセージに従って左右に回転するロボットのプログラム(54班の作品)
*/ [#t7d967a6]
#define turn_left OnRev(OUT_A);
#define go_straight OnFwd(OUT_A);
task main()
{ Wait(500);
ClearTimer(0);while ( Timer(0) <= 10 ) { SendMessage(1); } // 最初の 5秒間 1 を送信する
while (true)
{
ClearMessage(); // Message() を 0 に設定
until (Message() != 0); // Message() に 0 以外の値が入るまで待つ
if ( Message() == 1 ) {turn_left;
Wait(500); // 1 を受信したときには左回転
Off(OUT_A);SendMessage(1);}
if ( Message() == 2) {go_straight;
Wait(1500);Off(OUT_A);//2を受信したときには前進
SendMessage(2);}
}
}
終了行:
[[2004/C6/練習問題]]
製作者 火炉壬
#define mawaru OnRev(OUT_A);
#define zenshin OnFwd(OUT_A);
task main()
{
ClearMessage();
until(Message()!=0);
if(Message()==1)mawaru;Wait(500);Off(OUT_A);
if(Message()==2)zenshin;Wait(500);Off(OUT_A);
ClearMessage();
mawaru;
SendMessage(1);
Wait(500);
Off(OUT_A);
}
このページはmy-myが担当しました。
/*
送られたメッセージに従って左右に回転するロボットのプログラム(54班の作品)
*/ [#t7d967a6]
#define turn_left OnRev(OUT_A);
#define go_straight OnFwd(OUT_A);
task main()
{ Wait(500);
ClearTimer(0);while ( Timer(0) <= 10 ) { SendMessage(1); } // 最初の 5秒間 1 を送信する
while (true)
{
ClearMessage(); // Message() を 0 に設定
until (Message() != 0); // Message() に 0 以外の値が入るまで待つ
if ( Message() == 1 ) {turn_left;
Wait(500); // 1 を受信したときには左回転
Off(OUT_A);SendMessage(1);}
if ( Message() == 2) {go_straight;
Wait(1500);Off(OUT_A);//2を受信したときには前進
SendMessage(2);}
}
}
ページ名: