$+>Y$│ Т:Е Y$│ Л(32) з 11000 :Д 11070e;-FL$│"":FS$│"":GR│0eY-
DX│ Б(X(T1)):DY│ Б(Y(T1))em-А X│T1 е T й STeБ-SX│X(X):SY│Y(X)eб-X(X)│ Б(X(X)):Y(X)│ Б(Y(X))e▓-X(X)│X(X)мDXe├-Y(X)│Y(X)мDYf--Е X(X)▓99 ▒ Y(X)▓99 з FL$│"":Ю(0):З@224,"GRAPHIC TOO LARGE FOR STORAGE!":А T│1 е 3000:Л:┐1,0:FL$│"":РfП-Е X(X)┤м9 з X$│ И(X(X)) :Д Е X(X)┤10 ░ X(X)▓│м9 з X$│ И(X(X))л"." :Д Е X(X)▓│10 з X$│ И(X(X))fя-Е Y(X)┤м9 з Y$│ И(Y(X)):Д Е Y(X)┤10 ░ Y(X)▓│м9 з Y$│ И(Y(X))л".":Д Е Y(X)▓│10 з Y$│ И(Y(X))g!-Е  З(FL$)▓│150 з FL$│"":TL│1::Д FL$│FL$лX$лY$g5-X(X)│SX:Y(X)│SYgJ-#FS$│FS$л И(L(X))gP-(Лgж--Е TL│1 з TL│0:Ю(0):З@224,"TOO MANY POINTS TO STORE!":А X│1 е 3000:Л:┐1,0:FL$│"":Рg╨-2Ю(0):З@224,"";:Й"NAME OF GRAPHIC";FF$h-4Е FF$│"EMPTY" з З"DO NOT USE 'EMPTY' AS NAME!":А T│1 е 3000:Л:Бе 11570h.-7Е FF$│"" з 200hK-<Щ "D" ,#1, "GRAPHIC/LIB"hZ-FА T│1 е 10he-K─ #1,Thq-PЙ #1,F$hд-ZЕ F$│"EMPTY"з ┘ #1,FF$,FL$,FS$:┼ #1,T:Бе 11640hя-dЕ F$│FF$ з З"THIS FILE ALREADY EXISTING!":Ъ #1:А X│1 е 3000:Л:Бе 11570hї-nЛi-sЗ"LIBRARY IS FULL":А X│1 е 3000:Лi0-xЪ #1:┐1,0:Бе 200i<-ВБж 5850iP-ДЕ Y$│ Л(32) з Рie-ЖЕ Y$│"B" з 11700iЯ-ИЕ Y$│"S" з Е TD│1 з TD│0:Бе205::Д Е TD│0 з TD│1:Бе205i╢-МЕ Y$│"C" з N1│N2:Рiт-ЦЕ Y$│"D" з А T│1 е N1:T$(T)│"":Л:N1│1:Рiя-кБе 11650j--┤FL$│"":Ю(0):З@266,"<STOP";:З@224,"";:╗Й"ENTER TEXT: ";FF$jC-╣Е FF$│"" з ┐1,0:РjЦ-║Е  З(FF$)▓30▒ N1▓5 з З"ATTEMPTING TO OVERLOAD BUFFER!":А T│1 е 3000:Л:Бе 11700j░-╗N1│N1л1:N2│N1:N1│N1л1j╚-╛Щ "D",#1,"TEXT/LIB"j▄-├А X│1 е  З(FF$)jў-╚HR│  К( Р(FF$,X,1))м31k-═─ #1,HR:Й #1,A$k -╧T$(N1)│T$(N1)лA$k?-╥Е  З(T$(N1))▓100 з N1│N1л1kL-╫Л X:Ъ #1kf-┘Е T$(N1)│"" з N1│N1м1kq-▄┐1,0:Рk-сTD│1:CF│0kЭ-цH│ Н(0)н4:V│ Н(1)н3:Y$│ Тl-ыЕ  Й(Y$)│4 ▒  Й(Y$)│8 з N$│"S"лY$:CF│( З(FF$)н(7н Й( Р(N$,2,1))о4)м(3н Й( Р(N$,2,2))о4))о2:HT│6н Й( Р(N$,2,1))о4l<-эЕ Y$│"F"░ CF┤▓0 ░ PT│1 з PT│2:Бе11785lU-юЕ Y$│ Л(32) зN1│N2:РlЦ-ЁЕ PT│2 з Е Y$│"K" з PT│0:Р :Д Е Y$│"M" з PT│3:╞"C0":Бе 11790m-·Е H▓CF ░ VмHT▓0 з ╜(HмCF,V):╜(HлCF,V):╜(HмCF,VмHT):╜(HлCF,VмHT):╛(HмCF,V):╛(HлCF,V):╛(HмCF,VмHT):╛(HлCF,VмHT)m- Бе 11750ma.	Е H▓CF ░ V▓HT зT$(N2)│N$л"BM"л И( Б(HмCF))л","л И(V):Д а 100,2:Бе 11750m{.А X│N2 е N1:╞ T$(X):Лmо.Е PT│2 з 11750 :Д Е PT│3 з PT│2:╞"C1":Бе 11785m║.Бж 5800mр.Е GR│1 з 11810 :Д GR│1:T1│T:Бе 60n."GR│0:Е T1▓T з ST│м1 :Д Е T1┤T з ST│1 :Д Е T1│T з а 100,3:Рn+.,Бж 5850n?.6Е Y$│"F" з 2300nT.;Е Y$│"E" з 13000ni.@Е Y$│"S" з 11525n~.EЕ Y$│"M" з 12000nТ.JЕ Y$│"R" з 2200nж.TЕ Y$│ Л(32) з Рn╟.YЕ Y$│"C" з GR│1:CG│1:Бе 7500nу.^Е Y$│"J" з GR│1:Бе 7500nў.hЕ Y$│"W"з 11910o.|Бе 11820o#.ЖЕ T1▓T з R│T:T│T1:T1│R:R│0o4.ИА X│T1 е Tм1oi.ЛЕ L(Xл1)│1 з L(Xл1)│.5::Д Е L(Xл1)│.5 з L(Xл1)│1oo.НЛoy.ХA$│""oД.ЪБе 200o▓.дЮ(0):З@224,"WALL THICKNESS="WTн24оSC"IN."o╓.оЙ"ENTER NEW THICKNESS (IN.)";WTp.│Е WT┤0 ▒ WT▓24 з З"OUT OF RANGE (0-24 IN.)!":Бе 11950p .╡WT│WTнSCо24p+.╕┐1,0:Рp6.р:Г MAGpB.ъБж 5850pO.ЇA$│A$лY$ps.■Е Y$│ Л(13) з A│ Й(A$):Бе 12080pИ/Е Y$│ Л(32) з 60pХ/Бе 12010pл/0А X│T1 е TSTEP STq/:Е Hл(X(X)мH)нA▓0 ░ Hл(X(X)мH)нA┤255 ░Vм(VмY(X))нA▓0 ░Vм(VмY(X))нA┤191з Л :Д а 100,2:A$│"":Бе 12000q&/DА X│T1 е T й STqe/NX(X)│Hл(X(X)мH)нA:Y(X)│Vм(VмY(X))нA:Е L(X)▓1 з L(X)│L(X)нAqt/XЛ X:Бе 200qЗ2╚:Г ERASE GROUPqн2╥Е (T1│1 ░ T│N) ▒ T│T1 з а 100,2:Рq╠2▄Е T1▓T з R│T:T│T1:T1│R:R│0q╫2цL(T)│0qя2ыЕ L(T1)│1 з T1│T1л1r
2ЁЕ T┤N зА X│T е N :Д 13080r22·X(T1)│X(X):Y(T1)│Y(X):L(T1)│L(X)r>3T1│T1л1rD3Лr^3N│T1м1:L(T1)│0:Бе 200X)нAqt/XЛ X:Бе 200qЗ2╚:Г ERASE GROUPqн2╥Е (T1│1 ░ T│N) ▒ T│T1 з а 100,2:Рq╠2▄Е T1▓T з R│T:T│T1:T1│R:R│0q╫2цL(T)│0qя2ыЕ L(T1)│1 з T1│T1л1r
2ЁЕ T┤N зА X│                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                1)┤Y(T) з HY│мHYS-┤X(T)│X(T)лHX:Y(T)│Y(T)лHYS{╣╞"C1BM"л И( Б(X(T1)))л","л И( Б(Y(T1)))л"M"л И( Б(X(T)))л","л И( Б(Y(T)))SЕ╛Бе 60Sй╚Е Y$│"L" зY$│"":Бе 6605 :Д 6530Sщ═A$│"":L│ Ы((Y(T)мY(T1))п2л(X(T)мX(T1))п2):Е L│0 з а 100,2:РSє╥Y$│ ТT╫Е Y$┤▓"" з а 175,1:A$│A$лY$T'┘Е Y$│ Л(32) з РTw▄Е Y$│ Л(13) з A│ Й(A$)нSC:A$│"":RX│X(T):RY│Y(T):RL│L(T):R│T:Бе 6625::Д 6610T╦сDX│Aн(X(T)мX(T1))оL:Е X(T)лDX▓0 ░ X(T)лDX┤255 з X(T)│X(T)лDX :Д а 100,2:Бе 6600UцDY│Aн(Y(T)мY(T1))оL:Е Y(T)лDY▓0 ░ Y(T)лDY┤255 з Y(T)│Y(T)лDY :Д а 100,2:Бе 6600U*·Бе 200UTXЮ:З"********** CAD STARTUP *********"U▒bЗ:Й"THIS STARTUP WILL ERASE ALL     PREVIOUS DATA. CONTINUE (Y/N)   ";Y$:Е Y$┤▓"Y" з 500UьgЕ X$│"1" з Ю(0):З@224,"PRESENT SCALE: 1 IN.="FT$" FT."VlЗ:З"ENTER SCALE: 1 IN.  = XX FT."V@q╗Й"                    = ";FT$:FT│ Й(FT$)VRvЕ FT│0 з 7025VcxFT│1о Й(FT$)Vp{SC│30нFTVЖ}Е X$│"1" з ┐1,0:РV║АЗ:Й"ENTER WALL THICKNESS (IN.):";WT:WT│WTнSCо24Vч▓А T│1 е N:X(T)│0:Y(T)│0:L(T)│0:Л:T│0:N│0Vё╖Бе 50V¤LX│H:Y│VW	VБж 5850WtЕ Y$│ Л(32) з РW1~Е Y$│"J" з 7560WKАЕ CG│1 ░ Y$│"C"з 7560WWГБе 7510WОИDX│ В(XмH):Е H┤X з DX│мDX :Д Е H▓X з DX│DX :Д DX│0W┼НDY│ В(YмV):Е V┤Y з DY│мDY :Д Е V▓Y з DY│DY :Д DY│0WяТЕ GR│1 з А X│T1 е T й ST::Д А X│1 е NXЧЕ X(X)лDX▓│255 ▒ X(X)лDX┤│0 з а 100,3:T│0:РXKЬЕ Y(X)лDY▓│191 ▒ Y(X)лDY┤│0 з а 100,3:РXSЮЛ XX}аЕ GR│1 з А X│T1 е T й ST::Д А X│1 е NXгбЕ CG│0 зX(X)│X(X)лDX:Y(X)│Y(X)лDYX┌гЕ CG│1 з N│Nл1:X(N)│X(X)лDX:Y(N)│Y(X)лDY:L(N)│L(X)XЄдЛ:Е L(N)│0 з L(N)│1YеЕ CG│1 з L(Nм В(TмT1))│0Y3жGR│0:CG│0:Е Y$│"C" з 205 :Д 200YR░а 175,1:╗(BX,BY)м(H,V),╜,BYИ╡Е B1│1 з А X│1 е Nм1::Д Е B1│2 з А X│Nм1 е 1 й м1Yь║Е X(X)▓BX ░ X(X)┤H ░ X(Xл1)▓BX ░ X(Xл1)┤H ░ Y(X)▓BY ░ Y(X)┤V ░ Y(Xл1)▓BY ░ Y(Xл1)┤V з 7615 :Д ЛZ0┐Е B1│1 з T1│X:B1│2:Бе 7605::Д Е B1│2 з B1│0:T│Xл1:ST│1:Бе 11820Z6─РZA:ГZOOMZVZZ│255о В(ZXмH) Z_#Z1│0Zt(╚4,1:╝:┐1,0:T1│0ZЕ2А NZ│1 е Nм1[=<Е X(NZ)▓ZX ░ X(NZ)┤H ░ X(NZл1)▓ZX ░ X(NZл1)┤H ░ Y(NZ)▓ZY ░ Y(NZ)┤V ░ Y(NZл1)▓ZY ░ Y(NZл1)┤V ░ L(NZл1)│1 з╗( В(X(NZ)мZX)нZZ, В(Y(NZ)мZY)нZZ)м( В(X(NZл1)мZX)нZZ, В(Y(NZл1)мZY)нZZ),╜[FFЛ NZ[LnР[Т@Е X$│"9" ░ FD$┤▓"" з 8030 :ДЮ:З"******* DRAWING STORAGE ********"[нJЗ"INSERT STORAGE DISK"[╟TЗ:Й"NAME OF FILE";FD$[┌VЕ FD$│"" з 500[ўYЗ:З"STORING DRAWING NOW"\
[FD$│FD$л"/DRG"\^Щ "O",#1,FD$\0h┘ #1,SC,FT$,SH,N\>rА T│1 е N\V|┘ #1,X(T),Y(T),L(T)\\ЖЛ\hИ┘ #1,N1\ДЛА T│1 е N1:┘ #1,T$(T):Л\НРЪ #1\├ЪЕ X$┤▓"9" зЗ:З"DRAWING HAS BEEN STORED"::Д ┐1,0:Р\▌дА T│1 е 3000:Л:Бе 500]#(Ю:З"******* DRAWING LOADING ********"]"#2З"INSERT STORAGE DISK"];#<З:Й"NAME OF FILE";F$]M#FЕ F$│"" з 500]j#PЗ:З"LOADING DRAWING NOW"]{#UF$│F$л"/DRG"]М#ZЩ "I", #1,F$]б#dЙ #1,SC,FT$,SH,N]п#nА T│1 е N]╟#xЙ #1,X(T),Y(T),L(T)]═#ВЛ]┘#ДЙ #1,N1]ї#ЗА T│1 е N1:Й #1,T$(T):Л^8#МЪ #1:З:З"DRAWING HAS BEEN LOADED":FD$│F$:А T│1 е 3000:Л:Бе 500^g'KL│0:Ю:З"******** GRAPHIC LIBRARY *******"^Щ'Е X$│"5" з X$│"":Y$│"L":А T│1 е 4:З:Л:Бе10100^╟'KL│0:З@128,"<L>IST, <R>ETRIEVE OR <K>ILL"^═' З_8'!Y$│ Т:Е Y$│"L" з 10100::Д Е Y$│"K" з KL│1:Бе 10020 :Д Е Y$│"R" з 10020 :Д Е Y$│ Л(32) з 10165 :Д 10017_l'$З@128,"":З@128,"";:Й"ENTER NUMBER OF FILE:";FR$_Е'&Е FR$┤│"    "з 10015_Ф''FF│ Й(FR$)_Ў')Е FF┤0 ▒ FF▓10 ▒  Й( И(FF))│0 з З"NUMBER OUT OF RANGE (1-10)":А T│1 е3000:Л:З@160,"":Бе 10020`'8Е FF▓0 ░ FF┤│10 з T1│FF`/'tЩ "D", #1, "GRAPHIC/LIB"`9'~T1│FF`T'ГЕ Y$│"L" з А T1│1 е 10``'И─ #1,T1`t'ТЙ #1,F$,FL$,FS$`╕'ЬЕ Y$│"R" ░ F$┤▓"EMPTY" з З"LOADING GRAPHIC: "F$:FF$│F$:Бе 10160a$'гЕ F$┤▓"EMPTY" ░ KL│1 з KL│0:┘ #1,"EMPTY","NILL","NILL":┼ #1,T1:З"FILE HAS BEEN DELETED":FL$│"":Бе 10160aK'жЕ Y$│"L" з ЗT1;F$,:Л:Ъ #1:Бе 10015aМ'лЗ"THAT FILE IS EMPTY!":Ъ #1:А T│1 е 3000:Л:З@160,"":Бе 10020aХ'░Ъ #1a╤'╡З@416,"PRESS <M>ENU, <W>ORKSHEET             <L>IBRARY"a█'║Y$│ Тb#'╝Е Y$│"M" з 500 :Д Е Y$│"W" з┐1,0:Бе 60::Д Е Y$│"L" з 10000 :Д 10170b/'╪Бж 5850bK'┌Е Y$│"N" з PG│1:Бж 2000b`'▄Е Y$│"F" з 10210bw'▐Е Y$│"M" з Бж 1900bХ'рЕ Y$┤▓"" з 10215 :Д 10200b╧'тN│Nл1:L(N)│0:X(N)│H:Y(N)│V:╗(X(N),Y(N))м(X(N),Y(N)),╜b▌'чNR│3:TN│Nbї'ьА X│7 е  З(FL$) й 6b 'ёN│Nл1c;'ЎX(N)│X(TN)л Й( Р(FL$,X,3)):Y(N)│Y(TN)л Й( Р(FL$,Xл3,3))c~(Е X(N)▓0 ░ X(N)┤256 ░Y(N)▓0 ░ Y(N)┤191 з10250:Д а 100,3:N│TN:Рcв(
L(N)│ Й( Р(FS$,NR,2)):NR│NRл2:Лc╙(А X│TN е Nм1:Е L(Xл1)│1 з╗м(X(Xл1),Y(Xл1)),╜c┘(Лc▀(Рd*°Ю(0):З@128,"HELPS INFORMATION":Й"ENTER COMMAND";H$dЬ*∙Е H$│"" з ┐1,0:Р::Д Е  К(H$)┤65 ▒  К(H$)▓90 з З"ENTRY NOT WITHIN RANGE!.        USE LETTER ENTREES ONLY!":А T│1 е 3000:Л:Бе 11000dн*·HR│ К(H$)м64d╞+Щ "D",#1,"HELPS/LIB"d╥+─ #1,HRd▀+ Й #1,HI$dщ+*З HI$dЄ+4Ъ #1d¤+9HI$│""eN))"%"\bЕ EG│1 з Е N┤│SN ░  В(SX(N)мXP)┤RL ░  В(SY(N)мYP)┤RL зЗVI$(N)" @"SX(N);SY(N); Б(S(N))"%"\h&Л\r0Бе350\т:ЖMANTA,MOBAS,GOBLIN,CYCLOPS,PIRANHA,ORION,NOMAD,HORNET,WASP,VIPER,TALON,WOLF,TRITON,HYDRA,HUNTER,LOTUS,DIRK]!DЕ SX(N)▓│X ░ SY(N)▓│Y зSX(N)│SX(N)м Д(5):SY(N)│SY(N)м Д(5)]`NЕ SX(N)▓│X ░ SY(N)┤│Y зSX(N)│SX(N)м Д(5):SY(N)│SY(N)л Д(5)]аXЕ SX(N)┤│X ░ SY(N)▓│Y з SX(N)│SX(N)л Д(5):SY(N)│SY(N)м Д(5)]рbЕ SX(N)┤│X ░ SY(N)┤│Y з SX(N)│SX(N)л Д(5):SY(N)│SY(N)л Д(5)]ыlБе2370^vDS│0:А T│5 е 40 й 5^АА N│1 е 10^ЛКЕ  Д(3)│1 ░B(N)▓45░  В(BX(N)мX)┤T ░  В(BY(N)мY)┤T з DS│0:З"DISTRESS SIGNAL ANSWERED!":XD│BX(N):YD│BY(N):DH│1:Бе 3230^╗ФЛ N,T:З"NO BASES WITHIN RANGE!!":SQ│SQл10:Р^сЮЕ BX(N)▓│X ░ BY(N)▓│Y з DX│1:DY│1_иЕ BX(N)▓│X ░ BY(N)┤│Y з DX│1:DY│м1_/▓Е BX(N)┤│X ░ BY(N)▓│Y з DX│м1:DY│1_W╝Е BX(N)┤│X ░ BY(N)┤│Y з DX│м1:DY│м1_g╞MM│0:WS│0:Р_Й╨ЗX;Y">";:Й"DESTINATION";XD,YD_б╥Е XD│0 ░ YD│0 з 350_░╒Й"WARP";WS_щ╫Е WS┤│0 ▒ WS▓10 з З"WARP VALUE (1-10) ONLY!":Бе 3285`3┌Е ED│1 ░ WS▓WF з З"MAX WARP IS WF"WF"DUE TO ENGINE   DAMAGE!":Бе 3285`В▌WS│ Б(WSн.6)л1:Е WS▓5 з З"POSSIBLE ENGINE DAMAGE AT       SUSTAINED WARP!"`жфЕ X▓│XD ░ Y▓│YD з DX│мWS:DY│мWS`╚юЕ X┤│XD ░ Y┤│YD з DX│WS:DY│WS`ы°Е X▓│XD ░ Y┤│YD з DX│мWS:DY│WSa
Е X┤│XD ░ Y▓│YD з DX│WS:DY│мWSa,
DH│0:SV│0:BP│0:MM│1:Бе350a╚
Е SB│1 з З"SMART BOMB HAS BEEN USED!":Р :ДSB│1:Й"ENTER SECURITY CODE FOR SMART   BOMB LAUNCH...";SC:Е SC│90855 з 3360 :Д З"PROCEDURE ABORTED...":SB│0:РbK
 Й"SHIP TO TARGET:";V$:А N│1 е SN:Е  О(VI$(N),2)│ О(V$,2) з XB│SX(N):YB│SY(N):N5│N:Бе 3370::Д Л:З"SHIP NOT LOCATED,SIR!":SB│0:РbY
*BX│X:BY│Ybq
4З"BOMB LAUNCHED..."bС
>Е BX▓│SX(N5)з B1│м2 :Д B1│2b▓
HЕ BY▓│SY(N5) з B2│м2 :Д B2│2b╕
RРb°
\B1│0:B2│0:Е  В(SX(N5)мBX)┤4 ░  В(SY(N5)мBY)┤4 з 3430:Д 3450cШ
fЕ  Д(3)│1 з S(N5)│S(N5)о4:З"> "VI$(N5)" SUSTAINS CRITICAL ":З"DAMAGE BY SMART BOMB!"::Д З"> "VI$(N5)" DESTROYED BY":З"SMART BOMB!":S(N5)│0:DT│DTм1:PP│PPл50cв
pБе350c╪
zЗ"SMART BOMB FAILED TO REACH      TARGET!":Бе 350cша╚ 4,1:┐ 1,0cюе╝c¤кА T│1 е 10dI┤┬ (53лBX(T)н1.5,181мBY(T)н1.5),6,,.2:┬(53лBX(T)н1.5,181мBY(T)н1.5),2,,3dn╛┬ (53лPX(T)н1.5,181мPY(T)н1.5),3dм╚╞"BM"л И( Б(53лNX(T)н1.5))л","л И( Б(181мNY(T)н1.5)):╞ N$dц╥Е T┤SN ░ EG│1 з ┬(53лSX(T)н1.5,181мSY(T)н1.5),5,,0,.5e▄╗ (50лXн1.5,183мYн1.5)м(54лXн1.5,181мYн1.5),╜,BFe#ИЛ Te-НX$│ Тe7П╞"S4"eгТЕ X$│"3" ▒ X$│"#" з ╞"BM"л И( Б(53лXн1.5))л","л И( Б(181мYн1.5)):Е X$│"#" з ╞ "S8"лTB$:╞ "S4": :Д ╞ TB$e┤ЬЕ X$│"V" з Рe└ьБе 500553лSX(T)н1.5,181мSY(T)н1.5),5,,0,.5e▄╗ (50лXн1.5,183мYн1.T0:РKDБж 5850K*FЕ Y$│"N" з CN│1:Бж2000K]GЕ CN│3 з CN│4:┬(T0,T2),3,1:┬(T0,T2),3,0:Бе5700K|HЕ CN│4 з H│T0:V│T2:Бе 5715KЫIЕ CN│1 з CN│2:CA│1:Бе 5700K╜JЕ CN│2 зH│X(T):V│Y(T):Бе 5715K╥NЕ Y$│ Л(32) з 60LOЕ Y$│"S" з Е CA│1 з CA│0:Р::Д Е CA│0 з CA│1:РL@PЕ Y$│"D" з Е CS│1 з CS│0:Бе 260::Д Е CS│0 з CS│1:Бе 260LaRЕ CS│1 ░ CA│1 ░Y$│"E" з 5760L╜SCN│0:А X│1 е 10:Е Y$│"V" ░CX(X)│0з 5730 :Д Е Y$│"H" ░ CY(X)│0 з 5720 :Д Л:а 100,2:Бе 60LхXCS│1:CA│1:Е Y$│"H" з CY(X)│V:Бе 255M
bCS│1:CA│1:Е Y$│"V" з CX(X)│H:Бе 255MvБе 5700M`АА T│1 е 10:Е  В(HмCX(T))┤│6з ┬(CX(T),V),3,1:┬(CX(T),V),3,0:Бе 5780MЭЕЕ  В(VмCY(T))┤│6 з ┬(H,CY(T)),3,1:┬(H,CY(T)),3,0:Бе 5785MйКЛ:Бе 60M╡ФCX(T)│0M└ЦБе 200M╠ЩCY(T)│0M╫ЮБе 200N5иА T0│2 е 6:А T│1 е N:Е  В(X(T)мH)┤T0 ░  В(Y(T)мV)┤T0 з┬(X(T),Y(T)),3,1:┬(X(T),Y(T)),3,0:РNF▓Л T,T0:Бе 60N^┌:ГSUB COMMAND LEVELNГ▀H│ Н(0)н4:V│ Н(1)н3:Y$│ Т:╜(H,V)NкрЕ X$│"3"░ Y$│"S" з а 175мGAн25,1:РN╥сЕ X$│"2" ░ Y$│"S" з а 175мCAн25,1:РNъфЕ Y$┤▓"" за 175,1:РNїщ╛(H,V)O
юБе 5850O╥pЕ N▓0 з RX│X(N):RY│Y(N):RL│L(N):R│N:╞"C0;BM"л И( Б(X(Nм1)))л","л И( Б(Y(Nм1)))л"M"л И( Б(X(N)))л","л И( Б(Y(N))):┬(X(N),Y(N)),L(N),0:L(N)│0:X(N)│X(Nм1):Y(N)│Y(Nм1):N│Nм1:╞"C1":╗(X(N),Y(N))м(X(N),Y(N)),╜:РOрzа 100,3:РOьdБж 5800P	fЕ DD│0 з DD│1:T1│T:Бе 60P#hЕ DD│1 з DD│0:Бе 6530P-ВY$│ ТPоМЕ Y$│"E" з DD│0:Е T1▓T з RX│X(T1):RY│Y(T1):RL│L(T1):R│T1:L(T1)│0:Бе200::Д Е T▓T1 з RX│X(T):RY│Y(T):RL│L(T):L(T)│0:R│T:Бе 200P╠СЕ Y$│ Л(32) з DD│0:┐1,0:РPшУЕ Y$│"I" з 6550 :Д 6555QTЦDL│ Ы((X(T)мX(T1))п2л(Y(T)мY(T1))п2)оSC:Е X(T)┤▓X(T1) зAA│ Ф((Y(T)мY(T1))о(X(T)мX(T1)))н180оPI :Д AA│90R)Ш Ю(0):A│(DLм Б(DL))н12:З@160,"LINE INFORMATION:";:З:З"LENGTH=" Б(DL)"'" Б(A); И( Б((Aм Б(A))н16))"/16''":З"(X1,Y1)=" Б(X(T1)), Б(Y(T1)):З"(X2,Y2)=" Б(X(T)), Б(Y(T)):З"FROM POINT"T1"TO POINT"T:З"ANGLE="AA"DEG.REЫЕ Y$│"H" з 6560 :Д 6600RНаHX│ В(X(T)мX(T1))о2:HY│ В(Y(T)мY(T1))о2:R│T:RX│X(T):RY│Y(T):RL│L(T)R█е╞"C0BM"л И( Б(X(T1)))л","л И( Б(Y(T1)))л"M"л И( Б(X(T)))л","л И( Б(Y(T)))RїкЕ X(T1)┤X(T) з HX│мHXSпЕ Y(TSX(N)мX)┤T ░  В(SY(N)мY)┤T ░ S(N)┤▓0 зЗVI$(N)":"SX(N);SY(N); Б(S(N))"%":Бе350JT*Л NJl4Е T┤81зT│Tл1:Бе2080Jv>Бе350J~HT│5JєRА N│1е10:Е P$(N)┤▓"c" ░  В(PX(N)мX)┤T ░  В(PY(N)мY)┤T зЗP$(N)" PLANET:"PX(N);PY(N);PC(N)"COL."; Б(P(N))"%":Бе350J√\Л NKfЕ T┤81зT│Tл5:Бе2130KpБе350KLzЮ:З@224,"<<<<<YOU HAVE BEEN DEFEATED>>>>>"KYДSQ│SQл50KiОА T│1е500:ЛKtШБе2450KzвЮKжмЗ@224,"<<YOUR SHIP RAN OUT OF ENERGY>>"K│╢SQ│SQл30K├└А X│1е500:ЛK╬╩Бе2450K¤╘Ю:З@224,"<YOUR BASES HAVE BEEN DEFEATED>>"L
▐SQ│SQл30L!шА X│1е500:Л:Бе2450LDЄЕ  Д(3)│2 з Р:Д BT│10:А N│1еSNLW№Е S(N)┤│0з2410Ls	Е B(N)┤│0 ░ S(N)▓0з3140L╗	Е SX(N)▓│BX(N) ░ SY(N)▓│BY(N) з SX(N)│SX(N)м Д(5):SY(N)│SY(N)м Д(5)M
	Е SX(N)┤│BX(N) ░ SY(N)┤│BY(N)зSX(N)│SX(N)л Д(5):SY(N)│SY(N)л Д(5)MG	$Е SX(N)▓│BX(N) ░ SY(N)┤│BY(N)зSX(N)│SX(N)м Д(5):SY(N)│SY(N)л Д(5)MН	.Е SX(N)┤│BX(N) ░ SY(N)▓│BY(N)зSX(N)│SX(N)л Д(5):SY(N)│SY(N)м Д(5)N\	8ЕB(N)▓0░ В(SY(N)мBY(N))┤9░ В(SX(N)мBX(N))┤9зB(N)│B(N)мS(N)о(30оSS(N)):З"> "VI$(N);SX(N);SY(N);"ATTACKING":З"  STARBASE"BX(N);BY(N):Е B(N)┤25зЗ"CRITICAL HIT!!":ЕB(N)┤15зB(N)│0:З"STARBASE DEFEATED!!":SV│0Nr	BЕ B(N)┤50зBP(N)│0Nо	LЕ  В(BX(N)мX)┤2 ░  В(BY(N)мY)┤2 ░ SV│1 ░ B(N)┤50 з BP│0N├	VЕ B(N)│0зBT│BTм1N▀	`Е P(N)┤0зP(N)│0:PC(N)│0Nч	jЛ NNэ	tРN■	~А T│1е1000:ЛO4	ИЮ:З@224,">>YOU HAVE DEFEATED THE EMPIRE<<":Бе2450OB	ТCP│0:TC│0OU	ЬBT│10:А N│1е10Om	жЕ B(N)│0 з PP│PPм50Oг	░Е P$(N)│"c"зCP│CPл(10нPC(N)нP(N)о100):TC│TCлPC(N)O╕	║Е B(N)│0зBT│BTм1O╛	─ЛO╒	╬PA│10н Б(PPлCPлTC)Oї	╪Е X$│"0"зЗ"POINTS:"PA:Бе350P	тЗ@264,"STARDATE"S1":"S2P=	ьЗ@298,"SCORE:" Б(PA)," P%="(1000мSQ)о10Pc	ЎRG│10н(PAо12600)н((1000мSQ)о1000)PА
З@329,BT"STARBASES LEFT"PЬ

З@361,TC"COLONIES LEFT"P║
З@393,LI"COMMANDS ISSUED"P▌
З@455,"RATING =";:З═"##.##";RGPу
(КQ

2Е P$(N)│"e"з DM│7л Д(8):Д DM│ Д(3)Qd
<Е SV│0 зЗ"/ "P$(N)" PLANET MAKES"DMн10"UNIT HIT        ON YOUR SHIP!":DM│DMн10:Бж1120Qn
FБе550Q{
PА N│1е10Qд
ZЕ  В(PX(N)мX)┤2 ░  В(PY(N)мY)┤2з2680Qк
dЛQ╫
nЗ"NO PLANET LOCATED HERE!":SQ│SQл5:Бе350RF
xЕ X$│"B" ░ P$(N)│"c"░ PC(N)│4 ░ P(N)┤100 з З"REBUILDING COLONY":P(N)│P(N)л25:EN│ENм2:Е P(N)▓100 з P(N)│100RY
ВЕ X$│"B" з 350Rє
ДЕ X$│"F" з Е P$(N)│"c"░ PC(N)│4 ░ PF(N)│10 ░ P(N)▓10 з З"COLONY BASE REFUELING SHIP...":RE│P(N)о200:P(N)│ Б(P(N)м(100мEN)о3):EN│ENл(100мEN)нRE:Бе 350S2
МЕ EN┤30 з З"NOT ENOUGH ENERGY TO COLONIZE!":SQ│SQл10:Бе350S╩
ЦЕ TP▓0 ░ P$(N)│"e"зЗ"TORPEDO HIT ON ENEMY COLONY!    COLONY DEFEATED!":TP│TPм1:TC│TCл50:З"PLANET IS NOW NEUTRAL!":P$(N)│"n":PC(N)│0:PP│PPл50:Бе 350Sя
аЕ PC(N)│4 з 350 :Д PC(N)│PC(N)л1T
кP$(N)│"c"   T
┤ЗPC(N)"COLONIES"TQ
╛Е PC(N)│3зP(N)│85:ДЕPC(N)│2з P(N)│70:ДЕ PC(N)│1зP(N)│50Ti
╚Е PC(N)│4 зP(N)│100Tu
╥EN│ENм4Tо
▄Е PC(N)│4 з З"BASE ESTABLISHED!":PF(N)│SRл1л Д(5)о10T╪
цЕ PC(N)▓3зS2│S2л1:Е S2▓9зS1│S1л1:S2│0TЁ
ЁЕ PC(N)▓3з SR│SRл.1T·
·Бе350U)Ю:З@224,"<<YOU HAVE FAILED YOUR MISSION>>"U6SQ│SQл30UAБе2450UX"TT│0:NH│0:А T│1еSNUe,А N│1е10Uб6Е PC(N)▓0 з HP│3л Д(7):ДЕ PC(N)▓3 зHP│7л Д(8):ДHP│ Д(3)V|@ЕS(T)▓0░P$(N)┤▓"e"░ В(PX(N)мSX(T))┤6░ В(PY(N)мSY(T))┤6з S(T)│S(T)мHP:З"> "P$(N)" PLANET"PX(N);PY(N);"MAKES"10нHP"UNIT    HIT ON "VI$(T);SX(T);SY(T):NH│NHл1:ЕS(T)┤10зЗ"ENEMY SHIP DESTROYED!!":DT│DTм1:S(T)│0:PP│PPл50VКJЕ NH│2з РWbTЕP$(N)│"c"░ В(SX(T)мPX(N))┤9░ В(SY(T)мPY(N))┤9░ PC(N)▓3░ S(T)▓0 зP(N)│P(N)м(S(T)л50)о10:З"> "VI$(T);SX(T);SY(T)" ATTACKING":З" COLONY"PX(N);PY(N):Е P(N)┤0зP(N)│100:PC(N)│4:З"COLONY DEFEATED!":P$(N)│"e":PF(N)│100W▄^Е S(T)▓0 ░  В(SX(T)мPX(N))┤3 ░  В(SY(T)мPY(N))┤3 ░ P$(N)│"n" з P$(N)│"e":PC(N)│4:P(N)│100:ЗVI$(T)" ESTABLISHES BASE!"WфhЛ NWьrЛ TWЄ|РXЖT│NS:TT│0X)РЗ:З"-----------STAR NOVAS----------"X6ЪА N│1е10X─дЕ N┤│SN ░ В(SX(N)мNX(T))┤(9л Д(4)) ░  В(SY(N)мNY(T))┤(9л Д(4))░ S(N)▓0зЗVI$(N);SX(N);SY(N)"DAMAGED!":S(N)│ Б(S(N)мS(N)о(3л Д(0))):TT│TTл1Y7оЕ  В(PX(N)мNX(T))┤7 ░  В(PY(N)мNY(T))┤7зЗ"PLANET"PX(N);PY(N)"LIFE DESTROYED!":PC(N)│0:P(N)│0:P$(N)│"n":TT│TTл1Y▒╕Е  В(BX(N)мNX(T))┤9 ░  В(BY(N)мNY(T))┤9зЗ"STARBASE"BX(N);BY(N)"REPORTS DAMAGE!!":B(N)│ Б(B(N)мB(N)о(3л Д(0))):BP(N)│0Y┴┬Е TT│3з3030Y╟╠ЛZЧ╓Е SV│0 ░ BP│0░  В(XмNX(T))┤9л Д(4) ░  В(YмNY(T))┤9л Д(4) з:З"SIR, DAMAGE REPORTS COMING IN!!":WF│WFм Д(3):SQ│SQл20:DM│3.5л Д(0)о2:EN│ Б(ENмENоDM):ED│1:SV│0:Е SP$│"+"зSE│ Б(SEмSEоDMо1.5):Д SE│ Б(SEмSEоDM)ZгрNS│NSм1ZйъРZ╕ЇА N│1 е 10[:■Е  В(PX(N)мXP)┤RL ░  В(PY(N)мYP)┤RL зЗP$(N)" PLANET @"PX(N);PY(N);PC(N)"COL."; Б(P(N))"%":Е PF(N)│10 з З"  <FUELING STATION>"[╡Е  В(NX(N)мXP)┤RL ░  В(NY(N)мYP)┤RL зЗ"STAR @"NX(N);NY(N);:Е NS┤N зЗ"<<NOVA>>":ДЕ NS│N зЗ"<<<UNSTABLE>>>":ДЗ"*STABLE*"\Е  В(BX(N)мXP)┤RL ░  В(BY(N)мYP)┤RL зЗ"STARBASE"N"@"BX(N);BY(N); Б(B(T!":Бе3508(шЕ  Д(6)│3░ SE┤50з1080:Д10058НэЕ S(N)▓50 ░  Д(4)│2 зЗ"TORPEDO DEFLECTED BY "VI$(N):S(N)│S(N)м( Д(6)оSS(N)):Е BP│0 з 1100 :Д 3508сЄTH│200:Е S(N)┤│100зЗ"200 UNIT HIT ON "VI$(N)"!!":S(N)│S(N)м(14л(6оSS(N))л Д(4))9 №Е S(N)┤│50зЗVI$(N)" SUSTAINS HEAVY DAMAGE":S(N)│S(N)м Д(5)9VЕ S(N)┤│35зЗ"CRITICAL HIT!!!":S(N)│S(N)м(4л Д(5))9гЕ S(N)┤│10зЗ"ENEMY DEFEATED, SIR!!":S(N)│0:DT│DTм1:PP│PPл100:Е DT│0з24309┴Е S(N)▓0 ░BP│0з1100:Д 3509╦$Бе3509ъ8З"TORPEDO MISFIRE!!":Бе3509∙BЕ BP│1з350:kLDM│S(N)л70л(16м В((SX(N)мX)л(SY(N)мY)))нSS(N):З:З"> "VI$(N)" MADE" Б(DM)"UNIT HIT ON         OUR SHIP,SIR!!!":|VБж1120:Бе350:╝`DM│DMо10:Е SP$│"+"зSE│SEмDMо2:Д SE│SEмDM:EN│ENмDMо4:SQ│SQл5;%eЕ SE┤50 ░ SC│0 з Е  Д(3)│1 з SP$│"-":SO│2:З"SHIELD CONTROL DAMAGED...":З"SHIELDS DROPPED SIR!!":SC│1;rjЕ SE┤50зЗ"HEAVY DAMAGE SUSTAINED!":Е  Д(6)│3 з Е ED│0 з ED│1:WF│WFм Д(3);РtЕ SE┤25зЗ"critical hit!!";а~Е SE┤0з2170;░ИЕ EN┤0з2170;╢ТР;┐ЬRA│9;▐жЗ"TARGETS:":T│0:А N│1 е SN<<░Е EG│1 з Е В(SX(N)мX)┤RA ░  В(SY(N)мY)┤RA ░ S(N)┤▓0зЗVI$(N)" AT"SX(N);SY(N);S(N)"%":T│Tл1<B║Л<c─Е T│0зЗ"NO TARGETS SIGHTED!"<m╬Бе350<В╪ЗX;Y">";:Й XX,YY<РтMM│0:DH│0<зьЕ XX│0 ░ YY│0 з350<єЎЕ  В(XXмX)▓11 ▒  В(YYмY)▓11зЗ"MAXIMUM SAFE WARP IS WF 7!":SQ│SQл5:Бе350=XЕ ED│1з Е  В(XXмX)▓WF ▒  В(YYмY)▓WF зЗ"MAXIMUM WARP IS WF "WF" DUE TO     ENGINE DAMAGE!!":Бе350=Л
З"WARP CORE OVERHEATING!":EN│ENм Д(5):SQ│SQл10=яЕ  Д(3)▓8мWS зЗ"ENGINE DAMAGE!! YELLOW ALERT!!":ED│1:EN│ENмWSм Д(10):WF│3л Д(3):SQ│SQл20:MM│0:Р=їР>(X│XX:Y│YY>2А N│1е 10><<Е N┤│SN ░ X│SX(N) ░ Y│SY(N)зCC$│VI$(N)>aFЕ X│PX(N) ░ Y│PY(N)зCC$│"PLANET">ДPЕ X│NX(N) ░ Y│NY(N)зCC$│"STAR">зZЕ X│BX(N) ░ Y│BY(N)зCC$│"BASE"?dЕ CC$┤▓""зЗ"COLLISION WITH "CC$" AVERTED!":X│Xл1:Y│Yл1:CC$│"":SE│SEм Д(5):SQ│SQл5:Бе1400?
nЛ?xЕ EN┤0з2210?#ВSV│0?,МBP│0?MЦS2│S2л1:Е S2▓9 зS1│S1л1:S2│0?ZаSR│SRл.1?`кР?г┤SQ│SQл5:А N│1 е 10:Е  В(BX(N)мX)┤2 ░  В(BY(N)мY)┤2 з 1480 :Д Л?╦╛З"SIR? THERE'S NO BASE HERE!":Бе350@
╚Е B(N)┤│0зЗ"STARBASE"N"HAS BEEN DEFEATED!!":Бе350@%╥Е SV│1зЗ"ALREADY DOCKED!":Бе350@D▄SQ│SQм5:З"**SHIP DOCKED**"@UцЕ N▓10з N│10@^ЁSV│1@g·BP│0@оЕ B(N)┤50з BP(N)│0:ДЗ"STARBASE SHIELDS PROTECT SHIP!":BP│1:BP(N)│1@╚Е B(N)▓│45 зED│0:WF│7@╪RE│B(N)о100A"Е B(N)┤30зЗ"NOT ENOUGH ENERGY TO SERVICE    SHIP!":Бе350Az,B(N)│ Б(B(N)м((100мEN)л(100мPE)л(100мSE))о6):Е B(N)┤0 зB(N)│0:З"ALL RESERVES EXHAUSTED":SQ│SQл10A╔6EN│ENл(100мEN)нRE:PE│PEл(100мPE)нRE:TP│ Б(TPл(10мTP)нRE):SE│SEл(100мSE)нREA╥;SC│0Aю@З"SERVICING HAS BEGUN!"BES2│S2л1:Е S2▓9 з S1│S1л1:S2│0:SR│SRл.1B#JБе350BШTЗ:З"--SHIP STATUS--":Е SV│1зЗ,"**DOCKED**":Д Е MM│1з З,"**MOVING**":ДЕ DH│1 з З,"**IN TOW**":ДЗ,"**STATIONARY**"B▓^З"STARDATE",S1;":";S2B╧hЗ"ALERT STATUS:"," ";CO$BфrЗ"LOCATION:",X;YC	|З"ENERGY:",")"л б( Б(ENо10),140)CCЖ:ГPRINT"WARP DRIVE:",;")"+STRING$(INT((WF/7)*10),140)CАЛЗ"WARP DRIVE:",;")";::Е WF▓6зЗ"OPERATIONAL":Д З"DAMAGED"CбРЗ"TORPEDOES:",")"л б(TP,140)C╒ЪЗ"SHIELD ENERGY:";" ";SP$;")"л б( Б(SEо10),140)D
дЗ"PHASER ENERGY:",")"л б( Б(PEо10),140)D
оЗ:Бе350D+╕З"SHIELDS ("SP$")";:Й SS$DD┬ET│0:Е X$│"$" з 1780DV╠SS$│ О(SS$,2)DЭ╤Е SO│2 ░ SC│1 з Е  Д(2)│1 з З"SHIELD CONTROL MALFUNCTION!!":Бе 350Dф╓Е SS$│"UP" ▒ SS$│"+"зSP$│"+":З"SHIELDS RAISED!":EN│ENм1:SO│1:Бе350E#рЕ SS$│"DO"▒ SS$│"-"зSP$│"-":З"SHIELDS LOWERED!":SO│2:Бе350E-ъБе350EIЇЙ"UNITS TO TRANSFER";ETEТ■ET│ETо10:Е ET┤0зЕ  В(ET)▓SEм20 ▒  В(ET)▓100мEN зЗ"TRY AGAIN!":Бе1780E╦Е ET▓0 зЕ ET▓ENм20 ▒ ET▓100мSE зЗ"TRY AGAIN!":Бе1780EсEN│ENмET:SE│SEлETEЇЕ SE▓50 з SC│0E■Бе350F`&Й"UNITS TO TRANSFER";ET:ET│ETо10:Е ET┤0 з Е  В(ET)▓PE ▒  В(ET)▓100мEN з З"TRY AGAIN!":Бе 1830FЬ0Е ET▓0 з Е ET▓ENм20 ▒ ET▓100мPE з З"TRY AGAIN!":Бе 1830F╣:EN│ENмET:PE│PEлET:Бе 350F╚DЙ"LIST";X$F╨NP│0G"XЕ  О(X$,2)┤▓"BA" ░  О(X$,2)┤▓"PL" ░ EG│0зЗ"NO ENEMY SHIPS IN QUADRANT!":Бе350GAbЕ  П(X$,1)│"P"зP│49:Бе2020GblЕ  П(X$,3)│"CLO"зNR│1:Бе2010GrvX$│ О(X$,2)GБАА N│1 е SNGаКЕ X$│ О(VI$(N),2)з 1950:ДЛGлФБе1960G╙ЮЗVI$(N)" @";SX(N);SY(N); Б(S(N))"%"G■иЕ X$┤▓"BA" ░ X$┤▓"PL" ░ X$┤▓"SH"зБе350HG▓Е X$│"BA"зА N│1е 10:З"STARBASE"N;":";BX(N);BY(N); Б(B(N))"%":Л:Бе350HК╝Е X$│"SH"зА N│1еSN:ЗVI$(N);":";SX(N);SY(N); Б(S(N))"%":Л:Бе350I
╞Е X$│"PL"зА N│1е10:ЗP$(N)" PLANET :";PX(N);PY(N);PC(N)"COL."; Б(P(N))"%":Е PF(N)│10 з З" <FUELING STATION>":Л::Д ЛI╨Бе350IO┌X$│ О(X$,2):Е X$│"BA"з2020:ДЕ X$│"SH"з2070:ДЕ X$│"PL"з2120:Д350IXфT│5 I║юА N│1е10:Е  В(BX(N)мX)┤T ░  В(BY(N)мY)┤T ░ B(N)▓P зЗ"STARBASE:";BX(N);BY(N); Б(B(N))"%":Бе350I┬°Л NI┌Е T┤81зT│Tл5:Бе2030IфБе350IьT│5JL А N│1еSN:Е  В( ?┴&$
:ГNOV. 16, 1997 UPDATE 1-16-25&4
CS$│"90855"&ЮЮ:З"****************************************WELCOME CAPTAIN!****************************************"&жN│1'
(З@128,"ENTER SECURITY CODE"::X$│ Т:T│ Д(50):Е X$┤▓"" з S$(N)│X$:N│Nл1:Е N│6 з 50 :Д Бе 40:ДБе40'#2З"ONE MOMENT PLEASE"'-<DT│10'7FNS│10'CPМVI(18)'LZS3│9'U_WF│7'^dSR│0'АiN$│"NR4NE3NU4NH3NL4NG3ND4NF3"'аkTB$│"BM+12,+12U24L24D24R24"'оnB│10:SN│3'╖xLI│0'┴ВBT│10'сМCO$│ Л(223)л"GREEN"л Л(223)'яЦS│10:SO│2'√аSP$│"-"(кSE│100(┤TP│10(╛EN│100(&╚PE│100(5╥А N│1 е 10(|▄А N1│1 е  Д(15):НV$:Л:Е VI(N1)│0 з VI$(N)│V$:VI(N1)│1:П::Д П:Бе220(ДцЛ N(ЧЁА T2│1 е  Д(8))·А N│1е10:BX(N)│ Д(99):BY(N)│ Д(99):PX(N)│ Д(99):PY(N)│ Д(99):B(N)│100:BP(N)│1:S(N)│100:NX(N)│ Д(99):NY(N)│ Д(99):PF(N)│100)8 Е  Д(3)│1з SS(N)│2 :Д SS(N)│1)
Е  Д(3)│1 з P$(N)│"e":P(N)│100:PC(N)│4::Д P$(N)│"n":P(N)│0:PC(N)│0)Щ
S1│1000л Д(3000):S2│0)╡
X│10л Д(89):Y│10л Д(89))╩
"SX│Xм6:MS│ Д(10))╥
,Л N)█
6Л T2*)
@А N│1 е 5:Е S$(N)│ Р(CS$,N,1) з Л :ДЗ">>>>>>>>CLEARANCE DENIED<<<<<<<<":К*√
JЗ"SECURITY CLEARANCE ACCEPTED":А T2│1 е 800:Л:З:З"WELCOME TO THE BRIDGE,CAPTAIN":А T│1 е 800:Л:З:З"MISSION STATUS:                 ENTERING DELTA QUADRANT...      TO ESTABLISH PLANET BASES.":А T│1 е 2000:Л+
TА T│1 е 1000:Л:Ю:Бе1620+!
^X$│ Т+-
cа 100,1+9
hLI│LIл1+C
rY$│X$+^
|Е X$│"C"▒ X$│"B"з 2640+s
БЕ X$│ "F" з 2640+Ч
ЖЕ X$│"4"з 1720 :Д Е X$│"$"з1780+│
РЕ EG│1 ░  Д(6)│3зБж2850+├
ЪЕ DT│0з2430+ш
дЕ EG│1 ░ NS▓0 ░  Д(80)│40зБж2950,Р
оЕ SR▓.5л Д(0)░ EG│0зА N│1е10:SX(N)│ Д(80):SY(N)│ Д(80):Л:З:З"SIR! COMMAND REPORTS ENEMY SHIPS ENTERING THE QUADRANT!!        THEY ARE TARGETING THE STATIONS!":EG│1,в
╕Е SR▓7.1з2820,╨
┬Е  Д(40)│20зЗ ═"#.#";7мSR;:З" DAYS LEFT!"-
╠Е BT┤│0з2260:Д Е MM│1 з MS│MSлWS:Е MS▓7 з MS│0:Бж 1430-/
╓Е EG│1 ░X$┤▓"1"░  Д(6)│3зБж2290-t
рCO$│ Л(223)л"GREEN"л Л(223):Е EG│1 ░ SN┤10 ░  Д(20)│10 з SN│SNл1-о
ъЕ ED│1 ▒ EN┤20 ▒ SE┤20 з CO$│ Л(159)л"YELLOW"л Л(159)-╚
ЇЕ X$┤▓"D" ░SE┤│0з2170-т
■Е X$┤▓"D"░ EN┤│0з2210.OА N│1е10:Е EG│1 ░ N┤│SN ░S(N)┤▓0 ░  В(SX(N)мX)┤9 ░ В(SY(N)мY)┤9 зCO$│ Л(181)л"red"л Л(181):а 100,1:Бе550.ХЕ SV│0 ░  Д(6)│3 ░ P$(N)┤▓"c" ░  В(PX(N)мX)┤6░  В(PY(N)мY)┤6з2610.ЫЛ/
!А N│1 е 10:Е SR▓PF(N) з PF(N)│10:З"BASE"PX(N);PY(N)"REPORTS":З" ACHIEVING FUELING STATUS!":Л::Д Л/&Е X$│"D"з1460/%0Е X$│"T"з1180/8:Е X$│"1" з 930/O?Е X$│"V" з Бж 4000/eDЕ X$│"S" з Бж33500!NЕ X$│"M" з 3280:Д Е DH┤▓1 ░(X$│"H"▒  В(XмXD)┤│WSл1 ░  В(YмYD)┤│WSл1 ░ MM│1) з MM│0:DX│0:DY│0:З"DROPPING OUT OF WARP, SIR!":Е X$┤▓"H" з X│XD:Y│YD:YD│1000:XD│1000:EN│ENм(WSл(5мWS)о5)оSO03XЕ X$│"0"з24500mbЕ X$│"3"зЗ:З"SCANNER FINDINGS:":XP│X:YP│Y:RL│9:Бе30600мlЕ X$│"#"з З:З"LONG RANGE FINDINGS:":XP│X:YP│Y:RL│17:Бе30600╛vЕ X$│"R"з16200╥АЕ DS│1 з Бж31901КЕ(ED│1 ▒ EN┤20 ▒ SE┤20)░ X$│"X" з З"DISTRESS SIGNAL SENT!":DS│1:SQ│SQл2013ПЕ X$│"W" з З EN1cФЕ X$│"L"зЗ"SCANNER REQUEST SIR?...":Бе 18601ВЮЕ MM│1 ▒ DH│1 з 680 :Д 7001╘иЕ  В(XмXD)▓WS з X│XлDX:Е MM│1 з EN│ENм(WSл(5мWS)о10)оSO:Е WS▓5 з EN│ENм(WSм5)2&▓Е  В(YмYD)▓WS з Y│YлDY:Е MM│1 з EN│ENм(WSл(5мWS)о10)оSO:Е WS▓5 з EN│ENм(WSм5)2G╖Е WS▓5 з Е  Д(2)│1 з Бж 12902Й╝Е X│XD ░ Y│YD  ░ DH│1 з DX│0:DY│0:DH│0:YD│1000:XD│1000:Бе14602з╞Е B1┤▓0 ░ B2┤▓0 з Бж 33902∙╨Е B1┤▓0 ░ B2┤▓0 з BY│BYлB2:BX│BXлB1:Е  В(BXмSX(N5))┤3░  В(BYмSY(N5))┤3 з 34203!┌Е X$│"P"зЗ"SIR, BEARING:";X;Y:Бе3503HфЕ X$│"2"з780 :Д Е X$│ Л(34) з 18303АюЕ CO$│ Л(181)л"red"л Л(181) ░  Д(7)│4 ░ BP│0 з 11003Ъ°Е X$│""зLI│LIм1:Бе3503▓З"??":LI│LIм1:Бе3503эЕ PE┤│0зЗ"ALL PHASER ENERGY EXPENDED!!":SQ│SQл10:Бе35041Е EG│1 зА N│1еSN:Е S(N)┤▓0░  В(SX(N)мX)┤9░  В(SY(N)мY)┤9з810:ДЛ4R З"NO TARGET IN RANGE!":Бе3504в*Е (SE┤40 ▒ PE┤40) ░  Д(2)│1зЗ"PHASERS UNABLE TO LOCK ON       TARGET":Бе3504┼4З"PHASERS LOCKED ON "VI$(N)"!"4▌>Й"UNITS TO FIRE";UN5#HЕ UN│0з350:ДЕ UNо10▓PEл Д(10) ▒ UN▓200зЗ"TOO MUCH!":SQ│SQл5:Бе8305;RЕ UN▓50зUN│UNм Д(5)5[\ЗUN"UNIT HIT ON "VI$(N)"!!"5yfPE│PEмUNо10:Е PE┤0 з PE│05ЯpS(N)│ Б(S(N)м(UNо10)оSS(N))м Д(4)5╩zЕ S(N)┤│50зЗVI$(N)" HEAVILY DAMAGED!!"5ыДЕ S(N)┤│35зЗ"CRITICAL HIT!!"6<ОЕ S(N)┤10зS(N)│0:З" ENEMY SHIP DESTROYED, SIR!":DT│DTм1:PP│PPл50:Е DT│0з24306iШЕ S(N)▓0 ░  Д(4)┤▓1 ░ BP│0 з 1100 :Д 3506евЕ TP┤│0з TP│0:З"ALL TORPEDOES EXPENDED!":SQ│SQл10:Бе3506┴мЙ"TARGET COORDS.";TX,TY6ї╢Е  В(TXмX)▓8▒  В(TYмY)▓8зЗ"OUT OF RANGE!":Бе3507
└TP│TPм17B╩Е EG│1 з А N│1 е SN:Е S(N)┤▓0 ░ SX(N)│TX ░ SY(N)│TY з1000:ДЛ7э╘А N│1е10:Е BX(N)│TX ░ BY(N)│TY зЗ"TORPEDO DEFLECTED BY STARBASE!":ДЕ NX(N)│TX ░ NY(N)│TY зЗ"TORPEDO ABSORBED BY STAR!!":ДЕ PX(N)│TX ░ PY(N)│TY ░ P$(N)│"e" з Бе2710:ДЛ8▐З"TORPEDO LOS @6&/
:ГNOV. 16, 1983 J. JEWETT  UPDATE 1-24-25&?
CS$│"00010"&йЮ:З"****************************************WELCOME CAPTAIN!****************************************"&▒N│1'(З@128,"ENTER SECURITY CODE"::X$│ Т:T│ Д(50):Е X$┤▓"" з S$(N)│X$:N│Nл1:Е N│6 з 50 :Д Бе 40:ДБе40'.2З"ONE MOMENT PLEASE"'8<DT│10'BFNS│10'NPМVI(18)'WZS3│9'`_WF│7'idSR│0'ЛiN$│"NR4NE3NU4NH3NL4NG3ND4NF3"'лkTB$│"BM+12,+12U24L24D24R24"'╣nB│10:SN│3'┬xLI│0'╠ВBT│10'ьМCO$│ Л(223)л"GREEN"л Л(223)'·ЦS│10:SO│2(аSP$│"-"(кSE│100(┤TP│10(&╛EN│100(1╚PE│100(@╥А N│1 е 10(З▄А N1│1 е  Д(15):НV$:Л:Е VI(N1)│0 з VI$(N)│V$:VI(N1)│1:П::Д П:Бе220(ПцЛ N(вЁА T2│1 е  Д(8))!·А N│1е10:BX(N)│ Д(99):BY(N)│ Д(99):PX(N)│ Д(99):PY(N)│ Д(99):B(N)│100:BP(N)│1:S(N)│100:NX(N)│ Д(99):NY(N)│ Д(99):PF(N)│100)C Е  Д(3)│1з SS(N)│2 :Д SS(N)│1)К
Е  Д(3)│1 з P$(N)│"e":P(N)│100:PC(N)│4::Д P$(N)│"n":P(N)│0:PC(N)│0)д
S1│1000л Д(3000):S2│0)└
X│10л Д(89):Y│10л Д(89))╒
"SX│Xм6:MS│ Д(10))▌
,Л N)ц
6Л T2*4
@А N│1 е 5:Е S$(N)│ Р(CS$,N,1) з Л :ДЗ">>>>>>>>CLEARANCE DENIED<<<<<<<<":К*я
JЗ"SECURITY CLEARANCE ACCEPTED":АT2│1е800:Л:З:З"CAPTAIN ON THE BRIDGE!":АT│1е800:Л:З:З"MISSION STATUS:":З"ENTERING DELTA QUADRANT...      ESTABLISHING PLANETARY BASES.":А T│1 е 2000:Л+
TА T│1 е 1000:Л:Ю:Бе1620+
^X$│ Т+!
cа 100,1+-
hLI│LIл1+7
rY$│X$+R
|Е X$│"C"▒ X$│"B"з 2640+g
БЕ X$│ "F" з 2640+Л
ЖЕ X$│"4"з 1720 :Д Е X$│"$"з1780+з
РЕ EG│1 ░  Д(6)│3зБж2850+╖
ЪЕ DT│0з2430+▄
дЕ EG│1 ░ NS▓0 ░  Д(80)│40зБж2950,Д
оЕ SR▓.8л Д(0)░ EG│0зА N│1е10:SX(N)│ Д(80):SY(N)│ Д(80):Л:З:З"SIR! COMMAND REPORTS ENEMY SHIPS ENTERING THE QUADRANT!!        THEY ARE TARGETING THE STATIONS!":EG│1,Ц
╕Е SR▓7.1з2820,═
╜Е EN┤25 ░  Д(3)│1 зЗ:З"SIR! ENERGY RESERVES LOW!!",√
┬Е  Д(40)│20зЗ ═"#.#";7мSR;:З" DAYS LEFT!"-6
╠Е BT┤│0з2260:Д Е MM│1 з MS│MSлWS:Е MS▓7 з MS│0:Бж 1430-s
╤Е SE┤25 ░  Д(6)│3 з З "SIR! HULL INTEGRITY AT" Б(SE)"%!"-Ч
╓Е EG│1 ░X$┤▓"1"░  Д(6)│3зБж2290-▄
рCO$│ Л(223)л"GREEN"л Л(223):Е EG│1 ░ SN┤10 ░  Д(20)│10 з SN│SNл1.
ъЕ ED│1 ▒ EN┤20 ▒ SE┤20 з CO$│ Л(159)л"YELLOW"л Л(159).0
ЇЕ X$┤▓"D" ░SE┤│0з2170.J
■Е X$┤▓"D"░ EN┤│0з2210.╖А N│1е10:Е EG│1 ░ N┤│SN ░S(N)┤▓0 ░  В(SX(N)мX)┤9 ░ В(SY(N)мY)┤9 зCO$│ Л(181)л"red"л Л(181):а 100,1:Бе550.¤Е SV│0 ░  Д(6)│3 ░ P$(N)┤▓"c" ░  В(PX(N)мX)┤6░  В(PY(N)мY)┤6з2610/Л/i!А N│1 е 10:Е SR▓PF(N) з PF(N)│10:З"BASE"PX(N);PY(N)"REPORTS":З" ACHIEVING FUELING STATUS!":Л::Д Л/{&Е X$│"D"з1460/Н0Е X$│"T"з1180/а:Е X$│"1" з 930/╖?Е X$│"V" з Бж 4000/═DЕ X$│"S" з Бж33500ЙNЕ X$│"M" з 3280:Д Е DH┤▓1 ░(X$│"H"▒  В(XмXD)┤│WSл1 ░  В(YмYD)┤│WSл1 ░ MM│1) з MM│0:DX│0:DY│0:З"DROPPING OUT OF WARP, SIR!":Е X$┤▓"H" з X│XD:Y│YD:YD│1000:XD│1000:EN│ENм(WSл(5мWS)о5)оSO0ЫXЕ X$│"0"з24500╒bЕ X$│"3"зЗ:З"SCANNER FINDINGS:":XP│X:YP│Y:RL│9:Бе30601lЕ X$│"#"з З:З"LONG RANGE FINDINGS:":XP│X:YP│Y:RL│17:Бе30601&vЕ X$│"R"з16201:АЕ DS│1 з Бж31901ЗКЕ(ED│1 ▒ EN┤20 ▒ SE┤20)░ X$│"X" з З"DISTRESS SIGNAL SENT!":DS│1:SQ│SQл201ЫПЕ X$│"W" з З EN1╦ФЕ X$│"L"зЗ"SCANNER REQUEST SIR?...":Бе 18601ъЮЕ MM│1 ▒ DH│1 з 680 :Д 7002<иЕ  В(XмXD)▓WS з X│XлDX:Е MM│1 з EN│ENм(WSл(5мWS)о10)оSO:Е WS▓5 з EN│ENм(WSм5)2О▓Е  В(YмYD)▓WS з Y│YлDY:Е MM│1 з EN│ENм(WSл(5мWS)о10)оSO:Е WS▓5 з EN│ENм(WSм5)2п╖Е WS▓5 з Е  Д(2)│1 з Бж 12902ё╝Е X│XD ░ Y│YD  ░ DH│1 з DX│0:DY│0:DH│0:YD│1000:XD│1000:Бе14603╞Е B1┤▓0 ░ B2┤▓0 з Бж 33903a╨Е B1┤▓0 ░ B2┤▓0 з BY│BYлB2:BX│BXлB1:Е  В(BXмSX(N5))┤3░  В(BYмSY(N5))┤3 з 34203Й┌Е X$│"P"зЗ"SIR, BEARING:";X;Y:Бе3503░фЕ X$│"2"з780 :Д Е X$│ Л(34) з 18303шюЕ CO$│ Л(181)л"red"л Л(181) ░  Д(7)│4 ░ BP│0 з 11004°Е X$│""зLI│LIм1:Бе3504З"??":LI│LIм1:Бе3504UЕ PE┤│0зЗ"ALL PHASER ENERGY EXPENDED!!":SQ│SQл10:Бе3504ЩЕ EG│1 зА N│1еSN:Е S(N)┤▓0░  В(SX(N)мX)┤9░  В(SY(N)мY)┤9з810:ДЛ4║ З"NO TARGET IN RANGE!":Бе3505
*Е (SE┤40 ▒ PE┤40) ░  Д(2)│1зЗ"PHASERS UNABLE TO LOCK ON       TARGET":Бе3505-4З"PHASERS LOCKED ON "VI$(N)"!"5E>Й"UNITS TO FIRE";UN5ЛHЕ UN│0з350:ДЕ UNо10▓PEл Д(10) ▒ UN▓200зЗ"TOO MUCH!":SQ│SQл5:Бе8305гRЕ UN▓50зUN│UNм Д(5)5├\ЗUN"UNIT HIT ON "VI$(N)"!!"5сfPE│PEмUNо10:Е PE┤0 з PE│06pS(N)│ Б(S(N)м(UNо10)оSS(N))м Д(4)62zЕ S(N)┤│50зЗVI$(N)" HEAVILY DAMAGED!!"6SДЕ S(N)┤│35зЗ"CRITICAL HIT!!"6дОЕ S(N)┤10зS(N)│0:З" ENEMY SHIP DESTROYED, SIR!":DT│DTм1:PP│PPл50:Е DT│0з24306╤ШЕ S(N)▓0 ░  Д(4)┤▓1 ░ BP│0 з 1100 :Д 3507
вЕ TP┤│0з TP│0:З"ALL TORPEDOES EXPENDED!":SQ│SQл10:Бе3507)мЙ"TARGET COORDS.";TX,TY7]╢Е  В(TXмX)▓8▒  В(TYмY)▓8зЗ"OUT OF RANGE!":Бе3507i└TP│TPм17к╩Е EG│1 з А N│1 е SN:Е S(N)┤▓0 ░ SX(N)│TX ░ SY(N)│TY з1000:ДЛ8U╘А N│1е10:Е BX(N)│TX ░ BY(N)│TY зЗ"TORPEDO DEFLECTED BY STARBASE!":ДЕ NX(N)│TX ░                                                                                                                                                                                                                                                                                                 !"#$%&'┬                            SPACEWARBAS 9PAEWAR BAS─OX1    DAT
 "КRROW   DAT
 сRIME   BAS$▓ORDS   BAS%╘RIME2  BAS╬AD     CAMRAPHIC LIB
 &EXT    LIB
 '                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                NY(N)│TY зЗ"TORPEDO ABSORBED BY STAR!!":ДЕ PX(N)│TX ░ PY(N)│TY ░ P$(N)│"e" з Бе2710:ДЛ8p▐З"TORPEDO LOST!":Бе3508РшЕ  Д(6)│3░ SE┤50з1080:Д10058їэЕ S(N)▓50 ░  Д(4)│2 зЗ"TORPEDO DEFLECTED BY "VI$(N):S(N)│S(N)м( Д(6)оSS(N)):Е BP│0 з 1100 :Д 3509IЄTH│200:Е S(N)┤│100зЗ"200 UNIT HIT ON "VI$(N)"!!":S(N)│S(N)м(14л(6оSS(N))л Д(4))9И№Е S(N)┤│50зЗVI$(N)" SUSTAINS HEAVY DAMAGE":S(N)│S(N)м Д(5)9╛Е S(N)┤│35зЗ"CRITICAL HIT!!!":S(N)│S(N)м(4л Д(5)):Е S(N)┤│10зЗ"ENEMY DEFEATED, SIR!!":S(N)│0:DT│DTм1:PP│PPл100:Е DT│0з2430:)Е S(N)▓0 ░BP│0з1100:Д 350:3$Бе350:R8З"TORPEDO MISFIRE!!":Бе350:aBЕ BP│1з350:╙LDM│S(N)л70л(16м В((SX(N)мX)л(SY(N)мY)))нSS(N):З:З"> "VI$(N)" MADE" Б(DM)"UNIT HIT ON         OUR SHIP,SIR!!!":фVБж1120:Бе350;$`DM│DMо10:Е SP$│"+"зSE│SEмDMо2:Д SE│SEмDM:EN│ENмDMо4:SQ│SQл5;НeЕ SE┤50 ░ SC│0 з Е  Д(3)│1 з SP$│"-":SO│2:З"SHIELD CONTROL DAMAGED...":З"SHIELDS DROPPED SIR!!":SC│1;┌jЕ SE┤50зЗ"HEAVY DAMAGE SUSTAINED!":Е  Д(6)│3 з Е ED│0 з ED│1:WF│WFм Д(3);°tЕ SE┤25зЗ"critical hit!!"<~Е SE┤0з2170<ИЕ EN┤0з2170<ТР<'ЬRA│9<FжЗ"TARGETS:":T│0:А N│1 е SN<д░Е EG│1 з Е В(SX(N)мX)┤RA ░  В(SY(N)мY)┤RA ░ S(N)┤▓0зЗVI$(N)" AT"SX(N);SY(N);S(N)"%":T│Tл1<к║Л<╦─Е T│0зЗ"NO TARGETS SIGHTED!"<╒╬Бе350<ъ╪ЗX;Y">";:Й XX,YY<°тMM│0:DH│0=ьЕ XX│0 ░ YY│0 з350=[ЎЕ  В(XXмX)▓11 ▒  В(YYмY)▓11зЗ"MAXIMUM SAFE WARP IS WF 7!":SQ│SQл5:Бе350=└Е ED│1з Е  В(XXмX)▓WF ▒  В(YYмY)▓WF зЗ"MAXIMUM WARP IS WF "WF" DUE TO     ENGINE DAMAGE!!":Бе350=є
З"WARP CORE OVERHEATING!":EN│ENм Д(5):SQ│SQл10>WЕ  Д(3)▓8мWS зЗ"ENGINE DAMAGE!! YELLOW ALERT!!":ED│1:EN│ENмWSм Д(10):WF│3л Д(3):SQ│SQл20:MM│0:Р>]Р>k(X│XX:Y│YY>y2А N│1е 10>д<Е N┤│SN ░ X│SX(N) ░ Y│SY(N)зCC$│VI$(N)>╔FЕ X│PX(N) ░ Y│PY(N)зCC$│"PLANET">ьPЕ X│NX(N) ░ Y│NY(N)зCC$│"STAR"?ZЕ X│BX(N) ░ Y│BY(N)зCC$│"BASE"?ldЕ CC$┤▓""зЗ"COLLISION WITH "CC$" AVERTED!":X│Xл1:Y│Yл1:CC$│"":SE│SEм Д(5):SQ│SQл5:Бе1400?rnЛ?ВxЕ EN┤0з2210?ЛВSV│0?ФМBP│0?╡ЦS2│S2л1:Е S2▓9 зS1│S1л1:S2│0?┬аSR│SRл.1?╚кР@┤SQ│SQл5:А N│1 е 10:Е  В(BX(N)мX)┤2 ░  В(BY(N)мY)┤2 з 1480 :Д Л@3╛З"SIR? THERE'S NO BASE HERE!":Бе350@i╚Е B(N)┤│0зЗ"STARBASE"N"HAS BEEN DEFEATED!!":Бе350@Н╥Е SV│1зЗ"ALREADY DOCKED!":Бе350@м▄SQ│SQм5:З"**SHIP DOCKED**"@╜цЕ N▓10з N│10@╞ЁSV│1@╧·BP│0AЕ B(N)┤50з BP(N)│0:ДЗ"STARBASE SHIELDS PROTECT SHIP!":BP│1:BP(N)│1A0Е B(N)▓│45 зED│0:WF│7A@RE│B(N)о100A}"Е B(N)┤30зЗ"NOT ENOUGH ENERGY TO SERVICE    SHIP!":Бе350Aт,B(N)│ Б(B(N)м((100мEN)л(100мPE)л(100мSE))о6):Е B(N)┤0 зB(N)│0:З"ALL RESERVES EXHAUSTED":SQ│SQл10B16EN│ENл(100мEN)нRE:PE│PEл(100мPE)нRE:TP│ Б(TPл(10мTP)нRE):SE│SEл(100мSE)нREB:;SC│0BV@З"SERVICING HAS BEGUN!"BБES2│S2л1:Е S2▓9 з S1│S1л1:S2│0:SR│SRл.1BЛJБе350CTЗ:З"--SHIP STATUS--":Е SV│1зЗ,"**DOCKED**":Д Е MM│1з З,"**MOVING**":ДЕ DH│1 з З,"**IN TOW**":ДЗ,"**STATIONARY**"C^З"STARDATE",S1;":";S2C7hЗ"ALERT STATUS:"," ";CO$CLrЗ"LOCATION:",X;YCq|З"ENERGY:",")"л б( Б(ENо10),140)CлЖ:ГPRINT"WARP DRIVE:",;")"+STRING$(INT((WF/7)*10),140)CшЛЗ"WARP DRIVE:",;")";::Е WF▓6зЗ"OPERATIONAL":Д З"DAMAGED"D	РЗ"TORPEDOES:",")"л б(TP,140)D=ЪЗ"SHIELD ENERGY:";" ";SP$;")"л б( Б(SEо10),140)DiдЗ"PHASER ENERGY:",")"л б( Б(PEо10),140)DuоЗ:Бе350DУ╕З"SHIELDS ("SP$")";:Й SS$Dм┬ET│0:Е X$│"$" з 1780D╛╠SS$│ О(SS$,2)E╤Е SO│2 ░ SC│1 з Е  Д(2)│1 з З"SHIELD CONTROL MALFUNCTION!!":Бе 350EL╓Е SS$│"UP" ▒ SS$│"+"зSP$│"+":З"SHIELDS RAISED!":EN│ENм1:SO│1:Бе350EЛрЕ SS$│"DO"▒ SS$│"-"зSP$│"-":З"SHIELDS LOWERED!":SO│2:Бе350EХъБе350E▒ЇЙ"UNITS TO TRANSFER";ETE·■ET│ETо10:Е ET┤0зЕ  В(ET)▓SEм20 ▒  В(ET)▓100мEN зЗ"TRY AGAIN!":Бе1780F3Е ET▓0 зЕ ET▓ENм20 ▒ ET▓100мSE зЗ"TRY AGAIN!":Бе1780FIEN│ENмET:SE│SEлETF\Е SE▓50 з SC│0FfБе350F╚&Й"UNITS TO TRANSFER";ET:ET│ETо10:Е ET┤0 з Е  В(ET)▓PE ▒  В(ET)▓100мEN з З"TRY AGAIN!":Бе 1830G0Е ET▓0 з Е ET▓ENм20 ▒ ET▓100мPE з З"TRY AGAIN!":Бе 1830G!:EN│ENмET:PE│PEлET:Бе 350G0DЙ"LIST";X$G8NP│0GКXЕ  О(X$,2)┤▓"BA" ░  О(X$,2)┤▓"PL" ░ EG│0зЗ"NO ENEMY SHIPS IN QUADRANT!":Бе350GйbЕ  П(X$,1)│"P"зP│49:Бе2020G╩lЕ  П(X$,3)│"CLO"зNR│1:Бе2010G┌vX$│ О(X$,2)GщАА N│1 е SNHКЕ X$│ О(VI$(N),2)з 1950:ДЛHФБе1960H;ЮЗVI$(N)" @";SX(N);SY(N); Б(S(N))"%"HfиЕ X$┤▓"BA" ░ X$┤▓"PL" ░ X$┤▓"SH"зБе350Hп▓Е X$│"BA"зА N│1е 10:З"STARBASE"N;":";BX(N);BY(N); Б(B(N))"%":Л:Бе350HЄ╝Е X$│"SH"зА N│1еSN:ЗVI$(N);":";SX(N);SY(N); Б(S(N))"%":Л:Бе350Ii╞Е X$│"PL"зА N│1е10:ЗP$(N)" PLANET :";PX(N);PY(N);PC(N)"COL."; Б(P(N))"%":Е PF(N)│10 з З" <FUELING STATION>":Л::Д ЛIs╨Бе350I╖┌X$│ О(X$,2):Е X$│"BA"з2020:ДЕ X$│"SH"з2070:ДЕ X$│"PL"з2120:Д350I└фT│5 J"юА N│1е10:Е  В(BX(N)мX)┤T ░  В(BY(N)мY)┤T ░ B(N)▓P зЗ"STARBASE:";BX(N);BY(N); Б(B(N))"%":Бе350J*°Л NJBЕ T┤81зT│Tл5:Бе2030JLБе350JTT│5J┤ А N│1еSN:Е  В(SX(N)мX)┤T ░  В(SY(N)мY)┤T ░ S(N)┤▓0 зЗVI$(N)":"SX(N);SY(N); Б(S(N))"%":Бе350J╝*Л NJ╘4Е T┤81зT│Tл1:Бе2080J▐>Бе350JцHT│5K[RА N│1е10:Е P$(N)┤▓"c" ░  В(PX(N)мX)┤T ░  В(PY(N)мY)┤T зЗP$(N)" PLANET:"PX(N);PY(N);PC(N)"COL."; Б(P(N))"%":Бе350Kc\Л NK{fЕ T┤81зT│Tл5:Бе2130KЕpБе350K┤zЮ:З@224,"<<<<<YOU HAVE BEEN DEFEATED>>>>>"K┴ДSQ│SQл50K╤ОА T│1е500:ЛK▄ШБе2450KтвЮLмЗ@224,"<<YOUR SHIP RAN OUT OF ENERGY>>"L╢SQ│SQл30L+└А X│1е500:ЛL6╩Бе2450Le╘Ю:З@224,"<YOUR BASES HAVE BEEN DEFEATED>>"Lr▐SQ│SQл30LЙшА X│1е500:Л:Бе2450LмЄЕ  Д(3)│2 з Р:Д BT│10:А N│1еSNL┐№Е S(N)┤│0з2410L█	Е B(N)┤│0 ░ S(N)▓0з3140M#	Е SX(N)▓│BX(N) ░ SY(N)▓│BY(N) з SX(N)│SX(N)м Д(5):SY(N)│SY(N)м Д(5)Mi	Е SX(N)┤│BX(N) ░ SY(N)┤│BY(N)зSX(N)│SX(N)л Д(5):SY(N)│SY(N)л Д(5)Mп	$Е SX(N)▓│BX(N) ░ SY(N)┤│BY(N)зSX(N)│SX(N)м Д(5):SY(N)│SY(N)л Д(5)Mї	.Е SX(N)┤│BX(N) ░ SY(N)▓│BY(N)зSX(N)│SX(N)л Д(5):SY(N)│SY(N)м Д(5)N╩	8ЕB(N)▓0░ В(SY(N)мBY(N))┤9░ В(SX(N)мBX(N))┤9зB(N)│B(N)мS(N)о(30оSS(N)):З"> "VI$(N);SX(N);SY(N);"ATTACKING":З"  STARBASE"BX(N);BY(N):Е B(N)┤25зЗ"CRITICAL HIT!!":ЕB(N)┤15зB(N)│0:З"SIR!, STARBASE DEFEATED!!":SV│0Nр	BЕ B(N)┤50зBP(N)│0O	LЕ  В(BX(N)мX)┤2 ░  В(BY(N)мY)┤2 ░ SV│1 ░ B(N)┤50 з BP│0O1	VЕ B(N)│0зBT│BTм1OM	`Е P(N)┤0зP(N)│0:PC(N)│0OU	jЛ NO[	tРOl	~А T│1е1000:ЛOв	ИЮ:З@224,">>YOU HAVE DEFEATED THE EMPIRE<<":Бе2450O░	ТCP│0:TC│0O├	ЬBT│10:А N│1е10O█	жЕ B(N)│0 з PP│PPм50P	░Е P$(N)│"c"зCP│CPл(10нPC(N)нP(N)о100):TC│TCлPC(N)P&	║Е B(N)│0зBT│BTм1P,	─ЛPC	╬PA│10н Б(PPлCPлTC)Pc	╪Е X$│"0"зЗ"POINTS:"PA:Бе350P	тЗ@264,"STARDATE"S1":"S2Pл	ьЗ@298,"SCORE:" Б(PA)," P%="(1000мSQ)о10P╤	ЎRG│10н(PAо12600)н((1000мSQ)о1000)Pю
З@329,BT"STARBASES LEFT"Q


З@361,TC"COLONIES LEFT"Q(
З@393,LI"COMMANDS ISSUED"QK
З@455,"RATING =";:З═"##.##";RGQQ
(КQx
2Е P$(N)│"e"з DM│7л Д(8):Д DM│ Д(3)Q╥
<Е SV│0 зЗ"> "P$(N)" PLANET MAKES"DMн10"UNIT HIT        ON YOUR SHIP!":DM│DMн10:Бж1120Q▄
FБе550Qщ
PА N│1е10R
ZЕ  В(PX(N)мX)┤2 ░  В(PY(N)мY)┤2з2680R
dЛRE
nЗ"NO PLANET LOCATED HERE!":SQ│SQл5:Бе350R┤
xЕ X$│"B" ░ P$(N)│"c"░ PC(N)│4 ░ P(N)┤100 з З"REBUILDING COLONY":P(N)│P(N)л25:EN│ENм2:Е P(N)▓100 з P(N)│100R╟
ВЕ X$│"B" з 350Sa
ДЕ X$│"F" з Е P$(N)│"c"░ PC(N)│4 ░ PF(N)│10 ░ P(N)▓10 з З"COLONY BASE REFUELING SHIP...":RE│P(N)о200:P(N)│ Б(P(N)м(100мEN)о3):EN│ENл(100мEN)нRE:Бе 350Sа
МЕ EN┤30 з З"NOT ENOUGH ENERGY TO COLONIZE!":SQ│SQл10:Бе350T8
ЦЕ TP▓0 ░ P$(N)│"e"зЗ"TORPEDO HIT ON ENEMY COLONY!    COLONY DEFEATED!":TP│TPм1:TC│TCл50:З"PLANET IS NOW NEUTRAL!":P$(N)│"n":PC(N)│0:PP│PPл50:Бе 350T]
аЕ PC(N)│4 з 350 :Д PC(N)│PC(N)л1Tn
кP$(N)│"c"   TГ
┤ЗPC(N)"COLONIES"T┐
╛Е PC(N)│3зP(N)│85:ДЕPC(N)│2з P(N)│70:ДЕ PC(N)│1зP(N)│50T╫
╚Е PC(N)│4 зP(N)│100Tу
╥EN│ENм4U
▄Е PC(N)│4 з З"BASE ESTABLISHED!":PF(N)│SRл1л Д(5)о10UF
цЕ PC(N)▓3зS2│S2л1:Е S2▓9зS1│S1л1:S2│0U^
ЁЕ PC(N)▓3з SR│SRл.1Uh
·Бе350UЧЮ:З@224,"<<YOU HAVE FAILED YOUR MISSION>>"UдSQ│SQл30UпБе2450U╞"TT│0:NH│0:А T│1еSNU╙,А N│1е10V6Е PC(N)▓0 з HP│3л Д(7):ДЕ PC(N)▓3 зHP│7л Д(8):ДHP│ Д(3)Vъ@ЕS(T)▓0░P$(N)┤▓"e"░ В(PX(N)мSX(T))┤6░ В(PY(N)мSY(T))┤6з S(T)│S(T)мHP:З"> "P$(N)" PLANET"PX(N);PY(N);"MAKES"10нHP"UNIT    HIT ON "VI$(T);SX(T);SY(T):NH│NHл1:ЕS(T)┤10зЗ"ENEMY SHIP DESTROYED!!":DT│DTм1:S(T)│0:PP│PPл50V°JЕ NH│2з РW╨TЕP$(N)│"c"░ В(SX(T)мPX(N))┤9░ В(SY(T)мPY(N))┤9░ PC(N)▓3░ S(T)▓0 зP(N)│P(N)м(S(T)л50)о10:З"> "VI$(T);SX(T);SY(T)" ATTACKING":З" COLONY"PX(N);PY(N):Е P(N)┤0зP(N)│100:PC(N)│4:З"COLONY DEFEATED!":P$(N)│"e":PF(N)│100XJ^Е S(T)▓0 ░  В(SX(T)мPX(N))┤3 ░  В(SY(T)мPY(N))┤3 ░ P$(N)│"n" з P$(N)│"e":PC(N)│4:P(N)│100:ЗVI$(T)" ESTABLISHES BASE!"XRhЛ NXZrЛ TX`|РXnЖT│NS:TT│0XЧРЗ:З"-----------STAR NOVAS----------"XдЪА N│1е10Y2дЕ N┤│SN ░ В(SX(N)мNX(T))┤(9л Д(4)) ░  В(SY(N)мNY(T))┤(9л Д(4))░ S(N)▓0зЗVI$(N);SX(N);SY(N)"DAMAGED!":S(N)│ Б(S(N)мS(N)о(3л Д(0))):TT│TTл1YеоЕ  В(PX(N)мNX(T))┤7 ░  В(PY(N)мNY(T))┤7зЗ"PLANET"PX(N);PY(N)"LIFE DESTROYED!":PC(N)│0:P(N)│0:P$(N)│"n":TT│TTл1Z╕Е  В(BX(N)мNX(T))┤9 ░  В(BY(N)мNY(T))┤9зЗ"STARBASE"BX(N);BY(N)"REPORTS DAMAGE!!":B(N)│ Б(B(N)мB(N)о(3л Д(0))):BP(N)│0Z/┬Е TT│3з3030Z5╠Л[╓Е SV│0 ░ BP│0░  В(XмNX(T))┤9л Д(4) ░  В(YмNY(T))┤9л Д(4) з:З"SIR, DAMAGE REPORTS COMING IN!!":WF│WFм Д(3):SQ│SQл20:DM│3.5л Д(0)о2:EN│ Б(ENмENоDM):ED│1:SV│0:Е SP$│"+"зSE│ Б(SEмSEоDMо1.5):Д SE│ Б(SEмSEоDM)[рNS│NSм1[ъР[&ЇА N│1 е 10[и■Е  В(PX(N)мXP)┤RL ░  В(PY(N)мYP)┤RL зЗP$(N)" PLANET @"PX(N);PY(N);PC(N)"COL."; Б(P(N))"%":Е PF(N)│10 з З"  <FUELING STATION>"\#Е  В(NX(N)мXP)┤RL ░  В(NY(N)мYP)┤RL зЗ"STAR @"NX(N);NY(N);:Е NS┤N зЗ"<<NOVA>>":ДЕ NS│N зЗ"<<<UNSTABLE>>>":ДЗ"*STABLE*"\sЕ  В(BX(N)мXP)┤RL ░  В(BY(N)мYP)┤RL зЗ"STARBASE"N"@"BX(N);BY(N); Б(B(N))"%"\╨Е EG│1 з Е N┤│SN ░  В(SX(N)мXP)┤RL ░  В(SY(N)мYP)┤RL зЗVI$(N)" @"SX(N);SY(N); Б(S(N))"%"\╓&Л\р0Бе350]P:ЖMANTA,MOBAS,GOBLIN,CYCLOPS,PIRANHA,ORION,NOMAD,HORNET,WASP,VIPER,TALON,WOLF,TRITON,HYDRA,HUNTER,LOTUS,DIRK]ПDЕ SX(N)▓│X ░ SY(N)▓│Y зSX(N)│SX(N)м Д(5):SY(N)│SY(N)м Д(5)]╬NЕ SX(N)▓│X ░ SY(N)┤│Y зSX(N)│SX(N)м Д(5):SY(N)│SY(N)л Д(5)^XЕ SX(N)┤│X ░ SY(N)▓│Y з SX(N)│SX(N)л Д(5):SY(N)│SY(N)м Д(5)^NbЕ SX(N)┤│X ░ SY(N)┤│Y з SX(N)│SX(N)л Д(5):SY(N)│SY(N)л Д(5)^YlБе2370^qvDS│0:А T│5 е 40 й 5^ААА N│1 е 10^∙КЕ  Д(3)│1 ░B(N)▓45░  В(BX(N)мX)┤T ░  В(BY(N)мY)┤T з DS│0:З"DISTRESS SIGNAL ANSWERED!":XD│BX(N):YD│BY(N):DH│1:Бе 3230_)ФЛ N,T:З"NO BASES WITHIN RANGE!!":SQ│SQл10:Р_OЮЕ BX(N)▓│X ░ BY(N)▓│Y з DX│1:DY│1_vиЕ BX(N)▓│X ░ BY(N)┤│Y з DX│1:DY│м1_Э▓Е BX(N)┤│X ░ BY(N)▓│Y з DX│м1:DY│1_┼╝Е BX(N)┤│X ░ BY(N)┤│Y з DX│м1:DY│м1_╒╞MM│0:WS│0:Р_ў╨ЗX;Y">";:Й"DESTINATION";XD,YD`╥Е XD│0 ░ YD│0 з 350`╒Й"WARP";WS`W╫Е WS┤│0 ▒ WS▓10 з З"WARP VALUE (1-10) ONLY!":Бе 3285`б┌Е ED│1 ░ WS▓WF з З"MAX WARP IS WF"WF"DUE TO ENGINE   DAMAGE!":Бе 3285`Ё▌WS│ Б(WSн.6)л1:Е WS▓5 з З"POSSIBLE ENGINE DAMAGE AT       SUSTAINED WARP!"aфЕ X▓│XD ░ Y▓│YD з DX│мWS:DY│мWSa6юЕ X┤│XD ░ Y┤│YD з DX│WS:DY│WSaY°Е X▓│XD ░ Y┤│YD з DX│мWS:DY│WSa|
Е X┤│XD ░ Y▓│YD з DX│WS:DY│мWSaз
DH│0:SV│0:BP│0:MM│1:З"ENGAGE...":Бе350bA
Е SB│1 з З"DRONE HAS HAS BEEN USED!":Р :ДSB│1:Й"ENTER SECURITY CODE FOR DRONE   ACTIVATION...";SC:Е SC│00010 з 3360 :Д З"PROCEDURE ABORTED...":SB│0:Рb─
 Й"SHIP TO TARGET:";V$:А N│1 е SN:Е  О(VI$(N),2)│ О(V$,2) з XB│SX(N):YB│SY(N):N5│N:Бе 3370::Д Л:З"SHIP NOT LOCATED,SIR!":SB│0:Рb╥
*BX│X:BY│Ybы
4З"DRONE LAUNCHED..."c
>Е BX▓│SX(N5)з B1│м2 :Д B1│2c,
HЕ BY▓│SY(N5) з B2│м2 :Д B2│2c2
RРcr
\B1│0:B2│0:Е  В(SX(N5)мBX)┤4 ░  В(SY(N5)мBY)┤4 з 3430:Д 3450d

fЕ  Д(3)│1 з S(N5)│S(N5)о4:З"> "VI$(N5)" SUSTAINS CRITICAL ":З"DAMAGE BY DRONE!"::Д З"> "VI$(N5)" DESTROYED BY":З"DRONE, SIR!":S(N5)│0:DT│DTм1:PP│PPл50d
pБе350dM
zЗ"SIR, DRONE FAILED TO REACH      TARGET!":Бе 350d]а╚ 4,1:┐ 1,0dcе╝drкА T│1 е 10d╛┤┬ (53лBX(T)н1.5,181мBY(T)н1.5),6,,.2:┬(53лBX(T)н1.5,181мBY(T)н1.5),2,,3dу╛┬ (53лPX(T)н1.5,181мPY(T)н1.5),3e!╚╞"BM"л И( Б(53лNX(T)н1.5))л","л И( Б(181мNY(T)н1.5)):╞ N$e[╥Е T┤SN ░ EG│1 з ┬(53лSX(T)н1.5,181мSY(T)н1.5),5,,0,.5eР▄╗ (50лXн1.5,183мYн1.5)м(54лXн1.5,181мYн1.5),╜,BFeШИЛ TeвНX$│ ТeмП╞"S4"fТЕ X$│"3" ▒ X$│"#" з ╞"BM"л И( Б(53лXн1.5))л","л И( Б(181мYн1.5)):Е X$│"#" з ╞ "S8"лTB$:╞ "S4": :Д ╞ TB$f)ЬЕ X$│"V" з Рf5ьБе 500553лSX(T)н1.5,181мSY(T)н1.5),5,,0,.5eР▄╗ (50лXн1.5,183мYн1.5)м(54лXн1.5,181мYн1.5),╜,BFeШИЛ TeвНX$│ ТeмП╞"S4"fТЕ X$│"3" ▒ X$│"#" з ╞"BM"л И( Б(53лXн1.5))л","л И( Б(181мYн1.5)):Е X$│"#" з ╞