• IchigoJam
• game
• danbungames

10 A=12:X=0:Y=0:B=99:S=0:T=1000
20 IF X X=X+4
30 IF (30<X)*(Y=B) B=99:S=S+1
40 IF 31<X X=0
50 IF B=99 B=RND(22)+1
60 K=INKEY()
70 IF (K=30)*(A>2) A=A-1
80 IF (K=31)*(A<22) A=A+1
90 IF (K=32)*(X=0) X=1:Y=A
100 CLS
110 LOCATE 0,A:PRINT"}"
120 IF X LOCATE X,Y:PRINT"-"
130 LOCATE 31,B:PRINT"X"
140 LOCATE 0,0:PRINT"SCORE:";S
150 LOCATE 10,0:PRINT"TIME:";T
160 WAIT 2
170 T=T-5
180 IF T<0:END
190 GOTO 20

Pagetop