作成過程のプログラムたち†

↑

初代プログラム //製作者　少年†

↑

車輪系プログラム†

task main() //syarin

{
OnFwd(OUT_A+OUT_B+OUT_C);
if(SENSOR_1==1)
 {
 Off(OUT_B);
 }
Wait(1);
OnRev(OUT_C);
Wait(90);
OnFwd(OUT_C);
Wait(1);
OnRev(OUT_C);
Wait(90);
OnFwd(OUT_C);
Wait(1);
SendMessage(1); 
Wait(1);
Off(OUT_A+OUT_C);
ClearMessage();
until(Message()!=0);
if(Message()==2)
 {
 OnRev(OUT_A+OUT_C);
 Wait(1);
 OnFwd(OUT_A);
 Wait(90);
 OnFwd(OUT_C);
 Wait(1);
 OnRev(OUT_A);
 Wait(1);
 OnFwd(OUT_A);
 Wait(1);
 SendMessage(1);
 Wait(1);
 Off(OUT_A+OUT_C);
 }
↑

支柱系プログラム†

int UP_TIME=0;
task main()
 {
 SetSensor(SENSOR_2,SENSOR_TOUCH);
 until(SENSOR_2!=0);
 if(SENSOR_2==1)
  {
  SendMessage(3);Wait(50);
  }
 while(1)
 {
 ClearMessage();
 until(Message()!=0);
 if(Message()==1);
  {
  ClearTimer(0);
  OnFwd(OUT_A+OUT_B);
  if(SENSOR_1==100)
   {
   FastTimer(0)=UP_TIME;
   Off(OUT_A);
   OnFwd(OUT_B);Wait(500);
   SendMessage(2);
   OnRev(OUT_A);Wait(UP_TIME);
   Off(OUT_A);
   }
  }
 }
}
トップ   編集 凍結 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2006-08-11 (金) 15:32:06