2005/C2/キャベツ
光センサによる黒線にそった移動(課題3)†
モータ2個、光センサ1個による黒線上移動†
task main()
{
SetSensor(SENSOR_2,SENSOR_LIGHT); //センサ端子2に接続された
OnFwd(OUT_A+OUT_C); //センサが光センサであると
until(SENSOR_2<40); //宣言
Off(OUT_A+OUT_C);
while(true)
{
if (SENSOR_2<40) //光センサが黒線上にある時
{
OnFwd(OUT_C);
until(SENSOR_2>40);
Off(OUT_C);
} else { //光センサが黒線以外の所に
OnFwd(OUT_A); //あるとき
until(SENSOR_2<40);
Off(OUT_A);
}
}
}
モータ1個、光センサ1個による黒線上移動†
task main()
{
SetSensor(SENSOR_2,SENSOR_LIGHT); //センサ端子2に接続された
while(true) //センサが光センサであると
{ //宣言
if(SENSOR_2<40)
{
OnFwd(OUT_B);
until(SENSOR_2>40);
Off(OUT_B);
} else {
OnRev(OUT_B);
until(SENSOR_2<40);
Off(OUT_B);
}
}
}