invaders ')Spectrum invaders "i"+0,00011000 "i"+1,00111100< "i"+2,01111110~ ("i"+3,11111111 2"i"+4,11000011 <"i"+5,11000011 F"i"+6,01100110f P"i"+7,00100100$ d"u"+0,00011000 n"u"+1,00011000 x"u"+2,00011000 "u"+3,00111100< "u"+4,01111110~ "u"+5,01111110~ "u"+6,11111111 "j"+0,00011000 "j"+1,00111100< "j"+2,01111110~ "j"+3,11111111 "j"+4,00111100< "j"+5,01100110f "j"+6,11000011 "j"+7,01100110f ,"k"+0,00101000( 6"k"+1,10001000 @"k"+2,10010001 J"k"+3,00101000( T"k"+4,00011100 ^"k"+5,001101004 h"k"+6,10100100 r"k"+7,10100100  y=1  xl=10  ym=0  t=0  s=0 7:0 a$=" " b$=" " c$=a$ d$=b$ &&e$=" ":20 spaces print aliens   6 %y,1;a$;y+4,1;c$  2 -y+2,1;b$;y+6,1;d$ $ 8000@ Lprint/move launcher V 4 ` t=t+1 j21,xl;"" ~l$=  l$="" 21,xl;" " "l$="5"xl>1xl=xl-1 #l$="8"xl<20xl=xl+1 21,xl;"" xshoot missile  6  l$"7" m=19y+6-1 m,xl;".";m+1,xl;" " m m+1,xl;" " test if hit aliens  f=0 q$=d$:r=6  7000X d$=q$ f=11670 Iy+5,xl;".";y+4,xl;".";y+5,xl;" ";y+4,xl;" " q$=c$:r=4 " 7000X ,c$=q$ 6f=11670 @q$=b$:r=2 J 7000X Tb$=q$ ^f=11670 c/y+1,xl;".";y+1,xl;" ";y,xl;" " hq$=a$:r=0 r 7000X |a$=q$ %a$=e$b$=e$c$=e$d$=e$9000(# no aliens left +q$=e$y=y+2:y-2,1;e$  1100L Xredefine strings bq$(xl)=" " l/q$=q$(1xl-1)+" "+q$(xl+1) v f=1 V hit alien `s=s+10 -y j q$=m$(q$) t 7900  m=18 0;1;y+r,xl;"" .01z# =,-5 m %0;10 ,25;"Score" '0;11 ,26;s;" "  t=t-1 " @main play loop J14,0;"x" TIt>30+(*15)y=y+2:t=0:y-2,1;e$ ^ a$=m$(a$) hy,1;6;a$ m-.17~.z-y/100d,-10 :1100L r b$=m$(b$) | y+2,1;2;b$ -.17~.z-y/100d,-14:1100L  c$=m$(c$)  y+4,1;6;c$ -.17~.z-y/100d,-10 :1100L  d$=m$(d$)  y+6,1;2;d$ -.17~.z-y/100d,-14:1100L y>8d$e$85004! y>10 c$e$85004! y>12 b$e$85004! y>1485004!  t=t+1  8000@ !410;18,1;"they got you !!!! " !H 9020<# #(no aliens left #2@0;20,0;"well done, you saved the world!!"; #<"Another game (y/n)";z$ #Fz$(1)="y" #P0:7 #Z %'m$(q$k)=q$(2)+q$(1) y tsD E A B LC