◆キー操作
[←]:左折
[→]:右折
[↑]:WAITの値が増加(遅くなる)
[↓]:WAITの値が減少(速くなる)
◆コードの内容
30行目から70行目:キー操作
80行目から210行目:往復
220行目から280行目:左折
290行目から350行目:右折
・起動時、往復点滅です。
・左折時は[←]、右折時は[→]のキーを助手席の人に押してもらってください。
・押しているキーをはなすと往復パターンに戻ります。
・速度の初期値は3。[↑][↓]で調節可能です。
- 10 '10 LED LINE U/D/L/R/SPACE
- 20 X=3
- 30 IF BTN(UP)=1 X=X+1
- 40 IF BTN(DOWN)=1 X=X-1
- 50 IF X<1 X=1:IF X>10 X=10
- 60 IF BTN(LEFT)=1 GOTO220
- 70 IF BTN(RIGHT)=1 GOTO290
- 80 FOR I=1 TO 10
- 90 IF I=7 GOTO140
- 100 OUTI,1
- 110 ?"<> ";X
- 120 WAITX
- 130 OUTI,0
- 140 NEXT
- 150 FOR I=1 TO 10
- 160 IF I=5 GOTO200
- 170 OUT12-I,1
- 180 WAITX
- 190 OUT12-I,0
- 200 NEXT
- 210 GOTO30
- 220 FOR I=1 TO 11
- 230 IF I=5 GOTO 270
- 240 OUT12-I,1
- 250 ?"<- ";X
- 260 WAITX
- 270 NEXT
- 280 OUT0:OUT10,0:WAITX:GOTO30
- 290 FOR I=1 TO 11
- 300 IF I=7 GOTO340
- 310 OUTI,1
- 320 ?"-> ";X
- 330 WAITX
- 340 NEXT
- 350 OUT0:OUT10,0:WAITX:GOTO30