[[2005/A1]]
*個人的なメモ兼うpろだ [#x6984b46]
メッセージ受信テストプログラム
task main()
{
while(true)
{
ClearMessage(); //メッセージ初期化
until (Message() != 0); //メッセージ受信待機
if ( Message() == 1 ) PlaySound(SOUND_DOWN); //メッセージ1を受信時にSOUND_DOWNをならす
if ( Message() == 2 ) PlaySound(SOUND_UP); //メッセージ1を受信時にSOWND_UPをならす
}
}
#define freq 5 //センサ測定頻度
#define maxrot 20//一周に必要な測定回数
int l;
int w;
int lgt;
int cnt;
int turn;
int back;
task main ()
{
SetSensor(SENSOR_1, SENSOR_LIGHT); //センサ種別指定
w=freq;
l=0;
for (cnt=1; cnt<=maxrot; cnt++)
{
OnFwd(OUT_A); OnRev(OUT_C); Wait(w);Off(OUT_A+OUT_C); //w/100秒間回転
if (l <= SENSOR_1 ) //前の場所より明るかったら
{
l = SENSOR_1; //明るさの最大値を更新
lgt=cnt;
PlaySound(SOUND_CLICK) ;
Wait(10);
Wait(50);
}
else{PlaySound(SOUND_DOUBLE_BEEP) ;
Wait(10);
Wait(50);
}
}
PlaySound(SOUND_DOUBLE_BEEP) ;
back=maxrot;
back=back-lgt;
repeat(back)
{
OnFwd(OUT_C); OnRev(OUT_A); Wait(w);Off(OUT_A+OUT_C); //光源まで回転
PlaySound(SOUND_FAST_UP) ;
Wait(10);
Wait(50);
}
}
#comment