GAMBLE

00000000: 01 08 1D 08 00 00 97 34  35 2C C2 28 31 37 34 29  |.......45,.(174)|
00000010: 3A 97 34 36 2C C2 28 31  37 35 29 3A 9C 00 4A 08  |:.46,.(175):..J.|
00000020: 28 00 8D 39 30 30 3A 8D  31 30 30 30 3A 8D 31 35  |(..900:.1000:.15|
00000030: 30 30 3A 8D 31 37 35 30  3A 8D 31 37 35 35 3A 8D  |00:.1750:.1755:.|
00000040: 32 30 30 30 3A 8D 33 30  30 30 00 54 08 32 00 8D  |2000:.3000.T.2..|
00000050: 34 30 30 30 00 5E 08 33  00 8D 35 30 30 30 00 73  |4000.^.3..5000.s|
00000060: 08 50 00 93 22 43 48 41  4E 47 45 20 44 49 53 4B  |.P.."CHANGE DISK|
00000070: 22 2C 38 00 C1 08 84 03  8F 20 2A 2A 2A 2A 54 48  |",8...... ****TH|
00000080: 49 53 20 53 55 42 52 4F  55 54 49 4E 45 20 43 4C  |IS SUBROUTINE CL|
00000090: 45 41 52 53 20 4F 55 54  20 4D 45 4D 4F 52 59 20  |EARS OUT MEMORY |
000000A0: 55 53 45 44 20 54 4F 20  53 54 4F 52 45 20 50 4C  |USED TO STORE PL|
000000B0: 41 59 45 52 53 20 44 4F  4C 4C 41 52 53 2A 2A 2A  |AYERS DOLLARS***|
000000C0: 2A 00 DE 08 8E 03 81 58  B2 32 32 37 37 32 A4 32  |*......X.22772.2|
000000D0: 32 39 39 35 3A 97 58 2C  30 3A 82 58 3A 8E 00 2B  |2995:.X,0:.X:..+|
000000E0: 09 E8 03 8F 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |....************|
000000F0: 2A 2A 54 48 49 53 20 53  55 42 52 4F 55 54 49 4E  |**THIS SUBROUTIN|
00000100: 45 20 4C 4F 41 44 53 20  50 4C 41 59 45 52 53 20  |E LOADS PLAYERS |
00000110: 24 20 41 4D 4F 55 4E 54  53 20 2A 2A 2A 2A 2A 2A  |$ AMOUNTS ******|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 00 61 09 E9 03  |***********.a...|
00000130: 4E 4D B2 C2 28 31 36 33  38 34 29 3A 5A B2 32 32  |NM..(16384):Z.22|
00000140: 37 37 32 3A 43 41 B2 B5  28 31 30 30 30 30 30 30  |772:CA..(1000000|
00000150: 30 AC BB 28 31 29 29 3A  43 41 24 B2 C4 28 43 41  |0..(1)):CA$..(CA|
00000160: 29 00 79 09 EA 03 43 41  24 B2 C9 28 43 41 24 2C  |).y...CA$..(CA$,|
00000170: C3 28 43 41 24 29 AB 31  29 00 9B 09 FC 03 81 58  |.(CA$).1)......X|
00000180: B2 31 A4 4E 4D 3A 50 5A  B2 5A AA 28 28 58 AB 31  |.1.NM:PZ.Z.((X.1|
00000190: 29 AC 32 32 29 3A 97 50  5A 2C 30 00 D5 09 2E 04  |).22):.PZ,0.....|
000001A0: 97 50 5A AA 31 2C 30 3A  50 5A B2 50 5A AA 31 3A  |.PZ.1,0:PZ.PZ.1:|
000001B0: 81 59 B2 31 A4 C3 28 43  41 24 29 3A 54 50 24 B2  |.Y.1..(CA$):TP$.|
000001C0: C8 28 43 41 24 2C 59 29  3A 54 50 24 B2 C9 28 54  |.(CA$,Y):TP$..(T|
000001D0: 50 24 2C 31 29 00 F7 09  60 04 97 28 50 5A AA 59  |P$,1)...`..(PZ.Y|
000001E0: 29 2C C5 28 54 50 24 29  3A 82 59 3A 97 50 5A AA  |),.(TP$):.Y:.PZ.|
000001F0: 59 2C 31 31 3A 82 58 00  38 0A B1 04 5A B2 32 32  |Y,11:.X.8...Z.22|
00000200: 37 38 33 3A 81 58 B2 31  A4 4E 4D 3A 50 5A B2 28  |783:.X.1.NM:PZ.(|
00000210: 58 AB 31 29 AC 32 32 AA  5A 3A 97 50 5A 2C 30 3A  |X.1).22.Z:.PZ,0:|
00000220: 97 50 5A AA 31 2C 30 3A  97 50 5A AA 32 2C 30 3A  |.PZ.1,0:.PZ.2,0:|
00000230: 97 50 5A AA 33 2C 31 31  00 6F 0A B3 04 82 58 3A  |.PZ.3,11.o....X:|
00000240: 5A B2 32 33 31 38 31 3A  81 58 B2 31 A4 4E 4D 3A  |Z.23181:.X.1.NM:|
00000250: 50 5A B2 28 58 AB 31 29  AC 31 30 AA 5A 3A 97 50  |PZ.(X.1).10.Z:.P|
00000260: 5A 2C 30 3A 97 50 5A AA  31 2C 31 31 3A 82 58 00  |Z,0:.PZ.1,11:.X.|
00000270: A5 0A B4 04 5A B2 32 33  32 36 32 3A 81 58 B2 31  |....Z.23262:.X.1|
00000280: A4 4E 4D 3A 50 5A B2 28  58 AB 31 29 AC 31 30 AA  |.NM:PZ.(X.1).10.|
00000290: 5A 3A 97 50 5A 2C 30 3A  97 50 5A AA 31 2C 31 31  |Z:.PZ,0:.PZ.1,11|
000002A0: 3A 82 58 3A 8E 00 C5 0A  DC 05 81 58 B2 32 33 30  |:.X:.......X.230|
000002B0: 35 31 A4 32 33 31 31 35  3A 87 52 3A 97 58 2C 52  |51.23115:.R:.X,R|
000002C0: 3A 82 58 3A 8E 00 F1 0A  DD 05 83 39 31 2C 38 34  |:.X:.......91,84|
000002D0: 2C 37 37 2C 36 35 2C 36  30 2C 35 35 2C 35 31 2C  |,77,65,60,55,51,|
000002E0: 34 37 2C 34 33 2C 33 39  2C 33 35 2C 33 31 2C 32  |47,43,39,35,31,2|
000002F0: 30 00 1D 0B DE 05 83 37  38 2C 37 39 2C 38 31 2C  |0......78,79,81,|
00000300: 38 34 2C 38 36 2C 38 37  2C 38 39 2C 39 32 2C 39  |84,86,87,89,92,9|
00000310: 33 2C 39 35 2C 39 37 2C  39 38 2C 37 35 00 51 0B  |3,95,97,98,75.Q.|
00000320: DF 05 83 33 38 2C 34 38  2C 35 38 2C 37 30 2C 38  |...38,48,58,70,8|
00000330: 35 2C 31 30 30 2C 31 31  35 2C 31 33 30 2C 31 34  |5,100,115,130,14|
00000340: 35 2C 31 36 30 2C 31 38  30 2C 32 30 30 2C 32 35  |5,160,180,200,25|
00000350: 35 00 77 0B E0 05 83 31  2C 32 2C 33 2C 35 2C 37  |5.w....1,2,3,5,7|
00000360: 2C 39 2C 31 31 2C 31 34  2C 31 37 2C 32 31 2C 32  |,9,11,14,17,21,2|
00000370: 36 2C 33 32 2C 34 30 00  A2 0B E1 05 83 33 2C 34  |6,32,40......3,4|
00000380: 2C 35 2C 37 2C 31 30 2C  31 34 2C 31 39 2C 32 34  |,5,7,10,14,19,24|
00000390: 2C 32 39 2C 34 37 2C 31  31 35 2C 31 33 33 2C 31  |,29,47,115,133,1|
000003A0: 35 30 00 DC 0B D6 06 81  58 B2 32 33 33 35 31 A4  |50......X.23351.|
000003B0: 32 33 33 36 33 3A 43 B2  B5 28 32 35 35 AC BB 28  |23363:C..(255..(|
000003C0: 31 29 29 3A 97 58 2C 43  3A 82 58 3A 97 32 33 33  |1)):.X,C:.X:.233|
000003D0: 36 34 2C B5 28 BB 28 31  29 AC 35 29 00 E2 0B D7  |64,.(.(1).5)....|
000003E0: 06 8E 00 F2 0B DB 06 97  32 33 31 35 36 2C 39 35  |........23156,95|
000003F0: 3A 8E 00 3F 0C D0 07 8F  2A 2A 2A 2A 54 48 49 53  |:..?....****THIS|
00000400: 20 53 55 42 52 4F 55 54  49 4E 45 20 4C 4F 41 44  | SUBROUTINE LOAD|
00000410: 20 49 4E 54 4F 20 4D 45  4D 4F 52 59 20 54 48 45  | INTO MEMORY THE|
00000420: 20 4E 41 4D 45 53 20 4F  46 20 43 4F 4D 50 55 54  | NAMES OF COMPUT|
00000430: 45 52 20 43 4F 4D 50 41  4E 49 45 53 2A 2A 2A 00  |ER COMPANIES***.|
00000440: 6F 0C F8 07 43 4E B2 32  32 39 34 38 3A 81 58 B2  |o...CN.22948:.X.|
00000450: 32 32 39 34 38 A4 32 33  30 34 38 3A 97 58 2C 30  |22948.23048:.X,0|
00000460: 3A 82 58 3A 86 52 4E 28  35 29 3A 43 54 B2 30 00  |:.X:.RN(5):CT.0.|
00000470: 82 0C 2C 08 52 B2 B5 28  34 38 AC BB 28 31 29 AA  |..,.R..(48..(1).|
00000480: 31 29 00 9B 0C 2D 08 81  4A B2 31 A4 35 3A 8B 52  |1)...-..J.1.5:.R|
00000490: B2 52 4E 28 4A 29 A7 32  30 39 32 00 BE 0C 2F 08  |.RN(J).2092.../.|
000004A0: 82 4A 3A 43 54 B2 43 54  AA 31 3A 52 4E 28 43 54  |.J:CT.CT.1:RN(CT|
000004B0: 29 B2 52 3A 8B 43 54 B2  35 A7 32 31 30 30 00 C8  |).R:.CT.5.2100..|
000004C0: 0C 33 08 89 32 30 39 32  00 01 0D 34 08 81 58 B2  |.3..2092...4..X.|
000004D0: 31 A4 35 3A 43 58 B2 43  4E AA 28 28 58 AB 31 29  |1.5:CX.CN.((X.1)|
000004E0: AC 32 30 29 3A 81 59 B2  31 A4 52 4E 28 58 29 3A  |.20):.Y.1.RN(X):|
000004F0: 87 43 43 24 3A 82 59 3A  8C 3A 81 5A B2 31 A4 36  |.CC$:.Y:.:.Z.1.6|
00000500: 35 00 3B 0D 5D 08 87 52  52 3A 82 5A 3A 4C B2 C3  |5.;.]..RR:.Z:L..|
00000510: 28 43 43 24 29 3A 81 59  B2 31 A4 C3 28 43 43 24  |(CC$):.Y.1..(CC$|
00000520: 29 3A 43 53 24 B2 C8 28  43 43 24 2C 59 29 3A 43  |):CS$..(CC$,Y):C|
00000530: 53 24 B2 C9 28 43 53 24  2C 31 29 00 5A 0D 8E 08  |S$..(CS$,1).Z...|
00000540: 97 28 43 58 AA 28 59 AB  31 29 29 2C C6 28 43 53  |.(CX.(Y.1)),.(CS|
00000550: 24 29 3A 82 59 3A 82 58  3A 8E 00 A5 0D A2 08 83  |$):.Y:.X:.......|
00000560: 22 47 52 45 41 54 20 45  41 53 54 45 52 4E 20 4F  |"GREAT EASTERN O|
00000570: 49 4C 22 2C 22 53 55 44  20 4F 45 53 54 45 20 4F  |IL","SUD OESTE O|
00000580: 49 4C 22 2C 22 46 41 4C  4C 53 20 45 58 50 4C 4F  |IL","FALLS EXPLO|
00000590: 52 41 54 49 4F 4E 22 2C  22 46 49 4E 44 20 49 54  |RATION","FIND IT|
000005A0: 20 4F 49 4C 22 00 F1 0D  AC 08 83 22 44 41 4C 4C  | OIL"......"DALL|
000005B0: 41 53 20 4F 49 4C 20 43  41 52 54 45 4C 22 2C 22  |AS OIL CARTEL","|
000005C0: 57 45 53 54 45 52 4E 20  52 49 56 45 52 20 49 4E  |WESTERN RIVER IN|
000005D0: 43 22 2C 22 41 4C 57 41  59 53 20 44 45 45 50 20  |C","ALWAYS DEEP |
000005E0: 4F 49 4C 22 2C 22 44 49  47 47 45 52 20 4F 49 4C  |OIL","DIGGER OIL|
000005F0: 22 00 35 0E B6 08 83 22  44 45 4C 54 41 20 4F 49  |".5...."DELTA OI|
00000600: 4C 20 45 58 50 4F 52 54  22 2C 22 53 4D 49 54 48  |L EXPORT","SMITH|
00000610: 20 4F 49 4C 20 41 4E 44  20 45 58 50 4F 52 54 22  | OIL AND EXPORT"|
00000620: 2C 22 48 4F 55 53 54 4F  4E 20 4F 49 4C 20 43 41  |,"HOUSTON OIL CA|
00000630: 52 54 45 4C 22 00 7D 0E  C0 08 83 22 4D 4F 53 41  |RTEL".}...."MOSA|
00000640: 49 43 20 50 45 54 52 4F  4C 45 55 4D 22 2C 22 4D  |IC PETROLEUM","M|
00000650: 49 43 48 45 4C 53 4F 4E  20 50 4C 41 53 54 49 43  |ICHELSON PLASTIC|
00000660: 53 22 2C 22 4E 45 4C 53  4F 4E 20 52 55 42 42 45  |S","NELSON RUBBE|
00000670: 52 22 2C 22 42 45 4C 4C  20 4F 49 4C 22 00 C4 0E  |R","BELL OIL"...|
00000680: CA 08 83 22 57 45 4C 53  48 20 4F 49 4C 22 2C 22  |..."WELSH OIL","|
00000690: 4C 55 44 4C 4F 57 20 50  45 54 52 4F 4C 45 55 4D  |LUDLOW PETROLEUM|
000006A0: 22 2C 22 57 49 43 4B 46  4F 52 44 20 53 55 52 56  |","WICKFORD SURV|
000006B0: 45 59 22 2C 22 46 41 55  4C 54 20 4C 49 4E 45 20  |EY","FAULT LINE |
000006C0: 4F 49 4C 22 00 10 0F D4  08 83 22 52 55 42 49 4F  |OIL"......"RUBIO|
000006D0: 20 45 58 50 4C 4F 52 41  54 49 4F 4E 22 2C 22 53  | EXPLORATION","S|
000006E0: 41 42 49 4E 45 20 50 45  54 52 4F 4C 45 55 4D 22  |ABINE PETROLEUM"|
000006F0: 2C 22 54 4F 57 45 52 20  44 52 49 4C 4C 49 4E 47  |,"TOWER DRILLING|
00000700: 22 2C 22 52 49 47 20 43  49 54 59 20 4F 49 4C 22  |","RIG CITY OIL"|
00000710: 00 59 0F DE 08 83 22 44  52 49 4C 4C 49 4E 47 20  |.Y...."DRILLING |
00000720: 49 4E 43 2E 22 2C 22 4E  45 56 45 52 20 53 41 59  |INC.","NEVER SAY|
00000730: 20 4E 45 56 45 52 20 4F  49 4C 22 2C 22 50 49 50  | NEVER OIL","PIP|
00000740: 50 49 4E 20 4F 49 4C 22  2C 22 51 55 49 43 4B 20  |PIN OIL","QUICK |
00000750: 44 52 49 4C 4C 20 43 4F  22 00 99 0F E8 08 83 22  |DRILL CO"......"|
00000760: 4C 49 47 48 54 49 4E 47  20 53 54 52 49 4B 45 20  |LIGHTING STRIKE |
00000770: 4F 49 4C 22 2C 22 53 54  41 44 49 55 4D 20 50 45  |OIL","STADIUM PE|
00000780: 54 52 4F 4C 45 55 4D 22  2C 22 51 55 49 43 4B 2D  |TROLEUM","QUICK-|
00000790: 58 58 4F 4E 20 4F 49 4C  22 00 E4 0F F2 08 83 22  |XXON OIL"......"|
000007A0: 46 49 53 53 55 52 45 20  53 55 52 56 45 59 22 2C  |FISSURE SURVEY",|
000007B0: 22 31 30 30 25 20 41 4C  57 41 59 53 20 4F 49 4C  |"100% ALWAYS OIL|
000007C0: 22 2C 22 49 D3 4F 49 4C  20 43 4F 4D 50 41 4E 59  |","I.OIL COMPANY|
000007D0: 22 2C 22 47 55 4C 46 20  45 58 50 4C 4F 52 41 54  |","GULF EXPLORAT|
000007E0: 49 4F 4E 22 00 31 10 FC  08 83 22 53 48 41 4C 45  |ION".1...."SHALE|
000007F0: 20 4F 49 4C 20 43 4F 2E  22 2C 22 43 52 55 44 45  | OIL CO.","CRUDE|
00000800: 20 41 4E 44 20 52 55 44  45 20 4F 49 4C 22 2C 22  | AND RUDE OIL","|
00000810: 4B 41 53 48 4D 49 52 20  44 52 49 4C 4C 49 4E 47  |KASHMIR DRILLING|
00000820: 22 2C 22 44 52 49 4C 4C  20 42 49 54 20 43 4F 2E  |","DRILL BIT CO.|
00000830: 22 00 7A 10 06 09 83 22  42 4C 55 54 4F 20 41 4E  |".z...."BLUTO AN|
00000840: 44 20 4F 4C 49 56 45 20  4F 49 4C 22 2C 22 53 45  |D OLIVE OIL","SE|
00000850: 45 50 49 4E 47 20 4F 49  4C 20 43 4F 2E 22 2C 22  |EPING OIL CO.","|
00000860: 4A 41 59 20 50 52 4F 44  55 43 54 53 22 2C 22 56  |JAY PRODUCTS","V|
00000870: 41 53 53 41 4C 20 4F 49  4C 22 00 C3 10 10 09 83  |ASSAL OIL"......|
00000880: 22 53 50 49 4C 4C 20 4F  49 4C 22 2C 22 4F 49 4C  |"SPILL OIL","OIL|
00000890: 20 50 52 4F 56 49 4E 43  45 20 43 4F 22 2C 22 4C  | PROVINCE CO","L|
000008A0: 4F 54 53 2D 41 2D 48 45  43 54 41 52 45 53 20 4F  |OTS-A-HECTARES O|
000008B0: 49 4C 22 2C 22 53 41 4C  54 20 50 4C 55 47 20 4F  |IL","SALT PLUG O|
000008C0: 49 4C 22 00 06 11 1A 09  83 22 4F 49 4C 20 52 49  |IL"......"OIL RI|
000008D0: 56 45 52 20 43 4F 2E 20  41 46 52 49 43 41 22 2C  |VER CO. AFRICA",|
000008E0: 22 4F 49 4C 20 43 49 54  59 20 43 4F 2E 20 55 53  |"OIL CITY CO. US|
000008F0: 41 22 2C 22 41 4C 41 53  4B 41 4E 20 43 52 55 44  |A","ALASKAN CRUD|
00000900: 45 20 43 4F 2E 22 00 3D  11 B8 0B 97 32 33 33 39  |E CO.".=....2339|
00000910: 30 2C 36 3A 97 32 33 33  39 31 2C C6 28 22 52 22  |0,6:.23391,.("R"|
00000920: 29 3A 97 32 33 33 39 32  2C C6 28 22 45 22 29 3A  |):.23392,.("E"):|
00000930: 97 32 33 33 39 33 2C C6  28 22 41 22 29 00 74 11  |.23393,.("A").t.|
00000940: B9 0B 97 32 33 33 39 34  2C C6 28 22 47 22 29 3A  |...23394,.("G"):|
00000950: 97 32 33 33 39 35 2C C6  28 22 41 22 29 3A 97 32  |.23395,.("A"):.2|
00000960: 33 33 39 36 2C C6 28 22  4E 22 29 3A 97 32 33 33  |3396,.("N"):.233|
00000970: 36 35 2C 35 00 7A 11 BA  0B 8E 00 A0 11 A0 0F 81  |65,5.z..........|
00000980: 58 B2 32 33 30 35 31 A4  32 33 30 36 33 3A 97 58  |X.23051.23063:.X|
00000990: 2C B5 28 BB 28 31 29 AC  39 38 29 AA 31 3A 82 58  |,.(.(1).98).1:.X|
000009A0: 00 C7 11 AA 0F 81 58 B2  32 33 30 36 34 A4 32 33  |......X.23064.23|
000009B0: 30 37 36 3A 97 58 2C B5  28 BB 28 31 29 AC 32 35  |076:.X,.(.(1).25|
000009C0: 33 29 AA 32 3A 82 58 00  EE 11 B4 0F 81 58 B2 32  |3).2:.X......X.2|
000009D0: 33 30 37 37 A4 32 33 30  38 39 3A 97 58 2C B5 28  |3077.23089:.X,.(|
000009E0: BB 28 31 29 AC 32 35 33  29 AA 32 3A 82 58 00 15  |.(1).253).2:.X..|
000009F0: 12 BE 0F 81 58 B2 32 33  30 39 30 A4 32 33 31 30  |....X.23090.2310|
00000A00: 32 3A 97 58 2C B5 28 BB  28 31 29 AC 32 35 33 29  |2:.X,.(.(1).253)|
00000A10: AA 32 3A 82 58 00 3C 12  C8 0F 81 58 B2 32 33 31  |.2:.X.<....X.231|
00000A20: 30 33 A4 32 33 31 31 35  3A 97 58 2C B5 28 BB 28  |03.23115:.X,.(.(|
00000A30: 31 29 AC 32 35 33 29 AA  32 3A 82 58 00 54 12 D2  |1).253).2:.X.T..|
00000A40: 0F 97 32 33 31 35 36 2C  B5 28 BB 28 31 29 AC 34  |..23156,.(.(1).4|
00000A50: 35 29 AA 35 00 6C 12 DC  0F 97 32 33 33 36 35 2C  |5).5.l....23365,|
00000A60: B5 28 BB 28 31 29 AC 37  30 29 AA 35 00 84 12 E6  |.(.(1).70).5....|
00000A70: 0F 97 32 33 33 36 36 2C  B5 28 BB 28 31 29 AC 37  |..23366,.(.(1).7|
00000A80: 30 29 AA 35 00 AD 12 F0  0F 81 58 B2 31 38 36 36  |0).5......X.1866|
00000A90: 30 A4 32 30 36 35 39 3A  97 58 2C B5 28 32 30 30  |0.20659:.X,.(200|
00000AA0: AC BB 28 31 29 29 AA 35  3A 82 58 3A 8E 00 DD 12  |..(1)).5:.X:....|
00000AB0: 88 13 81 58 B2 32 33 37  30 30 A4 32 33 37 30 37  |...X.23700.23707|
00000AC0: 3A 97 58 2C B5 28 BB 28  30 29 AC 33 29 AA 33 30  |:.X,.(.(0).3).30|
00000AD0: AB B5 28 BB 28 30 29 AC  33 29 3A 82 58 00 11 13  |..(.(0).3):.X...|
00000AE0: 89 13 97 32 33 37 30 38  2C 31 30 3A 97 32 33 34  |...23708,10:.234|
00000AF0: 32 30 2C 31 30 3A 97 32  33 34 31 39 2C 34 35 3A  |20,10:.23419,45:|
00000B00: 97 32 33 35 30 31 2C 31  3A 97 32 33 35 30 32 2C  |.23501,1:.23502,|
00000B10: 30 00 29 13 8A 13 97 32  33 37 30 39 2C 31 3A 97  |0.)....23709,1:.|
00000B20: 32 33 37 31 30 2C 31 3A  8E 00 00 00 4F 2E 22 00  |23710,1:....O.".|
00000B30: 00 00 4F 2E 22 00 00 00  4F 2E 22 00 00 00 4F 2E  |..O."...O."...O.|
00000B40: 22 00 00 00 4F 2E 22 00  00 00 2C 22 4F 49 4C 20  |"...O."...,"OIL |
00000B50: 43 49 54 59 20 43 4F 2E  20 55 53 41 22 2C 22 41  |CITY CO. USA","A|
00000B60: 4C 41 53 4B 41 4E 20 43  52 55 44 45 20 43 4F 2E  |LASKAN CRUDE CO.|
00000B70: 22 00 00 00 45 20 43 4F  2E 22 00 00 00 4C 20 43  |"...E CO."...L C|
00000B80: 49 54 59 20 43 4F 2E 20  55 53 41 22 2C 22 41 4C  |ITY CO. USA","AL|
00000B90: 41 53 4B 41 4E 20 43 52  55 44 45 20 43 4F 2E 22  |ASKAN CRUDE CO."|
00000BA0: 00 00 00 4F 2E 22 00 00  00 4F 2E 22 00 00 00 4F  |...O."...O."...O|
00000BB0: 2E 22 00 00 00 4F 2E 22  00 00 00 4F 2E 22 00 00  |."...O."...O."..|
00000BC0: 00 4F 2E 22 00 00 00 4F  2E 22 00 00 00 44 45 20  |.O."...O."...DE |
00000BD0: 43 4F 2E 22 00 00 00 44  45 20 43 4F 2E 22 00 00  |CO."...DE CO."..|
00000BE0: 00 44 45 20 43 4F 2E 22  00 00 00 44 45 20 43 4F  |.DE CO."...DE CO|
00000BF0: 2E 22 00 00 00 44 45 20  43 4F 2E 22 00 00 00 41  |."...DE CO."...A|
00000C00: 22 2C 22 41 4C 41 53 4B  41 4E 20 43 52 55 44 45  |","ALASKAN CRUDE|
00000C10: 20 43 4F 2E 22 00 00 00  52 49 56 45 52 20 43 4F  | CO."...RIVER CO|
00000C20: 2E 20 41 46 52 49 43 41  22 2C 22 4F 49 4C 20 43  |. AFRICA","OIL C|
00000C30: 49 54 59 20 43 4F 2E 20  55 53 41 22 2C 22 41 4C  |ITY CO. USA","AL|
00000C40: 41 53 4B 41 4E 20 43 52  55 44 45 20 43 4F 2E 22  |ASKAN CRUDE CO."|
00000C50: 00 00 00 20 52 49 56 45  52 20 43 4F 2E 20 41 46  |... RIVER CO. AF|
00000C60: 52 49 43 41 22 2C 22 4F  49 4C 20 43 49 54 59 20  |RICA","OIL CITY |
00000C70: 43 4F 2E 20 55 53 41 22  2C 22 41 4C 41 53 4B 41  |CO. USA","ALASKA|
00000C80: 4E 20 43 52 55 44 45 20  43 4F 2E 22 00 00 00 4F  |N CRUDE CO."...O|
00000C90: 2E 22 00 00 00 4F 2E 22  00 00 00 47 20 4F 49 4C  |."...O."...G OIL|
00000CA0: 22 00 69 12 1A 09 83 22  4F 49 4C 20 52 49 56 45  |".i...."OIL RIVE|
00000CB0: 52 20 43 4F 2E 20 41 46  52 49 43 41 22 2C 22 4F  |R CO. AFRICA","O|
00000CC0: 49 4C 20 43 49 54 59 20  43 4F 2E 20 55 53 41 22  |IL CITY CO. USA"|
00000CD0: 2C 22 41 4C 41 53 4B 41  4E 20 43 52 55 44 45 20  |,"ALASKAN CRUDE |
00000CE0: 43 4F 2E 22 00 00 00 4F  2E 22 00 00 00 00 4E 4D  |CO."...O."....NM|
00000CF0: 83 00 00 00 00 5A 00 87  04 00 00 00 43 C1 07 EF  |.....Z......C...|
00000D00: 0A 00 00 50 5A 8F 35 BC  00 00 59 00 85 08 00 00  |...PZ.5...Y.....|
00000D10: 00 54 D0 01 74 9F 00 00  52 00 84 10 00 00 00 43  |.T..t...R......C|
00000D20: 00 89 07 00 00 00 43 4E  8F 33 48 00 00 43 54 83  |......CN.3H..CT.|
00000D30: 20 00 00 00 4A 00 83 40  00 00 00 43 58 8F 33 E8  | ...J..@...CX.3.|
00000D40: 00 00 43 C3 10 5A 0F 00  00 52 52 88 16 00 00 00  |..C..Z...RR.....|
00000D50: 4C 00 85 00 00 00 00 43  D3 01 64 9C 00 00 52 4E  |L......C..d...RN|
00000D60: 25 00 01 00 06 00 00 00  00 00 84 40 00 00 00 86  |%..........@....|
00000D70: 08 00 00 00 85 58 00 00  00 86 1C 00 00 00 84 10  |.....X..........|
00000D80: 00 00 00 00 4A 00 83 40  00 00 00 43 58 8F 33 E8  |....J..@...CX.3.|
00000D90: 00 00 43 C3 11 37 0F 00  00 52 52 88 16 00 00 00  |..C..7...RR.....|
00000DA0: 4C 00 85 08 00 00 00 43  D3 01 6F 9C 00 00 52 4E  |L......C..o...RN|
00000DB0: 25 00 01 00 06 00 00 00  00 00 86 20 00 00 00 84  |%.......... ....|
00000DC0: 20 00 00 00 85 58 00 00  00 85 18 00 00 00 82 40  | ....X.........@|
00000DD0: 00 00 00 22 4F 49 4C 20  43 49 54 59 20 43 4F 2E  |..."OIL CITY CO.|
00000DE0: 20 55 53 41 22 2C 22 41  4C 41 53 4B 41 4E 20 43  | USA","ALASKAN C|
00000DF0: 52 55 44 45 20 43 4F 2E  22 00 00 00 4C 20 52 49  |RUDE CO."...L RI|
00000E00: 56 45 52 20 43 4F 2E 20  41 46 52 49 43 41 22 2C  |VER CO. AFRICA",|
00000E10: 22 4F 49 4C 20 43 49 54  59 20 43 4F 2E 20 55 53  |"OIL CITY CO. US|
00000E20: 41 22 2C 22 41 4C 41 53  4B 41 4E 20 43 52 55 44  |A","ALASKAN CRUD|
00000E30: 45 20 43 4F 2E 22 00 00  00 49 54 59 20 43 4F 2E  |E CO."...ITY CO.|
00000E40: 20 55 53 41 22 2C 22 41  4C 41 53 4B 41 4E 20 43  | USA","ALASKAN C|
00000E50: 52 55 44 45 20 43 4F 2E  22 00 00 00 20 43 4F 2E  |RUDE CO."... CO.|
00000E60: 20 41 46 52 49 43 41 22  2C 22 4F 49 4C 20 43 49  | AFRICA","OIL CI|
00000E70: 54 59 20 43 4F 2E 20 55  53 41 22 2C 22 41 4C 41  |TY CO. USA","ALA|
00000E80: 53 4B 41 4E 20 43 52 55  44 45 20 43 4F 2E 22 00  |SKAN CRUDE CO.".|
00000E90: 00 00 2C 22 4F 49 4C 20  43 49 54 59 20 43 4F 2E  |..,"OIL CITY CO.|
00000EA0: 20 55 53 41 22 2C 22 41  4C 41 53 4B 41 4E 20 43  | USA","ALASKAN C|
00000EB0: 52 55 44 45 20 43 4F 2E  22 00 00 00 49 54 59 20  |RUDE CO."...ITY |
00000EC0: 43 4F 2E 20 55 53 41 22  2C 22 41 4C 41 53 4B 41  |CO. USA","ALASKA|
00000ED0: 4E 20 43 52 55 44 45 20  43 4F 2E 22 00 00 00 43  |N CRUDE CO."...C|
00000EE0: 49 54 59 20 43 4F 2E 20  55 53 41 22 2C 22 41 4C  |ITY CO. USA","AL|
00000EF0: 41 53 4B 41 4E 20 43 52  55 44 45 20 43 4F 2E 22  |ASKAN CRUDE CO."|
00000F00: 00 00 00 49 4C 20 52 49  56 45 52 20 43 4F 2E 20  |...IL RIVER CO. |
00000F10: 41 46 52 49 43 41 22 2C  22 4F 49 4C 20 43 49 54  |AFRICA","OIL CIT|
00000F20: 59 20 43 4F 2E 20 55 53  41 22 2C 22 41 4C 41 53  |Y CO. USA","ALAS|
00000F30: 4B 41 4E 20 43 52 55 44  45 20 43 4F 2E 22 00 00  |KAN CRUDE CO."..|
00000F40: 00 22 41 4C 41 53 4B 41  4E 20 43 52 55 44 45 20  |."ALASKAN CRUDE |
00000F50: 43 4F 2E 22 00 00 00 43  4F 2E 20 41 46 52 49 43  |CO."...CO. AFRIC|
00000F60: 41 22 2C 22 4F 49 4C 20  43 49 54 59 20 43 4F 2E  |A","OIL CITY CO.|
00000F70: 20 55 53 41 22 2C 22 41  4C 41 53 4B 41 4E 20 43  | USA","ALASKAN C|
00000F80: 52 55 44 45 20 43 4F 2E  22 00 00 00 20 52 49 56  |RUDE CO."... RIV|
00000F90: 45 52 20 43 4F 2E 20 41  46 52 49 43 41 22 2C 22  |ER CO. AFRICA","|
00000FA0: 4F 49 4C 20 43 49 54 59  20 43 4F 2E 20 55 53 41  |OIL CITY CO. USA|
00000FB0: 22 2C 22 41 4C 41 53 4B  41 4E 20 43 52 55 44 45  |","ALASKAN CRUDE|
00000FC0: 20 43 4F 2E 22 00 00 00  4F 2E 22 00 00 00 4F 2E  | CO."...O."...O.|
00000FD0: 22 00 00 00 4F 2E 22 00  00 00 41 22 2C 22 4F 49  |"...O."...A","OI|
00000FE0: 4C 20 43 49 54 59 20 43  4F 2E 20 55 53 41 22 2C  |L CITY CO. USA",|
00000FF0: 22 41 4C 41 53 4B 41 4E  20 43 52 55 44 45 20 43  |"ALASKAN CRUDE C|
00001000: 4F 2E 22 00 00 00 22 4F  49 4C 20 52 49 56 45 52  |O."..."OIL RIVER|
00001010: 20 43 4F 2E 20 41 46 52  49 43 41 22 2C 22 4F 49  | CO. AFRICA","OI|
00001020: 4C 20 43 49 54 59 20 43  4F 2E 20 55 53 41 22 2C  |L CITY CO. USA",|
00001030: 22 41 4C 41 53 4B 41 4E  20 43 52 55 44 45 20 43  |"ALASKAN CRUDE C|
00001040: 4F 2E 22 00 00 00 4F 2E  22 00 00 00              |O."...O."...    |

.......45,B(174):.46,B(175):..J.(..900:.
1000:.1500:.1750:.1755:.2000:.3000.T.2..
4000.^.3..5000.S.P.."CHANGE DISK",8.A...
. ****THIS SUBROUTINE CLEARS OUT MEMORY 
USED TO STORE PLAYERS DOLLARS****......X
.22772.22995:.X,0:.X:..+....************
**THIS SUBROUTINE LOADS PLAYERS $ AMOUNT
S *****************.A...NM.B(16384):Z.22
772:CA..(10000000..(1)):CA$.D(CA).Y...CA
$.I(CA$,C(CA$).1)......X.1.NM:PZ.Z.((X.1
).22):.PZ,0.U....PZ.1,0:PZ.PZ.1:.Y.1.C(C
A$):TP$.H(CA$,Y):TP$.I(TP$,1)...`..(PZ.Y
),E(TP$):.Y:.PZ.Y,11:.X.8...Z.22783:.X.1
.NM:PZ.(X.1).22.Z:.PZ,0:.PZ.1,0:.PZ.2,0:
.PZ.3,11.O....X:Z.23181:.X.1.NM:PZ.(X.1)
.10.Z:.PZ,0:.PZ.1,11:.X.....Z.23262:.X.1
.NM:PZ.(X.1).10.Z:.PZ,0:.PZ.1,11:.X:..E.
...X.23051.23115:.R:.X,R:.X:.......91,84
,77,65,60,55,51,47,43,39,35,31,20......7
8,79,81,84,86,87,89,92,93,95,97,98,75.Q.
...38,48,58,70,85,100,115,130,145,160,18
0,200,255.W....1,2,3,5,7,9,11,14,17,21,2
6,32,40......3,4,5,7,10,14,19,24,29,47,1
15,133,150...V..X.23351.23363:C..(255..(
1)):.X,C:.X:.23364,.(.(1).5)...W........
23156,95:..?.P..****THIS SUBROUTINE LOAD
 INTO MEMORY THE NAMES OF COMPUTER COMPA
NIES***.O...CN.22948:.X.22948.23048:.X,0
:.X:.RN(5):CT.0...,.R..(48..(1).1)...-..
J.1.5:.R.RN(J).2092.../..J:CT.CT.1:RN(CT
).R:.CT.5.2100.H.3..2092...4..X.1.5:CX.C
N.((X.1).20):.Y.1.RN(X):.CC$:.Y:.:.Z.1.6
5.;.]..RR:.Z:L.C(CC$):.Y.1.C(CC$):CS$.H(
CC$,Y):CS$.I(CS$,1).Z....(CX.(Y.1)),F(CS
$):.Y:.X:......."GREAT EASTERN OIL","SUD
 OESTE OIL","FALLS EXPLORATION","FIND IT
 OIL"......"DALLAS OIL CARTEL","WESTERN 
