2005/C6/第4回課題 の履歴の現在との差分(No.1)

• 履歴一覧
• 差分 を表示
• ソース を表示
• 2005/C6/第4回課題 へ行く。
  • 1 (2005-12-16 (金) 10:32:19)

• 追加された行はこの色です。
• 削除された行はこの色です。

*&size(40){〜第4回課題〜}; [#v65236c4]
*光を追うロボット [#sa0d0468]
**プログラム [#h8114ecf]
  int i=0,i_max;
  sub turn_left()
  sub turn_left()  //左折（明るい方を向く）
  {if(SENSOR_1>=light_max){OnFwd(OUT_C);
                           Wait(10);
                          }
  }
  sub turn_right()
  sub turn_right()  //右折（明るい方を向く）
  {if(SENSOR_2>=light_max){OnFwd(OUT_A);
                           Wait(10);
                          }
  }
  task main()
  {
    SetSensor(SENSOR_1, SENSOR_LIGHT);
    SetSensor(SENSOR_2, SENSOR_LIGHT);
    for(i=0;i<=50;i++)
    {
      OnFwd(OUT_A);
      OnFwd(OUT_A);  //明るい方向を探す（その場で回転）
      OnRev(OUT_C);
      Wait(10);
      Off(OUT_A+OUT_C);
      Wait(5);
      if(SENSOR_1>=light_max){
                               light_max=SENSOR_1;
                               PlaySound(0);
                               PlaySound(0);  //最も明るい方向を向いたときに音を出す
                             }
    }
    OnFwd(OUT_A);
    OnRev(OUT_C);
    until(SENSOR_1>=light_max);
    Off(OUT_A+OUT_C);
    while(true){  turn_left();
    while(true){  turn_left();  //明るい方向へと動き出す
                  turn_right();
                  Off(OUT_A+OUT_C);
                  Wait(10);
               }
  }
**感想 [#qfdc193a]
光の当て方によってうまくいったりいかなかったりした。
**コメントはこちら [#ncabc18c]
#comment