86 Space Traffic 160 IF HIT=1 THEN HIT=0:SOUND 1,120,3:GO SUB 410 170 IF INKEY(47)=0 THEN GOSUB 530 180 L=INT(RND*30):G=(INT(RND*3)*2)+1 190 LOCATE L+1,21:PRINT MIDS(AS,6,2);:LO CATE L+1,22:PRINT MID$(B$,G,2); 200 IF C>400 THEN L=INT(RND*30):6=(INT(R ND*3)*2)+I:LOCATE L+120,1:PRINT M1D$(A$, 6,2);:LOCATE L+1,22:PRINT MID$(BS,G,2); 210 IF C=200 THEN AS=CHRS(233)+CHR$(234) +CHR$(232)+" "+CHRS(241)+" ":B$=CHRS(235 )+CHRS(236)+" 220 IF C=300 THEN AS=CHRS(233)+CHRS(234) +CHR$(233)+CHRS(234)+CHRS(233)+CHRS(234) :BS=CHR$(235)+CHRS(236)+CHRS(235)+CHR$(2 36)+CHRS(235)+CHRS(236) 230 IF RND>0.6 THEN LX=INT(RND*30):PEN 2 :LOCATE LX+1,22:PRINT CHRS(237);:PEN 1 240 IF RND<0.4 THEN LX=INT(RND*30):PEN 3 :LOCATE LX+1,22:PRINT CHRS(238);:PEN 1 250 LOCATE X+1,9:CALL 360:LL=PEEK(367):I F LL=237 THEN GOSUB 340 260 LOCATE X+1,10:CALL 360:LL=PEEK(367): IF LL=237 THEN GOSUB 340 270 LOCATE X+1,11:CALL 360:LL=PEEK(367): IF LL=237 THEN GOSUB 340 280 LOCATE X+1,12:CALL 360:LL=PEEK(367): IF LL=237 THEN GOSUB 340 290 C=C+1 300 IF C>400 THEN 100 310 0=0-2:LOCATE W+1,0+1:PRINT CHRS(239) ;:LOCATE W+1,0+2:PRINT " ";:IF Q=0 THEN 0=20:W=X 320 GOTO 100 330 IF LI<>0 THEN RETURN 340 REM 350 LOCATE X+1,12:CALL 360:LL=PEEK(367): IF LL=237 THEN D=88 360 LOCATE X+1,11:CALL 360:LL=PEEK(367): IF LL=237 THEN D=96 370 LOCATE X+1,10:CALL 360:LL=PEEK(367): IF LL=237 THEN D=104 380 LOCATE X+1,9:CALL 360:LL=PEEK(367):I F LL=237 THEN D=I12