2006a/A7/課題２右 の履歴差分(No.1)

• 履歴一覧
• 現在との差分 を表示
• ソース を表示
• 2006a/A7/課題２右 へ行く。
  • 1 (2006-06-23 (金) 05:27:50)
  • 2 (2006-06-23 (金) 05:39:25)
  • 3 (2006-07-14 (金) 05:35:54)
  • 4 (2006-07-28 (金) 05:19:59)
  • 5 (2006-07-31 (月) 11:29:55)
  • 6 (2006-08-01 (火) 01:31:44)

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

[[2006a/MemberOnly/進行状況A]]

*ライントレース [#kbf4da64]
 task main ()
 {
    SetSensor(SENSOR_1, SENSOR_LIGHT);
	 SetSensor(SENSOR_3, SENSOR_LIGHT);
    while(true)
    {
        OnFwd(OUT_A+OUT_C);
        if (SENSOR_3<40)
        {
        OnRev(OUT_A);Wait(20);
        OnFwd(OUT_A);
        }  
        if (SENSOR_1<40)
        {
        OnRev(OUT_C);Wait(20);
        OnFwd(OUT_C);
        }
    }                   
 }
*ライントレース＆前の車を追い越す [#i74842a6]
 task main ()
 {
    SetSensor(SENSOR_1, SENSOR_LIGHT);
	 SetSensor(SENSOR_3, SENSOR_LIGHT);
	 SetSensor(SENSOR_2, SENSOR_TOUCH);
    while(true)
    {
        OnFwd(OUT_A+OUT_C);
        if (SENSOR_3<40)
        {
        OnRev(OUT_A);Wait(20);
        OnFwd(OUT_A);
        }  
        if (SENSOR_1<40)
        {
        OnRev(OUT_C);Wait(20);
        OnFwd(OUT_C);
        }
        until (SENSOR_2 == 1) ;
        OnRev(OUT_A+OUT_C) ; Wait(50); 
        OnFwd(OUT_A) ; Wait(150);                                    
        OnFwd(OUT_C);
    }                   
 }