[[2005/A4]]

   task main()
 {
    SetSensor(SENSOR_1,SENSOR_TOUCH);
    SetSensor(SENSOR_2,SENSOR_TOUCH);
    
    OnFed(OUT_A+OUT_C);   
    while(1)
    {
      if(SENSOR_1 == 1)
      {
         OnRev(OUT_A+OUT_C);
         Wait(50);
         OnFwd(OUT_A)
         Wait(150);
         OnFwd(OUT_C);
       }
     }
 }


 hiari
 task main()
 {
   SetSensor(SENSOR_1,SENSOR_TOUCH)
   SetSensor(SENSOR_3,SENSOR_TOUCH)
   OnFwd(OUT_A+OUT_C);
   while(ture)
    { task main()
 {
   SetSensor(SENSOR_1,SENSOR_TOUCH)
   SetSensor(SENSOR_3,SENSOR_TOUCH)
   OnFwd(OUT_A+OUT_C);
   while(ture)
    {
     if(SENSOR_1 == 1)
     { 
       OnRev(OUT_C+OUT_A);Wait(15);Off(OUT_C+OUT_A);
       OnRev(OUT_A);
     if(SENSOR_3 == 1)
      else
      {
        OnFwd(OUT_A);Wait(40);
     }
    }

   task main()
   int light_max=0; int i=0; i_max;
   OnFwd(OUT_A);OnRev(OUT_C);
   for(i=0;i<=60;i++){
      if(SENSOR_1>light_max){
         light_max=SENSOR_1;
         Wait(5); i_max=i;
        }
       PlayTone(SENSOR_1,5);
     }



  task main()
 {
  SetSensor(SENSOR_1,SENSOR_LIGHT);
  SetSensor(SENSOR_3,SENSOR_LIGHT);
  OnFwd(OUT_A+OUT_C);
  while (ture)
  {
     if (SENSOR_1 < 40);
     {
      OnFwd(OUT_A);
      OnRev(OUT_C);
      }
     if (SENSOR_3 < 40);
     {
      OnFwd(OUT_C);
      OnRev(OUT_A);
      } else {
       OnFwd(OUT_A+OUT_C);
      }
  }

   
    task main()
 {
    SetSensor(SENSOR_2,SENSOR_TOUCH);
    SetSensor(SENSOR_3,SENSOR_TOUCH);

    while(true)
    {
     if(SENSOR_3 == 0);
     {
      OnFwd(OUT_A);Wait(20);
     }
    }
  }








#define backp OnRev(OUT_A+OUT_C);
#define sp OnFwd(OUT_A+OUT_C);Wait(3);OnRev(OUT_A+OUT_C);Wait(5);

task main()
{
    while (true)
    {
        ClearMessage();          
        until (Message() != 0); 

        if ( Message() == 1 ) backp;     
        if ( Message() == 2 ) sp;
    }
}

トップ   編集 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS