DRAWINIT

00000000: 01 08 25 08 0A 00 97 20  35 31 2C 30 3A 97 20 35  |..%.... 51,0:. 5|
00000010: 32 2C 34 38 3A 97 20 20  35 35 2C 30 3A 97 35 36  |2,48:.  55,0:.56|
00000020: 2C 34 38 3A 9C 00 33 08  14 00 4C 4D B2 35 36 AC  |,48:..3...LM.56.|
00000030: 32 35 36 00 54 08 5A 00  86 20 4D 45 4D 28 34 29  |256.T.Z.. MEM(4)|
00000040: 2C 44 46 28 33 29 2C 4E  41 24 28 34 29 2C 44 46  |,DF(3),NA$(4),DF|
00000050: 24 28 33 29 00 69 08 64  00 86 20 53 28 34 29 2C  |$(3).i.d.. S(4),|
00000060: 45 28 34 29 2C 4C 28 34  29 00 73 08 65 00 89 20  |E(4),L(4).s.e.. |
00000070: 35 30 30 00 91 08 6E 00  56 32 B2 B5 28 56 AD 32  |500...n.V2..(V.2|
00000080: 35 36 29 3A 56 31 B2 56  AB 56 32 AC 32 35 36 3A  |56):V1.V.V2.256:|
00000090: 8E 00 9B 08 73 00 4B 24  B2 22 22 00 B2 08 78 00  |....s.K$.""...x.|
000000A0: A1 20 4B 24 3A 8B 20 4B  24 B2 22 22 20 A7 20 31  |. K$:. K$."" . 1|
000000B0: 32 30 00 C0 08 7D 00 4B  B2 C6 28 4B 24 29 3A 8E  |20...}.K..(K$):.|
000000C0: 00 CE 08 F4 01 43 24 B2  C7 28 31 34 37 29 00 07  |.....C$..(147)..|
000000D0: 09 FE 01 83 20 53 48 41  50 45 20 42 41 53 45 2C  |.... SHAPE BASE,|
000000E0: 4D 41 50 20 42 41 53 45  2C 55 4E 49 54 20 42 41  |MAP BASE,UNIT BA|
000000F0: 53 45 2C 4D 4F 56 45 54  41 42 4C 45 2C 55 4E 49  |SE,MOVETABLE,UNI|
00000100: 54 32 20 42 41 53 45 00  22 09 03 02 81 20 4C B2  |T2 BASE.".... L.|
00000110: 30 20 A4 20 34 3A 87 20  4E 41 24 28 4C 29 3A 82  |0 . 4:. NA$(L):.|
00000120: 20 4C 00 46 09 08 02 83  20 34 30 33 32 30 2C 34  | L.F.... 40320,4|
00000130: 30 33 32 32 2C 34 30 33  32 34 2C 34 30 33 34 31  |0322,40324,40341|
00000140: 2C 34 30 33 34 33 00 61  09 12 02 81 20 4C B2 30  |,40343.a.... L.0|
00000150: 20 A4 20 34 3A 87 20 4D  45 4D 28 4C 29 3A 82 20  | . 4:. MEM(L):. |
00000160: 4C 00 85 09 1C 02 83 20  48 47 54 2C 42 41 53 45  |L...... HGT,BASE|
00000170: 20 48 47 54 2C 56 49 53  49 42 49 4C 49 54 59 2C  | HGT,VISIBILITY,|
00000180: 53 48 41 50 45 00 A0 09  26 02 81 20 4C B2 30 20  |SHAPE...&.. L.0 |
00000190: A4 20 33 3A 87 20 44 46  24 28 4C 29 3A 82 20 4C  |. 3:. DF$(L):. L|
000001A0: 00 AB 09 30 02 8D 20 34  30 38 30 00 C6 09 E8 03  |...0.. 4080.....|
000001B0: 8F 20 49 4E 49 54 20 44  41 54 41 20 46 4F 52 20  |. INIT DATA FOR |
000001C0: 44 52 41 57 2E 46 00 CE  09 1A 04 99 43 24 00 E9  |DRAW.F......C$..|
000001D0: 09 24 04 99 22 20 20 20  20 20 20 53 51 52 50 41  |.$.."      SQRPA|
000001E0: 43 20 49 4E 49 54 22 3A  99 00 22 0A 2E 04 81 20  |C INIT":..".... |
000001F0: 4C B2 30 20 A4 20 34 3A  99 4E 41 24 28 4C 29 3B  |L.0 . 4:.NA$(L);|
00000200: A3 31 30 29 3B 22 20 46  52 4F 4D 22 53 28 4C 29  |.10);" FROM"S(L)|
00000210: 22 54 4F 22 45 28 4C 29  22 28 22 4C 28 4C 29 22  |"TO"E(L)"("L(L)"|
00000220: 29 22 00 2C 0A 38 04 82  20 4C 3A 99 00 50 0A 42  |)".,.8.. L:..P.B|
00000230: 04 99 22 28 49 29 49 4E  49 54 49 41 4C 49 5A 45  |.."(I)INITIALIZE|
00000240: 20 4E 45 57 20 53 51 52  50 41 43 20 4D 41 50 22  | NEW SQRPAC MAP"|
00000250: 00 68 0A 4C 04 99 22 28  4C 29 4F 41 44 20 49 4E  |.h.L.."(L)OAD IN|
00000260: 49 54 20 44 41 54 41 22  00 80 0A 56 04 99 22 28  |IT DATA"...V.."(|
00000270: 53 29 41 56 45 20 49 4E  49 54 20 44 41 54 41 22  |S)AVE INIT DATA"|
00000280: 00 98 0A 60 04 99 22 28  44 29 45 46 49 4E 45 20  |...`.."(D)EFINE |
00000290: 54 45 52 52 41 49 4E 22  00 B5 0A 6A 04 99 22 28  |TERRAIN"...j.."(|
000002A0: 52 29 45 41 44 20 49 4E  20 42 49 4E 41 52 59 20  |R)EAD IN BINARY |
000002B0: 46 49 4C 45 22 00 D4 0A  74 04 99 22 28 57 29 52  |FILE"...t.."(W)R|
000002C0: 49 54 45 20 4F 55 54 20  42 49 4E 41 52 59 20 46  |ITE OUT BINARY F|
000002D0: 49 4C 45 22 00 F1 0A 7E  04 99 22 28 43 29 4C 45  |ILE"...~.."(C)LE|
000002E0: 41 52 20 41 4C 4C 20 55  4E 49 54 20 44 41 54 41  |AR ALL UNIT DATA|
000002F0: 22 00 11 0B 88 04 99 22  28 41 29 53 53 49 47 4E  |"......"(A)SSIGN|
00000300: 20 53 48 41 50 45 53 20  54 4F 20 55 4E 49 54 53  | SHAPES TO UNITS|
00000310: 22 00 2D 0B 92 04 99 22  28 54 29 45 52 52 41 49  |".-...."(T)ERRAI|
00000320: 4E 20 4D 4F 56 45 20 43  4F 53 54 53 22 00 50 0B  |N MOVE COSTS".P.|
00000330: 9C 04 99 22 28 47 29 4F  54 4F 20 44 52 41 57 2E  |..."(G)OTO DRAW.|
00000340: 55 53 45 20 28 42 55 49  4C 44 20 4D 41 50 29 22  |USE (BUILD MAP)"|
00000350: 00 66 0B A6 04 99 22 28  5A 29 45 52 4F 20 4F 55  |.f...."(Z)ERO OU|
00000360: 54 20 4D 41 50 22 00 76  0B B0 04 99 3A 99 22 28  |T MAP".v....:."(|
00000370: 45 29 58 49 54 22 00 87  0B E2 04 99 22 53 45 4C  |E)XIT"......"SEL|
00000380: 45 43 54 20 3A 22 3B 00  95 0B EC 04 8D 20 31 31  |ECT :";...... 11|
00000390: 35 3A 99 4B 24 00 A9 0B  14 05 8B 20 4B 24 B2 22  |5:.K$...... K$."|
000003A0: 49 22 20 A7 20 32 30 30  30 00 BF 0B 1E 05 8B 20  |I" . 2000...... |
000003B0: 4B 24 B2 22 4C 22 20 A7  20 8D 20 34 30 30 30 00  |K$."L" . . 4000.|
000003C0: D6 0B 28 05 8B 20 4B 24  B2 22 53 22 20 A7 20 8D  |..(.. K$."S" . .|
000003D0: 20 31 30 30 30 30 00 EA  0B 32 05 8B 20 4B 24 B2  | 10000...2.. K$.|
000003E0: 22 44 22 20 A7 20 35 30  30 30 00 FB 0B 3C 05 8B  |"D" . 5000...<..|
000003F0: 20 4B 24 B2 22 45 22 20  A7 20 80 00 12 0C 46 05  | K$."E" . ....F.|
00000400: 8B 20 4B 24 B2 22 57 22  20 A7 20 8D 20 31 32 30  |. K$."W" . . 120|
00000410: 30 30 00 29 0C 50 05 8B  20 4B 24 B2 22 52 22 20  |00.).P.. K$."R" |
00000420: A7 20 8D 20 31 31 30 30  30 00 3F 0C 5A 05 8B 20  |. . 11000.?.Z.. |
00000430: 4B 24 B2 22 43 22 20 A7  20 8D 20 36 30 30 30 00  |K$."C" . . 6000.|
00000440: 55 0C 64 05 8B 20 4B 24  B2 22 41 22 20 A7 20 8D  |U.d.. K$."A" . .|
00000450: 20 37 30 30 30 00 6B 0C  6E 05 8B 20 4B 24 B2 22  | 7000.k.n.. K$."|
00000460: 54 22 20 A7 20 8D 20 38  30 30 30 00 7F 0C 78 05  |T" . . 8000...x.|
00000470: 8B 20 4B 24 B2 22 47 22  20 A7 20 31 39 30 30 00  |. K$."G" . 1900.|
00000480: A8 0C 82 05 8B 20 4B 24  B2 22 5A 22 20 A7 20 81  |..... K$."Z" . .|
00000490: 20 4C B2 53 28 31 29 20  A4 20 45 28 31 29 3A 97  | L.S(1) . E(1):.|
000004A0: 20 4C 2C 30 3A 82 20 4C  00 B3 0C 08 07 89 20 31  | L,0:. L...... 1|
000004B0: 30 30 30 00 C6 0C 6C 07  8F 20 52 55 4E 20 44 52  |000...l.. RUN DR|
000004C0: 41 57 2E 55 53 45 00 EC  0C 76 07 99 22 93 4C 4F  |AW.USE...v..".LO|
000004D0: 41 44 20 22 C7 28 33 34  29 22 44 52 41 57 2E 55  |AD ".(34)"DRAW.U|
000004E0: 53 45 22 C7 28 33 34 29  22 2C 38 22 00 10 0D 80  |SE".(34)",8"....|
000004F0: 07 97 20 31 39 38 2C 38  3A 81 4C B2 30 A4 37 3A  |.. 198,8:.L.0.7:|
00000500: 87 20 5A 3A 97 20 36 33  31 AA 4C 2C 5A 3A 82 4C  |. Z:. 631.L,Z:.L|
00000510: 00 2E 0D 8A 07 83 20 31  39 2C 31 33 2C 33 32 2C  |...... 19,13,32,|
00000520: 33 32 2C 38 32 2C 38 35  2C 37 38 2C 31 33 00 36  |32,82,85,78,13.6|
00000530: 0D 94 07 9C 3A A2 00 3E  0D D0 07 99 43 24 00 74  |....:..>....C$.t|
00000540: 0D 34 08 99 3A 85 22 4C  41 52 47 45 53 54 20 58  |.4..:."LARGEST X|
00000550: 20 56 41 4C 55 45 20 28  31 39 2D 31 32 37 29 20  | VALUE (19-127) |
00000560: 22 3B 56 3A 8B 56 B3 31  39 B0 56 B1 31 32 37 A7  |";V:.V.19.V.127.|
00000570: 32 31 30 30 00 9D 0D 3E  08 8B 20 56 AD 32 B2 B5  |2100...>.. V.2..|
00000580: 28 56 AD 32 29 A7 20 99  22 4D 55 53 54 20 45 4E  |(V.2). ."MUST EN|
00000590: 44 20 4F 44 44 22 3A 89  20 32 31 30 30 00 BD 0D  |D ODD":. 2100...|
000005A0: 48 08 4D 58 B2 56 3A 97  20 34 30 33 33 36 2C 56  |H.MX.V:. 40336,V|
000005B0: AB 31 39 3A 97 20 34 30  33 33 38 2C 56 00 F1 0D  |.19:. 40338,V...|
000005C0: 52 08 99 3A 85 22 4C 41  52 47 45 53 54 20 58 20  |R..:."LARGEST X |
000005D0: 56 41 4C 55 45 20 28 39  2D 31 32 37 29 20 22 3B  |VALUE (9-127) ";|
000005E0: 56 3A 8B 56 B3 39 B0 56  B1 31 32 37 A7 32 31 33  |V:.V.9.V.127.213|
000005F0: 30 00 1A 0E 5C 08 8B 20  56 AD 32 B2 B5 28 56 AD  |0...\.. V.2..(V.|
00000600: 32 29 A7 20 99 22 4D 55  53 54 20 45 4E 44 20 4F  |2). ."MUST END O|
00000610: 44 44 22 3A 89 20 32 31  33 30 00 39 0E 66 08 4D  |DD":. 2130.9.f.M|
00000620: 59 B2 56 3A 97 20 34 30  33 33 37 2C 56 AB 39 3A  |Y.V:. 40337,V.9:|
00000630: 97 20 34 30 33 33 39 2C  56 00 68 0E 70 08 99 3A  |. 40339,V.h.p..:|
00000640: 85 20 22 23 20 4F 46 20  50 4C 41 59 45 52 53 20  |. "# OF PLAYERS |
00000650: 28 31 2D 34 29 20 22 3B  56 3A 8B 20 56 B3 31 B0  |(1-4) ";V:. V.1.|
00000660: 56 B1 34 A7 32 31 36 30  00 7B 0E 7A 08 50 4C B2  |V.4.2160.{.z.PL.|
00000670: 56 3A 97 20 34 30 33 33  30 2C 56 00 91 0E 84 08  |V:. 40330,V.....|
00000680: 55 4E B2 30 3A 81 20 4C  B2 30 20 A4 20 50 4C AB  |UN.0:. L.0 . PL.|
00000690: 31 00 C2 0E 8E 08 99 3A  99 22 23 20 4F 46 20 55  |1......:."# OF U|
000006A0: 4E 49 54 53 20 46 4F 52  20 50 4C 41 59 45 52 20  |NITS FOR PLAYER |
000006B0: 23 22 4C 22 28 31 2D 32  35 35 29 20 22 3B 3A 85  |#"L"(1-255) ";:.|
000006C0: 20 56 00 DB 0E 98 08 8B  20 56 B3 31 20 B0 20 56  | V...... V.1 . V|
000006D0: B1 32 35 35 20 A7 20 32  31 39 30 00 F3 0E A2 08  |.255 . 2190.....|
000006E0: 97 20 34 30 33 32 36 AA  4C 2C 56 3A 55 4E B2 55  |. 40326.L,V:UN.U|
000006F0: 4E AA 56 00 25 0F AC 08  99 22 53 54 41 43 4B 49  |N.V.%...."STACKI|
00000700: 4E 47 20 53 59 4D 42 4F  4C 20 50 4C 41 59 45 52  |NG SYMBOL PLAYER|
00000710: 20 23 22 3B 4C 3B 22 28  30 2D 31 32 37 29 20 22  | #";L;"(0-127) "|
00000720: 3B 3A 85 20 56 00 3E 0F  B6 08 8B 20 56 B3 30 20  |;:. V.>.... V.0 |
00000730: B0 20 56 B1 31 32 37 20  A7 20 32 32 32 30 00 4E  |. V.127 . 2220.N|
00000740: 0F C0 08 97 20 34 30 33  33 32 AA 4C 2C 56 00 56  |.... 40332.L,V.V|
00000750: 0F CA 08 82 20 4C 00 90  0F D4 08 99 3A 85 20 22  |.... L......:. "|
00000760: 43 4F 4E 46 4C 49 43 54  20 53 59 4D 42 4F 4C 20  |CONFLICT SYMBOL |
00000770: 28 30 2D 31 32 37 29 20  22 3B 56 3A 8B 20 56 B3  |(0-127) ";V:. V.|
00000780: 30 20 B0 20 56 B1 31 32  37 20 A7 20 32 32 36 30  |0 . V.127 . 2260|
00000790: 00 9E 0F DE 08 97 20 34  30 33 33 31 2C 56 00 DE  |...... 40331,V..|
000007A0: 0F FC 08 99 3A 85 20 22  55 53 45 20 55 4E 49 54  |....:. "USE UNIT|
000007B0: 20 4D 50 56 45 20 41 53  4D 20 28 59 2F 4E 29 20  | MPVE ASM (Y/N) |
000007C0: 22 3B 4B 24 3A 8B 20 4B  24 B3 B1 22 59 22 20 AF  |";K$:. K$.."Y" .|
000007D0: 20 4B 24 B3 B1 22 4E 22  A7 20 32 33 30 30 00 03  | K$.."N". 2300..|
000007E0: 10 06 09 8B 20 4B 24 B2  22 4E 22 20 A7 20 97 20  |.... K$."N" . . |
000007F0: 34 30 33 34 30 2C 30 3A  4D 54 B2 30 3A 89 20 32  |40340,0:MT.0:. 2|
00000800: 35 30 30 00 43 10 10 09  99 3A 85 20 22 4D 41 58  |500.C....:. "MAX|
00000810: 20 4E 55 4D 42 45 52 20  4F 46 20 54 45 52 52 41  | NUMBER OF TERRA|
00000820: 49 4E 20 28 31 2D 31 32  37 29 20 22 3B 56 3A 8B  |IN (1-127) ";V:.|
00000830: 20 56 B3 31 20 B0 20 56  B1 31 32 37 20 A7 20 32  | V.1 . V.127 . 2|
00000840: 33 32 30 00 56 10 1A 09  4D 54 B2 56 3A 97 20 34  |320.V...MT.V:. 4|
00000850: 30 33 34 30 2C 56 00 5C  10 C4 09 8F 00 7C 10 E2  |0340,V.\.....|..|
00000860: 09 99 3A 99 22 20 20 20  20 49 4E 49 54 49 41 4C  |..:."    INITIAL|
00000870: 49 5A 45 20 53 51 52 20  50 41 43 22 00 8C 10 EC  |IZE SQR PAC"....|
00000880: 09 99 3A 99 22 4C 4F 57  22 3B 4C 4D 00 9E 10 F1  |..:."LOW";LM....|
00000890: 09 99 22 48 49 47 48 20  33 39 31 36 37 22 00 B3  |.."HIGH 39167"..|
000008A0: 10 F6 09 8F 20 2A 2A 53  45 54 20 56 41 52 49 42  |.... **SET VARIB|
000008B0: 4C 45 53 00 C1 10 00 0A  81 20 4C B2 30 20 A4 20  |LES...... L.0 . |
000008C0: 34 00 DB 10 05 0A 8B 20  4B 24 B2 22 4E 22 20 AF  |4...... K$."N" .|
000008D0: 20 4C B1 32 20 A7 20 32  36 35 30 00 FC 10 0A 0A  | L.2 . 2650.....|
000008E0: 99 22 41 44 44 52 45 53  53 20 46 4F 52 20 22 3B  |."ADDRESS FOR ";|
000008F0: 4E 41 24 28 4C 29 22 20  3A 20 22 3B 00 0B 11 14  |NA$(L)" : ";....|
00000900: 0A 85 20 56 3A 53 28 4C  29 B2 56 00 2D 11 28 0A  |.. V:S(L).V.-.(.|
00000910: 8D 20 31 31 30 3A 97 20  4D 45 28 4C 29 2C 56 31  |. 110:. ME(L),V1|
00000920: 3A 97 20 4D 45 28 4C 29  AA 31 2C 56 32 00 67 11  |:. ME(L).1,V2.g.|
00000930: 2D 0A 8B 20 4C B3 31 20  A7 20 85 20 22 23 20 4F  |-.. L.1 . . "# O|
00000940: 46 20 53 48 41 50 45 53  20 55 53 45 44 20 28 31  |F SHAPES USED (1|
00000950: 2D 31 32 38 29 20 22 3B  56 3A 53 48 B2 56 3A 4C  |-128) ";V:SH.V:L|
00000960: 28 4C 29 B2 56 AC 38 00  86 11 2F 0A 8B 20 4C B2  |(L).V.8.../.. L.|
00000970: 31 20 A7 20 4C 28 4C 29  B2 28 4D 58 AA 31 29 AC  |1 . L(L).(MX.1).|
00000980: 28 4D 59 AA 31 29 00 9C  11 32 0A 8B 20 4C B2 32  |(MY.1)...2.. L.2|
00000990: 20 A7 20 4C 28 4C 29 B2  55 4E AC 34 00 B2 11 34  | . L(L).UN.4...4|
000009A0: 0A 8B 20 4C B2 33 20 A7  20 4C 28 4C 29 B2 4D 54  |.. L.3 . L(L).MT|
000009B0: AC 34 00 C8 11 37 0A 8B  20 4C B2 34 20 A7 20 4C  |.4...7.. L.4 . L|
000009C0: 28 4C 29 B2 55 4E AC 37  00 F6 11 46 0A 8D 20 33  |(L).UN.7...F.. 3|
000009D0: 30 30 30 3A 8B 20 5A B1  30 20 A7 20 99 22 4D 45  |000:. Z.0 . ."ME|
000009E0: 4D 4F 52 59 20 4F 56 45  52 4C 41 50 22 3A 99 3A  |MORY OVERLAP":.:|
000009F0: 89 20 32 35 37 30 00 0B  12 50 0A 45 28 4C 29 B2  |. 2570...P.E(L).|
00000A00: 53 28 4C 29 AA 4C 28 4C  29 AB 31 00 39 12 55 0A  |S(L).L(L).1.9.U.|
00000A10: 99 22 4D 45 4D 20 55 53  45 44 20 46 52 4F 4D 20  |."MEM USED FROM |
00000A20: 22 3B 53 28 4C 29 3B 22  54 4F 22 45 28 4C 29 22  |";S(L);"TO"E(L)"|
00000A30: 28 22 4C 28 4C 29 22 29  22 00 41 12 5A 0A 82 20  |("L(L)")".A.Z.. |
00000A40: 4C 00 4C 12 64 0A 89 20  31 30 30 30 00 68 12 B8  |L.L.d.. 1000.h..|
00000A50: 0B 8F 20 2A 2A 20 49 53  20 4D 45 4D 20 43 4F 4E  |.. ** IS MEM CON|
00000A60: 46 4C 49 43 54 49 4E 47  00 70 12 CC 0B 5A B2 30  |FLICTING.p...Z.0|
00000A70: 00 90 12 D1 0B 8B 20 53  28 4C 29 AA 4C 28 4C 29  |...... S(L).L(L)|
00000A80: AB 31 B1 33 39 31 36 37  20 A7 20 5A B2 31 3A 8E  |.1.39167 . Z.1:.|
00000A90: 00 A6 12 D6 0B 8B 20 53  28 4C 29 B3 4C 4D 20 A7  |...... S(L).LM .|
00000AA0: 20 5A B2 31 3A 8E 00 B4  12 E0 0B 8B 20 4C B2 30  | Z.1:....... L.0|
00000AB0: 20 A7 20 8E 00 EC 12 EA  0B 81 20 4C 31 B2 30 20  | . ....... L1.0 |
00000AC0: A4 20 4C AB 31 3A 8B 20  53 28 4C 31 29 B3 B2 53  |. L.1:. S(L1)..S|
00000AD0: 28 4C 29 A7 8B 53 28 4C  31 29 AA 4C 28 4C 31 29  |(L)..S(L1).L(L1)|
00000AE0: AB 31 B1 B2 53 28 4C 29  A7 5A B2 31 00 16 13 F4  |.1..S(L).Z.1....|
00000AF0: 0B 8B 20 53 28 4C 31 29  B1 53 28 4C 29 A7 8B 53  |.. S(L1).S(L)..S|
00000B00: 28 4C 29 AA 4C 28 4C 29  AB 31 B1 B2 53 28 4C 31  |(L).L(L).1..S(L1|
00000B10: 29 A7 20 5A B2 31 00 1F  13 FE 0B 82 20 4C 31 00  |). Z.1...... L1.|
00000B20: 25 13 08 0C 8E 00 3D 13  A0 0F 8F 20 2A 2A 20 4C  |%.....=.... ** L|
00000B30: 4F 41 44 20 49 4E 49 54  20 44 41 54 41 00 45 13  |OAD INIT DATA.E.|
00000B40: AA 0F 99 43 24 00 60 13  D2 0F 99 3A 99 22 20 20  |...C$.`....:."  |
00000B50: 20 4C 4F 41 44 20 49 4E  49 54 20 44 41 54 41 22  | LOAD INIT DATA"|
00000B60: 00 82 13 DC 0F 99 3A 85  20 22 4E 41 4D 45 20 4F  |......:. "NAME O|
00000B70: 46 20 49 4E 49 54 20 46  49 4C 45 20 3A 20 22 3B  |F INIT FILE : ";|
00000B80: 4E 24 00 93 13 E1 0F 8B  20 C3 28 4E 24 29 B3 31  |N$...... .(N$).1|
00000B90: A7 20 8E 00 A8 13 E6 0F  46 49 B2 33 39 38 30 38  |. ......FI.39808|
00000BA0: 3A 8D 20 32 30 30 30 30  00 D9 13 F0 0F 81 20 4C  |:. 20000...... L|
00000BB0: B2 30 20 A4 20 34 3A 53  28 4C 29 B2 C2 28 4D 45  |.0 . 4:S(L)..(ME|
00000BC0: 4D 28 4C 29 29 AA C2 28  4D 45 4D 28 4C 29 AA 31  |M(L))..(MEM(L).1|
00000BD0: 29 AC 32 35 36 3A 82 20  4C 00 F5 13 04 10 4D 58  |).256:. L.....MX|
00000BE0: B2 C2 28 34 30 33 33 38  29 3A 4D 59 B2 C2 28 34  |..(40338):MY..(4|
00000BF0: 30 33 33 39 29 00 05 14  0E 10 50 4C B2 C2 28 34  |0339).....PL..(4|
00000C00: 30 33 33 30 29 00 30 14  18 10 55 4E B2 30 3A 81  |0330).0...UN.0:.|
00000C10: 20 4C B2 30 20 A4 20 50  4C AB 31 3A 55 4E B2 55  | L.0 . PL.1:UN.U|
00000C20: 4E AA C2 28 34 30 33 32  36 AA 4C 29 3A 82 20 4C  |N..(40326.L):. L|
00000C30: 00 40 14 22 10 4D 54 B2  C2 28 34 30 33 34 30 29  |.@.".MT..(40340)|
00000C40: 00 4E 14 94 11 81 20 4C  B2 30 20 A4 20 34 00 82  |.N.... L.0 . 4..|
00000C50: 14 EE 11 8B 20 4C B2 30  20 A7 20 99 3A 85 20 22  |.... L.0 . .:. "|
00000C60: 23 20 4F 46 20 53 48 41  50 45 53 20 55 53 45 44  |# OF SHAPES USED|
00000C70: 20 22 3B 56 3A 53 48 B2  56 3A 4C 28 4C 29 B2 56  | ";V:SH.V:L(L).V|
00000C80: AC 38 00 A1 14 F8 11 8B  20 4C B2 31 20 A7 20 4C  |.8...... L.1 . L|
00000C90: 28 4C 29 B2 28 4D 58 AA  31 29 AC 28 4D 59 AA 31  |(L).(MX.1).(MY.1|
00000CA0: 29 00 B7 14 02 12 8B 20  4C B2 32 20 A7 20 4C 28  |)...... L.2 . L(|
00000CB0: 4C 29 B2 55 4E AC 34 00  D8 14 0C 12 8B 20 4D 54  |L).UN.4...... MT|
00000CC0: B2 30 20 AF 20 4C B1 32  20 A7 20 53 28 4C 29 B2  |.0 . L.2 . S(L).|
00000CD0: 30 3A 89 20 34 37 30 30  00 EE 14 16 12 8B 20 4C  |0:. 4700...... L|
00000CE0: B2 33 20 A7 20 4C 28 4C  29 B2 4D 54 AC 34 00 04  |.3 . L(L).MT.4..|
00000CF0: 15 20 12 8B 20 4C B2 34  20 A7 20 4C 28 4C 29 B2  |. .. L.4 . L(L).|
00000D00: 55 4E AC 37 00 19 15 2A  12 45 28 4C 29 B2 53 28  |UN.7...*.E(L).S(|
00000D10: 4C 29 AA 4C 28 4C 29 AB  31 00 21 15 5C 12 82 20  |L).L(L).1.!.\.. |
00000D20: 4C 00 27 15 C0 12 8E 00  42 15 88 13 8F 20 2A 2A  |L.'.....B.... **|
00000D30: 20 4D 4F 44 49 45 46 59  20 54 45 52 20 49 54 45  | MODIEFY TER ITE|
00000D40: 4D 53 00 4A 15 BA 13 99  43 24 00 73 15 C4 13 99  |MS.J....C$.s....|
00000D50: 3A 99 22 54 45 52 52 41  49 4E 20 48 47 54 2C 42  |:."TERRAIN HGT,B|
00000D60: 41 53 45 48 47 54 2C 56  49 53 20 26 20 53 48 41  |ASEHGT,VIS & SHA|
00000D70: 50 45 22 00 79 15 CE 13  99 00 BE 15 D8 13 81 4C  |PE".y..........L|
00000D80: B2 30 A4 33 3A 99 4C AA  31 3B 22 29 20 22 44 46  |.0.3:.L.1;") "DF|
00000D90: 24 28 4C 29 22 20 44 45  46 41 55 4C 54 20 3A 22  |$(L)" DEFAULT :"|
00000DA0: 3B 3A 58 24 B2 22 43 48  41 4E 47 45 22 3A 8B 44  |;:X$."CHANGE":.D|
00000DB0: 46 28 4C 29 A7 58 24 B2  22 53 4B 49 50 22 00 CA  |F(L).X$."SKIP"..|
00000DC0: 15 DD 13 99 58 24 3A 82  20 4C 00 EC 15 E2 13 99  |....X$:. L......|
00000DD0: 3A 99 22 43 48 41 4E 47  45 20 4F 4E 45 20 54 45  |:."CHANGE ONE TE|
00000DE0: 52 52 41 49 4E 20 56 41  4C 55 45 22 00 11 16 EC  |RRAIN VALUE"....|
00000DF0: 13 99 22 28 4E 29 45 57  20 56 41 4C 55 45 53 20  |.."(N)EW VALUES |
00000E00: 46 4F 52 20 4D 41 4E 59  20 54 45 52 52 41 49 4E  |FOR MANY TERRAIN|
00000E10: 22 00 2E 16 F6 13 99 22  28 52 29 45 54 55 52 4E  |"......"(R)ETURN|
00000E20: 20 54 4F 20 4D 41 49 4E  20 4D 45 4E 55 22 00 47  | TO MAIN MENU".G|
00000E30: 16 50 14 99 3A 99 22 53  45 4C 45 43 54 20 3A 22  |.P..:."SELECT :"|
00000E40: 3B 3A 8D 20 31 31 35 00  5B 16 B4 14 8B 20 4B 24  |;:. 115.[.... K$|
00000E50: B2 22 52 22 20 A7 20 31  30 30 30 00 92 16 BE 14  |."R" . 1000.....|
00000E60: 8B 20 4B 24 B1 22 30 22  20 AF 20 4B 24 B3 22 35  |. K$."0" . K$."5|
00000E70: 22 20 A7 20 56 B2 C5 28  4B 24 29 AB 31 3A 44 46  |" . V..(K$).1:DF|
00000E80: 28 56 29 B2 28 44 46 28  56 29 B2 30 29 AC 28 AB  |(V).(DF(V).0).(.|
00000E90: 31 29 00 A5 16 C8 14 8B  20 4B 24 B2 22 43 22 A7  |1)...... K$."C".|
00000EA0: 20 35 35 30 30 00 B6 16  D2 14 8B 4B 24 B2 22 4E  | 5500......K$."N|
00000EB0: 22 A7 35 35 32 30 00 C1  16 DC 14 89 20 35 30 30  |".5520...... 500|
00000EC0: 30 00 F9 16 7C 15 99 3A  85 20 22 43 48 41 4E 47  |0...|..:. "CHANG|
00000ED0: 45 20 54 45 52 52 41 49  4E 20 28 30 2D 31 32 37  |E TERRAIN (0-127|
00000EE0: 29 20 22 3B 5A 3A 8B 20  5A B3 30 20 B0 20 5A B1  |) ";Z:. Z.0 . Z.|
00000EF0: 31 32 37 20 A7 35 30 30  30 00 09 17 86 15 5A 31  |127 .5000.....Z1|
00000F00: B2 5A 3A 89 20 35 36 30  30 00 3E 17 90 15 99 3A  |.Z:. 5600.>....:|
00000F10: 85 22 43 48 41 4E 47 45  20 46 52 4F 4D 20 28 30  |."CHANGE FROM (0|
00000F20: 2D 31 32 37 29 20 22 3B  5A 3A 8B 20 5A B3 30 20  |-127) ";Z:. Z.0 |
00000F30: B0 20 5A B1 31 32 37 20  A7 20 35 30 30 30 00 72  |. Z.127 . 5000.r|
00000F40: 17 9A 15 99 22 54 4F 20  28 22 3B 5A 3B 22 2D 31  |...."TO (";Z;"-1|
00000F50: 32 37 29 20 22 3B 3A 85  20 5A 31 3A 8B 20 5A 31  |27) ";:. Z1:. Z1|
00000F60: B3 5A 20 B0 20 5A 31 B1  31 32 37 20 A7 20 35 35  |.Z . Z1.127 . 55|
00000F70: 32 30 00 81 17 E0 15 81  20 4C B2 5A 20 A4 20 5A  |20...... L.Z . Z|
00000F80: 31 00 9D 17 EA 15 99 22  53 48 41 50 45 20 23 22  |1......"SHAPE #"|
00000F90: 3B 4C 3A 81 20 4C 31 B2  30 20 A4 20 33 00 B2 17  |;L:. L1.0 . 3...|
00000FA0: F4 15 8B 20 44 46 28 4C  31 29 B1 30 A7 20 35 36  |... DF(L1).0. 56|
00000FB0: 36 30 00 ED 17 FE 15 99  44 46 24 28 4C 31 29 3B  |60......DF$(L1);|
00000FC0: 22 20 4F 4C 44 20 22 3B  C2 28 33 39 38 30 38 AA  |" OLD ";.(39808.|
00000FD0: 4C 31 AC 31 32 38 AA 4C  29 3B 22 20 4E 45 57 20  |L1.128.L);" NEW |
00000FE0: 22 3B 3A 58 24 B2 22 22  3A 85 20 58 24 00 00 18  |";:X$."":. X$...|
00000FF0: 08 16 8B C3 28 58 24 29  B3 31 A7 20 35 36 36 30  |....(X$).1. 5660|
00001000: 00 1F 18 12 16 56 B2 C5  28 58 24 29 3A 97 20 33  |.....V..(X$):. 3|
00001010: 39 38 30 38 AA 4C 31 AC  31 32 38 AA 4C 2C 56 00  |9808.L1.128.L,V.|
00001020: 2A 18 1C 16 82 20 4C 31  3A 99 00 31 18 26 16 82  |*.... L1:..1.&..|
00001030: 4C 00 3C 18 30 16 89 20  35 30 30 30 00 55 18 70  |L.<.0.. 5000.U.p|
00001040: 17 8F 20 2A 2A 20 43 4C  45 41 52 20 55 4E 49 54  |.. ** CLEAR UNIT|
00001050: 20 44 41 54 41 00 80 18  75 17 99 43 24 3A 99 3A  | DATA...u..C$:.:|
00001060: 99 22 20 20 20 4D 4F 56  49 4E 47 20 55 4E 49 54  |."   MOVING UNIT|
00001070: 53 20 4F 46 46 20 4D 41  50 20 2E 2E 2E 22 3A 99  |S OFF MAP ...":.|
00001080: 00 91 18 7A 17 81 20 4C  B2 30 20 A4 20 55 4E AB  |...z.. L.0 . UN.|
00001090: 31 00 CD 18 84 17 5A B2  53 28 32 29 AA 4C AC 34  |1.....Z.S(2).L.4|
000010A0: 3A 97 5A 2C 32 35 35 3A  97 5A AA 31 2C 32 35 35  |:.Z,255:.Z.1,255|
000010B0: 3A 97 5A AA 33 2C 30 3A  8B 4D 54 B1 31 A7 97 53  |:.Z.3,0:.MT.1..S|
000010C0: 28 34 29 AA 4C AC 37 AA  34 2C 32 35 35 00 DE 18  |(4).L.7.4,255...|
000010D0: 8E 17 99 20 22 2E 22 3B  3A 82 20 4C 3A 99 00 E4  |... ".";:. L:...|
000010E0: 18 98 17 8E 00 04 19 58  1B 8F 20 2A 2A 20 41 53  |.......X.. ** AS|
000010F0: 53 49 47 4E 20 53 48 41  50 45 53 20 54 4F 20 55  |SIGN SHAPES TO U|
00001100: 4E 49 54 53 00 0C 19 8A  1B 99 43 24 00 26 19 94  |NITS......C$.&..|
00001110: 1B 99 3A 99 22 20 20 20  20 20 55 4E 49 54 20 53  |..:."     UNIT S|
00001120: 48 41 50 45 53 22 00 2C  19 9E 1B 99 00 4B 19 A8  |HAPES".,.....K..|
00001130: 1B 99 22 28 4C 29 49 53  54 20 55 4E 49 54 53 20  |.."(L)IST UNITS |
00001140: 41 4E 44 20 53 48 41 50  45 53 22 00 63 19 B2 1B  |AND SHAPES".c...|
00001150: 99 22 20 4D 41 4B 45 20  43 48 41 4E 47 45 53 20  |." MAKE CHANGES |
00001160: 4F 4E 22 00 75 19 BC 1B  99 22 28 4F 29 4E 45 20  |ON".u...."(O)NE |
00001170: 55 4E 49 54 22 00 89 19  C6 1B 99 22 28 4D 29 41  |UNIT"......"(M)A|
00001180: 4E 59 20 55 4E 49 54 53  22 00 B2 19 CB 1B 99 22  |NY UNITS"......"|
00001190: 28 44 29 45 46 41 55 4C  54 20 53 48 41 50 45 20  |(D)EFAULT SHAPE |
000011A0: 22 3B 44 53 3B 22 28 3E  32 35 35 20 4E 4F 4E 45  |";DS;"(>255 NONE|
000011B0: 29 22 00 D1 19 D0 1B 99  3A 99 22 28 52 29 45 54  |)"......:."(R)ET|
000011C0: 55 52 4E 20 54 4F 20 4D  41 49 4E 20 4D 45 4E 55  |URN TO MAIN MENU|
000011D0: 22 00 E9 19 20 1C 99 3A  99 22 53 45 4C 45 43 54  |"... ..:."SELECT|
000011E0: 20 22 3B 3A 8D 20 31 31  35 00 00 1A 84 1C 8B 20  | ";:. 115...... |
000011F0: 4B 24 B2 22 4C 22 20 A7  20 8D 20 32 32 30 30 30  |K$."L" . . 22000|
00001200: 00 11 1A 8E 1C 8B 20 4B  24 B2 22 52 22 20 A7 20  |...... K$."R" . |
00001210: 8E 00 25 1A 98 1C 8B 20  4B 24 B2 22 4F 22 20 A7  |..%.... K$."O" .|
00001220: 20 37 35 35 30 00 39 1A  A2 1C 8B 20 4B 24 B2 22  | 7550.9.... K$."|
00001230: 4D 22 20 A7 20 37 36 30  30 00 67 1A AC 1C 8B 4B  |M" . 7600.g....K|
00001240: 24 B2 22 44 22 A7 99 3A  85 22 4E 45 57 20 53 48  |$."D"..:."NEW SH|
00001250: 41 50 45 20 22 3B 58 24  3A 8B C3 28 58 24 29 A7  |APE ";X$:..(X$).|
00001260: 56 B2 C5 28 58 24 29 00  8E 1A B1 1C 8B 20 4B 24  |V..(X$)...... K$|
00001270: B2 22 44 22 20 A7 20 8B  20 56 B1 30 20 AF 20 56  |."D" . . V.0 . V|
00001280: B3 32 35 36 20 A7 20 44  53 B2 B5 28 56 29 00 99  |.256 . DS..(V)..|
00001290: 1A 4C 1D 89 20 37 30 30  30 00 C5 1A 7E 1D 99 3A  |.L.. 7000...~..:|
000012A0: 85 22 43 48 41 4E 47 45  20 55 4E 49 54 20 23 22  |."CHANGE UNIT #"|
000012B0: 3B 5A 3A 8B 5A B3 30 B0  5A B1 55 4E AB 31 20 A7  |;Z:.Z.0.Z.UN.1 .|
000012C0: 20 37 30 30 30 00 D5 1A  88 1D 5A 31 B2 5A 3A 89  | 7000.....Z1.Z:.|
000012D0: 20 37 37 30 30 00 06 1B  B0 1D 99 3A 85 20 22 43  | 7700......:. "C|
000012E0: 48 41 4E 47 45 20 46 52  4F 4D 20 55 4E 49 54 20  |HANGE FROM UNIT |
000012F0: 23 22 3B 5A 3A 8B 5A B3  30 B0 5A B1 55 4E AB 31  |#";Z:.Z.0.Z.UN.1|
00001300: A7 20 37 30 30 30 00 33  1B BA 1D 85 20 22 54 4F  |. 7000.3.... "TO|
00001310: 20 55 4E 49 54 20 23 22  3B 5A 31 3A 8B 20 5A 31  | UNIT #";Z1:. Z1|
00001320: B3 5A 20 B0 20 5A 31 B1  55 4E AB 31 20 A7 20 37  |.Z . Z1.UN.1 . 7|
00001330: 30 30 30 00 42 1B 14 1E  81 20 4C B2 5A 20 A4 20  |000.B.... L.Z . |
00001340: 5A 31 00 66 1B 19 1E 8B  20 44 53 B1 B2 30 20 AF  |Z1.f.... DS..0 .|
00001350: 20 44 53 B3 B2 32 35 35  20 A7 20 56 B2 44 53 3A  | DS..255 . V.DS:|
00001360: 89 20 37 37 33 30 00 A4  1B 1E 1E 99 22 55 4E 49  |. 7730......"UNI|
00001370: 54 20 23 22 3B 4C 3B 22  A0 4F 4C 44 20 53 48 41  |T #";L;".OLD SHA|
00001380: 50 45 20 22 3B C2 28 53  28 32 29 AA 4C AC 34 AA  |PE ";.(S(2).L.4.|
00001390: 32 29 3B 3A 85 22 4E 45  57 20 53 48 41 50 45 20  |2);:."NEW SHAPE |
000013A0: 22 3B 58 24 00 B8 1B 28  1E 8B 20 C3 28 58 24 29  |";X$...(.. .(X$)|
000013B0: B3 31 A7 20 37 37 34 30  00 D9 1B 2D 1E 56 B2 C5  |.1. 7740...-.V..|
000013C0: 28 58 24 29 3A 8B 20 56  B3 30 20 B0 20 56 B1 32  |(X$):. V.0 . V.2|
000013D0: 35 35 20 A7 20 37 37 31  30 00 EC 1B 32 1E 97 20  |55 . 7710...2.. |
000013E0: 53 28 32 29 AA 4C AC 34  AA 32 2C 56 00 F4 1B 3C  |S(2).L.4.2,V...<|
000013F0: 1E 82 20 4C 00 FF 1B 46  1E 89 20 37 30 30 30 00  |.. L...F.. 7000.|
00001400: 12 1C 40 1F 8F 20 54 45  52 52 41 49 4E 20 43 4F  |..@.. TERRAIN CO|
00001410: 53 54 00 1A 1C 54 1F 99  43 24 00 40 1C 5E 1F 8B  |ST...T..C$.@.^..|
00001420: 20 4D 54 B3 31 A7 20 99  3A 99 22 4E 4F 54 20 49  | MT.1. .:."NOT I|
00001430: 4E 20 55 53 45 22 3A 8D  20 32 33 30 30 30 3A 8E  |N USE":. 23000:.|
00001440: 00 48 1C A4 1F 99 43 24  00 67 1C AE 1F 99 3A 99  |.H....C$.g....:.|
00001450: 22 43 48 41 4E 47 45 20  4D 4F 56 45 4D 45 4E 54  |"CHANGE MOVEMENT|
00001460: 20 43 4F 53 54 53 22 00  88 1C B8 1F 99 3A 99 22  | COSTS"......:."|
00001470: 28 4C 29 49 53 54 20 4D  4F 56 45 20 43 4F 53 54  |(L)IST MOVE COST|
00001480: 20 54 41 42 4C 45 53 22  00 AC 1C C2 1F 99 3A 99  | TABLES"......:.|
00001490: 22 20 43 48 41 4E 47 45  20 4D 4F 56 45 4D 45 4E  |" CHANGE MOVEMEN|
000014A0: 54 20 43 4F 53 54 53 20  46 4F 52 22 00 BE 1C CC  |T COSTS FOR"....|
000014B0: 1F 99 22 28 4F 29 4E 45  20 55 4E 49 54 22 00 D2  |.."(O)NE UNIT"..|
000014C0: 1C D6 1F 99 22 28 4D 29  41 4E 59 20 55 4E 49 54  |...."(M)ANY UNIT|
000014D0: 53 22 00 F1 1C FE 1F 99  3A 99 22 28 52 29 45 54  |S"......:."(R)ET|
000014E0: 55 52 4E 20 54 4F 20 4D  41 49 4E 20 4D 45 4E 55  |URN TO MAIN MENU|
000014F0: 22 00 0E 1D 08 20 99 3A  99 22 53 45 4C 45 43 54  |".... .:."SELECT|
00001500: 20 3A 22 3B 3A 8D 20 31  31 35 3A 99 4B 24 00 1F  | :";:. 115:.K$..|
00001510: 1D 3A 20 8B 20 4B 24 B2  22 52 22 20 A7 20 8E 00  |.: . K$."R" . ..|
00001520: 33 1D 44 20 8B 20 4B 24  B2 22 4C 22 20 A7 20 38  |3.D . K$."L" . 8|
00001530: 34 31 30 00 47 1D 4E 20  8B 20 4B 24 B2 22 4F 22  |410.G.N . K$."O"|
00001540: 20 A7 20 38 35 30 30 00  5B 1D 58 20 8B 20 4B 24  | . 8500.[.X . K$|
00001550: B2 22 4D 22 20 A7 20 38  35 35 30 00 66 1D D0 20  |."M" . 8550.f.. |
00001560: 89 20 38 31 30 30 00 6E  1D DA 20 5A B2 30 00 8A  |. 8100.n.. Z.0..|
00001570: 1D E4 20 81 20 4C B2 30  20 A4 20 33 3A 81 20 4C  |.. . L.0 . 3:. L|
00001580: 31 B2 30 20 A4 20 4D 54  AB 31 00 BC 1D EE 20 8B  |1.0 . MT.1.... .|
00001590: A8 5A A7 20 99 43 24 3A  99 20 22 54 45 52 52 41  |.Z. .C$:. "TERRA|
000015A0: 49 4E 23 20 4D 4F 56 45  43 4F 53 54 20 28 54 41  |IN# MOVECOST (TA|
000015B0: 42 4C 45 20 23 22 3B 4C  3B 22 29 22 00 EF 1D F8  |BLE #";L;")"....|
000015C0: 20 97 32 31 34 2C 31 AA  5A 3A 99 3A 97 32 31 31  | .214,1.Z:.:.211|
000015D0: 2C 32 3A 99 4C 31 3A 97  32 31 31 2C 31 31 3A 99  |,2:.L1:.211,11:.|
000015E0: C2 28 53 28 33 29 AA 4C  AC 4D 54 AA 4C 31 29 00  |.(S(3).L.MT.L1).|
000015F0: 18 1E 02 21 5A B2 5A AA  31 3A 8B 20 5A B2 32 30  |...!Z.Z.1:. Z.20|
00001600: 20 B0 20 4C 31 B2 4D 54  AB 31 20 A7 20 5A B2 30  | . L1.MT.1 . Z.0|
00001610: 3A 8D 20 32 33 30 30 30  00 2C 1E 0C 21 82 20 4C  |:. 23000.,..!. L|
00001620: 31 3A 82 20 4C 3A 89 20  38 31 30 30 00 65 1E 34  |1:. L:. 8100.e.4|
00001630: 21 99 3A 99 22 43 48 41  4E 47 45 20 54 45 52 52  |!.:."CHANGE TERR|
00001640: 41 49 4E 20 28 30 2D 22  4D 54 AB 31 22 29 20 22  |AIN (0-"MT.1") "|
00001650: 3B 3A 85 5A 3A 8B 5A B3  30 B0 5A B1 4D 54 AB 31  |;:.Z:.Z.0.Z.MT.1|
00001660: A7 38 31 30 30 00 98 1E  3E 21 85 20 22 4F 4E 20  |.8100...>!. "ON |
00001670: 54 41 42 4C 45 20 28 30  2D 33 29 20 22 3B 5A 31  |TABLE (0-3) ";Z1|
00001680: 3A 8B 20 5A 31 B3 30 20  B0 20 5A 31 B1 4D 54 AB  |:. Z1.0 . Z1.MT.|
00001690: 31 20 A7 20 38 35 30 30  00 A8 1E 48 21 5A 32 B2  |1 . 8500...H!Z2.|
000016A0: 5A 3A 89 20 38 36 30 30  00 E8 1E 66 21 99 3A 85  |Z:. 8600...f!.:.|
000016B0: 22 43 48 41 4E 47 45 20  54 45 52 52 41 49 4E 20  |"CHANGE TERRAIN |
000016C0: 4F 4E 20 54 41 42 4C 45  20 28 30 2D 33 29 20 22  |ON TABLE (0-3) "|
000016D0: 3B 5A 31 3A 8B 20 5A 31  B3 30 20 B0 20 5A 31 B1  |;Z1:. Z1.0 . Z1.|
000016E0: 33 20 A7 20 38 31 30 30  00 F8 1E 70 21 5A B2 30  |3 . 8100...p!Z.0|
000016F0: 3A 5A 32 B2 4D 54 AB 31  00 00 1F 98 21 99 43 24  |:Z2.MT.1....!.C$|
00001700: 00 1E 1F A2 21 99 3A 99  22 54 45 52 52 41 49 4E  |....!.:."TERRAIN|
00001710: 20 54 41 42 4C 45 20 23  22 3B 5A 31 3A 99 00 2D  | TABLE #";Z1:..-|
00001720: 1F AC 21 81 20 4C B2 5A  20 A4 20 5A 32 00 37 1F  |..!. L.Z . Z2.7.|
00001730: B1 21 58 24 B2 22 22 00  7E 1F B6 21 99 22 54 45  |.!X$."".~..!."TE|
00001740: 52 52 41 49 4E 20 23 22  4C 3A 99 22 4F 4C 44 20  |RRAIN #"L:."OLD |
00001750: 4D 4F 56 45 43 4F 53 54  22 C2 28 53 28 33 29 AA  |MOVECOST".(S(3).|
00001760: 5A 31 AC 4D 54 AA 4C 29  3B 3A 85 22 20 4E 45 57  |Z1.MT.L);:." NEW|
00001770: 20 4D 4F 56 45 43 4F 53  54 20 22 3B 58 24 00 91  | MOVECOST ";X$..|
00001780: 1F C0 21 8B C3 28 58 24  29 B3 31 A7 20 38 36 36  |..!..(X$).1. 866|
00001790: 30 00 B2 1F CA 21 56 B2  C5 28 58 24 29 3A 8B 20  |0....!V..(X$):. |
000017A0: 56 B3 30 20 B0 20 56 B1  32 35 35 20 A7 20 38 36  |V.0 . V.255 . 86|
000017B0: 33 30 00 C7 1F CF 21 97  20 53 28 33 29 AA 5A 31  |30....!. S(3).Z1|
000017C0: AC 4D 54 AA 4C 2C 56 00  CF 1F D4 21 82 20 4C 00  |.MT.L,V....!. L.|
000017D0: DA 1F DE 21 89 20 38 31  30 30 00 F2 1F 10 27 8F  |...!. 8100....'.|
000017E0: 20 2A 2A 20 53 41 56 45  20 49 4E 49 54 20 44 41  | ** SAVE INIT DA|
000017F0: 54 41 00 FA 1F 42 27 99  43 24 00 13 20 4C 27 99  |TA...B'.C$.. L'.|
00001800: 22 53 41 56 45 20 49 4E  49 54 20 44 41 54 41 20  |"SAVE INIT DATA |
00001810: 22 3A 99 00 37 20 56 27  85 20 22 53 41 56 45 20  |":..7 V'. "SAVE |
00001820: 46 49 4C 45 20 3A 22 3B  4E 24 3A 8B 20 C3 28 4E  |FILE :";N$:. .(N|
00001830: 24 29 B3 31 A7 20 8E 00  44 20 88 27 46 49 B2 33  |$).1. ..D .'FI.3|
00001840: 39 38 30 38 00 51 20 8D  27 45 4E B2 34 30 34 34  |9808.Q .'EN.4044|
00001850: 37 00 5D 20 92 27 8D 20  32 31 30 30 30 00 63 20  |7.] .'. 21000.c |
00001860: 9C 27 8E 00 7F 20 F8 2A  8F 20 2A 2A 20 4C 4F 41  |.'... .*. ** LOA|
00001870: 44 20 41 20 42 49 4E 41  52 59 20 46 49 4C 45 00  |D A BINARY FILE.|
00001880: 99 20 34 2B 99 22 4C 4F  41 44 20 42 49 4E 41 52  |. 4+."LOAD BINAR|
00001890: 59 20 46 49 4C 45 22 3A  99 00 AF 20 3E 2B 85 22  |Y FILE":... >+."|
000018A0: 4C 4F 41 44 20 46 49 4C  45 20 3A 22 3B 4E 24 00  |LOAD FILE :";N$.|
000018B0: C0 20 48 2B 8B C3 28 4E  24 29 B3 31 20 A7 20 8E  |. H+..(N$).1 . .|
000018C0: 00 F1 20 52 2B 85 20 22  4C 4F 41 44 20 54 4F 20  |.. R+. "LOAD TO |
000018D0: 41 44 44 52 45 53 53 20  22 3B 5A 3A 8B 20 5A B3  |ADDRESS ";Z:. Z.|
000018E0: 32 35 36 20 B0 20 5A B1  36 35 35 33 35 20 A7 20  |256 . Z.65535 . |
000018F0: 8E 00 02 21 5C 2B 46 49  B2 5A 3A 8D 20 32 30 30  |...!\+FI.Z:. 200|
00001900: 30 30 00 08 21 C0 2B 8E  00 23 21 E0 2E 8F 20 2A  |00..!.+..#!... *|
00001910: 2A 20 20 53 41 56 45 20  42 49 4E 41 52 59 20 46  |*  SAVE BINARY F|
00001920: 49 4C 45 00 29 21 12 2F  8F 00 41 21 1C 2F 99 22  |ILE.)!./..A!./."|
00001930: 53 41 56 45 20 42 49 4E  41 52 59 20 46 49 4C 45  |SAVE BINARY FILE|
00001940: 22 00 67 21 26 2F 99 3A  85 20 22 53 41 56 45 20  |".g!&/.:. "SAVE |
00001950: 46 49 4C 45 20 3A 22 3B  4E 24 3A 8B 20 C3 28 4E  |FILE :";N$:. .(N|
00001960: 24 29 B3 31 A7 20 8E 00  9A 21 30 2F 85 20 22 53  |$).1. ...!0/. "S|
00001970: 41 56 45 20 46 52 4F 4D  20 41 44 44 52 45 53 53  |AVE FROM ADDRESS|
00001980: 20 22 3B 5A 3A 8B 20 5A  B3 32 35 36 20 B0 20 5A  | ";Z:. Z.256 . Z|
00001990: B1 36 35 35 33 35 20 A7  20 8E 00 CE 21 3A 2F 85  |.65535 . ...!:/.|
000019A0: 20 22 54 4F 20 41 44 44  52 45 53 53 20 22 3B 5A  | "TO ADDRESS ";Z|
000019B0: 31 3A 8B 20 5A 31 B3 30  20 B0 20 5A 31 B1 36 35  |1:. Z1.0 . Z1.65|
000019C0: 35 33 35 20 B0 20 5A 31  B3 5A 20 A7 20 8E 00 E5  |535 . Z1.Z . ...|
000019D0: 21 44 2F 46 49 B2 5A 3A  45 4E B2 5A 31 3A 8D 20  |!D/FI.Z:EN.Z1:. |
000019E0: 32 31 30 30 30 00 EB 21  4E 2F 8E 00 FD 21 20 4E  |21000..!N/...! N|
000019F0: 8F 20 2A 2A 20 4C 4F 41  44 20 42 49 4E 00 31 22  |. ** LOAD BIN.1"|
00001A00: 2A 4E 5A 20 B2 B5 28 46  49 AD 32 35 36 29 3A 97  |*NZ ..(FI.256):.|
00001A10: 20 37 38 30 2C 31 35 3A  97 20 37 38 31 2C 38 3A  | 780,15:. 781,8:|
00001A20: 97 20 37 38 32 2C 32 35  35 3A 9E 20 36 35 34 36  |. 782,255:. 6546|
00001A30: 36 00 67 22 34 4E 4C B2  C3 28 4E 24 29 3A 81 20  |6.g"4NL..(N$):. |
00001A40: 4C 31 B2 31 20 A4 20 4C  3A 97 20 34 30 34 34 37  |L1.1 . L:. 40447|
00001A50: AA 4C 31 2C C6 28 CA 28  4E 24 2C 4C 31 2C 31 29  |.L1,.(.(N$,L1,1)|
00001A60: 29 20 3A 82 20 4C 31 00  8D 22 3E 4E 97 20 37 38  |) :. L1..">N. 78|
00001A70: 30 2C 4C 3A 97 20 37 38  31 2C 30 3A 97 20 37 38  |0,L:. 781,0:. 78|
00001A80: 32 2C 31 35 38 3A 9E 20  36 35 34 36 39 00 BA 22  |2,158:. 65469.."|
00001A90: 48 4E 97 20 37 38 30 2C  30 3A 97 20 37 38 31 2C  |HN. 780,0:. 781,|
00001AA0: 46 49 AB 5A 20 AC 32 35  36 3A 97 20 37 38 32 2C  |FI.Z .256:. 782,|
00001AB0: 5A 20 3A 9E 20 36 35 34  39 33 00 C0 22 52 4E 8E  |Z :. 65493.."RN.|
00001AC0: 00 D2 22 08 52 8F 20 2A  2A 20 42 49 4E 20 53 41  |..".R. ** BIN SA|
00001AD0: 56 45 00 05 23 12 52 5A  B2 B5 28 45 4E AD 32 35  |VE..#.RZ..(EN.25|
00001AE0: 36 29 3A 97 20 37 38 30  2C 31 35 3A 97 20 37 38  |6):. 780,15:. 78|
00001AF0: 31 2C 38 3A 97 20 37 38  32 2C 32 35 35 3A 9E 20  |1,8:. 782,255:. |
00001B00: 36 35 34 36 36 00 3A 23  1C 52 4C B2 C3 28 4E 24  |65466.:#.RL..(N$|
00001B10: 29 3A 81 20 4C 31 B2 31  20 A4 20 4C 3A 97 20 34  |):. L1.1 . L:. 4|
00001B20: 30 34 34 37 AA 4C 31 2C  C6 28 CA 28 4E 24 2C 4C  |0447.L1,.(.(N$,L|
00001B30: 31 2C 31 29 29 3A 82 20  4C 31 00 60 23 26 52 97  |1,1)):. L1.`#&R.|
00001B40: 20 37 38 30 2C 4C 3A 97  20 37 38 31 2C 30 3A 97  | 780,L:. 781,0:.|
00001B50: 20 37 38 32 2C 31 35 38  3A 9E 20 36 35 34 36 39  | 782,158:. 65469|
00001B60: 00 85 23 30 52 97 20 37  38 30 2C 32 35 31 3A 97  |..#0R. 780,251:.|
00001B70: 20 37 38 31 2C 45 4E AB  5A AC 32 35 36 3A 97 20  | 781,EN.Z.256:. |
00001B80: 37 38 32 2C 5A 00 B8 23  3A 52 97 20 32 35 31 2C  |782,Z..#:R. 251,|
00001B90: 46 49 AB B5 28 46 49 AD  32 35 36 29 AC 32 35 36  |FI..(FI.256).256|
00001BA0: 3A 97 20 32 35 32 2C B5  28 46 49 AD 32 35 36 29  |:. 252,.(FI.256)|
00001BB0: 3A 9E 20 36 35 34 39 36  00 BE 23 44 52 8E 00 D8  |:. 65496..#DR...|
00001BC0: 23 F0 55 8F 20 2A 2A 20  4C 49 53 54 20 55 4E 49  |#.U. ** LIST UNI|
00001BD0: 54 20 53 48 41 50 45 53  00 E0 23 22 56 99 43 24  |T SHAPES..#"V.C$|
00001BE0: 00 EC 23 2C 56 5A B2 30  3A 4C B2 30 00 FB 23 4A  |..#,VZ.0:L.0..#J|
00001BF0: 56 8B 20 4B B2 32 37 20  A7 20 8E 00 12 24 54 56  |V. K.27 . ...$TV|
00001C00: 99 43 24 3A 99 22 55 4E  49 54 23 20 53 48 41 50  |.C$:."UNIT# SHAP|
00001C10: 45 22 00 24 24 5E 56 5A  31 B2 4C AC 34 AA 32 AA  |E".$$^VZ1.L.4.2.|
00001C20: 53 28 32 29 00 47 24 68  56 99 4C 3B 3A 97 20 32  |S(2).G$hV.L;:. 2|
00001C30: 31 34 2C 5A AA 31 3A 99  3A 97 20 32 31 31 2C 38  |14,Z.1:.:. 211,8|
00001C40: 3A 99 C2 28 5A 31 29 00  6C 24 72 56 4C B2 4C AA  |:..(Z1).l$rVL.L.|
00001C50: 31 3A 5A B2 5A AA 31 3A  8B 20 4C B1 55 4E AB 31  |1:Z.Z.1:. L.UN.1|
00001C60: 20 A7 20 8D 20 32 33 30  30 30 3A 8E 00 8E 24 7C  | . . 23000:...$||
00001C70: 56 8B 20 5A B1 B2 32 30  20 A7 20 5A B2 30 3A 8D  |V. Z..20 . Z.0:.|
00001C80: 20 32 33 30 30 30 3A 89  20 32 32 30 39 30 00 9A  | 23000:. 22090..|
00001C90: 24 86 56 89 20 32 32 31  31 30 00 CA 24 D8 59 99  |$.V. 22110..$.Y.|
00001CA0: 3A 99 22 50 52 45 53 53  20 41 4E 59 20 4B 45 59  |:."PRESS ANY KEY|
00001CB0: 20 54 4F 20 43 4F 4E 54  49 4E 55 45 22 3B 3A 8D  | TO CONTINUE";:.|
00001CC0: 20 31 31 35 3A 99 4B 24  3A 8E 00 D0 24 2F 75 80  | 115:.K$:...$/u.|
00001CD0: 00 D6 24 5F EA 80 00 09  25 60 EA 9F 20 31 35 2C  |..$_....%`.. 15,|
00001CE0: 38 2C 31 35 3A 98 31 35  2C 22 53 30 3A 44 52 41  |8,15:.15,"S0:DRA|
00001CF0: 57 49 4E 49 54 22 3A 94  22 44 52 41 57 49 4E 49  |WINIT":."DRAWINI|
00001D00: 54 22 2C 38 3A A0 20 31  35 00 00 00              |T",8:. 15...    |

