- 追加された行はこの色です。
- 削除された行はこの色です。
[[2012a/Member]]
*プログラミング [#u2f2daa1]
#define THRESHOLD 52
#define THRESHOLD_K 32
#define THRESHOLD_W 72
task main()
{
SetSensorLight(IN_1);
OnFwd(OUT_AC,50);
while(true)
{
if(THRESHOLD+5>SENSOR_1&&SENSOR_1>THRESHOLD-5)
{
Float(OUT_AC);
OnFwd(OUT_A,30);
OnFwd(OUT_C,30);
OnFwd(OUT_A,50);
OnFwd(OUT_C,50);
Wait(5);
}
if(THRESHOLD_K<SENSOR_1&&SENSOR_1<THRESHOLD_K+10)
{
Float(OUT_AC);
OnFwd(OUT_A,10);
OnFwd(OUT_C,30);
OnFwd(OUT_A,20);
OnFwd(OUT_C,50);
Wait(5);
}
if(THRESHOLD_W-10<SENSOR_1&&SENSOR_1<THRESHOLD_W)
{
Float(OUT_AC);
OnFwd(OUT_A,30);
OnFwd(OUT_C,10);
OnFwd(OUT_A,50);
OnFwd(OUT_C,20);
Wait(5);
}
if(SENSOR_1<THRESHOLD_K)
{
Float(OUT_AC);
OnRev(OUT_A,10);
OnFwd(OUT_C,30);
OnRev(OUT_A,40);
OnFwd(OUT_C,50);
Wait(5);
}
if(SENSOR_1>THRESHOLD_W)
{
Float(OUT_AC);
OnFwd(OUT_A,30);
OnRev(OUT_C,10);
OnFwd(OUT_A,50);
OnRev(OUT_C,40);
Wait(5);
}
}
}