/ CP/M / CPM_CDROM.iso / simtel / cpmug / cpmug011.ark / STARTREK.TBI

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| e1 1f 05 00 59 3d 32 39 | 39 39 3b 49 4e 2e 22 44 |....Y=29|99;IN."D|
|00000010| 4f 20 59 4f 55 20 57 41 | 4e 54 20 41 20 44 49 46 |O YOU WA|NT A DIF|
|00000020| 46 49 43 55 4c 54 20 47 | 41 4d 45 3f 20 20 22 2c |FICULT G|AME?  ",|
|00000030| 22 28 59 20 4f 52 20 4e | 29 22 41 0d 0a 00 50 52 |"(Y OR N|)"A...PR|
|00000040| 2e 22 53 54 41 52 44 41 | 54 45 20 33 32 30 30 3a |."STARDA|TE 3200:|
|00000050| 20 20 59 4f 55 52 20 4d | 49 53 53 49 4f 4e 20 49 |  YOUR M|ISSION I|
|00000060| 53 20 22 2c 3b 49 46 41 | 3d 59 59 3d 39 39 39 20 |S ",;IFA|=YY=999 |
|00000070| 0d 0f 00 4b 3d 30 2c 42 | 3d 30 2c 44 3d 33 30 3b |...K=0,B|=0,D=30;|
|00000080| 46 2e 49 3d 30 54 4f 36 | 33 3b 4a 3d 52 2e 28 39 |F.I=0TO6|3;J=R.(9|
|00000090| 39 29 3c 35 2c 42 3d 42 | 2b 4a 0d 14 00 4d 3d 52 |9)<5,B=B|+J...M=R|
|000000a0| 2e 28 59 29 2c 4d 3d 28 | 4d 3c 32 30 39 29 2b 28 |.(Y),M=(|M<209)+(|
|000000b0| 4d 3c 39 39 29 2b 28 4d | 3c 34 39 29 2b 28 4d 3c |M<99)+(M|<49)+(M<|
|000000c0| 32 34 29 2b 28 4d 3c 39 | 29 2b 28 4d 3c 32 29 2c |24)+(M<9|)+(M<2),|
|000000d0| 4b 3d 4b 2b 4d 0d 19 00 | 40 28 49 29 3d 2d 31 30 |K=K+M...|@(I)=-10|
|000000e0| 30 2a 4d 2d 31 30 2a 4a | 2d 52 2e 28 38 29 3b 4e |0*M-10*J|-R.(8);N|
|000000f0| 2e 49 3b 49 46 28 42 3c | 32 29 2b 28 4b 3c 34 29 |.I;IF(B<|2)+(K<4)|
|00000100| 47 2e 31 35 0d 1e 00 50 | 52 2e 22 54 4f 20 44 45 |G.15...P|R."TO DE|
|00000110| 53 54 52 4f 59 20 22 2c | 23 31 2c 4b 2c 22 20 4b |STROY ",|#1,K," K|
|00000120| 4c 49 4e 47 4f 4e 53 20 | 49 4e 20 33 30 20 53 54 |LINGONS |IN 30 ST|
|00000130| 41 52 44 41 54 45 53 2e | 20 0d 23 00 50 52 2e 22 |ARDATES.| .#.PR."|
|00000140| 54 48 45 52 45 20 41 52 | 45 20 22 2c 23 31 2c 42 |THERE AR|E ",#1,B|
|00000150| 2c 22 20 53 54 41 52 42 | 41 53 45 53 2e 22 3b 47 |," STARB|ASES.";G|
|00000160| 4f 53 2e 31 36 30 3b 43 | 3d 30 2c 48 3d 4b 20 0d |OS.160;C|=0,H=K .|
|00000170| 28 00 55 3d 52 2e 28 38 | 29 2c 56 3d 52 2e 28 38 |(.U=R.(8|),V=R.(8|
|00000180| 29 2c 58 3d 52 2e 28 38 | 29 2c 59 3d 52 2e 28 38 |),X=R.(8|),Y=R.(8|
|00000190| 29 0d 2d 00 46 2e 49 3d | 37 31 54 4f 31 35 32 3b |).-.F.I=|71TO152;|
|000001a0| 40 28 49 29 3d 30 3b 4e | 2e 49 3b 40 28 38 2a 58 |@(I)=0;N|.I;@(8*X|
|000001b0| 2b 59 2b 36 32 29 3d 34 | 2c 4d 3d 41 2e 28 40 28 |+Y+62)=4|,M=A.(@(|
|000001c0| 38 2a 55 2b 56 2d 39 29 | 29 2c 4e 3d 4d 2f 31 30 |8*U+V-9)|),N=M/10|
|000001d0| 30 0d 32 00 49 3d 31 3b | 49 46 4e 46 2e 4a 3d 31 |0.2.I=1;|IFNF.J=1|
|000001e0| 54 4f 4e 3b 47 4f 53 2e | 31 36 35 3b 40 28 4a 2b |TON;GOS.|165;@(J+|
|000001f0| 31 33 34 29 3d 33 30 30 | 2c 40 28 4a 2b 31 34 30 |134)=300|,@(J+140|
|00000200| 29 3d 53 2c 40 28 4a 2b | 31 34 36 29 3d 54 3b 4e |)=S,@(J+|146)=T;N|
|00000210| 2e 4a 0d 37 00 47 4f 53 | 2e 31 37 35 3b 4d 3d 4d |.J.7.GOS|.175;M=M|
|00000220| 2d 31 30 30 2a 4e 2c 49 | 3d 32 3b 49 46 4d 2f 31 |-100*N,I|=2;IFM/1|
|00000230| 30 47 4f 53 2e 31 36 35 | 0d 3c 00 4d 3d 4d 2d 4d |0GOS.165|.<.M=M-M|
|00000240| 2f 31 30 2a 31 30 2c 49 | 3d 33 3b 49 46 4d 46 2e |/10*10,I|=3;IFMF.|
|00000250| 4a 3d 31 54 4f 4d 3b 47 | 4f 53 2e 31 36 35 3b 4e |J=1TOM;G|OS.165;N|
|00000260| 2e 4a 0d 41 00 47 4f 53 | 2e 31 34 35 3b 47 4f 53 |.J.A.GOS|.145;GOS|
|00000270| 2e 33 32 35 3b 49 46 4b | 47 2e 39 35 0d 46 00 50 |.325;IFK|G.95.F.P|
|00000280| 52 2e 3b 50 52 2e 22 4d | 49 53 53 49 4f 4e 20 41 |R.;PR."M|ISSION A|
|00000290| 43 43 4f 4d 50 4c 49 53 | 48 45 44 2e 22 3b 49 46 |CCOMPLIS|HED.";IF|
|000002a0| 44 3c 33 50 52 2e 22 42 | 4f 59 2c 20 59 4f 55 20 |D<3PR."B|OY, YOU |
|000002b0| 42 41 52 45 4c 59 20 4d | 41 44 45 20 49 54 2e 20 |BARELY M|ADE IT. |
|000002c0| 20 0d 4b 00 49 46 44 3e | 35 50 52 2e 22 47 4f 4f | .K.IFD>|5PR."GOO|
|000002d0| 44 20 57 4f 52 4b 2e 2e | 2e 22 3b 49 46 44 3e 39 |D WORK..|.";IFD>9|
|000002e0| 50 52 2e 22 46 41 4e 54 | 41 53 54 49 43 21 22 3b |PR."FANT|ASTIC!";|
|000002f0| 49 46 44 3e 31 33 50 52 | 2e 22 55 4e 42 45 4c 49 |IFD>13PR|."UNBELI|
|00000300| 45 56 41 42 4c 45 21 20 | 0d 50 00 44 3d 33 30 2d |EVABLE! |.P.D=30-|
|00000310| 44 2c 49 3d 48 2a 31 30 | 30 2f 44 2a 31 30 3b 50 |D,I=H*10|0/D*10;P|
|00000320| 52 2e 23 31 2c 48 2c 22 | 20 4b 4c 49 4e 47 4f 4e |R.#1,H,"| KLINGON|
|00000330| 53 20 49 4e 20 22 2c 44 | 2c 22 20 53 54 41 52 44 |S IN ",D|," STARD|
|00000340| 41 54 45 53 2e 20 28 22 | 2c 49 2c 22 29 20 0d 55 |ATES. ("|,I,") .U|
|00000350| 00 4a 3d 31 30 30 2a 28 | 43 3d 30 29 2d 35 2a 43 |.J=100*(|C=0)-5*C|
|00000360| 3b 50 52 2e 23 31 2c 43 | 2c 22 20 43 41 53 55 41 |;PR.#1,C|," CASUA|
|00000370| 4c 54 49 45 53 20 49 4e | 43 55 52 52 45 44 2e 20 |LTIES IN|CURRED. |
|00000380| 28 22 2c 4a 2c 22 29 20 | 0d 5a 00 50 52 2e 22 59 |(",J,") |.Z.PR."Y|
|00000390| 4f 55 52 20 53 43 4f 52 | 45 3a 22 2c 49 2b 4a 3b |OUR SCOR|E:",I+J;|
|000003a0| 47 2e 31 31 30 20 0d 5f | 00 49 46 44 3c 30 50 52 |G.110 ._|.IFD<0PR|
|000003b0| 2e 22 49 54 27 53 20 54 | 4f 4f 20 4c 41 54 45 2c |."IT'S T|OO LATE,|
|000003c0| 20 54 48 45 20 46 45 44 | 45 52 41 54 49 4f 4e 20 | THE FED|ERATION |
|000003d0| 48 41 53 20 42 45 45 4e | 20 43 4f 4e 51 55 45 52 |HAS BEEN| CONQUER|
|000003e0| 45 44 2e 22 3b 47 2e 31 | 31 30 20 0d 64 00 49 46 |ED.";G.1|10 .d.IF|
|000003f0| 45 3e 3d 30 47 2e 31 32 | 30 0d 69 00 50 52 2e 22 |E>=0G.12|0.i.PR."|
|00000400| 45 4e 54 45 52 50 52 49 | 53 45 20 44 45 53 54 52 |ENTERPRI|SE DESTR|
|00000410| 4f 59 45 44 22 3b 49 46 | 48 2d 4b 3e 39 50 52 2e |OYED";IF|H-K>9PR.|
|00000420| 22 42 55 54 20 59 4f 55 | 20 57 45 52 45 20 41 20 |"BUT YOU| WERE A |
|00000430| 47 4f 4f 44 20 4d 41 4e | 20 0d 6e 00 59 3d 39 38 |GOOD MAN| .n.Y=98|
|00000440| 37 3b 50 52 2e 3b 49 4e | 2e 22 41 4e 4f 54 48 45 |7;PR.;IN|."ANOTHE|
|00000450| 52 45 20 47 41 4d 45 3f | 20 20 22 2c 22 28 59 20 |RE GAME?|  ","(Y |
|00000460| 4f 52 20 4e 29 22 41 3b | 49 46 41 3d 59 47 2e 35 |OR N)"A;|IFA=YG.5|
|00000470| 20 0d 73 00 50 52 2e 22 | 47 4f 4f 44 20 42 59 45 | .s.PR."|GOOD BYE|
|00000480| 2e 22 3b 53 54 4f 50 20 | 0d 78 00 53 3d 32 32 30 |.";STOP |.x.S=220|
|00000490| 2c 47 3d 31 38 30 2c 4c | 3d 32 30 30 2c 50 3d 32 |,G=180,L|=200,P=2|
|000004a0| 36 30 2c 52 3d 34 32 30 | 2c 57 3d 34 36 35 2c 54 |60,R=420|,W=465,T|
|000004b0| 3d 35 35 35 3b 49 4e 2e | 22 43 41 50 54 41 49 4e |=555;IN.|"CAPTAIN|
|000004c0| 22 41 0d 7d 00 49 46 28 | 41 3d 53 29 2b 28 41 3d |"A.}.IF(|A=S)+(A=|
|000004d0| 47 29 2b 28 41 3d 4c 29 | 2b 28 41 3d 50 29 2b 28 |G)+(A=L)|+(A=P)+(|
|000004e0| 41 3d 52 29 2b 28 41 3d | 57 29 2b 28 41 3d 54 29 |A=R)+(A=|W)+(A=T)|
|000004f0| 47 2e 41 0d 82 00 50 52 | 2e 22 52 3d 52 45 50 4f |G.A...PR|."R=REPO|
|00000500| 52 54 20 20 20 20 20 20 | 20 53 3d 53 52 2e 20 53 |RT      | S=SR. S|
|00000510| 45 4e 53 4f 52 20 20 20 | 4c 3d 4c 52 2e 20 53 45 |ENSOR   |L=LR. SE|
|00000520| 4e 53 4f 52 20 0d 87 00 | 50 52 2e 22 47 3d 47 41 |NSOR ...|PR."G=GA|
|00000530| 4c 41 58 59 20 4d 41 50 | 20 20 20 50 3d 50 48 41 |LAXY MAP|   P=PHA|
|00000540| 53 45 52 20 20 20 20 20 | 20 20 54 3d 54 4f 52 50 |SER     |  T=TORP|
|00000550| 45 44 4f 20 0d 8c 00 50 | 52 2e 22 57 3d 57 41 52 |EDO ...P|R."W=WAR|
|00000560| 50 20 45 4e 47 49 4e 45 | 20 20 2a 2a 50 4c 45 41 |P ENGINE|  **PLEA|
|00000570| 53 45 20 55 53 45 20 4f | 4e 45 20 4f 46 20 54 48 |SE USE O|NE OF TH|
|00000580| 45 53 45 20 43 4f 4d 4d | 41 4e 44 53 2a 2a 2a 22 |ESE COMM|ANDS***"|
|00000590| 3b 47 2e 31 32 30 20 0d | 91 00 46 2e 49 3d 58 2d |;G.120 .|..F.I=X-|
|000005a0| 28 58 3e 31 29 54 4f 58 | 2b 28 58 3c 38 29 3b 46 |(X>1)TOX|+(X<8);F|
|000005b0| 2e 4a 3d 59 2d 28 59 3e | 31 29 54 4f 59 2b 28 59 |.J=Y-(Y>|1)TOY+(Y|
|000005c0| 3c 38 29 0d 96 00 49 46 | 40 28 38 2a 49 2b 4a 2b |<8)...IF|@(8*I+J+|
|000005d0| 36 32 29 23 32 4e 2e 4a | 3b 4e 2e 49 3b 4f 3d 30 |62)#2N.J|;N.I;O=0|
|000005e0| 3b 52 2e 0d 9b 00 49 46 | 4f 3d 30 50 52 2e 27 53 |;R....IF|O=0PR.'S|
|000005f0| 55 4c 55 3a 20 22 43 41 | 50 54 41 49 4e 2c 20 57 |ULU: "CA|PTAIN, W|
|00000600| 45 20 41 52 45 20 44 4f | 43 4b 45 44 20 41 54 20 |E ARE DO|CKED AT |
|00000610| 53 54 41 52 42 41 53 45 | 2e 22 20 0d a0 00 45 3d |STARBASE|." ...E=|
|00000620| 34 30 30 30 2c 46 3d 31 | 30 2c 4f 3d 31 3b 46 2e |4000,F=1|0,O=1;F.|
|00000630| 49 3d 36 34 54 4f 37 30 | 3b 40 28 49 29 3d 30 3b |I=64TO70|;@(I)=0;|
|00000640| 4e 2e 49 3b 52 2e 0d a5 | 00 53 3d 52 2e 28 38 29 |N.I;R...|.S=R.(8)|
|00000650| 2c 54 3d 52 2e 28 38 29 | 2c 41 3d 38 2a 53 2b 54 |,T=R.(8)|,A=8*S+T|
|00000660| 2b 36 32 3b 49 46 40 28 | 41 29 47 2e 31 36 35 0d |+62;IF@(|A)G.165.|
|00000670| aa 00 40 28 41 29 3d 49 | 3b 52 2e 0d af 00 50 52 |..@(A)=I|;R....PR|
|00000680| 2e 22 45 4e 54 45 52 50 | 52 49 53 45 20 49 4e 20 |."ENTERP|RISE IN |
|00000690| 51 2d 22 2c 23 31 2c 55 | 2c 56 2c 22 20 53 2d 22 |Q-",#1,U|,V," S-"|
|000006a0| 2c 58 2c 59 3b 52 2e 20 | 0d b4 00 47 4f 53 2e 31 |,X,Y;R. |...GOS.1|
|000006b0| 37 35 3b 4a 3d 32 3b 47 | 4f 53 2e 33 37 35 3b 49 |75;J=2;G|OS.375;I|
|000006c0| 46 49 47 2e 31 32 30 0d | b9 00 50 52 2e 22 20 4f |FIG.120.|..PR." O|
|000006d0| 46 20 47 41 4c 41 58 59 | 20 4d 41 50 22 3b 46 2e |F GALAXY| MAP";F.|
|000006e0| 49 3d 30 54 4f 37 3b 50 | 52 2e 3b 50 52 2e 23 31 |I=0TO7;P|R.;PR.#1|
|000006f0| 2c 49 2b 31 2c 22 3a 22 | 2c 3b 46 2e 4a 3d 30 54 |,I+1,":"|,;F.J=0T|
|00000700| 4f 37 3b 4d 3d 40 28 38 | 2a 49 2b 4a 29 20 0d be |O7;M=@(8|*I+J) ..|
|00000710| 00 50 52 2e 23 34 2c 28 | 4d 3e 30 29 2a 4d 2c 3b |.PR.#4,(|M>0)*M,;|
|00000720| 4e 2e 4a 3b 50 52 2e 3b | 4e 2e 49 3b 50 52 2e 22 |N.J;PR.;|N.I;PR."|
|00000730| 20 20 22 2c 3b 46 2e 49 | 3d 30 54 4f 37 3b 50 52 |  ",;F.I|=0TO7;PR|
|00000740| 2e 22 20 20 2e 2e 22 2c | 3b 4e 2e 49 3b 50 52 2e |."  ..",|;N.I;PR.|
|00000750| 20 0d c3 00 50 52 2e 22 | 20 20 22 2c 3b 46 2e 49 | ...PR."|  ",;F.I|
|00000760| 3d 31 54 4f 38 3b 50 52 | 2e 23 34 2c 49 2c 3b 4e |=1TO8;PR|.#4,I,;N|
|00000770| 2e 49 3b 50 52 2e 3b 50 | 52 2e 3b 47 2e 31 32 30 |.I;PR.;P|R.;G.120|
|00000780| 20 0d c8 00 47 4f 53 2e | 31 37 35 3b 4a 3d 33 3b | ...GOS.|175;J=3;|
|00000790| 47 4f 53 2e 33 37 35 3b | 49 46 49 47 2e 31 32 30 |GOS.375;|IFIG.120|
|000007a0| 0d cd 00 50 52 2e 3b 46 | 2e 49 3d 55 2d 31 54 4f |...PR.;F|.I=U-1TO|
|000007b0| 55 2b 31 3b 46 2e 4a 3d | 56 2d 31 54 4f 56 2b 31 |U+1;F.J=|V-1TOV+1|
|000007c0| 3b 4d 3d 38 2a 49 2b 4a | 2d 39 2c 41 3d 30 20 0d |;M=8*I+J|-9,A=0 .|
|000007d0| d2 00 49 46 28 49 3e 30 | 29 2a 28 49 3c 39 29 2a |..IF(I>0|)*(I<9)*|
|000007e0| 28 4a 3e 30 29 2a 28 4a | 3c 39 29 41 3d 41 2e 28 |(J>0)*(J|<9)A=A.(|
|000007f0| 40 28 4d 29 29 2c 40 28 | 4d 29 3d 41 0d d7 00 50 |@(M)),@(|M)=A...P|
|00000800| 52 2e 23 34 2c 41 2c 3b | 4e 2e 4a 3b 50 52 2e 3b |R.#4,A,;|N.J;PR.;|
|00000810| 4e 2e 49 3b 47 2e 31 32 | 30 20 0d dc 00 47 4f 53 |N.I;G.12|0 ...GOS|
|00000820| 2e 31 37 35 3b 4a 3d 31 | 3b 47 4f 53 2e 33 37 35 |.175;J=1|;GOS.375|
|00000830| 3b 49 46 49 47 2e 31 32 | 30 0d e1 00 4d 3d 38 2a |;IFIG.12|0...M=8*|
|00000840| 55 2b 56 2d 39 2c 40 28 | 4d 29 3d 41 2e 28 40 28 |U+V-9,@(|M)=A.(@(|
|00000850| 4d 29 29 0d e6 00 50 52 | 2e 3b 46 2e 49 3d 31 54 |M))...PR|.;F.I=1T|
|00000860| 4f 38 3b 50 52 2e 23 31 | 2c 49 2c 3b 46 2e 4a 3d |O8;PR.#1|,I,;F.J=|
|00000870| 31 54 4f 38 3b 4d 3d 40 | 28 38 2a 49 2b 4a 2b 36 |1TO8;M=@|(8*I+J+6|
|00000880| 32 29 3b 49 46 4d 3d 30 | 50 52 2e 22 20 2e 22 2c |2);IFM=0|PR." .",|
|00000890| 20 0d eb 00 49 46 4d 3d | 31 50 52 2e 22 20 4b 22 | ...IFM=|1PR." K"|
|000008a0| 2c 20 0d f0 00 49 46 4d | 3d 32 50 52 2e 22 20 42 |, ...IFM|=2PR." B|
|000008b0| 22 2c 20 0d f5 00 49 46 | 4d 3d 33 50 52 2e 22 20 |", ...IF|M=3PR." |
|000008c0| 2a 22 2c 20 0d fa 00 49 | 46 4d 3d 34 50 52 2e 22 |*", ...I|FM=4PR."|
|000008d0| 20 45 22 2c 20 0d ff 00 | 4e 2e 4a 3b 50 52 2e 3b | E", ...|N.J;PR.;|
|000008e0| 4e 2e 49 3b 50 52 2e 22 | 20 22 2c 3b 46 2e 49 3d |N.I;PR."| ",;F.I=|
|000008f0| 31 54 4f 38 3b 50 52 2e | 23 32 2c 49 2c 3b 4e 2e |1TO8;PR.|#2,I,;N.|
|00000900| 49 3b 50 52 2e 3b 47 2e | 31 32 30 20 0d 04 01 4a |I;PR.;G.|120 ...J|
|00000910| 3d 34 3b 47 4f 53 2e 33 | 37 35 3b 49 46 49 47 2e |=4;GOS.3|75;IFIG.|
|00000920| 31 32 30 0d 09 01 49 4e | 2e 22 20 45 4e 45 52 47 |120...IN|." ENERG|
|00000930| 49 5a 45 44 2e 20 22 2c | 22 55 4e 49 54 53 20 54 |IZED. ",|"UNITS T|
|00000940| 4f 20 46 49 52 45 22 41 | 3b 49 46 41 3c 31 47 2e |O FIRE"A|;IFA<1G.|
|00000950| 31 32 30 0d 0e 01 49 46 | 41 3e 45 50 52 2e 27 53 |120...IF|A>EPR.'S|
|00000960| 50 4f 43 4b 3a 20 22 57 | 45 20 48 41 56 45 20 4f |POCK: "W|E HAVE O|
|00000970| 4e 4c 59 20 27 2c 23 31 | 2c 45 2c 27 20 55 4e 49 |NLY ',#1|,E,' UNI|
|00000980| 54 53 2e 22 27 3b 47 2e | 31 32 30 20 0d 13 01 45 |TS."';G.|120 ...E|
|00000990| 3d 45 2d 41 3b 49 46 4e | 3c 31 50 52 2e 22 50 48 |=E-A;IFN|<1PR."PH|
|000009a0| 41 53 45 52 20 46 49 52 | 45 44 20 41 54 20 45 4d |ASER FIR|ED AT EM|
|000009b0| 50 54 59 20 53 50 41 43 | 45 2e 22 3b 47 2e 36 35 |PTY SPAC|E.";G.65|
|000009c0| 20 0d 18 01 41 3d 41 2f | 4e 3b 46 2e 4d 3d 31 33 | ...A=A/|N;F.M=13|
|000009d0| 35 54 4f 31 34 30 3b 49 | 46 40 28 4d 29 3d 30 47 |5TO140;I|F@(M)=0G|
|000009e0| 2e 32 39 30 0d 1d 01 47 | 4f 53 2e 32 39 35 3b 50 |.290...G|OS.295;P|
|000009f0| 52 2e 23 33 2c 53 2c 22 | 20 55 4e 49 54 53 20 48 |R.#3,S,"| UNITS H|
|00000a00| 49 54 20 22 2c 3b 47 4f | 53 2e 33 30 35 20 0d 22 |IT ",;GO|S.305 ."|
|00000a10| 01 4e 2e 4d 3b 47 2e 36 | 35 0d 27 01 49 46 41 3e |.N.M;G.6|5.'.IFA>|
|00000a20| 31 30 39 30 50 52 2e 22 | 2e 2e 2e 4f 56 45 52 4c |1090PR."|...OVERL|
|00000a30| 4f 41 44 45 44 2e 2e 22 | 3b 4a 3d 34 2c 40 28 36 |OADED.."|;J=4,@(6|
|00000a40| 37 29 3d 31 2c 41 3d 39 | 3b 47 4f 53 2e 33 37 35 |7)=1,A=9|;GOS.375|
|00000a50| 20 0d 2c 01 49 3d 40 28 | 4d 2b 36 29 2d 58 2c 4a | .,.I=@(|M+6)-X,J|
|00000a60| 3d 40 28 4d 2b 31 32 29 | 2d 59 2c 53 3d 41 2a 33 |=@(M+12)|-Y,S=A*3|
|00000a70| 30 2f 28 33 30 2b 49 2a | 49 2b 4a 2a 4a 29 2b 31 |0/(30+I*|I+J*J)+1|
|00000a80| 3b 52 2e 0d 31 01 50 52 | 2e 22 4b 4c 49 4e 47 4f |;R..1.PR|."KLINGO|
|00000a90| 4e 20 41 54 20 53 2d 22 | 2c 23 31 2c 40 28 4d 2b |N AT S-"|,#1,@(M+|
|00000aa0| 36 29 2c 40 28 4d 2b 31 | 32 29 2c 3b 40 28 4d 29 |6),@(M+1|2),;@(M)|
|00000ab0| 3d 40 28 4d 29 2d 53 20 | 0d 36 01 49 46 40 28 4d |=@(M)-S |.6.IF@(M|
|00000ac0| 29 3e 30 50 52 2e 22 20 | 2a 2a 44 41 4d 41 47 45 |)>0PR." |**DAMAGE|
|00000ad0| 44 2a 2a 22 3b 52 2e 20 | 0d 3b 01 40 28 4d 29 3d |D**";R. |.;.@(M)=|
|00000ae0| 30 2c 49 3d 38 2a 55 2b | 56 2d 39 2c 4a 3d 40 28 |0,I=8*U+|V-9,J=@(|
|00000af0| 49 29 2f 41 2e 28 40 28 | 49 29 29 2c 40 28 49 29 |I)/A.(@(|I)),@(I)|
|00000b00| 3d 40 28 49 29 2d 31 30 | 30 2a 4a 2c 4b 3d 4b 2d |=@(I)-10|0*J,K=K-|
|00000b10| 31 0d 40 01 49 3d 38 2a | 40 28 4d 2b 36 29 2b 40 |1.@.I=8*|@(M+6)+@|
|00000b20| 28 4d 2b 31 32 29 2b 36 | 32 2c 40 28 49 29 3d 30 |(M+12)+6|2,@(I)=0|
|00000b30| 2c 4e 3d 4e 2d 31 3b 50 | 52 2e 22 20 2a 2a 2a 44 |,N=N-1;P|R." ***D|
|00000b40| 45 53 54 52 4f 59 45 44 | 2a 2a 2a 22 3b 52 2e 20 |ESTROYED|***";R. |
|00000b50| 0d 45 01 49 46 4e 3d 30 | 52 2e 0d 4a 01 50 52 2e |.E.IFN=0|R..J.PR.|
|00000b60| 22 4b 4c 49 4e 47 4f 4e | 20 41 54 54 41 43 4b 22 |"KLINGON| ATTACK"|
|00000b70| 3b 49 46 4f 50 52 2e 22 | 53 54 41 52 42 41 53 45 |;IFOPR."|STARBASE|
|00000b80| 20 50 52 4f 54 45 43 54 | 53 20 45 4e 54 45 52 50 | PROTECT|S ENTERP|
|00000b90| 52 49 53 45 22 3b 52 2e | 20 0d 4f 01 54 3d 30 3b |RISE";R.| .O.T=0;|
|00000ba0| 46 2e 4d 3d 31 33 35 54 | 4f 31 34 30 3b 49 46 40 |F.M=135T|O140;IF@|
|00000bb0| 28 4d 29 3d 30 47 2e 33 | 35 30 0d 54 01 41 3d 28 |(M)=0G.3|50.T.A=(|
|00000bc0| 40 28 4d 29 2b 52 2e 28 | 40 28 4d 29 29 29 2f 32 |@(M)+R.(|@(M)))/2|
|00000bd0| 3b 47 4f 53 2e 32 39 35 | 3b 54 3d 54 2b 53 2c 49 |;GOS.295|;T=T+S,I|
|00000be0| 3d 40 28 4d 2b 36 29 2c | 4a 3d 40 28 4d 2b 31 32 |=@(M+6),|J=@(M+12|
|00000bf0| 29 0d 59 01 50 52 2e 23 | 33 2c 53 2c 22 20 55 4e |).Y.PR.#|3,S," UN|
|00000c00| 49 54 53 20 48 49 54 20 | 46 52 4f 4d 20 4b 4c 49 |ITS HIT |FROM KLI|
|00000c10| 4e 47 4f 4e 20 41 54 20 | 53 2d 22 2c 23 31 2c 49 |NGON AT |S-",#1,I|
|00000c20| 2c 4a 20 0d 5e 01 4e 2e | 4d 3b 45 3d 45 2d 54 3b |,J .^.N.|M;E=E-T;|
|00000c30| 49 46 45 3c 3d 30 50 52 | 2e 22 2a 2a 2a 20 42 41 |IFE<=0PR|."*** BA|
|00000c40| 4e 47 20 2a 2a 2a 22 3b | 52 2e 52 0d 63 01 50 52 |NG ***";|R.R.c.PR|
|00000c50| 2e 23 31 2c 45 2c 22 20 | 55 4e 49 54 53 20 4f 46 |.#1,E," |UNITS OF|
|00000c60| 20 45 4e 45 52 47 59 20 | 4c 45 46 54 2e 22 3b 49 | ENERGY |LEFT.";I|
|00000c70| 46 52 2e 28 45 2f 34 29 | 3e 54 52 2e 20 0d 68 01 |FR.(E/4)|>TR. .h.|
|00000c80| 49 46 40 28 37 30 29 3d | 30 40 28 37 30 29 3d 52 |IF@(70)=|0@(70)=R|
|00000c90| 2e 28 54 2f 35 30 2b 31 | 29 2c 4a 3d 37 3b 47 2e |.(T/50+1|),J=7;G.|
|00000ca0| 33 37 35 0d 6d 01 4a 3d | 52 2e 28 36 29 2c 40 28 |375.m.J=|R.(6),@(|
|00000cb0| 4a 2b 36 33 29 3d 52 2e | 28 54 2f 39 39 2b 31 29 |J+63)=R.|(T/99+1)|
|00000cc0| 2b 40 28 4a 2b 36 33 29 | 2c 49 3d 52 2e 28 38 29 |+@(J+63)|,I=R.(8)|
|00000cd0| 2b 31 2c 43 3d 43 2b 49 | 0d 72 01 50 52 2e 27 4d |+1,C=C+I|.r.PR.'M|
|00000ce0| 43 20 43 4f 59 3a 20 22 | 53 49 43 4b 42 41 59 20 |C COY: "|SICKBAY |
|00000cf0| 54 4f 20 42 52 49 44 47 | 45 2c 20 57 45 20 53 55 |TO BRIDG|E, WE SU|
|00000d00| 46 46 45 52 45 44 27 2c | 23 32 2c 49 2c 27 20 43 |FFERED',|#2,I,' C|
|00000d10| 41 53 55 41 4c 54 49 45 | 53 2e 22 20 0d 77 01 49 |ASUALTIE|S." .w.I|
|00000d20| 3d 40 28 4a 2b 36 33 29 | 3b 49 46 4a 3d 31 50 52 |=@(J+63)|;IFJ=1PR|
|00000d30| 2e 22 53 48 4f 52 54 20 | 52 41 4e 47 45 20 53 45 |."SHORT |RANGE SE|
|00000d40| 4e 53 4f 52 22 2c 20 0d | 7c 01 49 46 4a 3d 32 50 |NSOR", .||.IFJ=2P|
|00000d50| 52 2e 22 43 4f 4d 50 55 | 54 45 52 20 44 49 53 50 |R."COMPU|TER DISP|
|00000d60| 4c 41 59 22 2c 20 0d 81 | 01 49 46 4a 3d 33 50 52 |LAY", ..|.IFJ=3PR|
|00000d70| 2e 22 4c 4f 4e 47 20 52 | 41 4e 47 45 20 53 45 4e |."LONG R|ANGE SEN|
|00000d80| 53 4f 52 22 2c 20 0d 86 | 01 49 46 4a 3d 34 50 52 |SOR", ..|.IFJ=4PR|
|00000d90| 2e 22 50 48 41 53 45 52 | 22 2c 20 0d 8b 01 49 46 |."PHASER|", ...IF|
|00000da0| 4a 3d 35 50 52 2e 22 57 | 41 52 50 20 45 4e 47 49 |J=5PR."W|ARP ENGI|
|00000db0| 4e 45 22 2c 20 0d 90 01 | 49 46 4a 3d 36 50 52 2e |NE", ...|IFJ=6PR.|
|00000dc0| 22 50 48 4f 54 4f 4e 20 | 54 4f 52 50 45 44 4f 20 |"PHOTON |TORPEDO |
|00000dd0| 54 55 42 45 53 22 2c 20 | 0d 95 01 49 46 4a 3d 37 |TUBES", |...IFJ=7|
|00000de0| 50 52 2e 22 53 48 49 45 | 4c 44 22 2c 20 0d 9a 01 |PR."SHIE|LD", ...|
|00000df0| 49 46 49 3d 30 52 2e 0d | 9f 01 50 52 2e 22 20 44 |IFI=0R..|..PR." D|
|00000e00| 41 4d 41 47 45 44 2c 20 | 22 2c 23 31 2c 49 2c 22 |AMAGED, |",#1,I,"|
|00000e10| 20 53 54 41 52 44 41 54 | 45 53 20 45 53 54 49 4d | STARDAT|ES ESTIM|
|00000e20| 41 54 45 44 20 46 4f 52 | 20 52 45 50 41 49 52 22 |ATED FOR| REPAIR"|
|00000e30| 3b 52 2e 20 0d a4 01 50 | 52 2e 22 53 54 41 54 55 |;R. ...P|R."STATU|
|00000e40| 53 20 52 45 50 4f 52 54 | 3a 22 3b 50 52 2e 22 53 |S REPORT|:";PR."S|
|00000e50| 54 41 52 44 41 54 45 22 | 2c 23 31 30 2c 33 32 33 |TARDATE"|,#10,323|
|00000e60| 30 2d 44 3b 50 52 2e 22 | 54 49 4d 45 20 4c 45 46 |0-D;PR."|TIME LEF|
|00000e70| 54 22 2c 23 37 2c 44 20 | 0d a9 01 50 52 2e 22 43 |T",#7,D |...PR."C|
|00000e80| 4f 4e 44 49 54 49 4f 4e | 20 20 20 20 20 22 2c 3b |ONDITION|     ",;|
|00000e90| 49 46 4f 50 52 2e 22 44 | 4f 43 4b 45 44 22 3b 47 |IFOPR."D|OCKED";G|
|00000ea0| 2e 34 34 35 20 0d ae 01 | 49 46 4e 50 52 2e 22 52 |.445 ...|IFNPR."R|
|00000eb0| 45 44 22 3b 47 2e 34 34 | 35 20 0d b3 01 49 46 45 |ED";G.44|5 ...IFE|
|00000ec0| 3c 39 39 39 50 52 2e 22 | 59 45 4c 4c 4f 57 22 3b |<999PR."|YELLOW";|
|00000ed0| 47 2e 34 34 35 20 0d b8 | 01 50 52 2e 22 47 52 45 |G.445 ..|.PR."GRE|
|00000ee0| 45 4e 20 0d bd 01 50 52 | 2e 22 50 4f 53 49 54 49 |EN ...PR|."POSITI|
|00000ef0| 4f 4e 20 20 20 20 20 20 | 51 2d 22 2c 23 31 2c 55 |ON      |Q-",#1,U|
|00000f00| 2c 56 2c 22 20 53 2d 22 | 2c 58 2c 59 3b 50 52 2e |,V," S-"|,X,Y;PR.|
|00000f10| 22 45 4e 45 52 47 59 22 | 2c 23 31 32 2c 45 20 0d |"ENERGY"|,#12,E .|
|00000f20| c2 01 50 52 2e 22 54 4f | 52 50 45 44 4f 45 53 22 |..PR."TO|RPEDOES"|
|00000f30| 2c 23 37 2c 46 3b 50 52 | 2e 22 4b 4c 49 4e 47 4f |,#7,F;PR|."KLINGO|
|00000f40| 4e 53 20 4c 45 46 54 22 | 2c 23 33 2c 4b 3b 50 52 |NS LEFT"|,#3,K;PR|
|00000f50| 2e 22 53 54 41 52 42 41 | 53 45 53 22 2c 23 36 2c |."STARBA|SES",#6,|
|00000f60| 42 20 0d c7 01 46 2e 4a | 3d 31 54 4f 37 3b 49 46 |B ...F.J|=1TO7;IF|
|00000f70| 40 28 4a 2b 36 33 29 47 | 4f 53 2e 33 37 35 0d cc |@(J+63)G|OS.375..|
|00000f80| 01 4e 2e 4a 3b 47 2e 31 | 32 30 0d d1 01 4a 3d 35 |.N.J;G.1|20...J=5|
|00000f90| 3b 47 4f 53 2e 33 37 35 | 3b 49 46 49 3d 30 50 52 |;GOS.375|;IFI=0PR|
|00000fa0| 2e 20 0d d6 01 49 4e 2e | 22 53 45 43 54 4f 52 20 |. ...IN.|"SECTOR |
|00000fb0| 44 49 53 54 41 4e 43 45 | 22 57 3b 49 46 57 3c 31 |DISTANCE|"W;IFW<1|
|00000fc0| 47 2e 31 32 30 0d db 01 | 49 46 49 2a 28 57 3e 32 |G.120...|IFI*(W>2|
|00000fd0| 29 50 52 2e 27 43 48 45 | 4b 4f 56 3a 20 22 57 45 |)PR.'CHE|KOV: "WE|
|00000fe0| 20 43 41 4e 20 54 52 59 | 20 32 20 41 54 20 4d 4f | CAN TRY| 2 AT MO|
|00000ff0| 53 54 2c 20 53 49 52 2e | 22 27 3b 47 2e 34 37 30 |ST, SIR.|"';G.470|
|00001000| 20 0d e0 01 49 46 57 3e | 39 31 57 3d 39 31 3b 50 | ...IFW>|91W=91;P|
|00001010| 52 2e 27 53 50 4f 43 4b | 3a 20 22 41 52 45 20 59 |R.'SPOCK|: "ARE Y|
|00001020| 4f 55 20 53 55 52 45 2c | 20 43 41 50 54 41 49 4e |OU SURE,| CAPTAIN|
|00001030| 3f 22 20 0d e5 01 49 46 | 45 3c 57 2a 57 2f 32 50 |?" ...IF|E<W*W/2P|
|00001040| 52 2e 27 53 43 4f 54 54 | 59 3a 20 22 53 49 52 2c |R.'SCOTT|Y: "SIR,|
|00001050| 20 57 45 20 44 4f 20 4e | 4f 54 20 48 41 56 45 20 | WE DO N|OT HAVE |
|00001060| 54 48 45 20 45 4e 45 52 | 47 59 2e 22 27 3b 47 2e |THE ENER|GY."';G.|
|00001070| 31 32 30 20 0d ea 01 47 | 4f 53 2e 36 31 35 3b 49 |120 ...G|OS.615;I|
|00001080| 46 52 3d 30 47 2e 31 32 | 30 20 0d ef 01 44 3d 44 |FR=0G.12|0 ...D=D|
|00001090| 2d 31 2c 45 3d 45 2d 57 | 2a 57 2f 32 2c 40 28 38 |-1,E=E-W|*W/2,@(8|
|000010a0| 2a 58 2b 59 2b 36 32 29 | 3d 30 20 0d f4 01 46 2e |*X+Y+62)|=0 ...F.|
|000010b0| 4d 3d 36 34 54 4f 37 30 | 3b 40 28 4d 29 3d 28 40 |M=64TO70|;@(M)=(@|
|000010c0| 28 4d 29 2d 31 29 2a 28 | 40 28 4d 29 3e 30 29 3b |(M)-1)*(|@(M)>0);|
|000010d0| 4e 2e 4d 20 0d f9 01 50 | 3d 34 35 2a 58 2b 32 32 |N.M ...P|=45*X+22|
|000010e0| 2c 47 3d 34 35 2a 59 2b | 32 32 2c 57 3d 34 35 2a |,G=45*Y+|22,W=45*|
|000010f0| 57 3b 46 2e 4d 3d 31 54 | 4f 38 3b 57 3d 57 2d 52 |W;F.M=1T|O8;W=W-R|
|00001100| 3b 49 46 57 3c 2d 32 32 | 47 2e 35 32 35 20 0d fe |;IFW<-22|G.525 ..|
|00001110| 01 50 3d 50 2b 53 2c 47 | 3d 47 2b 54 2c 49 3d 50 |.P=P+S,G|=G+T,I=P|
|00001120| 2f 34 35 2c 4a 3d 47 2f | 34 35 3b 49 46 28 49 3c |/45,J=G/|45;IF(I<|
|00001130| 31 29 2b 28 49 3e 38 29 | 2b 28 4a 3c 31 29 2b 28 |1)+(I>8)|+(J<1)+(|
|00001140| 4a 3e 38 29 47 2e 35 33 | 30 20 0d 03 02 49 46 40 |J>8)G.53|0 ...IF@|
|00001150| 28 38 2a 49 2b 4a 2b 36 | 32 29 3d 30 58 3d 49 2c |(8*I+J+6|2)=0X=I,|
|00001160| 59 3d 4a 3b 4e 2e 4d 20 | 0d 08 02 50 52 2e 22 2a |Y=J;N.M |...PR."*|
|00001170| 2a 45 4d 45 52 47 45 4e | 43 59 20 53 54 4f 50 2a |*EMERGEN|CY STOP*|
|00001180| 2a 22 3b 50 52 2e 27 53 | 50 4f 43 4b 3a 20 22 54 |*";PR.'S|POCK: "T|
|00001190| 4f 20 45 52 52 20 49 53 | 20 48 55 4d 41 4e 2e 22 |O ERR IS| HUMAN."|
|000011a0| 20 0d 0d 02 40 28 38 2a | 58 2b 59 2b 36 32 29 3d | ...@(8*|X+Y+62)=|
|000011b0| 34 3b 47 4f 53 2e 31 37 | 35 3b 47 2e 36 35 20 0d |4;GOS.17|5;G.65 .|
|000011c0| 12 02 50 3d 55 2a 37 32 | 2b 50 2f 35 2b 57 2f 35 |..P=U*72|+P/5+W/5|
|000011d0| 2a 53 2f 52 2d 39 2c 55 | 3d 50 2f 37 32 2c 47 3d |*S/R-9,U|=P/72,G=|
|000011e0| 56 2a 37 32 2b 47 2f 35 | 2b 57 2f 35 2a 54 2f 52 |V*72+G/5|+W/5*T/R|
|000011f0| 2d 39 2c 56 3d 47 2f 37 | 32 20 0d 17 02 49 46 52 |-9,V=G/7|2 ...IFR|
|00001200| 2e 28 39 29 3c 32 50 52 | 2e 22 2a 2a 2a 53 50 41 |.(9)<2PR|."***SPA|
|00001210| 43 45 20 53 54 4f 52 4d | 2a 2a 2a 22 3b 54 3d 31 |CE STORM|***";T=1|
|00001220| 30 30 3b 47 4f 53 2e 33 | 36 30 20 0d 1c 02 49 46 |00;GOS.3|60 ...IF|
|00001230| 28 55 3e 30 29 2a 28 55 | 3c 39 29 2a 28 56 3e 30 |(U>0)*(U|<9)*(V>0|
|00001240| 29 2a 28 56 3c 39 29 58 | 3d 28 50 2b 39 2d 37 32 |)*(V<9)X|=(P+9-72|
|00001250| 2a 55 29 2f 39 2c 59 3d | 28 47 2b 39 2d 37 32 2a |*U)/9,Y=|(G+9-72*|
|00001260| 56 29 2f 39 3b 47 2e 34 | 35 20 0d 21 02 50 52 2e |V)/9;G.4|5 .!.PR.|
|00001270| 22 2a 2a 59 4f 55 20 57 | 41 4e 44 45 52 45 44 20 |"**YOU W|ANDERED |
|00001280| 4f 55 54 53 49 44 45 20 | 54 48 45 20 47 41 4c 41 |OUTSIDE |THE GALA|
|00001290| 58 59 2a 2a 20 0d 26 02 | 50 52 2e 22 4f 4e 20 42 |XY** .&.|PR."ON B|
|000012a0| 4f 41 52 44 20 43 4f 4d | 50 55 54 45 52 20 54 41 |OARD COM|PUTER TA|
|000012b0| 4b 45 53 20 4f 56 45 52 | 2c 20 41 4e 44 20 53 41 |KES OVER|, AND SA|
|000012c0| 56 45 44 20 59 4f 55 52 | 20 4c 49 46 45 22 3b 47 |VED YOUR| LIFE";G|
|000012d0| 2e 34 30 20 0d 2b 02 4a | 3d 36 3b 47 4f 53 2e 33 |.40 .+.J|=6;GOS.3|
|000012e0| 37 35 3b 49 46 49 47 2e | 31 32 30 20 0d 30 02 49 |75;IFIG.|120 .0.I|
|000012f0| 46 46 3d 30 50 52 2e 22 | 20 45 4d 50 54 59 22 3b |FF=0PR."| EMPTY";|
|00001300| 47 2e 31 32 30 20 0d 35 | 02 50 52 2e 22 20 4c 4f |G.120 .5|.PR." LO|
|00001310| 41 44 45 44 22 3b 47 4f | 53 2e 36 31 35 3b 49 46 |ADED";GO|S.615;IF|
|00001320| 52 3d 30 47 2e 31 32 30 | 20 0d 3a 02 50 52 2e 22 |R=0G.120| .:.PR."|
|00001330| 54 4f 52 50 45 44 4f 20 | 54 52 41 43 4b 20 22 2c |TORPEDO |TRACK ",|
|00001340| 3b 46 3d 46 2d 31 2c 50 | 3d 34 35 2a 58 2b 32 32 |;F=F-1,P|=45*X+22|
|00001350| 2c 47 3d 34 35 2a 59 2b | 32 32 3b 46 2e 4d 3d 31 |,G=45*Y+|22;F.M=1|
|00001360| 54 4f 38 20 0d 3f 02 50 | 3d 50 2b 53 2c 47 3d 47 |TO8 .?.P|=P+S,G=G|
|00001370| 2b 54 2c 49 3d 50 2f 34 | 35 2c 4a 3d 47 2f 34 35 |+T,I=P/4|5,J=G/45|
|00001380| 3b 49 46 28 49 3c 31 29 | 2b 28 49 3e 38 29 2b 28 |;IF(I<1)|+(I>8)+(|
|00001390| 4a 3c 31 29 2b 28 4a 3e | 38 29 47 2e 35 38 35 20 |J<1)+(J>|8)G.585 |
|000013a0| 0d 44 02 4c 3d 38 2a 49 | 2b 4a 2b 36 32 2c 57 3d |.D.L=8*I|+J+62,W=|
|000013b0| 38 2a 55 2b 56 2d 39 2c | 52 3d 40 28 57 29 2f 41 |8*U+V-9,|R=@(W)/A|
|000013c0| 2e 28 40 28 57 29 29 3b | 50 52 2e 23 31 2c 49 2c |.(@(W));|PR.#1,I,|
|000013d0| 4a 2c 22 20 22 2c 3b 47 | 2e 35 38 35 2b 35 2a 40 |J," ",;G|.585+5*@|
|000013e0| 28 4c 29 20 0d 49 02 4e | 2e 4d 3b 50 52 2e 22 2e |(L) .I.N|.M;PR.".|
|000013f0| 2e 2e 4d 49 53 53 45 44 | 22 3b 47 2e 36 35 20 0d |..MISSED|";G.65 .|
|00001400| 4e 02 53 3d 52 2e 28 39 | 39 29 2b 32 38 30 3b 46 |N.S=R.(9|9)+280;F|
|00001410| 2e 4d 3d 31 33 35 54 4f | 31 34 30 3b 49 46 28 40 |.M=135TO|140;IF(@|
|00001420| 28 4d 2b 36 29 3d 49 29 | 2a 28 40 28 4d 2b 31 32 |(M+6)=I)|*(@(M+12|
|00001430| 29 3d 4a 29 47 4f 53 2e | 33 30 35 0d 50 02 4e 2e |)=J)GOS.|305.P.N.|
|00001440| 4d 3b 47 2e 36 35 0d 53 | 02 42 3d 42 2d 31 2c 40 |M;G.65.S|.B=B-1,@|
|00001450| 28 4c 29 3d 30 2c 40 28 | 57 29 3d 40 28 57 29 2d |(L)=0,@(|W)=@(W)-|
|00001460| 31 30 2a 52 3b 50 52 2e | 22 53 54 41 52 42 41 53 |10*R;PR.|"STARBAS|
|00001470| 45 20 44 45 53 54 52 4f | 59 45 44 20 0d 55 02 50 |E DESTRO|YED .U.P|
|00001480| 52 2e 27 53 50 4f 43 4b | 3a 20 22 49 20 4f 46 54 |R.'SPOCK|: "I OFT|
|00001490| 45 4e 20 46 49 4e 44 20 | 48 55 4d 41 4e 20 42 45 |EN FIND |HUMAN BE|
|000014a0| 48 41 56 49 4f 55 52 20 | 46 41 53 43 49 4e 41 54 |HAVIOUR |FASCINAT|
|000014b0| 49 4e 47 2e 22 27 3b 47 | 2e 36 35 20 0d 58 02 50 |ING."';G|.65 .X.P|
|000014c0| 52 2e 22 48 49 54 20 41 | 20 53 54 41 52 22 3b 49 |R."HIT A| STAR";I|
|000014d0| 46 52 2e 28 39 29 3c 33 | 50 52 2e 22 54 4f 52 50 |FR.(9)<3|PR."TORP|
|000014e0| 45 44 4f 20 41 42 53 4f | 52 42 45 44 22 3b 47 2e |EDO ABSO|RBED";G.|
|000014f0| 36 35 20 0d 5d 02 40 28 | 4c 29 3d 30 2c 40 28 57 |65 .].@(|L)=0,@(W|
|00001500| 29 3d 40 28 57 29 2d 52 | 3b 49 46 52 2e 28 39 29 |)=@(W)-R|;IFR.(9)|
|00001510| 3c 36 50 52 2e 22 53 54 | 41 52 20 44 45 53 54 52 |<6PR."ST|AR DESTR|
|00001520| 4f 59 45 44 22 3b 47 2e | 36 35 20 0d 62 02 54 3d |OYED";G.|65 .b.T=|
|00001530| 33 30 30 3b 50 52 2e 22 | 49 54 20 4e 4f 56 41 53 |300;PR."|IT NOVAS|
|00001540| 20 20 20 20 2a 2a 2a 52 | 41 44 49 41 54 49 4f 4e |    ***R|ADIATION|
|00001550| 20 41 4c 41 52 4d 2a 2a | 2a 22 3b 47 4f 53 2e 33 | ALARM**|*";GOS.3|
|00001560| 36 30 3b 47 2e 36 35 20 | 0d 67 02 49 4e 2e 22 43 |60;G.65 |.g.IN."C|
|00001570| 4f 55 52 53 45 20 28 30 | 2d 33 36 30 29 22 49 3b |OURSE (0|-360)"I;|
|00001580| 49 46 28 49 3e 33 36 30 | 29 2b 28 49 3c 30 29 52 |IF(I>360|)+(I<0)R|
|00001590| 3d 30 3b 52 2e 0d 6c 02 | 53 3d 28 49 2b 34 35 29 |=0;R..l.|S=(I+45)|
|000015a0| 2f 39 30 2c 49 3d 49 2d | 53 2a 39 30 2c 52 3d 28 |/90,I=I-|S*90,R=(|
|000015b0| 34 35 2b 49 2a 49 29 2f | 31 31 30 2b 34 35 3b 47 |45+I*I)/|110+45;G|
|000015c0| 2e 36 32 35 2b 35 2a 28 | 53 3c 34 29 2a 53 0d 71 |.625+5*(|S<4)*S.q|
|000015d0| 02 53 3d 2d 34 35 2c 54 | 3d 49 3b 52 2e 0d 76 02 |.S=-45,T|=I;R..v.|
|000015e0| 53 3d 49 2c 54 3d 34 35 | 3b 52 2e 0d 7b 02 53 3d |S=I,T=45|;R..{.S=|
|000015f0| 34 35 2c 54 3d 2d 49 3b | 52 2e 0d 80 02 53 3d 2d |45,T=-I;|R....S=-|
|00001600| 49 2c 54 3d 2d 34 35 3b | 52 2e 20 0d 80 02 53 3d |I,T=-45;|R. ...S=|
|00001610| 2d 49 2c 54 3d 2d 34 35 | 3b 52 2e 20 0d 2e 22 43 |-I,T=-45|;R. .."C|
|00001620| 4f 4d 50 55 54 45 52 20 | 44 49 53 50 4c 41 59 22 |OMPUTER |DISPLAY"|
|00001630| 2c 20 0d 81 01 49 46 4a | 3d 33 50 52 2e 22 4c 4f |, ...IFJ|=3PR."LO|
|00001640| 4e 47 20 52 41 4e 47 45 | 20 53 45 4e 53 4f 52 22 |NG RANGE| SENSOR"|
|00001650| 2c 20 0d 86 01 49 46 4a | 3d 34 50 52 2e 22 50 48 |, ...IFJ|=4PR."PH|
|00001660| 41 53 45 52 22 2c 20 0d | 8b 01 49 46 4a 3d 35 50 |ASER", .|..IFJ=5P|
|00001670| 52 2e 22 57 41 52 50 20 | 45 4e 47 49 4e 45 22 2c |R."WARP |ENGINE",|
|00001680| 00 54 45 53 54 31 20 20 | 20 54 42 49 00 00 00 04 |.TEST1  | TBI....|
|00001690| d5 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016a0| 00 54 45 53 54 32 20 20 | 20 54 42 49 00 00 00 04 |.TEST2  | TBI....|
|000016b0| d6 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000016c0| 00 53 54 41 52 20 20 20 | 20 43 4f 4d 00 00 00 40 |.STAR   | COM...@|
|000016d0| df e0 e1 e2 e3 e4 e5 e6 | 00 00 00 00 00 00 00 00 |........|........|
|000016e0| 00 53 54 41 52 54 52 45 | 4b 54 42 49 00 00 00 00 |.STARTRE|KTBI....|
|000016f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+