TFCMAIN
FILE INFORMATION
FILENAME(S): TFCMAIN
FILE TYPE(S): PRG
FILE SIZE: 16K
FIRST SEEN: 2025-10-19 22:49:26
APPEARS ON: 1 disk(s)
FILE HASH
ef7a389ea347d626b359abefc661db375ce251cd20da3be7a6eefadb761f3af6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MICRO MANIAC | TFCMAIN | PRG | Radd Maxx | 26 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 00 00 89 20 31 30 30 30 30 3A 8F 20 |....... 10000:. |
00000010: 4D 41 49 4E 20 50 52 4F 47 52 41 4D 00 43 08 01 |MAIN PROGRAM.C..|
00000020: 00 8F 20 54 48 45 20 46 49 4E 41 4C 20 43 4F 4E |.. THE FINAL CON|
00000030: 46 4C 49 43 54 2C 20 43 2D 36 34 20 56 45 52 53 |FLICT, C-64 VERS|
00000040: 49 4F 4E 00 5D 08 64 00 8F 20 44 52 41 57 20 4F |ION.].d.. DRAW O|
00000050: 52 20 45 52 41 53 45 20 52 4F 42 4F 54 00 76 08 |R ERASE ROBOT.v.|
00000060: 78 00 99 A3 33 29 3B 3A 8B 20 50 B2 31 20 A7 20 |x...3);:. P.1 . |
00000070: 99 A3 32 33 29 3B 00 7C 08 79 00 8E 00 A0 08 7A |..23);.|.y.....z|
00000080: 00 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00000090: 11 11 11 11 11 11 11 11 11 22 3B 3A 89 31 32 30 |.........";:.120|
000000A0: 00 C5 08 7B 00 99 22 13 11 11 11 11 11 11 11 11 |...{..".........|
000000B0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 3B |..............";|
000000C0: 3A 89 31 32 30 00 D6 08 7C 00 8D 31 32 33 3A 99 |:.120...|..123:.|
000000D0: 22 11 22 3B 3A 8E 00 FD 08 7D 00 99 22 13 11 11 |".";:....}.."...|
000000E0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000000F0: 11 11 11 11 11 11 22 3B 3A 89 31 32 30 00 2E 09 |......";:.120...|
00000100: 82 00 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |..." |
00000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000120: 20 20 20 20 20 20 20 20 20 20 22 3B 3A 8E 00 49 | ";:..I|
00000130: 09 8C 00 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." |
00000140: 20 20 20 20 20 22 3B 3A 8E 00 5F 09 C8 00 8F 20 | ";:.._.... |
00000150: 2A 2A 2A 2A 4F 52 44 45 52 20 45 4E 54 52 59 00 |****ORDER ENTRY.|
00000160: 6D 09 D2 00 81 20 50 B2 30 20 A4 20 31 00 9E 09 |m.... P.0 . 1...|
00000170: D7 00 8B 20 4D 50 28 50 29 B3 30 20 A7 20 4D 50 |... MP(P).0 . MP|
00000180: 28 50 29 B2 4D 50 28 50 29 AA 31 3A 8B 20 4D 50 |(P).MP(P).1:. MP|
00000190: 28 50 29 B2 30 20 A7 20 8D 20 39 35 30 30 00 B2 |(P).0 . . 9500..|
000001A0: 09 D9 00 8B 20 4D 50 28 50 29 B3 30 20 A7 20 32 |.... MP(P).0 . 2|
000001B0: 39 30 00 F4 09 DC 00 8B 20 4D 50 28 50 29 B2 30 |90...... MP(P).0|
000001C0: 20 A7 20 8D 20 38 32 30 3A 20 8B 20 4D 50 28 50 | . . 820: . MP(P|
000001D0: 29 B2 30 20 A7 20 32 39 30 3A 8F 20 53 4B 49 50 |).0 . 290:. SKIP|
000001E0: 20 49 46 20 4E 4F 20 52 4F 42 4F 54 53 20 41 56 | IF NO ROBOTS AV|
000001F0: 41 49 4C 2E 00 05 0A DE 00 8B 20 4F 50 B2 31 20 |AIL....... OP.1 |
00000200: A7 20 32 33 30 00 21 0A E1 00 8B 28 28 50 B2 31 |. 230.!....((P.1|
00000210: 29 AF 28 49 B2 31 29 29 A7 20 8D 20 33 35 30 30 |).(I.1)). . 3500|
00000220: 30 00 31 0A E3 00 8B 20 50 B2 31 20 A7 20 32 39 |0.1.... P.1 . 29|
00000230: 30 00 69 0A E6 00 8B 20 4D 50 28 50 29 B2 31 20 |0.i.... MP(P).1 |
00000240: A7 20 4D 50 28 50 29 B2 32 3A 52 28 50 2C 4E 43 |. MP(P).2:R(P,NC|
00000250: 28 50 29 2C 31 29 B2 31 30 31 3A 52 28 50 2C 4E |(P),1).101:R(P,N|
00000260: 43 28 50 29 2C 32 29 B2 30 00 80 0A EB 00 52 B2 |C(P),2).0.....R.|
00000270: 52 28 50 2C 4E 43 28 50 29 2C 4D 50 28 50 29 29 |R(P,NC(P),MP(P))|
00000280: 00 A4 0A F0 00 8B 28 28 52 B2 31 30 29 B0 28 52 |......((R.10).(R|
00000290: B2 31 30 30 29 29 A7 20 8D 20 34 30 30 3A 20 89 |.100)). . 400: .|
000002A0: 20 32 39 30 00 BF 0A FA 00 8D 20 33 30 30 3A 8F | 290...... 300:.|
000002B0: 20 50 52 49 4E 54 20 41 4E 20 4F 52 44 45 52 00 | PRINT AN ORDER.|
000002C0: C7 0A 22 01 82 20 50 00 CD 0A 2B 01 8E 00 E9 0A |..".. P...+.....|
000002D0: 2C 01 8B 28 C2 28 35 36 33 32 30 AA 50 29 AF 31 |,..(.(56320.P).1|
000002E0: 35 29 B2 31 35 A7 33 31 30 00 0F 0B 2D 01 8B 28 |5).15.310...-..(|
000002F0: C2 28 35 36 33 32 30 AA 50 29 AF 31 35 29 B2 31 |.(56320.P).15).1|
00000300: 31 A7 50 44 28 50 29 B2 50 44 28 50 29 AB 31 00 |1.PD(P).PD(P).1.|
00000310: 35 0B 2E 01 8B 28 C2 28 35 36 33 32 30 AA 50 29 |5....(.(56320.P)|
00000320: AF 31 35 29 B2 37 20 A7 50 44 28 50 29 B2 50 44 |.15).7 .PD(P).PD|
00000330: 28 50 29 AA 31 00 4B 0B 36 01 8B 50 44 28 50 29 |(P).1.K.6..PD(P)|
00000340: B3 30 20 A7 50 44 28 50 29 B2 35 00 61 0B 37 01 |.0 .PD(P).5.a.7.|
00000350: 8B 50 44 28 50 29 B1 35 20 A7 50 44 28 50 29 B2 |.PD(P).5 .PD(P).|
00000360: 30 00 98 0B 40 01 50 44 B2 50 44 28 50 29 3A 8D |0...@.PD.PD(P):.|
00000370: 31 32 35 3A 99 4F 44 24 28 50 44 29 3B 3A 20 8B |125:.OD$(PD);: .|
00000380: 28 C2 28 35 36 33 32 30 AA 50 29 AF 31 36 29 B2 |(.(56320.P).16).|
00000390: 30 20 A7 20 8D 36 30 30 00 9E 0B 8F 01 8E 00 BA |0 . .600........|
000003A0: 0B 90 01 8B 28 C2 28 35 36 33 32 30 AA 50 29 AF |....(.(56320.P).|
000003B0: 31 35 29 B2 31 35 A7 34 31 30 00 E0 0B 91 01 8B |15).15.410......|
000003C0: 28 C2 28 35 36 33 32 30 AA 50 29 AF 31 35 29 B2 |(.(56320.P).15).|
000003D0: 31 31 A7 50 58 28 50 29 B2 50 58 28 50 29 AB 31 |11.PX(P).PX(P).1|
000003E0: 00 06 0C 92 01 8B 28 C2 28 35 36 33 32 30 AA 50 |......(.(56320.P|
000003F0: 29 AF 31 35 29 B2 37 20 A7 50 58 28 50 29 B2 50 |).15).7 .PX(P).P|
00000400: 58 28 50 29 AA 31 00 1C 0C 9A 01 8B 50 58 28 50 |X(P).1......PX(P|
00000410: 29 B3 30 20 A7 50 58 28 50 29 B2 39 00 32 0C 9B |).0 .PX(P).9.2..|
00000420: 01 8B 50 58 28 50 29 B1 39 20 A7 50 58 28 50 29 |..PX(P).9 .PX(P)|
00000430: B2 30 00 51 0C A4 01 50 44 B2 50 58 28 50 29 3A |.0.Q...PD.PX(P):|
00000440: 8D 31 32 35 3A 99 22 1D 1D 1D 1D 1D 22 3B 50 44 |.125:.".....";PD|
00000450: 3B 00 6E 0C A5 01 8B 28 C2 28 35 36 33 32 30 AA |;.n....(.(56320.|
00000460: 50 29 AF 31 36 29 B2 30 20 A7 8D 35 30 30 00 74 |P).16).0 ..500.t|
00000470: 0C F3 01 8E 00 96 0C F4 01 8F 2A 2A 2A 41 43 43 |..........***ACC|
00000480: 45 50 54 20 4D 4F 56 45 20 4F 52 20 57 41 49 54 |EPT MOVE OR WAIT|
00000490: 20 56 41 4C 55 45 00 AE 0C FE 01 8B 20 52 B2 31 | VALUE...... R.1|
000004A0: 30 20 A7 20 41 24 B2 22 57 41 49 54 20 22 00 C7 |0 . A$."WAIT "..|
000004B0: 0C 08 02 8B 20 52 B2 31 30 30 20 A7 20 41 24 B2 |.... R.100 . A$.|
000004C0: 22 4D 4F 56 45 20 22 00 F4 0C 12 02 8D 31 32 34 |"MOVE "......124|
000004D0: 3A 8D 31 34 30 3A 8D 31 32 34 3A 99 4D 50 28 50 |:.140:.124:.MP(P|
000004E0: 29 AB 31 3B 41 24 3B 50 44 3B 3A 8D 31 32 35 3A |).1;A$;PD;:.125:|
000004F0: 8D 31 34 30 00 0E 0D 26 02 52 28 50 2C 4E 43 28 |.140...&.R(P,NC(|
00000500: 50 29 2C 4D 50 28 50 29 29 B2 52 AA 50 44 00 33 |P),MP(P)).R.PD.3|
00000510: 0D 30 02 4D 50 28 50 29 B2 4D 50 28 50 29 AA 31 |.0.MP(P).MP(P).1|
00000520: 3A 52 28 50 2C 4E 43 28 50 29 2C 4D 50 28 50 29 |:R(P,NC(P),MP(P)|
00000530: 29 B2 30 00 3D 0D 3A 02 89 20 36 37 30 00 55 0D |).0.=.:.. 670.U.|
00000540: 58 02 8F 2A 2A 2A 41 43 43 45 50 54 20 41 4E 20 |X..***ACCEPT AN |
00000550: 4F 52 44 45 52 00 90 0D 67 02 8B 20 50 44 B2 32 |ORDER...g.. PD.2|
00000560: 20 A7 20 8D 20 31 32 35 3A 99 20 22 12 4D 4F 56 | . . 125:. ".MOV|
00000570: 45 20 92 22 3B 3A 52 28 50 2C 4E 43 28 50 29 2C |E .";:R(P,NC(P),|
00000580: 4D 50 28 50 29 29 B2 31 30 30 3A 89 20 36 38 30 |MP(P)).100:. 680|
00000590: 00 C9 0D 68 02 8B 20 50 44 B2 33 20 A7 20 8D 31 |...h.. PD.3 . .1|
000005A0: 32 35 3A 99 22 12 57 41 49 54 20 92 22 3B 3A 52 |25:.".WAIT .";:R|
000005B0: 28 50 2C 4E 43 28 50 29 2C 4D 50 28 50 29 29 B2 |(P,NC(P),MP(P)).|
000005C0: 31 30 3A 20 89 20 36 38 30 00 F8 0D 76 02 8D 31 |10: . 680...v..1|
000005D0: 32 34 3A 8D 31 34 30 3A 8D 31 32 34 3A 99 20 4D |24:.140:.124:. M|
000005E0: 50 28 50 29 AB 31 3B 4F 44 24 28 50 44 29 3A 8D |P(P).1;OD$(PD):.|
000005F0: 31 32 35 3A 8D 31 34 30 00 09 0E 80 02 8B 28 50 |125:.140......(P|
00000600: 44 B2 35 29 89 20 36 36 32 00 54 0E 82 02 52 28 |D.5). 662.T...R(|
00000610: 50 2C 4E 43 28 50 29 2C 4D 50 28 50 29 29 B2 4F |P,NC(P),MP(P)).O|
00000620: 44 28 50 44 29 3A 20 8B 20 4D 50 28 50 29 B3 32 |D(PD): . MP(P).2|
00000630: 31 20 A7 20 4D 50 28 50 29 B2 4D 50 28 50 29 AA |1 . MP(P).MP(P).|
00000640: 31 3A 52 28 50 2C 4E 43 28 50 29 2C 4D 50 28 50 |1:R(P,NC(P),MP(P|
00000650: 29 29 B2 30 00 71 0E 8A 02 8B 20 50 44 B2 34 20 |)).0.q.... PD.4 |
00000660: A7 20 8D 20 38 30 30 3A 8F 20 52 45 4C 45 41 53 |. . 800:. RELEAS|
00000670: 45 00 7B 0E 95 02 89 20 36 37 30 00 A1 0E 96 02 |E.{.... 670.....|
00000680: 4D 50 28 50 29 B2 4D 50 28 50 29 AB 31 3A 20 52 |MP(P).MP(P).1: R|
00000690: 28 50 2C 4E 43 28 50 29 2C 4D 50 28 50 29 29 B2 |(P,NC(P),MP(P)).|
000006A0: 30 00 CB 0E 97 02 8B 20 4D 50 28 50 29 B3 32 20 |0...... MP(P).2 |
000006B0: A7 20 4D 50 28 50 29 B2 32 3A 20 52 28 50 2C 4E |. MP(P).2: R(P,N|
000006C0: 43 28 50 29 2C 31 29 B2 31 30 31 00 E7 0E 9E 02 |C(P),1).101.....|
000006D0: 8B 20 4D 50 28 50 29 B2 32 31 20 A7 20 50 44 B2 |. MP(P).21 . PD.|
000006E0: 34 3A 89 20 36 33 30 00 03 0F A8 02 8B 28 C2 28 |4:. 630......(.(|
000006F0: 35 36 33 32 30 AA 50 29 AF 31 36 29 B2 30 20 A7 |56320.P).16).0 .|
00000700: 36 38 30 00 09 0F BB 02 8E 00 1D 0F 20 03 8F 20 |680......... .. |
00000710: 52 45 4C 45 41 53 45 20 52 4F 42 4F 54 00 41 0F |RELEASE ROBOT.A.|
00000720: 2A 03 52 28 50 2C 4E 43 28 50 29 2C 30 29 B2 31 |*.R(P,NC(P),0).1|
00000730: 3A 48 28 50 2C 4E 43 28 50 29 29 B2 34 AB 32 AC |:H(P,NC(P)).4.2.|
00000740: 50 00 56 0F 2F 03 8D 20 39 32 30 3A 8F 20 41 52 |P.V./.. 920:. AR|
00000750: 50 45 47 47 49 4F 00 6E 0F 34 03 8F 20 46 49 4E |PEGGIO.n.4.. FIN|
00000760: 44 20 55 4E 55 53 45 44 20 52 4F 42 4F 54 00 76 |D UNUSED ROBOT.v|
00000770: 0F 3E 03 4E B2 31 00 8F 0F 48 03 8B 20 52 28 50 |.>.N.1...H.. R(P|
00000780: 2C 4E 2C 30 29 B3 30 20 A7 20 89 20 38 34 32 00 |,N,0).0 . . 842.|
00000790: 99 0F 49 03 89 20 38 35 30 00 DB 0F 4A 03 4D 50 |..I.. 850...J.MP|
000007A0: 28 50 29 B2 31 3A 48 28 50 2C 4E 29 B2 34 AB 50 |(P).1:H(P,N).4.P|
000007B0: AC 32 3A 4E 43 28 50 29 B2 4E 3A 58 28 50 2C 4E |.2:NC(P).N:X(P,N|
000007C0: 29 B2 58 42 28 50 29 3A 59 28 50 2C 4E 29 B2 59 |).XB(P):Y(P,N).Y|
000007D0: 42 28 50 29 3A 20 89 20 38 39 39 00 F2 0F 52 03 |B(P): . 899...R.|
000007E0: 4E B2 4E AA 31 3A 8B 20 4E B3 31 31 20 A7 20 38 |N.N.1:. N.11 . 8|
000007F0: 34 30 00 FE 0F 5C 03 4D 50 28 50 29 B2 30 00 04 |40...\.MP(P).0..|
00000800: 10 83 03 8E 00 15 10 84 03 8F 20 2A 2A 2A 2A 53 |.......... ****S|
00000810: 4F 55 4E 44 53 00 3B 10 85 03 53 34 B2 31 36 3A |OUNDS.;...S4.16:|
00000820: 53 35 B2 30 3A 53 36 B2 32 34 30 3A 53 41 B2 31 |S5.0:S6.240:SA.1|
00000830: 30 3A 53 44 B2 31 3A 89 39 30 33 00 7F 10 86 03 |0:SD.1:.903.....|
00000840: 53 31 B2 34 30 3A 53 35 B2 30 3A 53 36 B2 32 34 |S1.40:S5.0:S6.24|
00000850: 30 3A 53 34 B2 31 32 38 3A 53 41 B2 31 30 3A 53 |0:S4.128:SA.10:S|
00000860: 44 B2 30 3A 8D 35 34 30 30 30 3A 53 31 B2 31 30 |D.0:.54000:S1.10|
00000870: 3A 89 20 35 34 30 30 30 3A 8F 20 54 59 50 45 00 |:. 54000:. TYPE.|
00000880: B2 10 87 03 81 4A 32 B2 30 A4 33 3A 53 31 B2 32 |.....J2.0.3:S1.2|
00000890: 35 3A 8D 35 34 30 30 30 3A 53 31 B2 32 30 3A 8D |5:.54000:S1.20:.|
000008A0: 35 34 30 30 30 3A 82 3A 8E 3A 8F 20 50 52 4F 4D |54000:.:.:. PROM|
000008B0: 50 54 00 E4 10 8C 03 81 4A 32 B2 30 A4 33 3A 8D |PT......J2.0.3:.|
000008C0: 39 33 38 3A 81 4A 31 B2 30 A4 34 30 3A 82 3A 82 |938:.J1.0.40:.:.|
000008D0: 3A 8E 3A 8F 20 42 41 54 54 4C 45 20 53 54 41 54 |:.:. BATTLE STAT|
000008E0: 49 4F 4E 53 00 27 11 8F 03 53 31 B2 31 3A 53 35 |IONS.'...S1.1:S5|
000008F0: B2 31 30 3A 53 36 B2 32 35 31 3A 53 34 B2 31 32 |.10:S6.251:S4.12|
00000900: 38 3A 53 41 B2 32 30 30 3A 53 44 B2 39 39 39 3A |8:SA.200:SD.999:|
00000910: 89 35 34 30 30 30 3A 8F 20 42 41 53 45 20 45 58 |.54000:. BASE EX|
00000920: 50 4C 4F 53 49 4F 4E 00 46 11 91 03 8D 39 30 38 |PLOSION.F....908|
00000930: 3A 89 39 31 31 3A 8F 20 44 45 54 4F 4E 41 54 45 |:.911:. DETONATE|
00000940: 20 52 4F 42 4F 54 00 7A 11 92 03 53 34 B2 33 32 | ROBOT.z...S4.32|
00000950: 3A 53 35 B2 30 3A 53 36 B2 32 34 30 3A 53 41 B2 |:S5.0:S6.240:SA.|
00000960: 31 30 3A 53 44 B2 31 3A 8F 20 44 45 41 43 54 49 |10:SD.1:. DEACTI|
00000970: 56 41 54 45 20 52 4F 42 4F 54 00 A9 11 93 03 81 |VATE ROBOT......|
00000980: 4A 32 B2 38 30 A4 32 30 A9 AB 31 30 3A 81 53 31 |J2.80.20..10:.S1|
00000990: B2 4A 32 A4 4A 32 AB 32 30 A9 AB 34 3A 8D 35 34 |.J2.J2.20..4:.54|
000009A0: 30 30 30 3A 82 3A 82 3A 8E 00 C9 11 94 03 53 35 |000:.:.:......S5|
000009B0: B2 35 3A 53 36 B2 35 3A 53 34 B2 31 36 3A 53 41 |.5:S6.5:S4.16:SA|
000009C0: B2 32 30 3A 53 44 B2 32 30 00 F9 11 95 03 81 53 |.20:SD.20......S|
000009D0: 31 B2 34 30 A4 35 A9 AB 32 3A 8D 35 34 30 30 30 |1.40.5..2:.54000|
000009E0: 3A 81 4A 31 B2 31 A4 32 30 3A 82 3A 82 3A 8E 3A |:.J1.1.20:.:.:.:|
000009F0: 8F 20 53 49 4E 4B 49 4E 47 00 18 12 96 03 53 31 |. SINKING.....S1|
00000A00: B2 34 30 3A 53 34 B2 31 32 38 3A 89 39 32 38 3A |.40:S4.128:.928:|
00000A10: 8F 20 52 41 54 54 4C 45 00 34 12 97 03 81 4A 32 |. RATTLE.4....J2|
00000A20: B2 30 A4 31 3A 8D 39 32 35 3A 82 3A 97 53 AA 31 |.0.1:.925:.:.S.1|
00000A30: 2C 30 3A 8E 00 6C 12 98 03 53 34 B2 33 32 3A 53 |,0:..l...S4.32:S|
00000A40: 35 B2 30 3A 53 36 B2 32 34 30 3A 53 41 B2 31 30 |5.0:S6.240:SA.10|
00000A50: 3A 53 44 B2 31 3A 81 53 31 B2 32 30 A4 31 30 30 |:SD.1:.S1.20.100|
00000A60: A9 32 30 3A 8D 35 34 30 30 30 3A 82 00 A3 12 99 |.20:.54000:.....|
00000A70: 03 81 53 31 B2 31 30 30 A4 32 30 A9 AB 32 30 3A |..S1.100.20..20:|
00000A80: 8D 35 34 30 30 30 3A 82 3A 8E 3A 8F 20 52 45 4C |.54000:.:.:. REL|
00000A90: 45 41 53 45 20 52 4F 42 4F 54 20 41 52 50 45 47 |EASE ROBOT ARPEG|
00000AA0: 47 49 4F 00 C8 12 9A 03 53 31 B2 31 30 3A 53 34 |GIO.....S1.10:S4|
00000AB0: B2 33 32 3A 89 20 39 32 38 3A 8F 20 52 4F 54 41 |.32:. 928:. ROTA|
00000AC0: 54 45 20 52 4F 42 4F 54 00 ED 12 9B 03 53 31 B2 |TE ROBOT.....S1.|
00000AD0: 33 30 3A 53 34 B2 33 32 3A 89 20 39 32 38 3A 8F |30:S4.32:. 928:.|
00000AE0: 20 52 4F 54 41 54 45 20 52 4F 42 4F 54 00 23 13 | ROTATE ROBOT.#.|
00000AF0: 9D 03 53 34 B2 31 32 38 3A 53 35 B2 30 3A 53 36 |..S4.128:S5.0:S6|
00000B00: B2 31 32 38 3A 53 41 B2 31 3A 53 44 B2 31 3A 53 |.128:SA.1:SD.1:S|
00000B10: 31 B2 30 3A 8D 35 34 30 30 30 3A 97 53 AA 34 2C |1.0:.54000:.S.4,|
00000B20: 31 32 39 00 3D 13 9E 03 81 53 31 B2 31 30 A4 31 |129.=....S1.10.1|
00000B30: 35 3A 97 53 AA 31 2C 53 31 3A 82 3A 8E 00 46 13 |5:.S.1,S1:.:..F.|
00000B40: A0 03 8D 39 32 39 00 7E 13 A1 03 53 35 B2 30 3A |...929.~...S5.0:|
00000B50: 53 36 B2 32 34 30 3A 53 41 B2 35 3A 53 44 B2 35 |S6.240:SA.5:SD.5|
00000B60: 3A 8D 35 34 30 30 30 3A 53 31 B2 53 31 AA 31 30 |:.54000:S1.S1.10|
00000B70: 3A 89 20 35 34 30 30 30 3A 8F 20 39 31 39 00 B4 |:. 54000:. 919..|
00000B80: 13 AA 03 53 31 B2 30 3A 53 35 B2 30 3A 53 36 B2 |...S1.0:S5.0:S6.|
00000B90: 32 34 30 3A 53 34 B2 33 32 3A 53 41 B2 31 3A 53 |240:S4.32:SA.1:S|
00000BA0: 44 B2 31 3A 8D 35 34 30 30 30 3A 97 53 AA 34 2C |D.1:.54000:.S.4,|
00000BB0: 53 34 AA 31 00 DE 13 AB 03 81 53 31 B2 32 30 A4 |S4.1......S1.20.|
00000BC0: 31 30 30 3A 97 53 AA 31 2C 53 31 3A 82 3A 97 53 |100:.S.1,S1:.:.S|
00000BD0: AA 31 2C 30 3A 8E 3A 8F 20 57 48 4F 4F 50 00 06 |.1,0:.:. WHOOP..|
00000BE0: 14 E8 03 8F 20 2A 2A 2A 2A 4F 52 44 45 52 20 45 |.... ****ORDER E|
00000BF0: 58 45 43 55 54 49 4F 4E 20 46 4F 52 20 50 4C 41 |XECUTION FOR PLA|
00000C00: 59 45 52 20 50 4C 00 17 14 4C 04 81 20 4E 20 B2 |YER PL...L.. N .|
00000C10: 20 31 20 A4 20 31 30 00 28 14 56 04 52 50 B2 52 | 1 . 10.(.V.RP.R|
00000C20: 28 50 4C 2C 4E 2C 30 29 00 47 14 60 04 8B 20 52 |(PL,N,0).G.`.. R|
00000C30: 50 B3 30 20 A7 20 31 39 30 30 3A 20 8F 20 4E 4F |P.0 . 1900: . NO|
00000C40: 20 4F 52 44 45 52 53 00 58 14 6A 04 52 B2 52 28 | ORDERS.X.j.R.R(|
00000C50: 50 4C 2C 4E 2C 52 50 29 00 7D 14 B0 04 8B 20 52 |PL,N,RP).}.... R|
00000C60: B2 30 20 A7 20 8D 20 32 30 30 30 3A 8F 20 47 45 |.0 . . 2000:. GE|
00000C70: 54 20 52 41 4E 44 4F 4D 20 4D 4F 56 45 00 A8 14 |T RANDOM MOVE...|
00000C80: BA 04 8B 20 52 B1 31 30 30 20 A7 20 8D 20 33 30 |... R.100 . . 30|
00000C90: 30 30 3A 20 89 20 31 39 30 30 3A 20 8F 20 4D 4F |00: . 1900: . MO|
00000CA0: 56 45 20 41 48 45 41 44 00 CB 14 C4 04 8B 20 52 |VE AHEAD...... R|
00000CB0: B1 31 30 20 A7 20 8D 20 34 30 30 30 3A 20 89 20 |.10 . . 4000: . |
00000CC0: 31 39 30 30 3A 8F 20 57 41 49 54 00 F0 14 CE 04 |1900:. WAIT.....|
00000CD0: 8B 20 52 B3 31 30 20 A7 20 8D 20 35 30 30 30 3A |. R.10 . . 5000:|
00000CE0: 20 89 20 31 39 30 30 3A 8F 20 52 4F 54 41 54 45 | . 1900:. ROTATE|
00000CF0: 00 FF 14 D8 04 90 3A 20 8F 20 45 52 52 4F 52 00 |......: . ERROR.|
00000D00: 07 15 6C 07 82 20 4E 00 0D 15 CF 07 8E 00 2C 15 |..l.. N.......,.|
00000D10: D0 07 8F 20 2A 2A 2A 20 47 45 4E 45 52 41 54 45 |... *** GENERATE|
00000D20: 20 52 41 4E 44 4F 4D 20 4D 4F 56 45 00 5A 15 34 | RANDOM MOVE.Z.4|
00000D30: 08 8B 20 52 50 B2 31 20 A7 20 52 50 B2 32 3A 20 |.. RP.1 . RP.2: |
00000D40: 52 28 50 4C 2C 4E 2C 30 29 B2 52 50 3A 20 52 28 |R(PL,N,0).RP: R(|
00000D50: 50 4C 2C 4E 2C 52 50 29 B2 30 00 76 15 39 08 52 |PL,N,RP).0.v.9.R|
00000D60: 28 50 4C 2C 4E 2C 30 29 B2 52 50 AB 31 3A 20 52 |(PL,N,0).RP.1: R|
00000D70: 50 B2 52 50 AB 31 00 A7 15 3E 08 8B 20 BB 28 52 |P.RP.1...>.. .(R|
00000D80: 50 29 B3 2E 34 20 A7 20 52 B2 B4 28 31 AB 32 AC |P)..4 . R..(1.2.|
00000D90: BB 28 52 50 29 29 3A 20 89 20 32 39 39 39 3A 8F |.(RP)): . 2999:.|
00000DA0: 20 52 4F 54 41 54 45 00 D9 15 48 08 8B 20 BB 28 | ROTATE...H.. .(|
00000DB0: 52 50 29 B3 2E 37 20 A7 20 52 B2 31 30 31 AA B5 |RP)..7 . R.101..|
00000DC0: 28 39 AC BB 28 52 50 29 AE 32 29 3A 89 20 32 39 |(9..(RP).2):. 29|
00000DD0: 39 39 3A 8F 20 4D 4F 56 45 00 FF 15 52 08 52 B2 |99:. MOVE...R.R.|
00000DE0: 31 31 AA B5 28 39 AC BB 28 52 50 29 AE 32 29 3A |11..(9..(RP).2):|
00000DF0: 20 89 20 32 39 39 39 3A 20 8F 20 57 41 49 54 00 | . 2999: . WAIT.|
00000E00: 05 16 B7 0B 8E 00 1A 16 B8 0B 8F 20 2A 2A 2A 20 |........... *** |
00000E10: 4D 4F 56 45 20 41 48 45 41 44 00 31 16 C2 0B 52 |MOVE AHEAD.1...R|
00000E20: B2 52 AB 31 3A 52 28 50 4C 2C 4E 2C 52 50 29 B2 |.R.1:R(PL,N,RP).|
00000E30: 52 00 77 16 C3 0B 8B 20 52 B2 31 30 30 20 A7 20 |R.w.... R.100 . |
00000E40: 52 28 50 4C 2C 4E 2C 30 29 B2 52 50 AA 31 3A 52 |R(PL,N,0).RP.1:R|
00000E50: 28 50 4C 2C 4E 2C 52 50 29 B2 30 3A 8F 20 44 45 |(PL,N,RP).0:. DE|
00000E60: 43 52 45 4D 45 4E 54 4D 4F 56 45 4D 45 4E 54 20 |CREMENTMOVEMENT |
00000E70: 43 4F 4D 4D 41 4E 44 00 A4 16 CC 0B 8D 20 33 31 |COMMAND...... 31|
00000E80: 30 30 3A 20 8F 20 43 41 4C 43 55 4C 41 54 45 20 |00: . CALCULATE |
00000E90: 4E 45 57 20 50 4F 53 49 54 49 4F 4E 20 28 58 31 |NEW POSITION (X1|
00000EA0: 2C 59 31 29 00 E0 16 D6 0B 8B 28 28 58 30 B2 58 |,Y1)......((X0.X|
00000EB0: 42 28 50 4C 29 29 AF 28 59 30 B2 59 42 28 50 4C |B(PL)).(Y0.YB(PL|
00000EC0: 29 29 29 A7 20 8D 20 33 35 30 30 3A 20 89 20 33 |))). . 3500: . 3|
00000ED0: 30 39 39 3A 8F 20 4C 45 41 56 45 20 42 41 53 45 |099:. LEAVE BASE|
00000EE0: 00 20 17 E0 0B 8B 20 54 52 28 58 31 2C 59 31 29 |. .... TR(X1,Y1)|
00000EF0: B1 30 20 A7 20 8D 20 33 32 30 30 3A 20 89 20 33 |.0 . . 3200: . 3|
00000F00: 30 36 30 3A 20 8F 20 54 41 52 47 45 54 20 53 51 |060: . TARGET SQ|
00000F10: 55 41 52 45 20 49 53 20 4F 43 43 55 50 49 45 44 |UARE IS OCCUPIED|
00000F20: 00 62 17 EA 0B 91 20 54 28 58 31 2C 59 31 29 8D |.b.... T(X1,Y1).|
00000F30: 20 36 31 30 30 2C 36 32 30 30 2C 36 33 30 30 2C | 6100,6200,6300,|
00000F40: 36 34 30 30 2C 36 35 30 30 2C 36 36 30 30 2C 36 |6400,6500,6600,6|
00000F50: 37 30 30 2C 36 38 30 30 2C 36 39 30 30 2C 37 30 |700,6800,6900,70|
00000F60: 30 30 00 81 17 EB 0B 8F 20 54 45 52 52 41 49 4E |00...... TERRAIN|
00000F70: 2D 44 45 50 45 4E 44 45 4E 54 20 53 55 42 52 27 |-DEPENDENT SUBR'|
00000F80: 53 00 9D 17 F4 0B 8B 20 54 52 28 58 30 2C 59 30 |S...... TR(X0,Y0|
00000F90: 29 B3 B1 30 20 A7 20 89 20 33 30 39 39 00 AB 17 |)..0 . . 3099...|
00000FA0: F5 0B 58 B2 58 30 3A 59 B2 59 30 00 F5 17 F6 0B |..X.X0:Y.Y0.....|
00000FB0: 91 54 28 58 30 2C 59 30 29 8D 31 36 31 30 30 2C |.T(X0,Y0).16100,|
00000FC0: 31 36 32 30 30 2C 31 36 33 30 30 2C 31 36 34 30 |16200,16300,1640|
00000FD0: 30 2C 31 36 35 30 30 2C 31 36 36 30 30 2C 31 36 |0,16500,16600,16|
00000FE0: 37 30 30 2C 31 36 38 30 30 2C 31 36 39 30 30 2C |700,16800,16900,|
00000FF0: 31 37 30 30 30 00 14 18 F7 0B 8F 20 52 45 53 54 |17000...... REST|
00001000: 4F 52 45 20 50 52 45 56 49 4F 55 53 20 54 45 52 |ORE PREVIOUS TER|
00001010: 52 41 49 4E 00 1A 18 1B 0C 8E 00 43 18 1C 0C 8F |RAIN.......C....|
00001020: 20 2A 2A 2A 43 41 4C 43 55 4C 41 54 45 20 46 52 | ***CALCULATE FR|
00001030: 4F 4D 20 41 4E 44 20 54 4F 20 50 4F 53 49 54 49 |OM AND TO POSITI|
00001040: 4F 4E 53 00 67 18 26 0C 58 30 B2 58 28 50 4C 2C |ONS.g.&.X0.X(PL,|
00001050: 4E 29 3A 59 30 B2 59 28 50 4C 2C 4E 29 3A 48 B2 |N):Y0.Y(PL,N):H.|
00001060: 48 28 50 4C 2C 4E 29 00 87 18 30 0C 8B 20 48 B2 |H(PL,N)...0.. H.|
00001070: 31 20 A7 20 58 31 B2 58 30 AA 31 3A 59 31 B2 59 |1 . X1.X0.1:Y1.Y|
00001080: 30 3A 89 33 31 36 30 00 A7 18 3A 0C 8B 20 48 B2 |0:.3160...:.. H.|
00001090: 32 20 A7 20 58 31 B2 58 30 3A 59 31 B2 59 30 AA |2 . X1.X0:Y1.Y0.|
000010A0: 31 3A 89 33 31 36 30 00 C7 18 44 0C 8B 20 48 B2 |1:.3160...D.. H.|
000010B0: 33 20 A7 20 58 31 B2 58 30 AB 31 3A 59 31 B2 59 |3 . X1.X0.1:Y1.Y|
000010C0: 30 3A 89 33 31 36 30 00 E7 18 4E 0C 8B 20 48 B2 |0:.3160...N.. H.|
000010D0: 34 20 A7 20 58 31 B2 58 30 3A 59 31 B2 59 30 AB |4 . X1.X0:Y1.Y0.|
000010E0: 31 3A 89 33 31 36 30 00 F5 18 53 0C 90 3A 8F 20 |1:.3160...S..:. |
000010F0: 45 52 52 4F 52 00 03 19 58 0C 58 B2 58 30 3A 59 |ERROR...X.X.X0:Y|
00001100: B2 59 30 00 09 19 7F 0C 8E 00 2B 19 80 0C 8F 2A |.Y0.......+....*|
00001110: 2A 20 54 41 52 47 45 54 20 53 51 55 41 52 45 20 |* TARGET SQUARE |
00001120: 49 53 20 4F 43 43 55 50 49 45 44 00 42 19 8A 0C |IS OCCUPIED.B...|
00001130: 50 54 B2 B5 28 54 52 28 58 31 2C 59 31 29 AD 31 |PT..(TR(X1,Y1).1|
00001140: 31 29 00 56 19 94 0C 8B 20 50 54 B3 B1 50 4C 20 |1).V.... PT..PL |
00001150: A7 20 33 32 35 30 00 81 19 9E 0C 8D 20 38 34 30 |. 3250...... 840|
00001160: 30 3A 20 8F 20 57 41 49 54 20 54 4F 20 41 56 4F |0: . WAIT TO AVO|
00001170: 49 44 20 46 52 49 45 4E 44 4C 59 20 52 4F 42 4F |ID FRIENDLY ROBO|
00001180: 54 00 8C 19 AD 0C 89 20 33 32 39 39 00 AF 19 B2 |T...... 3299....|
00001190: 0C 8D 20 38 31 30 30 3A 8F 20 44 45 54 4F 4E 41 |.. 8100:. DETONA|
000011A0: 54 45 20 4D 4F 56 49 4E 47 20 52 4F 42 4F 54 00 |TE MOVING ROBOT.|
000011B0: D3 19 BC 0C 8D 20 38 31 31 30 3A 20 8F 20 44 45 |..... 8110: . DE|
000011C0: 54 4F 4E 41 54 45 20 54 41 52 47 45 54 20 52 4F |TONATE TARGET RO|
000011D0: 42 4F 54 00 D9 19 E3 0C 8E 00 F4 19 AC 0D 8F 2A |BOT............*|
000011E0: 2A 20 4D 4F 56 49 4E 47 20 4F 55 54 20 4F 46 20 |* MOVING OUT OF |
000011F0: 42 41 53 45 00 32 1A B6 0D 8B 20 54 28 58 31 2C |BASE.2.... T(X1,|
00001200: 59 31 29 B2 35 20 A7 20 8D 20 38 33 35 30 3A 20 |Y1).5 . . 8350: |
00001210: 89 20 33 35 39 39 3A 20 8F 20 43 4F 4C 4C 49 53 |. 3599: . COLLIS|
00001220: 49 4F 4E 20 57 49 54 48 20 53 45 43 4F 4E 44 41 |ION WITH SECONDA|
00001230: 52 59 00 4A 1A B7 0D 8F 20 42 41 53 45 20 28 44 |RY.J.... BASE (D|
00001240: 45 41 43 54 49 56 41 54 45 29 00 63 1A BB 0D 8B |EACTIVATE).c....|
00001250: 20 54 52 28 58 31 2C 59 31 29 B2 30 20 A7 20 33 | TR(X1,Y1).0 . 3|
00001260: 35 36 30 00 88 1A C0 0D 8D 20 38 34 30 30 3A 20 |560...... 8400: |
00001270: 8F 20 41 56 4F 49 44 20 43 4F 4C 4C 2E 20 42 59 |. AVOID COLL. BY|
00001280: 20 57 41 49 54 49 4E 47 00 93 1A DE 0D 89 20 33 | WAITING...... 3|
00001290: 35 39 39 00 D4 1A E8 0D 58 28 50 4C 2C 4E 29 B2 |599.....X(PL,N).|
000012A0: 58 31 3A 59 28 50 4C 2C 4E 29 B2 59 31 3A 54 52 |X1:Y(PL,N).Y1:TR|
000012B0: 28 58 31 2C 59 31 29 B2 31 30 AC 50 4C AA 4E 3A |(X1,Y1).10.PL.N:|
000012C0: 8F 20 4D 4F 56 45 20 54 4F 20 4E 45 57 20 53 51 |. MOVE TO NEW SQ|
000012D0: 55 41 52 45 00 07 1B F2 0D 58 B2 58 31 3A 59 B2 |UARE.....X.X1:Y.|
000012E0: 59 31 3A 20 8D 20 31 38 30 30 30 3A 20 8F 20 44 |Y1: . 18000: . D|
000012F0: 52 41 57 20 52 4F 42 4F 54 20 49 4E 20 4E 45 57 |RAW ROBOT IN NEW|
00001300: 20 53 51 55 41 52 45 00 0D 1B 0F 0E 8E 00 13 1B | SQUARE.........|
00001310: 9F 0F 8E 00 22 1B A0 0F 8F 20 2A 2A 2A 20 57 41 |....".... *** WA|
00001320: 49 54 00 5E 1B 04 10 52 B2 52 AB 31 3A 52 28 50 |IT.^...R.R.1:R(P|
00001330: 4C 2C 4E 2C 52 50 29 B2 52 3A 8B 20 52 B2 31 30 |L,N,RP).R:. R.10|
00001340: 20 A7 20 52 28 50 4C 2C 4E 2C 30 29 B2 52 50 AA | . R(PL,N,0).RP.|
00001350: 31 3A 52 28 50 4C 2C 4E 2C 52 50 29 B2 30 00 64 |1:R(PL,N,RP).0.d|
00001360: 1B 87 13 8E 00 83 1B 88 13 8F 20 2A 2A 2A 20 52 |.......... *** R|
00001370: 4F 54 41 54 45 20 52 49 47 48 54 20 4F 52 20 4C |OTATE RIGHT OR L|
00001380: 45 46 54 00 9A 1B EC 13 48 30 B2 48 28 50 4C 2C |EFT.....H0.H(PL,|
00001390: 4E 29 3A 48 31 B2 52 AA 48 30 00 AC 1B F6 13 8B |N):H1.R.H0......|
000013A0: 20 48 31 B2 30 20 A7 20 48 31 B2 34 00 BE 1B 00 | H1.0 . H1.4....|
000013B0: 14 8B 20 48 31 B2 35 20 A7 20 48 31 B2 31 00 DC |.. H1.5 . H1.1..|
000013C0: 1B 0A 14 8B 28 28 48 31 B3 31 29 B0 28 48 31 B1 |....((H1.1).(H1.|
000013D0: 34 29 29 A7 20 90 3A 8F 20 45 52 52 00 F9 1B 50 |4)). .:. ERR...P|
000013E0: 14 48 B2 48 30 3A 58 B2 58 28 50 4C 2C 4E 29 3A |.H.H0:X.X(PL,N):|
000013F0: 59 B2 59 28 50 4C 2C 4E 29 00 2A 1C 5A 14 8B 28 |Y.Y(PL,N).*.Z..(|
00001400: 28 58 28 50 4C 2C 4E 29 B2 58 42 28 50 4C 29 29 |(X(PL,N).XB(PL))|
00001410: AF 28 59 28 50 4C 2C 4E 29 B2 59 42 28 50 4C 29 |.(Y(PL,N).YB(PL)|
00001420: 29 29 A7 20 89 20 35 34 30 30 00 4A 1C 5B 14 8F |)). . 5400.J.[..|
00001430: 20 49 46 20 49 54 27 53 20 53 54 49 4C 4C 20 49 | IF IT'S STILL I|
00001440: 4E 20 54 48 45 20 42 41 53 45 00 65 1C 64 14 8D |N THE BASE.e.d..|
00001450: 20 31 38 32 30 30 3A 20 8F 20 45 52 41 53 45 20 | 18200: . ERASE |
00001460: 52 4F 42 4F 54 00 88 1C 6E 14 91 20 50 4C AA 31 |ROBOT...n.. PL.1|
00001470: 20 8D 39 32 32 2C 39 32 33 3A 8F 20 52 4F 54 41 | .922,923:. ROTA|
00001480: 54 45 20 52 4F 42 4F 54 00 AD 1C B4 14 48 B2 48 |TE ROBOT.....H.H|
00001490: 31 3A 20 8D 20 31 38 30 30 30 3A 20 8F 20 44 52 |1: . 18000: . DR|
000014A0: 41 57 20 49 54 20 52 4F 54 41 54 45 44 00 CB 1C |AW IT ROTATED...|
000014B0: 18 15 48 28 50 4C 2C 4E 29 B2 48 31 3A 52 28 50 |..H(PL,N).H1:R(P|
000014C0: 4C 2C 4E 2C 30 29 B2 52 50 AA 31 00 D1 1C 6F 17 |L,N,0).RP.1...o.|
000014D0: 8E 00 E8 1C 70 17 8F 2A 2A 2A 20 54 45 52 52 41 |....p..*** TERRA|
000014E0: 49 4E 20 54 59 50 45 53 00 FF 1C D4 17 8F 20 2A |IN TYPES...... *|
000014F0: 2A 20 43 4C 45 41 52 20 54 45 52 52 41 49 4E 00 |* CLEAR TERRAIN.|
00001500: 4C 1D DE 17 54 52 28 58 30 2C 59 30 29 B2 30 3A |L...TR(X0,Y0).0:|
00001510: 54 52 28 58 31 2C 59 31 29 B2 31 30 AC 50 4C AA |TR(X1,Y1).10.PL.|
00001520: 4E 3A 58 28 50 4C 2C 4E 29 B2 58 31 3A 59 28 50 |N:X(PL,N).X1:Y(P|
00001530: 4C 2C 4E 29 B2 59 31 3A 8F 20 55 50 44 41 54 45 |L,N).Y1:. UPDATE|
00001540: 20 52 4F 42 4F 54 20 4C 4F 43 41 2D 00 61 1D DF | ROBOT LOCA-.a..|
00001550: 17 8F 20 20 54 49 4F 4E 20 4D 41 54 52 49 43 45 |.. TION MATRICE|
00001560: 53 00 8C 1D E8 17 8D 20 31 38 32 30 30 3A 20 8F |S...... 18200: .|
00001570: 20 45 52 41 53 45 20 52 4F 42 4F 54 20 46 52 4F | ERASE ROBOT FRO|
00001580: 4D 20 4F 4C 44 20 53 51 55 41 52 45 00 AF 1D ED |M OLD SQUARE....|
00001590: 17 91 20 50 4C AA 31 20 8D 39 31 38 2C 39 31 39 |.. PL.1 .918,919|
000015A0: 3A 8F 20 52 4F 42 4F 54 20 4D 4F 56 49 4E 47 00 |:. ROBOT MOVING.|
000015B0: E0 1D F2 17 58 B2 58 31 3A 59 B2 59 31 3A 8D 20 |....X.X1:Y.Y1:. |
000015C0: 31 38 30 30 30 3A 8F 20 44 52 41 57 20 52 4F 42 |18000:. DRAW ROB|
000015D0: 4F 54 20 49 4E 20 4E 45 57 20 53 51 55 41 52 45 |OT IN NEW SQUARE|
000015E0: 00 E6 1D FC 17 8E 00 F8 1D 38 18 8F 20 2A 2A 4F |.........8.. **O|
000015F0: 46 46 20 42 4F 41 52 44 00 1B 1E 42 18 8D 20 38 |FF BOARD...B.. 8|
00001600: 31 30 30 3A 8F 20 44 45 54 4F 4E 41 54 45 20 4D |100:. DETONATE M|
00001610: 4F 56 49 4E 47 20 52 4F 42 4F 54 00 21 1E 4C 18 |OVING ROBOT.!.L.|
00001620: 8E 00 30 1E 9C 18 8F 20 2A 2A 43 52 41 54 45 52 |..0.... **CRATER|
00001630: 00 70 1E A6 18 8B 20 BB 28 58 29 B1 28 54 55 AB |.p.... .(X).(TU.|
00001640: 54 28 58 31 2C 59 31 29 AB 2E 30 30 31 29 AC 35 |T(X1,Y1)..001).5|
00001650: 30 30 20 A7 20 8D 20 38 31 30 30 3A 20 89 20 36 |00 . . 8100: . 6|
00001660: 33 39 30 3A 20 8F 20 44 45 54 20 4D 4F 56 20 52 |390: . DET MOV R|
00001670: 00 B0 1E B0 18 8B 20 BB 28 58 29 B3 2E 36 37 20 |...... .(X)..67 |
00001680: A7 20 8D 20 38 34 30 30 3A 20 89 20 36 33 39 30 |. . 8400: . 6390|
00001690: 3A 8F 20 55 4E 53 55 43 45 53 46 55 4C 20 41 54 |:. UNSUCESFUL AT|
000016A0: 45 4D 50 54 20 54 4F 20 45 4E 54 45 52 20 43 52 |EMPT TO ENTER CR|
000016B0: 00 BB 1E BA 18 8D 20 36 31 30 30 00 C1 1E F6 18 |...... 6100.....|
000016C0: 8E 00 D2 1E 00 19 8F 2A 2A 20 42 55 49 4C 44 49 |.......** BUILDI|
000016D0: 4E 47 00 F1 1E 0A 19 8D 20 38 31 30 30 3A 8F 20 |NG...... 8100:. |
000016E0: 44 45 54 2E 20 4D 4F 56 49 4E 47 20 52 4F 42 4F |DET. MOVING ROBO|
000016F0: 54 00 19 1F 14 19 8B 20 BB 28 58 29 B3 2E 35 20 |T...... .(X)..5 |
00001700: A7 20 36 34 34 30 3A 8F 20 42 55 49 4C 44 49 4E |. 6440:. BUILDIN|
00001710: 47 20 52 45 4D 41 49 4E 53 00 3A 1F 1E 19 89 20 |G REMAINS.:.... |
00001720: 38 31 34 30 3A 8F 20 43 4F 4E 56 45 52 54 20 42 |8140:. CONVERT B|
00001730: 4C 44 47 20 54 4F 20 43 52 54 00 40 1F 28 19 8E |LDG TO CRT.@.(..|
00001740: 00 56 1F 64 19 8F 2A 2A 53 45 43 4F 4E 44 41 52 |.V.d..**SECONDAR|
00001750: 59 20 42 41 53 45 00 71 1F 69 19 8B 28 28 58 31 |Y BASE.q.i..((X1|
00001760: B3 39 29 AF 28 50 4C B2 31 29 29 A7 20 36 35 31 |.9).(PL.1)). 651|
00001770: 30 00 8C 1F 6A 19 8B 28 28 58 31 B1 39 29 AF 28 |0...j..((X1.9).(|
00001780: 50 4C B2 30 29 29 A7 20 36 35 31 30 00 A4 1F 6B |PL.0)). 6510...k|
00001790: 19 8D 20 38 33 35 30 3A 8F 20 44 45 41 43 54 49 |.. 8350:. DEACTI|
000017A0: 56 41 54 45 00 AF 1F 6C 19 89 20 36 35 39 39 00 |VATE...l.. 6599.|
000017B0: C2 1F 6E 19 8D 20 38 31 30 30 3A 20 8D 20 38 31 |..n.. 8100: . 81|
000017C0: 33 30 00 D0 1F 78 19 50 B2 B5 28 58 30 AD 39 29 |30...x.P..(X0.9)|
000017D0: 00 DA 1F 82 19 8D 39 35 31 30 00 F2 1F AF 19 8B |......9510......|
000017E0: 20 4D 50 28 50 29 B1 30 20 A7 20 4D 50 28 50 29 | MP(P).0 . MP(P)|
000017F0: B2 30 00 28 20 B4 19 4D 50 28 50 29 B2 4D 50 28 |.0.( ..MP(P).MP(|
00001800: 50 29 AB B5 28 BA 28 54 4D 29 AC 32 30 AC 28 31 |P)..(.(TM).20.(1|
00001810: AA 34 AC BB 28 31 29 29 29 3A 8F 20 52 45 50 41 |.4..(1))):. REPA|
00001820: 49 52 20 44 45 4C 41 59 00 54 20 BE 19 52 28 50 |IR DELAY.T ..R(P|
00001830: 2C 4E 43 28 50 29 2C 30 29 B2 AB 31 3A 8F 20 44 |,NC(P),0)..1:. D|
00001840: 49 53 41 42 4C 45 20 43 55 52 52 45 4E 54 20 52 |ISABLE CURRENT R|
00001850: 4F 42 4F 54 00 5A 20 C7 19 8E 00 6F 20 C8 19 8F |OBOT.Z ....o ...|
00001860: 2A 2A 20 50 52 49 4D 41 52 59 20 42 41 53 45 00 |** PRIMARY BASE.|
00001870: 8A 20 D2 19 8B 28 28 58 31 B3 39 29 AF 28 50 4C |. ...((X1.9).(PL|
00001880: B2 30 29 29 A7 20 36 36 38 30 00 A5 20 DC 19 8B |.0)). 6680.. ...|
00001890: 28 28 58 31 B1 39 29 AF 28 50 4C B2 31 29 29 A7 |((X1.9).(PL.1)).|
000018A0: 20 36 36 38 30 00 AF 20 E6 19 57 49 B2 50 4C 00 | 6680.. ..WI.PL.|
000018B0: D1 20 FA 19 8D 20 38 31 30 30 3A 20 8D 20 38 31 |. ... 8100: . 81|
000018C0: 33 30 3A 20 8F 20 44 45 54 4F 4E 41 54 49 4F 4E |30: . DETONATION|
000018D0: 53 00 DC 20 04 1A 89 20 36 36 39 39 00 F4 20 18 |S.. ... 6699.. .|
000018E0: 1A 8D 20 38 33 35 30 3A 8F 20 44 45 41 43 54 49 |.. 8350:. DEACTI|
000018F0: 56 41 54 45 00 FA 20 2B 1A 8E 00 0D 21 2C 1A 8F |VATE.. +....!,..|
00001900: 2A 2A 20 42 49 47 20 43 52 41 54 45 52 00 34 21 |** BIG CRATER.4!|
00001910: 36 1A 8D 20 36 31 30 30 3A 20 8F 20 4D 4F 56 45 |6.. 6100: . MOVE|
00001920: 20 52 4F 42 4F 54 20 54 4F 20 4E 45 57 20 53 51 | ROBOT TO NEW SQ|
00001930: 55 41 52 45 00 6E 21 40 1A 8B 20 BB 28 58 29 B3 |UARE.n!@.. .(X).|
00001940: 2E 35 20 A7 20 52 28 50 4C 2C 4E 2C 52 28 50 4C |.5 . R(PL,N,R(PL|
00001950: 2C 4E 2C 30 29 29 B2 30 3A 8F 20 52 4F 42 4F 54 |,N,0)).0:. ROBOT|
00001960: 20 4C 4F 53 45 53 20 50 52 4F 47 52 41 4D 00 74 | LOSES PROGRAM.t|
00001970: 21 8F 1A 8E 00 82 21 90 1A 8F 2A 2A 20 54 52 45 |!.....!...** TRE|
00001980: 45 53 00 B8 21 9A 1A 8B 20 50 4C B2 30 20 A7 20 |ES..!... PL.0 . |
00001990: 8D 20 31 38 32 30 30 3A 20 8D 20 36 31 30 30 3A |. 18200: . 6100:|
000019A0: 20 8F 20 50 4C 59 52 30 20 47 4F 45 53 20 52 49 | . PLYR0 GOES RI|
000019B0: 47 48 54 20 54 48 52 55 00 ED 21 A4 1A 8B 20 50 |GHT THRU..!... P|
000019C0: 4C B2 31 20 A7 20 8D 20 36 34 30 30 3A 8F 20 50 |L.1 . . 6400:. P|
000019D0: 4C 59 52 31 20 54 52 45 41 54 53 20 54 52 45 45 |LYR1 TREATS TREE|
000019E0: 53 20 41 53 20 42 55 49 4C 44 49 4E 47 00 F3 21 |S AS BUILDING..!|
000019F0: F3 1A 8E 00 01 22 F4 1A 8F 2A 2A 20 48 49 4C 4C |....."...** HILL|
00001A00: 53 00 36 22 FE 1A 8B 20 50 4C B2 30 20 A7 20 8D |S.6"... PL.0 . .|
00001A10: 20 36 34 30 30 3A 8F 20 50 4C 59 52 30 20 54 52 | 6400:. PLYR0 TR|
00001A20: 45 41 54 53 20 48 49 4C 4C 53 20 41 53 20 42 55 |EATS HILLS AS BU|
00001A30: 49 4C 44 49 4E 47 00 6C 22 08 1B 8B 20 50 4C B2 |ILDING.l"... PL.|
00001A40: 31 20 A7 20 8D 20 31 38 32 30 30 3A 20 8D 20 36 |1 . . 18200: . 6|
00001A50: 31 30 30 3A 20 8F 20 50 4C 59 52 31 20 47 4F 45 |100: . PLYR1 GOE|
00001A60: 53 20 54 48 52 55 20 48 49 4C 4C 53 00 72 22 57 |S THRU HILLS.r"W|
00001A70: 1B 8E 00 7F 22 58 1B 8F 2A 2A 20 4C 41 4B 45 00 |...."X..** LAKE.|
00001A80: 95 22 62 1B 8D 20 38 31 30 30 3A 8F 20 44 45 54 |."b.. 8100:. DET|
00001A90: 4F 4E 41 54 45 00 B0 22 7B 1B 8D 20 39 31 36 20 |ONATE.."{.. 916 |
00001AA0: 3A 8F 20 53 49 4E 4B 49 4E 47 20 53 4F 55 4E 44 |:. SINKING SOUND|
00001AB0: 00 B6 22 BB 1B 8E 00 D8 22 40 1F 8F 2A 2A 20 44 |.."....."@..** D|
00001AC0: 45 54 4F 4E 41 54 49 4F 4E 53 2F 44 45 41 43 54 |ETONATIONS/DEACT|
00001AD0: 49 56 41 54 49 4F 4E 53 00 F4 22 A4 1F 8F 20 44 |IVATIONS.."... D|
00001AE0: 45 54 4F 4E 41 54 45 20 4D 4F 56 49 4E 47 20 52 |ETONATE MOVING R|
00001AF0: 4F 42 4F 54 00 26 23 A5 1F 8D 20 39 31 31 3A 8D |OBOT.&#... 911:.|
00001B00: 31 38 32 30 30 3A 8D 38 32 30 30 3A 52 28 50 4C |18200:.8200:R(PL|
00001B10: 2C 4E 2C 30 29 B2 AB 31 3A 54 52 28 58 30 2C 59 |,N,0)..1:TR(X0,Y|
00001B20: 30 29 B2 30 3A 8E 00 57 23 AE 1F 8F 20 44 45 54 |0).0:..W#... DET|
00001B30: 45 52 4D 49 4E 45 20 4F 57 4E 45 52 20 41 4E 44 |ERMINE OWNER AND|
00001B40: 20 4E 55 4D 42 45 52 20 4F 46 20 54 41 52 47 45 | NUMBER OF TARGE|
00001B50: 54 20 52 4F 42 4F 54 00 93 23 AF 1F 50 54 B2 B5 |T ROBOT..#..PT..|
00001B60: 28 54 52 28 58 31 2C 59 31 29 AD 31 31 29 3A 4E |(TR(X1,Y1).11):N|
00001B70: 54 B2 54 52 28 58 31 2C 59 31 29 AB 31 30 AC 50 |T.TR(X1,Y1).10.P|
00001B80: 54 3A 8D 20 39 31 31 3A 54 52 28 58 31 2C 59 31 |T:. 911:TR(X1,Y1|
00001B90: 29 B2 30 00 AF 23 B8 1F 8F 20 44 45 54 4F 4E 41 |).0..#... DETONA|
00001BA0: 54 45 20 54 41 52 47 45 54 20 52 4F 42 4F 54 00 |TE TARGET ROBOT.|
00001BB0: BD 23 BA 1F 58 B2 58 31 3A 59 B2 59 31 00 EC 23 |.#..X.X1:Y.Y1..#|
00001BC0: BC 1F 8D 20 38 32 30 30 3A 8D 20 38 32 36 30 3A |... 8200:. 8260:|
00001BD0: 20 54 28 58 31 2C 59 31 29 B2 54 55 3A 52 28 50 | T(X1,Y1).TU:R(P|
00001BE0: 54 2C 4E 54 2C 30 29 B2 AB 31 3A 8E 00 17 24 C2 |T,NT,0)..1:...$.|
00001BF0: 1F 8D 39 31 33 3A 58 B2 58 31 3A 59 B2 59 31 3A |..913:X.X1:Y.Y1:|
00001C00: 8D 38 32 30 30 3A 8D 38 32 36 30 3A 8F 20 44 45 |.8200:.8260:. DE|
00001C10: 54 2E 20 42 41 53 45 00 2A 24 C3 1F 54 28 58 31 |T. BASE.*$..T(X1|
00001C20: 2C 59 31 29 B2 54 55 3A 20 8E 00 44 24 CC 1F 58 |,Y1).TU: ..D$..X|
00001C30: B2 58 31 3A 59 B2 59 31 3A 8F 20 44 45 54 2E 20 |.X1:Y.Y1:. DET. |
00001C40: 42 4C 44 47 00 68 24 CD 1F 8D 39 31 31 3A 8D 38 |BLDG.h$...911:.8|
00001C50: 32 31 30 3A 8D 38 32 36 30 3A 54 28 58 31 2C 59 |210:.8260:T(X1,Y|
00001C60: 31 29 B2 54 55 3A 20 8E 00 7A 24 FE 1F 8F 2A 2A |1).TU: ..z$...**|
00001C70: 20 45 58 50 4C 4F 53 49 4F 4E 00 8F 24 08 20 8F | EXPLOSION..$. .|
00001C80: 20 42 41 53 45 20 45 58 50 4C 4F 53 49 4F 4E 00 | BASE EXPLOSION.|
00001C90: A7 24 12 20 8D 31 38 31 30 30 3A 99 22 1C A6 A6 |.$. .18100:."...|
00001CA0: 11 9D 9D A6 A6 22 3B 00 BF 24 1C 20 8D 31 38 31 |.....";..$. .181|
00001CB0: 30 30 3A 99 22 9E DA DA 11 9D 9D DA DA 22 3B 00 |00:."........";.|
00001CC0: D8 24 26 20 89 31 38 32 30 30 3A 8F 20 44 52 41 |.$& .18200:. DRA|
00001CD0: 57 20 53 51 55 41 52 45 00 F2 24 44 20 8D 20 31 |W SQUARE..$D . 1|
00001CE0: 36 33 30 30 3A 8F 20 44 52 41 57 20 43 52 41 54 |6300:. DRAW CRAT|
00001CF0: 45 52 00 11 25 45 20 5A 33 B2 5A 33 AD 28 31 AA |ER..%E Z3.Z3.(1.|
00001D00: 2E 31 AC 5A 33 29 3A 8E 3A 8F 20 43 52 41 54 45 |.1.Z3):.:. CRATE|
00001D10: 52 00 28 25 9E 20 8F 20 44 45 41 43 54 49 56 41 |R.(%. . DEACTIVA|
00001D20: 54 45 20 52 4F 42 4F 54 00 50 25 9F 20 8D 20 39 |TE ROBOT.P%. . 9|
00001D30: 31 34 3A 8D 20 31 38 32 30 30 3A 52 28 50 4C 2C |14:. 18200:R(PL,|
00001D40: 4E 2C 52 28 50 4C 2C 4E 2C 30 29 29 B2 30 3A 8E |N,R(PL,N,0)).0:.|
00001D50: 00 6D 25 D0 20 8F 20 52 45 53 54 4F 52 45 20 50 |.m%. . RESTORE P|
00001D60: 52 45 56 49 4F 55 53 20 4F 52 44 45 52 00 9E 25 |REVIOUS ORDER..%|
00001D70: D2 20 8B 20 52 B2 31 30 30 20 A7 20 52 28 50 4C |. . R.100 . R(PL|
00001D80: 2C 4E 2C 30 29 B2 52 50 3A 52 28 50 4C 2C 4E 2C |,N,0).RP:R(PL,N,|
00001D90: 52 50 29 B2 31 30 31 3A 89 20 38 34 32 30 00 BA |RP).101:. 8420..|
00001DA0: 25 DA 20 52 28 50 4C 2C 4E 2C 52 50 29 B2 52 28 |%. R(PL,N,RP).R(|
00001DB0: 50 4C 2C 4E 2C 52 50 29 AA 31 00 E1 25 E4 20 8E |PL,N,RP).1..%. .|
00001DC0: 3A 8F 20 41 56 4F 49 44 20 43 4F 4C 4C 49 53 49 |:. AVOID COLLISI|
00001DD0: 4F 4E 2F 4F 4E 45 20 4D 4F 56 45 20 44 45 4C 41 |ON/ONE MOVE DELA|
00001DE0: 59 00 E7 25 27 23 8E 00 FF 25 28 23 8F 20 2A 2A |Y..%'#...%(#. **|
00001DF0: 2A 2A 2A 20 4D 41 49 4E 20 4D 4F 44 55 4C 45 00 |*** MAIN MODULE.|
00001E00: 16 26 8C 23 8D 20 39 32 30 30 3A 20 8F 20 50 52 |.&.#. 9200: . PR|
00001E10: 45 53 54 41 52 54 00 34 26 96 23 8D 20 39 34 30 |ESTART.4&.#. 940|
00001E20: 30 3A 20 8F 20 4F 52 44 45 52 20 45 58 45 43 55 |0: . ORDER EXECU|
00001E30: 54 49 4F 4E 00 60 26 A0 23 8B 20 57 49 B1 B2 30 |TION.`&.#. WI..0|
00001E40: 20 A7 20 46 4C B2 30 3A 89 20 39 31 37 30 3A 8F | . FL.0:. 9170:.|
00001E50: 20 54 45 53 54 20 46 4F 52 20 57 49 4E 4E 45 52 | TEST FOR WINNER|
00001E60: 00 84 26 BE 23 8D 20 39 33 30 30 3A 20 8F 20 4F |..&.#. 9300: . O|
00001E70: 52 44 45 52 20 45 4E 54 52 59 20 45 58 45 43 55 |RDER ENTRY EXECU|
00001E80: 54 49 56 45 00 8F 26 C8 23 89 20 39 31 31 30 00 |TIVE..&.#. 9110.|
00001E90: A9 26 D2 23 8D 20 39 38 30 30 3A 20 8F 20 47 41 |.&.#. 9800: . GA|
00001EA0: 4D 45 20 52 45 53 55 4C 54 00 AF 26 EF 23 8E 00 |ME RESULT..&.#..|
00001EB0: CB 26 F0 23 8F 20 2A 2A 2A 2A 2A 20 50 52 45 53 |.&.#. ***** PRES|
00001EC0: 54 41 52 54 20 4F 52 44 45 52 53 00 E7 26 FA 23 |TART ORDERS..&.#|
00001ED0: 81 20 50 B2 30 20 A4 20 31 3A 8D 39 35 33 30 3A |. P.0 . 1:.9530:|
00001EE0: 8D 39 35 30 30 3A 82 00 F6 26 04 24 81 20 49 B2 |.9500:...&.$. I.|
00001EF0: 31 20 A4 20 54 50 00 0E 27 0E 24 8D 20 32 31 30 |1 . TP..'.$. 210|
00001F00: 3A 8F 20 4F 52 44 45 52 20 45 4E 54 52 59 00 16 |:. ORDER ENTRY..|
00001F10: 27 18 24 82 20 49 00 1C 27 53 24 8E 00 3D 27 54 |'.$. I..'S$..='T|
00001F20: 24 8F 2A 2A 2A 2A 2A 20 4F 52 44 45 52 20 45 4E |$.***** ORDER EN|
00001F30: 54 52 59 20 45 58 45 43 55 54 49 56 45 00 4F 27 |TRY EXECUTIVE.O'|
00001F40: 5E 24 81 20 50 B2 30 A4 31 3A 8D 39 35 30 30 00 |^$. P.0.1:.9500.|
00001F50: 66 27 5F 24 8B 20 4D 50 28 50 29 B3 30 20 A7 20 |f'_$. MP(P).0 . |
00001F60: 8D 20 39 35 31 30 00 6E 27 60 24 82 20 50 00 7E |. 9510.n'`$. P.~|
00001F70: 27 68 24 81 20 49 B2 20 31 20 A4 20 54 4D 00 96 |'h$. I. 1 . TM..|
00001F80: 27 72 24 8D 20 32 31 30 3A 8F 20 4F 52 44 45 52 |'r$. 210:. ORDER|
00001F90: 20 45 4E 54 52 59 00 9E 27 7C 24 82 20 49 00 A4 | ENTRY..'|$. I..|
00001FA0: 27 B7 24 8E 00 BF 27 B8 24 8F 2A 2A 2A 2A 2A 20 |'.$...'.$.***** |
00001FB0: 4F 52 44 45 52 20 45 58 45 43 55 54 49 4F 4E 00 |ORDER EXECUTION.|
00001FC0: CA 27 C2 24 8D 20 39 35 32 30 00 F5 27 CC 24 8D |.'.$. 9520..'.$.|
00001FD0: 20 31 30 30 30 3A 8F 20 4F 52 44 45 52 20 45 58 | 1000:. ORDER EX|
00001FE0: 45 43 55 54 49 4F 4E 20 46 4F 52 20 50 4C 41 59 |ECUTION FOR PLAY|
00001FF0: 45 52 20 50 4C 00 0F 28 D6 24 50 4C B2 50 4C AA |ER PL..(.$PL.PL.|
00002000: 31 3A 8B 20 50 4C B1 31 20 A7 20 50 4C B2 30 00 |1:. PL.1 . PL.0.|
00002010: 2E 28 E0 24 54 55 B2 54 55 AA 2E 30 30 30 31 3A |.(.$TU.TU..0001:|
00002020: 8F 20 54 55 52 4E 20 43 4F 55 4E 54 45 52 00 42 |. TURN COUNTER.B|
00002030: 28 EA 24 81 20 50 B2 30 A4 31 3A 8D 39 35 33 30 |(.$. P.0.1:.9530|
00002040: 3A 82 00 48 28 1B 25 8E 00 7D 28 1C 25 8D 31 32 |:..H(.%..}(.%.12|
00002050: 32 3A 99 22 05 12 20 20 20 50 52 45 50 41 52 45 |2:.".. PREPARE|
00002060: 20 20 22 3B 3A 8D 31 32 33 3A 99 22 20 20 20 4F | ";:.123:." O|
00002070: 52 44 45 52 53 20 20 20 92 22 3B 3A 8E 00 B2 28 |RDERS .";:...(|
00002080: 26 25 8D 31 32 32 3A 99 22 05 12 42 41 53 45 20 |&%.122:."..BASE |
00002090: 44 41 4D 41 47 45 44 22 3B 3A 8D 31 32 33 3A 99 |DAMAGED";:.123:.|
000020A0: 22 55 4E 44 45 52 20 52 45 50 41 49 52 92 22 3B |"UNDER REPAIR.";|
000020B0: 3A 8E 00 ED 28 30 25 81 50 B2 30 A4 31 3A 8D 31 |:...(0%.P.0.1:.1|
000020C0: 32 32 3A 99 22 12 20 20 4D 4F 56 45 4D 45 4E 54 |22:.". MOVEMENT|
000020D0: 20 20 22 3B 3A 8D 31 32 33 3A 99 22 20 20 45 58 | ";:.123:." EX|
000020E0: 45 43 55 54 49 4F 4E 20 92 22 3B 3A 82 00 F3 28 |ECUTION .";:...(|
000020F0: 31 25 8E 00 0D 29 3A 25 8D 31 32 32 3A 8D 31 34 |1%...):%.122:.14|
00002100: 30 3A 8D 31 32 33 3A 8D 31 34 30 3A 8E 00 25 29 |0:.123:.140:..%)|
00002110: 48 26 8F 20 2A 2A 2A 2A 2A 20 47 41 4D 45 20 52 |H&. ***** GAME R|
00002120: 45 53 55 4C 54 00 59 29 5C 26 41 24 B2 22 54 48 |ESULT.Y)\&A$."TH|
00002130: 45 20 52 4F 42 4F 54 53 20 46 52 4F 4D 20 54 48 |E ROBOTS FROM TH|
00002140: 45 20 57 45 53 54 20 48 41 56 45 20 57 4F 4E 20 |E WEST HAVE WON |
00002150: 54 48 45 20 57 41 52 21 22 00 94 29 66 26 8B 20 |THE WAR!"..)f&. |
00002160: 57 49 20 A7 20 41 24 B2 22 54 48 45 20 52 4F 42 |WI . A$."THE ROB|
00002170: 4F 54 53 20 46 52 4F 4D 20 54 48 45 20 45 41 53 |OTS FROM THE EAS|
00002180: 54 20 48 41 56 45 20 57 4F 4E 20 54 48 45 20 57 |T HAVE WON THE W|
00002190: 41 52 21 22 00 AA 29 70 26 8D 20 31 33 35 30 30 |AR!"..)p&. 13500|
000021A0: 3A 8F 20 43 52 41 57 4C 45 52 00 CE 29 7A 26 41 |:. CRAWLER..)z&A|
000021B0: 24 B2 22 48 49 54 20 41 4E 59 20 4B 45 59 20 54 |$."HIT ANY KEY T|
000021C0: 4F 20 45 4E 44 20 49 54 20 41 4C 4C 2E 22 00 E2 |O END IT ALL."..|
000021D0: 29 84 26 8D 20 31 32 30 34 30 3A 8F 20 44 45 4C |).&. 12040:. DEL|
000021E0: 41 59 00 FE 29 8E 26 8D 20 31 34 35 30 30 3A 8F |AY..).&. 14500:.|
000021F0: 20 50 52 49 4E 54 20 4D 45 53 53 41 47 45 00 0E | PRINT MESSAGE..|
00002200: 2A 8F 26 8B 20 57 49 20 A7 20 39 38 37 34 00 41 |*.&. WI . 9874.A|
00002210: 2A 90 26 81 58 B2 31 33 A4 31 35 3A 81 59 B2 36 |*.&.X.13.15:.Y.6|
00002220: A4 38 3A 8D 39 31 31 3A 8D 31 36 33 30 30 3A 82 |.8:.911:.16300:.|
00002230: 3A 82 3A 8F 20 42 4C 4F 57 20 55 50 20 45 41 53 |:.:. BLOW UP EAS|
00002240: 54 00 6B 2A 91 26 81 59 B2 35 A4 39 3A 81 58 B2 |T.k*.&.Y.5.9:.X.|
00002250: 31 32 A4 31 36 3A 8D 39 31 31 3A 8D 31 36 33 30 |12.16:.911:.1630|
00002260: 30 3A 82 3A 82 3A 89 39 38 37 37 00 9C 2A 92 26 |0:.:.:.9877..*.&|
00002270: 81 58 B2 33 A4 35 3A 81 59 B2 32 A4 34 3A 8D 39 |.X.3.5:.Y.2.4:.9|
00002280: 31 31 3A 8D 31 36 33 30 30 3A 82 3A 82 3A 8F 20 |11:.16300:.:.:. |
00002290: 42 4C 4F 57 20 55 50 20 57 45 53 54 00 BE 2A 93 |BLOW UP WEST..*.|
000022A0: 26 81 59 B2 31 A4 35 3A 81 58 B2 32 A4 36 3A 8D |&.Y.1.5:.X.2.6:.|
000022B0: 39 31 31 3A 8D 31 36 33 30 30 3A 82 3A 82 00 E9 |911:.16300:.:...|
000022C0: 2A 95 26 50 B2 30 3A 8D 31 32 32 3A 8D 31 33 30 |*.&P.0:.122:.130|
000022D0: 3A 8D 31 32 33 3A 8D 31 33 30 3A 8D 31 32 34 3A |:.123:.130:.124:|
000022E0: 8D 31 33 30 3A 8D 31 32 35 00 F7 2A 96 26 8D 31 |.130:.125..*.&.1|
000022F0: 33 30 3A 8D 31 32 33 00 1C 2B AC 26 41 24 B2 22 |30:.123..+.&A$."|
00002300: 05 44 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 |.DO YOU WANT TO |
00002310: 50 4C 41 59 20 41 47 41 49 4E 3F 22 00 38 2B B6 |PLAY AGAIN?".8+.|
00002320: 26 8D 20 31 34 33 30 30 3A 20 8B 20 46 4C 20 A7 |&. 14300: . FL .|
00002330: 20 8D 20 32 32 30 30 30 00 3E 2B C0 26 8E 00 59 | . 22000.>+.&..Y|
00002340: 2B 10 27 8F 20 2A 2A 2A 2A 2A 2A 2A 20 4D 41 49 |+.'. ******* MAI|
00002350: 4E 20 50 52 4F 47 52 41 4D 00 7D 2B 3C 28 8D 20 |N PROGRAM.}+<(. |
00002360: 33 32 30 30 30 3A 20 8F 20 53 45 54 55 50 20 53 |32000: . SETUP S|
00002370: 4F 55 4E 44 20 52 4F 55 54 49 4E 45 53 00 97 2B |OUND ROUTINES..+|
00002380: 04 29 8D 20 39 30 30 30 3A 8F 20 4D 41 49 4E 20 |.). 9000:. MAIN |
00002390: 4D 4F 44 2D 55 4C 45 00 B3 2B 68 29 8B 20 46 4C |MOD-ULE..+h). FL|
000023A0: B2 31 20 A7 20 93 20 22 54 46 43 53 45 54 55 50 |.1 . . "TFCSETUP|
000023B0: 22 2C 38 00 CA 2B 94 2A 8D 20 32 37 30 30 30 3A |",8..+.*. 27000:|
000023C0: 8F 20 43 4C 4F 53 45 4F 55 54 00 D0 2B F7 2A 80 |. CLOSEOUT..+.*.|
000023D0: 00 E9 2B F8 2A 8F 20 2A 2A 2A 20 53 43 52 45 45 |..+.*. *** SCREE|
000023E0: 4E 20 43 4F 4E 54 52 4F 4C 00 F9 2B 5C 2B 8F 20 |N CONTROL..+\+. |
000023F0: 2A 2A 20 43 45 4E 54 45 52 00 10 2C 66 2B 8B 20 |** CENTER..,f+. |
00002400: C3 28 41 24 29 B1 33 38 20 A7 20 31 31 31 39 39 |.(A$).38 . 11199|
00002410: 00 2C 2C 70 2B 81 20 49 43 20 B2 20 31 20 A4 20 |.,,p+. IC . 1 . |
00002420: 28 34 30 AB C3 28 41 24 29 29 AD 32 00 36 2C 71 |(40..(A$)).2.6,q|
00002430: 2B 99 22 1D 22 3B 00 3C 2C 72 2B 82 00 42 2C BF |+.".";.<,r+..B,.|
00002440: 2B 8E 00 53 2C E0 2E 8F 20 2A 2A 2A 20 50 41 55 |+..S,... *** PAU|
00002450: 53 45 53 00 72 2C E2 2E 81 20 44 59 B2 31 20 A4 |SES.r,... DY.1 .|
00002460: 20 32 30 30 3A 82 3A 8E 3A 8F 20 30 2E 32 20 53 | 200:.:.:. 0.2 S|
00002470: 45 43 00 91 2C E5 2E 81 20 44 59 B2 31 20 A4 20 |EC..,... DY.1 . |
00002480: 35 30 30 3A 82 3A 8E 3A 8F 20 30 2E 35 20 53 45 |500:.:.:. 0.5 SE|
00002490: 43 00 AF 2C EA 2E 81 20 44 59 B2 31 20 A4 20 31 |C..,... DY.1 . 1|
000024A0: 30 30 30 3A 82 3A 8E 3A 8F 20 31 20 53 45 43 00 |000:.:.:. 1 SEC.|
000024B0: CE 2C F4 2E 81 20 44 59 B2 31 20 A4 20 32 30 30 |.,... DY.1 . 200|
000024C0: 30 3A 82 3A 8E 3A 8F 20 32 20 53 45 43 53 00 ED |0:.:.:. 2 SECS..|
000024D0: 2C 08 2F 81 20 44 59 B2 31 20 A4 20 34 30 30 30 |,./. DY.1 . 4000|
000024E0: 3A 82 3A 8E 3A 8F 20 34 20 53 45 43 53 00 00 2D |:.:.:. 4 SECS..-|
000024F0: C8 32 8F 20 2A 2A 2A 20 44 49 53 50 4C 41 59 53 |.2. *** DISPLAYS|
00002500: 00 11 2D BC 34 8F 20 2A 2A 20 43 52 41 57 4C 45 |..-.4. ** CRAWLE|
00002510: 52 00 40 2D C6 34 42 24 B2 22 20 20 20 20 20 20 |R.@-.4B$." |
00002520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002530: 20 20 20 20 20 20 20 20 20 20 20 20 22 AA 41 24 | ".A$|
00002540: 00 5B 2D CB 34 99 22 05 12 22 3B 3A 8F 20 57 48 |.[-.4."..";:. WH|
00002550: 49 54 45 20 49 4E 56 45 52 53 45 00 6D 2D D0 34 |ITE INVERSE.m-.4|
00002560: 81 20 4C B2 31 20 A4 20 C3 28 42 24 29 00 84 2D |. L.1 . .(B$)..-|
00002570: DA 34 42 24 B2 CA 28 42 24 2C 32 29 AA C8 28 42 |.4B$..(B$,2)..(B|
00002580: 24 2C 31 29 00 9A 2D E4 34 8D 20 31 32 33 3A 99 |$,1)..-.4. 123:.|
00002590: 20 C8 28 42 24 2C 33 34 29 3B 00 B1 2D EE 34 8D | .(B$,34);..-.4.|
000025A0: 20 39 30 32 3A 8F 20 54 59 50 45 57 52 49 54 45 | 902:. TYPEWRITE|
000025B0: 52 00 B7 2D F8 34 82 00 CB 2D 02 35 99 20 22 92 |R..-.4...-.5. ".|
000025C0: 22 3B 3A 8F 20 4E 4F 52 4D 41 4C 00 D1 2D 1F 35 |";:. NORMAL..-.5|
000025D0: 8E 00 EA 2D B0 36 8F 20 2A 2A 2A 20 4B 45 59 42 |...-.6. *** KEYB|
000025E0: 4F 41 52 44 20 49 4E 50 55 54 00 16 2E 14 37 8F |OARD INPUT....7.|
000025F0: 20 2A 2A 20 50 41 55 53 45 20 41 4E 44 20 50 52 | ** PAUSE AND PR|
00002600: 49 4E 54 20 27 43 4F 4E 54 49 4E 55 45 27 20 4D |INT 'CONTINUE' M|
00002610: 45 53 53 41 47 45 00 2B 2E 1E 37 8D 20 31 32 30 |ESSAGE.+..7. 120|
00002620: 34 30 3A 20 8F 20 50 41 55 53 45 00 67 2E 28 37 |40: . PAUSE.g.(7|
00002630: 8D 20 31 34 32 30 30 3A 20 8F 20 50 52 49 4E 54 |. 14200: . PRINT|
00002640: 20 27 43 4F 4E 54 49 4E 55 45 27 20 4D 45 53 53 | 'CONTINUE' MESS|
00002650: 41 47 45 20 41 54 20 42 4F 54 54 4F 4D 20 4F 46 |AGE AT BOTTOM OF|
00002660: 20 53 43 52 45 45 4E 00 6D 2E 77 37 8E 00 87 2E | SCREEN.m.w7....|
00002670: 78 37 8F 20 2A 2A 20 43 4F 4E 54 49 4E 55 45 20 |x7. ** CONTINUE |
00002680: 4D 45 53 53 41 47 45 00 A8 2E 82 37 41 24 B2 22 |MESSAGE....7A$."|
00002690: 48 49 54 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 |HIT ANY KEY TO C|
000026A0: 4F 4E 54 49 4E 55 45 22 00 B4 2E 8C 37 8D 20 31 |ONTINUE"....7. 1|
000026B0: 34 35 30 30 00 BA 2E DB 37 8E 00 FC 2E DC 37 8F |4500....7.....7.|
000026C0: 20 59 45 53 2F 4E 4F 20 2A 2A 20 50 52 49 4E 54 | YES/NO ** PRINT|
000026D0: 20 3F 20 41 24 20 41 4E 44 20 57 41 49 54 20 46 | ? A$ AND WAIT F|
000026E0: 4F 52 20 59 2F 4E 20 52 45 53 50 4F 4E 53 45 20 |OR Y/N RESPONSE |
000026F0: 26 20 53 45 54 20 46 4C 3D 30 2F 31 00 0F 2F E1 |& SET FL=0/1../.|
00002700: 37 8D 20 39 30 31 3A 8F 20 50 52 4F 4D 50 54 00 |7. 901:. PROMPT.|
00002710: 19 2F E6 37 99 20 41 24 3B 00 2F 2F F0 37 8D 20 |./.7. A$;.//.7. |
00002720: 31 34 34 30 30 3A 8F 20 47 45 54 20 4B 45 59 00 |14400:. GET KEY.|
00002730: 57 2F 04 38 8B 20 4B 59 B2 C6 28 22 59 22 29 20 |W/.8. KY..("Y") |
00002740: A7 20 46 4C B2 31 3A 99 22 20 20 59 45 53 22 3A |. FL.1:." YES":|
00002750: 89 20 31 34 33 39 39 00 7E 2F 0E 38 8B 20 4B 59 |. 14399.~/.8. KY|
00002760: B2 C6 28 22 4E 22 29 20 A7 20 46 4C B2 30 3A 99 |..("N") . FL.0:.|
00002770: 22 20 20 4E 4F 22 3A 89 20 31 34 33 39 39 00 90 |" NO":. 14399..|
00002780: 2F 18 38 8D 20 31 32 33 3A 89 20 31 34 33 30 35 |/.8. 123:. 14305|
00002790: 00 96 2F 3F 38 8E 00 C5 2F 40 38 8F 20 2A 2A 20 |../?8.../@8. ** |
000027A0: 47 45 54 20 4B 45 59 20 2D 20 47 45 54 20 43 48 |GET KEY - GET CH|
000027B0: 41 52 20 41 4E 44 20 52 45 53 45 45 44 20 52 4E |AR AND RESEED RN|
000027C0: 44 20 47 45 4E 00 D1 2F 4A 38 8D 20 32 30 30 30 |D GEN../J8. 2000|
000027D0: 30 00 FC 2F 54 38 8B 20 52 4E B1 32 30 30 30 20 |0../T8. RN.2000 |
000027E0: A7 20 52 4E B2 52 4E AB 32 30 30 30 3A 20 8D 20 |. RN.RN.2000: . |
000027F0: 39 30 31 3A 8F 20 50 52 4F 4D 50 54 00 20 30 5E |901:. PROMPT. 0^|
00002800: 38 52 4E B2 52 4E AA 31 3A 8D 20 32 30 30 31 30 |8RN.RN.1:. 20010|
00002810: 3A 8B 20 4B 59 B2 36 34 20 A7 20 31 34 34 32 30 |:. KY.64 . 14420|
00002820: 00 68 30 72 38 52 4E B2 BB 28 AB 39 33 34 2E 37 |.h0r8RN..(.934.7|
00002830: AD 28 52 4E AA 2E 31 29 29 3A 8F 20 43 48 45 43 |.(RN..1)):. CHEC|
00002840: 4B 20 52 45 53 45 45 44 20 46 4F 52 20 43 2D 36 |K RESEED FOR C-6|
00002850: 34 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |4 **************|
00002860: 2A 2A 2A 2A 2A 2A 2A 2A 00 6E 30 A3 38 8E 00 89 |********.n0.8...|
00002870: 30 A4 38 8F 20 2A 2A 20 50 52 49 4E 54 20 41 24 |0.8. ** PRINT A$|
00002880: 20 41 4E 44 20 57 41 49 54 00 A4 30 B8 38 8D 31 | AND WAIT..0.8.1|
00002890: 32 34 3A 8D 31 33 30 3A 8D 31 32 34 3A 8D 20 31 |24:.130:.124:. 1|
000028A0: 31 31 30 30 00 B9 30 C2 38 99 20 22 9D 9D 9D 12 |1100..0.8. "....|
000028B0: 22 3B 41 24 3B 22 92 22 3B 00 CC 30 CC 38 8D 20 |";A$;".";..0.8. |
000028C0: 39 30 31 3A 8F 20 50 52 4F 4D 50 54 00 E2 30 D6 |901:. PROMPT..0.|
000028D0: 38 8D 20 31 34 34 30 30 3A 8F 20 47 45 54 20 4B |8. 14400:. GET K|
000028E0: 45 59 00 E8 30 07 39 8E 00 0A 31 E4 3E 8D 20 31 |EY..0.9...1.>. 1|
000028F0: 38 31 30 30 3A 8F 20 46 52 4F 4D 20 43 4C 45 41 |8100:. FROM CLEA|
00002900: 52 20 4F 52 20 41 52 52 4F 57 00 2E 31 EE 3E 8B |R OR ARROW..1.>.|
00002910: 28 28 58 B2 34 29 AF 28 59 B2 32 29 29 A7 99 22 |((X.4).(Y.2)).."|
00002920: 9E 12 A9 DF 92 11 9D 9D AA B4 22 3B 3A 8E 00 51 |..........";:..Q|
00002930: 31 F8 3E 8B 28 28 58 B2 31 34 29 AF 28 59 B2 38 |1.>.((X.14).(Y.8|
00002940: 29 29 A7 99 22 9F AA B4 11 9D 9D DF A9 22 3B 3A |)).."........";:|
00002950: 8E 00 57 31 02 3F 8E 00 6A 31 48 3F 90 3A 20 8F |..W1.?..j1H?.: .|
00002960: 20 4F 46 46 20 42 4F 41 52 44 00 8D 31 AC 3F 8D | OFF BOARD..1.?.|
00002970: 31 38 31 30 30 3A 99 22 1C D6 D6 11 9D 9D D6 D6 |18100:."........|
00002980: 22 3B 3A 8E 3A 8F 20 43 52 41 54 45 52 00 9F 31 |";:.:. CRATER..1|
00002990: 10 40 90 3A 20 8F 20 42 55 49 4C 44 49 4E 47 00 |.@.: . BUILDING.|
000029A0: B7 31 74 40 90 3A 20 8F 20 53 45 43 4F 4E 44 41 |.1t@.: . SECONDA|
000029B0: 52 59 20 42 41 53 45 00 CD 31 D8 40 90 3A 20 8F |RY BASE..1.@.: .|
000029C0: 20 50 52 49 4D 41 52 59 20 42 41 53 45 00 E9 31 | PRIMARY BASE..1|
000029D0: 3C 41 8D 20 31 36 33 30 30 3A 8E 3A 20 8F 20 42 |<A. 16300:.: . B|
000029E0: 49 47 20 43 52 41 54 45 52 00 0D 32 A0 41 8D 31 |IG CRATER..2.A.1|
000029F0: 38 31 30 30 3A 99 22 1E 12 A9 DF 11 9D 9D 92 95 |8100:.".........|
00002A00: AA B4 22 3B 3A 8E 3A 8F 20 54 52 45 45 00 30 32 |..";:.:. TREE.02|
00002A10: 04 42 8D 31 38 31 30 30 3A 99 22 9C CE CD 11 9D |.B.18100:.".....|
00002A20: 9D CE CD 22 3B 3A 8E 3A 8F 20 20 48 49 4C 4C 53 |...";:.:. HILLS|
00002A30: 00 3E 32 68 42 90 3A 20 8F 20 4C 41 4B 45 00 4F |.>2hB.: . LAKE.O|
00002A40: 32 50 46 8F 20 44 52 41 57 20 52 4F 42 4F 54 00 |2PF. DRAW ROBOT.|
00002A50: 68 32 51 46 8D 31 38 31 30 30 3A 99 52 42 24 28 |h2QF.18100:.RB$(|
00002A60: 50 4C 2C 48 29 3B 3A 8E 00 7B 32 B4 46 8F 20 50 |PL,H);:..{2.F. P|
00002A70: 4F 53 49 54 49 4F 4E 20 58 2C 59 00 95 32 BE 46 |OSITION X,Y..2.F|
00002A80: 99 22 13 11 11 1D 1D 1D 22 3B 3A 8B 58 B2 31 A7 |."......";:.X.1.|
00002A90: 31 38 31 32 35 00 AE 32 C8 46 81 58 5A B2 31 A4 |18125..2.F.XZ.1.|
00002AA0: 58 AB 31 3A 99 22 1D 1D 22 3B 3A 82 58 5A 00 BD |X.1:."..";:.XZ..|
00002AB0: 32 CD 46 8B 59 B2 31 A7 31 38 31 34 30 00 D6 32 |2.F.Y.1.18140..2|
00002AC0: D2 46 81 58 5A B2 31 A4 59 AB 31 3A 99 22 11 11 |.F.XZ.1.Y.1:."..|
00002AD0: 22 3B 3A 82 58 5A 00 DC 32 DC 46 8E 00 EE 32 18 |";:.XZ..2.F...2.|
00002AE0: 47 8F 20 44 52 41 57 20 53 51 55 41 52 45 00 F9 |G. DRAW SQUARE..|
00002AF0: 32 22 47 8D 31 38 31 30 30 00 0C 33 2C 47 99 22 |2"G.18100..3,G."|
00002B00: 05 CF D0 11 9D 9D CC BA 22 3B 3A 8E 00 1C 33 20 |........";:...3 |
00002B10: 4E 8F 20 43 4C 45 41 52 20 4B 42 44 00 38 33 21 |N. CLEAR KBD.83!|
00002B20: 4E A1 20 4B 42 24 3A 8B 20 4B 42 24 B3 B1 22 22 |N. KB$:. KB$..""|
00002B30: 20 A7 20 32 30 30 30 31 00 3E 33 22 4E 8E 00 4F | . 20001.>3"N..O|
00002B40: 33 2A 4E 8F 20 53 45 54 20 4B 59 3D 4B 42 24 00 |3*N. SET KY=KB$.|
00002B50: 6E 33 2B 4E A1 20 4B 42 24 3A 8B 20 4B 42 24 B2 |n3+N. KB$:. KB$.|
00002B60: 22 22 20 A7 20 4B 42 24 B2 C7 28 36 34 29 00 7E |"" . KB$..(64).~|
00002B70: 33 2C 4E 4B 59 B2 C6 28 4B 42 24 29 3A 8E 00 94 |3,NKY..(KB$):...|
00002B80: 33 F0 55 8F 20 2A 2A 2A 20 50 4C 45 41 53 45 20 |3.U. *** PLEASE |
00002B90: 57 41 49 54 00 BA 33 FA 55 8D 20 31 32 34 3A 99 |WAIT..3.U. 124:.|
00002BA0: 20 22 20 20 20 20 20 20 20 20 50 4C 45 41 53 45 | " PLEASE|
00002BB0: 20 57 41 49 54 2E 2E 2E 22 3B 00 C0 33 53 56 8E | WAIT...";..3SV.|
00002BC0: 00 D4 33 78 69 8F 20 2A 2A 2A 2A 20 43 4C 4F 53 |..3xi. **** CLOS|
00002BD0: 45 4F 55 54 00 E2 33 96 69 53 50 45 45 44 B2 32 |EOUT..3.iSPEED.2|
00002BE0: 35 35 00 FE 33 A0 69 99 20 22 93 11 11 11 20 20 |55..3.i. ".... |
00002BF0: 20 20 20 20 47 4F 4F 44 2D 42 59 45 20 22 00 04 | GOOD-BYE "..|
00002C00: 34 5F 6D 8E 00 1A 34 00 7D 8F 20 2A 2A 2A 20 53 |4_m...4.}. *** S|
00002C10: 4F 55 4E 44 20 53 45 54 55 50 00 28 34 84 80 8D |OUND SETUP.(4...|
00002C20: 31 32 33 3A 8D 31 33 30 00 2E 34 E7 80 8E 00 52 |123:.130..4....R|
00002C30: 34 B8 88 8F 20 2A 2A 2A 2A 20 43 4F 4D 50 55 54 |4... **** COMPUT|
00002C40: 45 52 20 4F 52 44 45 52 20 47 45 4E 45 52 41 54 |ER ORDER GENERAT|
00002C50: 4F 52 00 7F 34 1C 89 8B 20 BB 28 50 29 B3 2E 35 |OR..4... .(P)..5|
00002C60: 20 A7 20 33 35 39 39 39 3A 8F 20 53 4B 49 50 20 | . 35999:. SKIP |
00002C70: 35 30 25 20 4F 46 20 54 48 45 20 54 49 4D 45 00 |50% OF THE TIME.|
00002C80: AB 34 26 89 46 4C B2 30 3A 81 20 4E B2 31 20 A4 |.4&.FL.0:. N.1 .|
00002C90: 20 31 30 3A 8B 20 52 28 50 2C 4E 2C 30 29 B2 31 | 10:. R(P,N,0).1|
00002CA0: 20 A7 20 46 4C B2 31 3A 82 20 4E 00 EC 34 30 89 | . FL.1:. N..40.|
00002CB0: 8B 20 46 4C B2 31 20 A7 20 33 35 39 39 39 3A 8F |. FL.1 . 35999:.|
00002CC0: 20 53 4B 49 50 20 49 46 20 41 20 52 4F 42 4F 54 | SKIP IF A ROBOT|
00002CD0: 20 49 53 20 53 54 49 4C 4C 20 57 41 49 54 49 4E | IS STILL WAITIN|
00002CE0: 47 20 54 4F 20 47 45 54 20 4F 55 54 00 34 35 3A |G TO GET OUT.45:|
00002CF0: 89 8B 20 54 52 28 58 42 28 50 29 2C 59 42 28 50 |.. TR(XB(P),YB(P|
00002D00: 29 AA 31 29 B1 30 20 A7 20 33 35 39 39 39 3A 8F |).1).0 . 35999:.|
00002D10: 20 53 4B 49 50 20 49 46 20 52 4F 42 4F 54 20 49 | SKIP IF ROBOT I|
00002D20: 53 20 4F 4E 20 54 48 45 20 41 52 52 4F 57 20 53 |S ON THE ARROW S|
00002D30: 51 55 41 52 00 61 35 44 89 8B 20 50 4C B2 30 20 |QUAR.a5D.. PL.0 |
00002D40: A7 20 33 35 39 39 39 3A 8F 20 53 4B 49 50 20 4F |. 35999:. SKIP O|
00002D50: 4E 20 41 4C 54 45 52 4E 41 54 45 20 54 55 52 4E |N ALTERNATE TURN|
00002D60: 53 00 9F 35 80 89 46 4C B2 30 3A 20 8D 20 34 34 |S..5..FL.0: . 44|
00002D70: 31 30 30 3A 20 8B 20 46 4C B2 31 20 A7 20 89 20 |100: . FL.1 . . |
00002D80: 33 35 39 30 30 3A 8F 20 43 4F 52 52 45 43 54 20 |35900:. CORRECT |
00002D90: 46 4F 52 20 42 41 53 45 20 44 41 4D 41 47 45 00 |FOR BASE DAMAGE.|
00002DA0: E2 35 8A 89 8B 20 46 4C B2 32 20 A7 20 89 20 33 |.5... FL.2 . . 3|
00002DB0: 35 39 39 39 3A 8F 20 53 4B 49 50 20 49 46 20 42 |5999:. SKIP IF B|
00002DC0: 41 53 45 20 44 41 4D 41 47 45 20 43 41 4E 4E 4F |ASE DAMAGE CANNO|
00002DD0: 54 20 42 45 20 43 4F 52 52 45 43 54 45 44 20 4E |T BE CORRECTED N|
00002DE0: 4F 57 00 F8 35 94 89 8B 20 4D 50 28 30 29 B3 30 |OW..5... MP(0).0|
00002DF0: 20 A7 20 33 35 32 34 30 00 0F 36 9E 89 52 B2 52 | . 35240..6..R.R|
00002E00: 28 30 2C 4E 43 28 30 29 2C 4D 50 28 30 29 29 00 |(0,NC(0),MP(0)).|
00002E10: 27 36 A8 89 8D 31 32 35 3A 99 22 12 54 48 49 4E |'6...125:.".THIN|
00002E20: 4B 49 4E 47 92 22 3B 00 4C 36 E4 89 46 4C B2 30 |KING.";.L6..FL.0|
00002E30: 3A 4C 44 B2 30 3A 43 41 B2 43 41 AA 31 3A 8B 20 |:LD.0:CA.CA.1:. |
00002E40: 43 41 B1 32 30 20 A7 20 43 41 B2 31 00 9A 36 E9 |CA.20 . CA.1..6.|
00002E50: 89 43 28 31 29 B2 31 30 31 3A 43 28 32 29 B2 31 |.C(1).101:C(2).1|
00002E60: 3A 43 28 33 29 B2 31 30 32 3A 43 28 34 29 B2 31 |:C(3).102:C(4).1|
00002E70: 3A 43 28 35 29 B2 31 30 35 3A 43 28 36 29 B2 31 |:C(5).105:C(6).1|
00002E80: 3A 43 28 37 29 B2 31 30 31 3A 43 28 38 29 B2 AB |:C(7).101:C(8)..|
00002E90: 31 3A 43 28 39 29 B2 31 30 34 00 E0 36 EA 89 43 |1:C(9).104..6..C|
00002EA0: 28 31 30 29 B2 31 3A 43 28 31 31 29 B2 31 30 31 |(10).1:C(11).101|
00002EB0: 3A 43 28 31 32 29 B2 31 30 39 3A 43 28 31 33 29 |:C(12).109:C(13)|
00002EC0: B2 AB 31 3A 43 28 31 34 29 B2 31 30 31 3A 43 28 |..1:C(14).101:C(|
00002ED0: 31 35 29 B2 31 31 30 3A 43 28 31 36 29 B2 AB 31 |15).110:C(16)..1|
00002EE0: 00 FF 36 EB 89 43 28 31 37 29 B2 31 30 31 3A 8F |..6..C(17).101:.|
00002EF0: 20 44 45 46 41 55 4C 54 20 4F 52 44 45 52 53 00 | DEFAULT ORDERS.|
00002F00: 13 37 EE 89 8B 20 43 41 B1 31 30 20 89 20 33 35 |.7... CA.10 . 35|
00002F10: 33 31 33 00 5A 37 EF 89 91 20 43 41 20 8D 20 34 |313.Z7... CA . 4|
00002F20: 31 31 31 30 2C 34 33 31 30 30 2C 34 31 33 30 30 |1110,43100,41300|
00002F30: 2C 34 30 33 30 30 2C 34 32 31 30 30 2C 34 31 32 |,40300,42100,412|
00002F40: 31 30 2C 34 33 33 30 30 2C 34 31 31 32 30 2C 34 |10,43300,41120,4|
00002F50: 33 32 30 30 2C 34 31 33 31 30 00 66 37 F0 89 89 |3200,41310.f7...|
00002F60: 20 33 35 38 31 30 00 AF 37 F1 89 91 20 43 41 AB | 35810..7... CA.|
00002F70: 31 30 20 8D 34 30 32 30 30 2C 34 31 36 30 30 2C |10 .40200,41600,|
00002F80: 34 32 32 30 30 2C 34 31 31 30 30 2C 34 31 33 32 |42200,41100,4132|
00002F90: 30 2C 34 30 34 30 30 2C 34 32 32 30 30 2C 34 31 |0,40400,42200,41|
00002FA0: 32 30 30 2C 34 30 31 30 30 2C 34 31 32 32 30 00 |200,40100,41220.|
00002FB0: EF 37 E2 8B 8B 20 46 4C B2 31 20 A7 20 33 35 33 |.7... FL.1 . 353|
00002FC0: 30 30 3A 8F 20 49 46 20 4F 52 44 45 52 20 49 53 |00:. IF ORDER IS|
00002FD0: 20 4E 4F 20 47 4F 4F 44 2C 20 47 4F 20 4F 4E 20 | NO GOOD, GO ON |
00002FE0: 54 4F 20 54 48 45 20 4E 45 58 54 20 4F 4E 45 00 |TO THE NEXT ONE.|
00002FF0: 2B 38 EC 8B 8B 20 46 4C B2 32 20 A7 20 33 35 39 |+8... FL.2 . 359|
00003000: 30 30 3A 8F 20 54 48 49 53 20 57 41 53 20 41 4E |00:. THIS WAS AN|
00003010: 20 41 43 43 45 50 54 41 42 4C 45 20 44 45 46 45 | ACCEPTABLE DEFE|
00003020: 4E 53 49 56 45 20 4F 52 44 45 52 00 59 38 F6 8B |NSIVE ORDER.Y8..|
00003030: 8D 20 35 30 30 30 30 3A 8F 20 43 41 4C 43 55 4C |. 50000:. CALCUL|
00003040: 41 54 45 20 43 47 20 46 4F 52 20 54 48 45 20 50 |ATE CG FOR THE P|
00003050: 41 54 48 20 54 41 4B 45 4E 00 97 38 00 8C 8B 20 |ATH TAKEN..8... |
00003060: BB 28 58 29 B1 43 47 20 A7 20 33 35 33 30 30 3A |.(X).CG . 35300:|
00003070: 8F 20 49 46 20 4F 52 44 45 52 20 49 53 20 4E 4F |. IF ORDER IS NO|
00003080: 54 20 41 43 43 45 50 54 45 44 2C 20 47 45 54 20 |T ACCEPTED, GET |
00003090: 41 4E 4F 54 48 45 52 00 CC 38 3C 8C 81 20 4C B2 |ANOTHER..8<.. L.|
000030A0: 31 20 A4 20 32 30 3A 52 28 50 2C 4E 43 28 50 29 |1 . 20:R(P,NC(P)|
000030B0: 2C 4C 29 B2 43 28 4C 29 3A 82 20 4C 3A 8F 20 41 |,L).C(L):. L:. A|
000030C0: 43 43 45 50 54 20 4F 52 44 45 52 53 00 E6 38 41 |CCEPT ORDERS..8A|
000030D0: 8C 8F 20 44 4F 4E 27 54 20 50 52 49 4E 54 20 52 |.. DON'T PRINT R|
000030E0: 45 4C 45 41 53 45 00 00 39 46 8C 8D 20 38 30 30 |ELEASE..9F.. 800|
000030F0: 3A 8F 20 52 45 4C 45 41 53 45 20 52 4F 42 4F 54 |:. RELEASE ROBOT|
00003100: 00 10 39 9F 8C 8D 31 32 35 3A 8D 31 34 30 3A 8E |..9...125:.140:.|
00003110: 00 2A 39 40 9C 8F 20 2A 2A 20 44 45 46 45 4E 53 |.*9@.. ** DEFENS|
00003120: 49 56 45 20 4F 52 44 45 52 53 00 65 39 A4 9C 8B |IVE ORDERS.e9...|
00003130: 28 28 54 52 28 31 32 2C 38 29 B1 31 30 29 20 B0 |((TR(12,8).10) .|
00003140: 20 28 54 52 28 31 32 2C 37 29 B1 31 30 29 20 B0 | (TR(12,7).10) .|
00003150: 20 28 54 52 28 31 32 2C 36 29 B1 31 30 29 29 A7 | (TR(12,6).10)).|
00003160: 20 46 4C B2 31 00 90 39 A5 9C 8B 28 28 54 52 28 | FL.1..9...((TR(|
00003170: 31 32 2C 35 29 B1 31 30 29 20 B0 20 28 54 52 28 |12,5).10) . (TR(|
00003180: 31 33 2C 35 29 B1 31 30 29 29 A7 20 46 4C B2 31 |13,5).10)). FL.1|
00003190: 00 B8 39 AE 9C 43 28 35 29 B2 31 30 33 3A 43 28 |..9..C(5).103:C(|
000031A0: 39 29 B2 35 30 3A 43 28 31 30 29 B2 31 30 33 3A |9).50:C(10).103:|
000031B0: 43 28 31 31 29 B2 AB 31 00 E5 39 AF 9C 43 30 B2 |C(11)..1..9..C0.|
000031C0: 28 28 A8 20 43 30 29 AA 32 29 3A 8B 20 43 30 20 |((. C0).2):. C0 |
000031D0: A7 20 43 28 31 30 29 B2 31 30 34 3A 43 28 31 34 |. C(10).104:C(14|
000031E0: 29 B2 31 30 32 00 F6 39 B8 9C 8E 3A 8F 20 47 55 |).102..9...:. GU|
000031F0: 41 52 44 20 23 41 00 21 3A 08 9D 8B 28 28 54 52 |ARD #A.!:...((TR|
00003200: 28 31 36 2C 38 29 B1 31 30 29 20 B0 20 28 54 52 |(16,8).10) . (TR|
00003210: 28 31 36 2C 37 29 B1 31 30 29 29 A7 20 46 4C B2 |(16,7).10)). FL.|
00003220: 31 00 5C 3A 09 9D 8B 28 28 54 52 28 31 36 2C 36 |1.\:...((TR(16,6|
00003230: 29 B1 31 30 29 20 B0 20 28 54 52 28 31 36 2C 35 |).10) . (TR(16,5|
00003240: 29 B1 31 30 29 20 B0 20 28 54 52 28 31 35 2C 35 |).10) . (TR(15,5|
00003250: 29 B1 31 30 29 29 A7 20 46 4C B2 31 00 A3 3A 12 |).10)). FL.1..:.|
00003260: 9D 43 28 32 29 B2 AB 31 3A 43 28 34 29 B2 AB 31 |.C(2)..1:C(4)..1|
00003270: 3A 43 28 35 29 B2 31 30 33 3A 43 28 36 29 B2 AB |:C(5).103:C(6)..|
00003280: 31 3A 43 28 38 29 B2 31 3A 43 28 39 29 B2 35 30 |1:C(8).1:C(9).50|
00003290: 3A 43 28 31 30 29 B2 31 30 33 3A 43 28 31 31 29 |:C(10).103:C(11)|
000032A0: B2 AB 31 00 CE 3A 13 9D 43 28 31 32 29 B2 31 31 |..1..:..C(12).11|
000032B0: 31 3A 8B 20 A8 20 43 30 20 A7 20 43 28 31 30 29 |1:. . C0 . C(10)|
000032C0: B2 31 30 34 3A 43 28 31 34 29 B2 31 30 32 00 DF |.104:C(14).102..|
000032D0: 3A 1C 9D 8E 3A 8F 20 47 55 41 52 44 20 23 42 00 |:...:. GUARD #B.|
000032E0: 0A 3B 6C 9D 8B 28 28 54 52 28 31 36 2C 38 29 B1 |.;l..((TR(16,8).|
000032F0: 31 30 29 20 B0 20 28 54 52 28 31 36 2C 37 29 B1 |10) . (TR(16,7).|
00003300: 31 30 29 29 A7 20 46 4C B2 31 00 23 3B 6D 9D 8B |10)). FL.1.#;m..|
00003310: 28 54 52 28 31 34 2C 35 29 B1 31 30 29 A7 20 46 |(TR(14,5).10). F|
00003320: 4C B2 31 00 5E 3B 6E 9D 8B 28 28 54 52 28 31 36 |L.1.^;n..((TR(16|
00003330: 2C 36 29 B1 31 30 29 20 B0 20 28 54 52 28 31 36 |,6).10) . (TR(16|
00003340: 2C 35 29 B1 31 30 29 20 B0 20 28 54 52 28 31 35 |,5).10) . (TR(15|
00003350: 2C 35 29 B1 31 30 29 29 A7 20 46 4C B2 31 00 A5 |,5).10)). FL.1..|
00003360: 3B 76 9D 43 28 32 29 B2 AB 31 3A 43 28 34 29 B2 |;v.C(2)..1:C(4).|
00003370: AB 31 3A 43 28 35 29 B2 31 30 33 3A 43 28 36 29 |.1:C(5).103:C(6)|
00003380: B2 AB 31 3A 43 28 37 29 B2 31 30 32 3A 43 28 38 |..1:C(7).102:C(8|
00003390: 29 B2 31 3A 43 28 39 29 B2 35 30 3A 43 28 31 30 |).1:C(9).50:C(10|
000033A0: 29 B2 31 30 33 00 D7 3B 77 9D 43 28 31 31 29 B2 |).103..;w.C(11).|
000033B0: AB 31 3A 43 28 31 32 29 B2 31 31 30 3A 8B 20 43 |.1:C(12).110:. C|
000033C0: 30 20 A7 20 43 28 31 30 29 B2 31 30 34 3A 43 28 |0 . C(10).104:C(|
000033D0: 31 34 29 B2 31 30 32 00 E8 3B 80 9D 8E 3A 8F 20 |14).102..;...:. |
000033E0: 47 55 41 52 44 20 23 43 00 13 3C D0 9D 8B 28 28 |GUARD #C..<...((|
000033F0: 54 52 28 31 36 2C 38 29 B1 31 30 29 20 B0 20 28 |TR(16,8).10) . (|
00003400: 54 52 28 31 36 2C 37 29 B1 31 30 29 29 A7 20 46 |TR(16,7).10)). F|
00003410: 4C B2 31 00 4E 3C D1 9D 8B 28 28 54 52 28 31 36 |L.1.N<...((TR(16|
00003420: 2C 36 29 B1 31 30 29 20 B0 20 28 54 52 28 31 36 |,6).10) . (TR(16|
00003430: 2C 35 29 B1 31 30 29 20 B0 20 28 54 52 28 31 34 |,5).10) . (TR(14|
00003440: 2C 35 29 B1 31 30 29 29 A7 20 46 4C B2 31 00 89 |,5).10)). FL.1..|
00003450: 3C DA 9D 8B 28 28 54 52 28 31 36 2C 34 29 B2 31 |<...((TR(16,4).1|
00003460: 30 29 20 B0 20 28 54 52 28 31 35 2C 34 29 B2 31 |0) . (TR(15,4).1|
00003470: 30 29 20 B0 20 28 54 52 28 31 34 2C 34 29 B2 31 |0) . (TR(14,4).1|
00003480: 30 29 29 A7 20 46 4C B2 31 00 D1 3C E4 9D 43 28 |0)). FL.1..<..C(|
00003490: 32 29 B2 AB 31 3A 43 28 34 29 B2 AB 31 3A 43 28 |2)..1:C(4)..1:C(|
000034A0: 35 29 B2 31 30 34 3A 43 28 36 29 B2 AB 31 3A 43 |5).104:C(6)..1:C|
000034B0: 28 37 29 B2 31 30 32 3A 43 28 39 29 B2 31 30 31 |(7).102:C(9).101|
000034C0: 3A 43 28 31 31 29 B2 31 3A 43 28 31 32 29 B2 35 |:C(11).1:C(12).5|
000034D0: 30 00 03 3D E5 9D 43 28 31 33 29 B2 31 30 33 3A |0..=..C(13).103:|
000034E0: 43 28 31 34 29 B2 AB 31 3A 8B 20 43 30 20 A7 20 |C(14)..1:. C0 . |
000034F0: 43 28 31 33 29 B2 31 30 34 3A 43 28 31 37 29 B2 |C(13).104:C(17).|
00003500: 31 30 32 00 15 3D EE 9D 8E 3A 20 8F 20 47 55 41 |102..=...: . GUA|
00003510: 52 44 20 23 44 00 2B 3D 28 A0 8F 20 2A 2A 20 52 |RD #D.+=(.. ** R|
00003520: 45 41 52 20 41 54 54 41 43 4B 53 00 45 3D 8C A0 |EAR ATTACKS.E=..|
00003530: 43 28 33 29 B2 31 31 31 3A 8E 3A 8F 20 52 45 41 |C(3).111:.:. REA|
00003540: 52 20 23 41 31 00 5F 3D 96 A0 43 28 33 29 B2 31 |R #A1._=..C(3).1|
00003550: 31 30 3A 8E 3A 8F 20 52 45 41 52 20 23 41 32 00 |10:.:. REAR #A2.|
00003560: 81 3D A0 A0 43 28 33 29 B2 31 30 39 3A 43 28 36 |.=..C(3).109:C(6|
00003570: 29 B2 AB 31 3A 8E 3A 8F 20 52 45 41 52 20 23 41 |)..1:.:. REAR #A|
00003580: 33 00 AD 3D F0 A0 43 28 31 29 B2 31 30 32 3A 43 |3..=..C(1).102:C|
00003590: 28 33 29 B2 31 31 31 3A 43 28 35 29 B2 31 30 36 |(3).111:C(5).106|
000035A0: 3A 8E 3A 8F 20 52 45 41 52 20 23 42 31 00 D9 3D |:.:. REAR #B1..=|
000035B0: FA A0 43 28 31 29 B2 31 30 32 3A 43 28 33 29 B2 |..C(1).102:C(3).|
000035C0: 31 31 30 3A 43 28 35 29 B2 31 30 36 3A 8E 3A 8F |110:C(5).106:.:.|
000035D0: 20 52 45 41 52 20 23 42 32 00 0D 3E 04 A1 43 28 | REAR #B2..>..C(|
000035E0: 31 29 B2 31 30 32 3A 43 28 33 29 B2 31 30 39 3A |1).102:C(3).109:|
000035F0: 43 28 35 29 B2 31 30 36 3A 43 28 36 29 B2 AB 31 |C(5).106:C(6)..1|
00003600: 3A 8E 3A 8F 20 52 45 41 52 20 23 42 33 00 27 3E |:.:. REAR #B3.'>|
00003610: 54 A1 43 31 B2 43 31 AA 31 3A 8B 20 43 31 B1 32 |T.C1.C1.1:. C1.2|
00003620: 20 A7 20 43 31 B2 30 00 69 3E 59 A1 43 28 35 29 | . C1.0.i>Y.C(5)|
00003630: B2 31 30 31 AA 43 31 3A 43 28 36 29 B2 AB 31 3A |.101.C1:C(6)..1:|
00003640: 43 28 37 29 B2 31 30 39 3A 43 28 38 29 B2 31 3A |C(7).109:C(8).1:|
00003650: 43 28 39 29 B2 43 28 39 29 AB 43 31 3A 8E 3A 8F |C(9).C(9).C1:.:.|
00003660: 20 52 45 41 52 20 23 43 31 00 83 3E 5E A1 43 31 | REAR #C1..>^.C1|
00003670: B2 43 31 AA 31 3A 8B 20 43 31 B1 32 20 A7 20 43 |.C1.1:. C1.2 . C|
00003680: 31 B2 30 00 C5 3E 63 A1 43 28 35 29 B2 31 30 31 |1.0..>c.C(5).101|
00003690: AA 43 31 3A 43 28 36 29 B2 AB 31 3A 43 28 37 29 |.C1:C(6)..1:C(7)|
000036A0: B2 31 30 38 3A 43 28 38 29 B2 31 3A 43 28 39 29 |.108:C(8).1:C(9)|
000036B0: B2 43 28 39 29 AB 43 31 3A 8E 3A 8F 20 52 45 41 |.C(9).C1:.:. REA|
000036C0: 52 20 23 43 32 00 DF 3E 68 A1 43 31 B2 43 31 AA |R #C2..>h.C1.C1.|
000036D0: 31 3A 8B 20 43 31 B1 32 20 A7 20 43 31 B2 30 00 |1:. C1.2 . C1.0.|
000036E0: 25 3F 6D A1 43 28 35 29 B2 31 30 31 AA 43 31 3A |%?m.C(5).101.C1:|
000036F0: 43 28 36 29 B2 AB 31 3A 43 28 37 29 B2 31 30 37 |C(6)..1:C(7).107|
00003700: 3A 43 28 38 29 B2 31 3A 43 28 39 29 B2 43 28 39 |:C(8).1:C(9).C(9|
00003710: 29 AB 43 31 3A 43 28 31 30 29 B2 AB 31 3A 8E 3A |).C1:C(10)..1:.:|
00003720: 8F 20 23 43 33 00 3F 3F 80 A2 43 31 B2 43 31 AA |. #C3.??..C1.C1.|
00003730: 31 3A 8B 20 43 31 B1 32 20 A7 20 43 31 B2 30 00 |1:. C1.2 . C1.0.|
00003740: 82 3F 85 A2 43 28 35 29 B2 31 30 34 3A 43 28 36 |.?..C(5).104:C(6|
00003750: 29 B2 AB 31 3A 43 28 37 29 B2 31 30 37 3A 43 28 |)..1:C(7).107:C(|
00003760: 38 29 B2 31 3A 43 28 39 29 B2 31 30 31 3A 43 28 |8).1:C(9).101:C(|
00003770: 31 30 29 B2 AB 31 3A 8E 3A 8F 20 52 45 41 52 20 |10)..1:.:. REAR |
00003780: 23 44 00 98 3F 10 A4 8F 20 2A 2A 20 53 49 44 45 |#D..?... ** SIDE|
00003790: 20 41 54 54 41 43 4B 53 00 B3 3F 74 A4 43 32 B2 | ATTACKS..?t.C2.|
000037A0: 43 32 AA 31 3A 20 8B 20 43 32 B1 36 20 A7 20 43 |C2.1: . C2.6 . C|
000037B0: 32 B2 30 00 E4 3F 7E A4 43 28 33 29 B2 43 28 33 |2.0..?~.C(3).C(3|
000037C0: 29 AA 43 32 3A 43 28 36 29 B2 AB 31 3A 43 28 37 |).C2:C(6)..1:C(7|
000037D0: 29 B2 31 30 38 AB 43 32 3A 8E 3A 8F 20 53 49 44 |).108.C2:.:. SID|
000037E0: 45 20 23 41 00 FF 3F D8 A4 43 33 B2 43 33 AA 31 |E #A..?..C3.C3.1|
000037F0: 3A 20 8B 20 43 33 B1 35 20 A7 20 43 33 B2 30 00 |: . C3.5 . C3.0.|
00003800: 1A 40 E2 A4 43 34 B2 43 34 AA 31 3A 20 8B 20 43 |.@..C4.C4.1: . C|
00003810: 34 B1 33 20 A7 20 43 34 B2 30 00 66 40 EC A4 43 |4.3 . C4.0.f@..C|
00003820: 28 33 29 B2 31 30 32 AA 43 33 3A 43 28 35 29 B2 |(3).102.C3:C(5).|
00003830: 31 30 31 AA 43 34 3A 43 28 36 29 B2 AB 31 3A 43 |101.C4:C(6)..1:C|
00003840: 28 37 29 B2 31 30 36 AB 43 33 3A 43 28 38 29 B2 |(7).106.C3:C(8).|
00003850: 31 3A 43 28 39 29 B2 31 30 34 AB 43 34 3A 43 28 |1:C(9).104.C4:C(|
00003860: 31 30 29 B2 AB 31 00 80 40 ED A4 43 28 31 31 29 |10)..1..@..C(11)|
00003870: B2 31 30 32 3A 8E 3A 8F 20 53 49 44 45 20 23 42 |.102:.:. SIDE #B|
00003880: 00 97 40 F8 A7 8F 20 2A 2A 20 4F 54 48 45 52 20 |..@... ** OTHER |
00003890: 41 54 54 41 43 4B 53 00 B2 40 5C A8 43 35 B2 43 |ATTACKS..@\.C5.C|
000038A0: 35 AA 31 3A 20 8B 20 43 35 B1 32 20 A7 20 43 35 |5.1: . C5.2 . C5|
000038B0: B2 30 00 F9 40 66 A8 43 28 31 29 B2 31 30 32 3A |.0..@f.C(1).102:|
000038C0: 43 28 33 29 B2 31 31 33 3A 43 28 35 29 B2 31 30 |C(3).113:C(5).10|
000038D0: 36 AA 43 35 3A 43 28 37 29 B2 31 30 33 3A 43 28 |6.C5:C(7).103:C(|
000038E0: 38 29 B2 31 3A 43 28 39 29 B2 31 30 30 AA 43 35 |8).1:C(9).100.C5|
000038F0: 3A 8E 3A 8F 20 43 4C 4B 57 00 42 41 C0 A8 43 28 |:.:. CLKW.BA..C(|
00003900: 31 29 B2 31 30 32 3A 43 28 32 29 B2 AB 31 3A 43 |1).102:C(2)..1:C|
00003910: 28 33 29 B2 31 30 33 3A 43 28 34 29 B2 AB 31 3A |(3).103:C(4)..1:|
00003920: 43 28 35 29 B2 31 30 38 3A 43 28 36 29 B2 AB 31 |C(5).108:C(6)..1|
00003930: 3A 43 28 37 29 B2 31 31 32 3A 43 28 39 29 B2 31 |:C(7).112:C(9).1|
00003940: 30 32 00 64 41 C1 A8 43 36 B2 28 28 A8 20 43 36 |02.dA..C6.((. C6|
00003950: 29 AA 32 29 3A 8B 20 43 36 20 A7 20 43 28 37 29 |).2):. C6 . C(7)|
00003960: B2 31 31 33 00 7D 41 CA A8 8E 3A 8F 20 43 4F 55 |.113.}A...:. COU|
00003970: 4E 54 45 52 43 4C 4F 43 4B 57 49 53 45 00 A4 41 |NTERCLOCKWISE..A|
00003980: 24 A9 43 37 B2 28 28 A8 20 43 37 29 AA 32 29 3A |$.C7.((. C7).2):|
00003990: 8B 20 43 37 20 A7 20 43 38 B2 28 28 A8 20 43 38 |. C7 . C8.((. C8|
000039A0: 29 AA 32 29 00 DE 41 2E A9 43 28 35 29 B2 31 30 |).2)..A..C(5).10|
000039B0: 36 AA 43 37 3A 43 28 36 29 B2 AB 31 3A 43 28 37 |6.C7:C(6)..1:C(7|
000039C0: 29 B2 31 30 37 AA 43 38 3A 43 28 39 29 B2 31 30 |).107.C8:C(9).10|
000039D0: 31 AA 43 37 3A 8E 3A 8F 20 46 52 4F 4E 54 00 07 |1.C7:.:. FRONT..|
000039E0: 42 E0 AB 8F 20 2A 2A 20 43 48 45 43 4B 20 46 4F |B... ** CHECK FO|
000039F0: 52 20 42 41 53 45 20 53 51 55 41 52 45 20 44 45 |R BASE SQUARE DE|
00003A00: 53 54 52 4F 59 45 44 00 1B 42 44 AC 8B 20 54 28 |STROYED..BD.. T(|
00003A10: 31 33 2C 37 29 B2 35 20 A7 20 8E 00 31 42 4E AC |13,7).5 . ..1BN.|
00003A20: 8B 20 54 52 28 31 33 2C 37 29 B1 31 30 20 A7 20 |. TR(13,7).10 . |
00003A30: 8E 00 4C 42 58 AC 8B 20 54 52 28 31 33 2C 38 29 |..LBX.. TR(13,8)|
00003A40: B1 31 30 20 A7 20 46 4C B2 32 3A 8E 00 88 42 62 |.10 . FL.2:...Bb|
00003A50: AC 46 4C B2 31 3A 43 28 31 29 B2 31 30 31 3A 43 |.FL.1:C(1).101:C|
00003A60: 28 32 29 B2 31 3A 43 28 33 29 B2 31 30 31 3A 43 |(2).1:C(3).101:C|
00003A70: 28 34 29 B2 31 3A 43 28 35 29 B2 31 30 31 3A 43 |(4).1:C(5).101:C|
00003A80: 28 36 29 B2 39 39 3A 8E 00 9F 42 50 C3 8F 20 2A |(6).99:...BP.. *|
00003A90: 2A 20 50 41 54 48 20 41 4E 41 4C 59 5A 45 52 00 |* PATH ANALYZER.|
00003AA0: D0 42 B4 C3 4C B2 31 3A 48 B2 32 3A 58 B2 58 42 |.B..L.1:H.2:X.XB|
00003AB0: 28 31 29 3A 59 B2 59 42 28 31 29 AA 31 3A 4C 54 |(1):Y.YB(1).1:LT|
00003AC0: B2 30 3A 43 B2 43 28 31 29 AB 31 3A 43 47 B2 31 |.0:C.C(1).1:CG.1|
00003AD0: 00 EE 42 BE C3 8B 20 43 B2 31 30 30 20 A7 20 4C |..B... C.100 . L|
00003AE0: B2 32 3A 43 B2 43 28 32 29 3A 4C 54 B2 31 00 04 |.2:C.C(2):LT.1..|
00003AF0: 43 18 C4 8B 20 43 B2 30 20 A7 20 90 3A 8F 20 45 |C... C.0 . .:. E|
00003B00: 52 52 4F 52 00 20 43 22 C4 8B 20 43 B3 31 30 20 |RROR. C".. C.10 |
00003B10: A7 20 35 30 36 30 30 3A 8F 20 52 4F 54 41 54 45 |. 50600:. ROTATE|
00003B20: 00 3F 43 2C C4 8B 20 43 B1 31 30 30 20 A7 20 35 |.?C,.. C.100 . 5|
00003B30: 31 30 30 30 3A 8F 20 4D 4F 56 45 4D 45 4E 54 00 |1000:. MOVEMENT.|
00003B40: 76 43 36 C4 8B 20 43 B2 31 30 30 20 A7 20 4C B2 |vC6.. C.100 . L.|
00003B50: 4C AA 31 3A 43 B2 43 28 4C 29 3A 89 20 35 30 32 |L.1:C.C(L):. 502|
00003B60: 30 30 3A 8F 20 4D 4F 56 45 4D 45 4E 54 20 43 4F |00:. MOVEMENT CO|
00003B70: 4D 50 4C 45 54 45 00 83 43 7C C4 8F 20 2A 20 57 |MPLETE..C|.. * W|
00003B80: 41 49 54 00 A7 43 86 C4 4C 54 B2 4C 54 AA 43 AB |AIT..C..LT.LT.C.|
00003B90: 31 30 3A 4C B2 4C AA 31 3A 43 B2 43 28 4C 29 3A |10:L.L.1:C.C(L):|
00003BA0: 89 20 35 30 32 30 30 00 B6 43 A8 C5 8F 20 2A 20 |. 50200..C... * |
00003BB0: 52 4F 54 41 54 45 00 C0 43 B2 C5 48 B2 48 AA 43 |ROTATE..C..H.H.C|
00003BC0: 00 D0 43 BC C5 8B 20 48 B2 30 20 A7 20 48 B2 34 |..C... H.0 . H.4|
00003BD0: 00 E0 43 C6 C5 8B 20 48 B2 35 20 A7 20 48 B2 31 |..C... H.5 . H.1|
00003BE0: 00 01 44 D0 C5 4C 54 B2 4C 54 AA 31 3A 4C B2 4C |..D..LT.LT.1:L.L|
00003BF0: AA 31 3A 43 B2 43 28 4C 29 3A 89 20 35 30 32 30 |.1:C.C(L):. 5020|
00003C00: 30 00 07 44 37 C7 8E 00 18 44 38 C7 8F 20 2A 20 |0..D7....D8.. * |
00003C10: 4D 4F 56 45 4D 45 4E 54 00 2A 44 9C C7 8B 20 48 |MOVEMENT.*D... H|
00003C20: B2 31 20 A7 20 58 B2 58 AA 31 00 3C 44 A6 C7 8B |.1 . X.X.1.<D...|
00003C30: 20 48 B2 32 20 A7 20 59 B2 59 AA 31 00 4E 44 B0 | H.2 . Y.Y.1.ND.|
00003C40: C7 8B 20 48 B2 33 20 A7 20 58 B2 58 AB 31 00 60 |.. H.3 . X.X.1.`|
00003C50: 44 BA C7 8B 20 48 B2 34 20 A7 20 59 B2 59 AB 31 |D... H.4 . Y.Y.1|
00003C60: 00 71 44 00 C8 4C 54 B2 4C 54 AA 31 3A 46 4C B2 |.qD..LT.LT.1:FL.|
00003C70: 30 00 BA 44 0A C8 91 20 54 28 58 2C 59 29 8D 35 |0..D... T(X,Y).5|
00003C80: 32 31 30 30 2C 35 32 32 30 30 2C 35 32 33 30 30 |2100,52200,52300|
00003C90: 2C 35 32 34 30 30 2C 35 32 35 30 30 2C 35 32 36 |,52400,52500,526|
00003CA0: 30 30 2C 35 32 37 30 30 2C 35 32 38 30 30 2C 35 |00,52700,52800,5|
00003CB0: 32 39 30 30 2C 35 33 30 30 30 00 C4 44 0F C8 43 |2900,53000..D..C|
00003CC0: B2 43 AB 31 00 D7 44 14 C8 8B 20 46 4C B2 31 20 |.C.1..D... FL.1 |
00003CD0: A7 20 35 30 39 39 39 00 E3 44 1E C8 89 20 35 30 |. 50999..D... 50|
00003CE0: 32 30 30 00 FA 44 20 CB 8F 20 2A 2A 20 54 45 52 |200..D .. ** TER|
00003CF0: 52 41 49 4E 20 54 59 50 45 53 00 08 45 84 CB 8F |RAIN TYPES..E...|
00003D00: 20 2A 20 43 4C 45 41 52 00 0E 45 E7 CB 8E 00 20 | * CLEAR..E.... |
00003D10: 45 E8 CB 8F 20 2A 20 4F 46 46 20 42 4F 41 52 44 |E... * OFF BOARD|
00003D20: 00 26 45 4B CC 90 00 35 45 4C CC 8F 20 2A 20 43 |.&EK...5EL.. * C|
00003D30: 52 41 54 45 52 00 42 45 56 CC 43 47 B2 43 47 AC |RATER.BEV.CG.CG.|
00003D40: 2E 38 00 68 45 60 CC 4C 43 B2 28 54 55 AA 28 4C |.8.hE`.LC.(TU.(L|
00003D50: 54 AD 35 30 30 30 29 AB 54 28 58 2C 59 29 AB 2E |T.5000).T(X,Y)..|
00003D60: 30 30 31 29 AC 35 30 30 00 7C 45 65 CC 8B 20 4C |001).500.|Ee.. L|
00003D70: 43 B3 2E 31 20 A7 20 4C 43 B2 2E 31 00 92 45 6A |C..1 . LC..1..Ej|
00003D80: CC 8B 20 4C 43 B3 31 20 A7 20 43 47 B2 43 47 AC |.. LC.1 . CG.CG.|
00003D90: 4C 43 00 98 45 AF CC 8E 00 A9 45 B0 CC 8F 20 2A |LC..E.....E... *|
00003DA0: 20 42 55 49 4C 44 49 4E 47 00 B6 45 BA CC 43 47 | BUILDING..E..CG|
00003DB0: B2 43 47 AC 2E 33 00 BF 45 C4 CC 46 4C B2 31 00 |.CG..3..E..FL.1.|
00003DC0: E0 45 CE CC 8B 28 28 4C 44 B2 31 29 AF 28 4C 54 |.E...((LD.1).(LT|
00003DD0: B1 31 35 29 29 A7 20 43 47 B2 43 47 AC 32 2E 35 |.15)). CG.CG.2.5|
00003DE0: 00 E6 45 13 CD 8E 00 FD 45 14 CD 8F 20 2A 20 53 |..E.....E... * S|
00003DF0: 45 43 4F 4E 44 41 52 59 20 42 41 53 45 00 06 46 |ECONDARY BASE..F|
00003E00: 1E CD 46 4C B2 31 00 0C 46 77 CD 8E 00 21 46 78 |..FL.1..Fw...!Fx|
00003E10: CD 8F 20 2A 20 50 52 49 4D 41 52 59 20 42 41 53 |.. * PRIMARY BAS|
00003E20: 45 00 2A 46 82 CD 46 4C B2 31 00 30 46 DB CD 8E |E.*F..FL.1.0F...|
00003E30: 00 43 46 DC CD 8F 20 2A 20 42 49 47 20 43 52 41 |.CF... * BIG CRA|
00003E40: 54 45 52 00 50 46 E6 CD 43 47 B2 43 47 AC 2E 34 |TER.PF..CG.CG..4|
00003E50: 00 6F 46 F0 CD 8B 28 28 4C 44 B2 31 29 AF 28 4C |.oF...((LD.1).(L|
00003E60: 54 B1 31 35 29 29 A7 20 43 47 B2 43 47 AC 32 00 |T.15)). CG.CG.2.|
00003E70: 75 46 3F CE 8E 00 83 46 40 CE 8F 20 2A 20 54 52 |uF?....F@.. * TR|
00003E80: 45 45 53 00 8C 46 4A CE 46 4C B2 31 00 99 46 54 |EES..FJ.FL.1..FT|
00003E90: CE 43 47 B2 43 47 AC 2E 34 00 B8 46 5E CE 8B 28 |.CG.CG..4..F^..(|
00003EA0: 28 4C 44 B2 31 29 AF 28 4C 54 B1 31 35 29 29 A7 |(LD.1).(LT.15)).|
00003EB0: 20 43 47 B2 43 47 AC 32 00 BE 46 A3 CE 8E 00 CC | CG.CG.2..F.....|
00003EC0: 46 A4 CE 8F 20 2A 20 48 49 4C 4C 53 00 D2 46 07 |F... * HILLS..F.|
00003ED0: CF 8E 00 DF 46 08 CF 8F 20 2A 20 4C 41 4B 45 00 |....F... * LAKE.|
00003EE0: EC 46 12 CF 43 47 B2 43 47 AC 2E 31 00 F5 46 1C |.F..CG.CG..1..F.|
00003EF0: CF 46 4C B2 31 00 0A 47 26 CF 8B 20 4C 44 B2 31 |.FL.1..G&.. LD.1|
00003F00: 20 A7 20 43 47 B2 43 47 AC 37 00 10 47 EF D2 8E | . CG.CG.7..G...|
00003F10: 00 27 47 F0 D2 8F 20 53 4F 55 4E 44 20 47 45 4E |.'G... SOUND GEN|
00003F20: 45 52 41 54 49 4F 4E 00 46 47 FA D2 53 B2 35 34 |ERATION.FG..S.54|
00003F30: 32 37 32 3A 97 20 53 AA 32 34 2C 31 35 3A 8F 20 |272:. S.24,15:. |
00003F40: 56 4F 4C 55 4D 45 00 5B 47 04 D3 97 20 53 AA 31 |VOLUME.[G... S.1|
00003F50: 2C 53 31 20 3A 8F 20 46 52 45 51 00 73 47 0E D3 |,S1 :. FREQ.sG..|
00003F60: 97 20 53 AA 35 2C 53 35 20 3A 8F 20 41 54 54 2F |. S.5,S5 :. ATT/|
00003F70: 44 45 43 00 8B 47 18 D3 97 20 53 AA 36 2C 53 36 |DEC..G... S.6,S6|
00003F80: 20 3A 8F 20 53 55 53 2F 52 45 4C 00 AB 47 22 D3 | :. SUS/REL..G".|
00003F90: 97 20 53 AA 34 2C 53 34 AA 31 3A 8F 20 57 41 56 |. S.4,S4.1:. WAV|
00003FA0: 46 52 4D 2F 47 41 54 45 20 4F 4E 00 C8 47 2C D3 |FRM/GATE ON..G,.|
00003FB0: 81 20 4A 31 B2 31 A4 20 53 41 3A 82 3A 8F 20 41 |. J1.1. SA:.:. A|
00003FC0: 54 54 20 44 45 4C 41 59 00 E1 47 36 D3 97 20 53 |TT DELAY..G6.. S|
00003FD0: AA 34 2C 53 34 20 3A 8F 20 47 41 54 45 20 4F 46 |.4,S4 :. GATE OF|
00003FE0: 46 00 FE 47 40 D3 81 20 4A 31 B2 31 A4 20 53 44 |F..G@.. J1.1. SD|
00003FF0: 3A 82 3A 8F 20 44 45 43 20 44 45 4C 41 59 00 1E |:.:. DEC DELAY..|
00004000: 48 4A D3 97 20 53 AA 31 2C 30 20 3A 8F 20 46 52 |HJ.. S.1,0 :. FR|
00004010: 45 51 20 28 53 4F 55 4E 44 20 4F 46 46 29 00 24 |EQ (SOUND OFF).$|
00004020: 48 53 D3 8E 00 00 00 |HS..... |
....... 10000:. MAIN PROGRAM.C.... THE F
INAL CONFLICT, C-64 VERSION.].D.. DRAW O
R ERASE ROBOT.V.X...3);:. P.1 . ..23);.|
.Y... .Z.."......................";:.120
.E.{..".......................";:.120.V.
|..123:.".";:....}.."...................
......";:.120......"
";:..I...."
";:.._.H.. ****ORDER ENTRY.M.R.. P.
0 . 1...W.. MP(P).0 . MP(P).MP(P).1:. MP
(P).0 . . 9500...Y.. MP(P).0 . 290......
MP(P).0 . . 820: . MP(P).0 . 290:. SKIP
IF NO ROBOTS AVAIL....... OP.1 . 230.!.
...((P.1).(I.1)). . 35000.1.... P.1 . 29
0.I.... MP(P).1 . MP(P).2:R(P,NC(P),1).1
01:R(P,NC(P),2).0.....R.R(P,NC(P),MP(P))
......((R.10).(R.100)). . 400: . 290....
.. 300:. PRINT AN ORDER.G.".. P.M.+.....
,..(B(56320.P).15).15.310...-..(B(56320.
P).15).11.PD(P).PD(P).1.5....(B(56320.P)
.15).7 .PD(P).PD(P).1.K.6..PD(P).0 .PD(P
).5.A.7..PD(P).5 .PD(P).0...@.PD.PD(P):.
125:.OD$(PD);: .(B(56320.P).16).0 . .600
............(B(56320.P).15).15.410......
(B(56320.P).15).11.PX(P).PX(P).1......(B
(56320.P).15).7 .PX(P).PX(P).1......PX(P
).0 .PX(P).9.2....PX(P).9 .PX(P).0.Q...P
D.PX(P):.125:.".....";PD;.N....(B(56320.
P).16).0 ..500.T..........***ACCEPT MOVE
OR WAIT VALUE...... R.10 . A$."WAIT ".G
.... R.100 . A$."MOVE "......124:.140:.1
24:.MP(P).1;A$;PD;:.125:.140...&.R(P,NC(
P),MP(P)).R.PD.3.0.MP(P).MP(P).1:R(P,NC(
P),MP(P)).0.=.:.. 670.U.X..***ACCEPT AN
ORDER...G.. PD.2 . . 125:. ".MOVE .";:R(
P,NC(P),MP(P)).100:. 680.I.H.. PD.3 . .1
25:.".WAIT .";:R(P,NC(P),MP(P)).10: . 68
0...V..124:.140:.124:. MP(P).1;OD$(PD):.
125:.140......(PD.5). 662.T...R(P,NC(P),
MP(P)).OD(PD): . MP(P).21 . MP(P).MP(P).
1:R(P,NC(P),MP(P)).0.Q.... PD.4 . . 800:
. RELEASE.{.... 670.....MP(P).MP(P).1: R
(P,NC(P),MP(P)).0.K.... MP(P).2 . MP(P).
2: R(P,NC(P),1).101...... MP(P).21 . PD.
4:. 630......(B(56320.P).16).0 .680.....
.... .. RELEASE ROBOT.A.*.R(P,NC(P),0).1
:H(P,NC(P)).4.2.P.V./.. 920:. ARPEGGIO.N
.4.. FIND UNUSED ROBOT.V.>.N.1...H.. R(P
,N,0).0 . . 842...I.. 850...J.MP(P).1:H(
P,N).4.P.2:NC(P).N:X(P,N).XB(P):Y(P,N).Y
B(P): . 899...R.N.N.1:. N.11 . 840...\.M
P(P).0............ ****SOUNDS.;...S4.16:
S5.0:S6.240:SA.10:SD.1:.903....S1.40:S5
.0:S6.240:S4.128:SA.10:SD.0:.54000:S1.10
:. 54000:. TYPE......J2.0.3:S1.25:.54000
:S1.20:.54000:.:.:. PROMPT......J2.0.3:.
938:.J1.0.40:.:.:.:. BATTLE STATIONS.'..
.S1.1:S5.10:S6.251:S4.128:SA.200:SD.999:
.54000:. BASE EXPLOSION.F....908:.911:.
DETONATE ROBOT.Z...S4.32:S5.0:S6.240:SA.
10:SD.1:. DEACTIVATE ROBOT......J2.80.20
..10:.S1.J2.J2.20..4:.54000:.:.:..I...S5
.5:S6.5:S4.16:SA.20:SD.20......S1.40.5..
2:.54000:.J1.1.20:.:.:.:. SINKING.....S1
.40:S4.128:.928:. RATTLE.4....J2.0.1:.92
5:.:.S.1,0:..L...S4.32:S5.0:S6.240:SA.10
:SD.1:.S1.20.100.20:.54000:.......S1.100
.20..20:.54000:.:.:. RELEASE ROBOT ARPEG
GIO.H...S1.10:S4.32:. 928:. ROTATE ROBOT
.....S1.30:S4.32:. 928:. ROTATE ROBOT.#.
..S4.128:S5.0:S6.128:SA.1:SD.1:S1.0:.540
00:.S.4,129.=....S1.10.15:.S.1,S1:.:..F.
..929.~...S5.0:S6.240:SA.5:SD.5:.54000:
S1.S1.10:. 54000:. 919.....S1.0:S5.0:S6.
240:S4.32:SA.1:SD.1:.54000:.S.4,S4.1....
..S1.20.100:.S.1,S1:.:.S.1,0:.:. WHOOP..
.... ****ORDER EXECUTION FOR PLAYER PL..
.L.. N . 1 . 10.(.V.RP.R(PL,N,0).G.`.. R
P.0 . 1900: . NO ORDERS.X.J.R.R(PL,N,RP)
.}.... R.0 . . 2000:. GET RANDOM MOVE...
... R.100 . . 3000: . 1900: . MOVE AHEAD
.K.D.. R.10 . . 4000: . 1900:. WAIT...N.
. R.10 . . 5000: . 1900:. ROTATE...X..:
. ERROR...L.. N...O...,.P.. *** GENERATE
RANDOM MOVE.Z.4.. RP.1 . RP.2: R(PL,N,0
).RP: R(PL,N,RP).0.V.9.R(PL,N,0).RP.1: R
P.RP.1...>.. .(RP)..4 . R..(1.2..(RP)):
. 2999:. ROTATE.Y.H.. .(RP)..7 . R.101..
(9..(RP).2):. 2999:. MOVE...R.R.11..(9..
(RP).2): . 2999: . WAIT............ ***
MOVE AHEAD.1.B.R.R.1:R(PL,N,RP).R.W.C..
R.100 . R(PL,N,0).RP.1:R(PL,N,RP).0:. DE
CREMENTMOVEMENT COMMAND...L.. 3100: . CA
LCULATE NEW POSITION (X1,Y1)...V..((X0.X
B(PL)).(Y0.YB(PL))). . 3500: . 3099:. LE
AVE BASE. .... TR(X1,Y1).0 . . 3200: . 3
060: . TARGET SQUARE IS OCCUPIED.B.... T
(X1,Y1). 6100,6200,6300,6400,6500,6600,6
700,6800,6900,7000...... TERRAIN-DEPENDE
NT SUBR'S...... TR(X0,Y0)..0 . . 3099...
..X.X0:Y.Y0......T(X0,Y0).16100,16200,16
300,16400,16500,16600,16700,16800,16900,
17000...... RESTORE PREVIOUS TERRAIN....
...C.... ***CALCULATE FROM AND TO POSITI
ONS.G.&.X0.X(PL,N):Y0.Y(PL,N):H.H(PL,N).
..0.. H.1 . X1.X0.1:Y1.Y0:.3160...:.. H.
2 . X1.X0:Y1.Y0.1:.3160.G.D.. H.3 . X1.X
0.1:Y1.Y0:.3160...N.. H.4 . X1.X0:Y1.Y0.
1:.3160...S..:. ERROR...X.X.X0:Y.Y0....
..+....** TARGET SQUARE IS OCCUPIED.B...
PT..(TR(X1,Y1).11).V.... PT..PL . 3250..
.... 8400: . WAIT TO AVOID FRIENDLY ROBO
T...... 3299...... 8100:. DETONATE MOVIN
G ROBOT.S.... 8110: . DETONATE TARGET RO
BOT.Y..........** MOVING OUT OF BASE.2..
.. T(X1,Y1).5 . . 8350: . 3599: . COLLIS
ION WITH SECONDARY.J.... BASE (DEACTIVAT
E).C.... TR(X1,Y1).0 . 3560...... 8400:
. AVOID COLL. BY WAITING...... 3599.T...
X(PL,N).X1:Y(PL,N).Y1:TR(X1,Y1).10.PL.N:
. MOVE TO NEW SQUARE.....X.X1:Y.Y1: . 18
000: . DRAW ROBOT IN NEW SQUARE.........
....". .. *** WAIT.^...R.R.1:R(PL,N,RP).
R:. R.10 . R(PL,N,0).RP.1:R(PL,N,RP).0.D
.......... *** ROTATE RIGHT OR LEFT.....
H0.H(PL,N):H1.R.H0...... H1.0 . H1.4....
.. H1.5 . H1.1......((H1.1).(H1.4)). .:.
ERR...P.H.H0:X.X(PL,N):Y.Y(PL,N).*.Z..(
(X(PL,N).XB(PL)).(Y(PL,N).YB(PL))). . 54
00.J.[.. IF IT'S STILL IN THE BASE.E.D..
18200: . ERASE ROBOT...N.. PL.1 .922,92
3:. ROTATE ROBOT.....H.H1: . 18000: . DR
AW IT ROTATED.K...H(PL,N).H1:R(PL,N,0).R
P.1.Q.O.....P..*** TERRAIN TYPES...T.. *
* CLEAR TERRAIN.L...TR(X0,Y0).0:TR(X1,Y1
).10.PL.N:X(PL,N).X1:Y(PL,N).Y1:. UPDATE
ROBOT LOCA-.A.... TION MATRICES......
18200: . ERASE ROBOT FROM OLD SQUARE....
.. PL.1 .918,919:. ROBOT MOVING.....X.X1
:Y.Y1:. 18000:. DRAW ROBOT IN NEW SQUARE
.........8.. **OFF BOARD...B.. 8100:. DE
TONATE MOVING ROBOT.!.L...0.... **CRATER
.P.... .(X).(TU.T(X1,Y1)..001).500 . . 8
100: . 6390: . DET MOV R...... .(X)..67
. . 8400: . 6390:. UNSUCESFUL ATEMPT TO
ENTER CR...... 6100.A.....R....** BUILDI
NG...... 8100:. DET. MOVING ROBOT......
.(X)..5 . 6440:. BUILDING REMAINS.:....
8140:. CONVERT BLDG TO CRT.@.(...V.D..**
SECONDARY BASE.Q.I..((X1.9).(PL.1)). 651
0...J..((X1.9).(PL.0)). 6510...K.. 8350:
. DEACTIVATE...L.. 6599.B.N.. 8100: . 81
30.P.X.P..(X0.9).Z....9510...... MP(P).0
. MP(P).0.( ..MP(P).MP(P)..(.(TM).20.(1
.4..(1))):. REPAIR DELAY.T ..R(P,NC(P),0
)..1:. DISABLE CURRENT ROBOT.Z G...O H..
** PRIMARY BASE.. R..((X1.9).(PL.0)). 66
80.. ...((X1.9).(PL.1)). 6680.. ..WI.PL.
Q ... 8100: . 8130: . DETONATIONS.. ...
6699.. ... 8350:. DEACTIVATE.. +....!,..
** BIG CRATER.4!6.. 6100: . MOVE ROBOT T
O NEW SQUARE.N!@.. .(X)..5 . R(PL,N,R(PL
,N,0)).0:. ROBOT LOSES PROGRAM.T!.....!.
..** TREES..!... PL.0 . . 18200: . 6100:
. PLYR0 GOES RIGHT THRU..!... PL.1 . .
6400:. PLYR1 TREATS TREES AS BUILDING..!
....."...** HILLS.6"... PL.0 . . 6400:.
PLYR0 TREATS HILLS AS BUILDING.L"... PL.
1 . . 18200: . 6100: . PLYR1 GOES THRU H
ILLS.R"W..."X..** LAKE.."B.. 8100:. DET
ONATE.."{.. 916 :. SINKING SOUND.."....X
"@..** DETONATIONS/DEACTIVATIONS.."... D
ETONATE MOVING ROBOT.&#... 911:.18200:.8
200:R(PL,N,0)..1:TR(X0,Y0).0:..W#... DET
ERMINE OWNER AND NUMBER OF TARGET ROBOT.
.#..PT..(TR(X1,Y1).11):NT.TR(X1,Y1).10.P
T:. 911:TR(X1,Y1).0..#... DETONATE TARGE
T ROBOT..#..X.X1:Y.Y1..#... 8200:. 8260:
T(X1,Y1).TU:R(PT,NT,0)..1:...$B..913:X.
X1:Y.Y1:.8200:.8260:. DET. BASE.*$C.T(X1
,Y1).TU: ..D$L.X.X1:Y.Y1:. DET. BLDG.H$M
..911:.8210:.8260:T(X1,Y1).TU: ..Z$...**
EXPLOSION..$. . BASE EXPLOSION..$. .181
00:."........";..$. .18100:.".ZZ...ZZ";.
X$& .18200:. DRAW SQUARE..$D . 16300:. D
RAW CRATER..%E Z3.Z3.(1..1.Z3):.:. CRATE
R.(%. . DEACTIVATE ROBOT.P%. . 914:. 182
00:R(PL,N,R(PL,N,0)).0:..M%P . RESTORE P
REVIOUS ORDER..%R . R.100 . R(PL,N,0).RP
:R(PL,N,RP).101:. 8420..%Z R(PL,N,RP).R(
PL,N,RP).1..%. .:. AVOID COLLISION/ONE M
OVE DELAY..%'#...%(#. ***** MAIN MODULE.
.&.#. 9200: . PRESTART.4&.#. 9400: . ORD
ER EXECUTION.`& #. WI..0 . FL.0:. 9170:.
TEST FOR WINNER..&.#. 9300: . ORDER ENT
RY EXECUTIVE..&H#. 9110..&R#. 9800: . GA
ME RESULT..&.#..K&.#. ***** PRESTART ORD
ERS..&.#. P.0 . 1:.9530:.9500:...&.$. I.
1 . TP..'.$. 210:. ORDER ENTRY..'.$. I..
'S$..='T$.***** ORDER ENTRY EXECUTIVE.O'
^$. P.0.1:.9500.F'_$. MP(P).0 . . 9510.N
'`$. P.~'H$. I. 1 . TM..'R$. 210:. ORDER
ENTRY..'|$. I..'.$...'.$.***** ORDER EX
ECUTION.J'B$. 9520..'L$. 1000:. ORDER EX
ECUTION FOR PLAYER PL..(V$PL.PL.1:. PL.1
. PL.0..(.$TU.TU..0001:. TURN COUNTER.B
(.$. P.0.1:.9530:..H(.%..}(.%.122:."..
PREPARE ";:.123:." ORDERS .";:...(
&%.122:."..BASE DAMAGED";:.123:."UNDER R
EPAIR.";:...(0%.P.0.1:.122:.". MOVEMENT
";:.123:." EXECUTION .";:...(1%...):%
.122:.140:.123:.140:..%)H&. ***** GAME R
ESULT.Y)\&A$."THE ROBOTS FROM THE WEST H
AVE WON THE WAR!"..)F&. WI . A$."THE ROB
OTS FROM THE EAST HAVE WON THE WAR!"..)P
&. 13500:. CRAWLER.N)Z&A$."HIT ANY KEY T
O END IT ALL."..).&. 12040:. DELAY..).&.
14500:. PRINT MESSAGE..*.&. WI . 9874.A
*.&.X.13.15:.Y.6.8:.911:.16300:.:.:. BLO
W UP EAST.K*.&.Y.5.9:.X.12.16:.911:.1630
0:.:.:.9877..*.&.X.3.5:.Y.2.4:.911:.1630
0:.:.:. BLOW UP WEST..*.&.Y.1.5:.X.2.6:.
911:.16300:.:...*.&P.0:.122:.130:.123:.1
30:.124:.130:.125..*.&.130:.123..+.&A$."
.DO YOU WANT TO PLAY AGAIN?".8+.&. 14300
: . FL . . 22000.>+.&..Y+.'. ******* MAI
N PROGRAM.}+<(. 32000: . SETUP SOUND ROU
TINES..+.). 9000:. MAIN MOD-ULE..+H). FL
.1 . . "TFCSETUP",8.J+.*. 27000:. CLOSEO
UT.P+.*...+.*. *** SCREEN CONTROL..+\+.
** CENTER..,F+. C(A$).38 . 11199.,,P+. I
C . 1 . (40.C(A$)).2.6,Q+.".";.<,R+..B,.
+..S,... *** PAUSES.R,... DY.1 . 200:.:.
:. 0.2 SEC..,... DY.1 . 500:.:.:. 0.5 SE
C..,... DY.1 . 1000:.:.:. 1 SEC.N,... DY
.1 . 2000:.:.:. 2 SECS..,./. DY.1 . 4000
:.:.:. 4 SECS..-H2. *** DISPLAYS..-.4. *
* CRAWLER.@-F4B$."
".A$.[-K4."..";:. WHITE INVE
RSE.M-P4. L.1 . C(B$)..-Z4B$.J(B$,2).H(B
$,1)..-.4. 123:. H(B$,34);..-.4. 902:. T
YPEWRITER..-.4..K-.5. ".";:. NORMAL.Q-.5
...-.6. *** KEYBOARD INPUT....7. ** PAUS
E AND PRINT 'CONTINUE' MESSAGE.+..7. 120
40: . PAUSE.G.(7. 14200: . PRINT 'CONTIN
UE' MESSAGE AT BOTTOM OF SCREEN.M.W7....
X7. ** CONTINUE MESSAGE....7A$."HIT ANY
KEY TO CONTINUE"....7. 14500....7.....7.
YES/NO ** PRINT ? A$ AND WAIT FOR Y/N R
ESPONSE & SET FL=0/1../.7. 901:. PROMPT.
./.7. A$;.//.7. 14400:. GET KEY.W/.8. KY
.F("Y") . FL.1:." YES":. 14399.~/.8. KY
.F("N") . FL.0:." NO":. 14399../.8. 123
:. 14305../?8..E/@8. ** GET KEY - GET CH
AR AND RESEED RND GEN.Q/J8. 20000../T8.
RN.2000 . RN.RN.2000: . 901:. PROMPT. 0^
8RN.RN.1:. 20010:. KY.64 . 14420.H0R8RN.
.(.934.7.(RN..1)):. CHECK RESEED FOR C-6
4 **********************.N0.8...0.8. **
PRINT A$ AND WAIT..0.8.124:.130:.124:. 1
1100..0B8. "....";A$;".";.L0L8. 901:. PR
OMPT..0V8. 14400:. GET KEY..0.9...1.>. 1
8100:. FROM CLEAR OR ARROW..1.>.((X.4).(
Y.2)).."..........";:..Q1.>.((X.14).(Y.8
)).."........";:..W1.?..J1H?.: . OFF BOA
RD..1.?.18100:.".VV...VV";:.:. CRATER..1
.@.: . BUILDING..1T@.: . SECONDARY BASE.
M1X@.: . PRIMARY BASE..1<A. 16300:.: . B
IG CRATER..2 A.18100:."...........";:.:.
TREE.02.B.18100:.".NM...NM";:.:. HILLS
.>2HB.: . LAKE.O2PF. DRAW ROBOT.H2QF.181
00:.RB$(PL,H);:..{2.F. POSITION X,Y..2.F
."......";:.X.1.18125..2HF.XZ.1.X.1:."..
";:.XZ..2MF.Y.1.18140.V2RF.XZ.1.Y.1:."..
";:.XZ..2.F...2.G. DRAW SQUARE..2"G.1810
0..3,G.".OP...L.";:...3 N. CLEAR KBD.83!
N. KB$:. KB$.."" . 20001.>3"N..O3*N. SET
KY=KB$.N3+N. KB$:. KB$."" . KB$.G(64).~
3,NKY.F(KB$):...3.U. *** PLEASE WAIT..3.
U. 124:. " PLEASE WAIT...";..3SV.
.T3XI. **** CLOSEOUT..3.ISPEED.255..3 I.
".... GOOD-BYE "..4_M...4.}. *** S
OUND SETUP.(4...123:.130..4....R4... ***
* COMPUTER ORDER GENERATOR.4... .(P)..5
. 35999:. SKIP 50% OF THE TIME..4&.FL.0
:. N.1 . 10:. R(P,N,0).1 . FL.1:. N..40.
. FL.1 . 35999:. SKIP IF A ROBOT IS STIL
L WAITING TO GET OUT.45:.. TR(XB(P),YB(P
).1).0 . 35999:. SKIP IF ROBOT IS ON THE
ARROW SQUAR.A5D.. PL.0 . 35999:. SKIP O
N ALTERNATE TURNS..5..FL.0: . 44100: . F
L.1 . . 35900:. CORRECT FOR BASE DAMAGE.
.5... FL.2 . . 35999:. SKIP IF BASE DAMA
GE CANNOT BE CORRECTED NOW..5... MP(0).0
. 35240..6..R.R(0,NC(0),MP(0)).'6...125
:.".THINKING.";.L6..FL.0:LD.0:CA.CA.1:.
CA.20 . CA.1..6..C(1).101:C(2).1:C(3).10
2:C(4).1:C(5).105:C(6).1:C(7).101:C(8)..
1:C(9).104..6..C(10).1:C(11).101:C(12).1
09:C(13)..1:C(14).101:C(15).110:C(16)..1
..6..C(17).101:. DEFAULT ORDERS..7... CA
.10 . 35313.Z7... CA . 41110,43100,41300
,40300,42100,41210,43300,41120,43200,413
10.F7... 35810..7... CA.10 .40200,41600,
42200,41100,41320,40400,42200,41200,4010
0,41220..7... FL.1 . 35300:. IF ORDER IS
NO GOOD, GO ON TO THE NEXT ONE.+8... FL
.2 . 35900:. THIS WAS AN ACCEPTABLE DEFE
NSIVE ORDER.Y8... 50000:. CALCULATE CG F
OR THE PATH TAKEN..8... .(X).CG . 35300:
. IF ORDER IS NOT ACCEPTED, GET ANOTHER.
L8<.. L.1 . 20:R(P,NC(P),L).C(L):. L:. A
CCEPT ORDERS..8A.. DON'T PRINT RELEASE..
9F.. 800:. RELEASE ROBOT..9...125:.140:.
.*9@.. ** DEFENSIVE ORDERS.E9...((TR(12,
8).10) . (TR(12,7).10) . (TR(12,6).10)).
FL.1..9...((TR(12,5).10) . (TR(13,5).10
)). FL.1..9..C(5).103:C(9).50:C(10).103:
C(11)..1..9..C0.((. C0).2):. C0 . C(10).
104:C(14).102..9...:. GUARD #A.!:...((TR
(16,8).10) . (TR(16,7).10)). FL.1.\:...(
(TR(16,6).10) . (TR(16,5).10) . (TR(15,5
).10)). FL.1..:..C(2)..1:C(4)..1:C(5).10
3:C(6)..1:C(8).1:C(9).50:C(10).103:C(11)
..1.N:..C(12).111:. . C0 . C(10).104:C(1
4).102..:...:. GUARD #B..;L..((TR(16,8).
10) . (TR(16,7).10)). FL.1.#;M..(TR(14,5
).10). FL.1.^;N..((TR(16,6).10) . (TR(16
,5).10) . (TR(15,5).10)). FL.1..;V.C(2).
.1:C(4)..1:C(5).103:C(6)..1:C(7).102:C(8
).1:C(9).50:C(10).103.W;W.C(11)..1:C(12)
.110:. C0 . C(10).104:C(14).102..;...:.
GUARD #C..<P..((TR(16,8).10) . (TR(16,7)
.10)). FL.1.N<Q..((TR(16,6).10) . (TR(16
,5).10) . (TR(14,5).10)). FL.1..<Z..((TR
(16,4).10) . (TR(15,4).10) . (TR(14,4).1
0)). FL.1.Q<..C(2)..1:C(4)..1:C(5).104:C
(6)..1:C(7).102:C(9).101:C(11).1:C(12).5
0..=..C(13).103:C(14)..1:. C0 . C(13).10
4:C(17).102..=...: . GUARD #D.+=( . ** R
EAR ATTACKS.E=. C(3).111:.:. REAR #A1._=
. C(3).110:.:. REAR #A2..= C(3).109:C(6
)..1:.:. REAR #A3..=. C(1).102:C(3).111:
C(5).106:.:. REAR #B1.Y=. C(1).102:C(3).
110:C(5).106:.:. REAR #B2..>..C(1).102:C
(3).109:C(5).106:C(6)..1:.:. REAR #B3.'>
T.C1.C1.1:. C1.2 . C1.0.I>Y.C(5).101.C1:
C(6)..1:C(7).109:C(8).1:C(9).C(9).C1:.:.
REAR #C1..>^.C1.C1.1:. C1.2 . C1.0.E>C.
C(5).101.C1:C(6)..1:C(7).108:C(8).1:C(9)
.C(9).C1:.:. REAR #C2..>H.C1.C1.1:. C1.2
. C1.0.%?M.C(5).101.C1:C(6)..1:C(7).107
:C(8).1:C(9).C(9).C1:C(10)..1:.:. #C3.??
..C1.C1.1:. C1.2 . C1.0..?..C(5).104:C(6
)..1:C(7).107:C(8).1:C(9).101:C(10)..1:.
:. REAR #D..?... ** SIDE ATTACKS..?T.C2.
C2.1: . C2.6 . C2.0..?~.C(3).C(3).C2:C(6
)..1:C(7).108.C2:.:. SIDE #A..?X.C3.C3.1
: . C3.5 . C3.0..@..C4.C4.1: . C4.3 . C4
.0.F@..C(3).102.C3:C(5).101.C4:C(6)..1:C
(7).106.C3:C(8).1:C(9).104.C4:C(10)..1..
@..C(11).102:.:. SIDE #B..@... ** OTHER
ATTACKS..@\.C5.C5.1: . C5.2 . C5.0..@F.C
(1).102:C(3).113:C(5).106.C5:C(7).103:C(
8).1:C(9).100.C5:.:. CLKW.BA..C(1).102:C
(2)..1:C(3).103:C(4)..1:C(5).108:C(6)..1
:C(7).112:C(9).102.DAA.C6.((. C6).2):. C
6 . C(7).113.}AJ..:. COUNTERCLOCKWISE..A
$.C7.((. C7).2):. C7 . C8.((. C8).2)..A.
.C(5).106.C7:C(6)..1:C(7).107.C8:C(9).10
1.C7:.:. FRONT..B... ** CHECK FOR BASE S
QUARE DESTROYED..BD.. T(13,7).5 . ..1BN.
. TR(13,7).10 . ..LBX.. TR(13,8).10 . FL
.2:...BB.FL.1:C(1).101:C(2).1:C(3).101:C
(4).1:C(5).101:C(6).99:...BPC. ** PATH A
NALYZER.PB.CL.1:H.2:X.XB(1):Y.YB(1).1:LT
.0:C.C(1).1:CG.1..B.C. C.100 . L.2:C.C(2
):LT.1..C.D. C.0 . .:. ERROR. C"D. C.10
. 50600:. ROTATE.?C,D. C.100 . 51000:. M
OVEMENT.VC6D. C.100 . L.L.1:C.C(L):. 502
00:. MOVEMENT COMPLETE..C|D. * WAIT..C.D
LT.LT.C.10:L.L.1:C.C(L):. 50200..C.E. *
ROTATE..C.EH.H.C.PC.E. H.0 . H.4..CFE. H
.5 . H.1..DPELT.LT.1:L.L.1:C.C(L):. 5020
0..D7G...D8G. * MOVEMENT.*D.G. H.1 . X.X
.1.<D.G. H.2 . Y.Y.1.ND.G. H.3 . X.X.1.`
D.G. H.4 . Y.Y.1.QD.HLT.LT.1:FL.0..D.H.
T(X,Y).52100,52200,52300,52400,52500,526
00,52700,52800,52900,53000.DD.HC.C.1.WD.
H. FL.1 . 50999..D.H. 50200..D K. ** TER
RAIN TYPES..E.K. * CLEAR..E.K.. E.K. * O
FF BOARD.&EKL..5ELL. * CRATER.BEVLCG.CG.
.8.HE`LLC.(TU.(LT.5000).T(X,Y)..001).500
.|EEL. LC..1 . LC..1..EJL. LC.1 . CG.CG.
LC..E.L...E.L. * BUILDING..E.LCG.CG..3..
EDLFL.1..ENL.((LD.1).(LT.15)). CG.CG.2.5
..E.M...E.M. * SECONDARY BASE..F.MFL.1..
FWM..!FXM. * PRIMARY BASE.*F.MFL.1.0F.M.
.CF.M. * BIG CRATER.PF.MCG.CG..4.OF.M.((
LD.1).(LT.15)). CG.CG.2.UF?N...F@N. * TR
EES..FJNFL.1..FTNCG.CG..4..F^N.((LD.1).(
LT.15)). CG.CG.2..F.N..LF.N. * HILLS.RF.
O...F.O. * LAKE..F.OCG.CG..1..F.OFL.1..G
&O. LD.1 . CG.CG.7..G.R..'G.R. SOUND GEN
ERATION.FG.RS.54272:. S.24,15:. VOLUME.[
G.S. S.1,S1 :. FREQ.SG.S. S.5,S5 :. ATT/
DEC..G.S. S.6,S6 :. SUS/REL..G"S. S.4,S4
.1:. WAVFRM/GATE ON.HG,S. J1.1. SA:.:. A
TT DELAY..G6S. S.4,S4 :. GATE OFF..G@S.
J1.1. SD:.:. DEC DELAY..HJS. S.1,0 :. FR
EQ (SOUND OFF).$HSS....
> CLICK IMAGE PREVIEW FOR FULL MODAL