0 V=53248:FOR N=828 TO 2024:POKE N,255:NEXT:FOR N=2041 TO 2046:POKE N,14:NEXT
1 POKE 2047,15:FOR N=0 TO 32:POKE 959+N,0:POKE 989+N,0:POKE V+39+N,ABS(8-N):NEXT
2 X=70:Y=90:A=10:T=70:S=100:G=0:K=255:POKE V+21,255:POKE V+33,0:POKE 2040,13
3 X=X+A:Z=X-45:IF X=T+140 THEN A=-1*A:Y=Y+10:T=-1*T:IF Y>210 THEN ?"LOST":GOTO 0
4 Q$="WIN":POKE V+7,Y-30:J=PEEK(56320):IF J=119 THEN S=S+10:IF S>240 THEN S=240
5 POKE V,S:U=X+45:POKE 1019,60:POKE V+3,Y-30:IF J=123 AND S>30 THEN S=S-10
6 POKE V+5,Y-30::POKE V+1,240:IF J=111 AND G<20 THEN G=210:POKE 53262,S-8
7 POKE V+15,G:POKE V+13,Y:POKE V+9,Y:POKE V+11,Y:J=PEEK(V+30):IF G>11 THEN G=G-5 
8 J=PEEK(V+30):IF J>129 THEN K=K-J+128:POKE V+21,K:G=6:IF K=129 THEN ? Q$:GOTO 0
9 POKE V+4,X:POKE V+8,Z:POKE V+10,X:POKE V+12,U:POKE V+6,U:POKE V+2,Z:GOTO 3