DOM.COMBAT X
FILE INFORMATION
FILENAME(S): DOM.COMBAT X
FILE TYPE(S): DEL
FILE SIZE: 4.7K
FIRST SEEN: 2025-11-30 21:07:12
APPEARS ON: 1 disk(s)
FILE HASH
d466ef21673fbd61ce5be94997352455e606e11b2d3b85f8d380263adf3fe586
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 WORKDISK 01 | DOM.COMBAT X | DEL | DuncanTwain | 32 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 08 1D 08 64 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |....d.. ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 39 08 |*************.9.|
00000020: 6E 00 8F 20 2A 20 44 4F 4D 49 4E 41 54 49 4F 4E |n.. * DOMINATION|
00000030: 20 43 4F 4D 42 41 54 20 2A 00 55 08 78 00 8F 20 | COMBAT *.U.x.. |
00000040: 2A 20 20 20 20 20 50 52 4F 47 52 41 4D 20 20 20 |* PROGRAM |
00000050: 20 20 20 20 2A 00 71 08 82 00 8F 20 2A 20 20 20 | *.q.... * |
00000060: 45 2E 50 2E 20 28 43 29 27 39 31 20 20 20 20 20 |E.P. (C)'91 |
00000070: 2A 00 8D 08 8C 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*...... ********|
00000080: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A2 08 |*************...|
00000090: 96 00 47 B2 31 3A 4E B2 31 3A 54 55 B2 31 3A 5A |..G.1:N.1:TU.1:Z|
000000A0: B2 30 00 BF 08 A0 00 86 20 4D 54 28 35 30 29 2C |.0...... MT(50),|
000000B0: 4D 44 28 35 30 29 2C 48 53 28 32 2C 35 30 29 00 |MD(50),HS(2,50).|
000000C0: C5 08 BE 00 3A 00 DA 08 E8 03 8F 20 2A 2A 2A 20 |....:...... *** |
000000D0: 53 43 52 45 45 4E 20 2A 2A 2A 00 F2 08 F2 03 97 |SCREEN ***......|
000000E0: 20 35 33 32 38 31 2C 31 32 3A 97 35 33 32 38 30 | 53281,12:.53280|
000000F0: 2C 36 00 17 09 FC 03 99 22 93 05 43 4F 4D 42 41 |,6......"..COMBA|
00000100: 54 20 53 59 53 54 45 4D 20 3A 20 9E 49 4E 50 55 |T SYSTEM : .INPU|
00000110: 54 20 4D 4F 44 45 22 00 48 09 06 04 99 22 90 A3 |T MODE".H...."..|
00000120: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000130: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000140: A3 A3 A3 A3 A3 A3 A3 22 00 6F 09 10 04 99 22 99 |.......".o....".|
00000150: 12 49 4E 50 55 54 20 43 4F 4D 42 41 54 54 41 4E |.INPUT COMBATTAN|
00000160: 54 53 92 90 2D 12 1F 47 52 4F 55 50 22 3B 47 00 |TS..-..GROUP";G.|
00000170: 81 09 1A 04 99 22 11 1D 1D 9F 53 48 49 50 22 3B |....."....SHIP";|
00000180: 4E 00 A7 09 24 04 85 22 1D 1D 1F 2D 4E 41 4D 45 |N...$.."...-NAME|
00000190: 20 20 20 20 20 20 20 20 20 20 20 20 3A 22 3B 4E | :";N|
000001A0: 41 24 28 47 2C 4E 29 00 C5 09 26 04 8B 4E 41 24 |A$(G,N)...&..NA$|
000001B0: 28 47 2C 4E 29 B2 22 22 AF 47 B2 31 AF 4E B2 31 |(G,N)."".G.1.N.1|
000001C0: A7 31 30 30 30 00 E8 09 29 04 8B 4E 41 24 28 47 |.1000...)..NA$(G|
000001D0: 2C 4E 29 B2 22 22 AF 47 B2 31 A7 47 B2 32 3A 4E |,N)."".G.1.G.2:N|
000001E0: B2 31 3A 89 31 30 30 30 00 02 0A 2B 04 8B 4E 41 |.1:.1000...+..NA|
000001F0: 24 28 47 2C 4E 29 B2 22 22 AF 47 B2 32 A7 31 32 |$(G,N)."".G.2.12|
00000200: 30 30 00 26 0A 2E 04 85 22 1D 1D 2D 48 55 4C 4C |00.&...."..-HULL|
00000210: 20 20 20 20 20 20 20 20 20 20 20 20 3A 22 3B 48 | :";H|
00000220: 55 28 47 2C 4E 29 00 3A 0A 33 04 8B 48 55 28 47 |U(G,N).:.3..HU(G|
00000230: 2C 4E 29 B3 31 A7 31 30 37 30 00 5E 0A 38 04 85 |,N).1.1070.^.8..|
00000240: 22 1D 1D 2D 43 41 52 47 4F 20 20 20 20 20 20 20 |"..-CARGO |
00000250: 20 20 20 20 3A 22 3B 43 41 28 47 2C 4E 29 00 82 | :";CA(G,N)..|
00000260: 0A 42 04 85 22 1D 1D 2D 53 48 49 45 4C 44 53 20 |.B.."..-SHIELDS |
00000270: 20 20 20 20 20 20 20 20 3A 22 3B 53 48 28 47 2C | :";SH(G,|
00000280: 4E 29 00 A6 0A 4C 04 85 22 1D 1D 2D 4C 41 53 45 |N)...L.."..-LASE|
00000290: 52 53 20 20 20 20 20 20 20 20 20 20 3A 22 3B 4C |RS :";L|
000002A0: 41 28 47 2C 4E 29 00 CA 0A 56 04 85 22 1D 1D 2D |A(G,N)...V.."..-|
000002B0: 50 41 52 54 49 43 4C 45 20 42 45 41 4D 53 20 20 |PARTICLE BEAMS |
000002C0: 3A 22 3B 50 42 28 47 2C 4E 29 00 EE 0A 60 04 85 |:";PB(G,N)...`..|
000002D0: 22 1D 1D 2D 4D 49 53 53 49 4C 45 53 20 20 20 20 |"..-MISSILES |
000002E0: 20 20 20 20 3A 22 3B 4D 49 28 47 2C 4E 29 00 12 | :";MI(G,N)..|
000002F0: 0B 6A 04 85 22 1D 1D 2D 52 45 54 52 45 41 54 25 |.j.."..-RETREAT%|
00000300: 20 28 30 2D 31 30 30 29 3A 22 3B 52 45 28 47 2C | (0-100):";RE(G,|
00000310: 4E 29 00 32 0B 74 04 8B 52 45 28 47 2C 4E 29 B3 |N).2.t..RE(G,N).|
00000320: 31 B0 52 45 28 47 2C 4E 29 B1 31 30 30 A7 31 31 |1.RE(G,N).100.11|
00000330: 33 30 00 46 0B 92 04 48 53 28 47 2C 4E 29 B2 48 |30.F...HS(G,N).H|
00000340: 55 28 47 2C 4E 29 00 6D 0B A6 04 4E B2 4E AA 31 |U(G,N).m...N.N.1|
00000350: 3A 43 4F 28 47 29 B2 43 4F 28 47 29 AA 31 3A 43 |:CO(G).CO(G).1:C|
00000360: 4F B2 43 4F 28 31 29 AA 43 4F 28 32 29 00 77 0B |O.CO(1).CO(2).w.|
00000370: AB 04 89 31 30 30 30 00 A9 0B B0 04 99 22 93 05 |...1000......"..|
00000380: 43 4F 4D 42 41 54 20 53 59 53 54 45 4D 20 3A 20 |COMBAT SYSTEM : |
00000390: 9E 41 43 54 49 56 45 20 20 20 20 20 20 20 20 9B |.ACTIVE .|
000003A0: 54 55 52 4E 3A 22 3B 54 55 00 DA 0B BA 04 99 22 |TURN:";TU......"|
000003B0: 90 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000003C0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000003D0: A3 A3 A3 A3 A3 A3 A3 A3 A3 22 00 F2 0B C4 04 99 |........."......|
000003E0: 22 99 49 4E 49 54 49 41 54 49 56 45 2E 2E 2E 05 |".INITIATIVE....|
000003F0: 22 3B 00 02 0C C9 04 81 49 B2 30 A4 35 30 30 3A |";......I.0.500:|
00000400: 82 49 00 26 0C CE 04 58 B2 B5 28 BB 28 30 29 AC |.I.&...X..(.(0).|
00000410: 47 AA 31 29 3A 59 B2 B5 28 BB 28 30 29 AC 43 4F |G.1):Y..(.(0).CO|
00000420: 28 58 29 AA 31 29 00 3A 0C D8 04 8B 44 45 28 58 |(X).1).:....DE(X|
00000430: 2C 59 29 B2 31 A7 31 32 33 30 00 50 0C DA 04 8B |,Y).1.1230.P....|
00000440: 52 45 28 58 2C 59 29 B2 39 39 39 A7 31 32 33 30 |RE(X,Y).999.1230|
00000450: 00 64 0C DD 04 8B 46 54 28 58 2C 59 29 B2 31 A7 |.d....FT(X,Y).1.|
00000460: 31 32 33 30 00 8C 0C E2 04 99 22 47 52 4F 55 50 |1230......"GROUP|
00000470: 22 3B 58 3B 22 1D 22 3B 4E 41 24 28 58 2C 59 29 |";X;".";NA$(X,Y)|
00000480: 3A 81 49 B2 30 A4 35 30 30 3A 82 49 00 A9 0C 14 |:.I.0.500:.I....|
00000490: 05 8F 20 2A 2A 20 43 4F 4D 42 41 54 2D 50 52 4F |.. ** COMBAT-PRO|
000004A0: 43 45 44 55 52 45 20 2A 2A 00 B6 0C 1E 05 8B 58 |CEDURE **......X|
000004B0: B2 31 A7 54 B2 32 00 C3 0C 28 05 8B 58 B2 32 A7 |.1.T.2...(..X.2.|
000004C0: 54 B2 31 00 E2 0C 2D 05 81 49 B2 31 A4 43 4F 28 |T.1...-..I.1.CO(|
000004D0: 54 29 3A 8B 44 45 28 54 2C 49 29 B3 B1 31 A7 43 |T):.DE(T,I)..1.C|
000004E0: B2 31 00 E9 0C 2E 05 82 49 00 F7 0C 2F 05 8B 43 |.1......I.../..C|
000004F0: B2 30 A7 32 33 30 30 00 12 0D 32 05 43 B2 30 3A |.0.2300...2.C.0:|
00000500: 54 41 B2 B5 28 BB 28 30 29 AC 43 4F 28 54 29 AA |TA..(.(0).CO(T).|
00000510: 31 29 00 27 0D 37 05 8B 44 45 28 54 2C 54 41 29 |1).'.7..DE(T,TA)|
00000520: B2 31 A7 31 33 33 30 00 3E 0D 39 05 8B 52 45 28 |.1.1330.>.9..RE(|
00000530: 54 2C 54 41 29 B2 39 39 39 A7 31 33 33 30 00 5E |T,TA).999.1330.^|
00000540: 0D 3C 05 99 22 97 54 41 52 47 45 54 20 3D 20 22 |.<..".TARGET = "|
00000550: 3B 4E 41 24 28 54 2C 54 41 29 3B 22 11 22 00 7B |;NA$(T,TA);".".{|
00000560: 0D 3E 05 8D 31 31 30 30 30 3A 8B 52 45 28 58 2C |.>..11000:.RE(X,|
00000570: 59 29 B2 39 39 39 A7 31 37 30 30 00 90 0D 41 05 |Y).999.1700...A.|
00000580: 8B 4C 41 28 58 2C 59 29 B3 B2 30 A7 31 34 30 30 |.LA(X,Y)..0.1400|
00000590: 00 AA 0D 42 05 8B 54 4D 28 58 2C 59 29 B2 30 20 |...B..TM(X,Y).0 |
000005A0: B0 20 5A B2 30 A7 31 33 36 30 00 B9 0D 43 05 48 |. Z.0.1360...C.H|
000005B0: B2 30 3A 81 4B B2 31 A4 5A 00 E8 0D 44 05 8B 4D |.0:.K.1.Z...D..M|
000005C0: 54 28 4B 29 B2 54 55 20 A7 8B 20 54 4D 28 58 2C |T(K).TU .. TM(X,|
000005D0: 59 29 B3 B1 48 20 A7 8B 20 4D 44 28 4B 29 B2 30 |Y)..H .. MD(K).0|
000005E0: 20 A7 20 48 B2 48 AA 31 00 F9 0D 45 05 82 4B 3A | . H.H.1...E..K:|
000005F0: 8B 48 B2 30 A7 31 33 36 30 00 00 0E 46 05 99 48 |.H.0.1360...F..H|
00000600: 00 30 0E 47 05 99 22 1F 46 49 52 49 4E 47 20 4C |.0.G..".FIRING L|
00000610: 41 53 45 52 53 20 41 54 20 49 4E 43 4F 4D 49 4E |ASERS AT INCOMIN|
00000620: 47 20 4D 49 53 53 49 4C 45 28 53 29 2E 2E 2E 22 |G MISSILE(S)..."|
00000630: 00 41 0E 48 05 81 4B B2 31 A4 4C 41 28 58 2C 59 |.A.H..K.1.LA(X,Y|
00000640: 29 00 53 0E 49 05 8B 48 B2 30 A7 82 4B 3A 89 31 |).S.I..H.0..K:.1|
00000650: 34 30 30 00 64 0E 4A 05 48 43 B2 33 30 3A 8D 31 |400.d.J.HC.30:.1|
00000660: 30 30 30 30 00 A8 0E 4B 05 8B 48 54 A7 99 22 90 |0000...K..HT..".|
00000670: 4D 49 53 53 49 4C 45 20 44 45 53 54 52 4F 59 45 |MISSILE DESTROYE|
00000680: 44 22 3A 54 4D 28 58 2C 59 29 B2 54 4D 28 58 2C |D":TM(X,Y).TM(X,|
00000690: 59 29 AB 31 3A 48 B2 48 AB 31 3A 41 B2 41 AA 31 |Y).1:H.H.1:A.A.1|
000006A0: 3A 4D 44 28 41 29 B2 31 00 B9 0E 4C 05 82 4B 3A |:MD(A).1...L..K:|
000006B0: 48 B2 30 3A 89 31 34 30 30 00 DC 0E 50 05 99 22 |H.0:.1400...P.."|
000006C0: 1F 46 49 52 49 4E 47 22 3B 4C 41 28 58 2C 59 29 |.FIRING";LA(X,Y)|
000006D0: 3B 22 4C 41 53 45 52 53 2E 2E 2E 22 00 ED 0E 55 |;"LASERS..."...U|
000006E0: 05 81 4B B2 31 A4 4C 41 28 58 2C 59 29 00 06 0F |..K.1.LA(X,Y)...|
000006F0: 5A 05 8B 44 45 28 54 2C 54 41 29 B2 31 A7 82 4B |Z..DE(T,TA).1..K|
00000700: 3A 89 31 37 30 30 00 27 0F 64 05 48 43 B2 36 30 |:.1700.'.d.HC.60|
00000710: 3A 8D 31 30 30 30 30 3A 8B 48 54 A7 44 41 B2 31 |:.10000:.HT.DA.1|
00000720: 3A 8D 31 30 31 30 30 00 2E 0F 6E 05 82 4B 00 43 |:.10100...n..K.C|
00000730: 0F 78 05 8B 50 42 28 58 2C 59 29 B3 B2 30 A7 31 |.x..PB(X,Y)..0.1|
00000740: 35 30 30 00 58 0F 7D 05 8B 44 45 28 54 2C 54 41 |500.X.}..DE(T,TA|
00000750: 29 B2 31 A7 31 36 30 30 00 8A 0F 82 05 99 22 1F |).1.1600......".|
00000760: 46 49 52 49 4E 47 22 3B 50 42 28 58 2C 59 29 3B |FIRING";PB(X,Y);|
00000770: 22 50 41 52 54 49 43 4C 45 20 42 45 41 4D 20 43 |"PARTICLE BEAM C|
00000780: 41 4E 4E 4F 4E 53 2E 2E 2E 22 00 9B 0F 8C 05 81 |ANNONS..."......|
00000790: 4B B2 31 A4 50 42 28 58 2C 59 29 00 B4 0F 96 05 |K.1.PB(X,Y).....|
000007A0: 8B 44 45 28 54 2C 54 41 29 B2 31 A7 82 4B 3A 89 |.DE(T,TA).1..K:.|
000007B0: 31 36 30 30 00 D5 0F A0 05 48 43 B2 34 30 3A 8D |1600.....HC.40:.|
000007C0: 31 30 30 30 30 3A 8B 48 54 A7 44 41 B2 36 3A 8D |10000:.HT.DA.6:.|
000007D0: 31 30 31 30 30 00 DC 0F AA 05 82 4B 00 FD 0F DC |10100......K....|
000007E0: 05 8B 4D 49 28 58 2C 59 29 B2 30 20 B0 20 44 45 |..MI(X,Y).0 . DE|
000007F0: 28 54 2C 54 41 29 B2 31 A7 31 36 30 30 00 29 10 |(T,TA).1.1600.).|
00000800: E6 05 99 22 1F 46 49 52 49 4E 47 20 4D 49 53 53 |...".FIRING MISS|
00000810: 49 4C 45 2E 2E 2E 22 3A 4D 49 28 58 2C 59 29 B2 |ILE...":MI(X,Y).|
00000820: 4D 49 28 58 2C 59 29 AB 31 00 41 10 F0 05 54 4D |MI(X,Y).1.A...TM|
00000830: 28 54 2C 54 41 29 B2 54 4D 28 54 2C 54 41 29 AA |(T,TA).TM(T,TA).|
00000840: 31 00 56 10 FA 05 5A B2 5A AA 31 3A 4D 54 28 5A |1.V...Z.Z.1:MT(Z|
00000850: 29 B2 54 55 AA 31 00 65 10 40 06 48 B2 30 3A 81 |).TU.1.e.@.H.0:.|
00000860: 4B B2 31 A4 5A 00 92 10 4A 06 8B 4D 54 28 4B 29 |K.1.Z...J..MT(K)|
00000870: B2 54 55 20 A7 8B 20 54 4D 28 58 2C 59 29 B3 B1 |.TU .. TM(X,Y)..|
00000880: 48 20 A7 8B 20 4D 44 28 4B 29 B2 30 A7 48 B2 48 |H .. MD(K).0.H.H|
00000890: AA 31 00 99 10 54 06 82 4B 00 A0 10 59 06 99 48 |.1...T..K...Y..H|
000008A0: 00 AE 10 5E 06 8B 48 B2 30 A7 31 37 30 30 00 C5 |...^..H.0.1700..|
000008B0: 10 72 06 99 22 95 4D 49 53 53 49 4C 45 20 49 4D |.r..".MISSILE IM|
000008C0: 50 41 43 54 22 00 DD 10 7C 06 81 4B B2 31 A4 48 |PACT"...|..K.1.H|
000008D0: 3A 48 43 B2 38 30 3A 8D 31 30 30 30 30 00 FB 10 |:HC.80:.10000...|
000008E0: 86 06 8B 48 54 A7 44 41 B2 31 30 3A 54 B2 58 3A |...HT.DA.10:T.X:|
000008F0: 54 41 B2 59 3A 8D 31 30 31 30 30 00 26 11 90 06 |TA.Y:.10100.&...|
00000900: 41 B2 41 AA 31 3A 4D 44 28 41 29 B2 31 3A 54 4D |A.A.1:MD(A).1:TM|
00000910: 28 58 2C 59 29 B2 54 4D 28 58 2C 59 29 AB 31 3A |(X,Y).TM(X,Y).1:|
00000920: 82 4B 3A 48 B2 30 00 41 11 A4 06 81 49 B2 30 A4 |.K:H.0.A....I.0.|
00000930: 31 30 30 30 3A 82 49 3A 46 54 28 58 2C 59 29 B2 |1000:.I:FT(X,Y).|
00000940: 31 00 71 11 AE 06 81 49 B2 31 A4 43 4F 28 31 29 |1.q....I.1.CO(1)|
00000950: 3A 8B 44 45 28 31 2C 49 29 B2 31 B0 52 45 28 31 |:.DE(1,I).1.RE(1|
00000960: 2C 49 29 B2 39 39 39 A7 46 54 28 31 2C 49 29 B2 |,I).999.FT(1,I).|
00000970: 31 00 78 11 AF 06 82 49 00 A8 11 B0 06 81 49 B2 |1.x....I......I.|
00000980: 31 A4 43 4F 28 32 29 3A 8B 44 45 28 32 2C 49 29 |1.CO(2):.DE(2,I)|
00000990: B2 31 B0 52 45 28 32 2C 49 29 B2 39 39 39 A7 46 |.1.RE(2,I).999.F|
000009A0: 54 28 32 2C 49 29 B2 31 00 AF 11 B1 06 82 49 00 |T(2,I).1......I.|
000009B0: CE 11 B2 06 81 49 B2 31 A4 43 4F 28 31 29 3A 8B |.....I.1.CO(1):.|
000009C0: 46 54 28 31 2C 49 29 B3 B1 31 A7 43 B2 31 00 D5 |FT(1,I)..1.C.1..|
000009D0: 11 B3 06 82 49 00 F4 11 B4 06 81 49 B2 31 A4 43 |....I......I.1.C|
000009E0: 4F 28 32 29 3A 8B 46 54 28 32 2C 49 29 B3 B1 31 |O(2):.FT(2,I)..1|
000009F0: A7 43 B2 31 00 FB 11 B5 06 82 49 00 0C 12 B8 06 |.C.1......I.....|
00000A00: 8B 43 A7 43 B2 30 3A 89 31 32 30 30 00 25 12 C2 |.C.C.0:.1200.%..|
00000A10: 06 54 55 B2 54 55 AA 31 3A 81 49 B2 30 A4 31 30 |.TU.TU.1:.I.0.10|
00000A20: 30 30 3A 82 49 00 3E 12 CC 06 81 49 B2 31 A4 43 |00:.I.>....I.1.C|
00000A30: 4F 28 31 29 3A 46 54 28 31 2C 49 29 B2 30 00 45 |O(1):FT(1,I).0.E|
00000A40: 12 D1 06 82 49 00 5E 12 D6 06 81 49 B2 31 A4 43 |....I.^....I.1.C|
00000A50: 4F 28 32 29 3A 46 54 28 32 2C 49 29 B2 30 00 65 |O(2):FT(2,I).0.e|
00000A60: 12 DB 06 82 49 00 7B 12 08 07 8F 20 2A 20 4E 4F |....I.{.... * NO|
00000A70: 20 57 45 41 50 4F 4E 53 3F 20 2A 00 8E 12 12 07 | WEAPONS? *.....|
00000A80: 48 B2 30 3A 81 49 B2 31 A4 43 4F 28 31 29 00 A3 |H.0:.I.1.CO(1)..|
00000A90: 12 1C 07 8B 4C 41 28 31 2C 49 29 B2 30 A7 48 B2 |....LA(1,I).0.H.|
00000AA0: 48 AA 31 00 B8 12 26 07 8B 50 42 28 31 2C 49 29 |H.1...&..PB(1,I)|
00000AB0: B2 30 A7 48 B2 48 AA 31 00 CD 12 30 07 8B 4D 49 |.0.H.H.1...0..MI|
00000AC0: 28 31 2C 49 29 B2 30 A7 48 B2 48 AA 31 00 D4 12 |(1,I).0.H.H.1...|
00000AD0: C6 07 82 49 00 E3 12 D0 07 81 49 B2 31 A4 43 4F |...I......I.1.CO|
00000AE0: 28 32 29 00 F8 12 DA 07 8B 4C 41 28 32 2C 49 29 |(2)......LA(2,I)|
00000AF0: B2 30 A7 48 B2 48 AA 31 00 0D 13 E4 07 8B 50 42 |.0.H.H.1......PB|
00000B00: 28 32 2C 49 29 B2 30 A7 48 B2 48 AA 31 00 22 13 |(2,I).0.H.H.1.".|
00000B10: EE 07 8B 4D 49 28 32 2C 49 29 B2 30 A7 48 B2 48 |...MI(2,I).0.H.H|
00000B20: AA 31 00 29 13 8E 08 82 49 00 51 13 98 08 8B 48 |.1.)....I.Q....H|
00000B30: B3 B1 28 28 33 AC 43 4F 28 31 29 29 AA 28 33 AC |..((3.CO(1)).(3.|
00000B40: 43 4F 28 32 29 29 29 A7 48 B2 30 3A 89 31 32 30 |CO(2))).H.0:.120|
00000B50: 30 00 67 13 FC 08 8F 20 2A 20 42 41 54 54 4C 45 |0.g.... * BATTLE|
00000B60: 3D 4F 56 45 52 20 2A 00 7E 13 01 09 99 22 11 05 |=OVER *.~...."..|
00000B70: 42 41 54 54 4C 45 20 45 4E 44 45 44 2E 22 00 C6 |BATTLE ENDED."..|
00000B80: 13 06 09 8B 48 B2 28 28 33 AC 43 4F 28 31 29 29 |....H.((3.CO(1))|
00000B90: AA 28 33 AC 43 4F 28 32 29 29 29 A7 99 22 11 05 |.(3.CO(2))).."..|
00000BA0: 43 4F 4D 42 41 54 54 41 4E 54 53 20 41 52 45 20 |COMBATTANTS ARE |
00000BB0: 41 4C 4C 20 57 45 41 50 4F 4E 4C 45 53 53 2E 2E |ALL WEAPONLESS..|
00000BC0: 11 22 3A 48 B2 30 00 D5 13 10 09 81 49 B2 31 A4 |.":H.0......I.1.|
00000BD0: 43 4F 28 31 29 00 F0 13 1A 09 99 22 99 53 48 49 |CO(1)......".SHI|
00000BE0: 50 20 31 22 3B 49 3B 4E 41 24 28 31 2C 49 29 3B |P 1";I;NA$(1,I);|
00000BF0: 00 18 14 24 09 8B 52 45 28 31 2C 49 29 B2 39 39 |...$..RE(1,I).99|
00000C00: 39 A7 99 22 90 20 52 45 54 52 45 41 54 45 44 2E |9..". RETREATED.|
00000C10: 11 22 3A 89 32 33 35 35 00 41 14 2E 09 8B 44 45 |.":.2355.A....DE|
00000C20: 28 31 2C 49 29 B2 31 A7 99 22 90 20 44 45 53 54 |(1,I).1..". DEST|
00000C30: 52 4F 59 45 44 2E 11 22 3A 82 49 3A 89 32 36 30 |ROYED..":.I:.260|
00000C40: 30 00 6C 14 30 09 8B 28 48 55 28 31 2C 49 29 AD |0.l.0..(HU(1,I).|
00000C50: 48 53 28 31 2C 49 29 29 B3 B2 2E 32 A7 99 22 90 |HS(1,I))...2..".|
00000C60: 20 44 45 52 45 4C 49 43 54 2E 11 22 00 75 14 33 | DERELICT..".u.3|
00000C70: 09 99 22 20 22 00 91 14 38 09 99 22 1F 48 55 4C |.." "...8..".HUL|
00000C80: 4C 20 20 20 20 20 20 3A 22 3B 48 55 28 31 2C 49 |L :";HU(1,I|
00000C90: 29 00 AD 14 42 09 99 22 1F 43 41 52 47 4F 20 20 |)...B..".CARGO |
00000CA0: 20 20 20 3A 22 3B 43 41 28 31 2C 49 29 00 C9 14 | :";CA(1,I)...|
00000CB0: 4C 09 99 22 1F 53 48 49 45 4C 44 53 20 20 20 3A |L..".SHIELDS :|
00000CC0: 22 3B 53 48 28 31 2C 49 29 00 E5 14 56 09 99 22 |";SH(1,I)...V.."|
00000CD0: 1F 4C 41 53 45 52 53 20 20 20 20 3A 22 3B 4C 41 |.LASERS :";LA|
00000CE0: 28 31 2C 49 29 00 01 15 60 09 99 22 1F 50 41 52 |(1,I)...`..".PAR|
00000CF0: 54 2E 42 45 41 4D 53 3A 22 3B 50 42 28 31 2C 49 |T.BEAMS:";PB(1,I|
00000D00: 29 00 1D 15 6A 09 99 22 1F 4D 49 53 53 49 4C 45 |)...j..".MISSILE|
00000D10: 53 20 20 3A 22 3B 4D 49 28 31 2C 49 29 00 35 15 |S :";MI(1,I).5.|
00000D20: 74 09 99 22 11 05 50 52 45 53 53 20 41 20 4B 45 |t.."..PRESS A KE|
00000D30: 59 2E 2E 2E 22 00 49 15 7E 09 A1 43 24 3A 8B 43 |Y...".I.~..C$:.C|
00000D40: 24 B2 22 22 A7 32 34 33 30 00 50 15 88 09 82 49 |$."".2430.P....I|
00000D50: 00 5F 15 28 0A 81 49 B2 31 A4 43 4F 28 32 29 00 |._.(..I.1.CO(2).|
00000D60: 7A 15 32 0A 99 22 99 53 48 49 50 20 32 22 3B 49 |z.2..".SHIP 2";I|
00000D70: 3B 4E 41 24 28 32 2C 49 29 3B 00 A2 15 3C 0A 8B |;NA$(2,I);...<..|
00000D80: 52 45 28 32 2C 49 29 B2 39 39 39 A7 99 22 90 20 |RE(2,I).999..". |
00000D90: 52 45 54 52 45 41 54 45 44 2E 11 22 3A 89 32 36 |RETREATED..":.26|
00000DA0: 33 35 00 CB 15 46 0A 8B 44 45 28 32 2C 49 29 B2 |35...F..DE(2,I).|
00000DB0: 31 A7 99 22 90 20 44 45 53 54 52 4F 59 45 44 2E |1..". DESTROYED.|
00000DC0: 11 22 3A 82 49 3A 89 32 38 30 30 00 F6 15 48 0A |.":.I:.2800...H.|
00000DD0: 8B 28 48 55 28 32 2C 49 29 AD 48 53 28 32 2C 49 |.(HU(2,I).HS(2,I|
00000DE0: 29 29 B3 B2 2E 32 A7 99 22 90 20 44 45 52 45 4C |))...2..". DEREL|
00000DF0: 49 43 54 2E 11 22 00 FF 15 4B 0A 99 22 20 22 00 |ICT.."...K.." ".|
00000E00: 1B 16 50 0A 99 22 1F 48 55 4C 4C 20 20 20 20 20 |..P..".HULL |
00000E10: 20 3A 22 3B 48 55 28 32 2C 49 29 00 37 16 5A 0A | :";HU(2,I).7.Z.|
00000E20: 99 22 1F 43 41 52 47 4F 20 20 20 20 20 3A 22 3B |.".CARGO :";|
00000E30: 43 41 28 32 2C 49 29 00 53 16 64 0A 99 22 1F 53 |CA(2,I).S.d..".S|
00000E40: 48 49 45 4C 44 53 20 20 20 3A 22 3B 53 48 28 32 |HIELDS :";SH(2|
00000E50: 2C 49 29 00 6F 16 6E 0A 99 22 1F 4C 41 53 45 52 |,I).o.n..".LASER|
00000E60: 53 20 20 20 20 3A 22 3B 4C 41 28 32 2C 49 29 00 |S :";LA(2,I).|
00000E70: 8B 16 78 0A 99 22 1F 50 41 52 54 2E 42 45 41 4D |..x..".PART.BEAM|
00000E80: 53 3A 22 3B 50 42 28 32 2C 49 29 00 A7 16 82 0A |S:";PB(2,I).....|
00000E90: 99 22 1F 4D 49 53 53 49 4C 45 53 20 20 3A 22 3B |.".MISSILES :";|
00000EA0: 4D 49 28 32 2C 49 29 00 BF 16 8C 0A 99 22 11 05 |MI(2,I)......"..|
00000EB0: 50 52 45 53 53 20 41 20 4B 45 59 2E 2E 2E 22 00 |PRESS A KEY...".|
00000EC0: D3 16 96 0A A1 43 24 3A 8B 43 24 B2 22 22 A7 32 |.....C$:.C$."".2|
00000ED0: 37 31 30 00 DA 16 A0 0A 82 49 00 E0 16 F0 0A 80 |710......I......|
00000EE0: 00 F4 16 10 27 8F 20 2A 20 48 49 54 43 48 41 4E |....'. * HITCHAN|
00000EF0: 43 45 20 2A 00 FE 16 15 27 8B 44 45 A7 8E 00 1D |CE *....'.DE....|
00000F00: 17 1A 27 48 54 B2 B5 28 BB 28 30 29 AC 28 31 30 |..'HT..(.(0).(10|
00000F10: 30 AA 45 58 28 58 2C 59 29 29 AA 31 29 00 41 17 |0.EX(X,Y)).1).A.|
00000F20: 24 27 8B 48 54 B3 B2 48 43 A7 48 54 B2 31 3A 99 |$'.HT..HC.HT.1:.|
00000F30: 22 9E 54 41 52 47 45 54 20 48 49 54 20 21 20 22 |".TARGET HIT ! "|
00000F40: 3B 00 64 17 2E 27 8B 48 54 B1 48 43 A7 48 54 B2 |;.d..'.HT.HC.HT.|
00000F50: 30 3A 99 22 9E 54 41 52 47 45 54 20 4D 49 53 53 |0:.".TARGET MISS|
00000F60: 45 44 2E 22 00 76 17 38 27 81 49 B2 30 A4 35 30 |ED.".v.8'.I.0.50|
00000F70: 30 3A 82 49 3A 8E 00 87 17 74 27 8F 20 2A 20 44 |0:.I:....t'. * D|
00000F80: 41 4D 41 47 45 20 2A 00 9F 17 79 27 81 4A B2 31 |AMAGE *...y'.J.1|
00000F90: A4 44 41 3A 81 49 B2 30 A4 35 30 30 3A 82 49 00 |.DA:.I.0.500:.I.|
00000FA0: B5 17 7B 27 8B 48 55 28 54 2C 54 41 29 B2 30 A7 |..{'.HU(T,TA).0.|
00000FB0: 31 30 32 34 30 00 F6 17 7E 27 8B 53 48 28 54 2C |10240...~'.SH(T,|
00000FC0: 54 41 29 B1 30 A7 53 48 28 54 2C 54 41 29 B2 53 |TA).0.SH(T,TA).S|
00000FD0: 48 28 54 2C 54 41 29 AB 31 3A 99 22 90 53 48 49 |H(T,TA).1:.".SHI|
00000FE0: 45 4C 44 53 20 22 3B 53 48 28 54 2C 54 41 29 3A |ELDS ";SH(T,TA):|
00000FF0: 89 31 30 32 34 30 00 09 18 88 27 51 B2 B5 28 BB |.10240....'Q..(.|
00001000: 28 30 29 AC 33 30 AA 31 29 00 25 18 8D 27 8B 51 |(0).30.1).%..'.Q|
00001010: B3 31 36 A7 8B 48 55 28 54 2C 54 41 29 B2 30 A7 |.16..HU(T,TA).0.|
00001020: 31 30 31 32 30 00 5D 18 92 27 8B 51 B3 31 36 A7 |10120.]..'.Q.16.|
00001030: 48 55 28 54 2C 54 41 29 B2 48 55 28 54 2C 54 41 |HU(T,TA).HU(T,TA|
00001040: 29 AB 31 3A 99 22 90 48 55 4C 4C 20 22 3B 48 55 |).1:.".HULL ";HU|
00001050: 28 54 2C 54 41 29 3A 89 31 30 32 34 30 00 79 18 |(T,TA):.10240.y.|
00001060: 9C 27 8B 51 B3 32 36 A7 8B 43 41 28 54 2C 54 41 |.'.Q.26..CA(T,TA|
00001070: 29 B2 30 A7 31 30 31 32 30 00 AB 18 A1 27 8B 51 |).0.10120....'.Q|
00001080: B3 32 36 A7 43 41 28 54 2C 54 41 29 B2 43 41 28 |.26.CA(T,TA).CA(|
00001090: 54 2C 54 41 29 AB 31 3A 99 22 90 43 41 52 47 4F |T,TA).1:.".CARGO|
000010A0: 20 22 3B 43 41 28 54 2C 54 41 29 00 BB 18 A3 27 | ";CA(T,TA)....'|
000010B0: 8B 51 B3 32 36 89 31 30 32 34 30 00 D7 18 A6 27 |.Q.26.10240....'|
000010C0: 8B 51 B3 32 38 A7 8B 4C 41 28 54 2C 54 41 29 B2 |.Q.28..LA(T,TA).|
000010D0: 30 A7 31 30 31 32 30 00 0A 19 AB 27 8B 51 B3 32 |0.10120....'.Q.2|
000010E0: 38 A7 20 4C 41 28 54 2C 54 41 29 B2 4C 41 28 54 |8. LA(T,TA).LA(T|
000010F0: 2C 54 41 29 AB 31 3A 99 22 90 4C 41 53 45 52 20 |,TA).1:.".LASER |
00001100: 22 3B 4C 41 28 54 2C 54 41 29 00 1A 19 AD 27 8B |";LA(T,TA)....'.|
00001110: 51 B3 32 38 A7 31 30 32 34 30 00 36 19 B0 27 8B |Q.28.10240.6..'.|
00001120: 51 B3 33 30 A7 8B 4D 49 28 54 2C 54 41 29 B2 30 |Q.30..MI(T,TA).0|
00001130: A7 31 30 31 32 30 00 6B 19 B5 27 8B 51 B3 33 30 |.10120.k..'.Q.30|
00001140: A7 20 4D 49 28 54 2C 54 41 29 B2 4D 49 28 54 2C |. MI(T,TA).MI(T,|
00001150: 54 41 29 AB 31 3A 99 22 90 4D 49 53 53 49 4C 45 |TA).1:.".MISSILE|
00001160: 20 22 3B 4D 49 28 54 2C 54 41 29 00 7B 19 B7 27 | ";MI(T,TA).{..'|
00001170: 8B 51 B3 33 30 A7 31 30 32 34 30 00 97 19 BA 27 |.Q.30.10240....'|
00001180: 8B 51 B2 33 30 A7 8B 50 42 28 54 2C 54 41 29 B2 |.Q.30..PB(T,TA).|
00001190: 30 A7 31 30 31 32 30 00 CE 19 BF 27 8B 51 B2 33 |0.10120....'.Q.3|
000011A0: 30 A7 20 50 42 28 54 2C 54 41 29 B2 50 42 28 54 |0. PB(T,TA).PB(T|
000011B0: 2C 54 41 29 AB 31 3A 99 22 90 50 41 52 54 2E 42 |,TA).1:.".PART.B|
000011C0: 45 41 4D 20 22 3B 50 42 28 54 2C 54 41 29 00 01 |EAM ";PB(T,TA)..|
000011D0: 1A 00 28 8B 48 55 28 54 2C 54 41 29 B2 30 A7 82 |..(.HU(T,TA).0..|
000011E0: 4A 3A 99 22 1F 53 48 49 50 20 44 45 53 54 52 4F |J:.".SHIP DESTRO|
000011F0: 59 45 44 22 3A 44 45 28 54 2C 54 41 29 B2 31 3A |YED":DE(T,TA).1:|
00001200: 8E 00 0A 1A 0A 28 82 4A 3A 8E 00 1E 1A F8 2A 8F |.....(.J:.....*.|
00001210: 20 2A 2A 20 52 45 54 52 45 41 54 20 2A 2A 00 3B | ** RETREAT **.;|
00001220: 1A 02 2B 8B 28 48 55 28 58 2C 59 29 AD 48 53 28 |..+.(HU(X,Y).HS(|
00001230: 58 2C 59 29 29 B3 B2 2E 32 A7 8E 00 7D 1A 0C 2B |X,Y))...2...}..+|
00001240: 8B 28 31 30 30 AB 28 28 48 55 28 58 2C 59 29 AD |.(100.((HU(X,Y).|
00001250: 48 53 28 58 2C 59 29 29 AC 31 30 30 29 29 B1 B2 |HS(X,Y)).100))..|
00001260: 52 45 28 58 2C 59 29 A7 52 45 28 58 2C 59 29 B2 |RE(X,Y).RE(X,Y).|
00001270: 39 39 39 3A 44 45 28 58 2C 59 29 B2 31 00 91 1A |999:DE(X,Y).1...|
00001280: 16 2B 8B 52 45 28 58 2C 59 29 B3 B1 39 39 39 A7 |.+.RE(X,Y)..999.|
00001290: 8E 00 A9 1A 20 2B 99 22 05 52 45 54 52 45 41 54 |.... +.".RETREAT|
000012A0: 49 4E 47 2E 2E 2E 22 3A 8E 00 00 00 |ING...":.... |
....D.. *********************.9.N.. * DO
MINATION COMBAT *.U.X.. * PROGRAM
*.Q.... * E.P. (C)'91 *......
*********************.....G.1:N.1:TU.1:Z
.0... .. MT(50),MD(50),HS(2,50).E...:.Z.
... *** SCREEN ***...... 53281,12:.53280
,6......"..COMBAT SYSTEM : .INPUT MODE".
H...."..................................
.......".O...."..INPUT COMBATTANTS..-..G
ROUP";G......"....SHIP";N...$.."...-NAME
:";NA$(G,N).E.&..NA$(G,N).""
.G.1.N.1.1000...)..NA$(G,N)."".G.1.G.2:N
.1:.1000...+..NA$(G,N)."".G.2.1200.&....
"..-HULL :";HU(G,N).:.3..HU(G
,N).1.1070.^.8.."..-CARGO :";C
A(G,N)...B.."..-SHIELDS :";SH(G,
N)...L.."..-LASERS :";LA(G,N).J
.V.."..-PARTICLE BEAMS :";PB(G,N)...`..
"..-MISSILES :";MI(G,N)...J.."..-
RETREAT% (0-100):";RE(G,N).2.T..RE(G,N).
1.RE(G,N).100.1130.F...HS(G,N).HU(G,N).M
...N.N.1:CO(G).CO(G).1:CO.CO(1).CO(2).W.
...1000......"..COMBAT SYSTEM : .ACTIVE
.TURN:";TU.Z...."................
........................."...D..".INITIA
TIVE....";...I..I.0.500:.I.&.N.X..(.(0).
G.1):Y..(.(0).CO(X).1).:.X..DE(X,Y).1.12
30.P.Z..RE(X,Y).999.1230.D....FT(X,Y).1.
1230......"GROUP";X;".";NA$(X,Y):.I.0.50
0:.I...... ** COMBAT-PROCEDURE **......X
.1.T.2.C.(..X.2.T.1...-..I.1.CO(T):.DE(T
,I)..1.C.1......I.../..C.0.2300...2.C.0:
TA..(.(0).CO(T).1).'.7..DE(T,TA).1.1330.
>.9..RE(T,TA).999.1330.^.<..".TARGET = "
;NA$(T,TA);".".{.>..11000:.RE(X,Y).999.1
700...A..LA(X,Y)..0.1400...B..TM(X,Y).0
. Z.0.1360...C.H.0:.K.1.Z...D..MT(K).TU
.. TM(X,Y)..H .. MD(K).0 . H.H.1...E..K:
.H.0.1360...F..H.0.G..".FIRING LASERS AT
INCOMING MISSILE(S)...".A.H..K.1.LA(X,Y
).S.I..H.0..K:.1400.D.J.HC.30:.10000...K
..HT..".MISSILE DESTROYED":TM(X,Y).TM(X,
Y).1:H.H.1:A.A.1:MD(A).1...L..K:H.0:.140
0...P..".FIRING";LA(X,Y);"LASERS..."...U
..K.1.LA(X,Y)...Z..DE(T,TA).1..K:.1700.'
.D.HC.60:.10000:.HT.DA.1:.10100...N..K.C
.X..PB(X,Y)..0.1500.X.}..DE(T,TA).1.1600
......".FIRING";PB(X,Y);"PARTICLE BEAM C
ANNONS..."......K.1.PB(X,Y)......DE(T,TA
).1..K:.1600.U. .HC.40:.10000:.HT.DA.6:.
10100......K......MI(X,Y).0 . DE(T,TA).1
.1600.)....".FIRING MISSILE...":MI(X,Y).
MI(X,Y).1.A...TM(T,TA).TM(T,TA).1.V...Z.
Z.1:MT(Z).TU.1.E.@.H.0:.K.1.Z...J..MT(K)
.TU .. TM(X,Y)..H .. MD(K).0.H.H.1...T..
K. .Y..H...^..H.0.1700.E.R..".MISSILE IM
PACT"...|..K.1.H:HC.80:.10000......HT.DA
.10:T.X:TA.Y:.10100.&...A.A.1:MD(A).1:TM
(X,Y).TM(X,Y).1:.K:H.0.A....I.0.1000:.I:
FT(X,Y).1.Q....I.1.CO(1):.DE(1,I).1.RE(1
,I).999.FT(1,I).1.X....I......I.1.CO(2):
.DE(2,I).1.RE(2,I).999.FT(2,I).1......I.
N....I.1.CO(1):.FT(1,I)..1.C.1.U....I...
...I.1.CO(2):.FT(2,I)..1.C.1......I.....
.C.C.0:.1200.%.B.TU.TU.1:.I.0.1000:.I.>.
L..I.1.CO(1):FT(1,I).0.E.Q..I.^.V..I.1.C
O(2):FT(2,I).0.E....I.{.... * NO WEAPONS
? *.....H.0:.I.1.CO(1)......LA(1,I).0.H.
H.1...&..PB(1,I).0.H.H.1.M.0..MI(1,I).0.
H.H.1.T.F..I...P..I.1.CO(2)...Z..LA(2,I)
.0.H.H.1......PB(2,I).0.H.H.1."....MI(2,
I).0.H.H.1.)....I.Q....H..((3.CO(1)).(3.
CO(2))).H.0:.1200.G.... * BATTLE=OVER *.
~...."..BATTLE ENDED.".F....H.((3.CO(1))
.(3.CO(2))).."..COMBATTANTS ARE ALL WEAP
ONLESS...":H.0.U....I.1.CO(1)......".SHI
P 1";I;NA$(1,I);...$..RE(1,I).999..". RE
TREATED..":.2355.A....DE(1,I).1..". DEST
ROYED..":.I:.2600.L.0..(HU(1,I).HS(1,I))
...2..". DERELICT..".U.3.." "...8..".HUL
L :";HU(1,I)...B..".CARGO :";CA
(1,I).I.L..".SHIELDS :";SH(1,I)...V.."
.LASERS :";LA(1,I)...`..".PART.BEAMS:
";PB(1,I)...J..".MISSILES :";MI(1,I).5.
T.."..PRESS A KEY...".I.~..C$:.C$."".243
0.P....I._.(..I.1.CO(2).Z.2..".SHIP 2";I
;NA$(2,I);...<..RE(2,I).999..". RETREATE
D..":.2635.K.F..DE(2,I).1..". DESTROYED.
.":.I:.2800...H..(HU(2,I).HS(2,I))...2..
". DERELICT.."...K.." "...P..".HULL
:";HU(2,I).7.Z..".CARGO :";CA(2,I).
S.D..".SHIELDS :";SH(2,I).O.N..".LASER
S :";LA(2,I)...X..".PART.BEAMS:";PB(2
,I)......".MISSILES :";MI(2,I)......"..
PRESS A KEY...".S....C$:.C$."".2710.Z. .
.I..........'. * HITCHANCE *....'.DE....
..'HT..(.(0).(100.EX(X,Y)).1).A.$'.HT..H
C.HT.1:.".TARGET HIT ! ";.D..'.HT.HC.HT.
0:.".TARGET MISSED.".V.8'.I.0.500:.I:...
.T'. * DAMAGE *...Y'.J.1.DA:.I.0.500:.I.
..{'.HU(T,TA).0.10240...~'.SH(T,TA).0.SH
(T,TA).SH(T,TA).1:.".SHIELDS ";SH(T,TA):
.10240....'Q..(.(0).30.1).%..'.Q.16..HU(
T,TA).0.10120.]..'.Q.16.HU(T,TA).HU(T,TA
).1:.".HULL ";HU(T,TA):.10240.Y..'.Q.26.
.CA(T,TA).0.10120....'.Q.26.CA(T,TA).CA(
T,TA).1:.".CARGO ";CA(T,TA)....'.Q.26.10
240.W..'.Q.28..LA(T,TA).0.10120....'.Q.2
8. LA(T,TA).LA(T,TA).1:.".LASER ";LA(T,T
A)....'.Q.28.10240.6..'.Q.30..MI(T,TA).0
.10120.K..'.Q.30. MI(T,TA).MI(T,TA).1:."
.MISSILE ";MI(T,TA).{..'.Q.30.10240....'
.Q.30..PB(T,TA).0.10120.N..'.Q.30. PB(T,
TA).PB(T,TA).1:.".PART.BEAM ";PB(T,TA)..
..(.HU(T,TA).0..J:.".SHIP DESTROYED":DE(
T,TA).1:.....(.J:.....*. ** RETREAT **.;
..+.(HU(X,Y).HS(X,Y))...2...}..+.(100.((
HU(X,Y).HS(X,Y)).100))..RE(X,Y).RE(X,Y).
999:DE(X,Y).1....+.RE(X,Y)..999..... +."
.RETREATING...":....
> CLICK IMAGE PREVIEW FOR FULL MODAL