test led on 01
- 1 'nawatobi sacchan
- 20 IF V!=99 Y=Y+V:V=V+1
- 30 IF Y>22 Y=22:V=99:S=S+1
- 40 X=X+U
- 50 IF X>15 U=U-1
- 60 IF X<15 U=U+1
- 70 IF INKEY()=32 V=-3
- 80 CLS
- 90 LC 15,Y:?"@"
- 100 LC X,22:?"-"
- 110 LC 0,0:?"SCORE:";S
- 120 IF Y=22 AND X=15 END
- 130 WAIT 5 : GOTO 20