5 FORI=1TO24:PRINT:NEXT
 100 REM LAND AIR FIGHT
 110 C=57000
 120 D=54117
 130 POKE D,246
 140 E=27:F=237:G=13
 150 FOR I=1 TO 3:READ B(I):NEXT
 160 DATA 1,-31,-32
 170 N=5:P=5
 180 S=53444
 190 DIM A(N,3),M(P,2)
 200 X=PEEK(D)
 210 Y=PEEK(C)
 220 IF X>245 AND Y=250 THEN X=X-1:POKE D,X
 230 IF X<247 AND Y=252 THEN X=X+1:POKE D,X
 240 Z=248-X
 250 FOR I=1 TO N
 260 IF A(I,1)=0 AND Y=222 THEN A(I,1)=D+B(Z):A(I,2)=0:A(I,3)=B(Z):Y=0
 265 IF A(I,1)<>0 AND PEEK(A(I,1))=G THEN POKE A(I,1),32:A(I,1)=0
 270 IF A(I,1)<>0 THEN POKE A(I,1),32:A(I,1)=A(I,1)+A(I,3):POKEA(I,1),E
 280 IF A(I,1)<>0 THEN A(I,2)=A(I,2)+1
 290 IF A(I,2)>20 THEN POKE A(I,1),32:A(I,1)=0
 300 NEXT I
 400 REM MOVE TARGETS
 410 FOR I=1 TO P
 415 IF PEEK(M(I,1))=E THEN POKE M(I,1),G:M(I,1)=0
 420 IF M(I,1)<>0 THEN POKE M(I,1),32:M(I,1)=M(I,1)+1:POKE M(I,1),F
 430 IF M(I,1)<>0 THEN M(I,2)=M(I,2)+1
 450 NEXT I
 460 X=INT(RND(1)*P)+1
 470 IF M(X,1)=0 THEN M(X,1)=S+X*32:M(X,2)=0
 490 GOTO 200