2007b/A4/課題２左

2007b/MemberOnly/進行状況A

課題2：黒い線に沿って動くロボット

今日のアクセス数 1

総アクセス数 2214

課題 †

2箇所以上交差点のある周回コース(黒い線)をA0版の画用紙上描き、その自作のコースを3周する
ロボットを作成せよ。ただし、速さと正確さを追求すること。
交差点で優先側を走っていない場合には一時停止し、もう一台のロボットが優先道路上にある場
合には行き過ぎるのを待つこと。
前方を進むもう一台のロボットに追いついて接触した時、以下のいずれかの動作をさせること
(重複しないようにひとり一つ選ぶ)

1、3秒間停止して待つ

2、その場で1回だけ360度旋回する

3、180度旋回して5秒間コースを逆走し、再び180度旋回してもとの向きに走る

↑

コース †

↑

特徴and考察　 †

１、コーナーが多くセンサーの判定間隔を短くする必要がある。

２、交差点の非優先路の間隔が一定ではないので交差点通過後に黒線を探す処理をするプログラムを書く必要がある。

３、交差点通過時の他車との衝突した場合についての処理を考える必要がある

↑

ロボット作成 †

↑

タッチセンサについて †

１、スイッチの黄色い部分が押されると信号を出します。今回の課題では、前を走行するマシンに衝突したときにタッチセンサを反応させ指定された動作を行うようにした。

２、マシン前方にバンパーを装着させれば問題ないと思ったので、最初はシングルバンパーを装着させたが、すれ違い時にもマシンが接触することがあり、コースから外れてしまうことが多々あったため最終的にダブルバンパーに改良し横方向からの接触にも対応できるようにした

３、すこしバンパーが光センサよりも前に出ているので、交差点で一時停止した時に接触してしまった場合を考え、少し後退してから指定された動作をするようにした。

↑

光センサについて †

１、光センサは、明るさによって１～１００までの値を判断します。値が大きいほど明るいと判断してくれます。部屋の明るさにもよるが、閾値を４０ぐらいで白と黒の区別をつけることができます。私たちは、光センサの閾値を４０に設定しました。

２、最初は、黒い線を挟み込んで光センサが黒を見つけたら(閾値が４０以下の場合)車体の向きを変えるように設定したが、一時停止線の問題や速さの点で、黒い線にそって走らせ、黒い線からはみ出たら(閾値が４０以上の場合に)車体の向きを変えるようにした。

３、光センサが両方とも白と判断すると(閾値が４０以上の場合)交差点を渡るプログラムが発動します。

↑

一代目 †

１、黒線を挟み込み、光センサが黒線を感知したら(閾値が４０以下の場合に)車体の向きを調整するようになっている。

２、一時停止線が無いとコースを完走することができない。

３、シングルバンパを使用しているがバンパー部分が光センサよりもかなり前方にはみ出でいるため、もっとコンパクトに
しなくてはならないかもしれない。

４、三輪駆動にして動きやすくした。

↑

ロボット †

斜め４５度　

下、三輪駆動である。センサとセンサの間に黒線を挟む

正面、センサー二つで黒線を探す

横、車輪の付け替えがしやすい

後方

上

↑

ソースコード(三秒間停止の場合) †