..%.... 51,0:. 52,48:.  55,0:.56,48:..3.
..LM.56.256.T.Z.. MEM(4),DF(3),NA$(4),DF
$(3).I.D.. S(4),E(4),L(4).S.E.. 500...N.
V2..(V.256):V1.V.V2.256:....S.K$.""...X.
. K$:. K$."" . 120...}.K.F(K$):..N...C$.
G(147)...... SHAPE BASE,MAP BASE,UNIT BA
SE,MOVETABLE,UNIT2 BASE.".... L.0 . 4:. 
NA$(L):. L.F.... 40320,40322,40324,40341
,40343.A.... L.0 . 4:. MEM(L):. L...... 
HGT,BASE HGT,VISIBILITY,SHAPE. .&.. L.0 
. 3:. DF$(L):. L...0.. 4080.F.... INIT D
ATA FOR DRAW.F.N....C$...$.."      SQRPA
C INIT":..".... L.0 . 4:.NA$(L);.10);" F
ROM"S(L)"TO"E(L)"("L(L)")".,.8.. L:..P.B
.."(I)INITIALIZE NEW SQRPAC MAP".H.L.."(
L)OAD INIT DATA"...V.."(S)AVE INIT DATA"
...`.."(D)EFINE TERRAIN"...J.."(R)EAD IN
 BINARY FILE".T.T.."(W)RITE OUT BINARY F
ILE"...~.."(C)LEAR ALL UNIT DATA"......"
(A)SSIGN SHAPES TO UNITS".-...."(T)ERRAI
N MOVE COSTS".P...."(G)OTO DRAW.USE (BUI
LD MAP)".F...."(Z)ERO OUT MAP".V....:."(
E)XIT"......"SELECT :";...... 115:.K$...
... K$."I" . 2000...... K$."L" . . 4000.
V.(.. K$."S" . . 10000...2.. K$."D" . 50
00...<.. K$."E" . ....F.. K$."W" . . 120
00.).P.. K$."R" . . 11000.?.Z.. K$."C" .
 . 6000.U.D.. K$."A" . . 7000.K.N.. K$."
T" . . 8000..X.. K$."G" . 1900...... K$
."Z" . . L.S(1) . E(1):. L,0:. L...... 1
000.F.L.. RUN DRAW.USE...V..".LOAD "G(34
)"DRAW.USE"G(34)",8"...... 198,8:.L.0.7:
. Z:. 631.L,Z:.L...... 19,13,32,32,82,85
,78,13.6....:..>.P..C$.T.4..:."LARGEST X
 VALUE (19-127) ";V:.V.19.V.127.2100...>
.. V.2..(V.2). ."MUST END ODD":. 2100...
H.MX.V:. 40336,V.19:. 40338,V...R..:."LA
RGEST X VALUE (9-127) ";V:.V.9.V.127.213
0...\.. V.2..(V.2). ."MUST END ODD":. 21
30.9.F.MY.V:. 40337,V.9:. 40339,V.H.P..:
. "# OF PLAYERS (1-4) ";V:. V.1.V.4.2160
.{.Z.PL.V:. 40330,V.....UN.0:. L.0 . PL.
1.B....:."# OF UNITS FOR PLAYER #"L"(1-2
55) ";:. V...... V.1 . V.255 . 2190.....
. 40326.L,V:UN.UN.V.%...."STACKING SYMBO
L PLAYER #";L;"(0-127) ";:. V.>.... V.0 
. V.127 . 2220.N.... 40332.L,V.V.J.. L..
.T..:. "CONFLICT SYMBOL (0-127) ";V:. V.
0 . V.127 . 2260...... 40331,V......:. "
USE UNIT MPVE ASM (Y/N) ";K$:. K$.."Y" .
 K$.."N". 2300...... K$."N" . . 40340,0:
MT.0:. 2500.C....:. "MAX NUMBER OF TERRA
IN (1-127) ";V:. V.1 . V.127 . 2320.V...
MT.V:. 40340,V.\.D...|....:."    INITIAL
IZE SQR PAC"......:."LOW";LM......"HIGH 
39167"...... **SET VARIBLES.A.... L.0 . 
4...... K$."N" . L.2 . 2650......"ADDRES
S FOR ";NA$(L)" : ";...... V:S(L).V.-.(.
. 110:. ME(L),V1:. ME(L).1,V2.G.-.. L.1 
. . "# OF SHAPES USED (1-128) ";V:SH.V:L
(L).V.8.../.. L.1 . L(L).(MX.1).(MY.1)..
.2.. L.2 . L(L).UN.4...4.. L.3 . L(L).MT
.4.H.7.. L.4 . L(L).UN.7...F.. 3000:. Z.
0 . ."MEMORY OVERLAP":.:. 2570...P.E(L).
S(L).L(L).1.9.U.."MEM USED FROM ";S(L);"
TO"E(L)"("L(L)")".A.Z.. L.L.D.. 1000.H..
.. ** IS MEM CONFLICTING.P.L.Z.0...Q.. S
(L).L(L).1.39167 . Z.1:....V.. S(L).LM .
 Z.1:....... L.0 . ....... L1.0 . L.1:. 
S(L1)..S(L)..S(L1).L(L1).1..S(L).Z.1....
.. S(L1).S(L)..S(L).L(L).1..S(L1). Z.1..
.... L1.%.....=. .. ** LOAD INIT DATA.E.
...C$.`.R..:."   LOAD INIT DATA"......:.
 "NAME OF INIT FILE : ";N$...... C(N$).1
