2006a/A4/たろうのページ の履歴差分(No.3)

• 履歴一覧
• 現在との差分 を表示
• ソース を表示
• 2006a/A4/たろうのページ へ行く。
  • 1 (2006-05-26 (金) 05:03:44)
  • 2 (2006-06-09 (金) 05:39:50)
  • 3 (2006-06-23 (金) 05:30:26)
  • 4 (2006-07-02 (日) 15:11:12)
  • 5 (2006-07-07 (金) 02:33:23)

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

[[2006a/A4]]


いまは特になーし
はjhgsjがjdじゃgだ
*何となくプログラム [#e9e47f7e]

 task main()
 {
 
*明るいところを探すプログラム [#acaaa788]
 task main(){
 SetSensor(SENSOR_1,SENSOR_LIGHT);
 SetSensor(SENSOR_3,SENSOR_LIGHT);
int R;int L;
 
 while(true)
 {
 
 while(SENSOR_1<=40 && SENSOR_3<=40)
 {
 SetPower(OUT_A+OUT_C,10);
   OnFwd(OUT_A+OUT_C);
   R=0;L=0;
 } 
 
 if(SENSOR_1>=40)
 {
 Off(OUT_A);
 R=1;
 }
 
 if(SENSOR_3>=40)
 {
 Off(OUT_C);
 L=1;
 }
 
 while(SENSOR_1>=40 && SENSOR_3>=40)
 {
 if(R==1)
 {
  until(SENSOR_1<=40 && SENSOR_3<=40)
  {
  OnFwd(OUT_C);OnRev(OUT_A);
  }
 }
 if(L==1)
 {
  until(SENSOR_1<=40 && SENSOR_3<=40)
  {
  OnFwd(OUT_A);OnRev(OUT_C);
  }
 }
 
 }
 
 
 }
 
 
 }
 int max=0,maxtime=0;
 ClearTimer(0);
     while(FastTimer(0)<=460){
           if(max<=SENSOR_1){
               max=SENSOR_1;
               maxtime=FastTimer(0);
                           }
           OnFwd(OUT_A);
           OnRev(OUT_C);
                             }
           ClearTimer(1);
           Off(OUT_A+OUT_C);
           Wait(30);
           maxtime=460-maxtime;
           OnRev(OUT_A);
           OnFwd(OUT_C);
           maxtime=maxtime-FastTimer(1);
           Wait(maxtime);
           Off(OUT_A+OUT_C);
            }