j
8280::
8j
0=500:+j
T1U0=500:;j
T1U0=500:Kj
T1U0=300:[j
T1U0=120:lj
T1U0=80::*k2"

               G A L A C T I C      E M P I R E

                        VERSION 2.0


"D64,170)
"
"<30)"(C) 1979 DOUGLAS G. CARLSTON
"<30)"P.O.BOX 3266
"<30)"EUGENE, OREGON 97403"Wl	DNL,NNP,TNZ:ANC:
U(49),U1(49),U2(49),U3(49),C(19),RO(19),PS(19),PE(19),PA(19),PB(19),PC(19),PD(19):3::2"1) NEW GAME
2) LOAD DISK":	T::TU2J""I",1,"EMPFL":
195:180'l
PD(P1)U1:PUP1:178:
T8U0=8:2@585," PLANETFALL: "C(P);:6:2@586,w(217);:7:Rl2@65,"ORBITING: "C(P);:171:SDT1.5J319mBMU"COMMAND":172:AU"Q"J197:
184:AU"E"JPUP1
23:13:AU"C"J39:
12:AU"A"J92:AU"O"J119:12
m
BSU"SCOUT":BFU"FIGHTER":BTU"TRANSPORT":
T9U65=257L64:2@T9,w(234);:n2@0,D(41,176);:AUw(170)Mw(26)Mw(8):2@104,A;A;A;A;:BUw(149)Mw(26)Mw(8):2@64,B;B;B;B;:2@320,D(41,179);:2@234,w(151);D(20,131);w(171);:2@298,B;B;B;B;B;B;n2@319,A;A;A;A;A;A;:2@618,D(22,131);:2@384,B;B;B;B;B;B;:2@424,A;A;A;A;A;A;:2@768,D(41,131);:16:
21.oSDUSDM.001:2@44,"STARDATE: ";:2?"###.#";SD;:2@108,"MODE:";:2@300,BF"S : "F;:2@364,BT"S :";:2@427,TE"EMPTY,"TF"FULL";:2@492,BS"S : "V;:2@556,"CREDITS : ";:2?"#O(T9)URO(T9)O1.01::^(2E3)U1J159:D5T2E4JD5U0^o
T9U0=49:U1(T9)U5RSDTUU(T9)JPS(U2(T9))U2:U1(T9)U0:U(T9)U0fo:Op2@682,"CONTROLS:";:2@747,"=A= ATTACK";:2@811,"=C= COMPUTER";:2@875,"=E= EMBARK";:2@939,"=O= ORDERS";pF9U0J194:
30:WSUSD:WQUSDMDL:W1U0:W2U0:
246p178:2@582,"NAVIGATOR HAS NO ORDERS";:3:171:
12'qZU1:178:2@115,"UNDERWAY";:2@585,"DESTINATION: "C(P1);:2@643,"ESTIMATED ARRIVAL: STARDATE "X(SDMDL);:25:
26GqX(Z)U^(40)M20:Y(Z)U7M^(2):<q
TU1=DLO2:
JU2=4L2:2@20MJO64,"!";::AU"- - - - ":2@204,A"+ "A;:SDUSDM.5:16:
ZU1=3:X(Z)T40JXNUX(Z)M2:XNUX(Z)N2]qY(Z)V9JYNUY(Z)N1:YNUY(Z)M1r(X(Z),Y(Z)):XNT79SXNV1SYNT14SYNV3J25:X(Z)UXN:Y(Z)UYN5r(X(Z),Y(Z)):Z,T:192LrF9U0JF9U1:
11:10r2@115,"SCANNING ";:FFU0:TNU0:VNU0:
TTU0=49:U(TT)VSDN5SU(TT)TSDSU1(TT)T3J34r U3(TT)VTPJ34:U1(TT)U1JFFUFFMU2(TT):U1(TT)U2JTNUTNMU2(TT):U1(TT)U3JVNUVNMU2(TT):34s!U2(TT)U0:U(TT)U0:U1(TT)U02s"TT:
TTU0=49:U(TT)VSDN5SU(TT)TSDSU1(TT)VT4SU3(TT)VTPJ35:178:2@586,BS" SHIP TO";:2@652,C(U2(TT))" HAS RETURNED     ";:PD(U2(TT))U1:5:VUVM1:U(TT)U0t#TT:171:FFMTNMVNU0J38:178:2@451,"ADDITIONS TO FLEET: ";:FFU0J36:2@586,FF;BF"S";:FUFMFF:16Bt$TNU0J37:2@650,TN;BT"S";:TEUTEMTN:16kt%VNU0J38:2@714,VN;BS"S";:VUVMVN:16{t&5:171:
12ut'178:2@452,"ENTER CATEGORY :";:2@586,"=A=  STAR MAPS";:2@650,"=B=  PLANETARY DIRECTORY";:2@714,"=C=  STATUS REPORTS";Du(BMU"COMPUTER":172:AU"A"J41:AU"B"J52:AU"C"J65:AU"R"J171:AU""::40.u)171:2@385,"STAR MAPS :";:2@586,"=1=  LOCAL MAP";:2@650,"=2=  RANGE FINDER";:2@714,"=3=  GALAXY MAP";wu*172:AU"R"J171:
39:AU"1"SAU"2"SAU"3"JZUu(A):175:!Z
43,46,72:42-v+171:XHUPA(P):YHUPB(P):
XNU0=19:XUPA(XN):YUPB(XN)wv,Y(XHNX)T10SY(YHNY)T10J:XU(XNXH)O39P10M40:YU(YNYH)O9P10M27:(X,Y):v-XPU40:YPU18:WWU1:
73Yv.171:2@385,"RANGE FINDER";:2@451,"ENTER NAMES OF BOTH SYSTEMS";:WWU0jv/172:WWUWWM1w0AU"R"J171:
39:176:AU"X"J46:!WW
49,508w12@580,A"      ";:I1UXU:
47Iw22@600,A"      ";:I2UXU:177:2@642,"("PA(I1)PB(I1)PC(I1)")  ";:2@662,"("PA(I2)PB(I2)PC(I2)")  ";:2@707,"SYSTEMS ARE "D2" LIGHT YEARS APART ";bw32:WWU0:WPU9J:
47Dx4175:DXU394:171:2@842,"PLANETARY DIRECTORY";:2@385,"EMPIRE:";:
XNU0=19:PS(XN)T1J53:
55:55{x5(DXP64NX(DXP64))O64Ms(C(XN))T39JDXUX(DXP64)O64M65x62@DX,C(XN);:DXUDXMs(C(XN))M2:qx7:DXUX(DXP64)O64M65:2@DX,"INDEPENDENT: ";:DXUDXM14:
XNU0=19:PS(XN)V2J53::#y8172:171:
XNU1=80:(XN,36)::AU"R"J175:
39Ky92@385,"DATA ON WHICH SYSTEM?";:172y:AU"R"J171:175:
39:176:AU"X"J57:2@449,A":  ("PA(XU)PB(XU)PC(XU)")  ";Hy;PD(XU)U02@586,"NO DATA ON FILE";:2:
52Ez<2@579,"POPULATION: ";:BU"###.#":PS(XU)V2J62:QXURO(XU)O10:QXT999JQXUQXP1000:2?B;QX;:2" BILLION";:2?B;QX;:2" MILLION";Mz=
63^z>RO(XU)T1002"EST. OVER A BILLION";:RO(XU)TRO(0)2"GREATER THAN GALACTICA";:RO(XU)T102"EST. OVER 100 MILLION";:2"EST. UNDER 100 MILLION";f{?2@643,"TECHNICAL LEVEL: ";:PE(XU)U0J2"PRIMITIVE";:PE(XU)U1J2"LIMITED ATOMIC";:PE(XU)U2J2"SOPHISTICATED";:2"SUPERIOR TO OURS";{@172:171:AU"R"J175:
39:52<|A171:2@385,BS"S:    -- STATUS REPORT --";:LU449:
TTU0=49:U(TT)VSDN5J66:U1(TT)VT4J66:2@L,D(39,32);:2@L,"TO "C(U2(TT))" DUE "C(U3(TT))" ON SD"U(TT);:LULM64:5:LT710JLULN320@|B:172:171:2@385,"OTHERS:    -- STATUS REPORT --";:LU449:
TTU0=49:U(TT)VSDN5J68:U1(TT)T3J68:U2(TT)U0J68:!U1(TT)69,70,71}C2@L,w(230);:2@L,U2(TT)BB"S DUE "C(U3(TT))" ON SD"U(TT);:LULM64:LT710JLULN320:5:5/}DTT:172:171:
39;}EBBUBF:G}FBBUBT:S}GBBUBS:*}H171:
XNU0=19:XUPA(XN):YUPB(XN):XUXO78P60M2:YUYO17P60M18:(X,Y)::XPU40:YPU18:WWU2:~IAUI:(XP,YP):AU"R"JAU"":171:175:
39:e(14400)U32J87:e(14400)U64J88:e(14400)U8J89:e(14400)U16J90:
T4U1=7::(XP,YP):AU""J16:
73M~J176:!WW
76,75~KAU"X"J73:XLUPA(XU)O78P60M2:YLUPB(XU)O17P60M18:
77C~LAU"X"J73:XLU(PA(XU)NXH)O39P10M40:YLU(PB(XU)NYH)O9P10M27>M2@832,A,"("PA(XU)PB(XU)PC(XU)")  ";:PS(XU)U22@898,"EMPIRE     ";:PS(XU)U32@898,"GARRISONED ";:2@898,"INDEPENDENT";,NWWU1RXLT80SXLV1SYLV18SYLT352@832,A" SYSTEM NOT ON LOCAL MAP        ";:
79:
XNU0=100:(XL,YL):(XL,YL):_OF(XP,YP)J80:(XP,YP):
XZU1=10::(XP,YP):
73vP
XZU0=19:!WW
82,813QXGUPA(XZ)O78P60M2:YGUPB(XZ)O17P60M18:XGUXPRYGUYPJ83:84zRXGU(PA(XZ)NXH)O39P10M40:YGU(PB(XZ)NYH)O9P10M27:XGUXPRYGUYPJ83:84
S2@832,C(XZ),"(";PA(XZ);PB(XZ);PC(XZ);")   ";:PS(XZ)U22@898,"EMPIRE     ":5:PS(XZ)U32@898,"GARRISONED ":5:2@898,"INDEPENDENT":5(
TXZ:F(XPM1,YP)J85:XPUXPM1:
73H
UF(XP,YPM1)J86:YPUYPM1:
73`
VXPUXPN1:YPUYPN1:
73}
W91:XPT1XPUXPN1:
79:79
X91:XPV80XPUXPM1:
79:799
Y91:YPT18YPUYPN1:
79:79W
Z91:YPV35YPUYPM1:
79:79f
[(XP,YP):%\F8U0:E8U0:PS(P)T12@586,"ATTACKING EMPIRE SYSTEM!!!";:
191z]TFV1J2@586,"NO FULL TRANSPORTS --";:2@650,"IMPOSSIBLE TO ATTACK!!";:4:171:
12I^PE(P)V2J105:178:BU" AIR":95:EFU(^(100)M30):GU^(4):PE(P)U3JGU2:
96:96F_2@451,B;" BATTLE REPORT";:2@515,"PROBABILITY OF SUCCESS:    %";:2@586,"EMPIRE      ENEMY";:2@650,"LOSSES      LOSSES";:"`2@538,X(FO100P(FMEF));:2@715,F8;:2@727,E8;:FVU0STFVU0J116:EFVU0J104:!G
97,98,99,100DaG1U^(3):G2U^(3):G3U^(20):
101hbG1U^(3):G2U^(2)N1:G3U^(10):
101cG1U^(2)N1:G2U^(3):G3U^(50):
101)dG1U^(2):G2U^(4):G3U^(40)eFUFNG1:F8UF8MG1:EFUEFNG2:E8UE8MG2:7:AUI:G3U1
179:^(30)U1175:PE(P)VT3JGU^(4)fFV0JFU0:EFV0JEFU00gAU"R"J116:16:
96fh175:171:2@586,"ENEMY AIR FORCES DEFEATED!!";:2*i171:178:BU"LAND":95:EFURO(P)O2:GU^(4):F8U0:E8U0:PS(P)U1JGU2j2@538,X(TFO100P(TFMEF));:2@715,F8;:2@727,E8;:TFVU0J116:EFVU0J114:!G107,108,109,110:
111#kG1U^(3)N1:G2U^(4):9lG1U^(3):G2U^(2):OmG1U^(3):G2U^(3):gnG1U^(2)N1:G2U^(2):io2@427,w(212);:RO(P)URO(P)NG2P10:TFUTFNG1:F8UF8MG1:EFUEFNG2:E8UE8MG2:16:RO(P)V0JRO(P)U0:2@650,"POPULATION ANNIHILATED";:
114pTFV0JTFU0:EFV0JEFU0>q6:AUI:AU"R"J116:^(30)U1RPS(P)VT1JGU^(4):
106:1062r169:U(XX)USDM10:U1(XX)U5:U2(XX)UP:PS(P)U3:PD(P)U1:RO(P)URO(P)NE8P100:171:178:2@586,"PLANET SECURED";:2:171osKKU0:
T9U0=19:PS(T9)T1JKKUKKM1:KKT19J184::
12::
128t171:178:2@586,"ATTACK UNSUCCESSFUL";:5:FVU0J16:
187:TFV0JTFU0GuTFV0JTFU0Xv16:171:
12w171:2@385,"ORDERS FOR WHICH OFFICER?";:2@514,"LT. STARBUCK - "BS"S";:2@578,"LT. BAYLISS - GROUND FORCES";:2@642,"NAVIGATOR KIRMAN";:2@706,"DR. HENDERSON - CRYONICS";mxBMU"ORDERS":172:171:175:AU"R"J12:AU"S"J121:AU"B"J125:AU"N"SAU"K"J142:AU"D"SAU"H"J146:119-	yVVU0J175:2@832,"SIR, I HAVE NO "BS"S!";:3:175:171:
1199	z2@832,"WHICH SYSTEM SHOULD I "BS"?";:123:PD(XU)U1175:2@832,"THAT DATA IS ALREADY";:2@898,"  IN THE COMPUTER, SIR";:3:175:
122:124u	{172:AU"R"J171:175:
119:176:AU"X"J123:2@896,A;:
|I1UP:I2UXU:177:KUSDMD2:169:U1(XX)U4:U2(XX)UXU:175:2@832,"WHERE SHOULD I RETURN?";:123:I1UXU:177:U(XX)UKMD2:U3(XX)UXU:4:175:VUVN1:171:
119C}PS(P)V2J2@832,"WE'RE OVER AN INDEPENDENT SYSTEM, SIR!";:4:175:
119:2@385,"LT. BAYLISS' DUTIES :";:2@517,"=1= SHIP CONSTRUCTION";:2@581,"=2= ENLISTMENTS";:2@645,"=3= TAXATION";~172:171:AU"R"J119:AU"1"SAU"2"SAU"3"JXUu(A):!X
127,148,156:125AWSVTX(SD)XFU22M^(10):XTU10M^(10):XSU2M^(5):WSUSD>PS(P)V2J125:PE(P)V2175:2@832,"SORRY SIR, THIS PLANET TOO BACKWARD";:2@898," TO BUILD SHIPS";:2:175:
125:129:
131v
K2URO(P)P10:K2V5RPE(P)VT3JK2U5:K2V9RPE(P)U3JK2U9s178:2@451,"PRICES:";:2@517,BF"S   --"XF;:2@581,BT"S --"XT;:2@645,BS"S     --"XS;:2@707,"(MAX. OF"K2"SHIPS PER YEAR)";:
132:WQVSDJWQUSD:
133:133H
175:2@832,"LT. BAYLISS REPORTING, SIR!  ";:5:.

UU1=3:N(U)U0::2@898,"PLACE ORDERS FOR HOW MANY YEARS? ";:VWU100:198:Y2Uu(B):
UU1=3:!U69,70,71175:AUI:2@832,"BUILD HOW MANY "BB"S EACH YEAR?";:2@898,"";:VWU20:198:VWU100:BU"R"J175:WQUY3:
119\T6U0:N(U)Uu(B):
T5U1=U:T6UT6MN(T5)::T6TK2J174:
134:T6VTK2J
Y3UWQ=WQMY2N1:
X9U1=3:!X9
137,138,1394	MUMNXFON(X9):MV0JMUMMXFON(X9):
141:161a
MUMNXTON(X9):MV0JMUMMXTON(X9):
141:161MUMNXSON(X9):MV0JMUMMXSON(X9):
141:161'16:BU"":X9,Y3:WHU0@
WQUY3:175:171:
12516:175:2@832,"KIRMAN REPORTING SIR!";:2@898,"WHAT IS OUR DESTINATION?";:172WPU9:AU"R"J171:175:
119:176:AU"X"J142:175:2@832,A"!!    YES SIR!!!";:XUUPJ145:178:2@580,C(P);:I1UP:50:WPU0:DLSUD2.171:P1UXU:175:
119

T9U1=200::2@832,"I MEAN NO SIR.  THAT'S WHERE WE";:2@898,"ARE RIGHT NOW!!";:3:175:
1422@832,"DR. HENDERSON REPORTING.";:2@896,"HOW MANY YEARS OF SUSPENDED ANIMATION? ";:198:BU"R"J175:
119:Y2Uu(B):
Y3U1=Y2:5:SDUSDM1:16:x175:178:
TLU1=10:2@585," WAKE UP, SIR!!!";:6:2@586,w(207);:
T8U1=30:T8,TL:171:
11"W1U1J119:W1U1:178:2@522,"ORBITING: ";C(P);:2@586,"POPULATION: ";X(RO(P)O10);" MILLION";:2@650,"AVAILABLE "BT"S: ";TE;:!PS(P)M1152,150,151,152:x(C(P),1)U"S"K1U10+
1537K1U10:BK1U2:MK1U1:175:2@832,"FILL HOW MANY "BT"S, SIR?";:2@898,"";:198:D1Uu(B)D1TTE175:2@832,"NOT ENOUGH ROOM ABOARD "BT"S, SIR!!";:3:
153:D1TRO(P)OK1175:2@832,"OVER"K1"PERCENT OF POPULATION SIR!!";:3:
153j2@427,w(212);:RO(P)URO(P)ND1P100:TEUTEND1:TFUTFMD1:W1U1:16:171:175:
119W2U1J119:W2U1:PS(P)V2J119:1758RO(P)T400JKHU4000:KHUX(RO(P)O10)175:2@832,"WE HAVE RAISED"KH"CREDITS IN TAXES, SIR!";:MUMMKH:16:4:175:
119+
T7U0=19:PS(T7)U3J160::4 175:2@832,"LT. STARBUCK SIR!!";:2@898,"MERCHANT REPORTS THAT "C(T7)" HAS REVOLTED!!":PS(T7)U0:2:175:x(C(T7),1)U"S"JPS(T7)U1::T!Y3TSDJ165:!X9
162,163,164g"FUFMN(X9):
140|#TEUTEMN(X9):
140$VUVMN(X9):
1403%N(X9)U0J140:WHUY3J168:WHUY3A&175:2@832,"SEND SHIPS COMPLETED IN SD"Y3"TO:";:2@898,"(ENTER =C= FOR REFERENCE TO COMPUTER)";:172:AU"C"J171:39:130:BMU"ORDERS":
166d'175:176:AU"X"J166:2@832,A;/(169:U1(XX)UX9:U2(XX)UN(X9):U3(XX)UXU:I1UP:I2UXU:177:U(XX)UD2MY3:
140P)
TTU0=49:U(TT)U0JXXUTT::~*
TTU0=49:U(TT)VSDN5RU1(TT)VT5JXXUTT::<+
X8U385=705L64:2@X8,w(231);::
YU18=35:(1,Y):(80,Y)::
,AUI:
LPU1=500:7:2@115,BM"  ";:SDUSDM.001:AUI:AU""J6:2@115,"        ";:LP"-16:AU""J172:^.2@896,"SIR, THEY CAN ONLY BUILD"K2"SHIPS A YEAR! ":3:/2@832,D(43,32);:2@896,D(43,32);:40
XUU0=19:x(C(XU),1)UAJAUC(XU):::AU"X":y1D2UX(]((PA(I1)NPA(I2))Q2M(PB(I1)NPB(I2))Q2M(PC(I1)NPC(I2))Q2)):$22@385,"COMPUTER CENTRAL REPORTING:";:p32@427,w(212);:TFUTFN1:16:175:2@832,"THEY GOT A "BT"!!!";:6:175:
1024WQU1:VWU100:SDU1:C(0):
PU1=19T5T9U^(19):C(T9)U""JC(T9):x(C(T9),1)U"S"JPS(T9)U1:::181s6PD(0)U1:PS(0)U2:
PU0=19:RO(P):P:
PU0=19:PE(P)::
PU0=4:PA(P)U^(15)M23:PB(P)U^(15)M23:PC(P)U^(5)M5::
PU5=14:PA(P)U^(30)M15:PB(P)U^(30)M15:PC(P)U^(15):I7
PU15=19:PA(P)U^(60):PB(P)U^(60):PC(P)U^(15):P:MU1000:FU100:TEU100:VU5:PU0::
13
8KKU0:
T9U1=19:PS(T9)T1JKKUKKM1:SCUSCMRO(T9)O(PE(T9)M1)::k9171:178:2@580,KK" SYSTEMS IN "SD" YEARS";:2@714,"SCORE : "SCNSD;:175:2@832,"PLAY AGAIN?";:AUI:AU"Y"J:AU"N"J"MENU.JIM":186i;171:175:178:2@586,"WE ARE UNDER ATTACK!";:2:
T9U1=500: 255,8:2w(28);::
184<GALACTICA,PROYC,ALHAMBRA,YANG-TZU,MOONSWEEP,SPARTA,JAVINY,BOK,EVENTIDE,LLYTHLL,OOTSI,UTOPIA,TWRYX,DRASSA2,FARSIDE,KGOTLA,NOVENA,VIEJO,ZOE,HARKON@=40,25,13,68,102,37,2,7,181,50,88,34,67,92,137,14,19,28,3,19m>2,2,1,2,2,1,3,0,1,2,2,2,1,1,2,3,0,2,1,0?TFUTFP2:FUFP2:16:2:171:
12c@2@212,w(174)w(132);:7:2@211,w(136)w(191)w(157);:7;:2@148," ";:2@204,D(22,32);0A2@210,w(160)w(190)w(191)w(191)w(180);:2@275,w(139)w(143)w(143)w(129);:71B2@207,w(32)w(176)w(184)w(188)w(188);D(7,191);w(189)w(188)w(188)w(176)w(144);:2@269,w(160)w(188);D(17,191);w(189)w(180);:7:uC
TU0=49:	#1,U(T),U1(T),U2(T),U3(T)::
TU0=19:	#1,C(T),RO(T),PS(T),PE(T),PA(T),PB(T),PC(T),PD(T)::	#1,D5,F,KK,M,P1,P,V,SC,SD,VN,FF,TN,TE,TF,W1,W2,WP,WQ,WS,WW,XP,YP,Z,DL,VW,XF,XS,XT:&:5::
13FD""O",2,"EMPFL":
TU0=49:2#2,U(T);U1(T);U2(T);U3(T);::
TU0=19:2#2,C(T)","RO(T);PS(T);PE(T);PA(T);PB(T);PC(T);PD(T);::2#2,D5;F;KK;M;P1;P;V;SC;SD;VN;FF;TN;TE;TF;W1;W2;WP;WQ;WS;WW;XP;YP;Z;DL;VW;XF;XS;XT;:&:
E2@832,"1) END GAME  2) SAVE DATA ON DISK";:	T:TU2J
196:175:rFAUI:AU""SAUw(13)SAUw(10)J198:v(A)V48Sv(A)T57J198:2A;:BUA:
T9U1=VW:AUI:AUw(13)J:BUBMA:2A;::H:HTUHTN64:!HT
1410,6