»úäzIü?nwz!›6¼YD:\ÚÏ!68Óÿÿ12345ª?-TY)<3)ÅSY=7 ¬ä"b",502,"c",0íí,"e",-1000è,"d",-1000è,"f",-800 ,"k",-800 ,"g",100d,"n",-100d,"j",0íí,"l",100d,"o",-500ô,"i",200È úZ$="d"Ëí1520ð (úZ$="l"Ëí1510æ 2úZ$="n"Ëí1460´ <úZ$="i"ËñKX=0íí Fdú(Z$="b"ÅZ$="g"ÅZ$="i")ÆÃINRËõ¬19,2;Û1;"KLINGONßOF RANGE":í1000è:ì1400x PIúZ$="b"ÅZ$="g"ÅZ$="i"ËñKLE=KLE-1:ñKHI=KHI+1:ñQKL=QKL-1 ZúZ$="k"ËñDIN=DIN-1 dúZ$="c"ÅZ$="h"Ëì3880( n@ñQ$(TX,TY)=" ":úZÉ12ËñG$(EX,EY)=¨W$(G$(EX,EY),Z,-1) xú¥>.4LÌÌÌËí2600( ‚#õ¬20,2;"AGAIN ? (Y/N)" Œú¦="Y"ÆSY=6Ëì1120` –ú¦="Y"ÆSY=7Ëì1180œ ú¦É"N"Ëì1420Œ ªþ ´ê HIT ROMULAN ¾MñRDE=RDE+1:ñROM=ROM-1:ñQRO=QRO-1:úRWAËñSCO=SCO+300,:þ È%í380|:õ¬15,2;"OH DEAR, YOU BLEW UP A ";¬16,2;"ROMULAN WARSHIP. RELATIONS";¬17,2;"WITH THE ROMULAN FEDERATION";¬18,2;"ARE BEING STRAINED BY YOUR";¬19,2;"ACTIONS":í540:úRDE>2ÆÃRWAËñRES=3:í4130":ñRWA=1 Òþ Üê HIT PULSAR æˆí380|:ñPUL=PUL-1:õ¬16,2;"WELL DONE YOU BLEW UP A";¬17,2;"PULSAR, ";PUL;" LEFTÌDESTROY":í1000è:þ ðê HIT STAR úºí380|:ñNX=EX:ñNY=EY:ñNOV=1:õ¬16,2;"STAR IS GOINGÌSUPER NOVA";¬17,2;"WARNING CONTENTS OF QUADRANT";¬18,2;"WILL BE DESTROYED.":í1000è:þ ê TRACTOR BEAMÌBASE )ñSY=12:í2420t :úDEËì2460œ 8õ¬16,2;"DISTRESS SIGNAL SENT !":í1000è "CëJ=1Ì3:ú¨R(100d)>502+LEV*6Ëì15906 ,jõ¬16+J,2;"FIRST SECONDTHIRD "(J*6-5ÌJ*6);" FAIL":í1000è:óJ:ì3660L 6PëI=1Ì9 :ëJ=1Ì9 ::úG$(I,J,2)É"0"ËñF$="c":ì1610J @óJ:óI:ñF$="h":ñI=HX:ñJ=HY J#ú(EXÉIÅEYÉJ)ËñEX=I:ñEY=J:í90Z TYñQ$(EXC,EYC)=" ":í3106:ñEXC=I:ñEYC=J:ñD$=" ":í1860D:ñEXC=I:ñEYC=J:ñQ$(I,J)="a" ^Ší380|:õ¬16,2;"TRACTOR BEAMÆDOCKING";¬17,2;"COMPLETED. ALL SYSTEMS NOW";¬18,2;"FULLY OPERATIONAL" h2ëI=1Ì14:ñC(I)=7:óI:í540:þ rê MINE CRYSTALS |)ñSY=13 :í2420t :úDEËì2460œ †°í380|:ñD$="o":í1860D:úÃSURËõ¬16,2;"YOU ARE ÃORBITING A";¬17,2;"C PLANET,YOU CANNOT MINEë";¬18,2;"DELITHIUM CRYSTALS.":ì1700¤ šCõ¬16,2;"MINING COMPLETE. BATCH OF";¬17,2;"DELITHIUM CRYSTALS HAS BEEN";¬18,2;"LOADED.";¬19,2;"ENGINE REFUEL COMPLETED.":ñG$(EX,EY)=¨W$(G$(EX,EY),11,-1):ñG$(EX,EY)=¨W$(G$(EX,EY),5,1):ñQ$(I,J)="f":ñENE=ENE+LEV*500ô:ñC(4)=7:í540:þ ®ê DOCK ¸(ñSY=9 :í2420t :úDEËì2460œ Â í380|:ñD$="c":í1860D:úÃSURËñD$="h":í1860D:úÃSURËõ¬16,2;"DOCKING PROCEDURE FAILURE";¬17,2;"DUEÌLACK OF BASE":í540:þ ÌpúRETËõ¬16,2;"DOCKING WITH BASE";¬17,2;"COMPLETE. ASSESSMENT DUE":í540:ì3800Ø àçõ¬16,2;"DOCKING WITH BASE HAS";¬17,2;"BEEN SUCCESSFUL. ALL SYSTEMS";¬18,2;"NOW FULLY OPERATIONAL":ñREF=REF+1:úREF6Ëì1920€ b>ëJ=EYC-1ÌEYC+1:úJ<1ÅJ>8Ëì1910v lúQ$(I,J)=D$ËñSUR=1:þ vóJ €óI:þ Šê KLINGONSÑ ”añL=QKL+(QROÆRWA):í380|:í360h:ñI$=" IS":ñJ$="ENEMY":úL>1ËñI$=" ARE":ñJ$="ENEMIES" ž|õ¬16,2;"SENSORS DETECT THAT ";L;¬17,2;J$;I$;" TRYINGÌWARP";¬18,1;"ßOF THIS QUADRANT !!" ¼nëN=1ÌL:ëI=1Ì6:ëJ=1Ì8:ñF$=Q$(I,J):úF$="b"ÅF$="g"ÅF$="i"Å(F$="n"ÆRWA)Ëì2000Ð ÆóJ:óI:ì2050 Ð<ñQ$(I,J)=" ":ñFAC=3:ñB=9 :í2060:ñB=0íí ÚúF$="b"ËñP=1 äúF$="g"ËñP=7 îúF$="n"ÆRWAËñP=8 ó6úF$="i"ËñP=11:í60<:ñKX=X:ñKY=Y:ì2050 øOí60<:ñG$(EX,EY)=¨W$(G$(EX,EY),P,-1):ñG$(X,Y)=¨W$(G$(X,Y),P,1) óN:í340T:þ ê Ñ @ñK=º(FAC/2+.5ÿÿÿ):í360h:ñY$="a":úB=9 ËñY$=F$ oëI=1Ì30ÍK:õ¬6,I;Þ1;ÙCON;Y$:×.01z#× =,I+20:õ¬6,I;Þ1;Ù7;Y$:óI:þ *ê PHASOR SHOOT >jí2200˜:ëI=4Ì28:õ¬6,I;Þ1;")":×.01z#× =,20+I:úY$="a"Ëú¦="S"Ëì2130R HóI RLëJ=4ÌI-1:õ¬6,J;Þ1;")":×.01z#× =,J:óJ:í2250Ê:þ fê PHOTON SHOOT zaí2200˜:ëI=4Ì28:õ¬6,I;Þ1;"¢":×.01z#× =,I:úY$="a"Ëú¦="S"Ëì2190Ž „õ¬6,I;Þ1;"¢":óI Ží2250Ê:þ ˜ê SETëSHOOT ¢DñDES=0íí:õ¬6,3;Y$:úY$="a"Ëõ¬6,3;ÙCON;Y$ ¬Oõ¬6,29;Z$:úZ$="a"ÅZ$="c"ÅZ$="h"ËØÙCON;235ë,124|,10 ¶ñI$="›œ":úZ$="a"ËñI$="› " Àþ Êê EXPLODE &ý ÔúIÈ27ËñDES=1 ÞyëJ=1Ì8:×.1}LÌÌÌ,I+J:õ¬5,I-1;Þ1;ÙJ;"˜™š";¬6,I-1;I$;¬7,I-1;"žŸ ":óJ èÐõ¬6,3;" ";¬6,29;" ";¬6,I;" ";¬5,I-1;" ";¬6,I-1;" ";¬7,I-1;" ";¬5,28;" ";¬6,28;" ";¬7,28;" ":þ òê SEARCH üÞí380|:õ¬15,2;"WHATÌLOOKë?";¬17,2;"1) KLINGON 5) PULSAR";¬18,2;"2) M-PLANET 6) C PLANET";¬19,2;"3) BASEíí 7) K.COMMANDER";¬20,2;"4) ROMULAN 8) ß" !ñI$=¦:úI$<"1"ÅI$>"8"Ëì2310 úI$="8"Ëþ CñP=°("01030208101107"(°I$*2-1Ì°I$*2)):í380| $AëI=1Ì9 :ëJ=1Ì9 :úG$(I,J,P)>"0"Ëì23608 .BóJ:óI:õ¬17,2;"THERE'S NONE LEFTÌFIND !!":í540:þ 8Uõ¬17,2;"THERE'S ONE ¬QUAD ";I;" ";J;¬20,2;" ":í540:þ Bê HELP Lsí380|:úLEV=5Ëõ¬16,2;"SORRY MASOCHISTS DON'T GET";¬17,2;"ANY HELP.":í540:þ V‡õ¬16,2;"WHAT HELPÌFIND M PLANETS ?";¬18,2;"1) A LOT";¬19,2;"2) MEDIUM";¬20,2;"3) NONE" `!ñI$=¦:úI$<"1"ÅI$>"3"Ëì2400` jñHEL=°I$:þ tê SYS CHECK ~p×.25~ÿÿÿ,SY*4:ñDE=0íí:í380|:úC(SY)<3Ëõ¬16,2;V$(SY);" ";T$(C(SY)):ñDE=1 ˆúC(SY)=3ËñC(SY)=2 ’þ œ2×.2~LÌÌÌ,12:×.3™™™,6:í540:þ ¦ê K.S.COM WARP °-ñP=11:í60<:úX=EXÆY=EYËì2480° ºñKX=X:ñKY=Y:í380|:úC(14)<3Ëõ¬16,2;"THE KLINGON SUPER COMMANDER";¬17,2;"IS ON THEÑBUT AS THE";¬18,2;"SUB-SPACE RADIO IS DAMAGED,";¬19,2;"HQ CAN'T TELL YOU WHERE HIS";¬20,2;"SHIP IS WARPING TO.":ì2510Î ÄEñRES=2:í4130":ñFAC=1:ñB=9 :ñF$="i":í2060 Î í540:þ Øê TARGET ¿GRID âí380|:õ¬16,2;Ù5;" ‘ ’";¬17,3;Ù2;Ú6;"QWE";¬18,2;Ù5;Ú0íí;"“";Ù2;Ú6;"ASD";Ù5;Ú0íí;"”";¬19,3;Ù2;Ú6;"ZXC";¬20,2;Ù5;Ú0íí;"• – —" ì‰í510þ:õ¬16,7;"ÑCURSOR WITH KEYS";¬18,8;"F WHEN FINISHED";¬21,20;V$(SY):ñTX=8:ñTY=16 öoõ¬TX,TY;Þ1;Û0íí;" ":ñTX=TX+(¦="Z"Å¦="X"Å¦="C")-(¦="Q"Å¦="W"Å¦="E"):ñTX=TX+(TX<5)-(TX>10 ) eñTY=TY+(¦="E"Å¦="D"Å¦="C")-(¦="Q"Å¦="A"Å¦="Z"):ñTY=TY+(TY<12)-(TY>19):ú¦="F"Ëì2580 3õ¬TX,TY;Þ1;Û1;Ù4;" ":ì2550ö ]õ¬TX,TY;Û0íí;Þ1;"£":ñTX=TX-4:ñTY=TY-11:í3130::úZ$="a"Ëì2540ì í360h:í380|:þ (ê KLINGON SHOOT 2ñFOE=0íí:úÃQKLÅÃKLEËþ <ªí360h:í380|:ñZ$="a":úFOEËõ¬16,2;"THE KLINGONS HAVE LAUNCHED AN";¬17,2;"ATTACK WITH THEIRæSECRET";¬18,2;"WEAPON":ì2650Z F¤õ¬16,2;"OH NO !! SORRYÌTELL YOU";¬17,2;"THIS BUT THERE ";:ñO$="IS ":ñP$="ENEMY ":ñN$="IT":úQKL>1ËñO$="ARE ":ñP$="ENEMIES ":ñN$="THEY" PXñY$="b":õO$;QKL;¬18,2;P$;"¿THIS QUADRANT ";N$;¬19,2;O$;"FIRING" ZúFOEËñQKL=FOE d‹ëK=1ÌQKL:ñENE=ENE-25:í2030î+(¨R(2)*60<):ñJ=(6ÆCON=2)+(14ÆCON=4)+(10 ÆCON=6) x ëI=1ÌJ ‚6ñR=¨R(14):í2830:úC(R)=1Ëì2690‚ 8ñC(R)=C(R)-1:óI:óK:í340T:úFOEËñFOE=0íí:þ ª/úQKL>1+(5-LEV)/2Ëí1930Š ´þ ¾ê KLINGONS ZAP BASE Ò”í380|:ñB$="c":õ¬16,2;"THE KLINGONS HAVE JUST ZAPPED";¬17,2;"ONE OF YOUR BASES !!":úBLE=1Ëí1000è:ì3860 æGëI=1Ì9 :ëJ=1Ì9 :úG$(I,J,2)É"0"Ëì2810ú ðóJ:óI úRñG$(I,J)=¨W$(G$(I,J),2,-1):úI=EXÆJ=EYËñF$="c":í3106:ñQ$(I,J)=" " NñY$="g":ñZ$=B$:í360h:í2030î+¨R(2)*60<:ñBLE=BLE-1:þ ê LIFE SUPPORT CHECK $ëB=1Ì13 :úC(B)>2Ëþ "°óB:í360h:í380|:õ¬16,2;"OOPS !! ALL SYSTEMS ARE";¬17,2;"DEAD. YOU SHOULD HAVE HAD";¬18,2;"YOUR SHIELDS UP, YOU WALLY.":ì3920P ,ê DEATH RAY 6)ñSY=11:í2420t :úDEËì2460œ @Zõ¬16,2;"EXPERIMENTAL PROTOTYPE:";¬17,2;"ENGAGE DEATH RAY ? (Y/N)" J ú¦="N"Ëþ Tú¦É"Y"Ëì2890J ^Rí380|:õ¬16,2;"DEATH RAY ENGAGED !! GULP !!";¬17,2;"67% CHANCE OF MALFUNCTION":í1000è:ñJ=¨R(100d):úJ>33!Ëí380|:õ¬16,2;"YOUR SHIP HAS JUST TURNED";¬17,2;"INTO A BOILING GAS CLOUD OF";¬18,2;"COMPOSITE MOLECULES";¬19,2;"END OF GAME":ì3920P h2õ¬19,2;"DEATH RAY NOW OPERATIONAL !!" r:ëI=EX-1ÌEX+1:úI<1ÅI>9 Ëì2980¤ |<ëJ=EY-1ÌEY+1:úJ<1ÅJ>9 Ëì2970š †UñKLE=KLE-°G$(I,J,1)-°G$(I,J,7):ñG$(I,J,1)="0":ñG$(I,J,7)="0" 4úRWAËñROM=ROM-°G$(I,J,8):ñG$(I,J,8)="0" šóJ ¤óI:ñENE=º(ENE/2) ®[ëI=1Ì6:ëJ=1Ì8:ñF$=Q$(I,J):úF$="b"ÅF$="g"Å(F$="n"ÆRWA)ËñQ$(I,J)=" " ¸óJ:óI:í340T:þ Ìê SYMBOLS Öýí380|:õ¬16,1;"a=YOUíí c=BASE h=HQ";¬17,1;"d=STAR k=M PL'T f=F PLANET";¬18,1;"b=KLINGON g=K.COM i=K.S.COM";¬19,1;"j=B.HOLE l=PULSAR n=ROMULAN";¬20,11;"o=C PLANET":í540:þ àê STATISTICS ôí380|:õ¬15,1;"SCORE=íí QUADRANT=";EX;"-";EY;¬16,1;"EN'GY=íí SECTOR =";EXC;"-";EYC;¬17,1;"DISCR=íí DIS'RY N=";DIN;¬18,1;"KL'GN=íí KL'N HIT=";KHI;¬19,1;"TORPS=íí NO. GOES=";GOS;¬20,1;"BASES=íí ROMULANS=";ROM;¬21,1;"PUL'S=íí STARDATE=";STD;¬15,7;SCO;¬16,7;ENE;¬17,7;DIS;¬18,7;KLE;¬19,7;TOR;¬20,7;BLE;¬21,7;PUL:í540:þ þê STAR NOVAS !í380|:õ¬16,2;"A START ¬QUADRANT ";NX;"-";NY;¬17,2;"HAS GONE SUPER NOVA":ñB$=G$(NX,NY):ñBLE=BLE-°B$(2):ñKLE=KLE-°B$(1)-°B$(7):ñROM=ROM-°B$(8):ñDIN=DIN-°B$(3):ñPUL=PUL-°B$(10 ):ñG$(NX,NY)="íí0":úEXÉNXÅEYÉNYËì31200 !’ñFAC=¨R(9 ):õ¬18,2;"AUTOMATIC WARPßOF";¬19,2;"QUADRANT. WARP FACTOR ";FAC:úC(4)<3Ëí540:ì3680` &“í60<:ñEX=X:ñEY=Y:í90Z:í340T:í2060:úFAC>9 -¨R(LEV)Ëõ¬20,2;"ENGINES DESTROYED:PLASMA LEAK":ñC(4)=1 0ñNOV=0íí:í540:þ :ê CHECK PATH DeñX=1:ñY=1:ñX1=EXC:ñY1=EYC:úTXÉEXCÆTYÉEYCËñX=½((TX-EXC)/(TY-EYC)):ñY=½((TY-EYC)/(TX-EXC)) NúX>1ËñX=1 XúY>1ËñY=1 búTX3Ëí3070þ "úGOS>40(ÆÃKTRÆKXËí1830& *,í510þ:í450Â:ñI=0íí:ñJ=1 >ñI=I+J:úI=8ÅÃIËñJ=-J HHõ¬21,25;ÙI;"READY":×.007ye`Aˆ,I+12:ú¦=""Ëì3390> \ú¦="1"Ëí730Ú:ì3370* fú¦="2"Ëí790:ì3370* pú¦="3"Ëí850R:ìM zú¦="4"Ëí890z:ìM „ú¦="5"Ëí1050:ìM Žú¦="6"Ëí1120`:ìM ˜ú¦="7"Ëí1180œ:ìM ¢ú¦="8"Ëí5600:ì3370* ¬ú¦="9"Ëí1710®:ìM ¶ú¦="0"Ëí1780ô:ìM Àú¦="R"Ëí2860,:ìM Êú¦="T"Ëí1540:ìM Ôú¦="M"Ëí1650r:ìM Þú¦="S"Ëí3970‚:ì3370* èì3390> òê ªSET ïëI=0ííÌ7:çI:ÚI:û:óI:ç0íí:Þ0íí:Ý0íí:ô23693\,70F:ô23624H\,70F:û:ù:Ó3,"K":ô23561 \,10 :ô23562 \,1:ô236099\,15:ô236088\,1:ô23658j\,8:í9998':þ ê STAR CHART ¯í380|:í360h:õ¬14,1;"íí ";¬21,2;"STAR CHART LAST KNOWN QUADS";¬19,1;Ù7;"–";¬20,2;"”" .“ëI=1Ì9 :ëJ=1Ì9 :ñI$=C$(I,J):õÛ(I=EXÆJ=EY);¬I*2,J*3-1;I$(1);Ù5;I$(2);Ù6;I$(3) 8fóJ:õÙ3;¬1,I*3;I;¬20,I*3;I;¬I*2,1;I;¬I*2,30;I:óI Bí540:í400:þ Lê T.BEAM FAILED Vní380|:õ¬16,2;"TRACTOR BEAM FAILEDÌ";¬17,2;"REMATERIALIZE YOU. GAMEÞ":ì3920P `ê AUTO WARP FAIL jÎí380|:õ¬16,2;"AUTOMATIC WARP HAS FAILED.";¬17,2;"ENGINES WERE ";T$(C(4));¬18,2;"ENTERPRISE WAS VAPORIZED BY";¬19,2;"AN EXPLODING STAR":ì3920P tê TOO NEAR A B.HOLE ~‘í380|:õ¬16,2;"YOU WERE TOO NEARÌA BLACK";¬17,2;"HOLEÆGOT TOTALLY....";¬18,2;"(END OF GAME)":ì3920P ˆê COLLISION ’Èí380|:õ¬16,2;"THE U.S.S. ENTERPRISE";¬17,2;"N.C.C. 1701ÆCREW, WERE";¬18,2;"LOSTÌSPACE STAR DATE ";STD;¬19,2;"AFTER COLLIDING WITH ";Z$:ì3920P œê ENEÅSCO LOW ¦ªí380|:úSCO<-8999'#Ëõ¬16,2;"YOU HAVE FAILEDÌACT";¬17,2;"RESPONSIBLY AS CAPTAIN OF THE";¬18,2;"U.S.S. ENTERPRISE.":ì3920P ^°Ûõ¬15,2;"THE U.S.S. ENTERPRISE";¬16,2;"N.C.C. 1701ÆCREW, WERE";¬17,2;"LOSTÌSPACE STAR DATE ";STD;¬18,2;"AFTER DEPLETING THEIR ENERGY";¬19,2;"CELLS":ì3920P Øê MISSIONÞ âþå3850 :í380|:õ¬15,2;"ADMIRALS WILLIAM-FITZ-PATRICK";¬16,1;"ÆPATRICK-FITZ WILLIAM HERE";¬17,2;"AFTER REVIEWING YOUR LOGÆ";¬18,2;"äTAPES, WE ARE GOINGÌ";¬19,2;"RECOMMENDÌHQ THAT YOU BE" ì,ëI=1Ì6:ãI$,J:úSCO>JËì3840 öóI "õ¬20,2;I$:ì3920P ä"PROMOTED",2000Ð,"DECORATED",1000è,"REASINGED",500ô,"DEMOTED",0íí,"RESIGNED",-500ô,"EXILED",-9999' ê ALL BASES DESTROYED í380|:õ¬16,2;"ALL BASES, INCLUDING HQ HAVE";¬17,2;"BEEN DESTROYED BY THE";¬18,2;"KLINGONS. END OF GAME":ì3920P (ê SHOT BASE 2.ñY$="STAR FLEET HQ":úZ$="c"ËñY$="A STAR BASE" <†í380|:õ¬16,2;"SHOOTING ";Y$;¬17,2;"IS GROUNDSëCOURT-MARTAIL";¬18,2;"YOU HAVE BEEN DISMISSED" Fê PLAY AGAIN Pqõ¬14,1;Ù5;Ú1;"¡¡¡¡":í540:í380|:õ¬16,2;"PRESS SPACE TO PLAY AGAIN" Zú¦É" "Ëì3930Z d÷ nê þÌHQ xÍí380|:õ¬16,2;"MISSION COMPLETED. STAR";¬17,2;"FLEET HQ RECOMMENDS THAT YOU";¬18,1;"þÌA BASEÅHQ ¬";¬19,2;"QUADRANT ";HX;"-";HY:ñRET=1:í540:þ ‚ê SYSTEM CONTROLS Œ®ñSY=15:ñW=3980Œ:í380|:õ¬16,2;"A=SYMBOLSíí S=SEARCH";¬17,2;"H=HELPíí G=STATISTICS";¬18,2;"R=RETURNíí C=CHART" ú¦="R"Ëþ ªú¦="C"Ëí3600:ìW ´ú¦="A"Ëí3020Ì:ìW ¾ú¦="S"Ëí2290ò:ìW Èú¦="H"Ëí2370B :ìW Òú¦="G"Ëí3040à:ìW Üì4000 æê CHOOSE LEVEL ð§í4110:õ¬5,0íí;"WHAT LEVEL DO YOU WISHÌPLAY ?íí ( 1Ì5 )"'"1) NOVICE"''"2) FAIR"''"3) GOOD"''"4) EXPERT"''"5) EMERITUS"'" (MASOCHISTS ONLY!)" ú!ñI$=¦:úI$<"1"ÅI$>"5"Ëì4090ú ñLEV=°I$:í4110:õ¬4,2;"PLEASE WAIT WHILE THE GALAXY"''"íí IS BEING CREATED.";¬9 ,0íí;"a YOUíí c BASEíí h HQ"''"d STAR e M PLANET f F PLANET"''"b KLINGON g K.COM i K.S.COM"''"j B.HOLE l PULSAR n ROMULAN"''"íí o C PLANET":þ ê õTITLE ³û:õ¬0íí,11;Ù4;Û1;"ƒŒƒŒƒŒƒŽ";¬1,11;"SPEC TREK";¬2,11;"‡ŒƒŒƒŒƒŒ‹":à¬1,6;Ù4;" 1984 SPECCY BASHER":þ "ê TYPE MESSAGE 6øåRES*10 +4200h:í380|:õ¬16,2;"LT. UHURA HERE CAPTAIN.";¬17,2;"MESSAGE FROM STAR FLEET";¬18,2;"COMMAND COMING THROUGH.":í1000è:í380|:ãJ:ñL=0íí:úC(14)=3ËñC(14)=2 @ëK=1ÌJ:ãI$ JëI=1Ì±I$:ú¦="Q"Ëþ T^õ¬K+14-L,I;"¤":×.02{#× =,25:õ¬K+14-L,I;I$(I):úI$(I)="."Ë×.5ÿÿÿ,30 ^;óI:úK/6=º(K/6)ÆJÉKËñL=K:í1000è:í380| hóK:í1000è:þ r§ä6,"THE ORGANIAN PEACE TREATY HAS","COLLAPSED. THE KLINGONS ARE","ATTACKING THE FEDERATION.","YOUR MISSION IS TO SEEK OUT","ALL KLINGONS AND TO DESTROY","THEM." |™ä5,"ESPIONAGE INTELLIGENCE","REPORTS THAT THE KLINGON","SUPER COMMANDER IS WARPING TO","QUADRANT "+ÁKX+"-"+ÁKY+".","SUGGEST YOU DESTROY HIM SOON." †¤ä5,"THE ROMULAN FEDERATION HAS","JUST WALKED OUT OF THE PEACE","CONVENTION.THEY HAVE DECLARED","WAR WITH STAR FLEET COMMAND.","SUGGEST YOU ZAP ANY ROMULANS." &ñâ &òê ø &ôEý:ø"SPEC TREKå"¯64600Xü,936¨:ø"SPEC TREK÷"Ê0íí:Ö""¯:Ö"" &ûâ &üê RAM STATS &þÜû:õ"FREE BYTES",64599Wü-(¾23653e\+256*¾23654f\)'"PROG LENGTH",¾23627K\-¾23635S\+256*(¾23628L\-¾23636T\)'"VARIABLES",¾23653e\-¾23627K\+256*(¾23654f\-¾23628L\) 'â ' ê ÂSETô '/ô236066\,88X:ô236077\,251û:þ '-ô236066\,0íí:ô236077\,60<:þ éI€ï"" €úííË5ÈííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííÿííGÛMûÏÛMöÏ±3ûÏÈ2ÐûÏü4Ð±3>ÈöÏÃ3·-öÏ¸}ú¡2>íí $$íí$~$$~$>(> >bd&F(*D:íí >>íí>íí ~BBFFF~~~``~|DF~xHHH~~@@~F~~B@~bb~~<$$~FF~~BB~ >>X©R•p„J5ä‚a $*R‰‰„B €ÂäðèÜ¾@~@ÿííÿ8|þ|8)ííÿÿÿÿðíí~~xHííÿÿÿÿÿííLJB<~@~b~@~~B~BJ~B~~~@1)+(°I$(5)ÆHEL>2))+Á(°I$(1)+(HX=EXÆHY=EY)):í150–:ñQ$(X1,Y1)="a":ñEXC=X1:ñEYC=Y1::úKX=EXÆKY=EYËí150–:ñQ$(X1,Y1)="i":ñKXC=X1:ñKYC=Y1 ‚'úHX=EXÆHY=EYËí150–:ñQ$(X1,Y1)="h" ‡5ëI=1Ì3:úC$(EX,EY,I)="0"ËñC$(EX,EY,I)="-" ŒóI:í340T:þ –ê PICK SECT :ñX1=¨R(6):ñY1=¨R(8):úQ$(X1,Y1)É" "Ëì160 ªþ ´ê ÐGALAXY ¾‰éG$(9 ,9 ,11):éC$(9 ,9 ,3):éQ$(6,8):éV$(14,7):éC(14):éT$(7,11) ÈRëI=1Ì9 :ëJ=1Ì9 :ñG$(I,J)="íí0":ñC$(I,J)=" + ":óJ:óI Ò~ñBLE=LEV:ñB=0íí:ñFOE=B:ñHEL=3:ñKTR=B:ñRET=B:ñNOV=B:ñREF=B:ñRWA=B:ñQKL=B:ñRDE=B:ñKHI=B:ñSCO=B:ñGOS=B:ñDIS=B:ñDIN=LEV Ü ñKX=B:ñKY=B:ñKLE=LEV*5:ñTOR=10 :ñROM=LEV*3:ñPUL=ROM:ñRES=1:ñSTD=¨R(500ô)+4000 :ñENE=4000 +LEV*141:ñS$="bcedfkgnjlo" æëP=1Ì11:ãJ ð;ëK=1ÌJ*LEV:í60<:ñG$(X,Y)=¨W$(G$(X,Y),P,1) úóK:óP \ä4,1,1,13 ,30,17,1,3,2,3,1 lñP=11:í60<:ñEX=X:ñEY=Y:í60<:ñHX=X:ñHY=Y:úLEV>2Ëí60<:ñKX=X:ñKY=Y:ñKLE=KLE+1 IëI=1Ì14:ãV$(I):ñC(I)=6:óI:ëI=1Ì7:ãT$(I):óI "í90Z:í3570ò :þ ,Ìä"ALERT","STATUS","REPAIRS","W.DRIVE","IMPULSE","PHASORS","PH.TORP","LR SENS.","DOCK","ORBIT","D.RAY","T.BEAM","MINE","RADIO","DESTROYED","DEAD","NEARLY DEAD","BARELY OP.","HIT","OPERATIONAL","EXCELLENT" 6ê FIND ¿QUAD @4ëI=1Ì6:ëJ=1Ì8:úF$=Q$(I,J)Ëþ JóJ:óI:þ Tê QUAD SCAN ^OñB$=G$(EX,EY):ñQKL=°B$(1)+°B$(7)+(EX=KXÆEY=KY):ñQRO=°B$(8):þ hê ûMID BOX r5ëI=3Ì12:õ¬I,10 ;"íí ":óI:þ | ê ûLOW ª †sëI=15Ì21:õ¬I,0íí;Ú1;Ù5;"¡";Ú0íí;"íí ";Ú1;"¡":óI:þ ê û& SET ª š'ñI$="íí ¡" ¤pëI=1Ì13 :õ¬I,0íí;Ú1;Ù5;"¡";Ú0íí;"íí ";Ú1;"¡":óI ®NëI=1Ì40(:öÙ7;¨R(240ð)+7,¨R(101e)+64@:óI ¸eõ¬0íí,0íí;Ù5;Ú1;I$;¬14,0íí;I$:à¬0íí,0íí;Ù5;Ú1;I$:þ Âê õSTATUS Ìší380|:õ¬15,1;"1=ALERT 7=PH.TORP ENER=";ENE;¬16,1;"2=STATUS 8=LR SENS STDT=";STD;¬17,1;"3=REPAIR 9=DOCKíí QUAD=";EX;"-";EY;¬18,1;"4=WARP 0=ORBIT SECT=";EXC;"-";EYC;¬19,1;"5=IMPUL. R=D.RAY TORP=";TOR;¬20,1;"6=PHASOR T=T.BEAM SCOR=";SCO;¬21,1;"S=SYSTEM M=MINE";¬14,1;ÙCON;Ý1;Û1;"COND" ÖGëI=1Ì6:õ¬I+14,1;Þ1;ÚC(I);Ù0íí;" ":óI àHëI=7Ì13 :õ¬I+8,10 ;Þ1;ÚC(I);Ù0íí;" ":óI ôLëI=15Ì21:õ¬I,9 ;Ú1;Ù5;"¡";¬I,20;"¡":óI:þ þê SR SCAN DISPLAY XëI=1Ì6:õ¬I+4,10 ;Ù3;I;" ";Ù6;Q$(I);" ";Ù3;I:óI tõ¬3,12;Ù3;"12345678";¬11,10 ;Ù7;"–";¬12,11;"”";Ù3;"12345678":þ ê ANY KEY WAIT &|à¬0íí,22;Ý1;Û1;"ANY KEY":×.7€3333,30:ò0íí:à¬0íí,22;Ú1;Ù5;"íí¡":þ 0ê LR SCAN :(ñSY=8:í2420t :úDEËì2460œ Dfí360h:õ¬16,2;"SPOCK HERE CAPTAIN, ENGAGING";¬17,2;"LR SENSORSëL.R. SCAN" NRö24,132„:ü207Ï,0íí:ö24,100d:ü207Ï,0íí:ö92\,158ž:ü0íí,-88X:ö163£,158ž:ü0íí,-88X:õ¬1,7;Ù3;EY-1;16;EY;25;(EY+1)*(EY<9 );¬13 ,7;EY-1;16;EY;25;(EY+1)*(EY<9 );¬3,1;EX-1;¬7,30;EX;¬11,1;(EX+1)*(EX<9 );¬3,30;EX-1;¬7,1;EX;¬7,30;EX;¬11,30;(EX+1)*(EX<9 );¬12,1;Ù7;"–";¬13 ,2;"”":å700¼ X.ëK=1Ì9 :ãX,Y,X1,Y1:ñI=EX+X:ñJ=EY+Y b4úI<1ÅI>9 ÅJ<1ÅJ>9 Ëì670ž v ñB$=G$(I,J):ñC$(I,J)=Á(°B$(1)+°B$(7)+(KX=IÆKY=J))+Á(°B$(3)+(°B$(6)ÆHEL>1)+(°B$(5)ÆHEL>2))+Á(°B$(2)+(HX=IÆHY=J)) €\õ¬X1,Y1;"K";C$(I,J,1);Y1+3;"P";C$(I,J,2);Y1+6;"B";C$(I,J,3) …1ëL=1Ì3:úC$(I,J,L)="0"ËñC$(I,J,L)="-" ‡óL ŠóK ”í540:í400:þ žañB=¨R(3):ñI$=" VOID SP.NOISENO DATA "(B*8-7ÌB*8):õ¬X1,Y1;I$:ì650Š ¼fä-1,-1,3,3,0íí,-1,7,3,1,-1,11,3 Æfä-1,0íí,3,12,0íí,0íí,7,12,1,0íí,11,12 Ðfä-1,1,3,21,0íí,1,7,21,1,1,11,21 Ú ê ALERT ä(ñSY=1:í2420t :úDEËì2460œ îÆõ¬16,2;"CONDITION IS ";ÙCON;"RED ALERTGREEN YELLOW "(CON*4.5ƒ-8ÌCON*4.5ƒ);¬18,2;Ù6;"PRESS APPROPRIATE COLOURë";¬19,2;"NEW CONDITION ?" ø'ñI$=¦:úI$É"2"ÆI$É"4"ÆI$É"6"Ëì760ø !ñCON=°I$:×.4LÌÌÌ,CON*5:þ ê STATUS (ñSY=2:í2420t :úDEËì2460œ *_ëI=1Ì7:õ¬I+14,1;ÚC(I);Ù0íí;V$(I);Ú0íí;Ù6;" ";T$(C(I)):óI 4í540:í380| >lëI=8Ì14:õ¬I+7,1;ÚC(I);Ù0íí;V$(I);Ú0íí;Ù6;" ";T$(C(I)):óI:í540:þ Rê REPAIRS \(ñSY=3:í2420t :úDEËì2460œ f=ëI=1Ì14:úC(I)<5ÆC(I)>1ËñC(I)=6 p'óI:ñENE=ENE-º(ENE/100d)*5:þ zê WARP DRIVE „(ñSY=4:í2420t :úDEËì2460œ ˜¤õ¬16,2;"WHAT QUADRANT DO YOU WISHÌ";¬17,2;"ì? ENTER COORDS.";¬18,2;">";:í1020ü:ñQX=°I$:õ" ";QX;" ";:×.4LÌÌÌ,5*QX:í980Ô:í1020ü:ñQY=°I$:õQY:×.4LÌÌÌ,5*QY:í980Ô:õ¬20,2;"WARP FACTOR (1-9) ?":í1020ü:ñFAC=°I$:×.4LÌÌÌ,5*FAC:í380|:õ¬16,2;"CHEKOV HERE CAPTAIN, SHALL I";¬17,2;"ENGAGE WARP DRIVE ? (Y/N)" ¢ ú¦="N"Ëþ ¬ú¦É"Y"Ëì930¢ ÀßñSTD=STD+FAC:ñENE=ENE-5*(FAC+½(EX-QX)+½(EY-QY)):í380|:õ¬16,2;"COURSE PLOTTEDÆLOCKED ¿";¬17,2;"ÌQUADRANT ";QX;" ";QY;¬19,2;"WARP FACTOR ";FAC:ñEX=QX:ñEY=QY:í90Z:í2060:úFAC>6Æ¨R(2)=2Ëí380|:õ¬16,2;"ENGINE DESTROYED ¿FREAK";¬17,2;"ACCIDENT. PLASMA LEAKÆ";¬18,2;"RUPTURE OF ENGINE CORE.";¬19,2;"ONLY IMPULSE ENGINES USABLE":ñC(4)=1:í540 Êí2600( :þ Ôê ò ÞëN=1Ì15:óN:þ èê 1.5ò òëI=1Ì100d:óI:þ üê GET KEY !ñI$=¦:úI$<"1"ÅI$>"9"Ëì1030 þ ê IMPULSE $(ñSY=5:í2420t :úDEËì2460œ .ií2520Ø :õ¬16,2;"CHEKOV HERE CAPTAIN, SHALL I";¬17,2;"ENGAGE ENGINES ? (Y/N)" 8 ú¦="N"Ëþ Bú¦É"Y"Ëì10808 LŽí380|:õ¬16,2;"COURSE PLOTTEDÆLOCKED ¿";¬17,2;"TO SECTOR ";TX;" ";TY:ñFAC=1:í2060:úZ$É" "Ëì3720ˆ V>ñQ$(EXC,EYC)=" ":ñEXC=TX:ñEYC=TY:ñQ$(TX,TY)="a":í2600( :þ `ê PHASORS j(ñSY=6:í2420t :úDEËì2460œ tmñY$="a":í2520Ø :õ¬16,2;"SULU HERE CAPTAIN, SHALL I";¬17,2;"FIRE PHASORS ? (Y/N)" ~ ú¦="N"Ëþ ˆú¦É"Y"Ëì1150~ ’˜í380|:õ¬16,2;"COURSE PLOTTEDÆLOCKED ON";¬17,2;"PHASOR FIRED";¬18,6;"S = SELF DESTRUCT":í2090*:ì1250â œê PHOTON TORPEDOS ¦(ñSY=7:í2420t :úDEËì2460œ °úÃTORËõ¬16,2;"SULU HERE CAPTAIN,I'M SORRY";¬17,2;"BUT THERE ARE'NT ANY";¬18,2;"TORPEDOS LEFT":í540:þ ºfí2520Ø :õ¬16,2;"SULU HERE CAPTAIN, SHALL I";¬17,2;"FIRE TORPEDOS ? (Y/N)" Ä ú¦="N"Ëþ Îú¦É"Y"Ëì1220Ä Ø¥í380|:ñTOR=TOR-1:ñY$="a":õ¬16,2;"COURSE PLOTTEDÆLOCKED ¿";¬17,2;"TORPEDO FIRED";¬18,6;"S = SELF DESTRUCT":í2150f âê CHECK SHOT ì%å1300:úZ$="j"ÅÃDESËì1400x ö8ëZ=1Ì12:ãI$,K:úZ$=I$ËñSCO=SCO+K:ì1290 óZ 6ñINR=(½(EXC-TX)<3Æ½(EYC