#define Do 523
#define Re 587
#define Mi 659
#define Fa 698
#define So 784
task music1(){//タッチセンサ反応中になる音楽
	while(1){
		PlayTone(Do,20);Wait(20);
		PlayTone(Re,20);Wait(20);
		PlayTone(Mi,20);Wait(20);
		PlayTone(Re,20);Wait(20);
		PlayTone(Do,20);Wait(40);
		PlayTone(Do,20);Wait(20);
		PlayTone(Re,20);Wait(20);
		PlayTone(Mi,20);Wait(20);
		PlayTone(Re,20);Wait(20);
		PlayTone(Do,20);Wait(20);
		PlayTone(Re,20);Wait(20);
	}
}
task music2(){//タッチセンサが反応してないときになる音楽
	while(1){
		PlayTone(Mi,25);Wait(30);
		PlayTone(Re,5);Wait(10);
		PlayTone(Do,15);Wait(20);
		PlayTone(Re,15);Wait(20);
		
		PlayTone(Mi,15);Wait(20);
		PlayTone(Mi,15);Wait(20);
		PlayTone(Mi,35);Wait(40);
		
		PlayTone(Re,15);Wait(20);
		PlayTone(Re,15);Wait(20);
		PlayTone(Re,35);Wait(20);
		
		PlayTone(Mi,15);Wait(20);
		PlayTone(So,15);Wait(20);
		PlayTone(So,35);Wait(40);
		
		PlayTone(Mi,25);Wait(30);
		PlayTone(Re,5);Wait(10);
		PlayTone(Do,15);Wait(20);
		PlayTone(Re,15);Wait(20);
		
		PlayTone(Mi,15);Wait(20);
		PlayTone(Mi,15);Wait(20);
		PlayTone(Mi,35);Wait(40);
		
		PlayTone(Re,15);Wait(20);
		PlayTone(Re,15);Wait(20);
		PlayTone(Mi,25);Wait(30);
		PlayTone(Re,5);Wait(10);		
		PlayTone(Do,55);Wait(60);
		Wait(20);
	}
}
task main (){
	 int i=0;
      SetSensor(SENSOR_1,SENSOR_LIGHT);               
      SetSensor(SENSOR_3,SENSOR_LIGHT);              
      SetSensor(SENSOR_2,SENSOR_TOUCH);
      ClearTimer(0); 
      start music2;                  
      while(Timer(0)<=1000){       		
      		if(SENSOR_2 == 1){// タッチセンサが反応した場合
		  　　　　 stop music2;
                     	  start music1;        
                         Off(OUT_A+OUT_C ); //3秒停止
                         Wait(300);   
                         i=0;
                         stop music1;
                         start music2;                     
                  } 
                 else { // 2 タッチセンサが反応しない場合
                 	if(SENSOR_1 >40){ // 光センサ１が白と判断
                     		if(SENSOR_3 > 40){ //光センサ１、３共に白と判断した場合
                                            if(0==i){           			　                                  			
                           		OnFwd(OUT_A+OUT_C);
                           		Wait(30);
                                   Off(OUT_A+OUT_C);
                                   i++;                                   
                                   PlaySound(SOUND_CLICK);
                                   }
                                   if(1==i){                     			
                           		OnFwd(OUT_A+OUT_C);
                           		Wait(10);
                                   Off(OUT_A+OUT_C);
                                   i++;                                   
                                   PlaySound(SOUND_CLICK);
                                   }
                                   if(2<=i){                                          
                                   	while(true){//黒線を発見できない場合、黒線を発見するまで回転	
                                   		OnFwd(OUT_A);
                                   		OnRev(OUT_C);
                                   		Wait(1);
                                   		if(SENSOR_1<40||SENSOR_3<40){
                                   		i=0;
                                   		break;
                                   		}
                                   	}
                                   }                                                                                                          
                    		}
                    		else { //光センサ１白、３黒の場合
                       			OnFwd(OUT_A); //進行方向左に回転
                       			Off(OUT_C);          
                       			until(SENSOR_3 > 40); 
                       			i=0; 
                          	}
                          }
                  	else { //光センサ１が黒のとき
                        	if(SENSOR_3 > 40){ //光センサ１黒、３白の場合
                       			 Off(OUT_A); //進行方向右に回転
                       			 OnFwd(OUT_C);       
                       			 until(SENSOR_1 > 40);
                       			 i=0;  
                           	 }
                            	else{ // 光センサ１、３ともに黒の場合
                                           OnFwd(OUT_A+OUT_C); //直進
                                           i=0;                                             
                             }                   
                       }
              }// 2 No Touch
     }//while 
     stop music2;
     Off(OUT_A+OUT_C);
}

↑

ソースコード2(その場で360度回転する場合、音楽省略) †

