ZXTape! 0Created with Ramsoft MakeTZXTOR [4>!@HT]#= >!_HT]+= 444444444444444444444444444444444444444444 Ipr=6+23635S\+256*23636T\:prl=pr:prr=pr+23  1  5000 i=118:p$ j=07:a  p$+j,a j:i %sc=0:sh=0:to=20 b$(2,2) t$=155 b$(1,1)=158:b$(1,2)=159:b$(2,1)=160:b$(2,2)=161 #'k$=" " ' 100d )r.005y# =,20:pau=1h=p:.001wn,7:line,cl1;" ":a1=a1+1:a1=33!200 *=.005y# =,20:pau=pau-1:pau=0pau=pau1 +.005y# =,20: d 1000:0:200 e%pau1=(*3+1):pau=pau1 f02000:a1=1:to05500| g!dir=:dir.5di=1 hdir>.5di=0 i#line=(*4+1)+7 jS23764\,32 *(line-8):23787\,31+32 *(line-8) nNp=prr:cl1=0:cl=0:di=1cl=26:cl1=31:p=prl x line,cl;s$  101e ?.005y# =,20:40(:900:40(:250 a$="":a$=:a$="" to=to-1:3500 : y0,0;:i=07:r1=(*32 +1):r2=(*32 +1):l$=k$:l$(r1)="*":l$(r2)="*" 0;2;l$:i -i=811 :5;0;k$:i i=12 21:r1=(*30+1):r2=(*30+1):l$=k$:l$(r1r1+1)="/\":l$(r2r2+1)="/\" 5;7;l$:i 5:6;1;19,13 ;" ":6;1;20,13 ;" ":6;1;21,13 ;"" $ 4;20,15;t$ . r1=(*10 ) 21004+r1 4Is$=153+144+145+146+154:sz=1: 5Is$=153+148+149+150+154:sz=1: 63s$=153+146+154:sz=1: 7)s$=156+157:sz=20: 8>s$=153+151+152+154:sz=5: 9>s$=153+144+145+154:sz=5: :4s$=153+149+154:sz=10 : ;)s$=153+154:sz=20: <4s$=153+144+154:sz=10 : =4s$=158+149+159:sz=10 : D=LINE:AC=15 Q=LINE5-1 1W=*20-10 20:.005y# =,W:W T7;Q,AC;160+161:6;Q-1,AC;158+159 1W=*20-10 20:.005y# =,W:W 20;Q,AC;" ":0;Q-1,AC;" " Q: 20,15;" " 2f=198-1:.01z# =,-10 40( 0;f,15;t$ -(f-1,15)=32 3560 -(f-1,15)=47/3560 -(f-1,15)=92\3560 4000 f,15;" " f 'E=-10 02:40( e6;5;7,12 ;" .:. ":1;6;2;6,13 ;" ' " .005y# =,E f2;0;7,12 ;" * ":0;2;0;6,13 ;" *" 2R=15-5-1:.005y# =,R:R:E  *1:sh=sh+1:sc=sc+sz*5 ?x=15*8+5:y=(21-line)*8+4 [6:2:j=120:x,y:x1=*20-10 :y1=*20-10 !.005y# =,j:g=12 >.01z# =,g+j:1;x1,y1:.01z# =,g*j:1;x1,y1 g:j:3000  0  1000 5:0  101e :6:0:4 a$=" TORPEDO SHOOT ____________ BY J.W.V.SOFTWARE. FOR THE SPECTRUM A GREAT GAME FROM A GREAT FIRM ________________________________" a$=a$+" YOU HAVE GOT 20 TORPEDOES TO FIRE IN ORDER TO GET THE HIGHEST POSSIBLE SCORE. HIT ANY KEY TO FIRE GOOD LUCK " 0ln=0:cl=0:x=120x:y=0 i=1̱a$:x,y V.01z# =,2:1;2;cl*8-115s,(21-ln)*8:x,y Q.01z# =,7:1;2;cl*8-115s,(21-ln)*8 ln,cl;a$(i) 7cl=cl+1:cl=32 cl=0:ln=ln+1 i 200:: |/:I=125:*7:.005y# =,I !ڥ*7:ۺ(*1+1) .005y# =,I::I &0:3:6:0: SA$=" ALL TORPEDOES FIRED NOW ":5010 &0:3:6:0: .5,7:.3,9 :.3,2:.5,-6:.3,9 :.3,2:.8L,20:.8L,19:5,4 S"YOU HIT ";SH;" SHIPS":"YOU SCORED ";SC;" POINTS":,,,,"TRY AGAIN? INPUT Y OR N" Z$:Z$="Y"21 "PLAY ME AGAIN SOON" 2I=07:I:I:.1}L,1::I: p"TOR" z4"Input any key to start":a$:a$="jwv"6000p  #(J"a",0,4,15,2,225,177,255,255,"b",0,16,1110008,0,255,177,255,255,"c",2,20,01111100|,01111110~,255,177,255,255,"d",0,0,0,0,255,177,255,255 #)"e",0,62>,6,31,255,177,255,255,"f",32 ,36$,01111110~,11101010,255,177,255,255,"g",0,62>,480,568,255,177,255,255 #*M"h",0,0,60<,12 ,255,177,255,255,"i",0,0,60<,480,255,177,255,255,"j",0,0,0,0,255,01110111w,00111111?,00011111,"k",0,0,0,0,255,254,252,11111000 #+"l",8,28,20,20,62>,65A,162,69E,"m",0,7,1,1,7,31,31,31,"n",0,224,128,128,224,248,248,248 #,="o",0,3,63?,127,255,127,513,3,"p",0,192,252,254,255,254,513,192,"q",3,3,3,3,7,15,0,0,"r",192,192,192,192,192,224,240,0,0 Ajwv