. ......FI.39808:. 20000.Y.... L.0 . 4:S
(L).B(MEM(L)).B(MEM(L).1).256:. L.....MX
.B(40338):MY.B(40339).....PL.B(40330).0.
..UN.0:. L.0 . PL.1:UN.UN.B(40326.L):. L
.@.".MT.B(40340).N.... L.0 . 4...... L.0
 . .:. "# OF SHAPES USED ";V:SH.V:L(L).V
.8...... L.1 . L(L).(MX.1).(MY.1)...... 
L.2 . L(L).UN.4.X.... MT.0 . L.2 . S(L).
0:. 4700...... L.3 . L(L).MT.4... .. L.4
 . L(L).UN.7...*.E(L).S(L).L(L).1.!.\.. 
L.'.....B.... ** MODIEFY TER ITEMS.J....
C$.S.D..:."TERRAIN HGT,BASEHGT,VIS & SHA
PE".Y.N.....X..L.0.3:.L.1;") "DF$(L)" DE
FAULT :";:X$."CHANGE":.DF(L).X$."SKIP".J
....X$:. L......:."CHANGE ONE TERRAIN VA
LUE"......"(N)EW VALUES FOR MANY TERRAIN
"......"(R)ETURN TO MAIN MENU".G.P..:."S
ELECT :";:. 115.[.... K$."R" . 1000.....
. K$."0" . K$."5" . V.E(K$).1:DF(V).(DF(
V).0).(.1)...H.. K$."C". 5500...R..K$."N
".5520.A.... 5000...|..:. "CHANGE TERRAI
N (0-127) ";Z:. Z.0 . Z.127 .5000.....Z1
.Z:. 5600.>....:."CHANGE FROM (0-127) ";
Z:. Z.0 . Z.127 . 5000.R...."TO (";Z;"-1
27) ";:. Z1:. Z1.Z . Z1.127 . 5520......
 L.Z . Z1......"SHAPE #";L:. L1.0 . 3...
