Aliens YAliens (Alien Defence) by Darren Frampton from Sinclair User October 1982  hs=0 236099\,255  4000 1000  2000  c=15 x=0.0125zL h=(*6) (i=(*20) - k=0 2 s=0 <)in=(*7):in>7in=6 F=1;1;19,c;"";18,c+1;"" K+0,0;7;"Your Score ";s P+1;in;h,i;"":.01z# =,40( U#h=18i=c+1300, Zi=ch=19300, _#h=19i=c+1300, a#h=19i=c+2300, d="7"200 n-="8"c=c+(c<29):.01z# =,40( x,="5"c=c-(c>1):.01z# =,30 C19,c-1;" ";18,c-1;" ";h,i;" " &h=h+1:h=20k=k+1 (h=20h=1:k=z3000 a= 6a.4Li=i+2:a.5i=i-1 ~a.5i=i-1: The 2nd IF above would neverbe executed, so I've placed it separately here. [JimG] 2i>30i=1:i<1i=25 ?i<1i=25: Ditto. [JimG] 60< ȋx,4:x,6:x,8:x,10 :x,12 :x,14:x,16:x,4:x,6:x,8:a=c+1:e=17 5;e,a;"" 0.01z# =,5 ܪe=ha=ie,a;4;"":.75@,8:8:3;e,a;"":s=s+5:5:h,c;" ";e,a;" ":i=i+5i<25:h=(*10 ):70F e,a;" " e=e-1 e=1100d  210 ,c1;1;19,i-1;"";18,i-1;6;"":4,-15 1#0,0;" " 6M1;7;1;3,0;"YOUR LASER HAS BEEN DESTROYED" @54;4,0;"You Scored ";s;" points" AXs>hshs=s:1;7;1;"YOU GAINED A HIGH SCORE, ENTER YOUR NAME ";n$ BJhs>06;5,0;"High Score: ";hs;" points by ";n$ Es=0370r J-6;6,0;"You shot down "; Tf=1s/5 Y0p=(*5):p>7p=0345Y ^ p;""; cf h,6;" Alien";:6;"s"s>5 m 400 r-3;7;"You shot down no Aliens" 7;"Another game?";a$  a$=a$+" " -a$(1)="y"a$(1)="Y":15  f=07  a:"I"+f,a f f=07  a:"B"+f,a f $f=07 . a:"U"+f,a 8f Bf=07 L a:"N"+f,a Vf `f=07 j a:"A"+f,a tf ~f=07  a:"T"+f,a f  G0,60<,90Z,60<,60<,66B,36$,0 xF0,0,16,568,16,16,16,0 G0,36$,66B,60<,60<,90Z,60<,0 @F1,3,7,15,29,63?,96`,96` M128,192,224,240,184,252,6,6 E0,0,0,0,0,24,60<,126~ 20:0:7::f=0100d a=(*225) b=(*150) %a>255b>1952010 '7;1;a,b:.01z# =,:f  h:3;1,0;"You let too many Aliens pass, they have captured Earth and allis lost." 320@ 11:1::6;11 ;"ALIENS" 7;1,2;"You have to defend Earth by shooting the Aliens. To move your laser base use the cursor keys and key 7 to fire." >7;"You score 5 points for each Alien you shoot." 7;10 ,0;"Enter level of difficulty";11 ,0;"B:Beginner";12 ,0;"G:Good";13 ,0;"E:Expert" a$ (4060(a$="b"a$="B"))+(4070(a$="g"a$="G"))+(4080(a$="e"a$="E")):The () around the ORs were missing, so a CAPS match would return 1 instead of the correct line number. [JimG] ]An unrecognised a$ willdo a GO TO 0, so it will never get to the next line. [JimG]  4040 Z3;7;"You must not let more than 20 Aliens pass":z=20:200: Z1;7;"You must not let more than 10 Aliens pass":z=10 :200: Y2;7;"You must not let more than 5 Aliens pass":z=5:200: