0, 0, 0, 0, 0 0, 22, 64, 14, 0 0, 47, 22, 3, 0 0, 20, 14, 14, 0 0, 10, 46, 3, 0 0, 66, 30, 14, 0 0, 57, 50, 3, 0 0, 29, 21, 14, 0 0, 0, 0, 0, 0 2, 51, 10, 14, 0 0, 42, 14, 3, 0 0, 5, 65, 14, 0 0, 0, 0, 0, 0 0, 5, 47, 14, 0 0, 3, 11, 3, 0 0, 60, 46, 14, 0 0, 0, 0, 0, 0 0, 1, 35, 14, 0 0, 0, 0, 0, 0 0, 32, 64, 14, 0 0, 40, 51, 1100, 0 0, 48, 38, 1100, 0 0, 16, 12, 1100, 0 0, 0, 0, 0, 0 0, 3, 53, 1100, 0 0, 59, 72, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0LARKEN | LIEUTENANT (v_:FED COR 1.1 2,600>d::" PROGRAM MANAGER":{n" FEDERATION DATA REGENERATOR"::" HOW MANY RECORDS";N"D",#1,"FED/DAT"#1, 20 NA$,5 SC$,5 HS$,15 R$,5 MS$,5 KK$,5 ID$""D",#2,"FED/BAC"9,#2, 20 BA$,5 BC$,5 BS$,15 B$,5 MB$,5 BK$,5 BD$D6I1NN@#1,IABA$NA$:BC$SC$:BS$HS$:B$R$:MB$MS$:BK$KK$:BD$ID$J#2,ITI^`"FED/DAT":"FED/BAC" "FED/DAT"hr " JOB COMPLETED"AC"9,#2, 20 F1;H1;D1;R3;D1;R1;L4;R4;D1;L6;U1;R2;U1;H3;U2;D1;R16", 1, 1 E1;R1;F1;L1;D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2","A0;U1;L2;U1;R2;E1;R3;F1;R2;D1;L2;D1;R3;E1;F1;D1;G1;H1;L11;G1;H1;U1;E1;F1;R3","A0;R9;E2;R2;F1;L2;R2;F1;G2;L1;H1;L9;G3;L3;U2;D1;E1;G1;Z2000Z2101505:386:Z9999:\*\>S$SQ$:YG0\G44\sT$"BM"((X))","((Y)2)DD$:\T$"BM"((X))","((Y))DE$:\T$"BM"((X))","((Y))DF$:\DS250" DAMAGED":44] ::" SCIENCE SCAN IN PROGRESS"]:]I120]LXOB(2,I):YOB(1,I):ZOB(3,I):Z1OB(0,I)]m (LXX)1(LYY)1 521]Z20 Z24 Z10521]Z19Z1(9)]OB(0,I)0:I22:" SENSORS REPORT THE FOLLOWING:":"D",#1,"SENSOR/DAT"^#1,200 DT$,5 PT$^ #1,Z1^$DT$:POPO(PT$)^,#1^ I20" SCIENCE SCAN COMPLETE......":" SENSORS REPORT NOTHING":" SIGNIFIGANT"^ ^ 44^ CD0CD0^ PD0PD0^TD0TD0^E5000E5000^E0E0^SE2500SE2500_SE0SE25_DS0DS0_!SD0SD0_.D0D0_=WD0WD0_LID0ID0_[T10T10_a_n250,1:_zAI14_F1175:F21_BI16_F1,F2_F1F12_ BI_!AI:_"CL$"Y"548`8#OB(3,44)2(LYKY)11(LXKX)11CL$"Y":539:CD$"** RED ** ":" ** RED ALERT **":"**?";:`q$(LYKY)10(LXKX)10CL$"N":CD$"* GREEN *":`w%`&I140`'OB(3,I)3OB(3,I)9OB(3,I)15OB(3,I)999OB(3,I)1101OB(3,44)0:I41:553`(OB(3,44)2`)`*`+a ,MY0MX0561a!-MY0MX0563a6.MY0MX0565aK/MY0MX0567aQ0at1 MYMX AG$"A0;"::AG$"A1;"az2a3 MY(MX) AG$"A0"::AG$"A3;"a4a5(MY)MX AG$"A2;"::AG$"A1;"a6a7 (MY)MX AG$"A2;"::AG$"A3;"a8bU9"BM"((CX))","((CY2))AG$";S4;C0;D2;C1;R2;E2;U8;H2;L5;G2;D8;F2;R3":b:"BM"((CX))","((CY2))CA$";S4;C0;D2;C0;R2;E2;U8;H2;L5;G2;D8;F2;R3":b;K$""bc?"O",#1,QD$:444c[@::" SECTOR DATA BANKS"::" A=QUADRANT/SECTOR STATUS":" B=KNOWN DATA SUMMARY":cyA" SELECT OPTION >>>":I0cBK$:II1cCK$"A" 584cDK$"B" 614cEI500 597cFK$""597cG578cH:" QUADRANT/SECTOR STATUS":d IJZ$"EVEN"dJAR12d"KBR19d8LDQ$(AR)(BR)dHM"I",#1,DQ$dTNI144dO#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I)dPIdQdR OB(3,44)2 604 : 609dSBRdTARdU"I",#1,QD$dVI144e W#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I)eXIeY#1,KY,KXe%Ze.[44eD\JZ$"EVEN" 607 eS]JZ$"EVEN"el^"",DQ$" SECURED":ez_JZ$"ODD"e`DQ$" SECURED";:eaJZ$"EVEN" 612ebJZ$"EVEN"ec"",DQ$" UNSECURED":edJZ$"ODD"eeDQ$" UNSECURED";:ef:f gAR12fhBR19f,iDQ$(AR)(BR)f<j"I",#1,DQ$fHkI144fl#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I):C(I)0626fmOB(3,I)3 I1I11fnOB(3,I)15OB(3,I)9 I3I31foOB(3,I)2100 I4I41fpOB(3,I)1100 I5I51gqOB(3,I)19OB(3,I)25 I2I21g2rOB(3,I)2 I6I61g9sIg?tg]u" QAUDRANT/SECTOR =";DQ$gv: OB(3,44)2 " STATUS = SECURED" : " STATUS = NON-SECURED"hw:" NEUTRAL PLANETS......";I1:" FRIENDLY PLANETS.....";I2:" ENEMY PLANETS........";I3: " FRIENDLY BASES.......";I4h\x" ENEMY BASES..........";I5:" SPACE STORMS.........";I6h~yI10:I20:I30:I40:I50:I60hzh{:" PRESS 'A' TO ABORT"h|X$h}X$"A" BR9:AR2h~BRhARh597(MY)MX AG$"A2;"::AG$"A1;"ete+ (MY)MX AG$"A2;"::AG$"A3;"e0eD"BM"((CX))","((CY2))AG$";S4;C0;D2;C1;R2;E2;U8;H2;L5;G2;D8;F2;R3":fMN"B Z2000Z21015960:3850:Z9999:g,*g@4S$SQ$:YG0gJ>500gvHT$"BM"((X))","((Y)2)DD$:gRT$"BM"((X))","((Y))DE$:g\T$"BM"((X))","((Y))DF$:370fZ1000Z11015970:3850:Z9999:g&PRIMITIVE PLANET STILL IN THE PRIMEVAL STATE. A GRADE 9 LEVEL OF DILITHIUM DEPOBM"((X))","((Y)215:(128,92),6,0:(128,92),6A,0:(128,92),5A,0:A:385: TNII 387:::JyRZ(0):CR12:CY191:A15:(128,CY),CR,1:(128,CY),CR,0:CYCY18.8:CRCR2.5::K@zAZ1(0):(123,191)(128,91),:(133,191)(128,91),:(127,91)(128,191),,BF:(127,91)(128,191),,BF:(123,191)(128,91),:(133,191)(128,91),:KJ{C1:K|Q$""::A1 (10):((255),(191)),1.5::A1 (80):((255),(191),5)::B(20):B4L }A(250)5:B(186)5:AA(30):AD1AA:AX(10)5:AY(10)5:(AAX,BAY,5)::L]~IITN:387:A130:J(70)94:H(70)68:(128,91)(J,H),::380:421:L385:CY91:A120:(128,CY,1):(128,CY,0):CYCY5::387:421MCR0:CY92:A15:(128,CY),CR,1:(128,CY),CR,0:CYCY20.4:CRCR2::387:A120:1,0:0,1:1,1:0,0::AZ2(0):M^Q$"Y"Q$"":@480," ";:@480,"**?";:380:1,1Mw"C1;"S$T$:"C1":M~:M"C0;"S$T$:"C1":MT$DA$:MT$DB$:MT$DC$:MCY191:A120:(128,CY,1):(128,CY5,0):CYCY5::NFCY191:A19:(128,CY)(128,CY15),:(128,CY)(128,CY15),:CYCY10::Nt387:S$"S"(25((TY)(TX)))";":N387:S$"S"(25((TY)(TX)))";":N(TY)(TX)PS35(3(TY))::PS35(3(TX))NPS6PS6:::O @480," DO YOU WISH TO QUIT";:K$:K$"Y"44O9"O",#1,"LOGOUT/DAT"OGPO(PO)OX#1,N$,PO,JAO^OwPO0:JA0:E0:D2505O443:"LOGOUT/WF4OKQ7:: R(100):R25R80395:390:385:1,1:383:PP500(200)100::P SH$"UP"PPPP(SP.03):SESEPPPKEEPP:DD(PP.70):PP200WDWD(PP2):SDSD(PP2)PuPP125WDWD(PP2):IDID(PP2)PPP180PDPD(PP2):TDTD(PP2)PPKV7::R(150)PR80Q417:PP500(300)150:SH$"UP"PPPP(SP.03):SESE(PP.70):SDSD(PP2)Q;1,1:383:EEPP:DDPPQuPP150 TDTD(PP2):PDPD(PP2):IDID(PP2)Q{QQ$"Y"Q$"":@480," ";:@480,"**?";:380:1,1Q(128,91),PS:T$"BM128,91;C1"R9A1(PS2)2:Y(PS)(128(PS2)):X(PS)(91(PS2)):(Y,X),(8),1,.4:(Y,X),1,1:R?RzT$"BM128,91;C1": TN0 ::(97,59)(160,123),,BF:R" EMERGENCY ALERT!!!!"::" WE HAVE ENCOUNTERED A":" SPACE STORM CAPTAIN ";N$SDD(500):WDWD(300):IDID(300):SE0:SDSD(300):CDCD(300):DSDS(300):EE(500):LYLY((50)25):LXLX((50)25):" DAMAGE REPORTED IN ALL":" SECTIONS CAPTAIN"S" INSTRUMENTS ERRATIC"SX0 X75 X(75)SY0 Y75 Y(75)ST LYKY KXLX KXKX(5)2:KYKY(5)2TT1Q$"Y"Q$"":380T7T{MY2 MY1 MX1 MX9:" SECTOR PARAMETERS INVALID":44TRAMY:RBMX:RCRA:RDRB:443UQ$""::1,1:RC(RARC):RD(RBRD):RCRC100RD:RCRC150:RDRC10:EERD:QD$(RA)(RB)UAI144:X(255):Y(191):(128,96)(X,Y),::"I",#1,QD$UMI144U`(128,96),I,0:U#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I):LX(70)5:LY(70)5U:I4599:(128,96),I,0:IU#1,KY,KXU:380U85U430:"O",#1,QD$V OB(1,0)0:OB(2,0)0:OB(3,0)0V,I144VIZOB(3,I):Z3OB(3,0)1VbZ19Z25OB(2,0)1VZ1999Z2101OB(2,0)1VZ9Z15OB(1,0)1V#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I)VËV:V:V:V:V#1,KY,KXVɚWʐW@SQ$S$:S$"S 3;":K$"":DS250" DAMAGED ":503WW̅Q$"Y"K$"W"474Wbͼ:1,0Wn΀I140WZOB(3,I):XOB(2,I)3.4:Y191(OB(1,I)2.5)WЅCD251468WхZ0473Wҁ538:C(I)1S$"S 4;":500:Z9999473XӅSM1 C(I)0473X ԅZ2473XՅX0X0X'օY0Y0X9ׅZ0(X,Y),3X\؅ C(I)1 CD250 (X,Y),1,1XcًIXڿ1,0:SM0:XLX3.4:Y191(LY2.5):Y2Y2XۅX2X2Xܻ(OX,OY)(NX,NY),,BXݻ(X5,Y52)(X5,Y52),:(X52,Y5)(X52,Y5),XX5X:Y5YYr߅Q$"Y""BM"((CX))","((CY2))CA$";S4;C0;U4;R1;E1;U2;H1;L3;G1;D2;F1;R1;D4;U1;L2;U2;D4;U2;R5;U2;D4":570ZCA$AG$:CXX:CYY:"BM"((X))","((Y2))AG$";S4;C1;U4;R1;E1;U2;H1;L3;G1;D2;F1;R1;D4;U1;L2;U2;D4;U2;R5;U2;D4":SH$"UP"569:AG$"A0;"Z"A0"ZNXAX(103.4):YAY(102.5):XBX(103.4):YBY(102.5)Z^LX10XA0ZmXA0XA0Z}LY65YA0ZYA0YA0ZOXXA:NXXB:OYYA:NYYBZKX0KX0ZKX75KX75ZKY0KY0ZKY75KY75[TA0(XA,YA)(XB,YB),,B["S$"S 3;":Q$"Y"495[FXGX:YGY:507:S$"S 3;":388[zOB(3,44)2(KYLY)16(KXLX)16496:497[XKX3.4:Y191(KY2.5):507:GXX:GYY:386[S$SQ$:Q$"Y"[YG0[32[Z1000Z1101506:386:Z9999:\$ 0, 54, 70, 24, 1 0, 0, 0, 0, 0 0, 37, 70, 24, 1 0, 0, 0, 0, 0 0, 12, 3, 24, 1 0, 0, 0, 0, 0 0, 32, 24, 24, 1 0, 0, 0, 0, 0 0, 57, 59, 24, 1 0, 0, 0, 0, 0 0, 58, 45, 24, 1 0, 0, 0, 0, 0 0, 27, 14, 24, 1 0, 0, 0, 0, 0 0, 71, 32, 24, 1 0, 0, 0, 0, 0 0, 38, 43, 24, 1 0, 0, 0, 0, 0 0, 36, 44, 24, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 38, 7, 2100, 1 0, 0, 0, 0, 0 0, 75, 28, 2100, 1 0, 0, 0, 0, 0 0, 68, 1, 2100, 1 0, 0, 0, 0, 0 0, 66, 12, 2100, 1 0, 0, 0, 0, 0 0, 55, 65, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 2, 0 38, 25 0, 0, 0, 0, 0 0, 38, 7, 2100, 1 0, 0, 0, 0, 0ACE STORMS.........";ST 10200 NP=0:EP=0:FB=0:EB=0:ST=0:FP=0 10210 CLOSE 10220 PRINT:PRINT" PRESS 'A' TO ABORT" 10230 X$=INKEY$ 10240 IFX$="A" THEN END 10250 NEXTRB 10260 NEXTRA NT " FRIENDLY BASES.......";FB 10190 PRINT" ENEMY BASES..........";EB:PRINT" SP"PRACTICE", 0, 0 , 1 0, 0, 0, 0, 0 0, 68, 1, 2100, 1 0, 0, 0, 0, 0 0, 66, 12, 2100, 1 0, 0, 0, 0, 0 0, 55, 65, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 2, 0 38, 25 0, 0, 0, 0, 0 0, 38, 7, 2100, 1 0, 0, 0, 0, 0D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2","L1;A0;E1;R1;F1;L1;D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2","A0;U1;L2;U1;R2;E1;R3;F1;R2;D1;L2;D1;R3;E1;F1;D1;G1;H1;L11;G1;H1;U1;E1;F1;R3","A0;R9;E2;R2;F1;L2;R2;F1;G2;L1;H1;L9;G3;L3;U2;D1;E1;G1;F1;H1;D1;R3;D1;R1;L4;R4;D1;L6;U1;R2;U1;H3;U2;D1;R16", 1, 1 E1;R1;F1;L1;D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2","A0;U1;L2;U1;R2;E1;R3;F1;R2;D1;L2;D1;R3;E1;F1;D1;G1;H1;L11;G1;H1;U1;E1;F1;R3","A0;R9;E2;R2;F1;L2;R2;F1;G2;L1;H1;L9;G3;L3;U2;D1;E1;G1; 0, 34, 34, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 15, 73, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 48, 47, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 72, 37, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 29, 51, 1100, 0 0, 34, 54, 1100, 0 0, 0, 0, 0, 0 0, 20, 68, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 74, 10, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 22, 23, 2100, 1 0, 39, 21, 2100, 1 0, 33, 72, 2100, 1 0, 0, 0, 0, 0 0, 61, 23, 61, 0 0, 42, 5, 62, 0 0, 71, 33, 63, 0 0, 44, 56, 0, 0 31, 75 0 0, 20, 68, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 32 , 0, 0 0, 65, 23, 2100, 1 0, 1, 8, 2100, 1 0, 64, 8, 2100, 1 0, 8, 1, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 70, 21, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 23, 17, 29, 0 0, 58, 36, 30, 0 0, 74, 61, 31, 0 0, 19, 20, 0, 0 25, CLASS G PLANET HIGH IN MINERAL CONTENT AND PRECIOUS METALS. A LOW GRADE DILITHIUM ORE IS EVIDENT. z/1?&9FJ&9 RTS RETURN CLASS M PLANET WITH AN EARTH LIKE ENVIORMENT. MODERATE LEVEL CIVILIZATION IS EVIDENT. @/1?&9FJ&9 RTS RETURN CLASS G PLANET WITH A HIGH GRADE DILITHIUM ORE DEPOSIT! RARE METALS ARE EVIDENT. @/1?&9FJ&9 RTS RETURN HIGHLY ADVANCED CIVILIZATION! EVIDENCE OF SUPERIORITY IS INDICATED. A FIRST CLASS FIND. HONORS ARE IN ORDER!! @/1?&9FJ&9 RTS RETURN CLASS M PLANET. LOW GRADE DILITHIUM DEPOSITS AND HIGH GRADE MINERALS. ;/1?&9FJ&9 RTS RETURN CLASS G PLANET. VERY LITTLE OF INTEREST. SOME MINERAL DEPOSITS ARE INDICATED. @/1?&9FJ&9 RTS RETURN CLASS M PLANET WITH A LEVEL 5 CIVILIZATION. GOOD GRADE OF DILITHIUM DEPOSITS ARE EVIDENT. @/1?&9FJ&9 RTS RETURN CLASS G PLANET WITH LOW GRADE DILITHUM AND RARE METAL TRACES ARE EVIDENT. ;/1?&9FJ&9 RTS RETURN CLASS M PLANET WITH A VERY EARTH LIKE SOCIETY. NOT FAR BEHIND FEDERATION IN TECH. j`/1?&9FJ&9 RTS RETURN NSORS REPORT THE FOLLOWING:":"D",#1,"SENSOR/DAT"\L#1,200 DT$,5 PT$\W#1,Z1\nDT$:POPO(PT$)\v#1\I20" CLASS G PLANET.":" SENSORS REPORT NOTHING":" SIGNIFIGANT"\\44\CD0CD0\PD0PD0\TD0TD0]E5000E5000]E0E0]0SE2500SE2500]A SE0SE25]P DS0DS0]_ SD0SD0]l D0D0]{ WD0WD0]ID0ID0]T10T10]]250,1:]AI14]F1175:F21]BI16]F1,F2]F1F12]BI]AI:^CL$"Y"539^vOB(3,44)2(LYKY)11(LXKX)11CL$"Y":530:CD$"** RED ** ":" ** RED ALERT **":"**?";:^(LYKY)10(LXKX)10CL$"N":CD$"* GREEN *":^^I140_OB(3,I)3OB(3,I)9OB(3,I)15OB(3,I)999OB(3,I)1101OB(3,44)0:I41:544_#OB(3,44)2_) _/!_5"1CL$"Y":530:CD$"** RED ** ":" ** RED ALERT **":"**?";:^(LYKY)10(LXKX)10CL$"N":CD$"* GREEN *":^^I140_OB(3,I)3OB(3,I)9OB(3,I)15OB(3,I)999OB(3,I)1101r F1,F2rF1F12rBIr(AI:r9CL$"Y"545r OB(3,44)2(LYKY)11(LXKX)11CL$"Y":536:CD$"** RED ** ":" ** RED ALERT **":"**?";:r!(LYKY)10(LXKX)10CL$"N":CD$"* GREEN *":r"r#I140s?$OB(3,I)3OB(3,I)9OB(3,I)15OB(3,I)999OB(3,I)1101OB(3,44)0:I41:550sN%OB(3,44)2sT&sZ's`(1CL$"Y":536:CD$"** RED ** ":" ** RED ALERT **":"**?";:r!(LYKY)10(LXKX)10CL$"N":CD$"* GREEN *":r"r#I140s?$OB(3,I)3OB( 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 48, 1, 3, 0 0, 63, 69, 3, 0 0, 0, 0, 0, 0 0, 55, 16, 3, 0 0, 5, 64, 3, 0 0, 43, 64, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 18, 31, 2, 0 0, 33, 57, 3, 0 0, 26, 15, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 60, 75, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 70, 34, 1100, 0 0, 64, 29, 1100, 0 0, 0, 0, 0, 0 0, 33, 47, 1100, 0 0, 35, 29, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 50, 32, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 38, 46, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 69, 75, 49, 0 0, 15, 23, 50, 0 0, 45, 6, 51, 0 0, 25, 60, 0, 0 65, 41 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0,23, 19, 0 0, 70, 38, 1, 0 8, 74 0, 42, 54, 2100, 1 0, 0, 0, 0, 0 0, 37, 44, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 31, 2, 2100, 1 0, 65, 72, 2100, 1 0, 0, 0, 0, 0 0, 35, 39, 2100, 1 0, 29, 11, 2100, 1 0, 56, 33, 17, 0 0, 74, 74, 18, 0 0, 21, 1)(128,91),:(127,91)(128,191),,BF:(127,91)(128,191),,BF:(123,191)(128,91),:(133,191)(128,91),:JvtC1:JuQ$""::A1 (10):((255),(191)),1.5::A1 (80):((255),(191),5)::B(20):B4K7vA(250)5:B(186)5:AA(30):AD1AA:AX(10)5:AY(10)5:(AAX,BAY,5)::KwIITN:380:A130:J(70)94:H(70)68:(128,91)(J,H),::373:414:Kx378:CY91:A120:(128,CY,1):(128,CY,0):CYCY5::380:414LHyCR0:CY92:A15:(128,CY),CR,1:(128,CY),CR,0:CYCY20.4:CRCR2::380:A120:1,0:0,1:1,1:0,0::AZ2(0):LzQ$"Y"Q$"":@480," ";:@480,"**?";:373:1,1L{"C1;"S$T$:"C1":L|:L}"C0;"S$T$:"C1":L~T$DA$:LT$DB$:LT$DC$:M#CY191:A120:(128,CY,1):(128,CY5,0):CYCY5::MrCY191:A19:(128,CY)(128,CY15),:(128,CY)(128,CY15),:CYCY10::M380:S$"S"(25((TY)(TX)))";":M380:S$"S"(25((TY)(TX)))";":N(TY)(TX)PS35(3(TY))::PS35(3(TX))NPS6PS6:::NL@480," DO YOU WISH TO QUIT";:K$:K$"Y"44Ne"O",#1,"LOGOUT/DAT"NsPO(PO)N#1,N$,PO,JANNPO0:JA0:E0:D2505N436:"LOGOUT/WF4OKQ7:: R(100):R25R80388:383:378:1,1:376:PP500(200)100::O9SH$"UP"PPPP(SP.03):SESEPPOwEEPP:DD(PP.70):PP200WDWD(PP2):SDSD(PP2)OPP125WDWD(PP2):IDID(PP2)OPP180PDPD(PP2):TDTD(PP2)OOKV7::R(150)OR80PJ410:PP500(300)150:SH$"UP"PPPP(SP.03):SESE(PP.70):SDSD(PP2)Pg1,1:376:EEPP:DDPPPPP150 TDTD(PP2):PDPD(PP2):IDID(PP2)PPQ$"Y"Q$"":@480," ";:@480,"**?";:373:1,1Q(128,91),PS:T$"BM128,91;C1"QeA1(PS2)2:Y(PS)(128(PS2)):X(PS)(91(PS2)):(Y,X),(8),1,.4:(Y,X),1,1:QkQT$"BM128,91;C1": TN0 ::(97,59)(160,123),,BF:Q" EMERGENCY ALERT!!!!"::" WE HAVE ENCOUNTERED A":" SPACE STORM CAPTAIN ";N$RDD(500):WDWD(300):IDID(300):SE0:SDSD(300):CDCD(300):DSDS(300):EE(500):LYLY((50)25):LXLX((50)25):" DAMAGE REPORTED IN ALL":" SECTIONS CAPTAIN"R" INSTRUMENTS ERRATIC"RX0 X75 X(75)SY0 Y75 Y(75)SS? LYKY KXLX KXKX(5)2:KYKY(5)2SES]Q$"Y"Q$"":373ScSMY2 MY1 MX1 MX9:" SECTOR PARAMETERS INVALID":44SRAMY:RBMX:RCRA:RDRB:436T-Q$""::1,1:RC(RARC):RD(RBRD):RCRC100RD:RCRC150:RDRC10:EERD:QD$(RA)(RB)TmI144:X(255):Y(191):(128,96)(X,Y),::"I",#1,QD$TyI144T(128,96),I,0:T#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I):LX(70)5:LY(70)5T:I4599:(128,96),I,0:IT#1,KY,KXU :373U83U*423:"O",#1,QD$ULOB(1,0)0:OB(2,0)0:OB(3,0)0UXI144UuZOB(3,I):Z3OB(3,0)1UZ19Z25OB(2,0)1UZ1999Z2101OB(2,0)1UZ9Z15OB(1,0)1U#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I)UU:V:V :V:V #1,KY,KXV&šV,ÐVlSQ$S$:S$"S 3;":K$"":DS250" DAMAGED ":494VŅQ$"Y"K$"W"467V4,1::1,0VǀI140VZOB(3,I):XOB(2,I)3.4:Y191(OB(1,I)2.5)VɅCD251461VʅZ0466Wˁ529:C(I)1S$"S 4;":491:Z9999466W1̅SM1 C(I)0466W>ͅZ2466WK΅X0X0WXυY0Y0WjЅZ0(X,Y),3Wх C(I)1 CD250 (X,Y),1,1WҋIW4,1:1,0:SM0:XLX3.4:Y191(LY2.5):Y2Y2WԅX2X2Wջ(OX,OY)(NX,NY),,BX ֻ(X5,Y52)(X5,Y52),:(X52,Y5)(X52,Y5),X.X5X:Y5YXXػ(X,Y2)(X,Y2),:(X2,Y)(X2,Y),XXAX(103.4):YAY(102.5):XBX(103.4):YBY(102.5)XڅLX10XA0XۅXA0XA0X܅LY65YA0X݅YA0YA0XOXXA:NXXB:OYYA:NYYBX߅KX0KX0YKX75KX75YKY0KY0Y.KY75KY75YG(XA,YA)(XB,YB),,BYbS$"S 3;":Q$"Y"486YXGX:YGY:498:S$"S 3;":381YOB(3,44)2(KYLY)16(KXLX)16487:488YXKX3.4:Y191(KY2.5):498:GXX:GYY:379YS$SQ$:Q$"Y"Z YG0Zꁥ32Z<Z1000Z1101497:379:Z9999:ZdZ2000Z2101496:379:Z9999:ZjZ~S$SQ$:YG0Z44ZT$"BM"((X))","((Y)2)DD$:ZT$"BM"((X))","((Y))DE$:[T$"BM"((X))","((Y))DF$:[$DS250" DAMAGED":44[K::" SCIENCE SCAN IN PROGRESS"[S:[_I120[XOB(2,I):YOB(1,I):ZOB(3,I):Z1OB(0,I):I21512[ (LXX)1(LYY)1 512[Z20 Z24 Z10512[Z19Z1(9)\0OB(0,I)0:I22:" SE (Y4)10 2578|PZ999 PZ1101@257,(183)(187)" ";Y4;" ";X4;" ";PZ1000;"%":II1200::PL1:PXX4:PYY4:2588PZ9PZ15@257,(191)(191)" ";Y4;" ";X4;" ";PZ10:II1200::PL1:PXX4:PYY4:2589I30PL0" PHASER LOCK ABORTED"9 9PL0449Q:" PHASERS LOCKED....":" PHASER POWER";PP:2629o"HASER PWR,Y,X";PP,PY,PX9(PY)10(PX)10 PPR500"INVALID PARAMETERS":449R(50):EER:PPPP59414:IITN:380:1,1:  SYLYPY:SXLXPX:TYPY:TXPX:388:N SYKY SXKX 382:387:1,1:371:378:386:2762300:e 1,1:371:I130: YOB(1,I):XOB(2,I):ZOB(3,I): SYY SXX 1,1:270::275;QZ1000Z1100383:378:386:BPZ1000:BSBP25:EEPP:PPPP(BP.025):369:POPOPP:BSBSPP:BP(BS25):ZBP1000:OB(3,I)Z:IAI:I31:SH$"UP"EE100;Z1000Z24375:" BASE DESTROYED":OB(3,IA)0:I31:DBDB1;Z3389:410:386:369:414:EEPP:I31:SH$"UP"EE100(EY)10(EX)10KTKU: KNNO:KZ7DYEY:DXEX:316:::296>1KNQN:KT7KUKT>UR(50): R10R40KT7:310>xR(50):R10R35KT7:331> R(50):R15R40KT7:310>!>"312:293>#BD10281>$KT1:312>%(DY)1(DX)1295?&KE5000:KS2500:KPKS25:KW0:KD0:DC20:KTKU?%'?3(KT0309??)I140?F*:?z+K$""K$:K$""BJ2:K$;:546:I41:306?,YOB(1,I):XOB(2,I):ZOB(3,I)?-DYYKY:DXXKX?.(DY)10(DX)10306?/Z3KT3:I40:OB(0,1)Y:OB(0,2)X:306@00Z24Z20KT20:I40:OB(0,1)Y:OB(0,2)X:306@l1Z2000Z2100KT1000:I40:OB(0,1)Y:OB(0,2)X:306@2:KT0KUKT:308@3KYKY(12)6:KXKX(12)6:KEKE(50):@4@5KT1000 KT20331:A+6KT7 (20)10KYKY((LYKY)((10)5)):KXKX((LXKX)((10)5)):A27:A^8KT1DYOB(1,0)KY:DXOB(2,0)KX:316A9KT20 KT1000 KT3 DYOB(0,1)KY:DXOB(0,2)KX:316A::A;329AYK1(DY)7KYKYDY1B?YK1(DY)6KYKY6B$@YK1(DY)7KYKYDY1B@AYK1(DY)6KYKY6B^BXK1(DX)7KXKXDX1ByCXK1(DX)6KXKX6BDXK1(DX)7KXKXDX1BEXK1(DX)6KXKX6BFKEKE(100)BGKZ7BHKT3350C IKT0KYKY((10)5):KXKX((10)5)CJC%KPP(400)100C4LKT7338COMKEKEPP:PPPP(300)CuNSH$"UP"PPPP(SP.03):SESEPPCO382:EEPP:DDPP:PP(PP):PO(POPP):1,1:376DPPP120WDWD(PP2):SDSD(PP2):CDCD(PP2):DSDS(PP2):PDPD(PP2):TDTD(PP2)DQD\RDYOB(0,1)KY:DXOB(0,2)KX:(DY)10(DX)10313:349DhSI140DoT:DUK$""K$:K$""BJ3:K$;:546:I41:348DVZOB(3,I):YOB(1,I):XOB(2,I): YOB(0,1) XOB(0,2) 348DW:EfXKT20Z20Z24ZZ20:PP(200):KEKEPP:R(20):IAI:I40:R10ZZ120:OB(3,IA)Z:Z20OB(3,IA)3:KU0:348EYKT1000 Z2100 100,4:1,4:100,4:1,4:100,4F4ZKT1000 Z2100 " STARBASE AT ";Y;X;" UNDER":" ATTACK CAPTAIN ";N$:" LOCATION ";YLY;XLX;" RELATIVE":" **?";:100,4:1,4:100,4:1,4:100,4F[ KT1000 Z2000 Z2100ZZ1999:PP(400):KEKEPP:PPPP(300):BSZ25:PPPP(Z.02):BSBSPP:Z(BS25):ZZ2000:OB(3,I)Z:IAI:I40:Z2000OB(3,IA)0:KU0F\F]POPO(PP3):G^:G_I140G`:G?aK$""K$:K$""BJ4:K$;:546GgbYOB(1,I)KY:XOB(2,I)KX:ZOB(3,I)Gc KT3 YDY XDX OB(3,I)14:I41:KT0:KU0:DC15GdGeGfBD10GgI2130Gh:GiK$""K$:K$""BJ5:K$;:546HjYOB(1,I):XOB(2,I):ZOB(3,I)HIkZ1001Z1100I40:OB(1,0)Y:OB(2,0)X:BD0HOlHUmHn:" YOU RAN OUT OF ENERGY CAPTAIN!":" SCORE >>> ";(PO):392Ho:" YOUR SHIP AND CREW WERE":" DESTROYED!":" SCORE >>> ";(PO):392HpIzqA13:(128,92),A:(128,92),A1,1:(128,92),A3,1:A:A15:(128,92),6,0:(128,92),6A,0:(128,92),5A,0:A:378: TNII 380:::IrRZ(0):CR12:CY191:A15:(128,CY),CR,1:(128,CY),CR,0:CYCY18.8:CRCR2.5::JlsAZ1(0):(123,191)(128,91),:(133,19: 6001000:SMSM100:KC(KN100):SP(SE25):SH$"DOWN"SPSP(SP2)&^E60366&nD2500367&}K$""132&&CD250" DAMAGED":44:::" COMPUTER ACTIVATED"::"COMP]";:DPCD2.5:127:CD':" PLEASE SELECT FUNCTION"'f" A=";(227)(230)," B=";(183)(187)::" C=";(175)(175)," D=";(191)(191):'" E=";(159)(159)," F=COMPUTER MAP":':" X=EXIT"'" COMPUTER READY > ";:K$"":132':K$"X"44'K$"F"SM1:452(B$" ### ### # "(+D$" ### ### ### ":PL1(7I140(HPL3:PL1(XC(I)0161(zZOB(3,I):YOB(1,I):XOB(2,I)(SYYLY:SXXLX(Z0161(Z3K$"E"(159)(159);:B$;SY;SX;:PLPL1)Z10Z14K$"D"(191)(191);:B$;SY;SX;Z10;:PLPL1)WZ20Z24K$"C"(175)(175);:B$;SY;SX;Z20;:PLPL1)Z1000Z1100K$"B"(183)(187);:D$;SY;SX;Z1000;:PLPL1)Z2000Z2100K$"A"(227)(230);:D$;SY;SX;Z2000;:PLPL1):PL2*44*DS250" DAMAGED":44*u::" SENSORS ACTIVATED"::"SCAN]";:DPDS2.5:127:DS::" SCANNING"*~KZ0*OB(3,44)2(KYLY)16(KXLX)16:(190)(188);" ";KYLY;" ";KXLX;" ";((KS50)(KE100));"%"+YTLY10:YBLY10:XLLX10:XRLX10:+5B$" ### ### #"+QD$" ### ### ###"+]I140+YOB(1,I):XOB(2,I):ZOB(3,I)+ YYT YYB XXL XXR 174+181+C(I)1+Y(YLY):X(XLX)+Z3:(159)(159);:B$;Y;X,MZ10Z14:(191)(191);:B$;Y;X;Z10;:" *":(X)6(Y)6KZ7,Z20Z24:(175)(175);:B$;Y;X;Z20,Z1001Z1100:(183)(187);:D$;Y;X;Z1000;:"% *":(Y)9(X)9KZ7-Z2000Z2100:(227)(230);:D$;Y;X;Z2000;:"%"--%44-5"ALLIANCE"-AI120-cYOB(1,I):XOB(2,I):ZOB(3,I)-SYYLY:SXXLX: Z3 Z10193-(SY)1(SX)1193-OB(3,I)24:POPO500-" ALLIANCE ESTABLISHED"-I40-Z10404.SH$"DOWN" (30)15191.:83.(€I140.JYOB(1,I):XOB(2,I):ZOB(3,I).WąZ0205.SYYLY:SXXLX:(SY)1(SX)1205.ƅZ1999203.DžZ19Z25201.ȁ205.V(0)479:@V,"ORBITING PLANET":POPO20:Z24OB(3,I)OB(3,I)1/[EE500:TT(5):DD(300):SESE200:I41:SDSD100:WDWD25:IDID25:PDPD50:TDTD50:205/˞::" DOCKING IN PROGRESS"::280:436:" DOCKING COMPLETE"::" UNDOCKING IN PROGRESS":2800)E5000:SE2500:D0:T10:POPO1000:SD0:WDWD100:IDID100:PD0:TDTD100:CDCD100:DSDS100:I410;͋:515:1040X΅TD250" DAMAGED":440uυT0" EXHAUSTED":440Ё4230щ"RPEDO #,Y,X ";TN,TY,TX: TNT " INSUFFICIENT SUPPLY ": T;" TORPEDOES LEFT":441҅TN3TN0(TY)10(TX)10" INVALID PARAMETERS":4413SYLYTY:SXLXTX:3881=ԁ3801^Յ KYSY KXSX 382:2301zTP800(200)100:1,11ׁ380:II1TN:370:1PA01ـII1TN1ڀI1301YOB(1,I):XOB(2,I):ZOB(3,I): SYY SXX 2252v܅Z3R(20):389:410:385:369:414:POPO50:R5R14POPO50:C(I)0:OB(3,I)0:TN0:414:375:" PLANET DESTROYED":I312݅Z10Z14389:410:385:369:414:POPO100:IAI:I31:(20)10ZZ1:OB(3,IA)Z2ޅZ1000Z1100383:378:3853߅Z1000Z1100BPZ1000:BSBP25:TPTP(BP.025):369:IAI:I31:POPOTP:BSBSTP:OB(3,IA)(BS25)1000:Z(BS25)1000:Z1000375:"BASE DESTROYED":POPO500:OB(3,IA)0:DBDB13Z9375:" PLANET DESTROYED":OB(3,IA)0:I313:3I4TT1:TP800(200)1004/II:TN0:4144CPO(PO):2384TP800(200)100:387:1,1:AI1 TN:370::378:AI1TN4KP(KS25)4聦385:3694TPTP(KP.025):POPOTP4KDKDTP:KEKETP:KSKS(TP.4):KP70KW(TP.7)5TT15KP(KS25)559TN0:KE0KD25002405B835375:POPO4500:" KLINGON DESTROYED!!":POPO500:JAJA1:541:OB(3,44)244:: KE5000:KS2500:KW0:KD0:KY(75):KX(75):KT0:KU0:445EE5063WDWD(50):PDPD(50):TDTD(50):CDCD(50):DSDS(50):IDID(50)6DSDSD(50)6T515:1146qPD250" DAMAGED":446CD250 DS250 K$"P"2616:PL0::" PHASERS ACTIVATED"::423:"PHSR]";:DPPD2.5:127:PD:7:" LOCKING PHASERS....."7{PYKYLY:PXKXLX:(PY)11(PX)11:(190)(188)" ";PY;" ";PX;" ";(KE100KS50);"%":260::PX11:PY117I1307Y4OB(1,I)LY:X4OB(2,I)LX:PZOB(3,I):K$""7PL02547(Y4)(PY)(X4)(PX)2588 (X4)10 K6:WARP4.14 5/27/85:(&HF800)1674:4,1:1,0wM"SOUND/WF4"::800:0&H0200:1&H0249:2&H0298"I",#1,"LOG/WF4"#1,N$,QN,NO,PS,DA$,DB$,DC$,DD$,DE$,DF$,Q,D"LOG/WF4":X52:Y52/ ::" WARP FACTOR 4.14"::::" STARSHIP COMPUTER BEING LOADED"8 0\ OB(3,44),C(45):382:C1:414 RAQ:RBD:QD$(RA)(RB):Q0:D0 "I",#1,QD$I144#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I):LY(70)5:LX(70)5I#1,KY,KX'E5000:SE2500:SH$"UP":T10:373JKE5000:KS2500:KD0:KW0:KT0]SPSE25:104SPSE25:SD250SE25SH$"DOWN"K$"T"28FK5FK928E1000A48::A32@0,"SHIP ENERGY]";:DPE50:DPDP5:AA143:CF1DP:(A);: @480,"";0SH$"DOWN"SPSP(SP2):"s";BE1000"e";L515"**?";: SM999" TIMES UP":"SCORE>";PO:391 K$"":132!K$"S"56"K$"W"72#K$"I"69$K$"A"183%K$"C"140&K$"T"101'K$"P"245(K$"D"123)K$"R"241.*K$"Q"391e+K$"L"@480,"**?";:452:(K$)0(K$)1045,YG0:V0:@480,(31," ");:@480,"";:382:380:22-CD2501,3:44::FK(K$):@480(0)2,"";.FK1129/FK21310FK51041FK7"P";:245*2FK8"TO";:206@3FK9"O";:194N4FK6163[5FK463i6FK3499r7448K$"":1329K$"T"104:K$"U":129;K$"D":13144?:" SHIELD POWER TRANSFER >";ST*@SE1"NO SHIELD ENERGY":44UA SEST "SORRY ENERGY TOO LOW":44~B EST "SORRY ENERGY TOO LOW":44CSESEST:EEST:"TRANSFER COMPLETE"D515:44EID250" IMPULSE DRIVE DAMAGED ":44::@0,"":::::::@0," IMPULSE ENGINES ENGAGED":>F"PULS]";:DPID2.5:127:IDG:" IMPULSE Y,X >";MY,MX: MY6 MX6 :" IMPULSE PARAMETERS INVALID":44::WF1:V2:76 HWD250 " WARP DRIVE DAMAGED ":44::@0,""::::::@0," WARP ENGINES ENGAGED "::YG1+I"WARP]";:DPWD2.5:127:WD}J:" WARP WF,Y,X >";WF,MY,MX:WF7425:V1:YG1:1,0:Q$"Y"467::452K(MX)6(MY)6"INVALID":44LII1WFMEE(20WF):40,3:245,1NLYMY75LYMY0"Y OUT OF BOUNDS":44*OLXMX75LXMX0"X OUT OF BOUNDS":44{PLYLYMY:LXLXMX:EE(((MY)(MX))3):SH$"UP"EE(((MY)(MX))50)QYG1467RSYTLY6:YBLY6:XLLX6:XRLX6TKV0:ZC0:KQ0:QK0UI144VXOB(2,I):YOB(1,I):ZOB(3,I):Z096'W YYT YYB XXL XXR 96GXSY(LYY):SX(LXX):Z096VYZ199995ZZ999ZZ:(SY)6(SX)695::KQ7:95[Z1995\Z9ZZ:(SY)4(SX)495::KV7:95]I4095^96_(LYY)0(LXX)0QK1`aMX0MY044bQK1" EMERGENCY":" COLLISION AVERTED":QK0:" EMERGENCY WARP SHUTDOWN":WDWD(50):EE50:MX((3)2):MY((3)2):LYLYMY:LXLXMX:83cMX0:MY0d163eK$"":132fK$"A"163gK$"O"206 h:"STATUS CONDITION ";CD$:E(E):D(D):T(T):"STARDATE ";:"###.#";SM600:"E=";E;" D=";D;" ";"T=";T:PO(PO):SP(SP):SE(SE) i"Y=";LY;"X=";LX;" Q/S>>";QD$;:OB(3,44)2" SECURED":: j"SHIELDS=";SE;" ";SP;"%"!k"POINTS=";PO:"KLINGONS=";JA,"BASES=";DB!ll" ENERGY RESERVE LEVELS":(191);" = CRITICAL":" PERCENT>>>>0 25 50 75 100";!mE1000A48::A32!n@320,"SHIP ENERGY]";:DPE50:DPDP5:AA143:CF1DP:(A);::@352," I++++I++++I++++I++++I";"#o@384,"SHLD ENERGY]";: SE500 A48::A32"pDPSE25:DPDP5:AA143:CF1DP:(A);::@416," I++++I++++I++++I++++I";:D044::@448,"SHIP DAMAGE]";:D2000A48::A16"qDPD25:DPDP5:AA143:CF1DP:(A);::44#Rr:" DAMAGE CONTROL REPORT":(172);" = OPERATIONAL":(179);" = INOPERABLE"::" PERCENT OF DAMAGE"#us">>>>>0% 25% 50% 75% 100%"#t@192,"WARP]";:DPWD2.5:127:WD;#u@224,"PULS]";:DPID2.5:127:ID;#v@256,"SHLD]";:DPSD2.5:127:SD;$w@288,"SCAN]";:DPDS2.5:127:DS;$=x@320,"COMP]";:DPCD2.5:127:CD;$ey@352,"TORP]";:DPTD2.5:127:TD;$z@384,"PHSR]";:DPPD2.5:127:PD;:@416," ":44${K$:K$""123$|K$"O"194$}K$"A"114$~44$DP100DP100:A39::A32%"DPDP5:AA140:CF1DP:(A);::%FSD250"SHIELDS DAMAGED":44%hSH$"UP":" SHIELDS UP";:44%SH$"DOWN":" SHIELDS DOWN";:44%537:K$:Q$"Y"K$;%OB(3,44)2136% KC 280::136&P421:398:404:KCKN100 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 10, 46, 3, 0 0, 42, 14, 3, 0 0, 0, 0, 0, 0 0, 11, 50, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 10, 3, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 30, 48, 3, 0 0, 0, 0, 0, 0 0, 21, 9, 3, 0 0, 46, 71, 3, 0 0, 42, 35, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 30, 39, 1100, 0 0, 42, 74, 1100, 0 0, 29, 27, 1100, 0 0, 54, 32, 1100, 0 0, 0, 0, 0, 0 0, 54, 45, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 34, 32, 2100, 1 0, 0, 0, 0, 0 0, 44, 63, 2100, 1 0, 11, 35, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 64, 51, 37, 0 0, 1, 67, 38, 0 0, 37, 16, 39, 0 0, 2, 68, 0, 0 23, 3 0, 0, 0, 0, 0 0, 34, 32, 2100, 1 0,P 9PB7 LDA #$4 STA $B6 LDA #$E0 STA $00BC LDA #$20 STA $B9 RTS END START 50 *START ADD. START LDX #$E000 *HI-SCR STRT STX $00BA LDX #$ 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 46, 6, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 27, 26, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 59, 45, 1100, 0 0, 0, 0, 0, 0 0, 73, 71, 1100, 0 0, 41, 25, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 64, 57, 1100, 0 0, 0, 0, 0, 0 0, 21, 60, 2100, 1 0, 7, 18, 2100, 1 0, 42, 73, 2100, 1 0, 0, 0, 0, 0 0, 13, 3, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 51, 59, 29, 0 0, 6, 24, 30, 0 0, 41, 62, 31, 0 0, 10, 8, 0, 0 49, 57 0, 0, 0, 0 0, 21, 60, 2100, 1 0, 7, 18, 2100, 1 BER (1,1 TO 1,9 OR 2,1 TO 2,9). I.E. YOU ARE WARPING TO A NEW SECTOR. THIS COSTS 1500 UNITS OF ENERGY. * C = COMPUTER MODE. ALLOWS THE CAPTAIN TO FIND THE RELATIVE LOCATION OF ANY OBJECT THAT THE SHIP HAS TARGETED. * A = ALLY A NEUTRAL PLANET OR LEVEL 0 ENEMY PLANET. MUST BE NEXT TO PLANET. * DO = DOCK WITH STARBASE. MUST BE NEXT TO A STARBASE. ORBIT PLANET. MUST BE NEXT TO FRIENDLY PLANET. * H = DISPLAY COMMAND SUMMARY. * Q = QUIT/END GAME * ******* FOLLOWING IS A SUMMARY OF THE SINGLE KEY COMMANDS THAT ARE AVAIABLE IF THE COMPUTER IS OPERATIONAL: 1=SU SHIELDS UP 2=SD SHIELDS DOWN 3=SS SCIENCE SCAN 4=SE SHIELD ENERGY TRANSFER 5= 6=SN LOCAL SCAN 7=P PHASERS 8=TO PHOTON TORPEDOES 9=DOCK/ORBIT NOTE- IF AN e APPEARS BEFORE THE COMMAND PROMPT THIS MEANS THAT THE SHIP ENERGY LEVEL HAS REACH A CRITICALLY LOW LEVEL OF 999 OR LESS. NOTE- IF AN s APPEARS BEFORE THE COMMAND PROMPT THIS MEANS THAT SHIELDS HAVE BEEN DROPPED DUE TO CRITICAL DAMAGE. NOTE- IF AN e APPEARS BEFORE THE COMMAND PROMPT THIS MEANS THAT THE SHIP ENERGY LEVEL HAS REACH A CRITICALLY LOW LEVEL OF 999 OR LESS. NOTE- IF AN s APPEARS BEFORE THE COMMAND PROMPT THIS MEANS THAT SHIELDS HAVE BEEN DROPPED DUE 0, 0, 0, 0, 0 0, 13, 37, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 9, 1, 3, 0 0, 0, 0, 0, 0 3, 60, 70, 3, 0 3, 14, 2, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 54, 57, 3, 0 0, 0, 0, 0, 0 0, 57, 27, 3, 0 0, 67, 46, 3, 0 0, 21, 24, 3, 0 0, 49, 49, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 11, 12, 1100, 0 0, 17, 58, 1100, 0 0, 0, 0, 0, 0 0, 4, 57, 1100, 0 0, 24, 29, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 65, 74, 1100, 0 0, 44, 65, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 3, 65, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 30, 15, 2100, 1 0, 7, 62, 2100, 1 0, 13, 56, 2100, 1 0, 47, 36, 33, 0 0, 62, 69, 34, 0 0, 39, 16, 35, 0 0, 56, 49, 0, 0 20, 3 , 1100, 0 0, 0, 0, 0, 0 0,NETS ARE BUILT TO LEVEL 4 WHEN FIRST ALLIED. THE KLINGON MUST BRING THE LEVEL DOWN TO 0 TO CAPTURE THE PLANET FOR THE KLINGON EMPIRE. THE PLANET CAN BE BUILT BACK TO LEVEL 4 BY DOCKING. THE LEVEL IS INCREASED BY 1 FOR EACH DOCK UNTIL LEVEL 4 IS REACHED. BE SURE TO SCIENCE SCAN A NEW ALLIED PLANET FOR SCIENTIFIC OR MINERAL RESOURCES........MORE POINTS!!!!!! ******* ENEMY PLANET ENEMY PLANETS WILL APPEAR AS RED BLOCKS WITH AN ASTRIX WHEN SENSOR SCANNED. ENEMY PLANETS WILL FIRE UPON THE ENTERPRISE IF SHE MOVES WITHIN 5 OR 6 SPACES OF THE PLANET. THEY MAY ALSO REQUEST HELP FROM A LOCAL KLINGON SHIP. AN ENEMY PLANET CAN BE ALLIED WITH THE FEDERATION AFTER BEING REDUCED TO LEVEL 0 USING TORPS AND PHASERS. CAUTION.......DO NOT DESTROY PLANETS. TORPEDOES CAN CAUSE A PLANET TO BECOME UNSTABLE AND EXPLODE! ******* FRIENDLY STARBASE FRIENDLY STARBASES ARE USED FOR SHIP DAMAGE REPAIR AND RESUPPLYING THE SHIPS ENERGY AND WEAPONS. SHIP ENERGY IS RESTORED TO 5000 UNITS. SHIELD ENERGY IS RESTORED TO 2500 UNITS. TORPEDOES ARE RE-STOCKED TO 10. EACH STARBASE DOCK COSTS 250 POINTS. SOME DEVICE REPAIR IS DONE. FRIENDLY STARBASES WILL APPEAR AS A BLUE 'LAZY L' WHEN SENSOR SCANNED. ******* ENEMY STARBASE ENEMY STARBASES WILL APPEAR AS RED 'HATS' WITH AND ASTRIX DURING A SENSOR SCAN. THESE BASES WILL FIRE UPON THE ENTERPRISE IF SHE MOVES WITHIN 8 LOCATIONS OF THE BASE. THEY WILL ALSO NOTIFY THE LOCAL KLINGON CRUISER OF YOUR ARRIVAL WHEN WITHIN 8 LOCATIONS. THE KLINGON USES THESE BASES TO REPAIR 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 4, 45, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 13, 1, 3, 0 0, 0, 0, 0, 0 0, 10, 40, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 15, 29, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 30, 4, 3, 0 0, 56, 14, 1100, 0 0, 41, 35, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 8, 64, 1100, 0 0, 0, 0, 0, 0 0, 64, 8, 1100, 0 0, 8, 1, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 70, 21, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 36, 58, 2100, 1 0, 8, 63, 2100, 1 0, 0, 0, 0, 0 0, 67, 45, 2100, 1 0, 42, 65, 21, 0 0, 20, 44, 22, 0 0, 56, 4, 23, 0 0, 39, 23, 0, 0 19, 3 , 0, 0, 0 0, 70, 21, 2100, 1 0, 0, 0, 0, 0 16, 23, 0 0, 56, 49, 1, 0 37, 42 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 3, 65, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 30, 15, 2100, 1 0, 7, 62, 2100, 1 0, 13, 56, 2100, 1 0, 47, 36, 21, 0 0, 62, 69, 22, 0 0, 39,P DAMAGE. THE SHIPS AND SHIELDS ENERGY LEVELS ARE ALSO DISPLAYED IN BAR GRAPH FORM TO ALLOW QUICK CHECKS OF PERCENT OF ENERGY IN RESERVE. IF EITHER ENERGY SOURCE IS VERY LOW THE BAR WILL BE IN RED. THE SHIP DAMAGE IS ALSO DISPLAYED IN BAR GRAPH FORM IF THERE IS ANY SHIP DAMAGE. THE BAR WILL BE YELLOW IF THE DAMAGE IS BELOW 2000 UNITS. A RED BAR INDICATES THAT THE DAMAGE LEVEL IS ABOVE 2000 UNITS AND VERY CRITICAL. 2500 UNITS OF DAMAGE WILL DESTORY THE SHIP!!!!!!!!!!!!!!!!!!! * SS SCIENCE SCAN WHEN NEXT TO A FRIENDLY PLANET, DOING A SCIENCE SCAN WILL SURVEY THE PLANET FOR SIGNIFIGANT SCIENTIFIC AND MINERAL FINDS. EXTRA POINTS CAN BE EARNED FOR SIGNIFIGANT FINDS. * DA DAMAGE REPORT WILL, IN BAR GRAPH FORMAT, DISPLAY THE PERCENT OF DEVICE DAMAGE FOLLOWED BY THE ACTUAL UNITS OF DAMAGE. IF A DEVICE BECOMES INOPERABLE DUE TO DAMAGE THE BAR WILL BE DISPLAYED IN RED. * R = REPAIR SHIPS DEVICES A LITTLE BIT. REQUIRES 50 UNITS OF SHIP ENERGY. * SN = TARGET A 10X10 AREA AND DISPLAY OBJECTS AND THEIR RELATIVE POSITIONS. 0, 0, 0, 0, 0 2, 13, 3, 3, 0 0, 75, 66, 3, 0 0, 0, 0, 0, 0 0, 73, 74, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 38, 22, 3, 0 0, 47, 38, 3, 0 0, 15, 28, 3, 0 0, 15, 42, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 48, 64, 3, 0 0, 0, 0, 0, 0 0, 28, 48, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 38, 63, 1100, 0 0, 0, 0, 0, 0 0, 50, 12, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 46, 7, 2100, 1 0, 16, 19, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 33, 59, 2100, 1 0, 1, 31, 2100, 1 0, 0, 0, 0, 0 0, 17, 74, 2100, 1 0, 0, 0, 0, 0 0, 34, 53, 25, 0 0, 72, 27, 26, 0 0, 36, 72, 27, 0 0, 74, 19, 0, 0 30, 14 , 0 0, 0, 0, 0, 0 0, 46, 7, 2100, GET UP (+) OR DOWN (-). X=RELATIVE POSITION OF TARGET RIGHT (+) OR LEFT (-). * TO = PHOTON TORPEDOES. RANGE =10X10 +- REQUIRES 3 PARAMETERS: #,Y,X #=NUMBER OF TORPEDOES IN BURST (1 TO 3) Y=SEE PHASERS X=SEE PHASERS NOTE- PHASERS AND TORPS REDUCE THE SHIELD AND ENERGY LEVELS ALONG WITH RAISING THE DAMAGE LEVEL OF THE ENEMY BEING HIT. * L = LONG RANGE SECTOR SCAN THIS IS A GRAPHIC DISPLAY OF ALL OBJECTS IN THE SECTOR. IF THE STARSHIP COMPUTER IS OPERATIONAL THEN FRIENDLY STARBASES ARE DISPLAYED IN A 'T' SHAPE. KNOWN ENEMY BASES ARE DISPLAYED IN A 'HAT' SHAPE. SCANNED PLANETS ARE DISPLAYED AS A FILLED IN CIRCLE. OBJECTS THAT HAVE NOT BEEN SCANNED ARE DISPLAYED AS EMPTY CIRCLES. WARP FACTOR 4 - THE ENTERPRISE LOCATION IS MARKED WITH A '+' SURROUNDED BY A 10X10 TARGET SQUARE. IF THE KLINGON IS WITHIN 15 LOCATIONS OF YOUR SHIP HE WILL BE GRAPHICALY DISPLAYED. WARP FACTOR 5 - THE ENTERPRISE LOCATION IS MARKED WITH A GRAPHIC REPRESENTATION OF THE STARSHIP WITH A SHIELD HALO, IF UP, AND IS SURROUNDED BY A 10X10 TARGET SQUARE. IF THE KLINGON IS WITHIN 15 LOCATIONS OF YOUR SHIP HE WILL BE GRAPHICALY DISPLAYED. IF THE STARSHIP COMPUTER IS NOT WORKING EVERYTHING IN THE SECTOR WILL BE DISPLAYED AS AN EMPTY 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 48, 25, 3, 0 0, 59, 70, 3, 0 0, 60, 39, 3, 0 0, 58, 8, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 32, 70, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 12, 44, 3, 0 0, 21, 50, 2, 0 0, 20, 64, 3, 0 0, 43, 70, 3, 0 0, 42, 68, 3, 0 0, 49, 66, 3, 0 0, 58, 68, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 61, 19, 1100, 0 0, 50, 63, 1100, 0 0, 45, 17, 1100, 0 0, 0, 0, 0, 0 0, 48, 29, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 48, 70, 1100, 0 0, 29, 49, 2100, 1 0, 0, 0, 0, 0 0, 71, 29, 2100, 1 0, 33, 66, 2100, 1 0, 37, 35, 2100, 1 0, 56, 51, 2100, 1 0, 26, 23, 2100, 1 0, 0, 0, 0, 0 0, 46, 32, 2100, 1 0, 52, 48, 2100, 1 0, 28, 4, 41, 0 0, 47, 33, 42, 0 0, 63, 72, 43, 0 0, 30, 40, 0, 0 23, 48 21S$):HS$(PO):" WELL DONE!!":" YOU HAVE BEATEN YOUR HIGH":" SCORE!!!!!"::aKK$(JA)k#1,I:" NAME ";NA$:" RANK ";R$:" HIGH SCORE >> ";(HS$):" TOTAL SCORE >> ";(SC$)"" KLINGONS >> ";(KK$),#1,1:TR$R$:TN$NA$:HP(SC$)w6"**********************":" >>> SENIOR OFFICER <<<":" NAME ";TN$:" RANK ";TR$:" TOP SCORE >>";HP@I(1)1J:TI15000:^:" MISSION COMPLETE AND LOGGED"hr| DR$"CADET "460:8 DR$"ENSIGN " DR$"CADET " 460: DR$"CADET " DR$"ENSIGN " DR$"LIEUTENANT " 460: DR$"CADET " DR$"ENSIGN " DR$"LIEUTENANT " DR$"CAPTAIN " 460: DR$"CADET " DR$"ENSIGN " DR$"LIEUTENANT " DR$"CAPTAIN " DR$"COMMODORE " 460: DR$"CADET " DR$"ENSIGN " DR$"LIEUTENANT " DR$"CAPTAIN " DR$"COMMODORE " DR$"ADMIRAL " 460:$*̞6րI120@256,"!!! YOU HAVE BEEN PROMOTED !!!":IC1400:IC:@256," "IGN " DR$"LIEUTENANT " DR$"CAPTAIN " DR$"COMMODORE " CLASS G PLANET HIGH IN MINERAL CONTENT AND PRECIOUS METALS. A LOW GRADE DILITHIUM ORE IS EVIDENT. z/1?&9FJ&9 RTS RETURN CLASS M PLANET WITH AN EARTH LIKE ENVIORMENT. MODERATE LEVEL CIVILIZATION IS EVIDENT. @/1?&9FJ&9 RTS RETURN CLASS G PLANET WITH A HIGH GRADE DILITHIUM ORE DEPOSIT! RARE METALS ARE EVIDENT. @/1?&9FJ&9 RTS RETURN HIGHLY ADVANCED CIVILIZATION! EVIDENCE OF SUPERIORITY IS INDICATED. A FIRST CLASS FIND. HONORS ARE IN ORDER!! @/1?&9FJ&9 RTS RETURN CLASS M PLANET. LOW GRADE DILITHIUM DEPOSITS AND HIGH GRADE MINERALS. ;/1?&9FJ&9 RTS RETURN CLASS G PLANET. VERY LITTLE OF INTEREST. SOME MINERAL DEPOSITS ARE INDICATED. @/1?&9FJ&9 RTS RETURN CLASS M PLANET WITH A LEVEL 5 CIVILIZATION. GOOD GRADE OF DILITHIUM DEPOSITS ARE EVIDENT. @/1?&9FJ&9 RTS RETURN CLASS G PLANET WITH LOW GRADE DILITHUM AND RARE METAL TRACES ARE EVIDENT. ;/1?&9FJ&9 RTS RETURN CLASS M PLANET WITH A VERY EARTH LIKE SOCIETY. NOT FAR BEHIND FEDERATION IN TECH. j`/1?&9FJ&9 RTS RETURN 0, 0, 0, 0, 0 0, 57, 19, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 19, 69, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 9, 39, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 35, 21, 1100, 0 0, 0, 0, 0, 0 0, 47, 11, 1100, 0 0, 0, 0, 0, 0 0, 27, 27, 1100, 0 0, 2, 16, 1100, 0 0, 40, 50, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 43, 51, 1100, 0 0, 0, 0, 0, 0 0, 49, 12, 2100, 1 0, 59, 67, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 57, 29, 2100, 1 0, 52, 65, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 30, 71, 5, 0 0, 2, 8, 6, 0 0, 60, 27, 7, 0 0, 2, 56, 0, 0 58, 32 51, 1100, 0 0, 0, 0, 0, 0 0, 49, 12, 2 ARE BUILT TO LEVEL 4 WHEN FIRST ALLIED. THE KLINGON MUST BRING THE LEVEL DOWN TO 0 TO CAPTURE THE PLANET FOR THE KLINGON EMPIRE. THE PLANET CAN BE BUILT BACK TO LEVEL 4 BY DOCKING. THE LEVEL IS INCREASED BY 1 FOR EACH DOCK UNTIL LEVEL 4 IS REACHED. BE SURE TO SCIENCE SCAN A NEW ALLIED PLANET FOR SCIENTIFIC OR MINERAL RESOURCES........MORE POINTS!!!!!! ******* ENEMY PLANET ENEMY PLANETS WILL APPEAR AS RED BLOCKS WITH AN ASTRIX WHEN SENSOR SCANNED. ENEMY PLANETS WILL FIRE UPON THE ENTERPRISE IF SHE MOVES WITHIN 5 OR 6 SPACES OF THE PLANET. THEY MAY ALSO REQUEST HELP FROM A LOCAL KLINGON SHIP. AN ENEMY PLANET CAN BE ALLIED WITH THE FEDERATION AFTER BEING REDUCED TO LEVEL 0 USING TORPS AND PHASERS. CAUTION.......DO NOT DESTROY PLANETS. TORPEDOES CAN CAUSE A PLANET TO BECOME UNSTABLE AND EXPLODE! ******* FRIENDLY STARBASE FRIENDLY STARBASES ARE USED FOR SHIP DAMAGE REPAIR AND RESUPPLYING THE SHIPS ENERGY AND WEAPONS. SHIP ENERGY IS RESTORED TO 5000 UNITS. SHIELD ENERGY IS RESTORED TO 2500 UNITS. TORPEDOES ARE RE-STOCKED TO 10. EACH STARBASE DOCK COSTS 250 POINTS. SOME DEVICE REPAIR IS DONE. FRIENDLY STARBASES WILL APPEAR AS A BLUE 'LAZY L' WHEN SENSOR SCANNED. ******* ENEMY STARBASE ENEMY STARBASES WILL APPEAR AS RED 'HATS' WITH AND ASTRIX DURING A SENSOR SCAN. THESE BASES WILL FIRE UPON THE ENTERPRISE IF SHE MOVES WITHIN 8 LOCATIONS OF THE BASE. THEY WILL ALSO NOTIFY THE LOCAL KLINGON CRUISER OF YOUR ARRIVAL WHEN WITHIN 8 LOCATIONS. THE KLINGON USES THESE BASES TO REPAIR AND  &: WARP/LGN REV. 1.8 03/04/85 L :WARP LOGIN AND DATA INITIALIZERd:" STARFLEET DATA LOG"::" CADET LOGIN---ACTIVATED":I1100:n:" NAME PLEASE";N$:" WELCOME ":" YOUR NAME CADET ";N$:" IS BEING PLACED IN THE ":" SHIPS LOG. WELCOME ABOARD!""!" ENTER ANY SEQUENCE OF NUMBERS":" TO BE USED AS YOUR STARFLEET":" IDENTIFICATION NUMBER."" >>>";IV"D",#1,"FED/DAT"#1, 20 NA$,5 SC$,5 HS$,15 R$,5 MS$,5 KK$,5 ID$ (1)0 " STARTING NEW LOG...":300VA(1)1:NA$N$:SC$(0):HS$(0):R$"CADET"|ID$(IV):MS$(0):KK$(0)#1,AȎ"WARP,NA$" ":R$" ":A0:SC$(A):HS$(A):MS$(A):KK$(A):ID$(A)1A12#1,A3 6150 NEW LOG...":300VA(1)1:NA$N$:SC$(0):HS$(0):R$"CADET"|ID$(IV):MS$(0):KK$(0)#1,AȎ"WARP,NA$" ":R$" ":A0:SC$(A):HS$(A):MS$(A):KK$(A):ID$(A)1A12#1,A3V&:@73,"WARP FACTOR X":@111,"BY":@139,"WAYNE MORSE":@330,"PUBLISHED BY":@389,"PRICKLY-PEAR SOFTWARE":@457,"COPYRIGHT 1985":X12000:& :7-30-85 WARP5 LOADER - WAYNE MORSE " VERSION 1.8A WM&(&H00B7)247SZ$"64K":SZ64:120&4'(::" WARP FACTOR":::" PLEASE SELECT SYSTEM"::" A = 32K COLOR COMPUTER":" B = 64K COLOR COMPUTER":" C = COLOR COMPUTER 2"'2:" PLEASE SELECT >>>";A$'>>";)nA$:A$""200)~҅A$"C"260)܅A$"A"450)A$"B"910)A$"D"920)200)::" WARP FACTOR 5.00":" HONOR ROLL"*"D",#1,"FED/DAT"*O#1, 20 NA$,5 SC$,5 HS$,15 R$,5 MS$,5 KK$,5 ID$*`"(1)0420*w,T$"INIT":110*6I1(1)*@#1,I*J(NA$,8)"PRACTICE"390*T:"NAME = ";NA$*^"RANK = ";R$+h:" HIGH SCORE >> ";(HS$)::" TOTAL SCORE >> ";(SC$)+Kr" MISSIONS #";(MS$):" KLINGONS #";(KK$)+]|X15000::+e:+k+u110+NA$"PRACTICE ":SC$(0):HS$(0):R$" ":MS$(0):KK$(0):ID$(0)+#1,1:#1,2+:110,<ž::SZ$"64K"" WARP FACTOR 5.00 64K"::::" WARP FACTOR 4.11 32K"::,V̉" LOGIN PLEASE:";N$,tN$N$((20(N$))," "),"D",#1,"FED/DAT",#1, 20 NA$,5 SC$,5 HS$,15 R$,5 MS$,5 KK$,5 ID$,(1)01300,I1(1)-#1,I:N$NA$ 620-a:" PLEASE ENTER YOUR":" STARFLEET ID NUMBER:"::" PRESS WHEN DONE"-K$:K$""540::SN$SN$K$:K$" " IV(SN$):550::540-&IV(ID$) " ID INCORRECT":" ENTRY DENIED"::-0:"NAME = ";NA$.:"RANK = ";R$:RZ$R$.OD:" HIGH SCORE >> ";(HS$)::" TOTAL SCORE >> ";(SC$).jN"MISSION #";(MS$)1.rXR1.bI(1)1.l:/vR0 :" SORRY........... BUT YOU ARE":" NOT IN THE LOG SIR."::" WOULD YOU LIKE TO":" SIGN UP (Y/N)";AN$: AN$"Y" "WARP/LGN"/R0/)660///GQN350:NO225:PS15/oR$"ENSIGN "QN425:NO300/R$"LIEUTENANT "QN400:NO300/R$"CAPTAIN "QN350:NO275/ƅR$"COMMODORE "QN300:NO2200ЅR$"ADMIRAL "QN275:NO15007څR$"FLEET ADMIRAL "QN250:NO1000DA$"BM126,87;A0;R9;E2;R2;F1;L2;R2;F1;G2;L1;H1;L9;G3;L3;U2;D1;E1;G1;F1;H1;D1;R3;D1;R1;L4;R4;D1;L6;U1;R2;U1;H3;U2;D1;R16"1DB$"BM121,95;A0;U1;L2;U1;R2;E1;R3;F1;R2;D1;L2;D1;R3;E1;F1;D1;G1;H1;L11;G1;H1;U1;E1;F1;R3"1kDC$"BM127,84;A0;L1;E1;R1;F1;L1;D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2"1DD$"L1;A0;E1;R1;F1;L1;D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2"2 DE$"A0;U1;L2;U1;R2;E1;R3;F1;R2;D1;L2;D1;R3;E1;F1;D1;G1;H1;L11;G1;H1;U1;E1;F1;R3"2DF$"A0;R9;E2;R2;F1;L2;R2;F1;G2;L1;H1;L9;G3;L3;U2;D1;E1;G1;F1;H1;D1;R3;D1;R1;L4;R4;D1;L6;U1;R2;U1;H3;U2;D1;R16"2 Q1:D12*RZ$"CADET "84024N$"PRACTICE"8402>9902H"O",#1,"LOG/WF4"3R#1,N$,QN,NO,PS,DA$,DB$,DC$,DD$,DE$,DF$,Q,D3\3+fSZ648903:pSZ329003Kz"WARP5/WF5"3\"WARP4/WF4"3N$"PRACTICE":QN500:NO400::" GAME STARTUP INITIATED......":" PLEASE STAND-BY":7403::" *** SECTOR INITIALIZATION ***":4?" THIS WILL DESTROY ALL CURRENT":" SECTOR DATA. SCORES WILL NOT":" BE DISTURBED!"4_:" ARE YOU SURE (Y/N)";K$4pK$"Y"1204~"SCINIT"4ʅ(&H00B7)38 (&H00B7)20 0:1:SZ$"64K":SZ64:1304ԁ1304ތ OB(3,44),C(45)5Y: " A=QUADRANT/SECTOR STATUS":" B=SELECT START SECTOR":" C=DEFAULT SECTOR (1,1)"::" MAKE SELECTION PLEASE";QS$5kQS$"A"10095}QS$"B"11305QS$"C"Q1:S1:5:" QUADRAND/SECTOR STATUS":5JZ$"EVEN"5RA125RB195QD$(RA)(RB)6"I",#1,QD$6$I1446>.#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I)6E8I6KB6pL OB(3,44)2 1150 : 12006xVRB6`RA6j: " ENTER DESIRED SECTOR":" >>>> Q,S >>>";Q,D7lQ1 Q2 D1 D9 : " PARAMETER ERROR":" DEFAULT QUADRANT/SECOTOR 1 1":Q1:S17t7/~JZ$"EVEN" 1180 7>JZ$"EVEN"7W"",QD$" SECURED":7eJZ$"ODD"7|QD$" SECURED";:7JZ$"EVEN" 12307JZ$"EVEN"7ć"",QD$" UNSECURED":7JZ$"ODD"7؇QD$" UNSECURED";:87NA$"PRACTICE ":SC$, : SECTOR INIT VERSION 2.8 3-18-85 WEMv:" PLEASE RELAX.....":" THIS WILL TAKE A FEW":" MINUTES.........""D",#1,"SENSOR/DAT"(2"SENSOR/DAT"50?K$"":142'@K$"T"112;AK$"U":137OBK$"D":140^CK$"E"70nDK$"N"173wE50F:" SHIELD POWER TRANSFER >";STGSE1"NO SHIELD ENERGY":50H SEST "SORRY ENERGY TOO LOW":50I EST "SORRY W&o:WARP5.059E 11/04/85 - SECURED SECTOR KLINGON BUG CORRECTED / EXTRA SPACE DURING KNOWN DATA SUMMARY W.M.&1,0:M"HIVI"::M"SOUND"&:1000:0&H0200:1&H0249:2&H0298&"I",#1,"LOG/WF4"'#1,N$,QN,NO,PS,DA$,DB$,DC$,DD$,DE$,DF$,Q,D' '"LOG/WF4"'(:X52:Y52' ::" WARP FACTOR 5.59E"::::" STARSHIP POWER SEQUENCE IN"::" PROGRESS........."::" PREPARE TO TAKE COMMAND!"' 0' OB(3,44),C(45):389:C1:421' RAQ:RBD:QD$(RA)(RB):Q0:D0( "I",#1,QD$(I144(_#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I):LY(70)5:LX(70)5(fI(t#1,KY,KX(z(E5000:SE2500:SH$"UP":T10:380(KE5000:KS2500:KD0:KW0:KT0(SPSE25:106(SPSE25:SD250SE25SH$"DOWN") K$"T"28)FK5FK928)6E1000A48::A32)y@0,"SHIP ENERGY]";:DPE50:DPDP5:AA143:CF1DP:(A);:)@480,"";:QQ$"L"QQ$"":380)SH$"DOWN"SPSP(SP2):"s";)E1000"e";)524:OB(3,44)2CD$"SECURED"*"**?";* K$"":137*!!K$"S"57*0"K$"W"73*?#K$"I"70*O$K$"A"189*_%K$"C"145*o&K$"T"103*'K$"P"251*(K$"D"K$"":126*)K$"R"247**K$"Q"398*+K$"L"@480,"**?";:459:(K$)0(K$)1045+(,YG0:V0:@480,(31," ");:@480,"";:389:387:22+\-CD2501,3:44::FK(K$):@480(0)2,"";+j.FK1132+x/FK2135+0FK5106+2FK7"P";:251+3FK8"TO";:212+4FK9"O";:200+5FK6169+6FK464+7FK3508+844, 9K$"":137,:K$"T"106,/;K$"U":132,CK$"N"169,k?44,@:" ENERGY TRANSFER":" - =FROM SHIELDS TO SHIP":" + =FROM SHIP TO SHIELDS":" ENERGY TO TRANSFER >";ST-ASE1"NO SHIELD ENERGY":44-/B SEST "SORRY ENERGY TOO LOW":44-XC EST "SORRY ENERGY TOO LOW":44-DSESEST:EEST:"TRANSFER COMPLETE"-E524:44-FID250" IMPULSE DRIVE DAMAGED ":44::@0,"":::::::@0," IMPULSE ENGINES ENGAGED":.G"PULS]";:DPID2.5:130:ID.}H:" IMPULSE Y,X >";MY,MX: MY6 MX6 :" IMPULSE PARAMETERS INVALID":44::WF1:V2:78.IWD250 " WARP DRIVE DAMAGED ":44::@0,""::::::@0," WARP ENGINES ENGAGED "::YG1/J"WARP]";:DPWD2.5:1  6*+,-12345SENSOR DAT WARP BASYSCINIT BAS WARP LGN LOGOUT WF4"SENSOR MSTOG WF4#;GEN BAS:$OP BAS!6HIVI BIN!WARP BIN.$SOUND BIN/WARP4 WF49SOUND WF40 1 1 DATFED DAT) 1 2 DAT% 1 3 DAT 1 4 DAT& 1 5 DAT$ 1 6 DAT' 1 7 DAT(" 1 8 DAT 1 9 DAT 2 1 DAT 2 2 DAT 2 3 DAT 2 4 DAT 2 5 DAT7 2 6 DAT 2 7 DAT8 2 8 DAT9 2 9 DATREAD BAS;%S BAS>FEDCOR BASPDATE BASWARP5 WF5!OPX BAS<#. :LOGOUT/EXIT WARP4 REV. 1.8C WM 7-30-85F"I",#1,"LOGOUT/DATW#1,N$,PO,JA](n2"LOGOUT/DAT> ";(HS$):" TOTAL SCORE >> ";(SC$)+6" KLINGONS >> ";(KK$)O@#1,1:TR$R$:TN$NA$:HP(SC$)J"**********************":" >>> SENIOR OFFICER <<<":" NAME ";TN$:" RANK ";TR$:" TOP SCORE >>";HPTI(1)1^:hrI15000:|:" MISSION COMPLETE AND LOGGED"#)H:" CONGRADULATIONS!!!"TII15‡@256,"!!! YOU HAVE BEEN PROMOTED !!!":IC1700:IC:@256," ":IC1700:IC̋II ч@256,"!!! YOU HAVE BEEN PROMOTED":" ONE STEP IN RANK !!!"֐#)H:" CONGRADULATIONS!!!"TII15‡@256,"!!! YOU HAVE BEEN PROMOTED !!!":IC1700:IC:@256," ":IC1700:IC̋II ч@256,"!!! YOU HAVE BEEN PROMOTED":" ONE STEPERCENT OF DEVICE DAMAGE FOLLOWED BY THE ACTUAL UNITS OF DAMAGE. IF A DEVICE BECOMES INOPERABLE DUE TO DAMAGE THE BAR WILL BE DISPLAYED IN RED. * R = REPAIR SHIPS DEVICES A LITTLE BIT. REQUIRES 50 UNITS OF"PRACTICE", 500, 400, 0,"BM126,87;A0;R9;E2;R2;F1;L2;R2;F1;G2;L1;H1;L9;G3;L3;U2;D1;E1;G1;F1;H1;D1;R3;D1;R1;L4;R4;D1;L6;U1;R2;U1;H3;U2;D1;R16","BM121,95;A0;U1;L2;U1;R2;E1;R3;F1;R2;D1;L2;D1;R3;E1;F1;D1;G1;H1;L11;G1;H1;U1;E1;F1;R3","BM127,84;A0;L1;E1;R1;F1;L1;D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2","L1;A0;E1;R1;F1;L1;D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2","A0;U1;L2;U1;R2;E1;R3;F1;R2;D1;L2;D1;R3;E1;F1;D1;G1;H1;L11;G1;H1;U1;E1;F1;R3","A0;R9;E2;R2;F1;L2;R2;F1;G2;L1;H1;L9;G3;L3;U2;D1;E1;G1;F1;H1;D1;R3;D1;R1;L4;R4;D1;L6;U1;R2;U1;H3;U2;D1;R16", 1, 1 E1;R1;F1;L1;D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2","A0;U1;L2;U1;R2;E1;R3;F1;R2;D1;L2;D1;R3;E1;F1;D1;G1;H1;L11;G1;H1;U1;E1;F1;R3","A0;R9;E2;R2;F1;L2;R2;F1;G2;L1;H1;L9;G3;L3;U2;D1;E1;G1; PWR=ENERGY OF PHASERS. MAXIMUM OF 500 UNITS ENERGY PER SHOT. (SUBRACTED FROM SHIP ENERGY) Y=RELATIVE POSITION OF TARGET UP (+) OR DOWN (-). X=RELATIVE POSITION OF TARGET RIGHT (+) OR LEFT (-). * TO = PHOTON TORPEDOES. RANGE =10X10 +- REQUIRES 3 PARAMETERS: #,Y,X #=NUMBER OF TORPEDOES IN BURST (1 TO 3) Y=SEE PHASERS X=SEE PHASERS NOTE- PHASERS AND TORPS REDUCE THE SHIELD AND ENERGY LEVELS ALONG WITH RAISING THE DAMAGE LEVEL OF THE ENEMY BEING HIT. * L = LONG RANGE SECTOR SCAN THIS IS A GRAPHIC DISPLAY OF ALL OBJECTS IN THE SECTOR. IF THE STARSHIP COMPUTER IS OPERATIONAL THEN FRIENDLY STARBASES ARE DISPLAYED IN A 'T' SHAPE. KNOWN ENEMY BASES ARE DISPLAYED IN A 'HAT' SHAPE. SCANNED PLANETS ARE DISPLAYED AS A FILLED IN CIRCLE. OBJECTS THAT HAVE NOT BEEN SCANNED ARE DISPLAYED AS EMPTY CIRCLES. WARP FACTOR 4 - THE ENTERPRISE LOCATION IS MARKED WITH A '+' SURROUNDED BY A 10X10 TARGET SQUARE. IF THE KLINGON IS WITHIN 15 LOCATIONS OF YOUR SHIP HE WILL BE GRAPHICALY DISPLAYED. WARP FACTOR 5 - THE ENTERPRISE LOCATION IS MARKED WITH A GRAPHIC REPRESENTATION OF THE STARSHIP WITH A SHIELD HALO, IF UP, AND IS SURROUNDED BY A 10X10 TARGET SQUARE. IF THE KLINGON IS WITHIN 15 LOCATIONS OF YOUR 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 31, 49, 3, 0 0, 0, 0, 0, 0 0, 7, 58, 3, 0 0, 10, 49, 3, 0 0, 0, 0, 0, 0 0, 46, 68, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 26, 58, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 15, 10, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 4, 12, 50, 3, 0 0, 51, 61, 3, 0 0, 19, 43, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 41, 67, 1100, 0 0, 74, 36, 1100, 0 0, 44, 12, 1100, 0 0, 74, 64, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 40, 2, 2100, 1 0, 30, 49, 2100, 1 0, 56, 52, 2100, 1 0, 0, 0, 0, 0 0, 18, 69, 2100, 1 0, 58, 50, 2100, 1 0, 73, 19, 2100, 1 0, 0, 0, 0, 0 0, 50, 64, 2100, 1 0, 20, 14, 13, 0 0, 54, 46, 14, 0 0, 30, 29, 15, 0 0, 75, 10, 0, 0 73, 65 0, 0, 0 0, 40, 2,UT OF ACTION, THE LONG RANGE SECTOR SCAN WILL BE USED TO DISPLAY THE SHIP MOVEMENT RELATIVE TO ALL OTHER OBJECTS. IF A WARP FACTOR OF 8 OR GREATER IS USED THE Y AND X PARAMETERS ARE A NEW SECTOR NUMBER (1,1 TO 1,9 OR 2,1 TO 2,9). I.E. YOU ARE WARPING TO A NEW SECTOR. THIS COSTS 1500 UNITS OF ENERGY. * C = COMPUTER MODE. ALLOWS THE CAPTAIN TO FIND THE RELATIVE LOCATION OF ANY OBJECT THAT THE SHIP HAS TARGETED. * A = ALLY A NEUTRAL PLANET OR LEVEL 0 ENEMY PLANET. MUST BE NEXT TO PLANET. * DO = DOCK WITH STARBASE. MUST BE NEXT TO A STARBASE. ORBIT PLANET. MUST BE NEXT TO FRIENDLY PLANET. * H = DISPLAY COMMAND SUMMARY. * Q = QUIT/END GAME ******* FOLLOWING IS A SUMMARY OF THE SINGLE KEY COMMANDS THAT ARE AVAIABLE IF THE COMPUTER IS OPERATIONAL: 1=SU SHIELDS UP 2=SD SHIELDS DOWN 3=SS SCIENCE SCAN 4=SE SHIELD ENERGY TRANSFER 5=ST STATUS DISPLAY 6=SN LOCAL SCAN 7=P PHASERS 8=TO PHOTON TORPEDOES 9=DOCK/ORBIT NOTE- IF AN e APPEARS BEFORE THE COMMAND PROMPT THIS MEANS THAT THE SHIP ENERGY LEVEL HAS REACH A CRITICALLY LOW LEVEL OF 999 OR LESS. NOTE- IF AN s APPEARS BEFORE THE COMMAND PROMPT THIS MEANS THAT SHIELDS HAVE BEEN DROPPED. ON TORPEDOES 9=DOCK/ORBIT NOTE- IF AN e APPEARS BEFORE THE COMMAND PROMPT THIS MEANS THAT THE SHIP ENERGY LEVEL HAS REACH A CRITICALLY LOW LEVEL OF 999 OR LESS. NOTE- IF AN s APPEARS BEFORE THE COMMAND PROMPT THIS MEANS THAT SHIELD 20, 25, 34, 3, 0 45, 17, 60, 3, 0 0, 20, 45, 14, 1 0, 0, 0, 0, 0 0, 20, 12, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 5, 12, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 3, 69, 1100, 0 0, 61, 63, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 2, 44, 1100, 0 0, 26, 14, 1100, 0 0, 5, 40, 1100, 0 0, 0, 0, 0, 0 0, 60, 64, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 73, 66, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 17, 43, 2100, 1 0, 50, 14, 2100, 1 0, 0, 0, 0, 0 0, 25, 19, 1, 0 0, 6, 67, 2, 0 0, 53, 27, 3, 0 0, 7, 63, 0, 0 67, 59 40, 1100, 0 0, 0, 0, 0, 0 0, 60, 64, 2THER CHANCE TO LOGIN. B=PRACTICE GAME IF "B" IS SELECTED THE GAME WILL START USING THE NAME OF "PRACTICE" AS THE CAPTAIN. SCORES WILL NOT BE RECORDED BUT ANY CHANGES TO THE SECTOR INFORMATION WILL BE SAVE. IT IS A GOOD IDEA TO PLAY A FEW PRACTICE GAMES BEFORE STARTING TO KEEP SCORE. DON'T BE MISLED, HOWEVER, THE PRACTICE GAME IS THE SAME AS A GAME WHEN THE SCORE IS KEPT. C=VIEW HONOR ROLL SELECTING "C" WILL CAUSE THE PLAYER LOG TO DISPLAY EACH PLAYER AND THEIR STATISTICS. THE FIRST PLAYER DISPLAYED IS THE SENIOR OFFICER. HE HOLDS THE HIGHEST SCORE TOTAL (THIS IS AN ACCUMULATION OF SCORES FOR EACH GAME PLAYED). D=INSTRUCTIONS/INFORMATION THIS OPTION ALLOWS YOU TO DISPLAY ANY OR ALL OF THE INSTRUCTION FILES ON THE SCREEN OR PRINTED ON THE PRINTER. E=INITIALIZE ALL SECTORS REBUILDS ALL 18 SECTORS WITH NEW INFORMATION. DOES NOT AFFECT SCORES. ************* THE GAME --------------- THERE ARE 2 QUADRANTS EACH CONSISTING OF 9 SECTORS (1-9). YOUR MISSION IS TO SECURE EACH SECTOR OF BOTH QUADRANTS. FOR A SECTOR TO BECOME SECURE THE FOLLOWING TASKS MUST BE ACCOMPLISHED: 1. ALL KLINGON STARBASES MUST BE DESTROYED. 2. ALL PLANETS MUST BE ALLIED WITH THE FEDERATION. 3. THE LAST KLINGON IN THE SECTOR MUST BE DESTROYED. A STATUS DISPLAY SHOULD NOW DISPLAY THE MESSAGE "SECURED". QUAD/SEC 1 1 WILL ALWAYS BE INITIALIZED SECURE. THERE WILL BE 10 ALLY PLANETS AND 5 FRIENDLY STARBASES. *************************** POINTS 0, 0, 0, 0, 0 0, 54, 71, 3, 0 0, 8, 49, 3, 0 0, 0, 0, 0, 0 0, 47, 54, 3, 0 0, 35, 14, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 63, 67, 3, 0 0, 24, 67, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 39, 19, 3, 0 0, 0, 0, 0, 0 0, 3, 22, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 63, 23, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 61, 42, 1100, 0 0, 52, 43, 1100, 0 0, 30, 44, 1100, 0 0, 36, 41, 1100, 0 0, 0, 0, 0, 0 0, 57, 30, 1100, 0 0, 67, 27, 1100, 0 0, 22, 62, 1100, 0 0, 18, 53, 1100, 0 0, 72, 26, 2100, 1 0, 0, 0, 0, 0 0, 57, 61, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 13, 28, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 71, 26, 9, 0 0, 45, 73, 10, 0 0, 66, 3, 11, 0 0, 25, 57, 0, 0 6, 39 8, 53, 1100, 0 0, 72UVER TO ANY POINT ON THIS GRID THAT IS NOT BEING OCCUPIED BY ANOTHER OBJECT. IF THE SHIP ATTEMPTS TO STOP ON AN OCCUPIED LOCATION A A COLLISION WILL RESULT AND THE DRIVE SYSTEM WILL RECIEVE SOME DAMAGE. ******* THERE ARE SPACE STORMS IN MOST SECTORS. SPACE STORMS CANNOT BE DETECTED BY YOUR SCANNER. IF THE ENTERPRISE ENTERS A SPACE STORM DAMAGE TO MOST DEVICES WILL RESULT ALONG WITH ENERGY LOSS AND A COMPLETE NEUTRALIZING OF THE SHIELDS. THE SHIP WILL BE DISPLACED TO ANOTHER LOCATION. INSTRUMENTS MAY OPERATE ERRATICLY FOR A SHORT TIME. ******* IN ADDITION TO FIGHTING THE KLINGON, ENEMY STARBASES, AND ENEMY PLANETS, YOU MUST CAPTURE THE LOYALTY OF AS MANY NEUTRAL AND LEVEL 0 ENEMY PLANETS AS POSSIBLE. THIS NOT ONLY HELPS YOUR SCORE BUT ALSO BUILDS UP YOUR REPAIR DEPOTS. ***************************** THE SHIP -------- THE FOLLOWING DEVICES ARE AVAILIABLE FROM THE COMMAND CONSOLE: WARP DRIVE AND IMPULSE DRIVE FOR MANUVERING. ------------------------------ PHASERS AND PHOTON TORPEDOES FOR WEAPONRY. ------------------------------ SHIELDS FOR SHIP DEFENSE. ------------------------------ SCANNER FOR SCIENCE SURVEYS AND LOCAL OBJECT INFORMATION ------------------------------ COMPUTER FOR RECALLING KNOWN RELATIVE POSITION DATA. ------------------------------ ALL OF THE ABOVE MENTIONED DEVICES ARE SUBJECT TO DAMAGE FROM ENEMY ATTACK!!!!!!!!!!!! ******* THE SHIELDS WILL PROTECT, TO SOME EXTENT, THE SHIP AGAINST ATTACK BY ENEMY FORCES. THE SHIELDS HAVE THEIR OWN ENERGY STORAGE CELLS. THESE 0, 0, 0, 0, 0 0, 14, 37, 3, 0 0, 0, 0, 0, 0 0, 52, 71, 3, 0 0, 0, 0, 0, 0 0, 42, 65, 3, 0 0, 50, 20, 3, 0 0, 44, 65, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 51, 14, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 50, 26, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 66, 62, 1100, 0 0, 33, 7, 1100, 0 0, 35, 5, 1100, 0 0, 23, 12, 1100, 0 0, 9, 48, 1100, 0 0, 0, 0, 0, 0 0, 50, 63, 1100, 0 0, 73, 39, 1100, 0 0, 42, 54, 2100, 1 0, 0, 0, 0, 0 0, 37, 44, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 31, 2, 2100, 1 0, 65, 72, 2100, 1 0, 0, 0, 0, 0 0, 35, 39, 2100, 1 0, 29, 11, 2100, 1 0, 56, 33, 17, 0 0, 74, 74, 18, 0 0, 21, 23, 19, 0 0, 70, 38, 0, 0 57, 30 , 42, 54, 2100ILL BE DISPLAYED ALONG WITH IT'S POSITION, Y-X, RELATIVE TO THE SHIP. THERE IS ONE OBJECT THE SCANNER CANNOT DETECT. THIS OBJECT IS THE SPACE-STORM. WHEN AN IMPULSE OR WARP MOVE IS COMPLETE, A "SCAN" WILL BE PERFORMED, UNLESS THE KLINGON HAS LOCKED ONTO THE ENTERPRISE. ******* THE SHIPS COMPUTER IS USED TO LOCATE THE RELATIVE POSITION OF A KNOWN OBJECT IN THE QUADRANT. WITH THE COMPUTER THE CAPTAIN CAN KEEP TRACK OF ALL OBJECTS THAT THE ENTERPRISE HAS SCANNED IN THE SECTOR. THIS IS VERY USEFUL FOR KEEPING TRACK OF KLINGON ATTACKS ON FRIENDLY PLANETS, NEUTRAL PLANETS, AND FEDERATION STARBASES. IF THE COMPUTER PICKS UP AN AUTOMATIC ALERT BEACON FROM A FEDERATION STARBASE UNDER KLINGON ATTACK THE RELATIVE POSITION OF THE STARBASE WILL BE DISPLAYED WITH A MESSAGE INDICATING THAT A STARBASE IS UNDER ATTACK. A KLAXON WILL SOUND BEFORE AND AFTER THE MESSAGE IS DISPLAED. ******* THE PHASERS WILL DO THE MOST GOOD WHEN USED AGAINST THE ENEMY PLANETS OR AGAINST THE KLINGON TO BRING HIS SHIELDS DOWN TO A REDUCED LEVEL. UNLESS THE ENEMY IS EXTREMELY LOW ON ENERGY THE PHASERS WILL NOT BE A MORTAL WEAPON. ******* THE PHOTON TORPEDOES WILL NOT BE VERY EFFECTIVE AGAINST THE KLINGON IF HIS SHIELDS ARE VERY STRONG. THE LOWER THE SHIELDS THE STRONGER THE BLAST FORCE. THE REAL ADVANTAGE IS THAT THREE CAN BE LAUNCHED AT ONCE. PHOTON TORPEDOES HAVE BEEN KNOWN TO DISRUPT A PLANETS STABILITY ON IMPACT DUE TO THE EXTREMELY CONCENTRATED ENERGY RELEASE. IT IS POSSIBLE TO DESTROY A PLANET WITH A PHOTON TORPEDOE HIT. THIS IS 0, 42, 14, 14, 0 0, 47, 73, 14, 0 0, 72, 28, 14, 0 0, 42, 9, 14, 0 0, 55, 50, 14, 0 0, 10, 36, 14, 0 0, 18, 53, 14, 0 0, 56, 29, 14, 0 0, 5, 47, 14, 0 7, 65, 62, 14, 0 0, 42, 23, 14, 0 0, 20, 69, 14, 0 0, 70, 67, 14, 0 0, 2, 35, 14, 0 0, 40, 24, 14, 0 0, 22, 9, 14, 0 0, 32, 35, 14, 0 0, 73, 7, 14, 0 0, 72, 18, 14, 0 0, 31, 4, 14, 0 0, 22,-1, 1100, 0 0, 24,-8, 1100, 0 0, 44,-10, 1100, 0 0, 27, 4, 1100, 0 0, 33, 9, 1100, 0 0, 46,-6, 1100, 0 0, 45, 1, 1100, 0 0, 36,-3, 1100, 0 0, 41, 2, 1100, 0 0, 17, 0, 1100, 0 0, 42, 54, 2100, 1 0, 0, 0, 0, 0 0, 37, 44, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 31, 2, 2100, 1 0, 65, 72, 2100, 1 0, 0, 0, 0, 0 0, 35, 39, 2100, 1 0, 29, 11, 2100, 1 0, 56, 33, 17, 0 0, 74, 74, 18, 0 0, 21, 23, 19, 0 0, 70, 38, 1, 0 8, 74 0, 42, 54, 2100, 1 0, 0, 0, 0, 0 0, 37, 44, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 31, 2, 2100, 1 0, 65, 72, 2100, 1 0, 0, 0, 0, 0 0, 35, 39, 2100, 1 0, 29, 11, 2100, 1 0, 56, 33, 17, 0 0, 74, 74, 18, 0 0, 21, OUND HAS BEEN ADDED TO HELP IDENTIFY CERTAIN FUNCTIONS. FOLLOWING IS A BREAKDOWN OF THE SOUNDS YOU MAY HEAR: 1. WHEN A LONG RANG SCAN IS IN PROGRESS A "PING" WILL BE HEARD FOR EACH OBJECT PLOTTED. 2. IF THE COMPUTER IS NOT OPERATIONAL A LOW "TONE" WILL BE HEARD EACH TIME A NUMBER KEY IS PRESSED TO ACTIVATE A FUNCTION. 3. IF THE KLINGON APPROACHES TO WITHIN 10 LOCATIONS OF THE ENTERPRISE A "KLAXON" WILL SOUND TO ALERT YOU TO THE DANGER (RED ALERT). 4. WHEN AN ATTACK MESSAGE IS RECEIVED FROM A FEDERATION STARBASE "KLAXON" WILL BE SOUNDED BEFORE AND AFTER THE MESSAGE IS DISPLAYED. 5. WHEN A MOVE IS INITIATED TONES WILL SOUND EACH TIME. *WARP FACTOR 5 ONLY* 6. EXPLOSION WHEN THE SHIP IS HIT BY KLINGON FIRE. 7. PHASER FIRE HAS AN AUDIBLE REVERB. 8. PHOTON LAUNCHES HAVE AN AUDIBLE 'PLOP' 9. A PING WILL BE GENERATED WHEN A KEY IS PRESSED AND DETECTED BY THE COMPUTER. IF YOU HEAR THE PING BUT NO CHARACTER IS DISPLAYED THE COMPUTER WILL TREAT IT AS IF IT WERE DISPLAYED AND ACT IF IT IS SINGLE KEY COMMAND. ****************************** WHEN A KEY IS PRESSED AND DETECTED BY THE COMPUTER. IF YOU HEAR THE PING BUT NO CHARACTER IS DISLARKEN @| LIEUTENANT Tvdddddddddddddddddddddddddddddddddddddddddddddddddddddddddd$$$$$$$$$$$$$$d$$$$$$$$$$$$$$$$$$d$ ` ` ` ` PRACTICE dddddddddddddddddddddddddddddddddddddddddddddddddddddddddd$$$$$$$$$$$$$$d$$$$$$$$$$$$$$$$$$d$ ` ` ` ` LARKEN @| LIEUTENANT Tvdddddddddddddddddddddddddddddddddddddddddddddddddddddddddd$$$$$$$$$$$$$$d$$$$$$$$$$$$$$$$$$d$ ` ` ` ` QQ$"L"QQ$"":3807SH$"DOWN"SPSP(SP2):"s";IE1000"e";S524_"**?";o K$"":137~!K$"S"57"K$"W"73#K$"I"70$K$"A"189%K$"C"145&K$"T"103'K$"P"251(K$"D"K$"":126)K$"R"247*K$"Q"398K+K$"L"@480,"**?";:459:(K$)0(K$)1045,YG0:V0:@480,(31," ");:@480,"";:389:387:22-CD2501,3:44::FK(K$):@480(0)2,"";.FK1132/FK21350FK5TA0TA1:Q$"Y"(OX,OY)(NX,NY),,B:32::32N1K5TA1TA0:Q$"Y"(OX,OY)(NX,NY),,B:32::32d2FK7"P";:251{3FK8"TO";:2124FK9"O";:2005FK61696FK4647FK35088449K$"":137:K$"T"106;K$"U":132 K$"N"1693?44@:" ENERGY TRANSFER":" - =FROM SHIELDS TO SHIP":" + =FROM SHIP TO SHIELDS":" ENERGY TO TRANSFER >";STASE1"NO SHIELD ENERGY":44B SEST "SORRY ENERGY TOO LOW":44 C EST "SORRY ENERGY TOO LOW":44IDSESEST:EEST:"TRANSFER COMPLETE"XE524:44FID250" IMPULSE DRIVE DAMAGED ":44::@0,"":::::::@0," IMPULSE ENGINES ENGAGED":G"PULS]";:DPID2.5:130:IDEH:" IMPULSE Y,X >";MY,MX: MY6 MX6 :" IMPULSE PARAMETERS INVALID":44::WF1:V2:78IWD250 " WARP DRIVE DAMAGED ":44::@0,""::::::@0," WARP ENGINES ENGAGED "::YG1J"WARP]";:DPWD2.5:130:WDK:" WARP WF,Y,X >";WF,MY,MX:WF7432:V130:WD/GK:" WARP WF,Y,X >";WF,MY,MX:WF7432:V1:YG1:556:1,0/aLQ$"Y"474::459/M(MX)6(MY)6"INVALID":44/NII1WF/OEE(20WF):40,3:245,1/PLYMY75LYMY0"Y OUT OF BOUNDS":440QLXMX75LXMX0"X OUT OF BOUNDS":440_RLYLYMY:LXLXMX:EE(((MY)(MX))3):SH$"UP"EE(((MY)(MX))50)0oSYG14740uT0UYTLY6:YBLY6:XLLX6:XRLX60VKV0:ZC0:KQ0:QK00WI1440XXOB(2,I):YOB(1,I):ZOB(3,I):Z0981 Y YYT YYB XXL XXR 981+ZSY(LYY):SX(LXX):Z0981:[Z1999971k\Z999ZZ:(SY)6(SX)697::KQ7:971x]Z19971^Z9ZZ:(SY)4(SX)497::KV7:971_I40971`981a(LYY)0(LXX)0QK11b1cMX0MY0442dQK1" EMERGENCY":" COLLISION AVERTED":QK0:" EMERGENCY WARP SHUTDOWN":WDWD(50):EE50:MX((3)2):MY((3)2):LYLYMY:LXLXMX:852eMX0:MY02f1692gK$"":1372hK$"A"1692iK$"O"2123jj:"STATUS CONDITION ";CD$:E(E):D(D):T(T):"STARDATE ";:"###.#";SM600:"E=";E;" D=";D;" ";"T=";T:PO(PO):SP(SP):SE(SE)3k"Y=";LY;"X=";LX;" Q/S>>";QD$;:OB(3,44)2" SECURED"::3l"SHIELDS=";SE;" ";SP;"%"3m"POINTS=";PO:"KLINGONS=";JA,"BASES=";DB4Pn" ENERGY RESERVE LEVELS":(191);" = CRITICAL":" PERCENT>>>>0 25 50 75 100";4hoE1000A48::A324p@320,"SHIP ENERGY]";:DPE50:DPDP5:AA143:CF1DP:(A);::@352," I++++I++++I++++I++++I";5q@384,"SHLD ENERGY]";: SE500 A48::A325rDPSE25:DPDP5:AA143:CF1DP:(A);::@416," I++++I++++I++++I++++I";:D044::@448,"SHIP DAMAGE]";:D2000A48::A165sDPD25:DPDP5:AA143:CF1DP:(A);::4468t::" DAMAGE CONTROL REPORT":(172);" = OPERATIONAL":(179);" = INOPERABLE"::" PERCENT OF DAMAGE"6[u">>>>>0% 25% 50% 75% 100%"6|v" I****I****I****I****I"6w@256,"WARP]";:DPWD2.5:130:WD;6x@288,"PULS]";:DPID2.5:130:ID;6y@320,"SHLD]";:DPSD2.5:130:SD;7z@352,"SCAN]";:DPDS2.5:130:DS;7D{@384,"COMP]";:DPCD2.5:130:CD;7l|@416,"TORP]";:DPTD2.5:130:TD;7}@448,"PHSR]";:DPPD2.5:130:PD;:447~571:K$""1267K$"O"2007K$"A"1167447DP100DP100:A39::A328DPDP5:AA140:CF1DP:(A);::8CSD250"SHIELDS DAMAGED":448nSH$"UP":Q$"Y"" SHIELDS UP";:448}569:328SH$"DOWN":Q$"Y"" SHIELDS DOWN";:448570:328546:5718OB(3,44)21418 KC 286::1419o428:405:411:KCKN100: 6001000:SMSM100:KC(KN100):SP(SE25):SH$"DOWN"SPSP(SP2)9}E603739D25003749K$""1379:CD250" DAMAGED":44:::" COMPUTER ACTIVATED"::"COMP]";:DPCD2.5:130:CD:#:" PLEASE SELECT FUNCTION":" A=";(227)(230)," B=";(183)(187);" *"::" C=";(175)(175)," D=";(191)(191);" *"::" E=";(159)(159)," F=COMPUTER MAP"::" G=SECTOR STATUS"::" X=EXIT"; " COMPUTER READY > ";:K$"":137;:K$"X"44;,K$"G"575;CK$"F"SM1:459;[B$" ### ### # ";xD$" ### ### ### ":PL1;I140;PL3:PL1;C(I)0167;ZOB(3,I):YOB(1,I):XOB(2,I);SYYLY:SXXLX;Z0167<Z3K$"E"(159)(159);:B$;SY;SX;:PLPL1EOB(3,44)2(KYLY)16(KXLX)16:(190)(188);" ";KYLY;" ";KXLX;" E=";(KE50);"% SH=";(KS25);"%">oYTLY10:YBLY10:XLLX10:XRLX10:>B$" ### ### #">D$" ### ### ###">I140>YOB(1,I):XOB(2,I):ZOB(3,I)> YYT YYB XXL XXR 180?187?C(I)1?+Y(YLY):X(XLX)?QZ3:(159)(159);:B$;Y;X?Z10Z14:(191)(191);:B$;Y;X;Z10;:" *":(X)6(Y)6KZ7?Z20Z24:(175)(175);:B$;Y;X;Z20@+Z1001Z1100:(183)(187);:D$;Y;X;Z1000;:"% *":(Y)9(X)9KZ7@jZ2000Z2100:(227)(230);:D$;Y;X;Z2000;:"%"@p@y44@"ALLIANCE"@I120@YOB(1,I):XOB(2,I):ZOB(3,I)@SYYLY:SXXLX: Z3 Z10199@(SY)1(SX)1199AOB(3,I)24:POPO500A-Ç" ALLIANCE ESTABLISHED"A6I40AFŅZ10411AeƅSH$"DOWN" (30)15197ApNj:85A|ȀI140AYOB(1,I):XOB(2,I):ZOB(3,I)AʅZ0211ASYYLY:SXXLX:(SY)1(SX)1211A̅Z1999209AͅZ19Z25207B΁211BJV(0)479:@V,"ORBITING PLANET":POPO20:Z24OB(3,I)OB(3,I)1BEE500:TT(5):DD(300):SESE200:I41:SDSD100:WDWD25:IDID25:PDPD50:TDTD50:211Cў::" DOCKING IN PROGRESS"::286:443:" DOCKING COMPLETE"::" UNDOCKING IN PROGRESS":286C}E5000:SE2500:D0:T10:POPO1000:SD0:WDWD100:IDID100:PD0:TDTD100:CDCD100:DSDS100:I41CӋ:524:106CԅTD250" DAMAGED":44CՅT0" EXHAUSTED":44Cց430D,׉"RPEDO #,Y,X ";TN,TY,TX: TNT " INSUFFICIENT SUPPLY ": T;" TORPEDOES LEFT":44Dk؅TN3TN0(TY)10(TX)10" INVALID PARAMETERS":44DSYLYTY:SXLXTX:395Dځ387Dۅ KYSY KXSX 389:236DTP800(200)100:1,1D݁387:II1TN:377:DPA0D߀II1TNE I130EBYOB(1,I):XOB(2,I):ZOB(3,I): SYY SXX 231EZ3R(20):396:417:392:376:421:POPO50:R5R14POPO50:C(I)0:OB(3,I)0:TN0:421:382:" PLANET DESTROYED":I31F)Z10Z14396:417:392:376:421:POPO100:IAI:I31:(20)10ZZ1:OB(3,IA)ZFPZ1000Z1100390:385:392GZ1000Z1100BPZ1000:BSBP25:TPTP(BP.035):376:IAI:I31:POPOTP:BSBSTP:OB(3,IA)(BS25)1000:Z(BS25)1000:Z1000382:"BASE DESTROYED":POPO500:OB(3,IA)0:DBDB1GEZ9382:" PLANET DESTROYED":OB(3,IA)0:I31GL:GSIGpTT1:TP800(200)100GII:TN0:421GPO(PO):244GTP800(200)100:394:1,1:AI1 TN:377::385:AI1TNGKP(KS25)G392:376H:KP35TPTP(KP.10):POPOTP::TPTP(KP.020):POPOTPHrKDKDTP:KEKETP:KSKS(TP.4):KP70KW(TP.7)H|TT1HKP(KS25)HHTN0:KE0KD2500246H85IK382:POPO4500:" KLINGON DESTROYED!!":POPO500:JAJA1:550:OB(3,44)244:: KE5000:KS2500:KW0:KD0:KY(75):KX(75):KT0:KU0:44IVEE50IWDWD(50):PDPD(50):TDTD(50):CDCD(50):DSDS(50):IDID(50)ISDSD(50)I524:116IPD250" DAMAGED":44J2CD250 DS250 K$"P"0,0: Q$"Y""P";:430:267::430:267JOB(3,44)2" SECTOR SECURED... NO TARGETS":44:::PL0::" PHASERS ACTIVATED"::430:"PHSR]";:DPPD2.5:130:PD:J:" LOCKING PHASERS....."KZPYKYLY:PXKXLX:(PY)11(PX)11:(190)(188)" ";PY;" ";PX;" E=";(KE50);"% SH=";(KS25);"%":266::PX11:PY11KfI130KY4OB(1,I)LY:X4OB(2,I)LX:PZOB(3,I):K$""KPL0260K(Y4)(PY)(X4)(PX)264K (X4)10 (Y4)10 263L[PZ999 PZ1101@257,(183)(187)" ";Y4;" ";X4;" ";PZ1000;"%":II1200::PL1:PXX4:PYY4:264LPZ9PZ15@257,(191)(191)" ";Y4;" ";X4;" ";PZ10:II1200::PL1:PXX4:PYY4:264LI30PL0" PHASER LOCK ABORTED"LL PL044M0 :" PHASERS LOCKED....":" PHASER POWER";PP:268MN "HASER PWR,Y,X";PP,PY,PXM (PY)10(PX)10 PPR500"INVALID PARAMETERS":44M R(50):EER:PPPP5M421:IITN:387:1,1MSYLYPY:SXLXPX:TYPY:TXPX:395N- SYKY SXKX 389:394:1,1:378:385:393:2822300ND1,1:378:I130NfYOB(1,I):XOB(2,I):ZOB(3,I)N SYY SXX 1,1:276::281O0Z1000Z1100390:385:393:BPZ1000:BSBP25:EEPP:PPPP(BP.025):376:POPOPP:BSBSPP:BP(BS25):ZBP1000:OB(3,I)Z:IAI:I31:SH$"UP"EE100OsZ1000Z24382:" BASE DESTROYED":OB(3,IA)0:I31:DBDB1OZ3396:417:393:376:421:EEPP:I31:SH$"UP"EE100P.Z10Z14396:417:393:376:421:R(20):EEPP:POPO(PP((Z10)15)):ZZ1:R12OB(3,I)Z:IAI:I31PlZ9421:OB(3,IA)3:" DEFENSES DESTROYED CAPTAIN":I31Pw:85PSH$"UP"EE100Q376:KP(KS25):EEPP:PPPP(KP.025):KEKEPP:POPO(JAPP):KDKDPP:KSKS(PP.8):PP120KWKW(PP2)QKE0KD2500246Q44Q3Q$"Y"QQ$"L"QYKY1KE1000KD2000365:298Q KY75KY0KX75KX0KX(75):KY(75):Q!EYLYKY:EXLXKX:DC0DCDC1:Q"K$"1"SH$"UP"R #(EY)10(EX)10KTKU: KNNO:KZ7DYEY:DXEX:323:::303R$$KNQN:KT7KUKTRH%R(50): R10R40KT7:317Rk&R(50):R10R35KT7:338R'R(50):R15R40KT7:317R(R)319:300R*BD10288R+KT1:319R,(DY)1(DX)1302S-KE5000:KS2500:KPKS25:KWPߧތ&9 ASIC AND DOS TO RAM ORG $0200 START ORCC #$50 LDX #$8000 ST1 LDA ,X STA $FFDF STA ,X+ STA $FFDE CMPX #$E000 BNE ST1 STA $FFDF ANDC ##F\ &FLLF1?&9FJ&9##Fd &FLF1?&9FJ&900!Bc##F /1?&9FJ&9 RTS RETURN ##F\ &FLLF1?&9FJ&9##Fd &FLF1?&9FJ&900!Bc##F /1?&9FJ&9 RTS RETURN 0:KD0:DC20:KTKUS.S&/KT0316S20I140S<1571Sl2K$""BJ2:555:I41:Q$"Y"313::313S3YOB(1,I):XOB(2,I):ZOB(3,I)S4DYYKY:DXXKXS5(DY)10(DX)10313S6Z3KT3:I40:OB(0,1)Y:OB(0,2)X:313T"7Z24Z20KT20:I40:OB(0,1)Y:OB(0,2)X:313T^8Z2000Z2100KT1000:I40:OB(0,1)Y:OB(0,2)X:313Tw9:KT0KUKT:315T:KYKY(12)6:KXKX(12)6:KEKE(50):T;T:UP?KT1DYOB(1,0)KY:DXOB(2,0)KX:323U@KT20 KT1000 KT3 DYOB(0,1)KY:DXOB(0,2)KX:323UA:UB336UCYK(DY):XK(DX)UD:UEYK1(DY)7KYKYDY1UFYK1(DY)6KYKY6VGYK1(DY)7KYKYDY1V2HYK1(DY)6KYKY6VPIXK1(DX)7KXKXDX1VkJXK1(DX)6KXKX6VKXK1(DX)7KXKXDX1VLXK1(DX)6KXKX6VMKEKE(100)VNKZ7VOKT3357VPKT0KYKY((10)5):KXKX((10)5)WQWRPP(400)100W&SKT7345WATKEKEPP:PPPP(300)WgUSH$"UP"PPPP(SP.03):SESEPPWV389:EEPP:DDPP:PP(PP):PO(POPP):1,1:383XWPP120WDWD(PP2):SDSD(PP2):CDCD(PP2):DSDS(PP2):PDPD(PP2):TDTD(PP2)X XXNYDYOB(0,1)KY:DXOB(0,2)KX:(DY)10(DX)10320:356XZZI140Xd[571X\K$""BJ3:555:I41:Q$"Y"355::355X]ZOB(3,I):YOB(1,I):XOB(2,I): YOB(0,1) XOB(0,2) 355X^:YY_KT20Z20Z24ZZ20:PP(200):KEKEPP:R(20):IAI:I40:R10ZZ120:OB(3,IA)Z:Z20OB(3,IA)3:KU0:355Y`KT1000 Z2100 100,4:1,4:100,4:1,4:100,4Z'aKT1000 Z2100 " STARBASE AT ";Y;X;" UNDER":" ATTACK CAPTAIN ";N$:" LOCATION ";YLY;XLX;" RELATIVE":" **?";:100,4:1,4:100,4:1,4:100,4Zb KT1000 Z2000 Z2100ZZ1999:PP(400):KEKEPP:PPPP(300):BSZ25:PPPP(Z.02):BSBSPP:Z(BS25):ZZ2000:OB(3,I)Z:IAI:I40:Z2000OB(3,IA)0:KU0ZcZdPOPO(PP3):Ze:[fI140[ g571[#hK$""BJ4:555[KiYOB(1,I)KY:XOB(2,I)KX:ZOB(3,I)[j KT3 YDY XDX OB(3,I)14:I41:KT0:KU0:DC15[k[l[mBD10[nI2130[o571[pK$""BJ5:555[qYOB(1,I):XOB(2,I):ZOB(3,I)\rZ1001Z1100I40:OB(1,0)Y:OB(2,0)X:BD0\$s\*t\ou:" YOU RAN OUT OF ENERGY CAPTAIN!":" SCORE >>> ";(PO):399\v:" YOUR SHIP AND CREW WERE":" DESTROYED!":" SCORE >>> ";(PO):399\w]OxA13:(128,92),A:(128,92),A1,1:(128,92),A3,1:A:A15:(128,92),6,0:(128,92),6A,0:(128,92),5A,0:A:385: TNII 387:::]yRZ(0):CR12:CY191:A15:(128,CY),CR,1:(128,CY),CR,0:CYCY18.8:CRCR2.5::^AzAZ1(0):(123,191)(128,91),:(133,191)(128,91),:(127,91)(128,191),,BF:(127,91)(128,191),,BF:(123,191)(128,91),:(133,191)(128,91),:^K{C1:^|Q$""::A1 (10):((255),(191)),1.5::A1 (80):((255),(191),5)::B(20):B4_ }A(250)5:B(186)5:AA(30):AD1AA:AX(10)5:AY(10)5:(AAX,BAY,5)::_^~IITN:387:A130:J(70)94:H(70)68:(128,91)(J,H),::380:421:_385:CY91:A120:(128,CY,1):(128,CY,0):CYCY5::387:421`CR0:CY92:A15:(128,CY),CR,1:(128,CY),CR,0:CYCY20.4:CRCR2::387:A120:1,0:0,1:1,1:0,0::AZ2(0):`_Q$"Y"Q$"":@480," ";:@480,"**?";:380:1,1`x"C1;"S$T$:"C1":`:`"C0;"S$T$:"C1":`T$DA$:`T$DB$:`T$DC$:`CY191:A120:(128,CY,1):(128,CY5,0):CYCY5::aGCY191:A19:(128,CY)(128,CY15),:(128,CY)(128,CY15),:CYCY10::au387:S$"S"(25((TY)(TX)))";":a387:S$"S"(25((TY)(TX)))";":a(TY)(TX)PS35(3(TY))::PS35(3(TX))aPS6PS6:::b!@480," DO YOU WISH TO QUIT";:K$:K$"Y"44b:"O",#1,"LOGOUT/DAT"bHPO(PO)bY#1,N$,PO,JAb_bxPO0:JA0:E0:D2505b443:"LOGOUT/WF4bKQ7:: R(100):R25R80395:390:385:1,1:383:PP500(200)100::cSH$"UP"PPPP(SP.03):SESEPPcLEEPP:DD(PP.70):PP200WDWD(PP2):SDSD(PP2)cvPP125WDWD(PP2):IDID(PP2)cPP180PDPD(PP2):TDTD(PP2)ccKV7::R(150)cR80d417:PP500(300)150:SH$"UP"PPPP(SP.03):SESE(PP.70):SDSD(PP2)d<1,1:383:EEPP:DDPPdvPP150 TDTD(PP2):PDPD(PP2):IDID(PP2)d|dQ$"Y"Q$"":@480," ";:@480,"**?";:380:1,1d(128,91),PS:T$"BM128,91;C1"e:A1(PS2)2:Y(PS)(128(PS2)):X(PS)(91(PS2)):(Y,X),(8),1,.4:(Y,X),1,1:e@e{T$"BM128,91;C1": TN0 ::(97,59)(160,123),,BF:e" EMERGENCY ALERT!!!!"::" WE HAVE ENCOUNTERED A":" SPACE STORM CAPTAIN ";N$fDD(500):WDWD(300):IDID(300):SE0:SDSD(300):CDCD(300):DSDS(300):EE(500):LYLY((50)25):LXLX((50)25):" DAMAGE REPORTED IN ALL":" SECTIONS CAPTAIN"f" INSTRUMENTS ERRATIC"fX0 X75 X(75)fY0 Y75 Y(75)fg LYKY KXLX KXKX(5)2:KYKY(5)2gg2Q$"Y"Q$"":380g8g|MY2 MY1 MX1 MX9:" SECTOR PARAMETERS INVALID":44gRAMY:RBMX:RCRA:RDRB:443hQ$""::1,1:RC(RARC):RD(RBRD):RCRC100RD:RCRC150:RDRC10:EERD:QD$(RA)(RB)hBI144:X(255):Y(191):(128,96)(X,Y),::"I",#1,QD$hNI144ha(128,96),I,0:h#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I):LX(70)5:LY(70)5h:I4599:(128,96),I,0:Ih#1,KY,KXh:380h85h430:"O",#1,QD$i!OB(1,0)0:OB(2,0)0:OB(3,0)0i-I144iJZOB(3,I):Z3OB(3,0)1icZ19Z25OB(2,0)1iZ1999Z2101OB(2,0)1iZ9Z15OB(1,0)1i#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I)iËi:i:i:i:i#1,KY,KXiɚjʐjASQ$S$:S$"S 3;":K$"":DS250" DAMAGED ":503jX̅Q$"Y"K$"W"474jcͼ:1,0jo΀I140jZOB(3,I):XOB(2,I)3.4:Y191(OB(1,I)2.5)jЅCD251468jхZ0473jҁ538:C(I)1S$"S 4;":500:Z9999473kӅSM1 C(I)0473kԅZ2473kՅX0X0k(օY0Y0k:ׅZ0(X,Y),3k]؅ C(I)1 CD250 (X,Y),1,1kdًIkڿ1,0:SM0:XLX3.4:Y191(LY2.5):Y2Y2kۅX2X2kܻ(OX,OY)(NX,NY),,Bkݻ(X5,Y52)(X5,Y52),:(X52,Y5)(X52,Y5),kX5X:Y5Yls߅Q$"Y""BM"((CX))","((CY2))CA$";S4;C0;U4;R1;E1;U2;H1;L3;G1;D2;F1;R1;D4;U1;L2;U2;D4;U2;R5;U2;D4":570m CA$AG$:CXX:CYY:"BM"((X))","((Y2))AG$";S4;C1;U4;R1;E1;U2;H1;L3;G1;D2;F1;R1;D4;U1;L2;U2;D4;U2;R5;U2;D4":SH$"UP"569:AG$"A0;"m"A0"mOXAX(103.4):YAY(102.5):XBX(103.4):YBY(102.5)m_LX10XA0mnXA0XA0m~LY65YA0mYA0YA0mOXXA:NXXB:OYYA:NYYBmKX0KX0mKX75KX75mKY0KY0mKY75KY75nTA0(XA,YA)(XB,YB),,Bn#S$"S 3;":Q$"Y"495nGXGX:YGY:507:S$"S 3;":388n{OB(3,44)2(KYLY)16(KXLX)16496:497nXKX3.4:Y191(KY2.5):507:GXX:GYY:386nS$SQ$:Q$"Y"nYG0n32nZ1000Z1101506:386:Z9999:o%Z2000Z2101505:386:Z9999:o+o?S$SQ$:YG0oH44otT$"BM"((X))","((Y)2)DD$:oT$"BM"((X))","((Y))DE$:oT$"BM"((X))","((Y))DF$:oDS250" DAMAGED":44p ::" SCIENCE SCAN IN PROGRESS"p:p I120pMXOB(2,I):YOB(1,I):ZOB(3,I):Z1OB(0,I)pn (LXX)1(LYY)1 521pZ20 Z24 Z10521pZ19Z1(9)pOB(0,I)0:I22:" SENSORS REPORT THE FOLLOWING:":"D",#1,"SENSOR/DAT"q#1,200 DT$,5 PT$q#1,Z1q%DT$:POPO(PT$)q-#1q I20" SCIENCE SCAN COMPLETE......":" SENSORS REPORT NOTHING":" SIGNIFIGANT"q q 44q CD0CD0q PD0PD0qTD0TD0qE5000E5000qE0E0qSE2500SE2500rSE0SE25rDS0DS0r"SD0SD0r/D0D0r>WD0WD0rMID0ID0r\T10T10rbro250,1:r{AI14rF1175:F21rBI16rF1,F2rF1F12r BIr!AI:r"CL$"Y"548s9#OB(3,44)2(LYKY)11(LXKX)11CL$"Y":539:CD$"** RED ** ":" ** RED ALERT **":"**?";:sr$(LYKY)10(LXKX)10CL$"N":CD$"* GREEN *":sx%s&I140s'OB(3,I)3OB(3,I)9OB(3,I)15OB(3,I)999OB(3,I)1101OB(3,44)0:I41:553s(OB(3,44)2s)s*s+t ,MY0MX0561t"-MY0MX0563t7.MY0MX0565tL/MY0MX0567tR0tu1 MYMX AG$"A0;"::AG$"A1;"t{2t3 MY(MX) AG$"A0"::AG$"A3;"t4t5(MY)MX AG$"A2;"::AG$"A1;"t6t7 (MY)MX AG$"A2;"::AG$"A3;"u8uV9"BM"((CX))","((CY2))AG$";S4;C0;D2;C1;R2;E2;U8;H2;L5;G2;D8;F2;R3":u:"BM"((CX))","((CY2))CA$";S4;C0;D2;C0;R2;E2;U8;H2;L5;G2;D8;F2;R3":u;K$""uv?"O",#1,QD$:444v\@::" SECTOR DATA BANKS"::" A=QUADRANT/SECTOR STATUS":" B=KNOWN DATA SUMMARY":vzA" SELECT OPTION >>>":I0vBK$:II1vCK$"A" 584vDK$"B" 614vEI500 597vFK$""597vG578vH:" QUADRANT/SECTOR STATUS":w IJZ$"EVEN"wJAR12w#KBR19w9LDQ$(AR)(BR)wIM"I",#1,DQ$wUNI144wO#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I)wPIwQwR OB(3,44)2 604 : 609wSBRwTARwU"I",#1,QD$wVI144x W#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I)xXIx Y#1,KY,KXx&Zx/[44xE\JZ$"EVEN" 607 xT]JZ$"EVEN"xm^"",DQ$" SECURED":x{_JZ$"ODD"x`DQ$" SECURED";:xaJZ$"EVEN" 612xbJZ$"EVEN"xc"",DQ$" UNSECURED":xdJZ$"ODD"xeDQ$" UNSECURED";:xf:y gAR12yhBR19y-iDQ$(AR)(BR)y=j"I",#1,DQ$yIkI144yl#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I):C(I)0626ymOB(3,I)3 I1I11ynOB(3,I)15OB(3,I)9 I3I31yoOB(3,I)2100 I4I41ypOB(3,I)1100 I5I51zqOB(3,I)19OB(3,I)25 I2I21z3rOB(3,I)2 I6I61z:sIzBt:z`u" QAUDRANT/SECTOR =";DQ$zv: OB(3,44)2 " STATUS = SECURED" : " STATUS = NON-SECURED"{!w:" NEUTRAL PLANETS......";I1:" FRIENDLY PLANETS.....";I2:" ENEMY PLANETS........";I3: " FRIENDLY BASES.......";I4{_x" ENEMY BASES..........";I5:" SPACE STORMS.........";I6{yI10:I20:I30:I40:I50:I60{z{{:" PRESS 'A' TO ABORT"{|X${}X$"A" BR9:AR2{~BR{AR{597(MY)MX AG$"A2;"::AG$"A1;"ete+ (MY)MX AG$"A2;"::AG$"A3;"e0eD"BM"((CX))","((CY2))AG$";S4;C0;D2;C1;R2;E2;U8;H2;L5;G2;D8;F2;R3":fMN"B Z2000Z21015960:3850:Z9999:g,*g@4S$SQ$:YG0gJ>500gvHT$"BM"((X))","((Y)2)DD$:gRT$"BM"((X))","((Y))DE$:g\T$"BM"((X))","((Y))DF$:370fZ1000Z11015970:3850:Z9999:g&PRIMITIVE PLANET STILL IN THE PRIMEVAL STATE. A GRADE 9 LEVEL OF DILITHIUM DEPOBM"((X))","((YZ1000Z1100394:389:3966Z1000Z1100BPZ1000:BSBP25:TPTP(BP.035):380:IAI:I31:POPOTP:BSBSTP:OB(3,IA)(BS25)1000:Z(BS25)1000:Z1000386:"BASE DESTROYED":POPO500:OB(3,IA)0:DBDB17Z9386:" PLANET DESTROYED":OB(3,IA)0:I317:7%I7BTT1:TP800(200)1007UII:TN0:4257iPO(PO):2497TP800(200)100:398:1,1:AI1 TN:381::389:AI1TN7KP(KS25)7396:3808 KP35TPTP(KP.10):POPOTP::TPTP(KP.(0):HS$(0):R$" ":MS$(0):KK$(0):ID$(0)8U#1,1:#1,2::"WARP/LGN"7eJZ$"ODD"7|QD$" SECURED";:7JZ$"EVEN" 12307JZ$"EVEN"7ć"",QD$" UNSECURED":7JZ$"ODD"7؇QD$" UNSECURED";:87NA$"PRACTICE ":SC$D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2","L1;A0;E1;R1;F1;L1;D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2","A0;U1;L2;U1;R2;E1;R3;F1;R2;D1;L2;D1;R3;E1;F1;D1;G1;H1;L11;G1;H1;U1;E1;F1;R3","A0;R9;E2;R2;F1;L2;R2;F1;G2;L1;H1;L9;G3;L3;U2;D1;E1;G1;F1;H1;D1;R3;D1;R1;L4;R4;D1;L6;U1;R2;U1;H3;U2;D1;R16", 1, 1 E1;R1;F1;L1;D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2","A0;U1;L2;U1;R2;E1;R3;F1;R2;D1;L2;D1;R3;E1;F1;D1;G1;H1;L11;G1;H1;U1;E1;F1;R3","A0;R9;E2;R2;F1;L2;R2;F1;G2;L1;H1;L9;G3;L3;U2;D1;E1;G1;"";PL0265;7(Y4)(PY)(X4)(PX)269;X (X4)10 (Y4)10 268; PZ999 PZ1101@257,(183)(187)" ";Y4;" ";X4;" ";PZ1000;"%":II1200::PL1:PXX4:PYY4:269<( PZ9PZ15@257,(191)(191)" ";Y4;" ";X4;" ";PZ10:II1200::PL1:PXX4:PYY4:269Z1000Z1100394:389:397:BPZ1000:BSBP25:EEPP:PPPP(BP.025):380:POPOPP:BSBSPP:BP(BS25):ZBP1000:OB(3,I)Z:IAI:I31:SH$"UP"EE100>Z1000Z24386:" BASE DESTROYED":OB(3,IA)0:I31:DBDB1?#Z3400:421:397:380:425:EEPP:I31:SH$"UP"EE100?Z10Z14400:421:397:380:425:R(20):EEPP:POPO(PP((Z10)15)):ZZ1:R12OB(3,I)Z:IAI:I31?Z9425:OB(3,IA)3:" DEFENSES DESTROYED CAPTAIN":I31?:91?SH$"UP"EE100@k 380:KP(KS25):EEPP:PPPP(KP.025):KEKEPP:POPO(JAPP):KDKDPP:KSKS(PP.8):PP120KWKW(PP2)@!KE0KD2500251@"50@#KY1KE1000KD2000369:302@$KY75KY0KX75KX0KX(75):KY(75):A%EYLYKY:EXLXKX:DC0D 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 8, 71, 3, 0 0, 33, 26, 3, 0 0, 60, 44, 3, 0 0, 0, 0, 0, 0 0, 33, 51, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 70, 4, 3, 0 0, 31, 44, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 7, 58, 44, 3, 0 0, 40, 1, 3, 0 0, 0, 0, 0, 0 0, 55, 9, 1100, 0 0, 56, 17, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 49, 17, 1100, 0 0, 8, 74, 1100, 0 0, 11, 33, 1100, 0 0, 7, 68, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 50, 15, 2100, 1 0, 69, 10, 2100, 1 0, 63, 44, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 17, 39, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 68, 63, 45, 0 0, 19, 33, 46, 0 0, 41, 56, 47, 0 0, 18, 7, 0, 0 64, 74 0, 0, 0 0, 0, 0, 0, 0 0, 50,D?D"@KT1000 KT20342:DtAKT7 (20)10KYKY((LYKY)((10)5)):KXKX((LXKX)((10)5)):D{B:DCKT1DYOB(1,0)KY:DXOB(2,0)KX:327DDKT20 KT1000 KT3 DYOB(0,1)KY:DXOB(0,2)KX:327DE:DF340EGYK(DY):XK(DX)EH:E3IYK1(DY)7KYKYDY1ENJYK1(DY)6KYKY6EmKYK1(DY)7KYKYDY1ELYK1(DY)6KYKY6EMXK1(DX)7KXKXDX1ENXK1(DX)6KXKX6EOXK1(DX)7KXKXDX1EPXK1(DX)6KXKX6FQKEKE(100)FRKZ7F)SKT3361FUTKT0KYKY((10)5):KXKX((10)5)F[UFnVPP(400)100F}WKT7349FXKEKEPP:PPPP(300)FYSH$"UP"PPPP(SP.03):SESEPPFZ393:EEPP:DDPP:PP(PP):PO(POPP):1,1:387G^[PP120WDWD(PP2):SDSD(PP2):CDCD(PP2):DSDS(PP2):PDPD(PP2):TDTD(PP2)Gd\G]DYOB(0,1)KY:DXOB(0,2)KX:(DY)10(DX)10324:360G^I140G_575G`K$""BJ3:559:I41:Q$"Y"359::359H.aZOB(3,I):YOB(1,I):XOB(2,I): YOB(0,1) XOB(0,2) 359H5b:HcKT20Z20Z24ZZ20:PP(200):KEKEPP:R(20):IAI:I40:R10ZZ120:OB(3,IA)Z:Z20OB(3,IA)3:KU0:359HdKT1000 Z2100 100,4:1,4:100,4:1,4:100,4I~eKT1000 Z2100 " STARBASE AT ";Y;X;" UNDER":" ATTACK CAPTAIN ";N$:" LOCATION ";YLY;XLX;" RELATIVE":" **?";:100,4:1,4:100,4:1,4:100,4J+f KT1000 Z2000 Z2100ZZ1999:PP(400):KEKEPP:PPPP(300):BSZ25:PPPP(Z.02):BSBSPP:Z(BS25):ZZ2000 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 26, 14, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 61, 21, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 26, 16, 3, 0 0, 0, 0, 0, 0 0, 24, 19, 3, 0 0, 37, 12, 3, 0 0, 0, 0, 0, 0 0, 1, 21, 3, 0 0, 0, 0, 0, 0 0, 39, 59, 3, 0 0, 36, 25, 3, 0 0, 4, 63, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 52, 46, 1100, 0 0, 35, 62, 1100, 0 0, 0, 0, 0, 0 0, 71, 18, 1100, 0 0, 54, 50, 1100, 0 0, 0, 0, 0, 0 0, 27, 36, 2100, 1 0, 31, 3, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 12, 65, 2100, 1 0, 69, 19, 53, 0 0, 47, 58, 54, 0 0, 3, 1, 55, 0 0, 51, 17, 0, 0 32, 25 0, 0, 0, 0, 0 0, 27, 36, 2100, 1 0, 31M~AZ1(0):(123,191)(128,91),:(133,191)(128,91),:(127,91)(128,191),,BF:(127,91)(128,191),,BF:(123,191)(128,91),:(133,191)(128,91),:MC1:N Q$""::A1 (10):((255),(191)),1.5::A1 (80):((255),(191),5)::B(20):B4NcA(250)5:B(186)5:AA(30):AD1AA:AX(10)5:AY(10)5:(AAX,BAY,5)::NIITN:391:A130:J(70)94:H(70)68:(128,91)(J,H),::384:425:N389:CY91:A120:(128,CY,1):(128,CY,0):CYCY5::391:425OtCR0:CY92:A15:(128,CY),CR,1:(128,CY),CR,0:CYCY20.4:CRCR2::391:A120:1,0:0,1:1,1:0,0::AZ2(0):OQ$"Y"Q$"":@480," ";:@480,"**?";:384:1,1O"C1;"S$T$:"C1":O:O"C0;"S$T$:"C1":OT$DA$:P T$DB$:PT$DC$:POCY191:A120:(128,CY,1):(128,CY5,0):CYCY5::PCY191:A19:(128,CY)(128,CY15),:(128,CY)(128,CY15),:CYCY10::P391:S$"S"(25((TY)(TX)))";":P391:S$"S"(25((TY)(TX)))";":Q1(TY)(TX)PS35(3(TY))::PS35(3(TX))QFPS6PS6:::Qx@480," DO YOU WISH TO QUIT";:K$:K$"Y"50Q"O",#1,"LOGOUT/DAT"QPO(PO)Q#1,N$,PO,JAQQPO0:JA0:E0:D2505Q447:"LOGOUT/WF4R?KQ7:: R(100):R25R80399:394:389:1,1:387:PP500(200)100::ReSH$"UP"PPPP(SP.03):SESEPPREEPP:DD(PP.70):PP200WDWD(PP2):SDSD(PP2)RPP125WDWD(PP2):IDID(PP2)RPP180PDPD(PP2):TDTD(PP2)RS 0, 1, 35, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 59, 25, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 55, 49, 2, 0 0, 0, 0, 0, 0 0, 26, 27, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 45, 69, 3, 0 0, 28, 19, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 31, 47, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 4, 55, 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 38, 28, 2100, 1 0, 28, 66, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 16, 14, 2100, 1 0, 0, 0, 0, 0 0, 19, 59, 2100, 1 0, 46, 7, 57, 0 0, 67, 55, 58, 0 0, 22, 11, 59, 0 0, 40, 46, 0, 0 53, 17 1100, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0,, 30 , 42, 54, 2100, 1 0, 0, 0, 0, 0 0, 37, 44, 2100, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 31, 2, 2100, 1 0, 65, 72, 2100, 1 0, 0, 0, 0, 0 0, 35, 39, 2100, 1 0, 29, 11, 2100, 1 0, 56, 33, 25, 0 0, 74, 74, 26, 0 0, 21, 23, 27, 0 0, 70, 38, 0, 0 57::1,1:RC(RARC):RD(RBRD):RCRC100RD:RCRC150:RDRC10:EERD:QD$(RA)(RB)WI144:X(255):Y(191):(128,96)(X,Y),::"I",#1,QD$WI144W(128,96),I,0:W#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I):LX(70)5:LY(70)5X:I4599:(128,96),I,0:IX+#1,KY,KXX7:384X@91XV434:"O",#1,QD$XxOB(1,0)0:OB(2,0)0:OB(3,0)0XI144XZOB(3,I):Z3OB(3,0)1XÅZ19Z25OB(2,0)1XąZ1999Z2101OB(2,0)1XŅZ9Z15OB(1,0)1Y#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I)Y"NjY):Y0:Y7:Y>:YL#1,KY,KXYR͚YXΐYSQ$S$:S$"S 3;":K$"":DS250" DAMAGED ":507YЅQ$"Y"K$"W"478YѼ:1,0YҀI140YZOB(3,I):XOB(2,I)3.4:Y191(OB(1,I)2.5)ZԅCD251472ZՅZ0477ZAց542:C(I)1S$"S 4;":504:Z9999477ZXׅSM1 C(I)0477Ze؅Z2477ZrمX0X0ZڅY0Y0ZۅZ0(X,Y),3Z܅ C(I)1 CD250 (X,Y),1,1Z݋IZ޿1,0:SM0:XLX3.4:Y191(LY2.5):Y2Y2Z߅X2X2[(OX,OY)(NX,NY),,B[B(X5,Y52)(X5,Y52),:(X52,Y5)(X52,Y5),[PX5X:Y5Y[Q$"Y""BM"((CX))","((CY2))CA$";S4;C0;U4;R1;E1;U2;H1;L3;G1;D2;F1;R1;D4;U1;L2;U2;D4;U2;R5;U2;D4":574\`CA$AG$:CXX:CYY:"BM"((X))","((Y2)"PRACTICE", 500, 400, 0,"BM126,87;A0;R9;E2;R2;F1;L2;R2;F1;G2;L1;H1;L9;G3;L3;U2;D1;E1;G1;F1;H1;D1;R3;D1;R1;L4;R4;D1;L6;U1;R2;U1;H3;U2;D1;R16","BM121,95;A0;U1;L2;U1;R2;E1;R3;F1;R2;D1;L2;D1;R3;E1;F1;D1;G1;H1;L11;G1;H1;U1;E1;F1;R3","BM127,84;A0;L1;E1;R1;F1;L1;D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2","L1;A0;E1;R1;F1;L1;D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2","A0;U1;L2;U1;R2;E1;R3;F1;R2;D1;L2;D1;R3;E1;F1;D1;G1;H1;L11;G1;H1;U1;E1;F1;R3","A0;R9;E2;R2;F1;L2;R2;F1;G2;L1;H1;L9;G3;L3;U2;D1;E1;G1;F1;H1;D1;R3;D1;R1;L4;R4;D1;L6;U1;R2;U1;H3;U2;D1;R16", 1, 1 E1;R1;F1;L1;D2;R3;F1;G1;L3;D3;R1;D1;L3;U1;R1;U3;L3;H1;E1;R3;U2","A0;U1;L2;U1;R2;E1;R3;F1;R2;D1;L2;D1;R3;E1;F1;D1;G1;H1;L11;G1;H1;U1;E1;F1;R3","A0;R9;E2;R2;F1;L2;R2;F1;G2;L1;H1;L9;G3;L3;U2;D1;E1;G1;M"((X))","((Y))DF$:_<DS250" DAMAGED":50_c::" SCIENCE SCAN IN PROGRESS"_k:_wI120_XOB(2,I):YOB(1,I):ZOB(3,I):Z1OB(0,I)_ (LXX)1(LYY)1 525_Z20 Z24 Z10525_Z19Z1(9)`>OB(0,I)0:I22:" SENSORS REPORT THE FOLLOWING:":"D",#1,"SENSOR/DAT"`Z #1,200 DT$,5 PT$`e #1,Z1`| DT$:POPO(PT$)` #1` I20" SCIENCE SCAN COMPLETE......":" SENSORS REPORT NOTHING":" SIGNIFIGANT"``50`CD0CD0aPD0PD0aTD0TD0a(E5000E5000a5E0E0aJSE2500SE2500a[SE0SE25ajDS0DS0aySD0SD0aD0D0aWD0WD0aID0ID0aT10T10aa250,1:aAI14a F1175:F21a!BI16a"F1,F2b#F1F12b $BIb%AI:b(&CL$"Y"552b'OB(3,44)2(LYKY)11(LXKX)11CL$"Y":543:CD$"** RED ** ":" ** RED ALERT **":"**?";:b((LYKY)10(LXKX)10CL$"N":CD$"* GREEN *":b)b*I140c.+OB(3,I)3OB(3,I)9OB(3,I)15OB(3,I)999OB(3,I)1101OB(3,44)0:I41:557c=,OB(3,44)2cC-cI.cO/cd0MY0MX0565cy1MY0MX0567c2MY0MX0569c3MY0MX0571c4c5 MYMX AG$"A0;"::AG$"A1;"c6c7 MY(MX) AG$"A0"::AG$"A3;"c8d$9(MY)MX AG$"A2;"::AG$"A1;"d*:dQ; (MY)MX AG$"A2;"::AG$"A3;"dW<d="BM"((CX))","((CY2))AG$";S4;C0;D2;C1;R2;E2;U8;H2;L5;G2;D8;F2;R3":e>"BM"((CX))","((CY2))CA$";S4;C0;D2;C0;R2;E2;U8;H2;L5;G2;D8;F2;R 10000 DIMOB(3,44),C(45) 10010 JZ$="EVEN" 10020 FORRA=1TO2 10030 FORRB=1TO9 10040 QD$="STR$(RA)+STR$(RB) 10050 OPEN"I",#1,QD$ 10060 FORI=1TO44 10070 INPUT#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I) 10080 IF OB(3,44)=2 THEN GOSUB10120 ELSE GOSUB 10170 10090 NEXTI 10100 CLOSE 10110 RETURN 10120 IFJZ$="EVEN" THEN10150 10130 JZ$="EVEN" 10140 PRINT"",QD$+"SECURED":RETURN 10150 JZ$="ODD" 10160 PRINTOD$+"SECURED";:RETURN 10170 IFJZ$="EVEN" THEN10200 10180 JZ$="EVEN" 10190 PRINT"",QD$+"UNSECURED":RETURN 10200 JZ$="ODD" 10210 PRINTQD$+"UNSECURED";:RETURN Z$="EVEN" THEN10150 10130 JZ$="EVEN" 10140 PRINT"",QD$+"SECURED":RETURN 10150 JZ$="ODD" 10160 PRINTOD$+"SECURED";:RETURN 10170 IFJZ$="EVEN" THEN10200 10180 JZ$="EVEN" 10190 PRINT"",QD$+"UNSECURED":RETURN 10200 JZ$="ODD 43, 6 2100, 1 0, 31, 38, 2100, 1 0, 70, 51, 2100, 1 0, 55, 24, 2100, 1 0, 46, 15, 2100, 1 0, 0, 0, 0, 0 0, 24, 53, 2100, 1 0, 72, 11, 2100, 1 0, 0, 0, 0, 0 0, 13, 12, 2100, 1 0, 49, 53, 41, 0 0, 34, 21, 42, 0 0, 65, 74, 43, 0 0, 28, 11, 0, 0   ::" WARP 5 UPDATE":& H " ENTER NUMBER OF UPDATES";BSI1BY" INSERT MASTER INTO DRIVE 0":A$:::" INSERT SECOND DISK IN DRIVE 1":A$:(1)11 "WARP5/WF5:1" "WARP5/BAC:1""WARP5/WF5:1"("WARP5/WF5:0" "WARP5/WF5:1"2I< H " ENTER NUMBER OF UPDATES";BSI1BY" INSERT MASTER INTO DRIVE 0":A$:::" INSERT SECOND DISK IN DRIVE 1":A$:(1)11 "WARP5/WF5:1" "WARP5/BAC:1""WARP5/WF5:1"("WARP5/WF5:02500:SH$"UP":T10:380;KE5000:KS2500:KD0:KW0:KT0NSPSE25:106tSPSE25:SD250SE25SH$"DOWN"K$"T"28FK5FK928E1000A48::A32@0,"SHIP ENERGY]";:DPE50:DPDP5:AA143:CF1DP:(A);:@480,"";:QQ$"L"QQ$"":3807SH$"DOWN"SPSP(SP2):"s";IE1000"e";S524_"**?";o K$"":137~!K$"S"57"K$"W"73#K$"I"70$K$"A"189%K$"C"145&K$"T"103'K$"P"251(K$"D"K$"":126)K$"R"247*K$"Q"398K+K$"L"@480,"**?";:459:(K$)0(K$)1045,YG0:V0:@480,(31," ");:@480,"";:389:387:22-CD2501,3:44::FK(K$):@480(0)2,"";.FK1132/FK21350FK51062FK7"P";:2513FK8"TO";:212&4FK9"O";:20045FK6169A6FK464O7FK3508X844h9K$"":137x:K$"T"106;K$"U":132K$"N"169?44>@:" ENERGY TRANSFER":" - =FROM SHIELDS TO SHIP":" + =FROM SHIP TO SHIELDS":" ENERGY TO TRANSFER >";STaASE1"NO SHIELD ENERGY":44B SEST "SORRY ENERGY TOO LOW":44C EST "SORRY ENERGY TOO LOW":44DSESEST:EEST:"TRANSFER COMPLETE"E524:44SFID250" IMPULSE DRIVE DAMAGED ":44::@0,"":::::::@0," IMPULSE ENGINES ENGAGED":uG"PULS]";:DPID2.5:130:IDH:" IMPULSE Y,X >";MY,MX: MY6 MX6 :" IMPULSE PARAMETERS INVALID":44::WF1:V2:78@IWD250 " WARP DRIVE DAMAGED ":44::@0,""::::::@0," WARP ENGINES ENGAGED "::YG1bJ"WARP]";:DPWD2.5:130:WDK:" WARP WF,Y,X >";WF,MY,MX:WF7432:V1:YG1:556:1,0LQ$"Y"474::459M(MX)6(MY)6"INVALID":44NII1WFOEE(20V:WARP5.059C 5/30/8581,0:M"HIVI"::M"SOUND"h:1000:0&H0200:1&H0249:2&H0298~"I",#1,"LOG/WF4"#1,N$,QN,NO,PS,DA$,DB$,DC$,DD$,DE$,DF$,Q,D"LOG/WF4":X52:Y52 ::" WARP FACTOR 5.59"::::" STARSHIP COMPUTER BEING LOADED") 0M OB(3,44),C(45):389:C1:421u RAQ:RBD:QD$(RA)(RB):Q0:D0 "I",#1,QD$I144#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I):LY(70)5:LX(70)5I#1,KY,KXE5000:SE2500:SH$"UP":T10:380;KE5000:KS2500:KD0:KW0:KT0NSPSE25:106tSPSE25:SD250SE25SH$"DOWN"K$"T"28FK5FK928E1000A48::A32@0,"SHIP ENERGY]";:DPE50:DPDP5:AA143:CF1DP:(A);:@480,"";:QQ$"L"QQ$"":3807SH$"DOWN"SPSP(SP2):"s";IE1000"e";S524_"**?";o K$"":137~!K$"S"57"K$"W"73#K$"I"70$K$"A"189%K$"C"145&K$"T"103'K$"P"251(K$"D"K$"":126)K$"R"247*K$"Q"398K+K$"L"@480,"**?";:459:(K$)0(K$)1045,YG0:V0:@480,(31," ");:@480,"";:389:387:22-CD2501,3:44::FK(K$):@480(0)2,"";.FK1132/FK21350FK51062FK7"P";:2513FK8"TO";:212&4FK9"O";:20045FK6169A6FK464O7FK3508X844h9K$"":137x:K$"T"106;K$"U":132K$"N"169?44>@:" ENERGY TRANSFER":" - =FROM SHIELDS TO SHIP":" + =FROM SHIP TO SHIELDS":" ENERGY TO TRANSFER >";STaASE1"NO SHIELD ENERGY":44B SEST "SORRY ENERGY TOO LOW":44C EST "SORRY ENERGY TOO LOW":44DSESEST:EEST:"TRANSFER COMPLETE"E524:44SFID250" IMPULSE DRIVE DAMAGED ":44::@0,"":::::::@0," IMPULSE ENGINES ENGAGED":uG"PULS]";:DPID2.5:130:IDH:" IMPULSE Y,X >";MY,MX: MY6 MX6 :" IMPULSE PARAMETERS INVALID":44::WF1:V2:78@IWD250 " WARP DRIVE DAMAGED ":44::@0,""::::::@0," WARP ENGINES ENGAGED "::YG1bJ"WARP]";:DPWD2.5:130:WDK:" WARP WF,Y,X >";WF,MY,MX:WF7432:V1:YG1:556:1,0LQ$"Y"474::459M(MX)6(MY)6"INVALID":44NII1WFOEE(20&" :SECTOR SEARCH 3-25-85 WM&6OB(3,44),C(44)&BRA12&N(RB19&d2QD$(RA)(RB)&t<"I",#1,QD$&FI144&P#1,OB(0,I),OB(1,I),OB(2,I),OB(3,I),C(I):C(I)0 140&ZOB(3,I)3 NPNP1&dOB(3,I)15OB(3,I)9 EPEP1'nOB(3,I)2100 FBFB1'.xOB(3,I)1100 EBEB1'ROB(3,I)19OB(3,I)25 FPFP1'kOB(3,I)2 STST1'rI'x'" QAUDRANT/SECTOR =";QD$': OB(3,44)2 " STATUS = SECURED" : " STATUS = NON-SECURED"(W:" NEUTRAL PLANETS......";NP:" FRIENDLY PLANETS.....";FP:" ENEMY PLANETS........";EP: " FRIENDLY BASES.......";FB(" ENEMY BASES..........";EB:" SPACE STORMS.........";ST(NP0:EP0:FB0:EB0:ST0:FP0(Қ(܇:" PRESS 'A' TO ABORT"(X$(X$"A" (RB)RANDLY PLANETS.....";FP:" ENEMY PLANETS........";EP: " FRIENDLY BASES.......";FB(" ENEMY BASES..........";EB:" SPACE STORMS.........";ST(NP0:EP0:FB0:EB0:ST0:FP0(Қ(܇:" PRESS 'A' TO ABORT"(X$(X$"A" (RB)NA$:HP(SC$)}6"**********************":" >>> SENIOR OFFICER <<<":" NAME ";TN$:" RANK ";TR$:" TOP SCORE >>";HP@I(1)1J:TI15000:^:" MISSION COMPLETE AND LOGGED"hmr DR$"CADET "440:8| DR$"ENSIGN " DR$"CADET " 440: DR$"CADET " DR$"ENSIGN " DR$"LIEUTENANT " 440: DR$"CADET " DR$"ENSIGN " DR$"LIEUTENANT " DR$"CAPTAIN " 440: DR$"CADET " DR$"ENSIGN " DR$"LIEUTENANT " DR$"CAPTAIN " DR$"COMMODORE " 440: DR$"CADET " DR$"ENSIGN " DR$"LIEUTENANT " DR$"CAPTAIN " DR$"COMMODORE " DR$"ADMIRAL " 440:$*6€I120=̇@T " DR$"CAPTAIN " DR$"COMMODORE " 440: DR$"CADET " DR$"ENSIGN " DR$"LIEUTENANT " DR$"CAPTAIN " DR$"COMMODORE " WF):40,3:245,1=PLYMY75LYMY0"Y OUT OF BOUNDS":44kQLXMX75LXMX0"X OUT OF BOUNDS":44RLYLYMY:LXLXMX:EE(((MY)(MX))3):SH$"UP"EE(((MY)(MX))50)SYG1474TUYTLY6:YBLY6:XLLX6:XRLX6VKV0:ZC0:KQ0:QK0WI144DXXOB(2,I):YOB(1,I):ZOB(3,I):Z098hY YYT YYB XXL XXR 98ZSY(LYY):SX(LXX):Z098[Z199997\Z999ZZ:(SY)6(SX)697::KQ7:97]Z1997^Z9ZZ:(SY)4(SX)497::KV7:97_I4097`98:a(LYY)0(LXX)0QK1@bRcMX0MY044dQK1" EMERGENCY":" COLLISION AVERTED":QK0:" EMERGENCY WARP SHUTDOWN":WDWD(50):EE50:MX((3)2):MY((3)2):LYLYMY:LXLXMX:85eMX0:MY0 f169 gK$"":137 "hK$"A"169 2iK$"O"212 j:"STATUS CONDITION ";CD$:E(E):D(D):T(T):"STARDATE ";:"###.#";SM600:"E=";E;" D=";D;" ";"T=";T:PO(PO):SP(SP):SE(SE)!k"Y=";LY;"X=";LX;" Q/S>>";QD$;:OB(3,44)2" SECURED"::!%l"SHIELDS=";SE;" ";SP;"%"!Sm"POINTS=";PO:"KLINGONS=";JA,"BASES=";DB!n" ENERGY RESERVE LEVELS":(191);" = CRITICAL":" PERCENT>>>>0 25 50 75 100";!oE1000A48::A32"4p@320,"SHIP ENERGY]";:DPE50:DPDP5:AA143:CF1DP:(A);::@352," I++++I++++I++++I++++I";"dq@384,"SHLD ENERGY]";: SE500 A48::A32"rDPSE25:DPDP5:AA143:CF1DP:(A);::@416," I++++I++++I++++I++++I";:D044::@448,"SHIP DAMAGE]";:D2000A48::A16#&sDPD25:DPDP5:AA143:CF1DP:(A);::44#t::" DAMAGE CONTROL REPORT":(172);" = OPERATIONAL":(179);" = INOPERABLE"::" PERCENT OF DAMAGE"#u">>>>>0% 25% 50% 75% 100%"#v" I****I****I****I****I"$w@256,"WARP]";:DPWD2.5:130:WD;$)x@288,"PULS]";:DPID2.5:130:ID;$Qy@320,"SHLD]";:DPSD2.5:130:SD;$yz@352,"SCAN]";:DPDS2.5:130:DS;${@384,"COMP]";:DPCD2.5:130:CD;$|@416,"TORP]";:DPTD2.5:130:TD;$}@448,"PHSR]";:DPPD2.5:130:PD;:44% ~571:K$""126%K$"O"200%+K$"A"116%444%SDP100DP100:A39::A32%|DPDP5:AA140:CF1DP:(A);::%SD250"SHIELDS DAMAGED":44%SH$"UP":Q$"Y"" SHIELDS UP";:44%569:32& SH$"DOWN":Q$"Y"" SHIELDS DOWN";:44&570:32&(546:571&<OB(3,44)2141&X KC 286::141&428:405:411:KCKN100: 6001000:SMSM100:KC(KN100):SP(SE25):SH$"DOWN"SPSP(SP2)&E60373&D2500374&K$""137&'_CD250" DAMAGED":44:::" COMPUTER ACTIVATED"::"COMP]";:DPCD2.5:130:CD':" PLEASE SELECT FUNCTION"'" A=";(227)(230)," B=";(183)(187);" *"::" C=";(175)(175)," D=";(191)(191);" *":(/" E=";(159)(159)," F=COMPUTER MAP"::" G=SECTOR STATUS"(@:" X=EXIT"(h" COMPUTER READY > ";:K$"":137(y:K$"X"44(K$"G"575(K$"F"SM1:459(B$" ### ### # "(D$" ### ### ### ":PL1(I140(PL3:PL1)C(I)0167)$ZOB(3,I):YOB(1,I):XOB(2,I))8SYYLY:SXXLX)EZ0167){Z3K$"E"(159)(159);:B$;SY;SX;:PLPL1)Z10Z14K$"D"(191)(191);:B$;SY;SX;Z10;:PLPL1*Z20Z24K$"C"(175)(175);:B$;SY;SX;Z20;:PLPL1*JZ1000Z1100K$"B"(183)(187);:D$;SY;SX;Z1000;:PLPL1*Z2000Z2100K$"A"(227)(230);:D$;SY;SX;Z2000;:PLPL1*:PL2*44*DS250" DAMAGED":44+::" SENSORS ACTIVATED"::"SCAN]";:DPDS2.5:130:DS::" SCANNING"+(KZ0+OB(3,44)2(KYLY)16(KXLX)16:(190)(188);" ";KYLY;" ";KXLX;" E=";(KE50);"% SH=";(KS25);"%"+YTLY10:YBLY10:XLLX10:XRLX10:+B$" ### ### #",D$" ### ### ###",I140,0YOB(1,I):XOB(2,I):ZOB(3,I),Y YYT YYB XXL XXR 180,c187,nC(I)1,Y(YLY):X(XLX),Z3:(159)(159);:B$;Y;X,Z10Z14:(191)(191);:B$;Y;X;Z10;:" *":(X)6(Y)6KZ7-1Z20Z24:(175)(175);:B$;Y;X;Z20-Z1001Z1100:(183)(187);:D$;Y;X;Z1000;:"% *":(Y)9(X)9KZ7-Z2000Z2100:(227)(230);:D$;Y;X;Z2000;:"%"--44-"ALLIANCE"-I120.YOB(1,I):XOB(2,I):ZOB(3,I).9SYYLY:SXXLX: Z3 Z10199.T(SY)1(SX)1199.mOB(3,I)24:POPO500.Ç" ALLIANCE ESTABLISHED".I40.ŅZ10411.ƅSH$"DOWN" (30)15197.Nj:85.ȀI140.YOB(1,I):XOB(2,I):ZOB(3,I)/ʅZ0211/3SYYLY:SXXLX:(SY)1(SX)1211/C̅Z1999209/VͅZ19Z25207/`΁211/V(0)479:@V,"ORBITING PLANET":POPO20:Z24OB(3,I)OB(3,I)10 EE500:TT(5):DD(300):SESE200:I41:SDSD100:WDWD25:IDID25:PDPD50:TDTD50:2110rў::" DOCKING IN PROGRESS"::286:443:" DOCKING COMPLETE"::" UNDOCKING IN PROGRESS":2860E5000:SE2500:D0:T10:POPO1000:SD0:WDWD100:IDID100:PD0:TDTD100:CDCD100:DSDS100:I410Ӌ:524:1061 ԅTD250" DAMAGED":441&ՅT0" EXHAUSTED":4410ց4301׉"RPEDO #,Y,X ";TN,TY,TX: TNT " INSUFFICIENT SUPPLY ": T;" TORPEDOES LEFT":441؅TN3TN0(TY)10(TX)10" INVALID PARAMETERS":441SYLYTY:SXLXTX:3951ځ3872ۅ KYSY KXSX 389:2362+TP800(200)100:1,12F݁387:II1TN:377:2OPA02\߀II1TN2hI1302YOB(1,I):XOB(2,I):ZOB(3,I): SYY SXX 2313'Z3R(20):396:417:392:376:421:POPO50:R5R14POPO50:C(I)0:OB(3,I)0:TN0:421:382:" PLANET DESTROYED":I313Z10Z14396:417:392:376:421:POPO100:IAI:I31:(20)10ZZ1:OB(3,IA)Z3Z1000Z1100390:385:3924nZ1000Z1100BPZ1000:BSBP25:TPTP(BP.035):376:IAI:I31:POPOTP:BSBSTP:OB(3,IA)(BS25)1000:Z(BS25)1000:Z1000382:"BASE DESTROYED":POPO500:OB(3,IA)0:DBDB14Z9382:" PLANET DESTROYED":OB(3,IA)0:I314:4I4TT1:TP800(200)1004II:TN0:4214PO(PO):24458TP800(200)100:394:1,1:AI1 TN:377::385:AI1TN5IKP(KS25)5Y392:3765KP35TPTP(KP.10):POPOTP::TPTP(KP.020):POPOTP5KDKDTP:KEKETP:KSKS(TP.4):KP70KW(TP.7)5TT15KP(KS25)56 TN0:KE0KD25002466856382:POPO4500:" KLINGON DESTROYED!!":POPO500:JAJA1:550:OB(3,44)244:: KE5000:KS2500:KW0:KD0:KY(75):KX(75):KT0:KU0:446EE507WDWD(50):PDPD(50):TDTD(50):CDCD(50):DSDS(50):IDID(50)7SDSD(50)7&524:1167CPD250" DAMAGED":447eCD250 DS250 K$"P"2677:PL0::" PHASERS ACTIVATED"::430:"PHSR]";:DPPD2.5:130:PD:7:" LOCKING PHASERS....."8YPYKYLY:PXKXLX:(PY)11(PX)11:(190)(188)" ";PY;" ";PX;" E=";(KE50);"% SH=";(KS25);"%":266::PX11:PY118eI1308Y4OB(1,I)LY:X4OB(2,I)LX:PZOB(3,I):K$""8PL02608(Y4)(PY)(X4)(PX)2648 (X4)10 (Y4)10 2639ZPZ999 PZ1101@257,(183)(187)" ";Y4;" ";X4;" ";PZ1000;"%":II1200::PL1:PXX4:PYY4:2649PZ9PZ15@257,(191)(191)" ";Y4;" ";X4;" ";PZ10:II1200::PL1:PXX4:PYY4:2649I30PL0" PHASER LOCK ABORTED"99 PL044:/ :" PHASERS LOCKED....":" PHASER POWER";PP:268:M "HASER PWR,Y,X";PP,PY,PX: (PY)10(PX)10 PPR500"INVALID PARAMETERS":44: R(50):EER:PPPP5:421:IITN:387:1,1:SYLYPY:SXLXPX:TYPY:TXPX:395;, SYKY SXKX 389:394:1,1:378:385:393:2822300;C1,1:378:I130;eYOB(1,I):XOB(2,I):ZOB(3,I); SYY SXX 1,1:276::281KE0KD2500246>44>2Q$"Y"QQ$"L">XKY1KE1000KD2000365:298> KY75KY0KX75KX0KX(75):KY(75):>!EYLYKY:EXLXKX:DC0DCDC1:>"K$"1"SH$"UP"? #(EY)10(EX)10KTKU: KNNO:KZ7DYEY:DXEX:323:::303?#$KNQN:KT7KUKT?G%R(50): R10R40KT7:317?j&R(50):R10R35KT7:338?'R(50):R15R40KT7:317?(?)319:300?*BD10288?+KT1:319?,(DY)1(DX)1302@-KE5000:KS2500:KPKS25:KW0:KD0:DC20:KTKU@.@%/KT0316@10I140@;1571@k2K$""BJ2:555:I41:Q$"Y"313::313@3YOB(1,I):XOB(2,I):ZOB(3,I)@4DYYKY:DXXKX@5(DY)10(DX)10313@6Z3KT3:I40:OB(0,1)Y:OB(0,2)X:313A!7Z24Z20KT20:I40:OB(0,1)Y:OB(0,2)X:313A]8Z2000Z2100KT1000:I40:OB(0,1)Y:OB(0,2)X:313Av9:KT0KUKT:315A:KYKY(12)6:KXKX(12)6:KEKE(50):A;A:BO?KT1DYOB(1,0)KY:DXOB(2,0)KX:323B@KT20 KT1000 KT3 DYOB(0,1)KY:DXOB(0,2)KX:323BA:BB336BCYK(DY):XK(DX)BD:BEYK1(DY)7KYKYDY1BFYK1(DY)6KYKY6CGYK1(DY)7KYKYDY1C1HYK1(DY)6KYKY6COIXK1(DX)7KXKXDX1CjJXK1(DX)6KXKX6CKXK1(DX)7KXKXDX1CLXK1(DX)6KXKX6CMKEKE(100)CNKZ7COKT3357CPKT0KYKY((10)5):KXKX((10)5)DQDRPP(400)100D%SKT7345D@TKEKEPP:PPPP(300)DfUSH$"UP"PPPP(SP.03):SESEPPDV389:EEPP:DDPP:PP(PP):PO(POPP):1,1:383EWPP120WDWD(PP2):SDSD(PP2):CDCD(PP2):DSDS(PP2):PDPD(PP2):TDTD(PP2)E XEMYDYOB(0,1)KY:DXOB(0,2)KX:(DY)10(DX)10320:356EYZI140Ec[571E\K$""BJ3:555:I41:Q$"Y"355::355E]ZOB(3,I):YOB(1,I):XOB(2,I): YOB(0,1) XOB(0,2) 355E^:FX_KT20Z20Z24ZZ20:PP(200):KEKEPP:R(20):IAI:I40:R10ZZ120:OB(3,IA)Z:Z20OB(3,IA)3:KU0:355F`KT1000 Z2100 100,4:1,4:100,4:1,4:100,4G&aKT1000 Z2100 " STARBASE AT ";Y;X;" UNDER":" ATTACK CAPTAIN ";N$:" LOCATION ";YLY;XLX;" RELATIVE":" **?";:100,4:1,4:100,4:1,4:100,4Gb KT1000 Z2000 Z2100ZZ1999:PP(400):KEKEPP:PPPP(300):BSZ25:PPPP(Z.02):BSBSPP:Z(BS25):ZZ2000:OB(3,I)Z:IAI:I40:Z2000OB(3,IA)0:KU0GcGdPOPO(PP3):Ge:HfI140H g571H"hK$""BJ4:555HJiYOB(1,I)KY:XOB(2,I)KX:ZOB(3,I)Hj KT3 YDY XDX OB(3,I)14:I41:KT0:KU0:DC15HkHlHmBD10HnI2130Ho571HpK$""BJ5:555HqYOB(1,I):XOB(2,I):ZOB(3,I)IrZ1001Z1100I40:OB(1,0)Y:OB(2,0)X:BD0I#sI)tInu:" YOU RAN OUT OF ENERGY CAPTAIN!":" SCORE >>> ";(PO):399Iv:" YOUR SHIP AND CREW WERE":" DESTROYED!":" SCORE >>> ";(PO):399IwJNxA13:(128,92),A:(128,92),A1,1:(128,92),A3,1:A:A