: ,: ,,: (:: ,: "IBM" , ,: "General utility programs"J  ,:  ,,: ()(,)()  ,,: ()" ZAP'EM "()  ,,: ()(, )()" ,:  ,,: ()" Version 1B "(), 6 ,,: ()(,)()D@ , : ,,: "FEBRUARY 03,1982 MAV-5-5-K "zJ ,: ,,: "Press space bar to continue..."T "" T^CMD$ h CMD$ "" ^r CMD$ () | CMD$ " " ^: "DO YOU WANT INSTRUCTIONS";IN$J IN$"Y" IN$"YES" IN$"y" IN$"yes" a TRANSFER COMMANDu **ZAP EM *** **A GAME***** ,,R "AH....YOUR NAME PLEASE ";NME$: ,: "YOUR LAST SCORE ";R A(),B()FUELSHIPVT1'X :Y1 ,; ,C& RI0Q: D I : I,: (): I,&: (): IN ,: (): ,&: (): ,: (): ,&: ()X I %: ,I: (): ,I: (): I:b ,: (): ,&: (): O %: ,O: (): OFl() Xv () d( ) v ( ) ()  ()  **TRANSFER COMMAND** ,: SHIP SHIP FUEL H1  : "GAME OVER":: 2  X,: () RR(() )[ B(RR) A(RR)(()):B(RR)(() )j F T1 A(F) B(F) * A(F)X B(F) :SHIPSHIP: X,:"OUCH": VV ,: VV: X,: " ": ,: SHIP A(F) *I  B(F) A(F),B(F): " ":B(F):A(F):SCORESCORE: 7,: *k A(F),B(F): " ":B(F)B(F)  : A(F),B(F): (): * F4YY M> X ,: " ":XH X ,: " ":XRFUELFUEL \ FUEL2 V*f : ,: "SCORE: ";SCORE2p Vlz FUEL : ,: U  : "GAME OVER":: 2RR(()T1) B(RR) A(RR)(()):B(RR)(() ): A(RR) A(RR) A(RR) A(RR)(()):B(RR)(() ): A(RR) A(RR); ,:"FUEL: ";(FUEL)N X,: ()V ` l~ :XX :  :XX :   l X X X X X,:" " X,: ()$ . Z T1$8 XA(Z) `,B Z[L CC : X,CC: "-": X,CC: " ": CCiV : ly` LL j X,LL: "-"t LLB(Z) X,LL: "*": : X,LL: " ":A(Z):B(LL):SCORESCOREd: ~ X,LL: " " LL   l OO, ;/ OO ,= W~@ OOFLy ,:"Press any key to start game..."" Zap'em":" You are the reverse arrow (It is supposed to be a fighter with rakish inverse swept wings).":" Your mission is to zap the invading Horde ships in your path. The Horde is a huge mass of drone ships that is try- ing to get past the imperial fleet and into the rich homeworld systems."u:" The Horde ships are unpredictable. Some are Ghost ships. These will take more than one hit or will vanish upon being hit without a score increment." :" The controls are simple: up and down cursor control arrow keys for up and down movement. F1 to fire.":" Good hunting"X$$(): X$"" %( ;2:**HIGH SCORE**A<^F ,:"HIGH SCORES...."P ,:"_______________________________________"Z ,d NME$(2),SCORE(2)n "METEOR.DAT" AS #x I   #,NME$(I),SCORE(I) NME$(I),SCORE(I) I=NME$( )NME$:SCORE( )SCORECb SCORE( )SCORE() q I   SCORE(I)SCORE(I) SCORE(I),SCORE(I): NME$(I),NME$(I):F I: F F:  "METEOR.DAT" OUTPUT AS #% I  :#,NME$(I);",";SCORE(I): I:/ ,= I T NME$(I),SCORE(I)\ I ,: "YOUR SCORE, ";NME$;", WAS";SCORE" ,: "PLAY AGAIN (Y OR N)";PLY$, PLY$"Y" 6 "MENU I ,: "YOUR SCORE, ";NME$;", WAS";SCORE" ,: "PLAY AGAIN (Y OR N)";PLY$, PLY$