2012a/Member

課題2 ライントレース

ルール

・コースを1周半以上まわる
・交差点を2つ
・直角カーブを1つ
・ニアピンカーブを1つ

ロボット本体

ロボット

ロボット本体は簡単な構造で、コンパクトな車になりました。

ロボット

本体で工夫した点は光センサーとタイヤの距離関係です。これをできるだけ近くすることで、コースを正確に読み取り、ロボットが間違った方向に進まないようにしました。

ロボット

コースはルールに従って作りました。しかし、必要なものが上のほうにかたよってしまったので難しかったです。

プログラミングのの説明としては、動き出した時にタイマーをセットして、時間に合わせてコースの様々な部分をクリアしていくようにしました。また、より正確に動けるように白と黒の間を読み取り、少しずれただけでも修正できるようなプログラミングにしました。そのおかげで、なめらかな動きでラインをトレースすることができました。

反省点:

タイマーを動き始めにセットしているので入口によってタイマーをセットしなければならない・・・

次はコースの形に応じてプログラミングを変えることができるようにしたい!!

プログラミング

#define THRESHOLD 52
#define THRESHOLD_K 32
#define THRESHOLD_W 65
task main()
{
     SetSensorLight(IN_1);
     long t0,time;
     t0=CurrentTick();  //タイマーを0にする
      int mode=1  //モードに1を代入 
while(1){
     switch(mode)  //モードに応じた動きをする
      {
     case 1:     //ラインをトレースするプログラミング
      time=CurrentTick()-t0;
		if(THRESHOLD+5>SENSOR_1&&SENSOR_1>THRESHOLD-5)  //白黒の間を読み取る
                     {
			Float(OUT_AC);
			OnFwd(OUT_A,40);
			OnFwd(OUT_C,40);
			Wait(5);
			}
		if(THRESHOLD_K<SENSOR_1&&SENSOR_1<THRESHOLD_K+10)  //少し黒寄りになったときにコースに戻る
                     {
			Float(OUT_AC);
                           OnFwd(OUT_A,40);
			OnFwd(OUT_C,10);
			Wait(5);
			}
          if(THRESHOLD_W-10<SENSOR_1&&SENSOR_1<THRESHOLD_W) //少し白寄りになったときにコースに戻る
                     {
			Float(OUT_AC);
                           OnFwd(OUT_A,10);
			OnFwd(OUT_C,40);
			Wait(5);
			}
	       if(SENSOR_1<THRESHOLD_K)  //黒になったときコースに戻る
                     {
			Float(OUT_AC);
                           OnFwd(OUT_A,40);
			OnFwd(OUT_C,40);
			Wait(5);
			}
          if(SENSOR_1>THRESHOLD_W)  //白になったときコースに戻る
                     {
			Float(OUT_AC);
                       OnRev(OUT_A,40);
			OnFwd(OUT_C,40);
			Wait(5);
			}
              
       }
     if(time>21000)
       {
     mode=2;  //モードに2を代入
       }
break;
     case 2://交差点を通過するプログラミング
       {
     time=CurrentTick()-t0;
		if(THRESHOLD+5>SENSOR_1&&SENSOR_1>THRESHOLD-5)  //白黒の間を読み取る
                     {
			Float(OUT_AC);
			OnFwd(OUT_A,40);
			OnFwd(OUT_C,40);
			Wait(5);
			}
		if(THRESHOLD_K<SENSOR_1&&SENSOR_1<THRESHOLD_K+10)  //少し黒寄りになったときにコースに戻る
                     {
			Float(OUT_AC);
                       OnFwd(OUT_A,40);
			OnFwd(OUT_C,10);
			Wait(5);
			}
          if(THRESHOLD_W-10<SENSOR_1&&SENSOR_1<THRESHOLD_W)  //少し白寄りになったときにコースに戻る
                     {
			Float(OUT_AC);
                       OnFwd(OUT_A,10);
			OnFwd(OUT_C,40);
			Wait(5);
			}
	      if(SENSOR_1<THRESHOLD_K)  //黒になったときコースに戻る
                     {
			Float(OUT_AC);
                       OnFwd(OUT_A,40);
                       OnRev(OUT_C,40);
			Wait(5);
			}
          if(SENSOR_1>THRESHOLD_W)  //白になったときコースに戻る
                     {
			Float(OUT_AC);
                       OnFwd(OUT_A,40);
			OnRev(OUT_C,30);
			Wait(5);
			}     
       }
     while(21000<time&&time<23000);
     Off(OUT_AC);
 }
}

添付ファイル: file20120615161709_2.jpg 243件 [詳細] file20120615161647_2.jpg 227件 [詳細] file201206151616091.jpg 238件 [詳細] file20120615161709.jpg 124件 [詳細] file20120615161647.jpg 115件 [詳細] file120525_160427.jpg 124件 [詳細] file120525_160346.jpg 116件 [詳細]

トップ   編集 凍結 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2012-08-07 (火) 23:37:47