ZXDefenderDD=FAZX DEFENDER By Stephen King Sinclair Programs, May 83 ZX DEFENCE  S.KING be=0  9000(#  1000 (FIRE 2fu=fu-2 <t=1 15 Fi=15+(s)*t P q$=(u,i) ZAq$=" "u,i;0;"_":.005y# =,t:u,i;1;" ":t: dq$=">"q$="<"8000@: nmq$="@"fu=fu+17:f=1 8:f:l="a":f:.1}L,40(:579:l="a":u,i;" ": x,q$="["q$="]"sc=sc+7:8000@: u,i;" ": .02{# =,502 a21-(d/8),(31 s=1);"@";22-(d/8),(31 s=1);""  fu=fu-1:BOMBS t=1 14-u i=15+(s)*t r=u+t (r,i)" "570: &4r,i;2;".":.005y# =,t:r,i;1;" " 0t: :(r,i)"@"r,i;" ": D/fu=fu+11 :r,i;(144+(*4)) Nf=1 18:f Xl="A":.005y# =,f bf l579:l="A" v r,i;" "  6b=0 1 0:i$=:i$=""1030 i$="8"s=1 i$="0"502 i$="5"s=-1 i$="9"500 s=-1 f=1 8:"c":0,d:0,-d+480:f::>.73333 *(21-(d/8)),0;">":>.8L (*(21-(d/8))/2),0;"]" s=1 f=1 8:"f":255,d:0,-d+480:f::>.73333 *(21-(d/8)),31;"<":>.8L (*(21-(d/8))/2),31;"[" $@d>502 d<190 sc<500 ƥ>.1}L 1900l L4d=d+(10 d<60<)-(10 d>190) Vsc>500 fi=fi+1:sc=0:21,30;5;0;fi:19,6;" ":20 spaces ` 200 u,15-s;" " d=d+3-(*7) 9u=u+(="6")-(="7")+(u<0)+(1.2 fu<0) (u,15)" "6000p &u,15;(153+(s>0))  fu=fu-.73333-(="7") *fu>0 fu<240 19,6;4;0;e$(sc/25);20,6;2;0;e$(fu/10 );" " b pHu,15;(144+(*5)):f=210 255:OH DEAR! zf  l="A" .05|L,f/5 +f:9 :1:sc=sc+(fi*500) %:2,2;"YOU SCORED ";sc sc>be be=sc #4,2;"BEST SCORE ";be '10 ;"Controls" '" 5,6,7 & 8 :-Cursor keys" '" 0:-Fire"'" 9:-Drop bombs" '" @=Fuel,[]=10 Points,<>=3" "''" Hit any key for a new game" f=1 568 ""20  a="c" f f=1 568 $""20 . a="F" 8f B 6130 ? HIT ENEMY @u,i;(144+(*4)) Jf=1 10 T f:l="A" ^ .003xD,f:f:sc=sc+3 h579:l="A" r u,i;" ": |g=i-s i+s s h=u-(u>0) u+1 >.73333 h,g;"." h:g  #(:INITIALISE #2fu=200:s=1 #<8e$="":20 graphic shift 5's #Fsc=0:fi=0 #Pd=85U:u=2 #Z1:1:0: #d 0: #nbe>0 9120# #x"tot=0:f="A""M"+7 #a:tot=tot+a #f,a #9f:tot9572d% 9 ;"PROGRAM ERROR IN DATAS": # l=5 #p=0 31 #2l=l+1-(*3)+(l<2)-(l>5) #k=1 l #16-k,p;"" #$k:15-l,p;"":p:GRAPHIC L #579:k="A" #p=0 31 #!16,p;6;"":G "M" $p $f=17 21 $;f,0;0;"":f $Vbe<625q 18,1;6;0;"BEST ";3;e$(be/25) %519,0;6;0;"SCORE"'" FUEL" %7:1 % &J62>,90Z,237,75K,118v,92\,33!,0 &K88X,113q,35#,188,200,24,-6,0 &J33!,0,64@,14,32 ,175,126~,31 &L119w,35#,13 ,32 ,249,62>,80P,188 &F32 ,241,201,0,0,0,0,0 &H33!,31,64@,22,0,30,65A,14 &L32 ,175,126~,23,119w,43+,13 ,32 &J249,25,62>,80P,188,40(,3,43+ &F24,235,201,0,0,0,0,0 '0,0,0,0,0,1,63?,255,0,0,0,0,0,128,252,255 '0,255,255,255,255,255,255,255,255,255,255,255,255,255,255,0