[[2005/A5/右チーム/するめ ver.]] [[2005/A5/右チーム]] *机の周りを回るロボットのプログラム [#g2070d26] 作成者:するめ 作成日時:11/17 #define turn_left OnFwd(OUT_A);OnRev(OUT_C);Wait(100);Off(OUT_A+OUT_C); // 左に90度曲がる #define turn_right OnFwd(OUT_C);OnRev(OUT_A);Wait(8);Off(OUT_A+OUT_C); //右に曲がる #define go_straight1 OnFwd(OUT_A+OUT_C); //前進する #define go_straight2 OnFwd(OUT_A+OUT_C);Wait(10);Off(OUT_A+OUT_C);//0.1秒間前進してとまる #define go_straight3 OnFwd(OUT_A+OUT_C);Wait(120);Off(OUT_A+OUT_C); //1.2秒間前進してとまる task main() { SetSensor(SENSOR_1, SENSOR_TOUCH); //センサー1をタッチセンサーに指定する SetSensor(SENSOR_3, SENSOR_TOUCH); //センサー3をタッチセンサーに指定する SetPower(OUT_A,6); //モーターAのパワーを下げる while (true) { if (SENSOR_1 == 0) //センサー1が触れていない時、右に方向修正する { turn_right; go_straight2; } else { //触れているとき前進する go_straight1; } if((SENSOR_1 == 1) && (SENSOR_3 == 1)) //センサー1とセンサー3が触れている時左に90度曲がり前進する { turn_left; go_straight3; } } } **感想 [#f5c20de6] 回転する角度が電池の消費に影響されて大変だった。 センサーの誤作動などが時々あってセンサーの感度を下げると反応してくれ ないなどの問題も発生したが成功してよかった。 **コメント [#n4b14025] このプログラムに関するコメントをどうぞ -SetPower というのはパワーを調整するための命令で実は回転数を調整するためのものではありません。多少は調整できますが、スピードの調整は基本的にはギア比を変化させることによって行ってください。 -- [[松本(教員)]] &new{2005-11-25 (金) 10:32:19}; -直しておきます。 -- [[するめ]] &new{2005-11-25 (金) 11:36:59}; #comment