... DF(L1).0. 5660......DF$(L1);" OLD ";
B(39808.L1.128.L);" NEW ";:X$."":. X$...
...C(X$).1. 5660.....V.E(X$):. 39808.L1.
128.L,V.*.... L1:..1.&..L.<.0.. 5000.U.P
.. ** CLEAR UNIT DATA...U..C$:.:."   MOV
ING UNITS OFF MAP ...":....Z.. L.0 . UN.
1.M...Z.S(2).L.4:.Z,255:.Z.1,255:.Z.3,0:
.MT.1..S(4).L.7.4,255...... ".";:. L:...
.......X.. ** ASSIGN SHAPES TO UNITS....
..C$.&....:."     UNIT SHAPES".,.....K..
.."(L)IST UNITS AND SHAPES".C...." MAKE 
CHANGES ON".U...."(O)NE UNIT"...F.."(M)A
NY UNITS"...K.."(D)EFAULT SHAPE ";DS;"(>
255 NONE)".Q.P..:."(R)ETURN TO MAIN MENU
"... ..:."SELECT ";:. 115...... K$."L" .
 . 22000...... K$."R" . ..%.... K$."O" .
 7550.9.... K$."M" . 7600.G....K$."D"..:
."NEW SHAPE ";X$:.C(X$).V.E(X$)...... K$
."D" . . V.0 . V.256 . DS..(V)...L.. 700
0.E.~..:."CHANGE UNIT #";Z:.Z.0.Z.UN.1 .
 7000.U...Z1.Z:. 7700......:. "CHANGE FR
