Shark CstlwKiller Shark Castle aka.Dragon Attack by Shaun Ward from Sinclair User, Sep'83 ] This program needs Issue 2 emulation because of itsuse of IN to scan k/bd. [JimG] 5734225510 ,0;1;" Please set Issue 2 emulation before proceeding ":0::5: Added by JimG. 0z=23:sc=0:sh=0:lv=3 5020:1000 Bn=142-1:y=y+1:i;x,y-1;" " (Ti;n,lr+1;"|";n+1,lr+1;" ":.004yn,n:.005y# =,n+5 2_y>16y=0:x,16;" ":z=z+1:12 ,z;" ":z=31250 7((n-1,lr+1)" "170 <n:2,lr+1;" " F Pgn=1921:16,lr;" ";5;1;n,lr;"";n-1,lr;" ":.5,-n:n Zez=23::1:1:n=021:ڥ*5+1:n,0,,:.01z# =,n:n d9 ;7,12 ;"SCORE:";9 ,12 ;"LIVES:";11 ,12 ;"SHEETS:";7,18;sc;9 ,18;lv;11 ,19;sh n,0:0:n=1500:n: x9n=116:y=y+1:i;x,y-1;" " *y>16y=0:x,16;" " i;x,y-1;"***":.1}L,x:i;x-1,y;"*":.1}L,-x:x,y-1;" ";x-1,y;" ":y=0:sc=sc+10 x+1,lr+1;" " x=x-1:3040 Ȓ16,lr+1;" ":n=1921:1;n,lr;6;"";n-1,lr;1;" ":.5,-n:n:1;21,lr;" " lv=00  8n=1922:.3,n:17,n;i;"":n ca$="YOUR CASTLE HAS HAD IT":n=1̱a$:٥*5+1;16,n;a$(nn):.1}L,n:n @lv=lv-1:sh=sh+1:90Z:z=23:2040  x=144 /n=07:a:x+n,a:n:x=x+1 x>1492040  1010 M64@,229,255,127,63?,96`,64@,160 $N16,104h,252,214,139,196,32 ,80P .I28,28,8,252,10 ,13 ,10 ,24 Q255,129,153,157,255,255,255,255 K24,24,31,480,480,72H,136,204 Q255,129,129,129,129,129,129,255 lv<14050 #sh=sh+1:0:0:  Pn=1721:3;n,0;"":.01z# =,n:n Gn=1721:3;n,23;"":.01z# =,n:n  a=2431:n=167-1:5;n,a;"":n:.01z# =,a:a:6,23;5;"";5,22;"" *5;4,21;" ";3,21;6;" ";2,21;" ";2,20;2;5;1;"" An=1821:1;n,19;"":.5,n:n Y٥*5+1;9 ;1;0,0;" KILLER-SHARK CASTLE " y=1 lr=4 0x=(*9 +2):i=(*5+1) z>30250 12 ,z;" " Dlr=lr+(57342=254lr<1)-(57342=253) 2lr>18lv=lv-1:80P:2040 5;16,lr;" " pi;x,y;5;" ":.002xn,x:Should something print after x,y? - otherwise i is redundant.   y=y+1 Cy>16y=0:z=z+1:x,16;" ":3040 "65022=25430 +i;9 ;17,0;"SCORE:";sc  3050 /5:0: L0,0;٥*5;"SCORE:";sc;0,13 ;"HIGH-SCORE:";hs D10 ,7;1;٥*5;9 ;"ANOTHER GO? (Y/N)" 7="y"sh=0:sc=0:lv=3:2045  ="n" .01z# =,(*502)  4080 1:1: 1;2;5;0,0;"";21,0;"" _n=120:1;2;0;n,0;"";n,31;"":.01z# =,n:n H1;3;6;2,4;"WELCOME TO SHARK CASTLE." `3;4,1;"YOU MUST STOP THE DRAGONS FROM";5,1;2;"DESTROYING YOUR CASTLES.";6,1;3;"YOU DO THIS BY FIRING AT THEM.";7,1;4;"IF YOU FALL IN THE MOAT,OR ALL";8,1;5;"YOUR BRICKS ARE TAKEN THEN YOU";9 ,1;6;1;"LOSE A LIFE";0;"." ΐ0;5;11 ,10 ;1;"CONTROLS:-";13 ,5;"LEFT=O";13 ,19;"RIGHT=P";15,12 ;"FIRE=A" D2;6;1;18,6;"PRESS ENTER TO PLAY" .01z# =,(*10 ) =13 .01z# =,(*40()  5085