task main()
{ 
	SetSensor(SENSOR_1,SENSOR_LIGHT);
	SetSensor(SENSOR_3,SENSOR_LIGHT);
	SetSensor(SENSOR_2,SENSOR_TOUCH);
	int i=0;
	
	
	while(true){
		if(SENSOR_2 == 1){//タッチセンサが反応した場合
			Off(OUT_A+OUT_C);
			Wait(100);
			repeat(2){//360度回転する命令
				OnFwd(OUT_A);
				OnRev(OUT_C);
				Wait(140);
			
			}
			i=0;
		}
		else{
			if(SENSOR_1 > 40){	//光センサ１が白と判断
				if(SENSOR_3 > 40){	//光センサ１、３ともに白と判断した場合
					if(0==i){
						Off(OUT_A+OUT_C);
						Wait(50);
						OnFwd(OUT_A+OUT_C);
						Wait(30);
						i++;
					}
					if(1==i){
						Off(OUT_A+OUT_C);
						Wait(50);
						OnFwd(OUT_A+OUT_C);
						Wait(30);
						i++;
					}
					if(2<=i){//二回進んでも線が発見できない場合は回転して線を探せ
						while(true){
							OnFwd(OUT_A);
							OnRev(OUT_C);
							Wait(1);
							if(SENSOR_1<40||SENSOR_3<40){
								i=0;
								break;
							}
						}
					}
				}
				else{	//光センサ１白、光センサ３黒と判断した場合
					OnFwd(OUT_A); //進行方向左に回転
					Off(OUT_C);
					until(SENSOR_3 > 40);
					i=0;
				}
			}
			else{	//光センサ１が黒を判断
				if(SENSOR_3 > 40){	//光センサ１黒、光センサ３白と判断した場合
					OnFwd(OUT_C); //進行方向右に回転
					Off(OUT_A);
					until(SENSOR_1 > 40);
					i=0;
				}
				else{	//光センサ１、３ともに黒と判断した場合
 					OnFwd(OUT_A+OUT_C); //直進
					i=0;
				}
			}
			
		}
	}
}

↑

二代目 †

横から見た写真

光センサの幅をなくすことにより白を感知すると(閾値が４０以上の場合)進む方向を調節する

↑

改良点 †

１、車輪を大きいものにすることによって速度をはやくした

２、センサーの幅をなくすことにより黒線を追うようにした。これにより非優先の交差点の認識が可能になった。

３、音を出すことにより進行中の処理を確認することが可能となった。

↑

ソースコード †

#define Do 523
#define Re 587
#define Mi 659
#define Fa 698
#define So 784

task music1(){  //タッチセンサが反応しているときの音楽
    while(1){
        PlayTone(Do,20);Wait(20);
        PlayTone(Re,20);Wait(20);
        PlayTone(Mi,20);Wait(20);
        PlayTone(Re,20);Wait(20);
        PlayTone(Do,20);Wait(40);
        PlayTone(Do,20);Wait(20);
        PlayTone(Re,20);Wait(20);
        PlayTone(Mi,20);Wait(20);
        PlayTone(Re,20);Wait(20);
        PlayTone(Do,20);Wait(20);
        PlayTone(Re,20);Wait(20);
    }
}

