_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

Multiple names: BUILDER, WPF-11

FILE INFORMATION

FILENAME(S):
• BUILDER<br>• WPF-11

FILE TYPE(S): PRG

FILE SIZE: 5K

FIRST SEEN: 2025-11-30 19:11:45

APPEARS ON: 3 disk(s)

FILE HASH

6c9296d9ca62cbf85fe923a429cae7d04f17d0e01c31b949d279c016784d1464

FOUND ON DISKS (3 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
ASS PRESENTS BUILDER PRG Commodore 64 Extras 11 3 DOWNLOAD FILE
SKIPPY 3 WPF-11 PRG DuncanTwain 13 2 DOWNLOAD FILE
C 64 SPIELE 291 WPF-11 PRG DuncanTwain 13 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 31 08 01 00 8B 41  B2 30 A7 41 B2 31 3A 97  |..1....A.0.A.1:.|
00000010: 35 33 32 38 30 2C 31 32  3A 97 35 33 32 38 31 2C  |53280,12:.53281,|
00000020: 30 3A 97 35 33 32 36 35  2C 32 37 3A 99 22 93 05  |0:.53265,27:."..|
00000030: 22 00 4F 08 03 00 8B 41  B2 31 A7 41 B2 32 3A 93  |".O....A.1.A.2:.|
00000040: 22 42 4C 41 4E 4B 2E 50  49 43 22 2C 38 2C 31 00  |"BLANK.PIC",8,1.|
00000050: 6F 08 04 00 8B 41 B2 32  A7 41 B2 33 3A 93 22 42  |o....A.2.A.3:."B|
00000060: 4C 41 4E 4B 2E 43 4F 4C  4F 52 22 2C 38 2C 31 00  |LANK.COLOR",8,1.|
00000070: 85 08 05 00 97 35 32 2C  31 35 30 3A 97 35 36 2C  |.....52,150:.56,|
00000080: 31 35 30 3A 9C 00 B6 08  08 00 43 44 24 B2 C7 28  |150:......CD$..(|
00000090: 31 37 29 AA C7 28 31 35  37 29 AA C7 28 31 35 37  |17)..(157)..(157|
000000A0: 29 3A 49 4E 24 B2 C7 28  31 38 29 3A 4F 46 24 B2  |):IN$..(18):OF$.|
000000B0: C7 28 31 34 36 29 00 E5  08 0A 00 43 4C B2 34 30  |.(146).....CL.40|
000000C0: 37 30 34 3A 43 55 B2 43  4C AB 31 31 3A 46 4C B2  |704:CU.CL.11:FL.|
000000D0: 31 36 35 3A 45 4E B2 34  30 31 39 34 3A 4E 55 B2  |165:EN.40194:NU.|
000000E0: 34 30 31 39 38 00 0A 09  14 00 57 49 B2 32 35 33  |40198.....WI.253|
000000F0: 3A 97 57 49 AA 31 2C 32  35 3A 97 57 49 2C 30 3A  |:.WI.1,25:.WI,0:|
00000100: 9E 43 4C 3A 97 57 49 2C  32 31 00 3D 09 16 00 97  |.CL:.WI,21.=....|
00000110: 35 36 35 37 38 2C C2 28  35 36 35 37 38 29 B0 33  |56578,.(56578).3|
00000120: 3A 97 35 36 35 37 36 2C  C2 28 35 36 35 37 36 29  |:.56576,.(56576)|
00000130: AF 32 35 32 3A 97 36 34  38 2C 32 30 30 00 69 09  |.252:.648,200.i.|
00000140: 18 00 97 35 33 32 37 32  2C 33 33 3A 97 35 33 32  |...53272,33:.532|
00000150: 38 32 2C 31 30 3A 97 35  33 32 38 33 2C 31 3A 97  |82,10:.53283,1:.|
00000160: 35 33 32 37 30 2C 32 31  36 00 71 09 1E 00 89 37  |53270,216.q....7|
00000170: 30 00 84 09 28 00 81 44  B2 31 A4 31 32 30 30 3A  |0...(..D.1.1200:|
00000180: 82 44 3A 8E 00 A9 09 3C  00 9E 43 4C 3A 81 49 B2  |.D:....<..CL:.I.|
00000190: 31 A4 34 30 3A 99 C7 28  31 35 38 29 3B 22 40 22  |1.40:..(158);"@"|
000001A0: 3B 3A 82 3A 99 C7 28 35  29 00 B7 09 46 00 86 4D  |;:.:..(5)...F..M|
000001B0: 28 32 37 2C 32 30 29 00  D1 09 50 00 96 A5 4F 44  |(27,20)...P...OD|
000001C0: 28 58 29 B2 28 58 AD 32  B3 B1 B5 28 58 AD 32 29  |(X).(X.2...(X.2)|
000001D0: 29 00 F2 09 52 00 96 A5  4F 4F 28 58 29 B2 28 28  |)...R...OO(X).((|
000001E0: 58 AA 31 29 AD 34 B2 B5  28 28 58 AA 31 29 AD 34  |X.1).4..((X.1).4|
000001F0: 29 29 00 06 0A 54 00 96  A5 58 28 58 29 B2 B5 28  |))...T...X(X)..(|
00000200: 58 AD 31 30 30 29 00 1D  0A 56 00 96 A5 59 28 58  |X.100)...V...Y(X|
00000210: 29 B2 58 AB A5 58 28 58  29 AC 31 30 30 00 31 0A  |).X..X(X).100.1.|
00000220: 5A 00 96 A5 48 28 58 29  B2 58 AA B5 28 58 AD 32  |Z...H(X).X..(X.2|
00000230: 29 00 40 0A 5F 00 96 A5  56 28 59 29 B2 59 AB 31  |).@._...V(Y).Y.1|
00000240: 00 57 0A 64 00 97 37 38  31 2C 32 31 3A 97 37 38  |.W.d..781,21:.78|
00000250: 32 2C 30 3A 9E 43 55 00  72 0A 6E 00 99 22 43 52  |2,0:.CU.r.n.."CR|
00000260: 45 41 54 45 20 4E 45 57  20 4D 41 50 22 3B 3A 8D  |EATE NEW MAP";:.|
00000270: 34 30 00 9D 0A 7D 00 9E  43 4C 3A 99 C7 28 31 37  |40...}..CL:..(17|
00000280: 29 3B 22 20 20 20 20 20  20 20 20 20 20 20 20 20  |);"             |
00000290: 50 4C 45 41 53 45 20 57  41 49 54 22 3B 00 A9 0A  |PLEASE WAIT";...|
000002A0: 82 00 81 49 B2 31 A4 32  36 00 B5 0A 87 00 81 4A  |...I.1.26......J|
000002B0: B2 31 A4 31 39 00 D1 0A  8C 00 8B A5 4F 4F 28 49  |.1.19.......OO(I|
000002C0: 29 AF A5 4F 44 28 4A 29  A7 4D 28 49 2C 4A 29 B2  |)..OD(J).M(I,J).|
000002D0: 31 00 F0 0A 96 00 8B A5  4F 4F 28 49 AB 32 29 AF  |1.......OO(I.2).|
000002E0: A8 A5 4F 44 28 4A 29 A7  4D 28 49 2C 4A 29 B2 31  |..OD(J).M(I,J).1|
000002F0: 00 05 0B B4 00 82 4A 3A  8B 49 B3 32 B0 49 B1 32  |......J:.I.2.I.2|
00000300: 30 A7 31 39 35 00 2E 0B  BE 00 97 37 38 31 2C 32  |0.195......781,2|
00000310: 34 3A 97 37 38 32 2C B5  28 49 AD 32 29 AC 33 AA  |4:.782,.(I.2).3.|
00000320: 32 3A 9E 43 55 3A 99 B5  28 49 AD 32 29 3B 00 39  |2:.CU:..(I.2);.9|
00000330: 0B C3 00 82 49 3A 9E 43  4C 00 5D 0B C4 00 99 22  |....I:.CL.]...."|
00000340: 52 41 4E 44 4F 4D 20 54  45 52 52 41 49 4E 20 28  |RANDOM TERRAIN (|
00000350: 59 2F 4E 29 22 3B 3A 97  31 39 38 2C 30 00 7A 0B  |Y/N)";:.198,0.z.|
00000360: C6 00 A1 41 24 3A 8B 41  24 B2 22 59 22 A7 8D 31  |...A$:.A$."Y"..1|
00000370: 30 30 30 30 3A 89 32 30  30 30 00 89 0B C7 00 8B  |0000:.2000......|
00000380: 41 24 B2 22 22 A7 31 39  38 00 C7 0B C8 00 9E 43  |A$."".198......C|
00000390: 4C 3A 99 49 4E 24 3B 22  20 20 31 20 20 22 3B 4F  |L:.IN$;"  1  ";O|
000003A0: 46 24 3B 22 20 20 20 20  20 20 20 20 20 20 20 20  |F$;"            |
000003B0: 20 20 22 3B 49 4E 24 3B  22 20 54 45 52 52 41 49  |  ";IN$;" TERRAI|
000003C0: 4E 20 22 3B 4F 46 24 00  01 0C DC 00 99 49 4E 24  |N ";OF$......IN$|
000003D0: 3B 22 36 20 20 20 32 22  3B 4F 46 24 3B 22 20 20  |;"6   2";OF$;"  |
000003E0: 20 20 3C 53 50 41 43 45  20 42 41 52 3E 20 3D 20  |  <SPACE BAR> = |
000003F0: 43 4C 45 41 52 20 20 52  20 3D 20 52 4F 55 47 48  |CLEAR  R = ROUGH|
00000400: 22 00 3A 0C E6 00 99 49  4E 24 3B 22 35 20 20 20  |".:....IN$;"5   |
00000410: 33 22 3B 4F 46 24 3B 22  20 20 20 20 46 20 3D 20  |3";OF$;"    F = |
00000420: 46 4F 52 45 53 54 20 20  20 20 20 20 20 20 20 20  |FOREST          |
00000430: 20 4C 20 3D 20 4C 41 4B  45 22 00 74 0C F0 00 99  | L = LAKE".t....|
00000440: 49 4E 24 3B 22 20 20 34  20 20 22 3B 4F 46 24 3B  |IN$;"  4  ";OF$;|
00000450: 22 20 20 20 20 4D 20 3D  20 4D 4F 55 4E 54 41 49  |"    M = MOUNTAI|
00000460: 4E 53 20 20 20 20 20 20  20 20 58 20 3D 20 44 4F  |NS        X = DO|
00000470: 4E 45 22 3B 00 8C 0C FA  00 58 B2 31 33 3A 59 B2  |NE";.....X.13:Y.|
00000480: 31 30 3A 53 58 B2 58 3A  53 59 B2 59 00 A0 0C 2C  |10:SX.X:SY.Y...,|
00000490: 01 48 B2 A5 48 28 58 29  3A 56 B2 A5 56 28 59 29  |.H..H(X):V..V(Y)|
000004A0: 00 AB 0C 31 01 8D 32 39  39 35 30 00 B6 0C 32 01  |...1..29950...2.|
000004B0: 8D 35 30 30 30 30 00 CF  0C 33 01 99 C7 28 35 29  |.50000...3...(5)|
000004C0: 3B 22 A6 A7 22 3B 43 44  24 3B 22 A8 A9 22 3B 00  |;"..";CD$;"..";.|
000004D0: DA 0C 35 01 97 31 39 38  2C 30 00 ED 0C 36 01 A1  |..5..198,0...6..|
000004E0: 41 24 3A 8B 41 24 B2 22  22 A7 33 31 30 00 0E 0D  |A$:.A$."".310...|
000004F0: 40 01 8B 41 24 B2 22 20  22 A7 8D 32 39 39 35 30  |@..A$." "..29950|
00000500: 3A 4D 28 58 2C 59 29 B2  31 3A 89 34 30 30 00 2F  |:M(X,Y).1:.400./|
00000510: 0D 4A 01 8B 41 24 B2 22  52 22 A7 8D 32 39 39 35  |.J..A$."R"..2995|
00000520: 30 3A 4D 28 58 2C 59 29  B2 32 3A 89 34 30 30 00  |0:M(X,Y).2:.400.|
00000530: 50 0D 54 01 8B 41 24 B2  22 46 22 A7 8D 32 39 39  |P.T..A$."F"..299|
00000540: 35 30 3A 4D 28 58 2C 59  29 B2 33 3A 89 34 30 30  |50:M(X,Y).3:.400|
00000550: 00 71 0D 5E 01 8B 41 24  B2 22 4C 22 A7 8D 32 39  |.q.^..A$."L"..29|
00000560: 39 35 30 3A 4D 28 58 2C  59 29 B2 34 3A 89 34 30  |950:M(X,Y).4:.40|
00000570: 30 00 92 0D 68 01 8B 41  24 B2 22 4D 22 A7 8D 32  |0...h..A$."M"..2|
00000580: 39 39 35 30 3A 4D 28 58  2C 59 29 B2 35 3A 89 34  |9950:M(X,Y).5:.4|
00000590: 30 30 00 A2 0D 72 01 8B  41 24 B2 22 58 22 A7 35  |00...r..A$."X".5|
000005A0: 30 30 00 B9 0D 7C 01 8D  32 39 39 35 30 3A 8D 31  |00...|..29950:.1|
000005B0: 38 30 30 3A 8D 31 32 30  30 00 C2 0D 90 01 89 33  |800:.1200......3|
000005C0: 30 30 00 D9 0D F4 01 8D  32 39 39 35 30 3A 8D 31  |00......29950:.1|
000005D0: 38 30 30 3A 89 32 30 30  30 00 E7 0D B0 04 53 58  |800:.2000.....SX|
000005E0: B2 58 3A 53 59 B2 59 00  FE 0D BA 04 5A B2 C5 28  |.X:SY.Y.....Z..(|
000005F0: 41 24 29 3A 8B 5A B2 30  B0 5A B1 36 A7 8E 00 23  |A$):.Z.0.Z.6...#|
00000600: 0E C4 04 91 5A 89 31 32  35 30 2C 31 32 36 30 2C  |....Z.1250,1260,|
00000610: 31 32 37 30 2C 31 32 38  30 2C 31 32 38 35 2C 31  |1270,1280,1285,1|
00000620: 32 39 30 00 35 0E E2 04  53 59 B2 53 59 AB 32 3A  |290.5...SY.SY.2:|
00000630: 89 31 33 30 30 00 4F 0E  EC 04 53 58 B2 53 58 AA  |.1300.O...SX.SX.|
00000640: 32 3A 53 59 B2 53 59 AB  31 3A 89 31 33 30 30 00  |2:SY.SY.1:.1300.|
00000650: 69 0E F6 04 53 58 B2 53  58 AA 32 3A 53 59 B2 53  |i...SX.SX.2:SY.S|
00000660: 59 AA 31 3A 89 31 33 30  30 00 7B 0E 00 05 53 59  |Y.1:.1300.{...SY|
00000670: B2 53 59 AA 32 3A 89 31  33 30 30 00 95 0E 05 05  |.SY.2:.1300.....|
00000680: 53 58 B2 53 58 AB 32 3A  53 59 B2 53 59 AA 31 3A  |SX.SX.2:SY.SY.1:|
00000690: 89 31 33 30 30 00 A9 0E  0A 05 53 58 B2 53 58 AB  |.1300.....SX.SX.|
000006A0: 32 3A 53 59 B2 53 59 AB  31 00 C6 0E 14 05 8B 53  |2:SY.SY.1......S|
000006B0: 58 B3 31 B0 53 59 B3 31  B0 53 58 B1 32 37 B0 53  |X.1.SY.1.SX.27.S|
000006C0: 59 B1 31 39 A7 8E 00 ED  0E 16 05 8B 4D 28 53 58  |Y.19........M(SX|
000006D0: 2C 53 59 29 B2 30 B0 4D  28 53 58 2C 53 59 29 B1  |,SY).0.M(SX,SY).|
000006E0: 34 A7 53 58 B2 58 3A 53  59 B2 59 3A 8E 00 FB 0E  |4.SX.X:SY.Y:....|
000006F0: 1A 05 8B A8 54 31 A7 31  33 37 30 00 04 0F 1E 05  |....T1.1370.....|
00000700: 54 32 B2 30 00 16 0F 28  05 8B 53 58 AA 32 B1 32  |T2.0...(..SX.2.2|
00000710: 37 A7 31 33 33 35 00 28  0F 2A 05 8B 53 59 AA 31  |7.1335.(.*..SY.1|
00000720: B1 31 39 A7 31 33 32 37  00 44 0F 2D 05 8B 4D 28  |.19.1327.D.-..M(|
00000730: 53 58 AA 32 2C 53 59 AA  31 29 B1 35 A7 54 32 B2  |SX.2,SY.1).5.T2.|
00000740: AB 31 3A 8E 00 60 0F 2F  05 8B 4D 28 53 58 AA 32  |.1:..`./..M(SX.2|
00000750: 2C 53 59 AB 31 29 B1 35  A7 54 32 B2 AB 31 3A 8E  |,SY.1).5.T2..1:.|
00000760: 00 71 0F 32 05 8B 53 58  AB 32 B3 31 A7 31 33 37  |.q.2..SX.2.1.137|
00000770: 30 00 83 0F 37 05 8B 53  59 AA 31 B1 31 39 A7 31  |0...7..SY.1.19.1|
00000780: 33 34 35 00 9F 0F 3C 05  8B 4D 28 53 58 AB 32 2C  |345...<..M(SX.2,|
00000790: 53 59 AA 31 29 B1 35 A7  54 32 B2 AB 31 3A 8E 00  |SY.1).5.T2..1:..|
000007A0: BB 0F 41 05 8B 4D 28 53  58 AB 32 2C 53 59 AB 31  |..A..M(SX.2,SY.1|
000007B0: 29 B1 35 A7 54 32 B2 AB  31 3A 8E 00 CB 0F 5A 05  |).5.T2..1:....Z.|
000007C0: 58 B2 53 58 3A 59 B2 53  59 3A 8E 00 DF 0F 08 07  |X.SX:Y.SY:......|
000007D0: 48 B2 A5 48 28 58 29 3A  56 B2 A5 56 28 59 29 00  |H..H(X):V..V(Y).|
000007E0: F7 0F 1C 07 54 B2 C5 28  C9 28 C4 28 4D 28 58 2C  |....T..(.(.(M(X,|
000007F0: 59 29 29 2C 31 29 29 00  02 10 26 07 8B 54 B2 30  |Y)),1))...&..T.0|
00000800: A7 8E 00 0D 10 35 07 8D  35 30 30 30 30 00 32 10  |.....5..50000.2.|
00000810: 3A 07 91 54 89 31 39 30  30 2C 31 39 31 30 2C 31  |:..T.1900,1910,1|
00000820: 39 32 30 2C 31 39 33 30  2C 31 39 34 30 2C 31 39  |920,1930,1940,19|
00000830: 35 30 00 4D 10 6C 07 99  C7 28 35 29 3B 22 20 20  |50.M.l...(5);"  |
00000840: 22 3B 43 44 24 3B 22 C0  C1 22 3B 3A 8E 00 6F 10  |";CD$;"..";:..o.|
00000850: 76 07 99 C7 28 31 35 38  29 3B 22 C2 C3 22 3B 43  |v...(158);"..";C|
00000860: 44 24 3B 22 C4 C5 22 3B  C7 28 35 29 3B 3A 8E 00  |D$;"..";.(5);:..|
00000870: 90 10 80 07 99 C7 28 33  30 29 3B 22 C6 C7 22 3B  |......(30);"..";|
00000880: 43 44 24 3B 22 C8 C9 22  3B C7 28 35 29 3B 3A 8E  |CD$;"..";.(5);:.|
00000890: 00 B2 10 8A 07 99 C7 28  31 35 39 29 3B 22 CA CB  |.......(159);"..|
000008A0: 22 3B 43 44 24 3B 22 CC  CD 22 3B C7 28 35 29 3B  |";CD$;"..";.(5);|
000008B0: 3A 8E 00 D9 10 94 07 99  C7 28 35 29 3B 22 CE CF  |:........(5);"..|
000008C0: 22 3B 43 44 24 3B C7 28  31 35 38 29 3B 22 D0 D1  |";CD$;.(158);"..|
000008D0: 22 3B C7 28 35 29 3B 3A  8E 00 14 11 9E 07 99 C7  |";.(5);:........|
000008E0: 28 31 35 37 29 3B C7 28  31 32 39 29 3B 22 D2 D3  |(157);.(129);"..|
000008F0: D4 D5 22 3B 43 44 24 3B  C7 28 31 35 37 29 3B C7  |..";CD$;.(157);.|
00000900: 28 31 35 37 29 3B C7 28  31 35 33 29 3B 22 D6 D7  |(157);.(153);"..|
00000910: D8 D9 22 3B 00 26 11 9F  07 99 C7 28 35 29 3B 3A  |..";.&.....(5);:|
00000920: 54 31 B2 30 3A 8E 00 47  11 D0 07 9E 43 4C 3A 99  |T1.0:..G....CL:.|
00000930: 22 41 53 53 49 47 4E 20  54 4F 57 4E 53 48 49 50  |"ASSIGN TOWNSHIP|
00000940: 53 22 3B 3A 8D 34 30 00  75 11 E4 07 57 B2 31 3A  |S";:.40.u...W.1:|
00000950: 9E 43 4C 3A 99 22 4E 55  4D 42 45 52 20 4F 46 20  |.CL:."NUMBER OF |
00000960: 54 4F 57 4E 45 53 20 28  34 2D 39 29 22 3B 3A 97  |TOWNES (4-9)";:.|
00000970: 31 39 38 2C 30 00 89 11  E9 07 A1 41 24 3A 8B 41  |198,0......A$:.A|
00000980: 24 B2 22 22 A7 32 30 32  35 00 A3 11 EA 07 5A B2  |$."".2025.....Z.|
00000990: C5 28 41 24 29 3A 8B 5A  B3 34 B0 5A B1 39 A7 32  |.(A$):.Z.4.Z.9.2|
000009A0: 30 32 35 00 B6 11 EE 07  54 4E 25 B2 5A 3A 81 49  |025.....TN%.Z:.I|
000009B0: B2 31 A4 54 4E 25 00 CB  11 F6 07 9E 43 4C 3A 99  |.1.TN%......CL:.|
000009C0: 22 54 4F 57 4E 45 20 23  22 3B 49 00 FD 11 F8 07  |"TOWNE #";I.....|
000009D0: 99 22 4E 41 4D 45 20 3E  22 3B 3A 9E 45 4E 2C 37  |."NAME >";:.EN,7|
000009E0: 3A 54 24 28 49 29 B2 41  24 AA 22 22 3A 8B C3 28  |:T$(I).A$."":..(|
000009F0: 54 24 28 49 29 29 B3 31  A7 32 30 34 30 00 29 12  |T$(I)).1.2040.).|
00000A00: 02 08 9E 43 4C 3A 99 22  50 4F 50 55 4C 41 54 49  |...CL:."POPULATI|
00000A10: 4F 4E 20 3E 22 3B 3A 9E  4E 55 2C 34 3A 54 50 25  |ON >";:.NU,4:TP%|
00000A20: 28 49 29 B2 C5 28 41 24  29 00 48 12 07 08 8B 54  |(I)..(A$).H....T|
00000A30: 50 25 28 49 29 B1 34 39  AF 54 50 25 28 49 29 B3  |P%(I).49.TP%(I).|
00000A40: 32 30 31 A7 32 30 36 30  00 7A 12 09 08 99 3A 99  |201.2060.z....:.|
00000A50: 3A 99 22 35 30 20 2D 20  4D 49 4E 49 4D 55 4D 20  |:."50 - MINIMUM |
00000A60: 20 32 30 30 20 2D 20 4D  41 58 49 4D 55 4D 22 3B  | 200 - MAXIMUM";|
00000A70: 3A 8D 34 30 3A 89 32 30  35 30 00 92 12 0C 08 58  |:.40:.2050.....X|
00000A80: B2 31 33 3A 59 B2 31 30  3A 53 58 B2 58 3A 53 59  |.13:Y.10:SX.X:SY|
00000A90: B2 59 00 AB 12 20 08 9E  43 4C 3A 99 49 4E 24 3B  |.Y... ..CL:.IN$;|
00000AA0: 22 20 20 31 20 20 22 3B  4F 46 24 00 E7 12 2A 08  |"  1  ";OF$...*.|
00000AB0: 99 49 4E 24 3B 22 36 20  20 20 32 22 3B 4F 46 24  |.IN$;"6   2";OF$|
00000AC0: 3B 3A 99 22 20 48 49 54  20 3C 53 50 41 43 45 20  |;:." HIT <SPACE |
00000AD0: 42 41 52 3E 20 54 4F 20  50 4F 53 49 54 49 4F 4E  |BAR> TO POSITION|
00000AE0: 20 54 4F 57 4E 45 22 00  FC 12 34 08 99 49 4E 24  | TOWNE"...4..IN$|
00000AF0: 3B 22 35 20 20 20 33 22  3B 4F 46 24 00 12 13 3E  |;"5   3";OF$...>|
00000B00: 08 99 49 4E 24 3B 22 20  20 34 20 20 22 3B 4F 46  |..IN$;"  4  ";OF|
00000B10: 24 3B 00 2F 13 48 08 8D  31 33 31 30 3A 8B 4D 28  |$;./.H..1310:.M(|
00000B20: 58 2C 59 29 B3 35 AF A8  54 32 A7 32 31 35 30 00  |X,Y).5..T2.2150.|
00000B30: 43 13 52 08 58 B2 58 AA  34 3A 8B 58 B1 32 36 A7  |C.R.X.X.4:.X.26.|
00000B40: 58 B2 31 00 4C 13 57 08  53 58 B2 58 00 65 13 5C  |X.1.L.W.SX.X.e.\|
00000B50: 08 8B 58 B2 39 A7 59 B2  59 AB 32 3A 8B 59 B3 31  |..X.9.Y.Y.2:.Y.1|
00000B60: A7 59 B2 31 38 00 74 13  61 08 53 59 B2 59 3A 89  |.Y.18.t.a.SY.Y:.|
00000B70: 32 31 32 30 00 A3 13 66  08 48 B2 A5 48 28 58 29  |2120...f.H..H(X)|
00000B80: 3A 56 B2 A5 56 28 59 29  3A 8D 32 39 39 35 30 3A  |:V..V(Y):.29950:|
00000B90: 8D 35 30 30 30 30 3A 8D  31 39 35 30 3A 97 31 39  |.50000:.1950:.19|
00000BA0: 38 2C 30 00 B7 13 70 08  A1 41 24 3A 8B 41 24 B2  |8,0...p..A$:.A$.|
00000BB0: 22 22 A7 32 31 36 30 00  E1 13 7A 08 8B 41 24 B2  |"".2160...z..A$.|
00000BC0: 22 20 22 A7 48 44 B2 4D  28 58 2C 59 29 3A 4D 28  |" ".HD.M(X,Y):M(|
00000BD0: 58 2C 59 29 B2 49 AC 31  30 AA 36 3A 89 32 35 30  |X,Y).I.10.6:.250|
00000BE0: 30 00 FE 13 8E 08 8D 32  39 39 35 30 3A 54 31 B2  |0......29950:T1.|
00000BF0: AB 31 3A 8D 31 38 30 30  3A 8F 44 52 54 45 00 08  |.1:.1800:.DRTE..|
00000C00: 14 98 08 8D 31 32 30 30  00 12 14 A2 08 89 32 31  |....1200......21|
00000C10: 35 30 00 25 14 C4 09 54  43 25 28 49 29 B2 58 AC  |50.%...TC%(I).X.|
00000C20: 31 30 30 AA 59 00 4F 14  E2 09 9E 43 4C 3A 99 22  |100.Y.O....CL:."|
00000C30: 44 45 46 45 4E 53 45 20  46 41 43 54 4F 52 20 28  |DEFENSE FACTOR (|
00000C40: 31 2D 34 29 20 3E 22 3B  3A 97 31 39 38 2C 30 00  |1-4) >";:.198,0.|
00000C50: 63 14 E3 09 A1 41 24 3A  8B 41 24 B2 22 22 A7 32  |c....A$:.A$."".2|
00000C60: 35 33 31 00 8C 14 E4 09  54 56 25 28 49 29 B2 C5  |531.....TV%(I)..|
00000C70: 28 41 24 29 3A 8B 54 56  25 28 49 29 B3 31 B0 54  |(A$):.TV%(I).1.T|
00000C80: 56 25 28 49 29 B1 34 A7  32 35 33 31 00 BF 14 E7  |V%(I).4.2531....|
00000C90: 09 9E 43 4C 3A 99 22 54  4F 57 4E 45 20 23 22 3B  |..CL:."TOWNE #";|
00000CA0: 49 3B 22 20 3E 20 22 3B  54 24 28 49 29 3A 99 22  |I;" > ";T$(I):."|
00000CB0: 50 4F 50 2E 20 3E 20 22  3B 54 50 25 28 49 29 00  |POP. > ";TP%(I).|
00000CC0: F1 14 E8 09 99 22 44 45  46 2E 20 3E 20 22 3B 54  |....."DEF. > ";T|
00000CD0: 56 25 28 49 29 3A 99 22  49 53 20 54 48 49 53 20  |V%(I):."IS THIS |
00000CE0: 4F 4B 20 28 59 2F 4E 29  22 3B 3A 97 31 39 38 2C  |OK (Y/N)";:.198,|
00000CF0: 30 00 05 15 EC 09 A1 41  24 3A 8B 41 24 B2 22 22  |0......A$:.A$.""|
00000D00: A7 32 35 34 30 00 16 15  EE 09 8B 41 24 B2 22 59  |.2540......A$."Y|
00000D10: 22 A7 32 35 35 30 00 28  15 EF 09 8B 41 24 B3 B1  |".2550.(....A$..|
00000D20: 22 4E 22 A7 32 35 34 30  00 49 15 F1 09 8D 32 39  |"N".2540.I....29|
00000D30: 39 35 30 3A 4D 28 58 2C  59 29 B2 48 44 3A 8D 31  |950:M(X,Y).HD:.1|
00000D40: 38 30 30 3A 89 32 30 33  38 00 50 15 F6 09 82 49  |800:.2038.P....I|
00000D50: 00 7E 15 28 0A 9E 43 4C  3A 99 22 53 43 45 4E 41  |.~.(..CL:."SCENA|
00000D60: 52 49 4F 20 46 49 4C 45  4E 41 4D 45 20 22 3B 3A  |RIO FILENAME ";:|
00000D70: 9E 45 4E 2C 39 3A 42 24  B2 41 24 AA 22 22 00 9E  |.EN,9:B$.A$.""..|
00000D80: 15 2A 0A 9E 43 4C 3A 99  22 49 4E 53 45 52 54 20  |.*..CL:."INSERT |
00000D90: 53 43 45 4E 41 52 49 4F  20 44 49 53 4B 22 00 BE  |SCENARIO DISK"..|
00000DA0: 15 2D 0A 99 3A 99 22 50  52 45 53 53 20 3C 46 20  |.-..:."PRESS <F |
00000DB0: 31 3E 20 4B 45 59 22 3A  97 31 39 38 2C 30 00 DC  |1> KEY":.198,0..|
00000DC0: 15 32 0A A1 41 24 3A 8B  C6 28 41 24 AA C7 28 30  |.2..A$:..(A$..(0|
00000DD0: 29 29 B3 B1 31 33 33 A7  32 36 31 30 00 03 16 36  |))..133.2610...6|
00000DE0: 0A 9E 43 4C 3A 99 49 4E  24 3B 22 20 44 4F 20 4E  |..CL:.IN$;" DO N|
00000DF0: 4F 54 20 49 4E 54 45 52  52 55 50 54 20 22 3B 4F  |OT INTERRUPT ";O|
00000E00: 46 24 3B 00 1B 16 37 0A  4D 24 B2 42 24 AA 22 2E  |F$;...7.M$.B$.".|
00000E10: 50 49 43 22 3A 8D 33 30  30 30 30 00 3C 16 A0 0F  |PIC":.30000.<...|
00000E20: 9E 43 4C 3A 99 22 4F 4E  45 20 4D 4F 4D 45 4E 54  |.CL:."ONE MOMENT|
00000E30: 20 50 4C 45 41 53 45 2E  2E 2E 2E 22 00 4D 16 AA  | PLEASE....".M..|
00000E40: 0F 41 44 B2 35 32 32 32  33 3A 5A B2 30 00 61 16  |.AD.52223:Z.0.a.|
00000E50: B4 0F 81 49 B2 30 A4 32  37 3A 81 4A B2 30 A4 32  |...I.0.27:.J.0.2|
00000E60: 30 00 6B 16 BE 0F 5A B2  5A AA 31 00 7C 16 C8 0F  |0.k...Z.Z.1.|...|
00000E70: 97 41 44 AA 5A 2C 4D 28  49 2C 4A 29 00 84 16 CD  |.AD.Z,M(I,J)....|
00000E80: 0F 82 3A 82 00 D1 16 D2  0F 41 24 B2 22 43 4C 45  |..:......A$."CLE|
00000E90: 41 52 3A 43 4C 45 52 49  43 3A 52 4F 55 47 48 3A  |AR:CLERIC:ROUGH:|
00000EA0: 4D 41 47 49 43 49 41 4E  3A 46 4F 52 45 53 54 3A  |MAGICIAN:FOREST:|
00000EB0: 47 4F 4F 44 20 57 49 5A  41 52 44 3A 4C 41 4B 45  |GOOD WIZARD:LAKE|
00000EC0: 3A 4D 49 47 48 54 59 20  53 4F 52 43 45 52 4F 52  |:MIGHTY SORCEROR|
00000ED0: 22 00 E0 16 DC 0F 81 4A  B2 31 A4 C3 28 41 24 29  |"......J.1..(A$)|
00000EE0: 00 EA 16 E6 0F 5A B2 5A  AA 31 00 01 17 EB 0F 97  |.....Z.Z.1......|
00000EF0: 41 44 AA 5A 2C C6 28 CA  28 41 24 2C 4A 2C 31 29  |AD.Z,.(.(A$,J,1)|
00000F00: 29 00 07 17 F0 0F 82 00  1B 17 FA 0F 5A B2 5A AA  |)...........Z.Z.|
00000F10: 31 3A 97 41 44 AA 5A 2C  54 4E 25 00 28 17 04 10  |1:.AD.Z,TN%.(...|
00000F20: 81 49 B2 31 A4 54 4E 25  00 33 17 0E 10 81 4A B2  |.I.1.TN%.3....J.|
00000F30: 31 A4 37 00 3D 17 13 10  5A B2 5A AA 31 00 5C 17  |1.7.=...Z.Z.1.\.|
00000F40: 18 10 8B 4A B1 C3 28 54  24 28 49 29 29 A7 97 41  |...J..(T$(I))..A|
00000F50: 44 AA 5A 2C 31 33 3A 89  34 31 33 30 00 76 17 1D  |D.Z,13:.4130.v..|
00000F60: 10 97 41 44 AA 5A 2C C6  28 CA 28 54 24 28 49 29  |..AD.Z,.(.(T$(I)|
00000F70: 2C 4A 2C 31 29 29 00 7C  17 22 10 82 00 86 17 2C  |,J,1)).|.".....,|
00000F80: 10 5A B2 5A AA 31 00 97  17 36 10 97 41 44 AA 5A  |.Z.Z.1...6..AD.Z|
00000F90: 2C 54 50 25 28 49 29 00  A1 17 3B 10 5A B2 5A AA  |,TP%(I)...;.Z.Z.|
00000FA0: 31 00 B2 17 40 10 97 41  44 AA 5A 2C 54 56 25 28  |1...@..AD.Z,TV%(|
00000FB0: 49 29 00 BC 17 45 10 5A  B2 5A AA 31 00 D1 17 4A  |I)...E.Z.Z.1...J|
00000FC0: 10 97 41 44 AA 5A 2C A5  58 28 54 43 25 28 49 29  |..AD.Z,.X(TC%(I)|
00000FD0: 29 00 DB 17 4F 10 5A B2  5A AA 31 00 F0 17 54 10  |)...O.Z.Z.1...T.|
00000FE0: 97 41 44 AA 5A 2C A5 59  28 54 43 25 28 49 29 29  |.AD.Z,.Y(TC%(I))|
00000FF0: 00 F6 17 5E 10 82 00 31  18 68 10 4D 24 B2 42 24  |...^...1.h.M$.B$|
00001000: AA 22 2E 54 4F 57 4E 45  22 3A 46 49 28 31 29 B2  |.".TOWNE":FI(1).|
00001010: C3 28 4D 24 29 3A 46 49  28 35 29 B2 32 30 34 3A  |.(M$):FI(5).204:|
00001020: 46 49 28 36 29 B2 30 3A  46 49 28 37 29 B2 32 30  |FI(6).0:FI(7).20|
00001030: 37 00 3C 18 6D 10 8D 33  30 30 31 30 00 78 18 6F  |7.<.m..30010.x.o|
00001040: 10 4D 24 B2 42 24 AA 22  2E 43 4F 4C 4F 52 22 3A  |.M$.B$.".COLOR":|
00001050: 46 49 28 31 29 B2 C3 28  4D 24 29 3A 46 49 28 35  |FI(1)..(M$):FI(5|
00001060: 29 B2 32 31 36 3A 46 49  28 36 29 B2 37 32 3A 46  |).216:FI(6).72:F|
00001070: 49 28 37 29 B2 32 31 39  00 83 18 71 10 8D 33 30  |I(7).219...q..30|
00001080: 30 31 30 00 B6 18 72 10  9E 43 4C 3A 99 22 20 20  |010...r..CL:."  |
00001090: 20 20 20 20 20 20 20 20  20 53 43 45 4E 41 52 49  |         SCENARI|
000010A0: 4F 20 43 4F 4D 50 4C 45  54 45 22 3A 8D 34 30 3A  |O COMPLETE":.40:|
000010B0: 97 31 39 38 2C 30 00 EB  18 73 10 9E 43 4C 3A 99  |.198,0...s..CL:.|
000010C0: 22 49 4E 53 45 52 54 20  22 3B 49 4E 24 3B 22 20  |"INSERT ";IN$;" |
000010D0: 50 52 4F 47 52 41 4D 20  22 3B 4F 46 24 3B 22 20  |PROGRAM ";OF$;" |
000010E0: 44 49 53 4B 22 3A 97 46  4C 2C 31 00 05 19 74 10  |DISK":.FL,1...t.|
000010F0: 99 3A 99 22 50 52 45 53  53 20 3C 46 20 31 3E 20  |.:."PRESS <F 1> |
00001100: 4B 45 59 22 3B 00 23 19  77 10 A1 41 24 3A 8B C6  |KEY";.#.w..A$:..|
00001110: 28 41 24 AA C7 28 30 29  29 B3 B1 31 33 33 A7 34  |(A$..(0))..133.4|
00001120: 32 31 35 00 37 19 79 10  9E 43 4C 3A 9C 3A 93 22  |215.7.y..CL:.:."|
00001130: 42 4F 4F 54 22 2C 38 00  3D 19 86 10 80 00 45 19  |BOOT",8.=.....E.|
00001140: 10 27 9E 43 4C 00 4E 19  17 27 5A 32 B2 30 00 62  |.'.CL.N..'Z2.0.b|
00001150: 19 1A 27 81 59 B2 31 A4  31 39 3A 81 58 B2 31 A4  |..'.Y.1.19:.X.1.|
00001160: 32 36 00 76 19 24 27 8B  4D 28 58 2C 59 29 B2 30  |26.v.$'.M(X,Y).0|
00001170: A7 31 30 31 30 30 00 8A  19 26 27 48 B2 A5 48 28  |.10100...&'H..H(|
00001180: 58 29 3A 56 B2 A5 56 28  59 29 00 95 19 29 27 8D  |X):V..V(Y)...)'.|
00001190: 32 39 39 35 30 00 AF 19  2E 27 54 B2 31 3A 5A B2  |29950....'T.1:Z.|
000011A0: BB 28 31 29 3A 8B 5A B1  2E 35 35 A7 54 B2 33 00  |.(1):.Z..55.T.3.|
000011B0: BE 19 38 27 8B 5A B1 2E  36 38 A7 54 B2 32 00 E8  |..8'.Z..68.T.2..|
000011C0: 19 42 27 8B 28 5A B1 2E  37 35 AF 28 28 58 B3 31  |.B'.(Z..75.((X.1|
000011D0: 30 B0 58 B1 32 30 29 AF  28 59 B3 36 B0 59 B1 31  |0.X.20).(Y.6.Y.1|
000011E0: 34 29 29 29 A7 54 B2 35  00 06 1A 4C 27 8B 28 5A  |4))).T.5...L'.(Z|
000011F0: B1 2E 39 34 AF 5A 32 B3  36 29 A7 54 B2 34 3A 5A  |..94.Z2.6).T.4:Z|
00001200: 32 B2 5A 32 AA 31 00 1C  1A 56 27 8B 28 5A B1 2E  |2.Z2.1...V'.(Z..|
00001210: 39 37 AF 54 B3 B1 34 29  A7 54 B2 35 00 29 1A 60  |97.T..4).T.5.).`|
00001220: 27 4D 28 58 2C 59 29 B2  54 00 3D 1A 65 27 48 B2  |'M(X,Y).T.=.e'H.|
00001230: A5 48 28 58 29 3A 56 B2  A5 56 28 59 29 00 47 1A  |.H(X):V..V(Y).G.|
00001240: 6A 27 8D 31 38 30 30 00  51 1A 74 27 82 58 3A 82  |j'.1800.Q.t'.X:.|
00001250: 59 00 77 1A 7E 27 9E 43  4C 3A 99 22 52 41 4E 44  |Y.w.~'.CL:."RAND|
00001260: 4F 4D 20 54 45 52 52 41  49 4E 20 4F 2E 4B 2E 20  |OM TERRAIN O.K. |
00001270: 28 59 2F 4E 29 22 3B 00  94 1A 80 27 A1 41 24 3A  |(Y/N)";....'.A$:|
00001280: 8B 41 24 B2 22 59 22 B0  41 24 B2 22 4E 22 A7 31  |.A$."Y".A$."N".1|
00001290: 30 31 31 34 00 9F 1A 81  27 89 31 30 31 31 32 00  |0114....'.10112.|
000012A0: B3 1A 82 27 8B 41 24 B2  22 4E 22 A7 31 30 30 30  |...'.A$."N".1000|
000012B0: 30 3A 8E 00 B9 1A 88 27  8E 00 C4 1A FE 74 8D 35  |0:.....'.....t.5|
000012C0: 30 30 30 30 00 F7 1A 08  75 99 C7 28 31 35 37 29  |0000....u..(157)|
000012D0: 3B C7 28 35 29 22 20 20  20 20 22 3B 43 44 24 3B  |;.(5)"    ";CD$;|
000012E0: C7 28 31 35 37 29 3B C7  28 31 35 37 29 3B 22 20  |.(157);.(157);" |
000012F0: 20 20 20 22 3B 3A 8E 00  40 1B 30 75 46 49 28 31  |   ";:..@.0uFI(1|
00001300: 29 B2 C3 28 4D 24 29 3A  46 49 28 32 29 B2 31 30  |)..(M$):FI(2).10|
00001310: 30 3A 46 49 28 33 29 B2  32 30 37 3A 46 49 28 34  |0:FI(3).207:FI(4|
00001320: 29 B2 30 3A 46 49 28 35  29 B2 32 30 30 3A 46 49  |).0:FI(5).200:FI|
00001330: 28 36 29 B2 37 32 3A 46  49 28 37 29 B2 32 30 33  |(6).72:FI(7).203|
00001340: 00 67 1B 3A 75 81 49 B2  31 A4 C3 28 4D 24 29 3A  |.g.:u.I.1..(M$):|
00001350: 97 35 33 30 39 31 AA 49  2C C6 28 CA 28 4D 24 2C  |.53091.I,.(.(M$,|
00001360: 49 2C 31 29 29 3A 82 00  89 1B 94 75 97 37 38 30  |I,1)):.....u.780|
00001370: 2C 31 35 3A 97 37 38 31  2C 38 3A 97 37 38 32 2C  |,15:.781,8:.782,|
00001380: 31 35 3A 9E 36 35 34 36  36 00 B5 1B F8 75 97 37  |15:.65466....u.7|
00001390: 38 30 2C 46 49 28 31 29  3A 97 37 38 31 2C 46 49  |80,FI(1):.781,FI|
000013A0: 28 32 29 3A 97 37 38 32  2C 46 49 28 33 29 3A 9E  |(2):.782,FI(3):.|
000013B0: 36 35 34 36 39 00 CF 1B  5C 76 97 31 39 33 2C 46  |65469...\v.193,F|
000013C0: 49 28 34 29 3A 97 31 39  34 2C 46 49 28 35 29 00  |I(4):.194,FI(5).|
000013D0: F9 1B 66 76 97 37 38 31  2C 46 49 28 36 29 3A 97  |..fv.781,FI(6):.|
000013E0: 37 38 32 2C 46 49 28 37  29 3A 97 37 38 30 2C 31  |782,FI(7):.780,1|
000013F0: 39 33 3A 9E 36 35 34 39  36 00 FF 1B 70 76 8E 00  |93:.65496...pv..|
00001400: 17 1C 50 C3 97 37 38 32  2C 48 3A 97 37 38 31 2C  |..P..782,H:.781,|
00001410: 56 3A 9E 43 55 3A 8E 00  1D 1C 60 EA 80 00 00 00  |V:.CU:....`.....|
..1....A.0.A.1:.53280,12:.53281,0:.53265
,27:."..".O....A.1.A.2:."BLANK.PIC",8,1.
O....A.2.A.3:."BLANK.COLOR",8,1......52,
150:.56,150:......CD$.G(17).G(157).G(157
):IN$.G(18):OF$.G(146).....CL.40704:CU.C
L.11:FL.165:EN.40194:NU.40198.....WI.253
:.WI.1,25:.WI,0:.CL:.WI,21.=....56578,B(
56578).3:.56576,B(56576).252:.648,200.I.
...53272,33:.53282,10:.53283,1:.53270,21
6.Q....70...(..D.1.1200:.D:....<..CL:.I.
1.40:.G(158);"@";:.:.G(5)...F..M(27,20).
Q.P...OD(X).(X.2...(X.2))...R...OO(X).((
X.1).4..((X.1).4))...T...X(X)..(X.100)..
.V...Y(X).X..X(X).100.1.Z...H(X).X..(X.2
).@._...V(Y).Y.1.W.D..781,21:.782,0:.CU.
R.N.."CREATE NEW MAP";:.40...}..CL:.G(17
);"             PLEASE WAIT";......I.1.2
6......J.1.19.Q.....OO(I)..OD(J).M(I,J).
1.......OO(I.2)...OD(J).M(I,J).1......J:
.I.2.I.20.195......781,24:.782,.(I.2).3.
2:.CU:..(I.2);.9.C..I:.CL.].D.."RANDOM T
ERRAIN (Y/N)";:.198,0.Z.F..A$:.A$."Y"..1
0000:.2000...G..A$."".198.G.H..CL:.IN$;"
  1  ";OF$;"              ";IN$;" TERRAI
N ";OF$......IN$;"6   2";OF$;"    <SPACE
 BAR> = CLEAR  R = ROUGH".:....IN$;"5   
3";OF$;"    F = FOREST           L = LAK
E".T....IN$;"  4  ";OF$;"    M = MOUNTAI
NS        X = DONE";.....X.13:Y.10:SX.X:
SY.Y. .,.H..H(X):V..V(Y)...1..29950...2.
.50000.O.3..G(5);"..";CD$;"..";.Z.5..198
,0...6..A$:.A$."".310...@..A$." "..29950
:M(X,Y).1:.400./.J..A$."R"..29950:M(X,Y)
.2:.400.P.T..A$."F"..29950:M(X,Y).3:.400
.Q.^..A$."L"..29950:M(X,Y).4:.400...H..A
$."M"..29950:M(X,Y).5:.400...R..A$."X".5
00...|..29950:.1800:.1200.B....300.Y....
29950:.1800:.2000.....SX.X:SY.Y.....Z.E(
A$):.Z.0.Z.6...#.D..Z.1250,1260,1270,128
0,1285,1290.5...SY.SY.2:.1300.O...SX.SX.
2:SY.SY.1:.1300.I...SX.SX.2:SY.SY.1:.130
0.{...SY.SY.2:.1300.....SX.SX.2:SY.SY.1:
.1300.....SX.SX.2:SY.SY.1.F....SX.1.SY.1
.SX.27.SY.19........M(SX,SY).0.M(SX,SY).
4.SX.X:SY.Y:........T1.1370.....T2.0...(
..SX.2.27.1335.(.*..SY.1.19.1327.D.-..M(
SX.2,SY.1).5.T2..1:..`./..M(SX.2,SY.1).5
.T2..1:..Q.2..SX.2.1.1370...7..SY.1.19.1
345...<..M(SX.2,SY.1).5.T2..1:....A..M(S
X.2,SY.1).5.T2..1:..K.Z.X.SX:Y.SY:......
H..H(X):V..V(Y).....T.E(I(D(M(X,Y)),1)).
..&..T.0.....5..50000.2.:..T.1900,1910,1
920,1930,1940,1950.M.L..G(5);"  ";CD$;".
A";:..O.V..G(158);"BC";CD$;"DE";G(5);:..
.....G(30);"FG";CD$;"HI";G(5);:.......G(
159);"JK";CD$;"LM";G(5);:..Y....G(5);"NO
";CD$;G(158);"PQ";G(5);:.......G(157);G(
129);"RSTU";CD$;G(157);G(157);G(153);"VW
XY";.&....G(5);:T1.0:..G.P..CL:."ASSIGN 
TOWNSHIPS";:.40.U...W.1:.CL:."NUMBER OF 
TOWNES (4-9)";:.198,0......A$:.A$."".202
5.....Z.E(A$):.Z.4.Z.9.2025.....TN%.Z:.I
.1.TN%.K....CL:."TOWNE #";I......"NAME >
";:.EN,7:T$(I).A$."":.C(T$(I)).1.2040.).
...CL:."POPULATION >";:.NU,4:TP%(I).E(A$
).H....TP%(I).49.TP%(I).201.2060.Z....:.
:."50 - MINIMUM  200 - MAXIMUM";:.40:.20
50.....X.13:Y.10:SX.X:SY.Y... ..CL:.IN$;
"  1  ";OF$...*..IN$;"6   2";OF$;:." HIT
 <SPACE BAR> TO POSITION TOWNE"...4..IN$
;"5   3";OF$...>..IN$;"  4  ";OF$;./.H..
1310:.M(X,Y).5..T2.2150.C.R.X.X.4:.X.26.
X.1.L.W.SX.X.E.\..X.9.Y.Y.2:.Y.1.Y.18.T.
A.SY.Y:.2120...F.H..H(X):V..V(Y):.29950:
.50000:.1950:.198,0...P..A$:.A$."".2160.
..Z..A$." ".HD.M(X,Y):M(X,Y).I.10.6:.250
0......29950:T1..1:.1800:.DRTE......1200
......2150.%.D.TC%(I).X.100.Y.O....CL:."
DEFENSE FACTOR (1-4) >";:.198,0.C....A$:
.A$."".2531.....TV%(I).E(A$):.TV%(I).1.T
V%(I).4.2531......CL:."TOWNE #";I;" > ";
T$(I):."POP. > ";TP%(I)......"DEF. > ";T
V%(I):."IS THIS OK (Y/N)";:.198,0......A
$:.A$."".2540......A$."Y".2550.(....A$..
"N".2540.I....29950:M(X,Y).HD:.1800:.203
8.P....I.~.(..CL:."SCENARIO FILENAME ";:
.EN,9:B$.A$.""...*..CL:."INSERT SCENARIO
 DISK"...-..:."PRESS <F 1> KEY":.198,0..
.2..A$:.F(A$.G(0))..133.2610...6..CL:.IN
$;" DO NOT INTERRUPT ";OF$;...7.M$.B$.".
PIC":.30000.<. ..CL:."ONE MOMENT PLEASE.
...".M...AD.52223:Z.0.A....I.0.27:.J.0.2
0.K...Z.Z.1.|.H..AD.Z,M(I,J)...M..:..Q.R
.A$."CLEAR:CLERIC:ROUGH:MAGICIAN:FOREST:
GOOD WIZARD:LAKE:MIGHTY SORCEROR"......J
.1.C(A$).....Z.Z.1......AD.Z,F(J(A$,J,1)
)...........Z.Z.1:.AD.Z,TN%.(....I.1.TN%
.3....J.1.7.=...Z.Z.1.\....J.C(T$(I))..A
D.Z,13:.4130.V....AD.Z,F(J(T$(I),J,1)).|
.".....,.Z.Z.1...6..AD.Z,TP%(I)...;.Z.Z.
1...@..AD.Z,TV%(I)...E.Z.Z.1.Q.J..AD.Z,.
X(TC%(I))...O.Z.Z.1...T..AD.Z,.Y(TC%(I))
...^...1.H.M$.B$.".TOWNE":FI(1).C(M$):FI
(5).204:FI(6).0:FI(7).207.<.M..30010.X.O
.M$.B$.".COLOR":FI(1).C(M$):FI(5).216:FI
(6).72:FI(7).219...Q..30010...R..CL:."  
         SCENARIO COMPLETE":.40:.198,0..
.S..CL:."INSERT ";IN$;" PROGRAM ";OF$;" 
DISK":.FL,1...T..:."PRESS <F 1> KEY";.#.
W..A$:.F(A$.G(0))..133.4215.7.Y..CL:.:."
BOOT",8.=.....E..'.CL.N..'Z2.0.B..'.Y.1.
19:.X.1.26.V.$'.M(X,Y).0.10100...&'H..H(
X):V..V(Y)...)'.29950....'T.1:Z..(1):.Z.
.55.T.3...8'.Z..68.T.2...B'.(Z..75.((X.1
0.X.20).(Y.6.Y.14))).T.5...L'.(Z..94.Z2.
6).T.4:Z2.Z2.1...V'.(Z..97.T..4).T.5.).`
'M(X,Y).T.=.E'H..H(X):V..V(Y).G.J'.1800.
Q.T'.X:.Y.W.~'.CL:."RANDOM TERRAIN O.K. 
(Y/N)";....'.A$:.A$."Y".A$."N".10114....
'.10112....'.A$."N".10000:.....'..D..T.5
0000....U.G(157);G(5)"    ";CD$;G(157);G
(157);"    ";:..@.0UFI(1).C(M$):FI(2).10
0:FI(3).207:FI(4).0:FI(5).200:FI(6).72:F
I(7).203.G.:U.I.1.C(M$):.53091.I,F(J(M$,
I,1)):.....U.780,15:.781,8:.782,15:.6546
6....U.780,FI(1):.781,FI(2):.782,FI(3):.
65469.O.\V.193,FI(4):.194,FI(5)...FV.781
,FI(6):.782,FI(7):.780,193:.65496...PV..
..PC.782,H:.781,V:.CU:....`.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL