[[2004/A5/コンテスト用ロボ]]

プログラム
 task main()
  {
   OnFwd(OUT_A+OUT_C);
   Wait(18000);
   while (true)
    {
        ClearMessage();           
        until (Message() != 0);   
        if ( Message() == 188 )  
           PlaySound(SOUND_DOUBLE_BEEP); 
           ClearTimer(0);
           while ( Timer(0) <= 50 ) { SendMessage(189); }      
        if ( Message() == 190) 
           PlaySound(SOUND_DOWN);
            ClearTimer(0);
           while ( Timer(0) <= 50 ) { SendMessage(191); }    
    }
}



トップ   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS