2005/B2/課題4右
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
|
ログイン
]
開始行:
[[2005/B2/MemberOnly/光に向かって進むロボ]]
task main()
{
SetSensor(SENSOR_1, SENSOR_LIGHT);
int hikari = 0; //光の強さの値(初期値0)
int mt;
while (true)
{
ClearTimer(0);
ClearTimer(1);
hikari = 0;
while (Timer(1) < 50)//5秒間回る(一周回る
{
OnFwd(OUT_A);OnRev(OUT_C);
if (SENSOR_1 > hikari)
{
hikari=SENSOR_1;
mt = FastTimer(0);//一番光の強かったときの時間を記憶
}
}
int lt;
lt = FastTimer(0);
OnFwd(OUT_C);OnRev(OUT_A);Wait(lt - mt);//一番光の強い方向を向く
OnFwd(OUT_A+OUT_C);Wait(300);//3秒間直進
}
}
-[[ここ>まいける(TA)#y8259022]]を参照して下さい。 -- [[まいける(TA)]] &new{2006-02-09 (木) 00:29:57};
#comment
終了行:
[[2005/B2/MemberOnly/光に向かって進むロボ]]
task main()
{
SetSensor(SENSOR_1, SENSOR_LIGHT);
int hikari = 0; //光の強さの値(初期値0)
int mt;
while (true)
{
ClearTimer(0);
ClearTimer(1);
hikari = 0;
while (Timer(1) < 50)//5秒間回る(一周回る
{
OnFwd(OUT_A);OnRev(OUT_C);
if (SENSOR_1 > hikari)
{
hikari=SENSOR_1;
mt = FastTimer(0);//一番光の強かったときの時間を記憶
}
}
int lt;
lt = FastTimer(0);
OnFwd(OUT_C);OnRev(OUT_A);Wait(lt - mt);//一番光の強い方向を向く
OnFwd(OUT_A+OUT_C);Wait(300);//3秒間直進
}
}
-[[ここ>まいける(TA)#y8259022]]を参照して下さい。 -- [[まいける(TA)]] &new{2006-02-09 (木) 00:29:57};
#comment
ページ名: