- 履歴一覧
- 2011b/A1/セレン は削除されています。
終了する度にデータが消えてしまうためここに記録
#define BLACK 40
#define go_ahead OnFwd(OUT_A+OUT_C);
#define go_back OnRev(OUT_A+OUT_C);
#define Do 523
#define Re 587
#define Mi 659
task main()
{
SetSensor(SENSOR_1,SENSOR_LIGHT);
SetSensor(SENSOR_3,SENSOR_LIGHT);
int count_line;
count_line = 0;
while(count_line < 1){
if(SENSOR_1 > BLACK && SENSOR_3 > BLACK)
{go_back;}
if(SENSOR_1 <= BLACK && SENSOR_3 > BLACK)
{Fwd(OUT_C); Wait(30); go_ahead; count_line++; PlayTone(Do,10);}
}
while(1 <= count_line < 2){
Wait(10);
if(SENSOR_1 > BLACK && SENSOR_3 > BLACK)
{go_ahead;}
if(SENSOR_1 <= BLACK && SENSOR_3 > BLACK)
{Rev(OUT_A);}
if(SENSOR_1 > BLACK && SENSOR_3 <= BLACK)
{Rev(OUT_C);}
if(SENSOR_1 <= BLACK && SENSOR_3 <= BLACK)
{go_ahead; Wait(30); count_line++; PlayTone(Re,10);}
}
while(count_line == 4){PlayTone(Mi,10); Off(OUT_C); Wait(50); go_ahead; count_line++;}
while(5 <= count_line < 7){
if(SENSOR_1 > BLACK && SENSOR_3 > BLACK)
{go_ahead;}
if(SENSOR_1 <= BLACK && SENSOR_3 > BLACK)
{Rev(OUT_A);}
if(SENSOR_1 > BLACK && SENSOR_3 <= BLACK)
{go_ahead; Wait(10); count_line++;}
}
}