ZXTape! 0Created with Ramsoft MakeTZX2SHOCK WAVETQgIT:EOG=0:EGG=0:23658j\,8:U=0:JK=0:WAVE=1:BEEP=.005y# =:0:LINE=0:H(5):H$(5,3):D=15:H(D)=1000:H$(D)="ZX":D !WAVE=1:JK=0:LIV=2:SF=2000:MN=0:TOT=0:LINE=0:LIX=0:COUNT=10 :LI=3:AA=0:S(9 ):INV=0:DIFF=.25~:CH=5:F(9 ):G(9 ):M(9 ):L(9 ):3000 :GY=M(1):GX=L(1) p0:0:0:6::SC=0:HI=0:LI=3:EGG=1EGG=0:95255% $9000(#:1060$:9500%  1000 X6:A=071:.001wn,502-(A*7):ATTR,A:L=SCR:A A=1LI-1:12 +A*2,26;"":A:207,64@:0,-64@:25,0:0,64@:-25,0  BON=0 X=14:Y=21 d6:0,24;"WAVE:";WAVE:1,0;"ALIENS LEFT: ";1,12 ;COUNT-INV:Y,X;6;"" eSCSFLIV=SF/100019,0;"EXTRA";20,1;"SHIP":SF=SF+2000:LI=LI+1:R=120:.01z# =,R:R:LIV=LIV+2:19,0;" ";20,0;" ":10 +LI*2,26;"" n"Q"X<5120x o0,6;SC s2X<17Y,X;" ":X=X-3:Y=Y-3 t2X>15Y,X;" ":X=X-3:Y=Y+3 x"E"X>25130 z4X>12 Y,X;" ":X=X+3:Y=Y-3 }4X<15Y,X;" ":X=X+3:Y=Y+3 [Y,X;6;"":WAVE/14.5h=(WAVE/2)111o,0:26,0 "P"170 (7:135:7:151 <X<3BX=64@:BY=480:CH=1:150 <X<7BX=480:BY=64@:CH=2:150 <X<9 BX=32 :BY=80P:CH=3:150 EX<13 BX=16:BY=12 *8:CH=4:150 DX<15BX=0:BY=14*8:CH=5:150 FX<18BX=-16:BY=12 *8:CH=6:150 >X<21BX=-32 :BY=80P:CH=7:150 >X<24BX=-480:BY=64@:CH=8:150 >X<27BX=-64@:BY=480:CH=9 :150  >BX1=(X+1)*8+4:BY1=175-(Y*8): K=5:1:H=1K:.005y# =,H*5:J=12:BX1,BY1:BX/K,BY/K:J:BX1=BX1+BX/K:BY1=BY1+BY/K:H *6:0:BON1154 CH=UD=021:.01z# =,30:D,0;1;1;"":D:D=1250:D:BOJ=500:INV=COUNT:165 M(CH)1170 O(CH),P(CH);" ":D=10 30:.0125zL,D:D:SC=SC+40(:TOT=TOT+6-(I(CH)):M(CH)=0:I(CH)=0:INV=INV+1 ,INVCOUNT-11300:BON=1 NINVCOUNTINV=0:COUNT=COUNT+1:DIFF=DIFF+.25~:7000X BON1290" 1320( "P"210 135 NCH=U.3,20:O(U),P(U);" ":BOJ=500:INV=COUNT:165  100d "IB=((*9 )+1):(*10 )>7M(B)=0810* ,$A=19 :M(A)=0A -!A>9 A=1:350^ 6GI(A)=I(A)+DIFF:I(A)>7.9|I(A)=0:M(A)=0:850R 7O(A),P(A);I(A);"":A 0,6;SC  100d *I(B)=0:M(B)=1 4 R^AA=A:H=010 1.5@:.001wn,H*5:.001wn,502-(H*5):H VK=O(AA):J=P(AA) WD=110 XK,J;1;"" Y="P"135 ZPCH=AASC=SC+100d:.1}L,502:INV=INV+1:165:CH=AA [(K=K+L(AA)/10 :J=J+S(AA)/10 aK,J;1;"" bD c.K,J;1;"":LI=LI-1:7500L f  0:0:0: *WAVE/2=(WAVE/2)1100L D0,0;"SCORE:";SC;0,10 ;" HIGH:";H(1) 87W,159:a=14:0,-8:8,0:a:0,-8:9 ,0:a=14:0,8:8,0:a:0,8 16,128:a=14:0,-24:24,0:a:0,-23:23,0:0,-1:a=14:0,24:24,0:a:0,24 X1040:a=110 :x,y:x1,y1:1+x,y+1:x1-1,y1-1 :247-x-1,y+1:-x1+1,y1-1:a K15,127,72H,32 ,15,103g,72H,480 J39',103g,568,480,39',79O,568,64@ m63?,79O,40(,64@,63?,557,40(,80P,87W,557,24,80P u87W,31,24,96`,111o,31,8,12 *8,111o,7,8,112p  % 10753 .<a=18:a$:b=07:c:a$+b,c:b:a 3+"a",0,0,0,1,7,7,4,8,"b",16,16,124|,255,255,255,0,0,"c",0,0,0,0,192,192,64@,32 ,"d",24,60<,126~,126~,60<,38&,66B,66B 45"E",126~,126~,60<,255,255,255,60<,24,"F",0,10 ,68D,42*,4,104h,40(,0,"G",144,74J,36$,142,65A,148,35#,32 ,"H",0,33!,100d,0,16,0,177,0 8 MF:0,0;"SCORE:";SC;0,10 ;" HIGH:";H(1) NLA=1100d:*255,*175:A:24,568,5 OA=17:(*248)+3,(*168)+3:3,0:-1,0:0,-1:0,3:A U VM87W,151:32 ,-32 :10 ,0:32 ,32 `15,95_:12 *8,-(12 *8-1):232,95_:-(12 *8),-(12 *8-1) ju119w,119w:-8*K\[S\RDM*8-2*K\[S\RDM,119w:8,-(15*8-2) tdB=151:A=-6-4.25~:87W,B:-9 *8,A*8:B=B+1:A ~dB=151:A=-6-4.25~:160,B:9 *8,A*8:B=B+1:A O15,127:0,-32 :232,127:0,-32  &A=19 :O(A),P(A);" ":A !O(1),P(1);"" " U=1 # (&O(U),P(U);1;"":U=U+1 -/U=10 BOJ=0:INV=COUNT:165 2O(U),P(U);1;"" F 83010 :A=19 :B:L(A)=B:C:S(A)=C:A š6,-8,8,-6,10 ,-4,12 ,-2,14,0,12 ,2,10 ,4,8,6,6,8 83025 :A=13:B:C:F(A)=B:G(A)=C:A <92\,151,100d,143,108l,135 ҐM(9 ):I(9 ):A=19 :M(A)=0:I(A)=0:A:O(9 ):P(9 ):3027 :A=19 :O(A):P(A):A Ӛ2,11 ,3,12 ,4,13 ,5,14,6,15,5,16,4,17,3,18,2,19  tLINE=0:LIX=0 a=1̱A$ IA$(A)="*"LINE=1:LIX=0:LX=X:LY=Y-2:A:6055 (A$(A)="+"LINE=2:A:6055 %b=(a$(a))-65A:b=b+6100 LINE=1LIX=LIX+1 A$(A)" "BEEP,30 b 4x=x+16:X>240X=0:Y=Y-16 a 5LINE=2LX,LY:(LIX*16)-2,0  LX+5,Y+1:2,0:0,-1:-2,0: tX,Y:0,12 :12 ,0:0,-12 :-12 ,0:0,2:12 ,8: WX+4,Y:4,0:-2,0:0,12 :-2,-2: jX+12 ,Y:-12 ,0:0,6:12 ,0:0,6:-12 ,0: rX,Y:12 ,0:0,6:-10 ,0:8,0:0,6:-10 ,0: [X,Y+12 :0,-8:12 ,0:X+6,Y+8:0,-8: ȃX,Y:10 ,0:2,2:0,2:-2,2:-10 ,0:0,6:12 ,0: jX,Y+6:12 ,0:0,-6:-12 ,0:0,12 :12 ,0: GX,Y+12 :12 ,0:-6,-6:0,-6: tX,Y:0,12 :12 ,0:0,-12 :-12 ,0:0,6:12 ,0: YX+12 ,Y:0,12 :-12 ,0:0,-6:12 ,0: ͖X+5,Y+8:2,0:0,-1:-2,0:X+5,Y+4:2,0:0,-1:-2,0: ҇X,Y+10 :0,2:12 ,0:0,-4:-6,0:0,-4:X+6,Y:0,1: bx,y:0,12 :12 ,0:0,-12 :0,6:-12 ,0: x,y:0,12 :10 ,0:2,-2:0,-2:-2,-2:2,-2:0,-2:-2,-2:-10 ,0:0,6:10 ,0: ix+12 ,y:-10 ,0:-2,2:0,8:2,2:10 ,0: ux,y:0,12 :10 ,0:2,-2:0,-8:-2,-2:-10 ,0: zx+12 ,y:-12 ,0:0,6:8,0:-8,0:0,6:12 ,0: ^X,Y:0,6:8,0:-8,0:0,6:12 ,0: tX+12 ,Y+12 :-12 ,0:0,-12 :12 ,0:0,6:-6,0: aX,Y:0,12 :0,-6:12 ,0:0,6:0,-12 : gX+2,Y:8,0:-4,0:0,12 :-4,0:8,0: ~X,Y+12 :12 ,0:-4,0:0,-10 :-2,-2:-4,0:-2,2: bX,Y:0,12 :0,-8:12 ,8:-6,-4:6,-8: 5X,Y+12 :0,-12 :12 ,0: OX,Y:0,12 :6,-6:6,6:0,-12 : ?X,Y:0,12 :12 ,-12 :0,12 : QX,Y:0,12 :12 ,0:0,-12 :-12 ,0: PX,Y:0,12 :12 ,0:0,-6:-12 ,0: xX,Y:0,12 :12 ,0:0,-12 :-12 ,0:X+5,Y+3:5,-5: sX,Y:0,12 :12 ,0:0,-6:-12 ,0:4,0:8,-6: `X,Y:12 ,0:0,6:-12 ,0:0,6:12 ,0: EX+6,Y:0,12 :-6,0:12 ,0: GX,Y+12 :0,-12 :12 ,0:0,12 : VX,Y+12 :0,-6:6,-6:6,6:0,6: Y:X,Y+12 :0,-12 :6,6:6,-6:0,12 : <X,Y:12 ,12 :X,Y+12 :12 ,-12 : VX,Y+12 :6,-6:0,-6:0,6:6,6: IX,Y+12 :12 ,0:-12 ,-12 :12 ,0: XU=0:BON=0 Z0WAVE=(COUNT-9 ):WAVE67008` AVE=67::BEEP=.3:X=0:Y=80P:A$=" SUPER BONUS ":6000p:A=96`:B=76L:A1=1:B1=1 \0,A:255,0:0,B:255,0:A=A+A1:.05|L,(A/2)-90Z:B=B-B1:A1=A1+1:B1=B1+1:A>1757006^ ] 7004\ ^6:BEEP=.009ztj:B=19 :A=17:ATTR,A:.04|# =,(A*2)+5:L=SCR:A:A=62-1:ATTR,A:L=SCR:B `:EOW=0:X=0:Y=160:A$=" *WAVE COMPLETED+":6000p:X=0:Y=128:A$="SCORE:":6000p:V=(SC):X=120x+((4-V)*16):A$=SC:6000p bX=0:Y=112p:A$="BONUS:":6000p:V=((TOT*10 )):X=120x+((4-V)*16):A$=(TOT*10 ):6000p:SC=SC+(TOT*10 ):TOT=0 lSC=SC+(TOT*10 ):X=0:Y=96`:A$="TOTAL:":6000p:V=(SC):X=120x+((4-V)*16):A$=SC:6000p q WAVE=6X=0:SC=SC+1000:Y=72H:A$=" *SUPER BONUS+ 1000 POINTS ":6000p:9 ,12 ;" ";8,12 ;" ":V=(SC):X=120x-((4-V)*16):Y=96`:A$=SC:6000p r\BOJ=50013 ,0;" ":X=0:Y=568:A$=" MOTHER SHIP DESTROYED ":6000p:SC=SC+500:9 ,12 ;" ";8,12 ;" ":A$=SC:V=A$:X=120x+((4-V)*16):Y=96`:6000p:BOJ=0 vLX=0:Y=24:A$="HIT ANY KEY FOR ATTACK WAVE "+WAVE:6000p yM(9 ):I(9 ) { 7040 |""5 } 7035{ 6A=17:B=12:ATTR,A:L=SCR B:A:B=13:B ?A=61-1:B=12:ATTR,A:L=SCR B:A:B=12:B  LI=08000@ 2A=19 :I(A)=0:M(A)=0:A JK=1JK=0:  7050 B MZA=19 :M(A)=0:I(A)=0:O(A),P(A);" ":A:LI=07506R NA$="SHIP DESTROYED ":D=1:B=1:A=1̱A$:.01z# =,(*5)-12 :Y,X+(*3);(((*3))+149):21,21-A;A$(DA) O;21-A<7B=B+1:D=D+1:A=A-1 PB=16Y,X;" ":A=12 +LI*220.5:A,26;" ";A+1,26;"":A:A=2514-1:21,A;" ":B=12:B:A:7 QA:A=1:7 R?:X=0:Y=160:A$=" *SHIP DESTROYED+ ":6000p S:X=0:Y=128:A$="SHIPS LEFT:"+LI:6000p V5X=0:Y=112p:A$="SCORE:"+SC:6000p `<X=0:Y=96`:A$="ATTACK WAVE:"+WAVE:6000p jVLI=0EOG=1:X=0:Y=64@:A$="*G A M E O V E R+ ":6000p t:X=0:Y=24:A$=" HIT ANY KEY ":6000p ~CLI>0X=0:Y=8:A$=" TO CONTINUE..":6000p $A=19 :I(A)=0:A '7040:""EOG=05 ""EOG=18005E  7560  B=1614+LI*2,26;" ":A=2214-1:21,A;" ":B=110 :B:A: EJ$="" J-A=15:SC>H(A)C=A:8100 TA:85004! m 5 `E=1:EGG=E::X=0:Y=160:A$="YOUR SCORE WAS RANKED NUMBER "+C:6000p ID=5C+1-1:H(D)=H(D-1):H$(D)=H$(D-1):D  H(C)=SC X=0:Y=128:A$="USE KEYS Q AND ETO CHANGE LETTER AND P TO ENTER YOUR INITIALS. PRESS THE SPACE KEY FOR A SPACE":6000p jH$(C)="AAA":112p,22:16*3,0:A$="AAA":X=112p:Y=24:6000p ="Q"ƯH$(C,E)>"A"H$(C,E)=((H$(C,E))-1):18,12 +E*2;" ";17,12 +E*2;" ":A$=H$(C,E):X=96`+E*16:Y=24:6000p =" "H$(C,E)=" ":18,12 +E*2;" ";17,12 +E*2;" ":A$=H$(C,E):X=96`+E*16:Y=24:6000p ´="E"ƯH$(C,E)<"Z"H$(C,E)=((H$(C,E))+1):18,12 +E*2;" ";17,12 +E*2;" ":A$=H$(C,E):X=96`+E*16:Y=24:6000p h94^+E*16,22:16,0:0,16:-16,0:0,-16 ̼="P"J$"P"J$="":.1}L,10 :1:94^+E*16,22:0,16:16,0:0,-16:0:E=E+1:E=485004!:2 J$=  8120 !>>:X=0:Y=160:A$=" *HIGH SCORES+ ":6000 p !HyY1=128:F=15:X=0:Y=Y1:A$=F+". "+H(F):6000p:X=184:Y=Y1:A$=H$(F):6000p !RY1=Y1-16:F !W/21,3;"PRESS ANY KEY TO CONTINUE" !X 7040 !\""EGG=1:2 !f 8536X! #) 9020<# #2+A=118:B:A+64999,B:A #<62>,0,17,0,88X,6,24,197,6,32 ,18,19,16,252,193,16,246,201 #F%SCR=65000:ATTR=SCR+1: %):QW=0:D=042 %&>X=D:Y=130+D/2:A$=" S H O C K":6000p:D %+XD=042:X=D:Y=110n+D/2:A$=" W A V E":6000p:D %,D10 ,7;"By Paul & Craig";11 ,14;"Johnston." %- 21,4;1;1;"IMPULSE SOFTWARE  1983":QW=QW+1:.0625|,11 :.0625|,14:.0625|,14:.0625|,14:QW>25Ŧ""9519/% %. 9517-% %/NCP=0:HS=1 %0%85004!:NCP=195255% %1 9500% %5HS=0: %::X=0:Y=108l:A$="1. INSTRUCTIONS":6000p %D1X=0:Y=76L:A$="2. PLAY":6000p %I9X=10 :Y=20:A$="HIT KEY 1 OR 2":6000p %N#B=17:ATTR,B:L=SCR %[="1"9700% %]="2"5 %bB %l,B=71-1:ATTR,B:L=SCR %p="1"9700% %r="2"5 %tB %v 9550N% %J=19:G=1:9720%::F=032:X=F:Y=160+F:A$=" S H O C K":6000p:X=F:Y=130+F:A$=" W A V E":6000p:F %7C=7J:A$:A$="PRESS A KEY"A$="PRESS ANY KEY" %yC,0;" ";C,0;A$:C:21,9 ;"PRESS ANY KEY":0:G=G+1 %HG=518,0;" ":J=22 %3G=5J=719:J,0;" ":J:X=502:Y=70F:A$="GOOD LUCK":6000p:200,70F:200,75K:0,7:16,5;"PRESS ANY KEY TO PLAY":21,4;1;"IMPULSE SOFTWARE  1983":0::5 % 9710% %f"YOUR MISSION IS TO DESTROY AS ","MANY ALIENS AS POSSIBLE BEFORE","ALL YOUR OWN SHIPS HAVE BEEN HIT" &s" YOUR SHIP () MOVES ALONG THE","END OF THE TRENCH AND FIRES","DOWN IT TO THE ALIENS ( ) IN","THE DISTANCE." & " THE ALIENS WILL CHANGE THROUGH","PROGRESSIVELY BRIGHTER COLOURS","(AS SHOWN ON YOUR KEYBOARD ON","KEYS 1-9).WHEN THEY REACH WHITE","THEY WILL ADVANCE TOWARDS YOU","DOWN THE TRENCH."," " &" IN ATTACK WAVE 1, TEN ALIENS ","ARE AGAINST YOU BUT AS YOU","PROGRESS ON TO HARDER WAVES ","THE AMOUNT OF ALIENS NEEDED TO","BE HIT TO CLEAR A WAVE WILL","INCREASE.ALSO, THE ALIENS WILL","BEGIN TO CHANGE COLOUR FASTER."," "," "," "," "," " & " S C O R I N G "," EACH ALIEN IS WORTH 40 POINTS","WHEN HIT BUT AT THE END OF THE","WAVE A BONUS IS AWARDED.THE SIZE","OF THE BONUS DEPENDS ON THE ","COLOUR OF THE ALIENS WHEN YOU ","HIT THEM.BRIGHTER=MORE POINTS!" &*+" BEWARE:IF AN ALIEN ADVANCES ","DOWN THE TRENCH,YOU WILL NOT GET ANY","BONUS FOR IT ALTHOUGH YOU WILL","GET 100 POINTS WHEN YOU HIT IT."," "," ","WHILE AN ALIEN IS MOVING DOWN","THE TRENCH YOU CANNOT MOVE,SO","IF YOU AREN'T IN THE SAME","CHANNEL AS THE ALIEN YOU WILL ","NOT BE ABLE TO HIT IT." &49" TWO OTHER BONUS'S CAN BE GAINED","FOR GOOD PLAY.A ""SUPER BONUS""","IS AWARDED IF YOU CLEAR ATTACK","WAVE 5,AND ANOTHER BONUS OF 500","POINTS IF YOU DESTROY THE ENEMY","MOTHER SHIP AT THE END OF EACH","WAVE.CONTROLS ARE:-"," Q-LEFT E-RIGHT & P-FIRE."," "," "," "," "," "," "," "," "," "," "," "," "," "," " oguaveey# =inZX ZX ZX ZX ZX %ioioun 0 nif~0 \dl0 0    .c0 0 0 0 cttxByA S H O C K