2005/MemberOnly/進行状況B 光を追いかけるロボット

task main (){
	SetSensor(SENSOR_1,SENSOR_LIGHT);
	SetSensor(SENSOR_3,SENSOR_LIGHT);
	while(true){
		while(SENSOR_1>SENSOR_3){ //センサー1がセンサー3より明るさが大きければ以下の動きをする。
			OnRev(OUT_C); //ずっと右に回る。
			Off(OUT_A);
			if(SENSOR_1>40){ //もし前方が明るければまっすぐ進む。
				Off(OUT_A+OUT_C);
				OnRev(OUT_A+OUT_C);
			}
		}
		while(SENSOR_1<SENSOR_3){ //センサー3がセンサー1より明るさが大きければ以下の動きをする。
			OnRev(OUT_A); //ずっと左に回る。
			Off(OUT_C);
			if(SENSOR_3>40){ //もし前方が明るければまっすぐ進む。
				Off(OUT_A+OUT_C);
				OnRev(OUT_A+OUT_C);
			}
		}
	}
}

ロボットの解説

ギヤ比を低くして速度を出し、タイヤの間を短くし回転しやすいように作った。

トップ   編集 凍結 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2006-02-09 (木) 00:29:31