task music2(){ //タッチセンサが反応してないときになる音楽
    while(1){
        PlayTone(Mi,25);Wait(30);
        PlayTone(Re,5);Wait(10);
        PlayTone(Do,15);Wait(20);
        PlayTone(Re,15);Wait(20);
        
        PlayTone(Mi,15);Wait(20);
        PlayTone(Mi,15);Wait(20);
        PlayTone(Mi,35);Wait(40);
        
        PlayTone(Re,15);Wait(20);
        PlayTone(Re,15);Wait(20);
        PlayTone(Re,35);Wait(20);
        
        PlayTone(Mi,15);Wait(20);
        PlayTone(So,15);Wait(20);
        PlayTone(So,35);Wait(40);
        
        PlayTone(Mi,25);Wait(30);
        PlayTone(Re,5);Wait(10);
        PlayTone(Do,15);Wait(20);
        PlayTone(Re,15);Wait(20);
        
        PlayTone(Mi,15);Wait(20);
        PlayTone(Mi,15);Wait(20);
        PlayTone(Mi,35);Wait(40);
        
        PlayTone(Re,15);Wait(20);
        PlayTone(Re,15);Wait(20);
        PlayTone(Mi,25);Wait(30);
        PlayTone(Re,5);Wait(10);
        
        PlayTone(Do,55);Wait(60);
        Wait(20);
    }
}
task main (){
     int i=0,n=0;
       SetSensor(SENSOR_1,SENSOR_LIGHT);              
       SetSensor(SENSOR_3,SENSOR_LIGHT);             
       SetSensor(SENSOR_2,SENSOR_TOUCH);
       ClearTimer(0);
       start music2;                 
       while(Timer(0)<=1000){               
               if(SENSOR_2 == 1){// タッチセンサが反応したときのプログラム
                     stop music2;
                            start music1;       
                          Off(OUT_A+OUT_C ); //3秒停止
                          Wait(300);  
                          i=0;
                          stop music1;
                          start music2;                    
                   }
                  else { // タッチセンサが反応してないときのプログラム
                      if(SENSOR_1 >40){ // 光センサ１が白と判断
                              if(SENSOR_3 > 40){ //光センサ１、３共に白と判断した場合
                                  if(0==i){          　　                       
                                    OnFwd(OUT_A+OUT_C);
                                    Wait(30); 　　　　//0.3秒間前進
                                    Off(OUT_A+OUT_C);
                                    i++;                                  
                                    PlaySound(SOUND_CLICK);
                                    }
                                    if(1==i){                                 
                                    OnFwd(OUT_A+OUT_C);
                                    Wait(10);              //0.1秒間前進
                                    Off(OUT_A+OUT_C);
                                    i++;                                  
                                    PlaySound(SOUND_CLICK);
                                    }
                                    if(SENSOR_1<40||SENSOR_3<40){
                                              	i=0;
                                            	break;
				    }
                                    if(2<=i){                          
                                        while(true){ 
					    if(SENSOR_1<40||SENSOR_3<40){ //黒線を発見したら元の動作をする
                                            	i=0;
                                            	break;
                                            }   
                                            if(n<=5){ //nが５になるまで左に首振りをする
					    	OnFwd(OUT_A);
                                            	OnRev(OUT_C);
                                            	Wait(1);
						n++;
					    }
					    else if(15<=n&&n<=17){ //nが１５から１７の間で元の向きに戻る
							OnFwd(OUT_A);
                                            		OnRev(OUT_C);
                                            		Wait(1);
							n++;
                                           }
                                           else if(n==18){ //0.1秒間後退
				           	PlaySound(SOUND_CLICK);			
						OnRev(OUT_A+OUT_C);
						Wait(10);
						n=0;
					     }
					    else{//nが４以上１４以下のとき右に首振り
					    	OnFwd(OUT_C);
                                            	OnRev(OUT_A);
                                            	Wait(1);
						n++;
					    }
                                        }
                                    }                                                                                                         
                             }
                             else { //光センサ１、白／光センサ３、黒と判断した場合
                                     OnFwd(OUT_A); //進行方向左に回転
                                     Off(OUT_C);         
                                     until(SENSOR_3 > 40);
                                     i=0;
                               }
                           }
                       else { // 光センサ１が黒と判断
                              if(SENSOR_3 > 40){ //光センサ１、黒／光センサ３、白と判断した場合          
                                     Off(OUT_A); //進行方向右に回転
                                     OnFwd(OUT_C);      
                                     until(SENSOR_1 > 40);
                                     i=0; 
                                 }
                                 else{ // 光センサ１、３共に黒と判断した場合  
                                            OnFwd(OUT_A+OUT_C); //直進
                                            i=0;                                            
                              }                  
                        }
               }// 2 No Touch
      }//while
      stop music2;
      Off(OUT_A+OUT_C);
}

↑

ソースコード処理内容 †

光センサーにより黒線にそって進む

衝突時をタッチセンサーにより判定し、三秒間停止した後、衝突前の処理を実行

交差点通過後にコースからはずれてしまった場合、左右近くにコースがないか確認し見つかった場合は再び黒線にそって進み、見つからなかった場合、0.1秒後退の後に再び近くの黒線を探す

↑

二代目の考察 †

１、二台目はセンサーの幅をなくした。それを実現するためにソースは一代目の両方のセンサーが黒を認識した場合の処理と両方が白を認識した処理を逆にした。これにより非優先交差点の認識が可能になった。

２、二代目では非優先交差点を直進して渡った後に黒線が見つからなかった場合、左右旋回することでコースを探す処理をするようにプログラミングした。これにより衝突によるコースをはずれてしまった場合やコースを認識できなかった場合でもコースにもどることができるようになった。

3、横からロボットが衝突した場合にシングルバンパーでは対応できないのでダブルバンパに改良するべきである。

↑

三代目 †

↑

三代目の考察 †

1、二代目の反省を生かして、バブルバンパに改良。横からの接触に対しても対応が可能になった。

2、横からの接触の場合、接触した位置で指定されたプログラムを行うと、どの場合でももう一度接触してしまうため、後ろに下がってから指定されたプログラムを行うように改良した。

if(SENSOR_2 == 1){// タッチセンサが反応した場合
		  　　　　 stop music2;
                     	  start music1;  
                         OnRev(OUT_A+OUT_C); //１秒後退
                         Wait(100);     
                         Off(OUT_A+OUT_C );３秒間停止
                         Wait(300);   
                         i=0;
                         stop music1;
                         start music2;                     
  }

３６０度回点の場合も回転する前に後退するプログラムを入れました。

if(SENSOR_2 == 1){//タッチセンサが反応した場合
          stop music2;
          start music1; 
	OnRev(OUT_A+OUT_C);//一秒後退
	Wait(100);
	   repeat(2){//360度回転する命令
	     OnFwd(OUT_A);
	     OnRev(OUT_C);
	     Wait(140);
             stop music1;
             start music2;   
 }

↑

今後の課題 †

交差点を渡るときに反対側に渡らずに優先コースに進んでしまうことがあるので改良が必要。

衝突時にバンパーが反応しないときがたまにあったので改良が必要。

↑

感想 †

吉沢

横から衝突するのは、予想外だったので車体、プログラムの改良が大変だった。

タイヤの径が大きいと誤差が大きくなるので正確さを求めるか速さを求めるかで悩んだ。

北田

視覚のないロボットに明暗だけで道を認識させるのがこんなに難しいものだとは思ってなかった。正確さは情報量が多いほどよくなると思った。

↑

備考 †

↑

Windows VistaでのUSBのIRタワーの使用法 †

１,BrickxCCをダウンロード
２,LEGO社のwebページからUSB Tower patch（上から三番目のUSB Tower patchのところをクリックするとダウンロード画面が出る）をダウンロードする
３,ダウンロードしたファイルを解凍しSetup.exeを実行する
＊検証は不十分ですがたぶんUSBタワーをパソコンにつけてからpatchをダウンロードしたほうがいいと思う。 Firmwareを最新のものにした前提で行う必要がある

↑

コメント †

よろしければコメントお願いします。また、上記のvistaでの使用法についてのことも受け付けています

まず、光センサーがどのようにマシンにとりつけられていて、光センサーの値をもとに、どのようなトレースを行うかの解説がありません。 -- まいける(TA) 2007-12-14 (金) 08:30:16
初めて見た人にもわかるように、そのバンパーの機構でどのように接触センサーを押しているかの説明がほしいです。 -- クノ? 2007-12-14 (金) 16:42:12

目次

全般

教材・資料

Debian関連

近年の授業

2019年度前期

2018年度後期

2018年度前期

2017年度後期

2017年度前期

2016年度後期

2016年度前期

2015年度以前

2003年度以前

最新の20件

課題 †

コース †

特徴and考察　 †

ロボット作成 †

タッチセンサについて †

光センサについて †

一代目 †

ロボット †

ソースコード(三秒間停止の場合) †

ソースコード2(その場で360度回転する場合、音楽省略) †

二代目 †

改良点 †

ソースコード †

ソースコード処理内容 †

二代目の考察 †

三代目 †

三代目の考察 †

今後の課題 †

感想 †

備考 †

Windows VistaでのUSBのIRタワーの使用法 †

コメント †

目次

全般

教材・資料

Debian関連

近年の授業

2015年度以前

2003年度以前

最新の20件

課題 †

コース †

特徴and考察 †

ロボット作成 †

タッチセンサについて †

光センサについて †

一代目 †

ロボット †

ソースコード(三秒間停止の場合) †

ソースコード2(その場で360度回転する場合、音楽省略) †

二代目 †

改良点 †

ソースコード †

ソースコード処理内容 †

二代目の考察 †

三代目 †

三代目の考察 †

今後の課題 †

感想 †

備考 †

Windows VistaでのUSBのIRタワーの使用法 †

コメント †

特徴and考察　 †