RT NEEDED SUPPLIES. YOUR MISSION: BLAZE THE TRAIL!":" YOU WILL PLOT A COURSE THROUGHASTEROID BELTS USING YOUR LASER"9M"CANNONS WHERE NEEDED, NEUTRALIZEFORCE FIELDS BY FIRING AT THE GENERATORS, POSITION ALL OF THE ELEVATORS IN THE SPACE CANAL, BURN A TUNNEL THROUGH SOLID STONE, AND FIX THE DEADLY SLIDING GAPS."9o:"HIT FOR MORE...";9zA$:::" ALWAYS PRESS THE RED BUTTON IN YOUR FIGHTER TO CONTINUE YOURTREK. MOVE YOUR CONTROLLER TO THE RIGHT TO EXIT THE ELEVATORS.": 5ROUGH SOLID STONE, AND FIX THE DEADLY SLIDING GAPS."9o:"HIT FOR MORE...";9zA$:::" ALWAYS PRESS THE RED BUTTON IN YOUR FIGHTER TO CONTINUE YOURTREK. MOVE YOUR CONTROLLER TO THE RIGHT TO EXIT THE ELEVAT &9:COPYRIGHT(C) 1984 CLOAD PUBLICATIONS INC.& X1000 1012: A: X,A:X: 360,3: 361,232: 1003,32: 52,16,142,0,1,189,167,211,53,16,126,130,115&:1003,0::POKE 1003,0 TO SPEED UP PRINTING TH NORMAL' "INSTRUCTIONS";A$: (A$,1)"Y" 1000'D:"SKILL LEVEL (1 TO 50, 1=HARDEST):";SL'i SL1 SL1 : SL50 SL50' D(30),A(11),E(11),F(11),C(30)' BO1:3,1:1:1,1' :"T1L4V15(y(0,94)(6,94),:(0,98)(6,98),:(2,96)(12,96),:(4,95)(4,97),:(10,95)(10,97),:I1120SL2:((255)20,(191)),(7),3::(0,94)(12,98),A,G:(0,94)(12,98),A,:(0,94)(12,98),E,G((0,94)(12,98),A,:"T5O3CEGO4L2CL4O3AL6C((0,0)(6,4),,BF:(13,90)(43,100),,BF(((0,0)(6,4),E:(0,0)(4,2),F,G)2X0:Y96: ((65280) 1)1 50)I7KLINGONS (SMALL GREEN BLIP) ,ENTERPRISE (SMALL YELLOW BLIP),KLGN BASE (LARGE GREEN BLIP) ,FED BASE (LARGE YELLOW BLIP),NO ENERGY (LARGE RED BLIP) ,P,,REFER TO THE UPPER RIGHT OF,THE SCREEN TO THE zone panel,,>8A FEDERATION BASE IS DISPLAYED,AS WELL AS THE enterprise AND,ENERGY SCANS OF QUADRANTS,AROUND THE enterprise,S?j9CONDITION INDICATOR WILL BE ...,,BLUE (ALL SECURE) ,YELLOW (ENERGY LOW-NO lres) ,RED (HOSTILE IN QUADRANT) ,,INSIDE THE CONDITION INDICATOR,WILL BE EITHER THE LETTER k OR,THE LETTER j DEPENDING ON MODE.,?:REFER TO THE BOTTOM CENTER OF,SCREEN TO THE CONDITION,INDICATOR POSITION. THE,CONDITION IS blue AND MODE IS k,S@;THE BAR INDICATORS REPRESENT THE,WEAPONS AND ENERGY STATUS AS,FOLLOWS ...,,ebar (SHIPS ENERGY LEVEL) ,tbar (TORPEDOS REMAINING) ,pbar (PHASER SETTING) ,qbar (QUADRANT ENERGY) ,qbar DOES'NT INCLUDE enterpriseA<,,REFER TO BOTTOM RIGHT OF SCREEN,FOR THE POSITION OF THE BARS.,S,,,,THE NUMBER OF FEDERATION BASES,REMAINING WILL BE DISPLAYED ON,THE ACTIVE BASE INDICATOR.,,,REFER TO SCREEN ABOVE THE BARS,FOR THE POSITION OF THE ACTIVEB^=BASE INDICATOR. THE INDICATOR,SHOWS 5 BASES REMAINING.,S,,,THE %lres BARS ARE USED TO,REPRESENT HOW FAR AWAY FROM THE,enterprise THE lres WILL,DETECT ENERGY MOVEMENT.B>,,REFER TO SCREEN ON EITHER SIDE,OF THE CONDITION INDICATOR FOR,THE POSITION OF %lres BARS.,%lres BARS ARE NOW MAXIMUM.,S,C?,THE SKILL LEVEL IS AUTOMATIC,THE BETTER YOU GET THE HARDER,THE ENCOUNTERS BECOME.,,,YOU ARE AWARDED ONE POINT FOR,EACH KILLED KLINGON AND YOU ARE,AWARDED POINTS FOR THE KLINGON,BASE. THE POINT VALUE IS,DETERMINED BY YOUR SKILL LEVEL.,PD@- COMMAND SUMMARY -,,PRESSING ...,,p .......ARMS PHASERS,t .......ARMS TORPEDOS,1 TO 9 ....ADJUST PHASER.,k ....USING ARROW KEYS,j .USING LEFT JOYSTICK,,PRESSING EITHER THE LEFT BUTTON,OR THE SPACE BAR WILL FIRE THEEAACTIVE WEAPON DEPENDING ON THE,MODE YOU ARE USING (j OR k).,P,... WARNING ....,,BREAKING THE GAME DURING GAME,PLAY IS CONSIDERED CHEATING AND,WILL RESULT IN A ?FC ERROR IF,YOU ATTEMPT TO RESUME PLAY.,,,,,"TYPE 'R' TO REVIEW INSTRUCTIONS"EB,,,"OR 'L' TO LOAD 'COCOSTREK'.",E6UE,MODE YOU ARE USING (j OR k).,P,... WARNING ..&: COCOSTREK INSTRUCTIONS&6: BY RUDE SYSTEMS&Y: (C) CLOAD PUBLICATIONS 1984&g 70:15&oI$&I$"E"11:I$"P"I$"S"F1:(32(I$))2)I$:5&:@480," <>";'"T8V20O5L8V-GV-GV-GV-GV-GV-GV-GV-GV-GV-GV-GV-GV-G'. ""9:F F0:1:8'8 :5'B I$' I$:I$"R":X019:L$(X):::5:I$"L":"NOW 'CLOAD' AND 'RUN' 'COCOSTRK'"::12' (2,137)(182,168),,BF(S2S210:N1(I$):D$"BM"(S1)","(S2)L$(((I$,N,1))65):D$:S1S114::(4:3,1:3,1::1,0:L$(19),E(5):N019:L$(N):::I$"ORPPIKK":S147:S2136:13:I$"GLH":S175:14:I$"HIKMRJP":S147:14:4)[(0,0)(184,132),,B:(0,173)(184,191),,B:(190,0)(255,60),,B:(0,136)(184,169),,B:3:(190,191)(255,72),,B:B$"D8R3FR4NDR4ER3U8L3HL4NUL4GL3":C$"T":S$"O3L4CDFAEL8GGL4FEFDEL2C)"BM204,182L8D3NR4D3R8BU6BR6R4NR4D6BR12U6R7FDGL4BR12U2ER5FD4GNH2NFL5HU":(78,175)(106,189),,BF:(88,177)(98,187),,BF:"BM91,178D5NE5U3NF6D6*?(214,75)(231,87),,BF:(223,81),5,2,.5:(223,81),2:(214,75)(231,87),E,G*fI$"NOIPILQSTTT":S123:S2146:13*(212,179)(216,92),,BF*2:(228,179)(232,130),,BF*(198,179)(202,75),,BF:3*(4,175)(74,189),,BF:(110,175)(180,189),,BF+v(2,1)(182,131),,BF:(192,1)(252,59),,BF:(210,73)(235,89),,BF:"C2BM214,77XB$;":(224,83),,2:"C4BM218,78XL$(3);"+BX(4)2:BY(4)2+2:X1BX6194:Y1BY65:(X1,Y1)(X12,Y1),,5IBX1BX1:JBY1BY1:C(IBX JBY)2:XI6194:YJ62:(X,Y,C):(X2,Y,C):(X,Y1,C):(X2,Y1,C):J,I,g"C2BM74,55XB$;":(82,59):"C4BM78,56XL$(1);",3:S1190:S253:I$"ABFEC":14:(2,137)(182,168),,BF- "C2BM40,145E2UHL11GLG16D2RFRFR19BR4BU6E8R5F2DG7LGL5HU2BR16E7RER5F2G2BG5GLGL5HU2BR16E8R5F2DG7LGL5HU-"BM108,145E2UHL7GLG8DRFR7F2G7LGNL56BR25BU15G5NR4NL6G8DRFR3NEBR8NL2NR2E10NL2R6F2BR4BD2R10E2H2L6G8DFR5ERBR5BDNL2NR2E21NL2RBG18ERERNF5EREREREREC2- (242,179)(246,75),,BF:(92,66)(109,78),E,:"T3P1XS$;-!:5.w"BR2R5FD4GL5HU4,BR4NGD6NLR2,BFER5FDGNL2FDGL5H,NR8D3R7FDGL5H,BR2R5FDGNL5FDGL5HUBU2U,BDDE2R5FD2NL5D2GL5,U6ER5FD3NL5D3,U7R6FD5GL6,NR8U4NR4U3R8.#BRR2NR2U7LR3,NR8U7,U7FRFRFRFRNU4D3,BRR5EU5HL5GD5,U7R8FD2GL7,U7R8FD2GL4NL2FRFRF,BRNHR5EU2HL5HUER5F,BR3U7NL3R4,BUNU6FR5EU6,BR,RUL/$ ,,... INCOMING MESSAGE ...,,STARDATE 5824.6,,"FROM: STARFLEET COMMAND",,"TO: CAPTAIN,",,U.S.S. ENTERPRISE NCC 1701,,"SUBJ: PRIORITY ONE DIRECTIVE",P0% ,,,"CAPTAIN, A HOSTILE KLINGON TASK",FORCE SUPPORTED BY A KLINGON,BASE IS REPORTEDLY OPERATING IN,YOUR ZONE. YOU ARE HEREBY,DIRECTED TO ENSURE THE SWIFT,DESTRUCTION OF ALL HOSTILE,KLINGONS AND THE KLINGON BASE,BY ANY MEANS DETERMINED1{& TO BE NECESSARY.,P,,,YOU CAN EXPECT THE FULL,CO-OPERATION OF THE FEDERATION,"STARBASES WITHIN YOUR ZONE,",ALL OF WHICH HAVE BEEN,INSTRUCTED TO MAINTAIN,COMMUNICATIONS BLACKOUT,CONDITIONS UNLESS UNDER DIRECT,ATTACK FROM A KLINGON WARSHIP.23' THE FATE OF THESE BASES AND THE,SUCCESS OF THIS MISSION ARE NOW,IN YOUR HANDS.,P,,"C.E. RUDE, ADMIRAL",,STARFLEET COMMAND,,,CR/RS PD5824.6.4327,,,,... MESSAGE TERMINATED ...,P2( ,,YOU GUIDE THE enterprise AWAY,FROM YOUR STARBASE. THE,QUADRANT SCANS PICK UP,THE BASE ENERGY AND,DISPLAY IT ON THE qbar. THE3) LONG RANGE ENERY SENSOR (lres),IS PICKING UP ENEMY TASK GROUP,MOVEMENT WHICH THE COMPUTER,PROCESSES AND DISPLAYS ON,THE zone panel.,P,YOU MOVE OUT OF YOUR PRESENT,QUADRANT AND SEE SEVERAL GREEN,BLIPS ON THE zone panel ONE4T* "QUADRANT AWAY. SUDDENLY, A",KLINGON WARSHIP ENTERS YOUR,"QUADRANT AND IT'S CONDITION red",AS HE HITS YOU WITH A PHOTON,TORPEDO. WATCH YOUR ENERGY,LEVEL ON THE ebar DROP AS YOUR5<+ SHIELDS COMPENSATE FOR,"THE HIT. NOW IT'S FIGHT OR","RUN AS HE HITS YOU AGAIN, THIS",TIME WITH PHASERS.,P,FEEL THE POWER WHEN YOU HIT p,TO ARM phasers CHANGING pbar TO,"BLUE, TO SHOW THAT PHASERS",ARE ARMED AND READY. YOU SET63, "PHASERS TO '9' AND BLAST 'EM.","THE KLINGON IS HURT BUT HE'S",NOT DONE YET. HE HITS YOU WITH,"ANOTHER PHASER BLAST, SO YOU",FIRE AGAIN AND SEND HIM TO,OBLIVION. THE BATTLE IS WON BUT,"NOT WITHOUT COST, YOUR SHIP'S",ENERGY IS NOW CRITICALLY7!- LOW. THERE IS NO LONGER ENOUGH,ENERGY TO OPERATE THE lres.,P,"NOW, IT'S CONDITION yellow AS",YOU GUIDE THE enterprise BACK,TO A STARBASE USING YOUR SHORT,RANGE QUADRANT SCAN (srqs).,,YOU MADE IT BACK!,,GUIDE THE enterprise DIRECTLY8. INTO THE STARBASE AND REPLENISH,YOUR ENERGY. THE BASE WILL PAY,"THE PRICE, THOUGH, AND IT LOSES",THE ENERGY IT GAVE TO YOU.,P,A STARBASE HAS BROKEN BLACKOUT,AND IS NOW DISPLAYED ON THE,"zone panel. IT'S UP TO YOU .. &5:COPYRIGHT (C) 1984 CLOAD PUBLICATIONS.&S :AUTO-DOCUMENTER PROGRAM&u:BOB JOHNS, 134 GEORGIAN WAY&:SHERWOOD PARK, ALTA, CANADA&( 900:CLEAR STRING SPACE&2 140:GET FILENAME & OPTS&< 300:OPEN THE FILE'F 340:READ A LINE OF FILE'.P EF1 130:END OF FILE?'IZ 410:REMOVE STRINGS'cd 510:FIND COMMENTS'~n 650:OUTPUT RESULTS'x 70:LOOP THRU PROGRAM'::LOGICAL END':SUBROUTINE FOR CONVERSATION(4: (6," ");"BASIC COMMENT LISTER": (15," ");"BY": (11," ");"BOB JOHNS"::TITLE PAGE( (&HBC)&HE "SOURCE ON TAPE OR DISK: ";TD$: (TD$,1)"T" D1 : (TD$,1)"D" D1 : 160:SEE IF DISK SYSTEM( (&HBC)&H6 D1(:"FILE-NAME: ";F$::GET THE FILE-NAME)ETI$"AUTO-DOCUMENTATION FOR PROGRAM '"F$"'"(7," ")"PAGE NO.")ȅ (&HBC)&HE "OUTPUT TO PRINTER, DISK-FILE OR SCREEN: ";OP$: (OP$,1)"P" DO2 : (OP$,1)"D" DO2 : (OP$,1)"S" DO0 : 200:FIND OUTPUT DEVICE*҅ DO2 240*8܇:"OUTPUT FILE-NAME: ";OF$:OUTPUT FILE NAME?*["O",#DO,OF$:OPEN OUTPUT FILE* (&HBC)&H6 "OUTPUT TO PRINTER OR SCREEN: ";OP$: (OP$,1)"P" DO2 : (OP$,1)"S" DO0 : 240+D:"PARAGRAPHS OR LINE-NUMBERS: ";PL$: (PL$,1)"P" PL1 : (PL$,1)"L" PL0 : 250 :TYPE OF OUTPUT?+S DO0 +vPC1:#DO,TI$;PC:REPORT TITLE+#DO," "+"+,:SUBROUTINE TO OPEN FILE+6"I",#D,F$:OPEN IT+@#D,A$:DON'T NEED 1ST LINE+J,T:SUBROUTINE TO READ FILE,^ (D)1 370,%hEF1:,?r#D,A$:GET THE LINE,k|P(2,A$," "):FIND END OF LINE-NUMBER,N$(A$,P):AA$(A$,(A$)P):SEPARATE LINE FROM NUMBER,,:SUBROUTINE TO STRIP STRINGS-PP(AA$,(&H22)): PP0 :SEE IF QUOTES-5P2(PP1,AA$,(&H22)):FIND CLOSING QUOTE-G P20 470-k‡"CLOSING QUOTE MISSING IN ";N$-P2(AA$):CLOSING QUOTE MISSING-օ P2(AA$) AA$AA$" ":AVOID ZERO-LEN SUBSTRING. AA$(AA$,PP1)(AA$,(AA$)(P21)):REMOVE QUOTED STRING.,ꁥ 420:SEE IF MORE QUOTES.2.T:SUBROUTINE TO FIND COMMENTS.uPQ(AA$,"'"): PQ0 550.PQ(AA$,"REM"): PQ0 600:SEE IF REM.PQ(AA$,"'"): PQ0 :RETURN IF NO REMARKS/&PF1: PQ1 AB$(AA$,(AA$)1):GET THE COMMENT TO PRINT/+0 PQ1 580/D:T0::NO TAB NEEDED/pDT8:AB$(AA$,(AA$)PQ):SUB-COMMENT/vN/XPF1: PQ1 AB$(AA$,(AA$)3):GET THE REM/b PQ1 630/lT0:/vT8:AB$(AA$,(AA$)(PQ2)):GET THE SUB-REM00!:SUBROUTINE TO PRINT RESULT0C PF0 :NOTHING TO PRINT?0S T0 6900wSCSC1: 700 :SUB-PARA COUNT0SC0:TCTC1 :PARAGRAPH COUNT0LCLC1:INCREMENT LINE COUNT0ƅ LC62 7401LC1:PCPC1: I1 3:#DO," ": I:#DO,TI$;PC1ڇ#DO," " :PAGE TITLE1XTC$((TC),((TC))1):SC$((SC),((SC))1)1PF0: T0 PL1 #DO,TC$;" "; :PRINT PARA NUMBER1 T8 PL1 #DO,TC$;".";SC$; :PRINT SUB-PARA NUM1 PL0 #DO,N$;2 #DO,T)AB$: :PRINT OUTPUTڇ#DO," " :PAGE TITLE1XTC$((TC),((TC))1):SC$((SC),((SC))1)1PF0: T0 PL1 #DO,TC$;" "; :PRINT PARA NUMBER1 T8 PL1 #DO,TC$;".";SC$; :PRINT SUB-PARA NUM1 PL0 #DO,N$;2 #DO,T)AB$: :PRINT OU&':COPYRIGHT (C) T&D SOFTWARE 1989&9 359,57:0,1&u:2048:0:4:@229,"READING DISK DIRECTORY";:&HFF22,8&Ȁ X512 541:A$:X,("&H"A$):X:0512:F(0)&ҌA$(68):Y1:P11:PO4:T247&܀ X311:0,17,X,A$,B$:C$A$(B$,127)'4 N07:A$(Y)(C$,N321,8)"."(C$,N329,3)" "'[R(A$(Y)): R255A$(Y)"":300'A$(Y)A$(Y)((1547N32)48)" "' (1548N32)0 A$(Y)A$(Y)"B" : A$(Y)A$(Y)"A"( R0 (A$(Y),1)"B" ((A$(Y),10,3)"BAS" (A$(Y),10,3)"BIN") A$(Y)"":290(<A$(Y)(A$(Y),12):YY1(F" N,X(q,P2((Y1)10): P2(Y1)10 P2P21(6:6)"COLOR DISK DIRECTORY"(@A$(68F)" USED -"(F)" FREE":(32(A$))2)A$:10)"PAGE";P1;"OF";P2:(JH(P11)101)T XH H9) ^ A$(X)"" :370)/h9);A$(X))5r)C|&HFF22,8)I338 345:I,255::KPO328:529,&H80:A0(K):529,&H8B)E(P11)10PO3*K$:K$"^" PO4 P11 P1P11:PO13:A0(K):310 : K$"^" PO4 A0(K):POPO1:390*y K$(10) PO13 EY1 A0(K):POPO1:390 : K$(10) P1P2 PO13 P1P11:PO4:A0(K):310* K$(13) 450*410*(A$(E),9,1)".":T$(A$(E),12)*Z$ : : @233,"LOADING "(T$,8);+օ (A$(E),"BIN") 359,126:MT$:+: (A$(E),"BAS") 359,126:T$,R+Dꁥ410+ BD,B3,ED,C3,4,0,1F,1,C3,0,E,ED,8D,0,D,A6,84,8B,40,A7,80,AC,8D,0,3,26,F4,39,0,0(A$(E),9,1)".":T$(A$(E),12)*Z$ : : @233,"LOADING "(T$,8);+օ (A$(E),"BIN" &:SCALE COVER&':BY ERIC FADEN&;:5318 DIAZ PL.&X:JACKSONVILLE, FL 32210&n 4:4,1:1,1::3& LO$(7),C(67),B(67)&Q0:C1:A10:R0:K1'n2LO$(0)"jZUVeUV"(<4LO$(1)"VfZfjfj") 6LO$(2)"UUUUVUUUVUUUZUUUV")8LO$(3)"ZZZZZZZZZZZjVUiZeiZVZZZjVUeVeYZUZZVZV"*:LO$(4)"jUUeVUUVUYZUUUiUjVUUViYVUUUiUjVVZVYVeeUUeejjZZVjZYVijZjjZZZVeiZViUijZjjZYZZejZVeeijZj"+tLO$(6)"UjYijjZVjUUUjYiZjjUUUjUjUUUUUUUUUUYUeUjUUjUjUUVUUUUVUUYUiUjUUjjUZUYUjUUYUjUj",ALO$(7)" 44 44Z&5J&55 5J&9 0%&9HAC",FVP0:AD0:VP(LO$(0)),KAD(VP2)256(VP3),PVP(LO$(7))-'UQ(VP2)256(VP3):Q:1Q70-[XQ7,(188)1:Q71,(188)1:Q82,(188)23-h_T(AD)-uC1:A10- T 1 62- A11 T44 908-RR1: R4 R0- C 914,917,919,922,924- A$- T- G 1 500:. 1,1.! C 926,928,930,932,933.*A10.ACC1: C5 1000.L 902.UD62.A$"A"(R)";S"(T)";BM128,106;C"((3)1)"H2E2F2G2"..A$"A"(R)";S"(T)";BM128,106;C"((3)1)"R2E2L2D2"..A11/1A$"A"(R)"$%'()+IR BAS SCALECOVBAS!CANNON BAS#AUTODOC BASSTRKINS BASCOCOSTRKBAS&BLAZER BASWIGWORM BIN* ";S"(T)";BM128,116;C"((3)1)"R2EU2D2F2"/7/yA$"A"(R)";S"(T)";BM128,106;C"((3)1)"U2R2D2L2"//A$"A"(R)";S"(T)";BM128,106;C"((3)1)"R2E2U2D2"// G 42 192:(0,G)(255,G),:G/0 G 192 42 1:(0,G)(255,G),:G0$0Q G 183 40 1:(G,192)(G,42),: G0W0 G 40 183:(G,192)(G,42),:G:0 9260 OUR DISCLAIMER - HAS TO BE IN ALL COVERS.00@38,"CHROMASETTE MAGAZINE"1 " ISSUE #32 FEBRUARY 1984"1 16:" ALL PROGRAMS CONTAINED HEREIN1V" COPYRIGHT (C) CLOAD1z$" PUBLICATIONS P.O. BOX 10871." SANTA BARBARA, CA 93102.18" REPRODUCTION BY ANY MEANS1B" PROHIBITED. CLOAD PUBLICATIONS2 L" ASSUMES NO RESPONSIBILITY FOR21V" ERRORS, OMISSIONS OR DAMAGES"2V`" CAUSED BY THE USE OF THESE"2kj11)"PROGRAMS."2uy 1,12~ T 1 5000: T2C12KK1: K1 K02 K1 4,1:1,1:3: 90123,1:1,0: 901IONS2 L" ASSUMES NO RESPON&6:COPYRIGHT(C) 1984 CLOAD PUB- LICATIONS INC.&:'''''''''CANNON'''''''''''''' BY MIKE MOORE, 2 AURORA CR. OTTAWA, ONTARIO, CANADA& :4,1::650:"T255V31"'100: DCW TW:200:400::C(I)500,500,500,520,550:DCA 20:900'<dT(Z):YYV((W)CS):YBT YBT : YTP YTP'_n(X1,Y)(X2,YDY),H,:YBT 'zxEE10L: EME EME'(12,E)(13,170),,B:'ȅ P 230'I$'҅(JB)255E169(PPT32Y:(P)240:P,RD:EE2L:(12,E10)(13,E),,B:E171 :E171:(6P,Z:PPW:(P)Z P,RD:(R(P)192PZ:"BBB":(T(PPT)RP:(P)128"T10DT255":C(T)280,290,290,300)!BX(T)BX(T)5:BY(T)BY(T)2:PW 5:"BC":(BX(T)P,BY(T)P.5)(BX(T)P,BY(T)P.5),,B::(BX(T)5,BY(T)3)(BX(T)5,BY(T)2),,BF:BX(T)0)3SCSC3:600)CX(T)CX(T)A:C(T)5:(224,CY(T))(238,CY(T)9),,BF:CY(T)CY(T)5:(232,CY(T))(246,CY(T)9),CN,:SCSCW:600*!"C(T)C(T)W:(CX(T),CY(T))(CX(T)A,CY(T)9),,BF:CX(T)CX(T)A:(CX(T),CY(T))(CX(T)14,CY(T)9),CN,:SCSCW:600*,C(T)3:(200,CY(T))(203,CY(T)4),,BF:(204,CY(T))(207,CY(T)9),,BF:(208,CY(T))(222,CY(T)9),CN,:CX(T)208:SCSCW:600*JJW:JA JZ*BX(J)Z +BX(J)BX(J)A:BX(J)40(BX(J)A,BY(J))(BX(J)17,BY(J)4),,BF:440+?(BX(J),BY(J))(BX(J)17,BY(J)4),S,:+l"T50O4ABAT255O3":(34,BY(J)3)Z 460+EE10:(12,E10)(13,E),,B:E170E171+PVPVA:(PV,Z)(PV4,14),VS,:BX(J)Z:PV37:P P,Z,րPZ Y 4:(PV,P)(PV4,P12),VS,:"C":,MPW 72:(X1A,Y9),P,5:"DF":(X1A,Y9),P1,0:"AC"::DCA:,C(I)C(I)W:(CX(I),CY(I))(CX(I)14,CY(I)9),,BF:CX(I)CX(I)A:(CX(I),CY(I))(CX(I)14,CY(I)9),CN,,IIW:IA :IZ:,BX(I)510-!BX(I)193:BY(I)CY(I):(BX(I),BY(I))(BX(I)17,BY(I)4),S,-(204,CY(I))(214,CY(I)9),,BF:CY(I)CY(I)5:CX(I)232:(CX(I),CY(I))(CX(I)14,CY(I)9),CN,:C(I)5:510. &C(I)W:(CX(I)4,CY(I))(CX(I)14,CY(I)9),,BF:CY(I)CY(I)5:CX(I)224:(CX(I),CY(I))(CX(I)14,CY(I)9),CN,:510.LXSC$(SC):L(SC$):(247AL,A)(239,16),,BF:"BM239,16C0".~bPL 21:N$(((SC$,P,W)))::PZ:"C5":/P" CANNON"::" FLY YOUR HELICOPTER BY USING THE JOYSTICK. TRY TO STOP ANY SHELLS FIRED FROM THE CANNONS FROM CROSSING THE SCREEN. USE THE JOYSTICK BUTTON OR SPACE BARTO FIRE YOUR LASER."/" EACH SHELL THAT GETS BY ADDS ANOTHER BOMB TO THE RACK ABOVE YOU, AND WHEN THAT IS FULL THE GAME IS OVER!"/::"HIT FOR MORE...";/ A$:0" WHEN YOUR ENERGY GETS LOW, YOUWILL HAVE TO LAND YOUR 'COPTER TO GET MORE. IT COSTS ENERGY TOFIRE THE LASER AND EVEN MORE TO SURVIVE A DIRECT HIT FROM A SHELL."1 N$(9),CX(7),CY(7),C(7),BX(7),BY(7),V(7),CN(3),S(2),H(7),VS(4):PT3941:(188)6PTPT20481W1:V(0)5:V(1)3:V(2)1:V(5)W:V(6)3:V(7)5:CS.1268:JB345:RD85:RP1671:X125:X239:DY20:BT173:TP12:ME80:TW21N$(0)"BL2U7L4D7NR3BL2":N$(1)"BL4NU7BL4":N$(2)"BL1L5U3R3E1U2H1L3BM-2,+7":N$(3)"BM-6,-7R3F1D3NL4D2G1L3BL2"2QN$(4)"BL2U5D2L3U4BM-2,7":N$(5)"BL3NL3E1U2H1L3U3R4BM-6,7":N$(6)"BL2NU3L4U3NR3U4BM-2,7"2N$(7)"BL2U7L4BM-2,7":N$(8)"BL2U7L4D4NR3D3NR3BL2":N$(9)"BL2U7L4D3R3BM-5,4"3 A8:"BM28,100R7NR5D1L1D1R1F1L3G1R5D1L11U1R2D3L2U1R11NR3D1L4ND3F1D2L2R6E1BL2U2":(X1,95)(X2,115),H,G3(101,102,5):"BM103,101D2BM+2,1U4BR2D4BR2U4":(101,100)(118,104),S,G:"BM11,4D6M+2,3NU9M+2,-3U6":(11,0)(15,14),VS,G4"BM200,100D4BR2U4BR2D4BR2U4BR2D4BR2U4BR2ND4F1D2R1U2":"BM213,105D4E1U1L3D1F1U4BL5D4E1U1L3D1F1U4":(200,100)(214,109),CN,G4K :(Z,Z)(20,191),,BF:E$"NR4D3NR3D3R4":SC$"ND6R3F1D1G1L2F3"4"BM0,80C0XE$;BM-4,+3ND6D1F4NU5D1BM-4,3XE$;":"BM-4,3XSC$;BD3L4D6R4U3L2BM-2,6F2NE2D3C5":(42,15)(200,18),,BF5E (200,Z)(255,18),,BF:"BM214,0C0L3G1D1F1R2F1D1G1L3BR9NR3H1BU1U4E1R3BR6NR3G1D4F1R3E1U4H1":"BR5XSC$;BM+4,-6XE$;BM247,16XN$(0);C5"5*(9,181)(16,60),,BF:EME:(12,E)(13,170),,B:Y96:(X1,Y)(X2,YDY),H,:SC0:600:E$64 ZHS E$"U14R3D5R32D5R13U17L48":"BM200,191C5U5":I07:E$::"U10":(201,191),5,56>I07:CX(I)232:CY(I)21I25:(CX(I),CY(I))(CX(I)14,CY(I)9),CN,:C(I)5:BX(I)Z:BY(I)Z::(30,4)(199,14),,BF:PV193:I0:@480,"PRESS BUTTON OR A KEY TO START.";6H(JB)255""8406R (JB)255I$:850:1,1:7r"BM80,90U10R6BD5NL3D5NL5BR4U6E4F4NL6D6BR4U10F4E4D10BR4NR4U5NR4U5R4":"BR12D10R6U10NL6BR4D8F3E3U8BR4NR6D5NR5D5R6BR4U10R6D5L5F5":7I07:(CX(I),CY(I))(CX(I)14,CY(I)4),,BF:(CX(I)5,CY(I)5)(CX(I)14,CY(I)9),,BF::P0600::@262,"SCORE"10SC8O(X1,Y)(X21,YDY),,BF:SCHS "PREVIOUS HIGH SCORE"10HS:HSSC :" HIGH SCORE"HS108(80,80)(170,91),,BF:I07:BX(I)0:(BX(I),BY(I))(BX(I)11,BY(I)4),,BF:9:"PRESS SPACE BAR OR FIRE BUTTON FOR A NEW GAME 'Q' TO QUIT.":E$:(247A(SC$),A)(239,16),,BF9; (JB)255960 : E$:E$""9409IE$"Q"9h@352,""::SC0:810:209'1,1:""10000 : BY(I))(BX(I)11,BY(I)4),,BF:9:"PRESS SPACE BAR OR FIRE BUTTON FOR A NEW GAME 'Q' TO QUIT.":E$:(247A(SC& 99:75&&LIKX(Z):JKY(Z):M(Z)54,23,4,4,21,9,10,17,18,20&jXI(SXI):YJ(SYJ)&(I1811,J137),,3:(X1811,Y137)37:N((XI)1)3(YJ):PN(N(N3)):NP'#NND(Z)7:NP XI:YJ::XII(N):YJJ(N):X0Y0X9Y96:(X1811,Y137)36'28:T(Z)1,1:H1:T(Z)T(Z)1:3K(Z)M(Z)3::1,1:H3:K(Z)K(Z)H:QQH:P(QX,QY):P6P IQX:JQY:32:QQH:B(P)0QQB(P)'"O3XP$;":EEH:1,0:69' XI(BX(A(Z))I):YJ(BY(A(Z))J):13(? XII(S(Z)):YJJ(S(Z)):X1Y1X10Y10(X,Y22)013(J NS(Z)( NND(Z)7:XII(N):YJJ(N):X0Y0X9Y912:S(Z)N) L(XQX)L(YQY)XQX YQY (X6196,Y65,1):X1X((XI)1):Y1Y((YJ)1):(X11811,Y1137)3:14:XX1:YY1:QQK(Z):28)(X,Y22,5):XXI222:YYJ2:P(XX,YY)1:(XX,YY):P (XX,YY,P):(I6196,J65,3(M(Z)0)))KX(Z)X:KY(Z)Y:XXX222:YYY2:(XX,YY,(XX,YY)1):P(X,Y):P6M(Z)B3:P A(Z)P1:M(Z)(T(Z)0)5*M(Z):KKK(Z):K(Z)0:*4XI(KXI):YJ(KYJ):13*RH3:HK(Z)HK(Z):M(Z)3*gK(Z)K(Z)H:31*T(Z)T(Z)1:M(Z)M(Z)(T(Z)0):H1:31+@SKE55:KEKES:QQSB:KE302(EX7)(EX7)K(Z)15:T(Z)10:KEKEK(Z):M(Z)2(A(Z)0):B0KX(Z)KX:KY(Z)KY::X4I(Z):Y4J(Z):(X1811,Y137)328:M(Z)0+F+B04:XI(4I):YJ(4J):X4Y4(I1811,J137),,3:M(Z)0:KEKEK(Z):K(Z)0:KX(Z)KX:KY(Z)KY::5,(82,59),4,3:KEKEH:QQH:KE0QQKE::(82,59),1,3:N(8)1:M(N)1:M(N)3:,XKX(Z)182:YKY(Z)131:(X,Y)(X17,Y12),H,:K(Z)K(Z)H:QQH:(X,Y)(X17,Y12),O,:K(Z)0:WW1:QQK(Z):(X9,Y6),,3:K(Z)0:M(Z)0:B0IQX:JQY:XKX:YKY:14-AZ :A1:M3B:N07:M(N)0AN:M4::29::29-RX1I6194:Y1J62:(X1,Y1,C):(X12,Y1,C):(X1,Y11,C):(X12,Y11,C):-M(Z)(M(Z)):(X182,Y131)(X1819,Y1313),O,:KX(Z)X:KY(Z)Y:B M4M4:AZ::M(Z)3:AZ:-M4M3(E3)(E0)2-(78,175),M,1:.P(I,J):C3:27:C2:27.Z PP1:B(P)B(P)H:FF(F(P)0):F(P)1:B(P)0:M(Z)0(82,59),,3.!(BX(P),BY(P)):C3:27:DD1:C1:F0N0BG:B(N)0CN:::C0C0:BX(0)KX:BY(0)KY."N07:A(N)0PA(N)A(N)C:M(N)(M(N))3.#:68/j$I$:I$"T"I$"P"C$I$:63:64:I$"0"I$":"U(I$):63:I$"J"D$"BR5D7GL3HU2":74:I$"K"73/%M$"K"X((343)247)((344)247):Y((341)247)((342)247):X(0):X(X19)(X54):Y((1)19)((1)54)0D&(SX1811,SY137),3,3:SXSXX:SYSYY:SX0SY0SX9SY950:(SX188,SY138)47,480'(SX182,SY131)(SX1819,SY1313),E,:M$"K"(345)247M$"J"(65280)1650(K(K1)(K7):ZK:3:A0AZ ZA:30)RR1:Q150 S150 :SQ1'*2:(242,179)(246,179S69E2),,BF:(242,75),,BF:31+KE0(82,59):"T8XS$;T16":(2,137),1,4:EX15W5E3W:80:NEX7:(EX228N176,139N15)(EX2225N176,151N15),E,:EXEX1:WWEX200TB25(TBD)100:TBTB(TB0):802+,E070:36:(SX1811,SY137),,3:HTE5:M3:Z07:M(Z)0252:-:B 242."T3O1L2EP128EL8EP128L2EL4.GL8F#P128L4.F#L8.P128EL4.EL8.D#L2ET16":EX EXEX1:(EX228(EX7)176,145(EX7)15),1:TBTB(TB4):80:792/SXSXX:SYSYY:EE1:69:413/0SXSXX:SYSYY:N(QX,QY)1:SB(N):SSE:S30 ES :E303v1SSE:SS1(S55):QQB(N)S:B(N)S:69:63:T20:64:29:3932M3:(82,59),,3:R0R80:X18:Y2330:(X,Y):Y,X4.3X1QX6194:Y1QY65:(X1,Y1)(X12,Y1),:A1:Z07:M(Z)0M(Z)M(Z):(KX(Z)1811,KY(Z)137),3,3:KX(Z)QX:KY(Z)QY4[4:SX0SX9:QXQX1:SX9SX0:QXQX14v5QX0QX9:QX9QX046SY0SY9:QYQY1:SY9SY0:QYQY147QY0QY9:QY9QY05C8Q0:IQX(QX0)QX(QX9):JQY(QY0)QY(QY9):C(I,J):C(C0)(C60C):27:(I222,J2)(X12,Y13,1):(X12,Y13,3)59J,I:2:X1QX6194:Y1QY65:(X1,Y1)(X12,Y1),,B:3:P(QX,QY):BP6:P B2:"BM74,55XB$;":(82,59):B QKE:M4:"C4BM78,56XL$(P);":QB(P1)67:(QX222,QY2)Z07:QXKX(Z)QYKY(Z)M(Z)X4I(Z):Y4J(Z):QQK(Z):28::6;29:3:G SC0:70:I$"HICJCFKMNNN":S123:S2146:71:N0750::(2,138),,4:"T16O5V20L8GV-GV-GV-GV-GV-GV-GV-G":397<"C2BM40,145E2UHL11GLG16D2RFRFR19BR4BU6E8R5F2DG7LGL5HU2BR16E7RER5F2G2BG5GLGL5HU2BR16E8R5F2DG7LGL5HU7="BM108,145E2UHL7GLG8DRFR7F2G7LGNL56BR25BU15G5NR4NL6G8DRFR3NEBR8NL2NR2E10NL2R6F2BR4BD2R10E2H2L6G8DFR5ERBR5BDNL2NR2E21NL2RBG18ERERNF5EREREREREC37>"T3XS$;P1T16":G0:398?2(C$"P"EU):(228,179)(232,179U9.7),,BF:3:(228,92),,BF:8]@2(C$"T"):(212,179)(216,179T4.35),,BF:(212,92),,BF:3:8AC$"T"T040:TT1:64:H1:"O1XP$;":B 24:40:A040:ZA:25:408BEU 40:HU:EEH:29:69:63:"O2XP$;":Z07:M(Z)0259C:B 24:40:409hD(210,73)(235,89),,BF:"C2BM214,77XB$;":(224,83),,2:PD1:"C4BM218,78XL$(P);C3":9EL(EX8)(EX8)(E3)2:2:(198,179)(202,179E(E0)346E2),,BF:(198,75),,BF:3:EU :63:MFW (190,63)(255,69),,BF:SCWSC1E5(WSC1E5):W0:S1190:S253:I$(SC):I$("0000"(I$,(I$)1),5):72::iG(2,137)(182,168),,BF:HS2S210:N1(I$):D$"BM"(S1)","(S2)L$(((I$,N,1))557(I$"A")):D$:S1S114:::II$"K":D$"D5NE5U3NF6D6";J(88,177)(98,187),,BF:"BM91,178XD$;":M$I$:;K4:3,1:4,1::1,0:L$(23),E(5),O(5),H(5),KX(7),KY(7),K(7),T(7),A(7),M(7),S(7),D(7),X(2),Y(2),BX(4),BY(4),B(4),F(4),N(7),I(7),J(7):N023:L$(N)::<L(0,0)(184,132),,B:(0,173)(184,191),,B:(190,0)(255,60),,B:(0,136)(184,169),,B:3:(190,191)(255,72),,B:B$"D8R3FR4NDR4ER3U8L3HL4NUL4GL3":C$"T":P$"L16CEGEC":S$"O3L4CDFAEL8GGL4FEFDEL2C=MN07:N(N),I(N),J(N)::N02:X(N),Y(N)::"BM204,182L8D3NR4D3R8BU6BR6R4NR4D6BR12U6R7FDGL4BR12U2ER5FD4GNH2NFL5HU":(78,175)(108,189),,BF:73=N(214,75)(231,87),,BF:N063:(223,81),N,1,.5::(214,75)(231,87),H,G:(223,81),,3:(223,81),5,1,.5:(223,81),1:(214,75)(231,87),O,G:(223,81),2,3:(214,75)(231,87),E,G>7OA1:KE0:U5:TB4:G1:I$"ILJJCEE":S147:S2136:71:I$"AFB":S175:72:I$"BCEGLDJ":S147:72>PM3B:E30:T20:69:64:63:70:30:(74,175),1:(112,175),1:(84L8,175)(74,189),,BF:(112,175)(100L8,189),,BF?QQKE039:0:(2,1)(182,131),,BF:(192,1)(252,59),,BF:DTB:BGD:68:FTB1:KX(4)2:KY(4)2:(KX,KY,6):KE75:(KX222,KY2,8):R80:N0TB@RX(4)2:Y(4)2:(X,Y)82:(X,Y,N1):BX(N)X:BY(N)Y:B(N)150:F(N)0::QXBX(0):QYBY(0):SX5:SY5:N07:KX(N)KX:KY(N)KY:K(N)15:A(N)1:M(N)2:S(N)N:D(N)((2)1.5):T(N)10::50@SBR2R5FD4GL5HU4,BR4NGD6NLR2,BFER5FDGL5G2DR8,BFER5FDGNL2FDGL5H,BF6U6GLGLGR7,NR8D3R7FDGL5H,BR2NR5GD4FR5EUHL5,R8D2GLGLGD,BR2R5FDGNL5FDGL5HUBU2U,BDDE2R5FD2NL5D2GL5,U6ER5FD3NL5D3,U7R6FD5GL6,NR8U4NR4U3R8ATBRR2NR2U7LR3,NR8U7,U7FRFRFRFRNU4D3,BRR5EU5HL5GD5,U7R8FD2GL7,U7R8FD2GL4NL2FRFRF,BRNHR5EU2HL5HUER5F,BR3U7NL3R4,BUNU6FR5EU6,BR,RUL,5,0,1,6,1,1,7,1,0,4,1,-1,0,0,-1,3,-1,-1,2,-1,0,1,-1,1,9,9,4,4,0,06UFD2NL5D2GL5,U6ER5FD3NL5D3,U7R6FD5GL6,NR8U4NR4U3R8ATBRR2NR2U7LR3,NR8U7,U7FR 0q"÷ŷ˷ɷǎ"焊O_::::0:=w4B1X:&: :