OM UNIT #";Z:.Z.0.Z.UN.1. 7000.3.... "TO
 UNIT #";Z1:. Z1.Z . Z1.UN.1 . 7000.B...
. L.Z . Z1.F.... DS..0 . DS..255 . V.DS:
. 7730......"UNIT #";L;" OLD SHAPE ";B(S
(2).L.4.2);:."NEW SHAPE ";X$...(.. C(X$)
.1. 7740.Y.-.V.E(X$):. V.0 . V.255 . 771
0...2.. S(2).L.4.2,V...<.. L...F.. 7000.
..@.. TERRAIN COST...T..C$.@.^.. MT.1. .
:."NOT IN USE":. 23000:..H....C$.G....:.
"CHANGE MOVEMENT COSTS"......:."(L)IST M
OVE COST TABLES"...B..:." CHANGE MOVEMEN
T COSTS FOR"...L.."(O)NE UNIT".R.V.."(M)
ANY UNITS"......:."(R)ETURN TO MAIN MENU
".... .:."SELECT :";:. 115:.K$...: . K$.
"R" . ..3.D . K$."L" . 8410.G.N . K$."O"
 . 8500.[.X . K$."M" . 8550.F.P . 8100.N
.Z Z.0.... . L.0 . 3:. L1.0 . MT.1.... .
.Z. .C$:. "TERRAIN# MOVECOST (TABLE #";L
;")".... .214,1.Z:.:.211,2:.L1:.211,11:.
B(S(3).L.MT.L1)....!Z.Z.1:. Z.20 . L1.MT
.1 . Z.0:. 23000.,..!. L1:. L:. 8100.E.4
!.:."CHANGE TERRAIN (0-"MT.1") ";:.Z:.Z.
0.Z.MT.1.8100...>!. "ON TABLE (0-3) ";Z1
:. Z1.0 . Z1.MT.1 . 8500...H!Z2.Z:. 8600
...F!.:."CHANGE TERRAIN ON TABLE (0-3) "
;Z1:. Z1.0 . Z1.3 . 8100...P!Z.0:Z2.MT.1
....!.C$....!.:."TERRAIN TABLE #";Z1:..-
..!. L.Z . Z2.7..!X$."".~..!."TERRAIN #"
L:."OLD MOVECOST"B(S(3).Z1.MT.L);:." NEW
 MOVECOST ";X$....!.C(X$).1. 8660...J!V.
E(X$):. V.0 . V.255 . 8630.G.O!. S(3).Z1
.MT.L,V.O.T!. L.Z..!. 8100....'. ** SAVE
 INIT DATA...B'.C$.. L'."SAVE INIT DATA 
":..7 V'. "SAVE FILE :";N$:. C(N$).1. ..
D .'FI.39808.Q .'EN.40447.] .'. 21000.C 
.'.. .*. ** LOAD A BINARY FILE.. 4+."LO
AD BINARY FILE":... >+."LOAD FILE :";N$.
. H+.C(N$).1 . ... R+. "LOAD TO ADDRESS 
";Z:. Z.256 . Z.65535 . ...!\+FI.Z:. 200
00..!.+..#!... **  SAVE BINARY FILE.)!./
..A!./."SAVE BINARY FILE".G!&/.:. "SAVE 
FILE :";N$:. C(N$).1. ...!0/. "SAVE FROM
 ADDRESS ";Z:. Z.256 . Z.65535 . ..N!:/.
 "TO ADDRESS ";Z1:. Z1.0 . Z1.65535 . Z1
.Z . ...!D/FI.Z:EN.Z1:. 21000..!N/...! N
. ** LOAD BIN.1"*NZ ..(FI.256):. 780,15:
. 781,8:. 782,255:. 65466.G"4NL.C(N$):. 
L1.1 . L:. 40447.L1,F(J(N$,L1,1)) :. L1.
.">N. 780,L:. 781,0:. 782,158:. 65469.."
HN. 780,0:. 781,FI.Z .256:. 782,Z :. 654
93.."RN..R".R. ** BIN SAVE..#.RZ..(EN.25
6):. 780,15:. 781,8:. 782,255:. 65466.:#
.RL.C(N$):. L1.1 . L:. 40447.L1,F(J(N$,L
1,1)):. L1.`#&R. 780,L:. 781,0:. 782,158
:. 65469..#0R. 780,251:. 781,EN.Z.256:. 
782,Z..#:R. 251,FI..(FI.256).256:. 252,.
(FI.256):. 65496..#DR..X#.U. ** LIST UNI
T SHAPES..#"V.C$..#,VZ.0:L.0..#JV. K.27 
. ...$TV.C$:."UNIT# SHAPE".$$^VZ1.L.4.2.
S(2).G$HV.L;:. 214,Z.1:.:. 211,8:.B(Z1).
L$RVL.L.1:Z.Z.1:. L.UN.1 . . 23000:...$|
V. Z..20 . Z.0:. 23000:. 22090..$.V. 221
10.J$XY.:."PRESS ANY KEY TO CONTINUE";:.
 115:.K$:..P$/U..V$_....%`.. 15,8,15:.15
,"S0:DRAWINIT":."DRAWINIT",8:  15...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL