2005/A2

緊急自爆ボタン

task main()
{
   SetPower(OUT_A,6);SetPower(OUT_C,6);//回転数を決める
   SetSenser(SENSOR_3, SENSOR_TOUCH);//タッチセンサを緊急自爆ボタンとする
   
   OnFwd(OUT_A+OUT_C);
   until (SENSOR_3 == 1);
   Float(OUT_A+OUT_C);//タッチセンサーが当たると敵と認識して、その場で止まる
   PlaySound(SOUND_LOW_BEEP); //ビー、という音と共に大爆発を起こす  
}
   

ライトセイバー ~~The Return of THOMAS~~

task main()
{
  SetSensor(SENSOR_2,SENSOR_LIGHT);
  SetSensor(SENSOR_3,SENSOR_LIGHT);//センサー2と3にライトセイバーを装着する  
  while(true){
        if (SENSOR_2< 40){
          Off(OUT_A+OUT_C);//もしセンサー2のライトセイバーが発動されれば右側の敵を切る
	   OnFwd(OUT_C);
          OnRev(OUT_A);
      } if (SENSOR_3< 40){
          Off(OUT_A+OUT_C);//もしセンサー3のライトセイバーが発動されれば左側の敵を切る
	   Wait(10);
	   OnFwd(OUT_A);
	   OnRev(OUT_C);
      } else {
          OnFwd(OUT_A+OUT_C);//センサー2、センサー3のライトセイバーが共に発動されなければ、自分が切られる。
      }
  }
}
line_1.gif

添付ファイル: fileline_1.gif 307件 [詳細]

トップ   編集 凍結 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2005-12-21 (水) 15:11:11