?PG$"Z A P ":AU$"BY TOM MARAZITA AND BRIAN SAWYER":JF1\ ZAP -- BY TOM MARAZITAb: COPYRIGHT (C) 1983 THE CODE WORKS BOX 6905, SANTA BARBARA, CA 93160: AS OF 9/1/83 GFZ 62000 dMX255: WM(MX),A(MX):BS0:QI256" e JD(15): I0 15: JD(I):X f J(X)JD((JSX) 15): B(X)((JSX) 16)0 g 7000: 4000: 0,0,0,0,0,3,9,6,0,1,7,4,0,2,8,5 nEL18:HP0:TP0:WI2:LMMXWI:AL0:CA0:H0:TC0:SC0:K0:Q0:KN0 o 1000 x 51147,(5G)3 } "": 51165G 251,190: 252,7:WM(HP)PO:HPHP1:ALAL1:S1:LN10:K0:NT0{ 1001,216: 51061,10: N50000 50555: N,0: XWD1 WD22: CRTX,100: CMX,1: XWD2 WD23 WD: CRTX,103: CMX,1: XWD241 WD252: CRTX,99: CMX,1:? XWD241 WD31 WD: CRTX,101: CMX,1: CRTWD,96: CRTWD39,96: CRTWD24,96: CRTWD2439,96 "" 31) "LEVEL=" G 900 380 A$: A$"Q" 650 F 51003: DL1 (5G)30: GZ(999): Z42 550: 350 H Z32 5906 I NT0 (1).93 326R ^ K4 (1)G10 230m h K9 (1).85 405 |KK1:KNKN1:NTNT1 A(K)(1)9041104: (A(K))32 390  A(K),42: 230  K0 380 Z((1)K)1  IF PEEK(A(Z))<>42 THEN 4404  (A(Z))42 A(Z)A(K):KK1: 440J  (1)NT9 230` NTNT1: A(Z),32z A(Z)A(K):KK1: 230 & SID18,33:NTNT1 0SCSC(LN1.6):QQ1 5SS1: ((251)(252)256),81:LNLN2: LN127 LN127 7 51061,LN: ELLM ELELWI!: 900: SID18,16'D3NCACA1EX CSL LCSNbCS0bgEL18:HP0:AL0khTP0lCV0: SID4,129: SID11,0qPO(251)(252)256{ T1 8: X1 100:: SID4,128: PO,209: X11 100|: PO,81:: SID24,0: 1000~ CA6 650 1203 SCBS BSSCT "YOUR SCORE IS" SC "YOU HIT";((QKN)100);"% OF THE TARGETS" "HIGHEST SCORE SO FAR:";BS: 3500 YN 110: "SCORE=" SC;13);"CRASHES LEFT=" 5CA I0 28: SIDI,0: I+L CRASH;V SID6,250I` SID1,2T BELLd SID15,64u SID20,250 TURN SID12,80( SID13,2402 SID8,12x SID24,15 T(VIC17): VIC17,0:TT1 VIC33,7: "" VIC33,0: VIC17,T % NO0L TM0:SW1: "TRY AGAIN?YES NO"_ TITM 3550 11NO4);("",SW,1);("YESNO",3NO1,3);"" SW3SW:TMTI15 JD(JS) 31:JB(JD16):JDJD 15 JB JD15 3600 (JD 8)0 NO0 NO1: 35106 (JD 4)0 NO1 NO0: 3510A 3520z 11NO4);"";("YESNO",3NO1,3);"":YN(NO0): "SETTING UP..." N51000 52000: A: A999  N,A:X "PICK A SKILL LEVEL:":b I1 5: I;: I::G1:T1:TM0PlXG: TITM 3G3);("",T,1);"";G:T3T:TMTI10nv J(0)4 G1 GG1 J(0)6 G5 GG1 XG 3X3);"";X:T1:TM0 B(0)0 7020 "":Pà 32,202,199,32,155,199,173,233,3,201,128,16,14,24,101,251,133YZà 251,165,252,105,0,133,252,24,144,9,24,101,251,133,251,176,2dà 198,252,160,0,177,251,141,231,3,169,81,145,251,32,137,199,165nà 251,141,80,195,165,252,141,124,196,162,10,189,80,195,133,253,189'xà 124,196,133,254,240,6,169,32,160,0,145,253,96,162,250,189,79mà 195,157,80,195,189,123,196,157,124,196,202,208,241,96,162,0,173à 0,220,74,176,2,162,1,74,176,2,162,2,142,234,3,74,176à 7,168,138,24,105,3,170,152,74,176,5,138,24,105,6,170,224'à 0,240,6,189,212,199,141,233,3,96,169,0,24,101,162,197,162ià 208,252,96,1,216,40,255,215,39,1,217,41,169,216,133,254,169à 80,133,253,162,22,160,38,152,41,3,142,237,3,170,189,10,200à 145,253,174,237,3,136,208,238,165,253,24,105,40,133,253,144,2à 230,254,202,208,222,96,7,7,7,7,9998`IN$" ":ZTTI:ZC2:ZD$(20)Rj Z$: Z$"" 60070t ZTTI (" ",ZC,1);"";:ZC3ZC:ZTTI15~ 60010Z(Z$):ZL(IN$): (Z 127)32 " ";: 60110 ZLQI 60010IN$IN$Z$: Z$;ZD$;Z$; Z13 IN$(IN$,2): CR$;:O Z20 ZL1 IN$(IN$,ZL1): "";: 60010 Z141 Z$(20(ZL1)): Z2 ZL: Z$;:: 60000 60010HCRT1024:VIC53248:WD40:CR$(13):SID54272:JS56320:CM55296RQL214:QI254:%0 61000: VIC32,0: VIC33,0:LN(PG$):TB(40LN)2V: ""TB)(" ",LN)D ""TB)PG$: "" TB)(" ",LN)N ""(40(AU$))2)AU$XMS$"HIT RETURN TO BEGIN": JF MS$"HIT JOYSTICK BUTTON TO BEGIN" bTB((40 (MS$))2)Ol "" TB)MS$: " (C) 1983 THE CODE WORKS"kv IN$: IN$"" 62120 ((JS) 16)0 62120 "" TB)("",K1)(MS$,Q)QQ1: Q(MS$) Q0:K1K 62070: "": 61000: 100