RIVER INC","ALWAYS DEEP OIL","DIGGER OIL
".5...."DELTA OIL EXPORT","SMITH OIL AND
 EXPORT","HOUSTON OIL CARTEL".}...."MOSA
IC PETROLEUM","MICHELSON PLASTICS","NELS
ON RUBBER","BELL OIL".D.J.."WELSH OIL","
LUDLOW PETROLEUM","WICKFORD SURVEY","FAU
LT LINE OIL"...T.."RUBIO EXPLORATION","S
ABINE PETROLEUM","TOWER DRILLING","RIG C
ITY OIL".Y...."DRILLING INC.","NEVER SAY
 NEVER OIL","PIPPIN OIL","QUICK DRILL CO
"......"LIGHTING STRIKE OIL","STADIUM PE
TROLEUM","QUICK-XXON OIL"......"FISSURE 
SURVEY","100% ALWAYS OIL","ISOIL COMPANY
","GULF EXPLORATION".1...."SHALE OIL CO.
","CRUDE AND RUDE OIL","KASHMIR DRILLING
","DRILL BIT CO.".Z...."BLUTO AND OLIVE 
OIL","SEEPING OIL CO.","JAY PRODUCTS","V
ASSAL OIL".C...."SPILL OIL","OIL PROVINC
E CO","LOTS-A-HECTARES OIL","SALT PLUG O
IL"......"OIL RIVER CO. AFRICA","OIL CIT
Y CO. USA","ALASKAN CRUDE CO.".=....2339
0,6:.23391,F("R"):.23392,F("E"):.23393,F
("A").T....23394,F("G"):.23395,F("A"):.2
3396,F("N"):.23365,5.Z..... . ..X.23051.
23063:.X,.(.(1).98).1:.X.G....X.23064.23
076:.X,.(.(1).253).2:.X......X.23077.230
89:.X,.(.(1).253).2:.X......X.23090.2310
2:.X,.(.(1).253).2:.X.<.H..X.23103.23115
:.X,.(.(1).253).2:.X.T.R..23156,.(.(1).4
5).5.L....23365,.(.(1).70).5......23366,
.(.(1).70).5......X.18660.20659:.X,.(200
..(1)).5:.X:.......X.23700.23707:.X,.(.(
0).3).30..(.(0).3):.X......23708,10:.234
20,10:.23419,45:.23501,1:.23502,0.)....2
3709,1:.23710,1:....O."...O."...O."...O.
"...O."...,"OIL CITY CO. USA","ALASKAN C
RUDE CO."...E CO."...L CITY CO. USA","AL
ASKAN CRUDE CO."...O."...O."...O."...O."
...O."...O."...O."...DE CO."...DE CO."..
.DE CO."...DE CO."...DE CO."...A","ALASK
AN CRUDE CO."...RIVER CO. AFRICA","OIL C
ITY CO. USA","ALASKAN CRUDE CO."... RIVE
R CO. AFRICA","OIL CITY CO. USA","ALASKA
N CRUDE CO."...O."...O."...G OIL".I...."
OIL RIVER CO. AFRICA","OIL CITY CO. USA"
,"ALASKAN CRUDE CO."...O."....NM.....Z..
....CA.....PZ.5...Y......TP.T...R......C
......CN.3H..CT. ...J..@...CX.3...CC.Z..
.RR.....L......CS.D...RN%..........@....
.....X..............J..@...CX.3...CC.7..
.RR.....L......CS.O...RN%.......... ....
 ....X.........@..."OIL CITY CO. USA","A
LASKAN CRUDE CO."...L RIVER CO. AFRICA",
"OIL CITY CO. USA","ALASKAN CRUDE CO."..
.ITY CO. USA","ALASKAN CRUDE CO."... CO.
 AFRICA","OIL CITY CO. USA","ALASKAN CRU
DE CO."...,"OIL CITY CO. USA","ALASKAN C
RUDE CO."...ITY CO. USA","ALASKAN CRUDE 
CO."...CITY CO. USA","ALASKAN CRUDE CO."
...IL RIVER CO. AFRICA","OIL CITY CO. US
A","ALASKAN CRUDE CO."..."ALASKAN CRUDE 
CO."...CO. AFRICA","OIL CITY CO. USA","A
LASKAN CRUDE CO."... RIVER CO. AFRICA","
OIL CITY CO. USA","ALASKAN CRUDE CO."...
O."...O."...O."...A","OIL CITY CO. USA",
"ALASKAN CRUDE CO."..."OIL RIVER CO. AFR
ICA","OIL CITY CO. USA","ALASKAN CRUDE C
O."...O."...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL