Jump Barrel

:PRINT"[LEFT,UP]":F=F-1
IF F=0 THEN Y=173
200 POKE D,81:POKE D+1,32:D=D-1
IIF D<1664 THEN D=1703:A=A+l
210 GET K$:IF KSO"" AND F<0 THEN
Y=165:F=B-LP
220 IF PEEK(V+31)<>0 THEN 250
230 POKE V,X:POKE V+1,Y:POKE S,15
:POKE S,0:NEXT:NEXT
240 PRINT"[HOME,DOWN3] YOU'RE A
WINNER! YOU JUMPED";A;"BARRELS."
:PRINT:GOTO 260
250 POKE 2040,0:PRINT"[HOME,DOWN3]
YOU CRASHED AFTER JUMPING";A;
"BARRELS!":PRINT
260 END