DATABASE        
FILE INFORMATION
FILENAME(S): DATABASE        
FILE TYPE(S): PRG
FILE SIZE: 20.7K
FIRST SEEN: 2025-12-01 00:50:39
APPEARS ON: 1 disk(s)
FILE HASH
4dc881c3da378f2549317b4cdd9636c29eeeeea84f6f50fab857d391af092e95
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| THE SLAYER | DATABASE         | PRG | hedning, Christian Johansson | 22 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 25 08 A9 05 9E 32 30 36 34 00 00 00 00 00 |..%....2064.....|
00000010: 00 4C 28 08 4C 4C 4F 4E 53 20 50 41 02 02 45 52 |.L(.LLONS PA..ER|
00000020: 20 56 32 2E 32 33 00 00 00 78 A9 34 85 01 A0 00 | V2.23...x.4....|
00000030: C6 AF CE 38 08 B1 AE 99 00 00 C8 D0 F8 A5 AF C9 |...8............|
00000040: 08 D0 ED A0 07 B9 57 08 99 AA 00 88 D0 F7 B9 5F |......W........_|
00000050: 08 91 AC C8 D0 F8 A2 FF 9A 4C 00 01 01 08 67 AE |.........L....g.|
00000060: E6 01 EE 00 04 C6 01 B1 B0 2A 2A 2A 2A 29 07 AA |.........****)..|
00000070: BD 2E 01 85 AC B1 B0 29 1F AA 20 36 01 20 AB 00 |.......).. 6. ..|
00000080: A5 B0 05 B1 D0 DA A9 37 85 01 58 4C 10 08 64 AC |.......7..XL..d.|
00000090: 5C 9D 72 75 4F 51 E6 B0 D0 02 E6 B1 60 E6 AE D0 |\.ruOQ......`...|
000000A0: 02 E6 AF 60 B1 B0 F0 01 E8 86 02 AA 4C 36 01 98 |...`........L6..|
000000B0: 3C A9 FF 91 AE 20 3D 01 CA D0 F8 60 B1 B0 20 36 |<.... =....`.. 6|
000000C0: 01 4C 53 01 B1 B0 91 AE 20 3D 01 20 36 01 CA D0 |.LS..... =. 6...|
000000D0: F3 60 A9 04 FC A9 08 85 02 B1 B0 91 AE C8 C4 02 |.`..............|
000000E0: D0 F7 18 98 65 AE 85 AE 90 02 E6 AF A0 00 CA D0 |....e...........|
000000F0: E8 18 A5 02 65 B0 85 B0 90 02 E6 B1 60 20 44 01 |....e.......` D.|
00000100: B1 B0 20 53 01 C6 02 D0 F9 4C 36 01 20 44 01 20 |.. S.....L6. D. |
00000110: 64 01 C6 02 D0 F9 60 09 0B 08 A9 05 9E 32 30 36 |d.....`......206|
00000120: 34 C3 20 D0 49 00 17 A0 00 B9 1C 08 49 FF 99 1C |4. .I.......I...|
00000130: 08 C8 D0 0A 87 56 CF 7A FE 5F FF 46 FF 3B 66 FF |.....V.z._.F.;f.|
00000140: 0E 46 FF E6 66 FF 3B 37 2F 0E 11 D9 F7 11 D6 F7 |.F..f.;7/.......|
00000150: 11 D3 F7 11 D0 F7 52 D0 F7 36 2F 2F 21 46 FF DF |......R..6//!F..|
00000160: 66 FF 1F 46 FF F6 66 FF DF 37 2F 0E 11 B7 F7 11 |f..F..f..7/.....|
00000170: B4 F7 11 B1 F7 11 AE F7 52 AE F7 36 CF 2F 21 56 |........R..6./!V|
00000180: C8 7A FE A7 DF FF D5 87 56 CB 7A FE 5F FF 46 FF |.z......V.z._.F.|
00000190: 1F 66 FF DF 37 2F 08 11 86 F7 11 83 F7 52 83 F7 |.f..7/.......R..|
000001A0: 36 CF 2F 15 46 FF 0E 66 FF 3B 37 2F 08 11 70 F7 |6./.F..f.;7/..p.|
000001B0: 11 6D F7 52 6D F7 36 2F 2F 15 5F FF 46 4E F7 66 |.m.Rm.6//._.FN.f|
000001C0: FF FB 37 2F 08 B3 FF FB 5F FF 46 FE DC 66 FE F7 |..7/...._.F..f..|
000001D0: 37 2F 08 11 FB FB 11 F8 FB 52 FB FB 36 1F 2F 15 |7/.......R..6./.|
000001E0: 56 C8 7A FE A7 56 BE 7A D2 7A 51 56 BB 7A D1 7A |V.z..V.z.zQV.z.z|
000001F0: 50 B3 EF F7 60 2B FF 1A E7 83 91 39 01 33 77 FF |P...`+.....9.3w.|
00000200: 83 19 39 23 39 A1 13 FF C1 91 3F 3F C0 F8 7C 00 |..9#9.....??..|.|
00000210: F0 9C 43 CE 20 23 5C F8 00 7E F0 E0 78 60 70 3E |..C. #\..~..x`p>|
00000220: 00 FC DE C0 F0 D0 C0 40 00 7C DE C0 CE C6 EE 7C |.......@.|.....||
00000230: 00 EE C6 C6 FE C6 C6 42 00 43 3C 43 18 20 2C 08 |.......B.C<C. ,.|
00000240: 00 0C 0E 0E 0C 4C EC 78 00 E6 EE F8 F8 68 6C 66 |.....L.x.....hlf|
00000250: 00 C0 E0 E0 60 60 6E FE 00 44 EE FE D6 C6 C6 82 |....``n..D......|
00000260: 00 62 F6 FE DE CE C6 44 00 7C E6 43 C6 20 25 EE |.b.....D.|.C. %.|
00000270: 7C 00 7C E6 C6 DC F0 60 60 00 7C E6 C6 C6 DE EE ||.|....``.|.....|
00000280: 7E 00 FC E6 C6 CC F8 6C 66 00 3C 76 60 3C 06 EE |~......lf.<v`<..|
00000290: 7C 00 7E FC 44 18 0A 08 00 CC CC C6 C6 E6 E6 7C ||.~.D..........||
000002A0: 00 44 C6 20 23 EE 7C 30 00 82 C6 C6 D6 FE EE 44 |.D. #.|0.......D|
000002B0: 00 C6 E6 3C 18 3C 66 C6 00 C6 C6 E6 3C 18 18 30 |...<.<f.....<..0|
000002C0: 00 FE 1E 0C 18 38 F0 FE 60 31 00 07 04 0C 0C 08 |.....8..`1......|
000002D0: 00 10 30 CA 07 08 14 24 22 42 41 80 C3 0B 10 68 |..0....$"BA....h|
000002E0: 88 05 02 10 28 48 44 85 82 C4 0E 40 A1 22 12 14 |....(HD....@."..|
000002F0: 08 40 A0 90 10 08 04 02 01 D9 05 18 18 7E 18 18 |.@...........~..|
00000300: D7 02 18 18 C9 0B 7C E6 CE D6 E6 EE 7C 00 18 38 |......|.....|..8|
00000310: 38 43 18 20 41 08 00 FC CE 06 1C 70 E6 FE 00 FC |8C. A......p....|
00000320: EE 06 1C 06 CE FC 00 08 1C 3C 6C CC FE 0C 00 7E |.........<l....~|
00000330: C0 DC 7E 06 0E FC 00 3C 70 60 EC C6 E6 7C 00 7E |..~....<p`...|.~|
00000340: EE 0C 18 18 38 30 00 7C C6 E6 7C CE C6 7C 00 7C |....80.|..|..|.||
00000350: CE C6 6E 0C 1C 78 C2 05 18 18 00 18 18 60 33 00 |..n..x.......`3.|
00000360: 03 03 0F 3C 43 3F 06 3C 00 F0 FC 3F FF 43 0F 03 |...<C?.<...?.C..|
00000370: 00 3F 3C 43 3F 15 3C 3F 00 FC 3F 0F FC 0F 0F FC |.?<C?.<?..?.....|
00000380: 00 0F 0F 3C 3C 3F 3F 03 00 FC 3F C3 04 0F F0 00 |...<<??...?.....|
00000390: 3F 43 3C 06 3F 3F 0F 00 FC 3F 44 0F 05 FC 00 3F |?C<.??...?D....?|
000003A0: 3F 3C 43 3F 0D 0F 00 FF 0F 00 F0 00 0F FF 00 3F |?<C?...........?|
000003B0: 3F 3C 43 3F 06 3C 00 FF 0F 00 F0 C4 01 0F 43 3C |?<C?.<........C<|
000003C0: 0C 3F 3F 0F 00 FC 3F 00 3C 0F 0F FC 00 43 3C 43 |.??...?.<....C<C|
000003D0: 3F 06 3C 00 3F 3F 0F FF 43 0F 02 00 0F 46 03 01 |?.<.??..C....F..|
000003E0: 00 43 C0 43 F0 04 C0 00 3F 3C C2 07 3C 3F 0F 00 |.C.C....?<..<?..|
000003F0: FC 3F 3F 43 0F 12 FC 00 3F 3F 3C 3F 0F 3F 3C 00 |.??C....??<?.?<.|
00000400: 0F 3F FC F0 FC 3F 0F 00 43 3C 43 3F 01 0F C5 01 |.?...?..C<C?....|
00000410: 0F E2 02 00 FC 46 3F 03 00 0F 3F E2 05 CF 0F 0F |.....F?...?.....|
00000420: 00 3C 45 3F 0D 3C 00 3F 0F CF FF 3F 3F 0F 00 03 |.<E?.<.?...??...|
00000430: 3C 3C 43 3F 04 03 00 F0 3F 44 0F 05 FC 00 3F 3C |<<C?....?D....?<|
00000440: 3C 43 3F 07 3C 00 FC 3F 0F 0F FC C3 13 0F 3F 3C |<C?.<..?......?<|
00000450: 3C 3F 3F 0F 00 FC 3F 3F 0F CF FC CF 00 3F 3C 3C |<??...??.....?<<|
00000460: 43 3F 1C 3C 00 FC 3F 3F 3C F0 FC 3F 00 3F 3C 3F |C?.<..??<..?.?<?|
00000470: 0F 00 3F 3F 00 FF 0F 00 FC 0F 3F FC 00 3F 0F 45 |..??......?..?.E|
00000480: 03 04 00 FC C0 C0 43 F0 02 C0 00 43 3C 44 3F 03 |......C....C<D?.|
00000490: 00 3F 3F 43 0F 05 3F FC 00 3C 3F 44 0F 02 03 00 |.??C..?..<?D....|
000004A0: 43 0F 05 3C 3C F0 C0 00 43 3C 43 3F 1B 3C 00 3F |C..<<...C<C?.<.?|
000004B0: 3F 0F 0F FF 3F 0F 00 3C 3F 0F 03 0F 3F 3C 00 0F |?...?..<?...?<..|
000004C0: 3F FC F0 FC 3F 0F 00 3F 43 0F 0E 03 03 0F 00 0F |?...?..?C.......|
000004D0: 0F CF FC F0 F0 C0 00 3F 0C C2 04 03 0F 3F 00 E2 |.......?.....?..|
000004E0: 05 3F FC C0 CF FF C4 04 03 0F 3F 3C 60 4B 00 E2 |.?........?<`K..|
000004F0: 03 7F 7F 07 C3 43 C0 02 C1 C3 C3 03 0F 3F 7F E2 |.....C.......?..|
00000500: C4 01 80 43 C0 C4 04 03 0F 1F 3F C3 01 3E E4 C3 |...C......?..>..|
00000510: 05 3F 3F 1F 1F 01 C3 45 F0 C3 05 03 0F 1F 7F FF |.??....E........|
00000520: C3 05 C1 E3 F3 F3 F0 C3 E4 01 3E C3 43 E0 01 C0 |..........>.C...|
00000530: C6 03 01 03 07 C3 02 1F 7F E2 01 F7 C3 01 C0 44 |...............D|
00000540: E0 C5 03 01 03 07 C3 02 1F 7F E2 01 F7 C3 01 C0 |................|
00000550: 43 E0 01 E1 C4 02 0F 3F E2 C3 01 F8 E4 C5 03 80 |C......?........|
00000560: C0 E0 C7 01 01 C3 05 06 7C FC F8 F8 C3 05 04 06 |........|.......|
00000570: 07 0F 0F C6 02 81 87 C3 03 03 1F 7F E2 C3 01 FC |................|
00000580: 43 FE 01 FC 60 68 00 43 07 43 0F 12 1F 1F C7 CF |C...`h.C.C......|
00000590: DF FF FC F8 F0 E0 E7 87 87 07 07 0F 0F 1F 43 C0 |..............C.|
000005A0: 0E C1 81 83 83 07 7F FE F8 F0 F0 E0 E0 C0 FF 47 |...............G|
000005B0: 1F 43 01 43 03 05 07 07 F1 F3 F7 E2 0B FE FC F8 |.C.C............|
000005C0: F9 E1 E1 C1 01 03 03 07 44 F0 05 E0 E0 E1 C1 3E |........D......>|
000005D0: 43 7C 04 F8 F8 F0 F0 C8 14 0F 1F 1F 3E 3E 7C 7C |C|..........>>|||
000005E0: F8 C7 87 0F 0F 1F 3F 7E FC E0 C0 C0 80 C4 1C 0F |......?~........|
000005F0: 1F 1F 3E 3E 7C 7C F8 C7 87 0F 0F 1F 3F 7E FC E3 |..>>||......?~..|
00000600: C7 CF 9F 3F 3E 7C 7C FE F8 E0 C0 C4 02 0F 0F 44 |...?>||........D|
00000610: 1F 05 0F 07 E0 F0 F0 45 FE 0A 01 03 07 0F 1F 1F |.......E........|
00000620: 3F 7F F0 F0 43 E0 43 C0 0E 1F 1F 3F 3E 7E 7C F8 |?...C.C....?>~|.|
00000630: F8 8F 1F 3F 7F 7E FC 43 F8 0F E0 81 01 03 07 0F |...?.~.C........|
00000640: 1F 78 F8 F0 F0 E0 C0 C0 80 60 66 00 04 01 03 3F |.x.......`f....?|
00000650: 3F 43 7F E2 03 F3 C0 80 C2 01 03 E3 0E 1F 3E 7E |?C............>~|
00000660: FC F8 F0 E7 8F 07 0F 0F 1F 1F 3E E2 03 C0 80 80 |..........>.....|
00000670: C3 E2 43 3E 43 7C 04 F8 F8 0F 0F 43 1F 05 3F 7F |..C>C|.....C..?.|
00000680: FC F0 E0 43 C0 E3 0B 07 0F 1F 3F FE FC F8 E0 C1 |...C......?.....|
00000690: 83 83 43 07 05 0F 0F F0 E0 E0 43 C0 14 80 80 00 |..C.......C.....|
000006A0: 01 01 03 03 07 07 0F F8 F1 F0 E0 E0 C0 C0 80 FC |................|
000006B0: F8 C7 11 01 01 03 03 07 07 0F F8 F1 F0 E0 E0 C0 |................|
000006C0: C0 80 FC F8 43 01 43 03 02 F8 F8 43 F0 43 E0 C8 |....C.C....C.C..|
000006D0: 11 03 07 07 0F 0F 1F 3F 7F E0 E0 C1 C3 83 87 0F |.......?........|
000006E0: 1F 7F E4 10 DF 9F 9F 81 83 87 87 0F 1F 3F FE F0 |.............?..|
000006F0: E0 E0 C0 80 C3 09 F8 7C 7E 3F 1F 1F 0F 07 3F C3 |.......|~?....?.|
00000700: 04 80 80 C0 E0 60 68 00 0D 03 07 07 0F 0F 1F 1F |.....`h.........|
00000710: 3F E1 C0 C0 80 80 C3 01 FF C7 02 0F 1F C2 44 01 |?.............D.|
00000720: E2 02 F8 F8 44 F0 E2 43 03 10 07 07 0F F8 F1 F1 |....D..C........|
00000730: F3 E3 E7 E7 CF F8 F0 F0 E0 E0 43 C0 01 7F C7 01 |..........C.....|
00000740: C0 C4 03 01 03 03 43 1F 02 3E 3E E3 C5 04 E0 E1 |......C..>>.....|
00000750: E7 0F 43 1F 02 3F 3F E2 01 80 C3 E4 C4 05 F8 F8 |..C..??.........|
00000760: F1 E7 0F 43 1F 02 3F 3F E2 01 80 C3 E4 0C 03 03 |...C..??........|
00000770: 01 01 F8 F8 F0 E0 E0 F0 F8 FC E2 06 7F 1F 00 01 |................|
00000780: 03 1F E3 11 FC FE FC F8 F0 E1 C3 07 0F 3F 7F 7E |.............?.~|
00000790: FC F8 F0 E0 C0 47 1F 09 1E FC F8 F0 E0 C0 80 00 |.....G..........|
000007A0: 01 C4 02 7F 7F E2 43 03 01 07 E4 01 E0 43 F0 04 |......C......C..|
000007B0: E0 E0 C0 80 60 68 00 01 38 D7 02 01 01 C6 06 F0 |....`h..8.......|
000007C0: F0 F8 F8 FC 06 C2 01 0F C7 01 CE D7 01 03 C7 01 |................|
000007D0: FF C7 06 CF 0F 0F 1F 1F 1C C2 04 FF F0 E0 C0 C4 |................|
000007E0: 01 FF C7 06 CF 0F 0F 1F 1F 1C C2 04 FF F0 E0 C0 |................|
000007F0: C4 01 FF C7 01 C0 C7 01 07 C7 01 E0 C7 01 1F C7 |................|
00000800: 01 80 C7 01 1C C7 01 01 C7 01 FF C7 01 FE 60 46 |..............`F|
00000810: 00 21 9E F0 20 E9 2C 20 E3 2B 20 CE 2B 20 99 2A |.!.. ., .+ .+ .*|
00000820: A0 00 EE B4 2B 20 7F 2A AD B4 2B D9 B9 2B D0 F2 |....+ .*..+..+..|
00000830: C0 06 F0 13 C8 CE B4 2B 20 7F 2A AD B4 2B D9 B9 |.......+ .*..+..|
00000840: 2B D0 F2 C8 4C 0E 2A EA 20 7F 2A 20 E4 FF D0 03 |+...L.*. .* ....|
00000850: 4C 33 2A 78 A9 31 8D 14 03 A9 EA 8D 15 03 A9 37 |L3*x.1.........7|
00000860: 85 01 A9 F0 8D 1A D0 A9 00 8D 0D DC 58 20 A3 FD |............X ..|
00000870: 20 15 FD 20 5B FF A0 00 98 18 79 68 08 C8 EA EA | .. [.....yh....|
00000880: D0 F7 C9 64 F0 0C 99 00 04 C8 D0 FA EE 74 2A 4C |...d.........t*L|
00000890: 72 2A 60 98 48 A2 00 A0 00 C8 D0 FD E8 E0 0A D0 |r*`.H...........|
000008A0: F8 20 34 2D 20 96 2F 20 34 C8 68 A8 60 78 A9 11 |. 4- ./ 4.h.`x..|
000008B0: 8D 1A D0 A9 7F 8D 0D DC A9 B0 8D 14 03 A9 2A 8D |..............*.|
000008C0: 15 03 58 60 AD 19 D0 8D 19 D0 E6 02 A6 02 E0 06 |..X`............|
000008D0: D0 04 A2 00 86 02 BD 9B 2B 8D 11 D0 BD A1 2B 8D |........+.....+.|
000008E0: 16 D0 BD A7 2B 8D 18 D0 BD AD 2B 8D 20 D0 8D 21 |....+.....+. ..!|
000008F0: D0 BD B3 2B 8D 12 D0 E0 02 10 03 4C 6F 2B AD 3C |...+.......Lo+.<|
00000900: 03 D0 03 CE A4 2B CE A6 2B AD A6 2B C9 BF D0 73 |.....+..+..+...s|
00000910: A9 C7 8D A4 2B A9 C7 8D A6 2B A0 00 EA B9 C1 07 |....+....+......|
00000920: 99 C0 07 AD 3C 03 D0 06 B9 09 06 99 08 06 C8 C0 |....<...........|
00000930: 27 D0 E9 AD 3C 03 D0 1D AC 3D 03 B9 96 2E C9 40 |'...<....=.....@|
00000940: 30 03 18 E9 3F 8D 2F 06 EE 3D 03 AD 3D 03 C9 29 |0...?./..=..=..)|
00000950: D0 03 EE 3C 03 AD 3C 03 F0 12 EE 40 03 AD 40 03 |...<..<....@..@.|
00000960: C9 64 D0 08 A9 00 8D 40 03 CE 3C 03 AD 41 03 D0 |.d.....@..<..A..|
00000970: 21 EE 41 03 A4 FE B1 FC C9 20 F0 10 C9 FF D0 06 |!.A...... ......|
00000980: 20 CE 2B 4C 31 EA 18 E9 40 0A 69 41 8D E7 07 4C | .+L1...@.iA...L|
00000990: 31 EA CE 41 03 A4 FE B1 FC C9 20 F0 06 18 E9 40 |1..A...... ....@|
000009A0: 0A 69 42 8D E7 07 E6 FE D0 02 E6 FD 4C 09 2D 1B |.iB.........L.-.|
000009B0: 3B 44 1B 43 C0 05 C7 C0 C7 19 1D 44 19 C6 21 EF |;D.C.......D..!.|
000009C0: 4C 4E 94 A2 F0 00 71 54 71 5E 71 68 71 0B 0C 0F |LN....qTq^qhq...|
000009D0: 01 0F 0C 0B 09 08 07 01 07 08 09 A9 00 8D 41 03 |..............A.|
000009E0: 85 FE A9 A2 85 FC A9 2D 85 FD A9 20 8D E7 07 60 |.......-... ...`|
000009F0: A2 0B A0 00 18 20 F0 FF A0 2C A9 7B 20 1E AB A2 |..... ...,.{ ...|
00000A00: 0F A0 00 18 20 F0 FF A0 2C A9 7B 20 1E AB A2 01 |.... ...,.{ ....|
00000A10: A0 12 18 20 F0 FF A0 2C A9 BA 20 1E AB A2 09 A0 |... ...,.. .....|
00000A20: 10 18 20 F0 FF A0 2C A9 BF 20 1E AB A2 12 A0 0B |.. ...,.. ......|
00000A30: 18 20 F0 FF A0 2C A9 C8 20 1E AB A2 16 A0 0E 18 |. ...,.. .......|
00000A40: 20 F0 FF A0 2C A9 DC 20 1E AB A0 00 A2 00 BD 71 | ...,.. .......q|
00000A50: 2C 99 78 04 99 A0 04 99 C8 04 99 F0 04 99 18 05 |,.x.............|
00000A60: A9 00 99 78 D8 99 A0 D8 99 C8 D8 99 F0 D8 99 18 |...x............|
00000A70: D9 C8 E8 E0 0A D0 02 A2 00 C0 28 D0 D1 60 10 30 |..........(..`.0|
00000A80: 30 E0 E0 60 E0 E0 30 30 05 23 9F 27 25 9A 26 24 |0..`..00.#.'%.&$|
00000A90: 1F 27 23 9A 25 23 9F 26 24 05 23 9E 27 24 81 27 |.'#.%#.&$.#.'$.'|
00000AA0: 25 95 24 23 81 25 24 9E 27 24 05 26 9F 23 25 99 |%.$#.%$.'$.&.#%.|
00000AB0: 27 24 1E 23 25 99 26 24 9F 27 25 05 23 96 26 24 |'$.#%.&$.'%.#.&$|
00000AC0: 1C 27 24 96 23 26 00 9F 54 48 45 00 50 52 45 53 |.'$.#&..THE.PRES|
00000AD0: 45 4E 54 53 00 9E 43 52 41 43 4B 45 44 20 3A 20 |ENTS..CRACKED : |
00000AE0: 31 36 2E 30 35 2E 38 37 00 50 52 45 53 53 20 53 |16.05.87.PRESS S|
00000AF0: 50 41 43 45 21 00 A9 00 A8 99 3C 03 C8 C0 06 D0 |PACE!.....<.....|
00000B00: F8 85 C6 85 02 A9 93 20 D2 FF A9 70 85 FA A9 C4 |....... ...p....|
00000B10: 85 FB 20 E0 CA 60 AC 3E 03 A2 00 B9 C0 2B 9D 08 |.. ..`.>.....+..|
00000B20: DA B9 C7 2B 9D C0 DB 9D D0 DA E8 E0 27 D0 EC EE |...+........'...|
00000B30: 3E 03 AD 3E 03 C9 07 D0 05 A9 00 8D 3E 03 4C 31 |>..>........>.L1|
00000B40: EA EE 3F 03 AD 3F 03 C9 02 F0 01 60 A0 00 8C 3F |..?..?.....`...?|
00000B50: 03 A2 27 AD DF D9 48 AD 58 DA 48 BD B7 D9 9D B8 |..'...H.X.H.....|
00000B60: D9 B9 59 DA 99 58 DA C8 CA C0 27 D0 EE 68 8D 7F |..Y..X....'..h..|
00000B70: DA 68 8D B8 D9 A0 00 AD 78 04 48 B9 79 04 99 78 |.h......x.H.y..x|
00000B80: 04 B9 A1 04 99 A0 04 B9 C9 04 99 C8 04 B9 F1 04 |................|
00000B90: 99 F0 04 B9 19 05 99 18 05 C8 C0 27 D0 DD 68 8D |...........'..h.|
00000BA0: 9F 04 8D C7 04 8D EF 04 8D 17 05 8D 3F 05 60 45 |............?.`E|
00000BB0: 20 20 CF 47 52 45 45 54 49 4E 47 53 20 54 4F 20 | .GREETINGS TO |
00000BC0: 20 54 48 45 20 41 4C 4C 49 41 4E 43 45 5B 20 4E | THE ALLIANCE[ N|
00000BD0: 45 57 20 42 45 4E 43 4F 52 5B 20 46 55 54 55 52 |EW BENCOR[ FUTUR|
00000BE0: 45 20 50 52 4F 4A 45 43 54 53 5B 20 52 41 57 20 |E PROJECTS[ RAW |
00000BF0: 44 45 41 4C 20 49 4E 43 5B 20 54 57 52 5B 20 53 |DEAL INC[ TWR[ S|
00000C00: 43 53 5B 20 44 53 20 43 4F 4D 50 57 41 52 45 5B |CS[ DS COMPWARE[|
00000C10: 20 41 43 41 5B 20 48 45 41 56 59 20 43 52 41 43 | ACA[ HEAVY CRAC|
00000C20: 4B 45 52 53 5B 20 54 52 49 41 44 5B 20 41 52 54 |KERS[ TRIAD[ ART|
00000C30: 57 4F 52 58 5B 20 46 41 4E 54 41 53 54 49 43 20 |WORX[ FANTASTIC |
00000C40: 46 49 56 45 5B 20 54 54 49 5B 20 50 41 43 4F 20 |FIVE[ TTI[ PACO |
00000C50: 43 52 45 57 5B 20 50 52 4F 4C 49 4E 45 5B 20 47 |CREW[ PROLINE[ G|
00000C60: 4F 46 46 59 20 43 52 41 43 4B 49 4E 47 53 5B 20 |OFFY CRACKINGS[ |
00000C70: 44 43 43 5B 20 57 49 5A 41 58 20 41 4E 44 20 54 |DCC[ WIZAX AND T|
00000C80: 44 43 5F 20 01 FF 50 2E 08 44 41 54 41 42 41 53 |DC_ ..P..DATABAS|
00000C90: 45 50 2E 18 20 20 57 41 53 20 43 52 41 43 4B 45 |EP.. WAS CRACKE|
00000CA0: 44 20 3A 20 31 36 2E 30 35 2E 38 37 44 20 11 42 |D : 16.05.87D .B|
00000CB0: 59 20 54 48 45 20 50 41 50 49 4C 4C 4F 4E 53 20 |Y THE PAPILLONS |
00000CC0: 43 2E 43 20 20 26 4D 45 4D 42 45 52 53 20 41 52 |C.C &MEMBERS AR|
00000CD0: 45 3A 20 41 4C 50 48 41 20 5A 41 5A 20 41 4E 44 |E: ALPHA ZAZ AND|
00000CE0: 20 54 48 45 20 43 41 54 4D 41 4E 2E 43 20 1F 48 | THE CATMAN.C .H|
00000CF0: 49 54 20 41 4E 59 20 4B 45 59 20 54 4F 20 45 4E |IT ANY KEY TO EN|
00000D00: 44 20 54 48 49 53 20 4C 4F 47 4F 20 21 21 43 20 |D THIS LOGO !!C |
00000D10: 20 27 4C 4F 4F 4B 20 49 4E 20 54 48 45 20 4F 54 | 'LOOK IN THE OT|
00000D20: 48 45 52 20 53 43 52 4F 4C 4C 20 46 4F 52 20 47 |HER SCROLL FOR G|
00000D30: 52 45 45 54 49 4E 47 53 20 43 2E 60 30 20 20 25 |REETINGS C.`0 %|
00000D40: A2 00 BD 38 21 29 80 C9 80 D0 04 38 4C A6 2F 18 |...8!).....8L./.|
00000D50: 7E 18 21 7E 20 21 7E 28 21 7E 30 21 7E 38 21 E8 |~.!~ !~(!~0!~8!.|
00000D60: E0 08 D0 DE 60 60 9E 00 01 2E 48 20 E2 82 20 FF |....``....H .. .|
00000D70: 20 20 20 5A FF 20 FF 00 90 01 94 02 01 0F 03 11 | Z. ..........|
00000D80: 02 18 0A 00 14 12 0B 64 08 01 07 09 0F 03 0D 32 |.......d.......2|
00000D90: 09 08 13 01 80 63 A8 10 AD 10 AD 10 AB 08 AD 10 |.....c..........|
00000DA0: AD 08 AF 10 B0 18 B0 08 AF 08 AD 10 AB 08 A8 10 |................|
00000DB0: A6 08 A8 10 A8 08 AD 10 AB 18 AB 08 A6 10 A4 08 |................|
00000DC0: A3 08 A1 08 A3 10 A4 20 A4 08 A6 10 A3 10 82 A8 |....... ........|
00000DD0: 08 AD 08 20 3E A8 10 AD 10 12 02 A4 10 A9 10 A9 |... >...........|
00000DE0: 10 A8 08 A9 10 A9 08 AB 10 AD 18 AD 08 AB 08 AD |................|
00000DF0: 10 AB 08 A8 10 A6 08 A8 10 A8 08 AD 10 AB 18 AB |................|
00000E00: 08 A6 10 A4 08 A3 08 A1 08 A3 10 A4 20 A4 08 A6 |............ ...|
00000E10: 10 A3 10 82 A8 08 AD 08 20 E0 A8 10 AD 10 A4 10 |........ .......|
00000E20: A9 10 A9 10 A8 08 A9 10 A9 08 AB 10 AD 18 AD 08 |................|
00000E30: AB 08 AD 10 AB 08 A8 10 A6 08 A8 10 A8 08 AD 10 |................|
00000E40: AB 18 AB 08 A6 10 A4 08 A3 08 A1 08 A3 10 A4 20 |............... |
00000E50: A4 08 A6 10 A3 10 A1 18 03 41 AD 10 0E 64 08 00 |.........A...d..|
00000E60: 0F 00 07 00 09 00 AD 10 AF 08 B0 18 03 11 02 18 |................|
00000E70: 0A 00 14 12 0B 64 AD 08 08 01 07 09 0F 03 0D 32 |.....d.........2|
00000E80: 09 08 AF 08 AD 10 AB 08 A8 10 A6 08 A8 10 A8 08 |................|
00000E90: AD 10 AB 18 AB 08 A6 10 A4 08 A3 08 A1 08 A3 10 |................|
00000EA0: A4 20 A4 08 A6 10 A3 10 A1 18 03 41 AD 10 0E 64 |. .........A...d|
00000EB0: 08 00 0F 00 07 00 09 00 AD 10 AF 08 B0 18 03 11 |................|
00000EC0: 02 18 0A 00 14 12 0B 64 AD 08 08 01 07 09 0F 03 |.......d........|
00000ED0: 0D 32 09 08 AF 08 AD 10 AB 08 A8 10 A6 08 A8 10 |.2..............|
00000EE0: A8 08 AD 10 AB 18 AB 08 A6 10 A4 08 A3 08 A1 08 |................|
00000EF0: A3 10 A4 20 A4 08 A6 10 A3 10 82 A8 08 AD 08 21 |... ...........!|
00000F00: 36 A8 10 AD 10 00 01 00 01 03 41 02 12 0A 14 14 |6.........A.....|
00000F10: 06 04 00 13 01 11 01 B0 63 B9 08 0E 64 08 01 10 |........c...d...|
00000F20: 0C 11 01 B5 63 B9 08 0E A0 10 0C 11 01 B7 63 BB |....c.........c.|
00000F30: 08 0E 64 10 04 11 01 B4 63 BC 08 10 10 11 01 BB |..d.....c.......|
00000F40: 08 10 04 11 01 B0 63 B9 08 10 08 12 02 11 01 B5 |......c.........|
00000F50: 63 B9 08 0E A0 10 18 11 01 B7 63 BB 08 0E 64 10 |c.........c...d.|
00000F60: 04 11 01 B4 63 BC 08 10 10 11 01 BB 08 10 04 11 |....c...........|
00000F70: 01 B0 63 B9 08 10 08 11 01 B5 63 B9 08 0E A0 10 |..c.......c.....|
00000F80: 18 11 01 B7 63 BB 08 0E 64 10 04 11 01 B4 63 BC |....c...d.....c.|
00000F90: 08 10 10 11 01 BB 08 10 04 B0 63 AD 18 AD 10 08 |..........c.....|
00000FA0: 00 AD 10 AF 08 B0 20 11 01 B5 63 B9 08 08 01 0E |...... ...c.....|
00000FB0: A0 10 08 11 01 B7 63 BB 08 0E 64 10 04 11 01 B4 |......c...d.....|
00000FC0: 63 BC 08 10 10 11 01 BB 08 10 04 B0 63 B9 18 B4 |c...........c...|
00000FD0: 10 08 00 B4 10 B7 08 B9 20 11 01 B5 63 B9 08 08 |........ ...c...|
00000FE0: 01 0E A0 10 08 11 01 B7 63 BB 08 0E 64 10 04 11 |........c...d...|
00000FF0: 01 B4 63 BC 08 10 10 11 01 BB 08 10 04 11 01 B0 |..c.............|
00001000: 63 B9 08 10 08 11 01 00 62 10 B8 00 01 03 11 02 |c.......b.......|
00001010: 08 0A 0E 08 01 07 09 11 01 84 63 A8 20 10 37 00 |..........c. .7.|
00001020: 40 11 01 84 63 A8 20 10 09 00 40 11 01 84 63 A8 |@...c. ...@...c.|
00001030: 20 10 0F 00 2C 0A F0 E2 C2 E2 20 6E 4C 9D C7 4C | ...,..... nL..L|
00001040: 47 C7 4C 51 C7 4C 2F C8 4C 29 C8 78 85 FA 86 FB |G.LQ.L/.L).x....|
00001050: 20 E0 CA 58 60 8D 33 CD 8E 2F CD A9 00 8D C3 CC | ..X`.3../......|
00001060: 8D C2 CC 8D C1 CC 8D C0 CC 8D D9 CC 8D 0B CD 8D |................|
00001070: DE CC 8D DD CC 8D F3 CC 8D F7 CC 8D A7 CC 98 18 |................|
00001080: 6D 33 CD 8D A2 CC A9 01 8D 37 CD 8D FE CF AD 2B |m3.......7.....+|
00001090: CD 09 70 8D 2B CD A9 F3 8D 2A CD A9 7F 8D 29 CD |..p.+....*....).|
000010A0: 60 85 FA 86 FB 20 A9 C7 58 60 43 EA 20 2F 78 A9 |`.... ..X`C. /x.|
000010B0: 1B 8D 11 D0 A9 D3 8D 14 03 A9 C7 8D 15 03 A2 00 |................|
000010C0: 8E 0E DC E8 8E 1A D0 8E 19 D0 A2 64 8E 12 D0 20 |...........d... |
000010D0: E0 CA 60 EA EA 60 EA EA 20 2F C8 4C 31 60 4C EA |..`..`.. /.L1`L.|
000010E0: 24 62 60 20 E0 CA 60 78 20 34 C8 58 60 A9 01 8D |$b` ..`x 4.X`...|
000010F0: 19 D0 AD FF CF F0 EC 20 85 CC A2 7C B5 2E 9D BC |....... ...|....|
00001100: CC E8 10 F8 20 CB C8 A2 7C BD BC CC 95 2E E8 10 |.... ...|.......|
00001110: F8 20 8F CC AD 33 CD CD A2 CC D0 13 A9 00 8D FE |. ...3..........|
00001120: CF 8D 2A CD 8D 29 CD AD 2B CD 29 0F 8D 2B CD A2 |..*..)..+.)..+..|
00001130: 00 20 BB C8 A2 07 20 BB C8 A2 72 BD 9A CC 9D 8E |. .... ...r.....|
00001140: D3 E8 10 F7 AD FE CF D0 12 A2 0E 20 BB C8 A2 79 |........... ...y|
00001150: BD A1 CC 9D 95 D3 E8 10 F7 30 12 A2 15 A0 0E 20 |.........0..... |
00001160: BD C8 A2 79 BD A8 CC 9D 95 D3 E8 10 F7 A2 7C BD |...y..........|.|
00001170: AC CC 9D 99 D3 E8 10 F7 60 8A A8 BD C7 CC F0 08 |........`.......|
00001180: A9 00 99 04 D4 9D C7 CC 60 EE A3 CC A2 00 AD FE |........`.......|
00001190: CF 18 69 03 8D B0 CA BC 59 CD 84 AC 86 AD B9 A8 |..i.....Y.......|
000011A0: CC 18 7D A4 CC 99 A8 CC FE E0 CC BD E0 CC D9 AC |..}.............|
000011B0: CC 90 10 BD E4 CC 18 69 01 29 03 9D E4 CC A9 01 |.......i.)......|
000011C0: 9D E0 CC B9 C9 CC 18 69 01 99 C9 CC BD 30 CD 85 |.......i.....0..|
000011D0: AA BD 2C CD 85 AB A0 00 B1 AA 38 E9 01 C9 14 B0 |..,.......8.....|
000011E0: 1D 0A A8 B9 7A CD 8D 38 C9 B9 7B CD 8D 39 C9 A0 |....z..8..{..9..|
000011F0: 01 B1 AA A4 AC 20 DF CB 20 95 CC 4C 18 C9 A6 AC |..... .. ..L....|
00001200: A4 AD BD A8 CC D0 03 4C E3 C9 BD C9 CC DD C8 CC |.......L........|
00001210: 90 08 BD C4 CC F0 03 20 20 CC BD 0E CD 18 79 08 |....... .....y.|
00001220: CD 9D 0E CD 90 03 FE 0F CD A4 AD 20 E3 CB BD AD |........... ....|
00001230: CC F0 35 C9 06 90 0F B9 E4 CC 29 01 D0 22 BD AD |..5.......).."..|
00001240: CC 38 E9 05 10 14 BD C9 CC C9 02 90 13 BD AB CC |.8..............|
00001250: F0 05 DD C9 CC 90 09 BD AD CC A8 B9 5C CD D0 03 |............\...|
00001260: BD AA CC 9D 10 CD A4 AD BD AE CC F0 34 C9 02 D0 |............4...|
00001270: 06 20 70 CC 4C E3 C9 C9 04 D0 0D BD 0F CD 18 7D |. p.L..........}|
00001280: 08 CD 9D 0F CD 4C E3 C9 B9 E4 CC 29 01 D0 0F BD |.....L.....)....|
00001290: C5 CC 9D 0D CD BD C6 CC 9D 0C CD 4C E3 C9 20 63 |...........L.. c|
000012A0: CC A6 AD A4 AC DE 34 CD BD 34 CD F0 03 4C 93 CA |......4..4...L..|
000012B0: A9 01 99 C7 CC A9 00 99 0E CD 99 C9 CC BD 04 CD |................|
000012C0: 99 11 CD BD F8 CC 99 12 CD BD 00 CD 99 0F CD A0 |................|
000012D0: 00 B1 AA F0 37 C9 80 90 39 18 7D F0 CC A2 07 C9 |....7...9.}.....|
000012E0: 8C 90 06 E9 0C CA 4C 21 CA E9 7F 0A A8 B9 62 CD |......L!......b.|
000012F0: 8D 56 CD B9 63 CD 8D 57 CD E0 00 F0 0A 4E 56 CD |.V..c..W.....NV.|
00001300: 6E 57 CD CA 4C 3B CA A6 AD 4C 54 CA 8D 56 CD 8D |nW..L;...LT..V..|
00001310: 57 CD AD 56 CD A4 AC 99 0D CD 99 A8 CC AD 57 CD |W..V..........W.|
00001320: 99 0C CD 99 A9 CC A0 01 B1 AA A4 AC 9D 34 CD 20 |.............4. |
00001330: 95 CC BD 34 CD C9 63 D0 0F B9 A9 CC 99 C6 CC B9 |...4..c.........|
00001340: A8 CC 99 C5 CC 4C 11 CA BD FC CC 99 10 CD 99 AA |.....L..........|
00001350: CC BD 34 CD C9 01 B0 08 B9 10 CD 29 FE 99 10 CD |..4........)....|
00001360: A6 AD A5 AA 9D 30 CD A5 AB 9D 2C CD E8 E0 03 B0 |.....0....,.....|
00001370: 03 4C D9 C8 A0 00 B1 FA 18 65 FA 08 CD 30 CD 90 |.L.......e...0..|
00001380: 02 28 60 C8 28 B1 FA 65 FB CD 2C CD D0 0F A9 00 |.(`.(..e..,.....|
00001390: 8D FF CF A2 60 A9 00 9D AC CC E8 10 FA 60 A2 7C |....`........`.||
000013A0: A9 01 8D 97 CA 9D B8 CC E8 10 FA A5 FA 18 69 04 |..............i.|
000013B0: 8D 30 CD A5 FB 69 00 8D 2C CD A2 7E A0 00 B1 FA |.0...i..,..~....|
000013C0: 18 6D 30 CD 9D B3 CC 08 C8 28 B1 FA 6D 2C CD 9D |.m0......(..m,..|
000013D0: AF CC C8 E8 10 E8 A9 01 8D FF CF A9 00 8D FE CF |................|
000013E0: AA 9D A1 CC E8 10 FA 60 8D 2B CD 60 9D FC CC 60 |.......`.+.`...`|
000013F0: 9D 04 CD 60 9D F8 CC 60 8D 54 CD BD E8 CC D0 0B |...`...`.T......|
00001400: A9 01 9D E8 CC AD 54 CD 9D 3C CD DE 3C CD BD 3C |......T..<..<..<|
00001410: CD F0 0B BD 44 CD 85 AA BD 48 CD 85 AB 60 A9 00 |....D....H...`..|
00001420: 9D E8 CC 60 A5 AA 9D 44 CD A5 AB 9D 48 CD 60 8D |...`...D....H.`.|
00001430: 54 CD BD EC CC D0 0B A9 01 9D EC CC AD 54 CD 9D |T............T..|
00001440: 40 CD DE 40 CD BD 40 CD F0 0B BD 4C CD 85 AA BD |@..@..@....L....|
00001450: 50 CD 85 AB 60 A9 00 9D EC CC 60 A5 AA 9D 4C CD |P...`.....`...L.|
00001460: A5 AB 9D 50 CD 60 9D F0 CC 60 9D 08 CD 60 9D A4 |...P.`...`...`..|
00001470: CC 60 9D F4 CC 60 9D 00 CD 60 C9 64 90 07 38 E9 |.`...`...`.d..8.|
00001480: 64 8D 97 CA 60 99 AB CC 60 99 AC CC 60 99 AD CC |d...`...`...`...|
00001490: 60 99 AE CC 60 99 C4 CC 60 99 CA CC 60 99 C8 CC |`...`...`...`...|
000014A0: 60 BD C9 CC DD C8 CC 90 F7 AD A3 CC 29 07 4A F0 |`...........).J.|
000014B0: 1A C9 01 F0 4E C9 03 F0 4A BD A9 CC 18 7D CA CC |....N...J....}..|
000014C0: 9D 0C CD BD A8 CC 69 00 4C 1C CC BD A9 CC 38 FD |......i.L.....8.|
000014D0: CA CC 9D 0C CD BD A8 CC E9 00 9D 0D CD 60 C9 01 |.............`..|
000014E0: D0 36 BD C5 CC DD A8 CC 90 1C D0 08 BD C6 CC DD |.6..............|
000014F0: A9 CC 90 12 BD A9 CC 18 79 F4 CC 9D A9 CC 90 03 |........y.......|
00001500: FE A8 CC 4C 63 CC BD A9 CC 38 F9 F4 CC 9D A9 CC |...Lc....8......|
00001510: B0 03 DE A8 CC 4C 63 CC C9 03 F0 EA C9 04 F0 D4 |.....Lc.........|
00001520: 60 BD A8 CC 9D 0D CD BD A9 CC 9D 0C CD 60 B9 E4 |`............`..|
00001530: CC 29 01 D0 EC BD A8 CC 4A 9D 0D CD BD A9 CC 6A |.)......J......j|
00001540: 4C 6C CC 60 48 EA 02 60 60 44 EA 0D 60 A5 AA 18 |Ll.`H..``D..`...|
00001550: 69 02 85 AA 90 02 E6 AB 60 C2 01 1D C4 03 27 11 |i.......`.....'.|
00001560: 11 C2 05 09 01 17 3A 41 C6 01 11 C2 02 09 01 C7 |......:A........|
00001570: 0A 03 02 E7 00 08 04 64 00 17 3A C2 01 1C C2 02 |.......d..:.....|
00001580: 01 4B C2 01 3C C8 43 01 01 00 43 01 C9 02 12 06 |.K..<.C...C.....|
00001590: C2 01 32 C4 06 14 0E 00 11 41 11 C5 06 18 12 08 |..2......A......|
000015A0: 00 64 64 C2 0E 11 27 90 01 11 18 00 3A 17 F0 0A |.dd...'.....:...|
000015B0: 41 12 14 C4 03 11 08 0E CA 09 0F C5 C6 C7 00 7C |A..............||
000015C0: A4 1E 00 43 04 01 01 C4 01 08 C5 20 41 02 00 30 |...C....... A..0|
000015D0: A2 1C 00 C6 C6 C7 00 8A 0E 63 00 C4 C6 13 00 37 |.........c.....7|
000015E0: 00 27 11 37 00 07 0E 15 41 21 11 81 51 83 68 8B |.'.7....A!..Q.h.|
000015F0: 39 93 80 9C 45 A5 90 AF 69 B9 D7 C4 E3 D0 99 DD |9...E...i.......|
00001600: 00 EA 25 F8 10 2A CB 32 CB 2E CB B8 CB BC 43 CB |..%..*.2......C.|
00001610: 20 29 CF CB D3 CB DF CB 36 CB DB CB B0 CB B4 CB | )......6.......|
00001620: AC CB D7 CB 3A CB 66 CB 71 CB 9D CB A8 CB 03 B8 |....:.f.q.......|
00001630: 03 00 07 0E 15 0A 0B 28 64 14 0B C2 0A 41 21 11 |.......(d....A!.|
00001640: 81 00 B2 B7 B7 00 02 C3 04 14 1E 24 00 43 64 20 |...........$.Cd |
00001650: 21 00 14 0C 34 00 64 66 68 00 83 68 8B 39 93 80 |!...4.dfh..h.9..|
00001660: 9C 45 A5 90 AF 69 B9 D7 C4 E3 D0 99 DD 00 EA 25 |.E...i.........%|
00001670: F8 10 C3 01 77 D5 0E FF A9 20 08 CE 07 9E 20 28 |....w.... .... (|
00001680: 32 30 36 34 29 C3 1B 78 A9 34 85 01 A2 05 BD 42 |2064)..x.4.....B|
00001690: 08 9D 2D 00 CA 10 F7 9A A0 00 C6 32 CE 2C 08 B1 |..-........2.,..|
000016A0: 31 99 C2 1D C8 D0 F8 A5 32 C9 08 D0 ED B9 48 08 |1.......2.....H.|
000016B0: 99 00 01 C8 D0 F7 4C 00 01 01 08 F8 C4 41 44 B1 |......L......AD.|
000016C0: 2F 44 2A 23 8F 29 07 AA BD 1A 01 8D 18 01 B1 2F |/D*#.)........./|
000016D0: 29 1F AA 20 22 01 4C FF 01 A4 43 AB 79 58 3B 3F |).. ".L...C.yX;?|
000016E0: 29 E6 2F D0 02 E6 30 60 B1 2F 20 22 01 91 2D E6 |)./...0`./ "..-.|
000016F0: 2D D0 02 E6 2E CA D0 F5 F0 C5 A9 00 F0 EF A9 FF |-...............|
00001700: D0 EB B1 2F 91 2D E6 2F D0 02 E6 30 E6 2D D0 02 |.../.-./...0.-..|
00001710: E6 2E CA D0 ED F0 A8 20 71 01 B1 2F 20 22 01 91 |....... q../ "..|
00001720: 2D E6 2D D0 02 E6 2E CA D0 F5 C6 39 10 F1 30 8F |-.-........9..0.|
00001730: 86 39 B1 2F AA 4C 22 01 20 71 01 B1 2F 91 2D E6 |.9./.L". q../.-.|
00001740: 2F D0 02 E6 30 E6 2D D0 02 E6 2E CA D0 ED C6 39 |/...0.-........9|
00001750: 10 E9 4C 00 01 20 DA 01 A9 37 85 01 58 20 59 A6 |..L.. ...7..X Y.|
00001760: 4C AE A7 E0 00 F0 EE A9 03 2C A9 08 85 FF B1 2F |L........,...../|
00001770: 91 2D C8 C4 FF D0 F7 18 A5 2D 65 FF 85 2D A5 2E |.-.......-e..-..|
00001780: 69 00 85 2E A0 00 CA D0 E5 18 A5 2F 65 FF 85 2F |i........../e../|
00001790: A5 30 69 00 85 30 4C 00 01 B9 00 EF 99 00 FF C8 |.0i..0L.........|
000017A0: D0 F7 CE DC 01 CE DF 01 AD DF 01 C9 AE D0 EA 60 |...............`|
000017B0: 60 D9 16 08 05 00 97 37 38 38 2C 35 32 3A 97 37 |`......788,52:.7|
000017C0: 39 32 2C 31 39 33 00 39 08 82 00 8F 20 20 28 43 |92,193.9.... (C|
000017D0: 29 20 44 41 54 41 42 41 53 45 20 53 4F 46 54 57 |) DATABASE SOFTW|
000017E0: 41 52 45 20 20 31 39 38 35 00 52 08 C2 00 97 20 |ARE 1985.R.... |
000017F0: 35 34 32 39 36 2C 31 35 3A 97 35 34 32 37 37 2C |54296,15:.54277,|
00001800: 36 34 00 6C 08 C3 00 97 20 35 34 32 37 38 2C 31 |64.l.... 54278,1|
00001810: 32 38 3A 97 35 34 32 37 33 2C 35 35 00 85 08 C4 |28:.54273,55....|
00001820: 00 97 20 35 34 32 37 32 2C 33 37 3A 3A 97 35 34 |.. 54272,37::.54|
00001830: 32 37 36 2C 30 00 A5 08 C5 00 86 20 42 24 28 32 |276,0...... B$(2|
00001840: 30 30 29 2C 53 28 31 30 29 2C 41 52 24 28 32 30 |00),S(10),AR$(20|
00001850: 30 2C 31 35 29 00 C0 08 C6 00 86 20 46 25 28 31 |0,15)...... F%(1|
00001860: 34 29 2C 4B 24 28 31 34 29 2C 46 24 28 31 34 29 |4),K$(14),F$(14)|
00001870: 00 D4 08 C7 00 99 C7 28 38 29 C7 28 31 34 29 3B |.......(8).(14);|
00001880: 22 93 22 3B 00 DE 08 C8 00 8D 31 E3 30 31 00 E8 |".";......1.01..|
00001890: 08 D2 00 8D 31 35 30 30 00 F2 08 DC 00 8D 32 E3 |....1500......2.|
000018A0: 30 62 32 00 1B 09 DD 00 99 22 13 22 3B C8 28 44 |0b2......".";.(D|
000018B0: 24 2C 31 38 29 3B 42 4C 24 3B 22 13 22 3B C8 28 |$,18);BL$;".";.(|
000018C0: 44 24 2C 32 32 29 3B A3 32 37 29 3B 00 3C 09 E1 |D$,22);.27);.<..|
000018D0: 00 8B 20 C6 28 53 24 29 B3 39 37 20 B0 20 C6 28 |.. .(S$).97 . .(|
000018E0: 53 24 29 B1 31 32 32 20 A7 20 32 33 30 00 6C 09 |S$).122 . 230.l.|
000018F0: E2 00 99 22 13 22 3B C8 28 44 24 2C 31 38 29 3B |...".";.(D$,18);|
00001900: A3 31 31 29 3B 22 D0 52 45 53 53 20 D3 C8 C9 C6 |.11);".RESS ....|
00001910: D4 A0 CC CF C3 CB 20 4B 45 59 20 21 22 00 9B 09 |...... KEY !"...|
00001920: E3 00 99 22 13 22 3B C8 28 44 24 2C 31 38 29 3B |...".";.(D$,18);|
00001930: 42 4C 24 3B 22 13 22 3B C8 28 44 24 2C 32 32 29 |BL$;".";.(D$,22)|
00001940: 3B A3 32 37 29 3B 3A 89 20 32 32 30 00 C0 09 E6 |;.27);:. 220....|
00001950: 00 8B 20 53 24 B3 22 41 22 20 B0 20 53 24 B1 22 |.. S$."A" . S$."|
00001960: 4B 22 20 A7 20 99 C7 28 32 30 29 3B 3A 89 32 32 |K" . ..(20);:.22|
00001970: 30 00 F0 09 F0 00 4B 24 B2 22 C6 49 4C 45 20 4E |0.....K$.".ILE N|
00001980: 4F 54 20 53 45 54 20 55 50 20 20 2D 20 20 D5 53 |OT SET UP - .S|
00001990: 45 20 4F 50 54 49 4F 4E 20 42 22 3A 49 25 B2 31 |E OPTION B":I%.1|
000019A0: 38 00 30 0A FA 00 8B 28 53 24 B2 22 43 22 B0 53 |8.0....(S$."C".S|
000019B0: 24 B2 22 44 22 B0 53 24 B2 22 4A 22 29 AF 46 25 |$."D".S$."J").F%|
000019C0: B2 30 A7 8D 33 35 30 30 3A 99 22 13 22 3B C8 28 |.0..3500:.".";.(|
000019D0: 44 24 2C 32 32 29 3B A3 32 37 29 3B 3A 89 32 32 |D$,22);.27);:.22|
000019E0: 30 00 54 0A 04 01 4B 24 B2 22 DA 45 52 4F 20 52 |0.T...K$.".ERO R|
000019F0: 45 43 4F 52 44 53 20 45 4E 54 45 52 45 44 22 3A |ECORDS ENTERED":|
00001A00: 49 25 B2 31 38 00 8B 0A 0E 01 8B 53 24 B1 22 44 |I%.18......S$."D|
00001A10: 22 AF 53 24 B3 22 4B 22 AF 52 25 B2 30 A7 8D 33 |".S$."K".R%.0..3|
00001A20: 35 30 30 3A 99 22 13 22 3B C8 28 44 24 2C 32 32 |500:.".";.(D$,22|
00001A30: 29 3B A3 32 37 29 3B 3A 89 32 32 30 00 CA 0A 2C |);.27);:.220...,|
00001A40: 01 91 20 C6 28 53 24 29 AB 36 34 20 8D 20 32 35 |.. .(S$).64 . 25|
00001A50: 30 30 2C 32 82 35 30 30 2C 36 33 34 30 30 2C 36 |00,2.500,63400,6|
00001A60: 30 30 2C 35 35 30 2C 37 30 30 2C 37 35 30 2C 38 |00,550,700,750,8|
00001A70: 30 30 2C 34 36 30 2C 39 30 30 00 D4 0A 36 01 89 |00,460,900...6..|
00001A80: 20 32 31 30 00 EA 0A 90 01 8F 20 22 20 C6 49 45 | 210...... " .IE|
00001A90: 4C 44 20 53 55 4D 4D 41 52 59 00 1C 0B 9A 01 99 |LD SUMMARY......|
00001AA0: 22 93 22 3B 22 C4 C5 C6 C9 CE C9 D4 C9 CF CE A0 |".";"...........|
00001AB0: CF C6 A0 C6 C9 C5 CC C4 3A 22 3B 3A 8B 20 46 25 |........:";:. F%|
00001AC0: B1 31 20 A7 20 99 22 9D D3 3A 22 3B 00 27 0B A4 |.1 . ."..:";.'..|
00001AD0: 01 8D 20 38 E3 30 60 A5 00 52 0B AE 01 4B 24 B2 |.. 8.0`..R...K$.|
00001AE0: 22 D0 52 45 53 53 20 D3 D0 C1 C3 C5 A0 46 4F 52 |".RESS ......FOR|
00001AF0: 20 4D 45 4E 55 2E 22 3A 49 25 B2 32 33 3A 8D 33 | MENU.":I%.23:.3|
00001B00: 35 30 30 00 6B 0B B8 01 A1 20 47 24 3A 8B 20 47 |500.k.... G$:. G|
00001B10: 24 B3 B1 22 20 22 20 A7 20 34 34 30 00 71 0B C2 |$.." " . 440.q..|
00001B20: 01 8E 00 83 0B CC 01 8F 22 20 20 D3 41 56 45 20 |........" .AVE |
00001B30: 46 49 4C 45 00 8E 0B D6 01 8D 20 37 35 30 30 00 |FILE...... 7500.|
00001B40: 94 0B E0 01 8E 00 A8 0B F4 01 8F 20 22 20 C1 44 |........... " .D|
00001B50: 44 20 52 45 43 4F 52 44 53 00 BF 0B FE 01 8B 20 |D RECORDS...... |
00001B60: 52 25 B1 B2 52 30 20 A7 20 99 C7 28 37 29 3A 8E |R%..R0 . ..(7):.|
00001B70: 00 DF 0B FF 01 8B 20 B8 28 38 29 B3 31 E3 30 3D |...... .(8).1.0=|
00001B80: 20 A7 20 52 4F B2 52 3A 99 20 C7 28 37 29 3A 8E | . RO.R:. .(7):.|
00001B90: 00 EC 0B 08 02 8D 20 39 32 30 30 3A 8E A2 60 96 |...... 9200:..`.|
00001BA0: 0C 26 02 8F 20 22 20 CC 49 53 54 20 52 45 43 4F |.&.. " .IST RECO|
00001BB0: 52 44 00 0B 0C 30 02 8D 20 38 31 30 30 00 11 0C |RD...0.. 8100...|
00001BC0: 3A 02 8E 00 27 0C 58 02 8F 20 22 20 CD 4F 44 49 |:...'.X.. " .ODI|
00001BD0: 46 59 20 52 45 43 4F 52 44 00 40 0C 62 02 99 22 |FY RECORD.@.b.."|
00001BE0: 93 CD CF C4 C9 C6 D9 A0 C1 A0 D2 C5 C3 CF D2 C4 |................|
00001BF0: 3A 22 00 7A 0C 6C 02 99 22 C9 4E 50 55 54 20 52 |:".z.l..".NPUT R|
00001C00: 45 43 4F 52 44 20 4E 55 4D 42 45 52 20 22 3B 3A |ECORD NUMBER ";:|
00001C10: 4F B2 34 3A 50 B2 31 3A 51 B2 52 25 3A 4D 43 B2 |O.4:P.1:Q.R%:MC.|
00001C20: 31 3A 8D 20 35 32 30 30 3A 42 B2 44 00 A3 0C 71 |1:. 5200:B.D...q|
00001C30: 02 99 22 13 11 11 F6 20 60 F0 22 3A 99 22 13 11 |..".... `.":."..|
00001C40: 11 22 3B 00 E4 0C 76 02 8D 20 39 35 30 30 3A 4B |.";...v.. 9500:K|
00001C50: 24 B2 22 28 CD 29 4F 44 49 46 59 20 41 20 52 45 |$."(.)ODIFY A RE|
00001C60: 43 4F 52 44 2C 20 28 D2 29 45 54 55 52 4E 20 54 |CORD, (.)ETURN T|
00001C70: 4F 20 4D 45 4E 55 22 3A 49 25 B2 32 32 3A 8D 20 |O MENU":I%.22:. |
00001C80: 33 35 30 30 00 0E 0D 80 02 A1 20 47 24 3A 47 24 |3500...... G$:G$|
00001C90: B2 C7 28 C6 28 47 24 AA 22 21 22 29 AF 39 35 29 |..(.(G$."!").95)|
00001CA0: 3A 8B 47 24 B2 22 4D 22 20 A7 20 36 31 30 00 22 |:.G$."M" . 610."|
00001CB0: 0D 8A 02 8B 20 47 24 B3 B1 22 52 22 20 A7 20 36 |.... G$.."R" . 6|
00001CC0: 34 30 00 28 0D 94 02 8E 00 3D 0D BC 02 8F 20 22 |40.(.....=.... "|
00001CD0: 20 C6 49 45 4C 44 20 53 45 41 52 43 48 00 48 0D | .IELD SEARCH.H.|
00001CE0: C6 02 8D 20 34 31 30 30 00 4E 0D D0 02 8E 00 64 |... 4100.N.....d|
00001CF0: 0D EE 02 8F 20 22 20 D2 45 50 4C 41 43 45 20 46 |.... " .EPLACE F|
00001D00: 49 45 4C 44 00 6F 0D F8 02 8D 20 36 31 30 30 00 |IELD.o.... 6100.|
00001D10: 75 0D 02 03 8E 00 82 0D 20 03 8F 20 22 20 D3 4F |u....... .. " .O|
00001D20: 52 54 00 8E 0D 2A 03 8D 20 31 E4 30 60 26 00 94 |RT...*.. 1.0`&..|
00001D30: 0D 34 03 8E 00 AC 0D 84 03 99 22 93 22 3B 3A 8B |.4........".";:.|
00001D40: 20 52 25 B3 B2 30 20 A7 20 39 36 30 00 E4 0D 8E | R%..0 . 960....|
00001D50: 03 99 22 13 E6 11 60 AE C4 4F 20 59 4F 55 20 57 |.."...`..O YOU W|
00001D60: 49 53 48 20 54 4F 20 D3 C1 D6 C5 20 54 48 45 20 |ISH TO .... THE |
00001D70: 44 41 54 41 20 46 49 4C 45 20 28 D9 2F CE 29 3F |DATA FILE (./.)?|
00001D80: 22 3B 00 0F 0E 98 03 A1 20 47 24 3A 47 24 B2 C7 |";...... G$:G$..|
00001D90: 28 C6 28 47 24 AA 22 21 22 29 AF 39 35 29 3A 8B |(.(G$."!").95):.|
00001DA0: 20 47 24 B2 22 4E 22 20 A7 20 39 35 30 00 23 0E | G$."N" . 950.#.|
00001DB0: A2 03 8B 20 47 24 B3 B1 22 59 22 20 A7 20 39 32 |... G$.."Y" . 92|
00001DC0: 30 00 2E 0E AC 03 8D 20 37 35 30 30 00 38 0E B6 |0...... 7500.8..|
00001DD0: 03 99 22 93 22 3B 00 43 0E C0 03 89 32 30 30 38 |..".";.C....2008|
00001DE0: 30 00 4E 0E E7 03 89 32 30 30 38 30 00 5F 0E E8 |0.N....20080._..|
00001DF0: 03 8F 20 49 4E 49 54 49 41 4C 49 53 45 00 82 0E |.. INITIALISE...|
00001E00: F2 03 44 24 B2 22 F9 11 2B 22 00 B4 0E FC 03 42 |..D$."..+".....B|
00001E10: 4C 24 B2 22 80 27 20 60 98 22 00 CA 0E 06 04 97 |L$.".' `."......|
00001E20: 35 33 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 |53280,0:.53281,0|
00001E30: 00 D8 0E 10 04 52 25 B2 30 3A 46 25 B2 30 00 0E |.....R%.0:F%.0..|
00001E40: 0F 1A 04 44 45 B2 30 3A 8F 20 22 20 D3 50 45 43 |...DE.0:. " .PEC|
00001E50: 49 46 59 20 44 45 56 49 43 45 20 46 4F 52 20 4F |IFY DEVICE FOR O|
00001E60: 55 54 50 55 54 20 44 55 52 49 4E 47 20 4C 49 53 |UTPUT DURING LIS|
00001E70: 54 49 4E 47 00 14 0F DA 05 8E 00 1A 0F DB 05 3A |TING...........:|
00001E80: 00 25 0F DC 05 8F 20 4D 45 4E 55 00 2B 0F E6 05 |.%.... MENU.+...|
00001E90: 8C 00 56 0F F0 05 99 22 93 22 3B A3 38 29 3B 22 |..V....".";.8);"|
00001EA0: 11 05 C4 A0 C1 A0 D4 A0 C1 A0 C2 A0 C1 A0 D3 A0 |................|
00001EB0: C5 E3 20 33 CD 20 C5 20 CE 20 D5 22 00 7F 0F FA |.. 3. . . ."....|
00001EC0: 05 99 A3 37 29 3B 22 FB 3D 62 15 11 11 22 00 AF |...7);".=b..."..|
00001ED0: 0F 04 06 81 41 B2 31 A4 31 31 3A 87 41 24 3A 99 |....A.1.11:.A$:.|
00001EE0: A3 31 30 29 3B 22 9E 22 3B C7 28 39 36 AA 41 29 |.10);".";.(96.A)|
00001EF0: 3B A3 31 35 29 3B 22 1E 22 3B 41 24 3A 82 00 E1 |;.15);".";A$:...|
00001F00: 0F 09 06 49 25 B2 31 38 3A 4B 24 B2 22 9E 22 AA |...I%.18:K$.".".|
00001F10: C4 28 52 25 29 AA 22 20 D2 C5 C3 CF D2 C4 28 D3 |.(R%)." ......(.|
00001F20: 29 20 C5 CE D4 C5 D2 C5 C4 22 3A 8D 33 35 30 30 |) .......":.3500|
00001F30: 00 1D 10 0A 06 8B 20 46 25 B3 B1 30 20 A7 49 25 |...... F%..0 .I%|
00001F40: B2 32 30 3A 4B 24 B2 22 9E CD C1 D8 C9 CD D5 CD |.20:K$."........|
00001F50: 20 CF C6 20 22 AA C4 28 52 30 29 AA 22 20 D2 C5 | .. "..(R0)." ..|
00001F60: C3 CF D2 C4 D3 22 3A 8D 33 35 30 30 00 5B 10 0D |.....":.3500.[..|
00001F70: 06 99 22 13 22 3B C8 28 44 24 2C 32 34 29 3B 22 |..".";.(D$,24);"|
00001F80: 05 CD C9 CE C9 A0 CF C6 C6 C9 C3 C5 20 20 28 43 |............ (C|
00001F90: 29 20 C4 C1 D4 C1 C2 C1 D3 C5 20 D3 CF C6 D4 D7 |) ........ .....|
00001FA0: C1 D2 C5 20 31 39 38 35 22 3B 00 88 10 0E 06 99 |... 1985";......|
00001FB0: 22 13 22 3B C8 28 44 24 2C 32 32 29 3B A3 31 30 |".";.(D$,22);.10|
00001FC0: 29 3B 22 05 D3 C5 CC C5 C3 D4 20 CF D0 D4 C9 CF |);"....... .....|
00001FD0: CE 20 2E 2E 20 22 3B 00 8E 10 18 06 8E 00 A2 10 |. .. ";.........|
00001FE0: D0 07 8F 20 47 45 54 20 4B 45 59 20 49 4E 50 55 |... GET KEY INPU|
00001FF0: 54 00 C2 10 E4 07 A1 20 53 24 3A 99 22 12 20 9D |T...... S$:.". .|
00002000: 92 22 3B 3A 8B 53 24 B2 22 22 A7 53 24 B2 22 21 |.";:.S$."".S$."!|
00002010: 22 00 D5 10 E9 07 53 24 B2 C7 28 C6 28 53 24 29 |".....S$..(.(S$)|
00002020: AF 39 35 29 00 17 11 EE 07 8B 28 53 24 B3 22 41 |.95)......(S$."A|
00002030: 22 B0 53 24 B1 22 4B 22 29 AF 28 53 24 B3 22 30 |".S$."K").(S$."0|
00002040: 22 B0 53 24 B1 22 39 22 29 AF 28 53 24 B3 22 C1 |".S$."9").(S$.".|
00002050: 22 B0 53 24 B1 22 CB 22 29 A7 99 22 20 9D 22 3B |".S$.".").." .";|
00002060: 3A 89 32 30 32 30 00 3C 11 F3 07 8B 53 24 B1 B2 |:.2020.<....S$..|
00002070: 22 C1 22 AF 53 24 B3 B2 22 CB 22 A7 53 24 B2 C7 |".".S$..".".S$..|
00002080: 28 C6 28 53 24 29 AB 31 32 38 29 00 45 11 F8 07 |(.(S$).128).E...|
00002090: 99 53 24 3B 00 4B 11 02 08 8E 00 60 11 C4 09 8F |.S$;.K.....`....|
000020A0: 20 53 45 54 55 50 20 4E 45 57 20 46 49 4C 45 00 | SETUP NEW FILE.|
000020B0: 7B 11 C9 09 81 20 41 38 B2 31 20 A4 20 31 34 3A |{.... A8.1 . 14:|
000020C0: 46 25 28 41 38 29 B2 30 3A 82 00 94 11 CE 09 53 |F%(A8).0:......S|
000020D0: 31 24 B2 22 22 3A 8B 52 25 B1 30 20 A7 20 8D 33 |1$."":.R%.0 . .3|
000020E0: E3 30 39 00 A6 11 D3 09 8B 20 53 31 24 B2 22 4E |.09...... S1$."N|
000020F0: 22 20 A7 20 8E 00 B0 11 D8 09 8D 31 E3 30 32 00 |" . .......1.02.|
00002100: C5 11 E2 09 8B 20 53 24 B2 22 41 22 20 A7 20 8D |..... S$."A" . .|
00002110: 39 E3 30 60 F0 00 DA 11 EC 09 8B 20 53 24 B2 22 |9.0`....... S$."|
00002120: 42 22 20 A7 20 8D 34 35 30 30 00 E0 11 F6 09 8E |B" . .4500......|
00002130: 00 FB 11 B8 0B 8F 20 41 52 45 20 59 4F 55 20 53 |...... ARE YOU S|
00002140: 55 52 45 20 4D 45 53 53 41 47 45 00 2B 12 C2 0B |URE MESSAGE.+...|
00002150: 99 22 13 22 3B A3 39 29 3B C8 28 44 24 2C 31 38 |.".";.9);.(D$,18|
00002160: 29 3B 22 C1 52 45 20 59 4F 55 20 53 55 52 45 20 |);".RE YOU SURE |
00002170: 3F 20 20 28 D9 2F CE 29 20 22 3B 00 4D 12 CC 0B |? (./.) ";.M...|
00002180: A1 53 31 24 3A 99 22 12 20 9D 92 22 3B 3A 8B 53 |.S1$:.". ..";:.S|
00002190: 31 24 B2 22 22 A7 53 31 24 B2 22 21 22 00 62 12 |1$."".S1$."!".b.|
000021A0: D1 0B 53 31 24 B2 C7 28 C6 28 53 31 24 29 AF 39 |..S1$..(.(S1$).9|
000021B0: 35 29 00 8B 12 D6 0B 8B 20 53 31 24 B3 B1 22 59 |5)...... S1$.."Y|
000021C0: 22 20 AF 20 53 31 24 B3 B1 22 4E 22 20 A7 20 99 |" . S1$.."N" . .|
000021D0: 22 20 9D 22 3B 3A 89 33 30 32 30 00 95 12 E0 0B |" .";:.3020.....|
000021E0: 99 53 31 24 3B 00 9B 12 EA 0B 8E 00 D7 12 AC 0D |.S1$;...........|
000021F0: 8F 20 50 52 49 4E 54 54 41 42 28 59 29 20 53 45 |. PRINTTAB(Y) SE|
00002200: 43 54 49 4F 4E F1 20 61 25 53 50 45 43 49 46 59 |CTION. a%SPECIFY|
00002210: 20 4B 24 20 41 4E 44 20 49 25 00 F1 12 B6 0D 99 | K$ AND I%......|
00002220: 22 13 22 3B C8 28 44 24 2C 49 25 29 3B 42 4C 24 |".";.(D$,I%);BL$|
00002230: 3B 22 13 22 00 04 13 C0 0D 4B B2 28 34 30 AB C3 |;".".....K.(40..|
00002240: 28 4B 24 29 29 AD 32 00 1E 13 CA 0D 99 22 13 22 |(K$)).2......"."|
00002250: 3B C8 28 44 24 2C 49 25 29 3B A3 4B 29 3B 4B 24 |;.(D$,I%);.K);K$|
00002260: 3B 00 32 13 CF 0D 8B 20 49 25 B2 32 34 20 A7 20 |;.2.... I%.24 . |
00002270: 99 22 13 22 3B 00 38 13 D0 0D 99 00 3E 13 D4 0D |.".";.8.....>...|
00002280: 8E 00 4D 13 A0 0F 8F 20 50 52 4F 43 20 44 45 4C |..M.... PROC DEL|
00002290: 00 55 13 AA 0F 42 B2 30 00 75 13 B4 0F 42 B2 42 |.U...B.0.u...B.B|
000022A0: AA 31 3A 8B 20 41 52 24 28 42 2C 31 29 B3 B1 22 |.1:. AR$(B,1).."|
000022B0: 22 20 A7 20 34 30 33 30 00 AF 13 B9 0F 81 41 38 |" . 4030......A8|
000022C0: B2 42 A4 52 25 3A 81 41 39 B2 31 A4 46 25 3A 41 |.B.R%:.A9.1.F%:A|
000022D0: 52 24 28 41 38 2C 41 39 29 B2 41 52 24 28 41 38 |R$(A8,A9).AR$(A8|
000022E0: AA 31 2C 41 39 29 3A 82 3A 82 3A 56 25 B2 56 25 |.1,A9):.:.:V%.V%|
000022F0: AB 31 00 C1 13 BA 0F 52 25 B2 52 25 AB 31 3A 42 |.1.....R%.R%.1:B|
00002300: B2 42 AB 31 00 D3 13 BE 0F 8B 20 42 B1 52 25 20 |.B.1...... B.R% |
00002310: A7 20 56 25 B2 30 00 E5 13 C8 0F 8B 20 56 25 B1 |. V%.0...... V%.|
00002320: 30 20 A7 20 34 30 32 30 00 EB 13 D2 0F 8E A2 60 |0 . 4020.......`|
00002330: 3D 14 04 10 8F 20 22 20 C6 49 45 4C 44 20 53 45 |=.... " .IELD SE|
00002340: 41 52 43 48 00 22 14 0E 10 99 22 93 C6 C9 C5 CC |ARCH."....".....|
00002350: C4 A0 D3 C5 C1 D2 C3 C8 3A 22 3A 8B 46 25 B3 31 |........:":.F%.1|
00002360: 20 A7 34 31 34 30 00 62 14 18 10 8D 20 38 E3 30 | .4140.b.... 8.0|
00002370: 60 8A 3A 99 22 13 22 3B C8 28 44 24 2C 31 39 29 |`.:.".";.(D$,19)|
00002380: 3B 22 D3 45 41 52 43 48 20 4F 4E 20 57 48 49 43 |;".EARCH ON WHIC|
00002390: 48 20 46 49 45 4C 44 20 28 20 31 20 2D 22 3B 46 |H FIELD ( 1 -";F|
000023A0: 25 3B 22 29 3F 22 3B 00 8F 14 22 10 4F B2 31 3A |%;")?";...".O.1:|
000023B0: 50 B2 31 3A 51 B2 46 25 3A 4D 43 B2 31 3A 8D 35 |P.1:Q.F%:MC.1:.5|
000023C0: 32 30 30 3A 4A B2 44 3A 99 22 93 22 3B 3A 89 20 |200:J.D:.".";:. |
000023D0: 34 31 35 30 00 AE 14 2C 10 4A B2 31 3A 99 22 D3 |4150...,.J.1:.".|
000023E0: 45 41 52 43 48 20 4F 4E 20 46 49 45 4C 44 20 4F |EARCH ON FIELD O|
000023F0: 4E 45 22 00 CD 14 36 10 99 22 D4 48 02 49 53 20 |NE"...6..".H.IS |
00002400: 37 41 20 22 3B 3A 41 24 B2 22 53 54 52 49 4E 47 |7A ";:A$."STRING|
00002410: 22 00 03 15 3B 10 87 20 02 46 24 2C 60 57 46 24 |"...;.. .F$,`WF$|
00002420: 3A 8B 20 C8 28 46 24 28 4A 29 2C 31 29 B2 22 4E |:. .(F$(J),1)."N|
00002430: 22 20 A7 20 41 24 B2 22 4E 55 4D 45 52 49 43 22 |" . A$."NUMERIC"|
00002440: 3A 89 20 34 31 36 30 00 3C 15 3C 10 4C B2 32 3A |:. 4160.<.<.L.2:|
00002450: 43 B2 31 3A 99 41 24 3B 22 20 46 49 45 4C 44 3A |C.1:.A$;" FIELD:|
00002460: 13 1D 1D 22 3B C8 28 44 24 2C 34 AA 43 AC 33 29 |...";.(D$,4.C.3)|
00002470: 3B 46 24 3B 22 E3 11 61 62 22 3A 89 20 34 32 30 |;F$;"..ab":. 420|
00002480: 30 00 46 15 40 10 99 20 41 24 3B 00 7A 15 4A 10 |0.F.@.. A$;.z.J.|
00002490: 99 22 20 46 49 45 4C 44 3A 22 3A 87 20 4C 3A 81 |." FIELD:":. L:.|
000024A0: 20 43 B2 31 A4 4C 3A 87 20 46 24 3A 99 22 13 1D | C.1.L:. F$:."..|
000024B0: 1D 22 3B C8 28 44 24 2C 34 AA 43 AC 33 29 3B 00 |.";.(D$,4.C.3);.|
000024C0: 96 15 54 10 99 22 3C 22 3B C7 28 39 36 AA 43 29 |..T.."<";.(96.C)|
000024D0: 3B 22 3E 20 20 22 3B 46 24 3A 82 00 BA 15 59 10 |;"> ";F$:....Y.|
000024E0: 4B 24 B2 22 D3 45 4C 45 43 54 20 4F 50 54 49 4F |K$.".ELECT OPTIO|
000024F0: 4E 22 3A 49 25 B2 31 39 3A 8D 20 33 35 30 30 00 |N":I%.19:. 3500.|
00002500: D2 15 5E 10 A1 20 47 24 3A 8B 20 47 24 B2 22 22 |..^.. G$:. G$.""|
00002510: 20 A7 20 34 31 39 30 00 E5 15 61 10 47 24 B2 C7 | . 4190...a.G$..|
00002520: 28 C6 28 47 24 29 AF 39 35 29 00 02 16 63 10 43 |(.(G$).95)...c.C|
00002530: B2 C6 28 47 24 29 AB 36 34 3A 8B 43 B3 31 B0 43 |..(G$).64:.C.1.C|
00002540: B1 4C A7 34 31 39 30 00 39 16 68 10 99 22 D3 45 |.L.4190.9.h..".E|
00002550: 41 52 43 48 20 22 3B 3A 41 24 B2 22 53 54 52 49 |ARCH ";:A$."STRI|
00002560: 4E 47 20 3F 3A 20 22 3A 8B 20 4C B2 34 20 A7 20 |NG ?: ":. L.4 . |
00002570: 41 24 B2 22 56 41 4C 55 45 20 3F 3A 20 22 00 56 |A$."VALUE ?: ".V|
00002580: 16 72 10 8B 20 43 B2 34 20 A7 20 41 24 B2 22 56 |.r.. C.4 . A$."V|
00002590: 41 4C 55 45 20 41 20 3F 3A 20 22 00 72 16 77 10 |ALUE A ?: ".r.w.|
000025A0: 4D 41 24 B2 22 FF 22 3A 8B 20 43 B2 31 20 A7 20 |MA$.".":. C.1 . |
000025B0: 4D 41 24 B2 22 DA 22 00 9F 16 7C 10 99 20 41 24 |MA$."."...|.. A$|
000025C0: 3B 3A 4D 49 24 B2 22 20 22 3A 4D 49 B2 31 3A 4D |;:MI$." ":MI.1:M|
000025D0: 41 B2 46 25 28 4A 29 3A 8D 20 35 E3 30 61 21 3A |A.F%(J):. 5.0a!:|
000025E0: 46 24 B2 53 24 00 DC 16 86 10 8B 20 4C B3 B1 32 |F$.S$...... L..2|
000025F0: 20 A7 44 31 B2 C5 28 46 24 29 3A 8B 20 43 B2 34 | .D1..(F$):. C.4|
00002600: 20 A7 99 3A 99 22 56 41 4C 55 45 20 42 20 3F 3A | ..:."VALUE B ?:|
00002610: 20 22 3B 3A 4F B2 46 25 28 4A 29 3A 50 B2 AB 32 | ";:O.F%(J):P..2|
00002620: 45 39 00 01 17 87 10 8B 4C B3 B1 32 AF 43 B2 34 |E9......L..2.C.4|
00002630: A7 51 B2 32 45 39 3A 4D 43 B2 31 3A 8D 20 35 32 |.Q.2E9:MC.1:. 52|
00002640: 30 30 3A 50 31 B2 44 00 25 17 88 10 4B 24 B2 22 |00:P1.D.%...K$."|
00002650: 22 3A 49 25 B2 32 31 3A 8D 20 33 35 30 30 3A 49 |":I%.21:. 3500:I|
00002660: 25 B2 32 32 3A 8D 20 33 35 30 30 00 3B 17 90 10 |%.22:. 3500.;...|
00002670: 45 25 B2 30 3A 53 B2 30 3A 81 20 42 B2 31 A4 52 |E%.0:S.0:. B.1.R|
00002680: 25 00 6E 17 9A 10 4B 24 B2 22 D3 45 41 52 43 48 |%.n...K$.".EARCH|
00002690: 49 4E 47 22 3A 49 25 B2 31 39 3A 8D 20 33 35 30 |ING":I%.19:. 350|
000026A0: 30 3A 4B 24 B2 22 22 3A 49 25 B2 32 30 3A 8D 20 |0:K$."":I%.20:. |
000026B0: 33 35 30 30 00 91 17 A4 10 8B 20 43 B2 31 20 A7 |3500...... C.1 .|
000026C0: 20 8B 20 41 52 24 28 42 2C 4A 29 B2 46 24 20 A7 | . AR$(B,J).F$ .|
000026D0: 20 8D 20 34 34 30 30 00 C9 17 AE 10 8B 43 B2 32 | . 4400......C.2|
000026E0: 20 AF 20 4C B2 32 20 A7 20 99 22 C3 C1 CE 27 D4 | . L.2 . ."...'.|
000026F0: A0 C4 CF A0 C1 D4 A0 CC C9 CE C5 A0 34 32 37 30 |............4270|
00002700: E3 20 26 C8 C5 CC D0 A0 A0 E3 21 61 85 22 3A 80 |. &.......!a.":.|
00002710: 00 F6 17 B8 10 8B 20 43 B2 32 20 AF 20 4C B3 B1 |...... C.2 . L..|
00002720: 32 20 A7 20 8B 20 C5 28 41 52 24 28 42 2C 4A 29 |2 . . .(AR$(B,J)|
00002730: 29 B1 44 31 20 A7 20 8D 20 34 34 30 30 00 23 18 |).D1 . . 4400.#.|
00002740: C2 10 8B 20 43 B2 33 20 AF 20 4C B3 B1 32 20 A7 |... C.3 . L..2 .|
00002750: 20 8B 20 C5 28 41 52 24 28 42 2C 4A 29 29 B3 44 | . .(AR$(B,J)).D|
00002760: 31 20 A7 20 8D 20 34 34 30 30 00 5F 18 CC 10 8B |1 . . 4400._....|
00002770: 20 43 B2 34 20 AF 20 4C B3 B1 32 20 A7 20 8B 20 | C.4 . L..2 . . |
00002780: C5 28 41 52 24 28 42 2C 4A 29 29 B1 44 31 20 AF |.(AR$(B,J)).D1 .|
00002790: 20 C5 28 41 52 24 28 42 2C 4A 29 29 B3 50 31 20 | .(AR$(B,J)).P1 |
000027A0: A7 8D 34 34 30 30 00 A1 18 D6 10 82 3A 8B 20 45 |..4400......:. E|
000027B0: 25 B2 30 A7 4B 24 B2 22 D3 45 41 52 43 48 20 43 |%.0.K$.".EARCH C|
000027C0: 4F 4D 50 4C 45 54 45 44 2C 20 4E 4F 20 52 45 43 |OMPLETED, NO REC|
000027D0: 4F 52 44 53 20 46 4F 55 4E 44 22 3A 49 25 B2 31 |ORDS FOUND":I%.1|
000027E0: 39 3A 8D 20 33 35 30 30 00 E5 18 E0 10 8B 20 45 |9:. 3500...... E|
000027F0: 25 B2 31 20 AF 47 24 B3 B1 22 4D 22 A7 4B 24 B2 |%.1 .G$.."M".K$.|
00002800: 22 CE 4F 20 4D 4F 52 45 20 45 4E 54 52 49 45 53 |".O MORE ENTRIES|
00002810: 20 46 4F 55 4E 44 20 54 4F 20 4D 41 54 43 48 22 | FOUND TO MATCH"|
00002820: 3A 49 25 B2 31 39 3A 8D 33 35 30 30 00 07 19 E5 |:I%.19:.3500....|
00002830: 10 97 35 34 32 37 36 2C 31 37 3A 81 41 35 B2 31 |..54276,17:.A5.1|
00002840: A4 35 30 3A 82 3A 97 35 34 32 37 36 2C 30 00 3A |.50:.:.54276,0.:|
00002850: 19 EA 10 A1 53 24 3A 53 24 B2 C7 28 C6 28 53 24 |....S$:S$..(.(S$|
00002860: AA 22 21 22 29 AF 39 35 29 3A 8B 20 53 24 B2 22 |."!").95):. S$."|
00002870: 22 AF 20 47 24 B3 B1 22 4D 22 20 A7 20 34 33 33 |". G$.."M" . 433|
00002880: 30 00 4E 19 EF 10 8B 20 56 25 B1 30 20 A7 20 8D |0.N.... V%.0 . .|
00002890: 20 34 E3 30 28 00 59 19 F0 10 8D 31 38 E3 30 61 | 4.0(.Y....18.0a|
000028A0: 13 00 5F 19 F4 10 8E 00 79 19 30 11 8F 20 22 20 |.._.....y.0.. " |
000028B0: D3 45 41 52 43 48 20 53 55 43 43 45 53 53 46 55 |.EARCH SUCCESSFU|
000028C0: 4C 00 A6 19 3A 11 45 25 B2 31 3A 99 22 93 22 3B |L...:.E%.1:.".";|
000028D0: 3A 8D 38 36 30 30 3A 8D 38 37 30 30 3A 8B 20 47 |:.8600:.8700:. G|
000028E0: 24 B2 22 4D 22 20 A7 20 42 B2 52 25 3A 8E 00 D9 |$."M" . B.R%:...|
000028F0: 19 44 11 8B 20 53 B2 31 20 A7 20 4B 24 B2 22 28 |.D.. S.1 . K$."(|
00002900: CD 29 45 4E 55 2C 20 28 CE 29 45 58 54 20 52 45 |.)ENU, (.)EXT RE|
00002910: 43 4F 52 44 22 3A 49 25 B2 31 39 3A 8D 33 35 30 |CORD":I%.19:.350|
00002920: 30 00 E8 19 49 11 8B 20 53 B3 B1 31 20 A7 20 8E |0...I.. S..1 . .|
00002930: 00 15 1A 4E 11 A1 20 47 24 3A 47 24 B2 C7 28 C6 |...N.. G$:G$..(.|
00002940: 28 47 24 AA 22 21 22 29 AF 39 35 29 3A 8B 47 24 |(G$."!").95):.G$|
00002950: B2 22 4D 22 20 A7 20 42 B2 52 25 3A 8E 00 26 1A |."M" . B.R%:..&.|
00002960: 58 11 8B 20 47 24 B2 22 4E 22 20 A7 20 8E 00 31 |X.. G$."N" . ..1|
00002970: 1A 62 11 89 20 34 34 33 30 00 53 1A 94 11 8F 20 |.b.. 4430.S.... |
00002980: 22 20 D3 45 54 20 55 50 20 46 49 4C 45 20 46 52 |" .ET UP FILE FR|
00002990: 4F 4D 20 4B 45 59 42 4F 41 52 44 00 77 1A 9E 11 |OM KEYBOARD.w...|
000029A0: 99 22 93 22 3B A6 31 31 29 3B 22 D3 20 C5 20 D4 |.".";.11);". . .|
000029B0: 20 D5 20 D0 E3 20 34 CD 20 CF 20 C4 20 C5 22 00 | . .. 4. . . .".|
000029C0: 99 1A A8 11 99 A6 31 30 29 3B 22 F5 3D 60 B9 22 |......10);".=`."|
000029D0: 00 B6 1A B2 11 99 22 13 22 3B C8 28 44 24 2C 38 |......".";.(D$,8|
000029E0: 29 3B 22 28 31 20 54 4F 20 31 34 29 22 00 E7 1A |);"(1 TO 14)"...|
000029F0: BC 11 99 22 13 22 3B C8 28 44 24 2C 36 29 3B 22 |...".";.(D$,6);"|
00002A00: C8 4F 57 20 4D 41 4E 59 20 46 49 45 4C 44 53 20 |.OW MANY FIELDS |
00002A10: 50 45 52 20 52 45 43 4F 52 44 3F 20 22 3B 00 08 |PER RECORD? ";..|
00002A20: 1B C6 11 4F B2 32 3A 50 B2 31 3A 51 B2 31 34 3A |...O.2:P.1:Q.14:|
00002A30: 4D 43 B2 31 3A 8D 35 32 30 30 3A 46 25 B2 44 00 |MC.1:.5200:F%.D.|
00002A40: 18 1B CB 11 81 20 41 39 B2 31 20 A4 20 46 25 00 |..... A9.1 . F%.|
00002A50: 49 1B D0 11 99 22 93 22 3B A3 31 30 29 3B 22 C4 |I....".";.10);".|
00002A60: C5 C6 C9 CE C9 D4 C9 CF CE A0 CF C6 A0 C6 C9 C5 |................|
00002A70: CC C4 22 3B 3A 8B 46 25 B1 31 A7 99 22 D3 22 3B |..";:.F%.1..".";|
00002A80: 00 66 1B DA 11 99 22 13 E4 11 60 45 C6 49 45 4C |.f...."...`E.IEL|
00002A90: 44 20 CE 55 4D 42 45 52 20 22 3B 41 39 00 79 1B |D .UMBER ";A9.y.|
00002AA0: E4 11 58 B2 32 3A 59 B2 37 3A 8D 20 35 35 30 30 |..X.2:Y.7:. 5500|
00002AB0: 00 7F 1B EE 11 82 00 9D 1B F3 11 99 22 93 C6 C9 |............"...|
00002AC0: C5 CC C4 20 D3 D5 CD CD C1 D2 D9 3A 22 3B 3A 8D |... .......:";:.|
00002AD0: 38 E3 30 61 19 00 CD 1B F8 11 99 22 13 22 3B A3 |8.0a.......".";.|
00002AE0: 39 29 3B C8 28 44 24 2C 32 34 29 3B 22 C9 53 20 |9);.(D$,24);".S |
00002AF0: 54 48 49 53 20 43 4F 52 52 45 43 54 20 28 D9 2F |THIS CORRECT (./|
00002B00: CE 29 3F 22 3B 00 0F 1C 02 12 A1 47 24 3A 47 24 |.)?";......G$:G$|
00002B10: B2 C7 28 C6 28 47 24 AA 22 21 22 29 AF 39 35 29 |..(.(G$."!").95)|
00002B20: 3A 99 22 12 20 92 9D 22 3B 3A 8B 47 24 B3 B1 22 |:.". ..";:.G$.."|
00002B30: 59 22 AF 47 24 B3 B1 22 4E 22 A7 99 22 20 9D 22 |Y".G$.."N".." ."|
00002B40: 3B 3A 89 34 36 31 30 00 23 1C 0C 12 8B 20 47 24 |;:.4610.#.... G$|
00002B50: B2 22 59 22 20 A7 20 34 37 30 30 00 53 1C 16 12 |."Y" . 4700.S...|
00002B60: 99 22 13 22 3B A3 39 29 3B C8 28 44 24 2C 32 34 |.".";.9);.(D$,24|
00002B70: 29 3B 22 C3 4F 52 52 45 43 54 20 57 48 49 43 48 |);".ORRECT WHICH|
00002B80: 20 46 49 45 4C 44 20 3F 20 22 3B 00 8C 1C 20 12 | FIELD ? ";... .|
00002B90: 4F B2 32 3A 50 B2 31 3A 51 B2 46 25 3A 4D 43 B2 |O.2:P.1:Q.F%:MC.|
00002BA0: 31 3A 8D 35 32 30 30 3A 99 22 13 22 3B C8 28 44 |1:.5200:.".";.(D|
00002BB0: 24 2C 32 34 29 3B A3 39 29 3B C8 28 42 4C 24 2C |$,24);.9);.(BL$,|
00002BC0: 32 35 29 3B 00 A4 1C 2A 12 41 39 B2 44 3A 58 B2 |25);...*.A9.D:X.|
00002BD0: 32 3A 59 B2 31 39 3A 8D 35 35 30 30 00 AE 1C 34 |2:Y.19:.5500...4|
00002BE0: 12 89 34 35 39 35 00 B9 1C 5C 12 8D 20 37 E3 30 |..4595...\.. 7.0|
00002BF0: 62 33 00 BF 1C 70 12 8E 00 DC 1C 88 13 8F 20 44 |b3...p........ D|
00002C00: 45 46 46 4E 20 49 28 4D 49 24 2C 4D 41 24 2C 4D |EFFN I(MI$,MA$,M|
00002C10: 49 2C 4D 41 29 00 E6 1C 92 13 53 24 B2 22 22 00 |I,MA).....S$."".|
00002C20: F8 1C 9C 13 A1 20 47 24 3A 99 22 12 20 92 9D 22 |..... G$:.". .."|
00002C30: 3B 00 30 1D 9D 13 8B 20 47 24 B2 22 9D 22 B0 20 |;.0.... G$.".". |
00002C40: 47 24 B2 22 1D 22 20 B0 20 47 24 B2 22 11 22 20 |G$."." . G$."." |
00002C50: B0 20 47 24 B2 22 91 22 20 B0 20 47 24 B2 C7 28 |. G$."." . G$..(|
00002C60: 33 34 29 A7 20 35 30 32 30 00 47 1D A1 13 8B 20 |34). 5020.G.... |
00002C70: 47 24 B2 C7 28 31 34 37 29 20 A7 20 35 30 32 30 |G$..(147) . 5020|
00002C80: 00 62 1D A2 13 8B 20 47 24 B2 C7 28 31 34 31 29 |.b.... G$..(141)|
00002C90: 20 A7 20 47 24 B2 C7 28 31 33 29 00 7D 1D A3 13 | . G$..(13).}...|
00002CA0: 8B 20 47 24 B2 C7 28 31 34 38 29 20 A7 20 47 24 |. G$..(148) . G$|
00002CB0: B2 C7 28 32 30 29 00 B7 1D A6 13 8B 28 47 24 B1 |..(20)......(G$.|
00002CC0: B2 4D 49 24 AF 47 24 B3 B2 4D 41 24 AF C3 28 53 |.MI$.G$..MA$..(S|
00002CD0: 24 29 B3 4D 41 29 B0 28 47 24 B2 C7 28 31 33 29 |$).MA).(G$..(13)|
00002CE0: AF C3 28 53 24 29 B1 B2 4D 49 29 A7 35 30 36 30 |..(S$)..MI).5060|
00002CF0: 00 C2 1D AB 13 99 22 20 9D 22 3B 00 03 1E B0 13 |......" .";.....|
00002D00: 8B 28 47 24 B2 C7 28 32 30 29 AF C3 28 53 24 29 |.(G$..(20)..(S$)|
00002D10: B3 B1 30 29 B0 28 47 24 B2 22 20 22 AF C3 28 53 |..0).(G$." "..(S|
00002D20: 24 29 B3 B1 30 AF C3 28 53 24 29 B3 4D 41 AF 44 |$)..0..(S$).MA.D|
00002D30: B3 B1 AB 32 35 35 29 A7 35 30 36 30 00 0D 1E BA |...255).5060....|
00002D40: 13 89 35 30 32 30 00 18 1E C4 13 99 22 20 9D 22 |..5020......" ."|
00002D50: 3B 00 2A 1E C9 13 53 24 B2 53 24 AA 47 24 3A 43 |;.*...S$.S$.G$:C|
00002D60: 25 B2 30 00 3F 1E CE 13 8B 47 24 B2 C7 28 32 30 |%.0.?....G$..(20|
00002D70: 29 20 A7 20 43 25 B2 32 00 54 1E D8 13 8B 47 24 |) . C%.2.T....G$|
00002D80: B2 C7 28 31 33 29 20 A7 20 43 25 B2 31 00 6A 1E |..(13) . C%.1.j.|
00002D90: DD 13 53 24 B2 C8 28 53 24 2C C3 28 53 24 29 AB |..S$..(S$,.(S$).|
00002DA0: 43 25 29 00 81 1E E2 13 8B 20 47 24 B3 B1 C7 28 |C%)...... G$...(|
00002DB0: 31 33 29 20 A7 20 99 47 24 3B 00 A1 1E EC 13 8B |13) . .G$;......|
00002DC0: 20 C3 28 53 24 29 B3 B2 4D 41 AF 47 24 B3 B1 C7 | .(S$)..MA.G$...|
00002DD0: 28 31 33 29 20 A7 35 30 32 30 00 A7 1E F6 13 8E |(13) .5020......|
00002DE0: 00 BF 1E 50 14 8F 20 44 45 46 46 4E 20 52 28 4F |...P.. DEFFN R(O|
00002DF0: 2C 50 2C 51 2C 4D 43 29 00 CA 1E 5A 14 44 B2 AB |,P,Q,MC)...Z.D..|
00002E00: 32 35 35 00 F7 1E 64 14 4D 49 24 B2 22 2D 22 3A |255...d.MI$."-":|
00002E10: 4D 41 24 B2 22 39 22 3A 4D 49 B2 4D 43 3A 4D 41 |MA$."9":MI.MC:MA|
00002E20: B2 4F 3A 8D 35 E3 30 60 B3 3A 44 B2 C5 28 53 24 |.O:.5.0`.:D..(S$|
00002E30: 29 00 27 1F 6E 14 8B 28 44 B3 50 20 B0 20 44 B1 |).'.n..(D.P . D.|
00002E40: 51 29 20 AF 20 53 24 B3 B1 22 22 20 A7 81 41 B2 |Q) . S$.."" ..A.|
00002E50: 31 A4 C3 28 53 24 29 3A 99 C7 28 32 30 29 3B 3A |1..(S$):..(20);:|
00002E60: 82 00 3E 1F 78 14 8B 20 44 B3 50 20 B0 20 44 B1 |..>.x.. D.P . D.|
00002E70: 51 20 A7 20 35 32 32 30 00 44 1F 82 14 8E 00 5E |Q . 5220.D.....^|
00002E80: 1F 7C 15 8F 20 49 4E 50 55 54 20 46 49 45 4C 44 |.|.. INPUT FIELD|
00002E90: 20 44 45 54 41 49 4C 53 00 80 1F 86 15 99 22 13 | DETAILS......".|
00002EA0: 22 3B C8 28 44 24 2C 59 29 3B 22 20 C6 49 45 4C |";.(D$,Y);" .IEL|
00002EB0: 44 20 54 49 54 4C 45 20 22 3B 00 A5 1F 90 15 4D |D TITLE ";.....M|
00002EC0: 49 24 B2 22 20 22 3A 4D 41 24 B2 22 FF 22 3A 4D |I$." ":MA$.".":M|
00002ED0: 49 B2 31 3A 4D 41 B2 31 33 3A 8D 35 E3 30 62 2D |I.1:MA.13:.5.0b-|
00002EE0: 00 C1 1F 9A 15 8B 20 C3 28 53 24 29 B1 56 56 20 |...... .(S$).VV |
00002EF0: A7 20 56 56 B2 C3 28 53 24 29 AA 31 00 CF 1F A4 |. VV..(S$).1....|
00002F00: 15 46 24 28 41 39 29 B2 53 24 00 F8 1F AE 15 99 |.F$(A9).S$......|
00002F10: 22 13 22 3B C8 28 44 24 2C 59 AA 58 29 3B 22 20 |".";.(D$,Y.X);" |
00002F20: C6 49 45 4C 44 20 54 59 50 45 20 28 D3 2F CE 29 |.IELD TYPE (./.)|
00002F30: 20 22 3B 00 3A 20 B8 15 A1 47 24 3A 47 24 B2 C7 | ";.: ...G$:G$..|
00002F40: 28 C6 28 47 24 AA 22 21 22 29 AF 39 35 29 3A 99 |(.(G$."!").95):.|
00002F50: 22 12 20 92 9D 22 3B 3A 8B 47 24 B3 B1 22 53 22 |". ..";:.G$.."S"|
00002F60: AF 47 24 B3 B1 22 4E 22 A7 99 22 20 9D 22 3B 3A |.G$.."N".." .";:|
00002F70: 89 35 35 36 30 00 58 20 BD 15 8B 47 24 B2 22 53 |.5560.X ...G$."S|
00002F80: 22 20 A7 20 99 22 D3 D4 D2 C9 CE C7 22 3A 89 35 |" . ."......":.5|
00002F90: 35 39 30 00 6D 20 C2 15 8B 20 47 24 B3 B1 22 4E |590.m ... G$.."N|
00002FA0: 22 20 A7 20 35 35 36 30 00 7C 20 CC 15 99 22 CE |" . 5560.| ...".|
00002FB0: D5 CD C5 D2 C9 C3 22 00 91 20 D6 15 46 24 28 41 |......".. ..F$(A|
00002FC0: 39 29 B2 47 24 AA 46 24 28 41 39 29 00 B8 20 E0 |9).G$.F$(A9).. .|
00002FD0: 15 99 22 13 22 3B C8 28 44 24 2C 59 AA 32 AC 58 |..".";.(D$,Y.2.X|
00002FE0: 29 3B 22 20 C6 49 45 4C 44 20 4C 45 4E 47 54 48 |);" .IELD LENGTH|
00002FF0: 20 22 3B 00 D4 20 EA 15 4F B2 32 3A 50 B2 31 3A | ";.. ..O.2:P.1:|
00003000: 51 B2 32 33 3A 4D 43 B2 31 3A 8D 35 32 30 30 00 |Q.23:MC.1:.5200.|
00003010: E1 20 F4 15 46 25 28 41 39 29 B2 44 00 E7 20 FE |. ..F%(A9).D.. .|
00003020: 15 8E 00 F3 20 70 17 8F 20 50 52 4F 43 49 00 1C |.... p.. PROCI..|
00003030: 21 7A 17 46 25 B2 30 3A 52 25 B2 30 3A 56 25 B2 |!z.F%.0:R%.0:V%.|
00003040: 30 3A 56 56 B2 30 3A 4C 25 B2 30 3A 45 25 B2 30 |0:VV.0:L%.0:E%.0|
00003050: 3A 8D 20 36 35 30 30 00 3F 21 84 17 81 20 49 25 |:. 6500.?!... I%|
00003060: B2 31 20 A4 20 31 34 3A 46 24 28 49 25 29 B2 C8 |.1 . 14:F$(I%)..|
00003070: 28 42 4C 24 2C 31 35 29 3A 82 00 7F 21 8E 17 81 |(BL$,15):...!...|
00003080: 49 25 B2 30 A4 31 3A 41 24 28 49 25 29 B2 82 42 |I%.0.1:A$(I%)..B|
00003090: 4C 24 AA 11 C8 28 42 4C 24 2C 31 32 29 3A 42 24 |L$...(BL$,12):B$|
000030A0: 28 49 25 29 B2 82 42 4C 24 AA 13 C8 28 42 4C 24 |(I%)..BL$...(BL$|
000030B0: 2C 31 32 29 3A 82 00 A4 21 98 17 41 24 B2 82 42 |,12):...!..A$..B|
000030C0: 4C 24 AA 3F 38 C8 28 42 4C 24 2C 31 32 29 3A 42 |L$.?8.(BL$,12):B|
000030D0: 24 B2 41 24 3A 46 24 B2 41 24 00 AA 21 A2 17 8E |$.A$:F$.A$..!...|
000030E0: 00 B7 21 D4 17 8F 20 50 52 4F 43 20 47 00 E9 21 |..!... PROC G..!|
000030F0: DE 17 99 22 93 D2 C5 D0 CC C1 C3 C5 A0 C6 C9 C5 |..."............|
00003100: CC C4 3A 22 3A 8D 20 38 E3 30 60 A3 3A 99 22 11 |..:":. 8.0`.:.".|
00003110: D3 45 4C 45 43 54 20 46 49 45 4C 44 3F 20 22 3B |.ELECT FIELD? ";|
00003120: 00 0C 22 E8 17 4F B2 32 3A 50 B2 31 3A 51 B2 46 |.."..O.2:P.1:Q.F|
00003130: 25 3A 4D 43 B2 31 3A 8D 20 35 32 30 30 3A 41 B2 |%:MC.1:. 5200:A.|
00003140: 44 3A 99 00 47 22 F2 17 99 22 11 D3 45 41 52 43 |D:..G"..."..EARC|
00003150: 48 20 22 3B 3A 41 24 B2 22 56 41 4C 55 45 22 3A |H ";:A$."VALUE":|
00003160: 8B 20 C8 28 46 24 28 41 29 2C 31 29 B2 22 53 22 |. .(F$(A),1)."S"|
00003170: 20 A7 20 41 24 B2 22 53 54 52 49 4E 47 22 00 81 | . A$."STRING"..|
00003180: 22 FC 17 99 20 41 24 3B 22 3F 20 22 3B 3A 4D 49 |"... A$;"? ";:MI|
00003190: 24 B2 22 20 22 3A 4D 41 24 B2 22 FF 22 3A 4D 49 |$." ":MA$.".":MI|
000031A0: B2 31 3A 4D 41 B2 46 25 28 41 29 3A 8D 20 35 E3 |.1:MA.F%(A):. 5.|
000031B0: 30 60 43 3A 46 24 B2 53 24 00 C1 22 06 18 99 3A |0`C:F$.S$.."...:|
000031C0: 99 22 D2 45 50 4C 41 43 45 20 22 3B 41 24 3B 22 |.".EPLACE ";A$;"|
000031D0: 3F A0 22 3B 3A 4D 49 24 B2 22 20 22 3A 4D 41 24 |?.";:MI$." ":MA$|
000031E0: B2 22 FF 22 3A 4D 49 B2 31 3A 4D 41 B2 46 25 28 |.".":MI.1:MA.F%(|
000031F0: 41 29 3A 8D 20 35 E3 30 60 E0 00 EC 22 10 18 41 |A):. 5.0`..."..A|
00003200: 24 B2 53 24 3A 99 22 93 22 3B 3A 4B 24 B2 22 D2 |$.S$:.".";:K$.".|
00003210: 45 50 4C 41 43 49 4E 47 22 3A 49 25 B2 33 3A 8D |EPLACING":I%.3:.|
00003220: 20 33 35 30 30 00 FF 22 1A 18 53 B2 30 3A 81 20 | 3500.."..S.0:. |
00003230: 44 B2 31 20 A4 20 52 25 00 25 23 24 18 8B 20 46 |D.1 . R%.%#$.. F|
00003240: 24 B2 41 52 24 28 44 2C 41 29 20 A7 20 41 52 24 |$.AR$(D,A) . AR$|
00003250: 28 44 2C 41 29 B2 41 24 3A 53 B2 53 AA 31 00 2B |(D,A).A$:S.S.1.+|
00003260: 23 2E 18 82 00 4A 23 38 18 4B 24 B2 22 C3 4F 4D |#....J#8.K$.".OM|
00003270: 50 4C 45 54 45 44 22 3A 49 25 B2 33 3A 8D 20 33 |PLETED":I%.3:. 3|
00003280: 35 30 30 00 77 23 42 18 4B 24 B2 C4 28 53 29 AA |500.w#B.K$..(S).|
00003290: 22 20 46 49 45 4C 44 28 53 29 20 52 45 50 4C 41 |" FIELD(S) REPLA|
000032A0: 43 45 44 22 3A 49 25 B2 35 3A 8D 20 33 35 30 30 |CED":I%.5:. 3500|
000032B0: 00 99 23 47 18 97 35 34 32 37 36 2C 31 37 3A 81 |..#G..54276,17:.|
000032C0: 41 35 B2 31 A4 35 30 3A 82 3A 97 35 34 32 37 36 |A5.1.50:.:.54276|
000032D0: 2C 30 00 A4 23 4C 18 8D 31 38 E3 30 30 00 AA 23 |,0..#L..18.00..#|
000032E0: 56 18 8E 00 B7 23 64 19 8F 20 50 52 4F E3 43 60 |V....#d.. PRO.C`|
000032F0: A9 00 D9 23 6E 19 45 25 B2 30 3A 8B 20 C8 28 46 |...#n.E%.0:. .(F|
00003300: 24 28 4C 25 29 2C 31 29 B2 22 4E 22 20 A7 20 45 |$(L%),1)."N" . E|
00003310: 25 B2 31 00 DF 23 78 19 8E 00 EC 23 58 1B 8F 20 |%.1..#x....#X.. |
00003320: 50 52 4F 43 53 49 00 0F 24 62 1B 52 30 B2 30 3A |PROCSI..$b.R0.0:|
00003330: 81 41 38 B2 31 A4 31 34 3A 52 30 B2 52 30 AA 46 |.A8.1.14:R0.R0.F|
00003340: 25 28 41 38 29 AA 32 3A 82 00 34 24 6C 1B 52 30 |%(A8).2:..4$l.R0|
00003350: B2 B5 28 31 34 33 30 30 AD 52 30 29 3A 8B 20 52 |..(14300.R0):. R|
00003360: 30 B1 32 30 30 20 A7 20 52 30 B2 32 30 30 00 3A |0.200 . R0.200.:|
00003370: 24 80 1B 8E 00 48 24 4C 1D 8F 20 50 52 4F 43 20 |$....H$L.. PROC |
00003380: 53 41 00 95 24 50 1D 44 45 B2 31 3A 8F 20 44 45 |SA..$P.DE.1:. DE|
00003390: 56 49 43 45 3D 54 41 50 45 3A ED 2A 21 20 80 27 |VICE=TAPE:.*! .'|
000033A0: 2A 60 7F 00 B7 24 51 1D 4B 24 B2 22 22 3A 49 25 |*`...$Q.K$."":I%|
000033B0: B2 32 30 3A 8D 33 35 30 30 3A 49 25 B2 32 32 3A |.20:.3500:I%.22:|
000033C0: 8D 33 35 30 30 00 D8 24 56 1D 4B 24 B2 22 D3 C1 |.3500..$V.K$."..|
000033D0: D6 C9 CE C7 A0 C6 C9 CC C5 22 3A 49 25 B2 31 38 |.........":I%.18|
000033E0: 3A 8D 33 35 30 30 00 F2 24 60 1D 99 22 C9 4E 50 |:.3500..$`..".NP|
000033F0: 55 54 20 46 49 4C 45 20 4E 41 4D 45 3A 20 22 3B |UT FILE NAME: ";|
00003400: 00 19 25 6A 1D 4D 49 24 B2 22 21 22 3A 4D 41 24 |..%j.MI$."!":MA$|
00003410: B2 22 FF 22 3A 4D 31 B2 31 3A 4D 41 B2 31 30 3A |.".":M1.1:MA.10:|
00003420: 8D 35 E3 30 38 3A 99 00 32 25 6F 1D 43 31 B2 34 |.5.08:..2%o.C1.4|
00003430: 34 3A 43 32 B2 31 36 36 3A 8D 20 31 33 E3 30 60 |4:C2.166:. 13.0`|
00003440: 9E 00 42 25 74 1D 9F 20 31 2C 44 45 2C 31 2C 53 |..B%t.. 1,DE,1,S|
00003450: 24 00 5E 25 7E 1D 98 31 2C 46 25 3A 98 31 2C 52 |$.^%~..1,F%:.1,R|
00003460: 25 3A 98 31 2C 52 30 3A 98 31 2C 56 56 00 81 25 |%:.1,R0:.1,VV..%|
00003470: 88 1D 81 20 41 B2 31 20 A4 20 46 25 3A 98 31 2C |... A.1 . F%:.1,|
00003480: 46 25 28 41 29 3A 98 31 2C 46 24 28 41 29 3A 82 |F%(A):.1,F$(A):.|
00003490: 00 90 25 92 1D 81 20 41 B2 31 20 A4 20 52 25 00 |..%... A.1 . R%.|
000034A0: AD 25 9C 1D 81 20 42 B2 31 20 A4 20 46 25 3A 98 |.%... B.1 . F%:.|
000034B0: 31 2C 41 52 24 28 41 2C 42 29 3A 82 00 B3 25 A6 |1,AR$(A,B):...%.|
000034C0: 1D 82 00 BA 25 B0 1D A0 31 00 D3 25 B5 1D 43 31 |....%...1..%..C1|
000034D0: B2 31 36 36 3A 43 32 B2 34 34 3A 8D 20 31 33 E3 |.166:C2.44:. 13.|
000034E0: 30 60 4B 00 F4 25 BA 1D 4B 24 B2 22 C6 C9 CC C5 |0`K..%..K$."....|
000034F0: 20 D3 C1 D6 C5 C4 22 3A 49 25 B2 31 38 3A 8D 20 | .....":I%.18:. |
00003500: 33 35 30 30 00 16 26 BF 1D 97 35 34 32 37 36 2C |3500..&...54276,|
00003510: 31 37 3A 81 41 35 B2 31 A4 35 30 3A 82 3A 97 35 |17:.A5.1.50:.:.5|
00003520: 34 32 37 36 2C 30 00 21 26 C4 1D 8D 31 38 E3 30 |4276,0.!&...18.0|
00003530: 60 B5 00 4B 26 CE 1D 44 45 B2 30 3A 8F 20 52 45 |`..K&..DE.0:. RE|
00003540: 53 54 4F 52 45 20 53 43 52 45 45 4E 20 41 53 20 |STORE SCREEN AS |
00003550: 4F 55 50 55 54 20 44 45 56 49 43 45 00 51 26 D8 |OUPUT DEVICE.Q&.|
00003560: 1D 8E 00 5E 26 40 1F 8F 20 50 52 4F 43 20 46 00 |...^&@.. PROC F.|
00003570: 8A 26 54 1F 99 22 13 11 11 CE CF 22 3B A6 31 31 |.&T..".....";.11|
00003580: 29 3B 22 D4 C9 D4 CC C5 22 3B A6 31 31 29 3B 22 |);".....";.11);"|
00003590: CC C5 CE C7 D4 C8 A0 D3 2F CE 22 00 A6 26 5E 1F |......../."..&^.|
000035A0: 81 41 B2 31 A4 46 25 3A 99 22 13 22 3B C8 28 44 |.A.1.F%:.".";.(D|
000035B0: 24 2C 33 AA 41 29 3B 00 E0 26 5F 1F 99 41 3B A3 |$,3.A);..&_..A;.|
000035C0: 31 31 29 3B C9 28 46 24 28 41 29 2C C3 28 46 24 |11);.(F$(A),.(F$|
000035D0: 28 41 29 29 AB 31 29 3B A3 33 35 AB C3 28 C4 28 |(A)).1);.35..(.(|
000035E0: 46 25 28 41 29 AB 31 E3 29 27 3B 46 25 28 41 29 |F%(A).1.)';F%(A)|
000035F0: 3B A2 61 BB 27 68 1F 99 20 A3 33 38 29 3B C7 28 |;.a.'h.. .38);.(|
00003600: C6 28 C8 28 46 24 28 41 29 2C 31 29 29 AA 31 32 |.(.(F$(A),1)).12|
00003610: 38 29 00 06 27 72 1F 82 00 0C 27 7C 1F 8E 00 1F |8)..'r....'|....|
00003620: 27 A4 1F 8F 20 4C 49 53 54 20 52 45 43 4F 52 44 |'... LIST RECORD|
00003630: 53 00 36 27 AE 1F 99 22 93 20 CC C9 D3 D4 A0 D2 |S.6'...". ......|
00003640: C5 C3 CF D2 C4 D3 3A 22 00 70 27 B8 1F 81 42 B2 |......:".p'...B.|
00003650: 31 A4 32 3A 87 46 24 3A 99 22 13 22 3B C8 28 44 |1.2:.F$:.".";.(D|
00003660: 24 2C 34 AA 42 AC 34 29 3B A3 36 29 3B 22 3C 22 |$,4.B.4);.6);"<"|
00003670: 3B C7 28 42 AA 31 39 32 29 3B 22 3E 20 20 22 3B |;.(B.192);"> ";|
00003680: 46 24 00 76 27 BD 1F 82 00 9C 27 BE 1F 4B 24 B2 |F$.v'.....'..K$.|
00003690: 22 D3 45 4C 45 43 54 20 4F 50 54 49 4F 4E 20 3A |".ELECT OPTION :|
000036A0: 22 3A 49 25 B2 32 30 3A 8D 20 33 35 30 30 00 D1 |":I%.20:. 3500..|
000036B0: 27 C2 1F A1 47 24 3A 47 24 B2 C7 28 C6 28 47 24 |'...G$:G$..(.(G$|
000036C0: AA 22 21 22 29 AF 39 35 29 3A 8B 47 24 B3 B1 22 |."!").95):.G$.."|
000036D0: 41 22 20 AF 20 47 24 B3 B1 22 42 22 20 A7 20 38 |A" . G$.."B" . 8|
000036E0: 31 33 30 00 E8 27 C7 1F 4B 24 B2 22 22 3A 49 25 |130..'..K$."":I%|
000036F0: B2 32 30 3A 8D 20 33 35 30 30 00 1D 28 CC 1F 41 |.20:. 3500..(..A|
00003700: 24 B2 47 24 3A 4B 24 B2 C4 28 52 25 29 AA 22 20 |$.G$:K$..(R%)." |
00003710: 52 45 43 4F 52 44 28 53 29 20 45 4E 54 45 52 45 |RECORD(S) ENTERE|
00003720: 44 22 3A 49 25 B2 31 34 3A 8D 20 33 35 30 30 00 |D":I%.14:. 3500.|
00003730: 3D 28 D6 1F 99 22 11 C9 4E 50 55 54 20 52 41 4E |=(..."..NPUT RAN|
00003740: 47 45 22 3A 99 3A 99 22 C6 52 4F 4D 20 22 3B 00 |GE":.:.".ROM ";.|
00003750: 60 28 E0 1F 4F B2 34 3A 50 B2 31 3A 51 B2 52 25 |`(..O.4:P.1:Q.R%|
00003760: 3A 4D 43 B2 31 3A 8D 20 35 32 30 30 3A 42 B2 44 |:MC.1:. 5200:B.D|
00003770: AB 31 00 8C 28 EA 1F 99 22 20 54 4F 20 22 3B 3A |.1..(..." TO ";:|
00003780: 4F B2 34 3A 50 B2 42 AA 31 3A 51 B2 52 25 3A 4D |O.4:P.B.1:Q.R%:M|
00003790: 43 B2 31 3A 8D 20 35 32 30 30 3A 57 B2 44 00 A7 |C.1:. 5200:W.D..|
000037A0: 28 EF 1F 8B 41 24 B2 22 42 22 A7 20 8D 32 31 E3 |(...A$."B". .21.|
000037B0: 30 60 27 3A 9F 34 2C 34 2C 37 00 DA 28 F4 1F 8B |0`':.4,4,7..(...|
000037C0: 20 41 24 B2 22 42 22 20 A7 20 44 45 B2 34 3A 42 | A$."B" . DE.4:B|
000037D0: B2 42 AA 31 3A 8D 38 35 30 30 02 3A 98 34 60 B7 |.B.1:.8500.:.4`.|
000037E0: 3A 8B 20 42 B3 57 20 A7 20 38 31 38 30 00 FA 28 |:. B.W . 8180..(|
000037F0: FE 1F 8B 20 41 24 B2 22 42 22 20 A7 20 44 45 B2 |... A$."B" . DE.|
00003800: 30 3A A0 34 3A 97 31 39 38 2C 30 3A 8E 00 2A 29 |0:.4:.198,0:..*)|
00003810: 08 20 42 B2 42 AA 31 3A 99 22 93 22 3B 3A 8D 20 |. B.B.1:.".";:. |
00003820: 38 36 30 30 3A 53 B2 30 3A 8D 20 38 37 30 30 3A |8600:S.0:. 8700:|
00003830: 8B 20 53 B2 31 20 A7 20 42 B2 42 AB 31 00 3B 29 |. S.1 . B.B.1.;)|
00003840: 12 20 8B 20 42 B3 57 20 A7 20 38 32 30 30 00 4F |. . B.W . 8200.O|
00003850: 29 1C 20 8B 20 47 24 B2 22 4D 22 20 A7 20 38 32 |). . G$."M" . 82|
00003860: 34 30 00 7C 29 21 20 4B 24 B2 22 CE 4F 20 4D 4F |40.|)! K$.".O MO|
00003870: 52 45 20 45 4E 54 52 49 45 53 22 3A 49 25 B2 31 |RE ENTRIES":I%.1|
00003880: 39 3A 8D 20 33 35 30 30 3A 99 20 C7 28 37 29 00 |9:. 3500:. .(7).|
00003890: 87 29 26 20 8D 31 38 E3 30 31 00 9B 29 30 20 8B |.)& .18.01..)0 .|
000038A0: 20 56 25 B1 30 20 A7 20 8D 20 34 E3 30 60 64 00 | V%.0 . . 4.0`d.|
000038B0: A1 29 3A 20 8E 00 AF 29 34 21 8F 20 50 52 4F 43 |.): ...)4!. PROC|
000038C0: 20 50 52 00 D0 29 3E 21 98 44 45 2C 22 D2 C5 C3 | PR..)>!.DE,"...|
000038D0: CF D2 C4 20 CE 4F 2E 20 22 3B 42 3A 81 41 38 B2 |... .O. ";B:.A8.|
000038E0: 31 A4 46 25 00 08 2A 48 21 98 44 45 2C C9 28 46 |1.F%..*H!.DE,.(F|
000038F0: 24 28 41 38 29 2C C3 28 46 24 28 41 38 29 29 AB |$(A8),.(F$(A8)).|
00003900: 31 29 3B C9 28 42 4C 24 2C 32 35 AB C3 28 46 24 |1);.(BL$,25..(F$|
00003910: 28 41 38 E3 29 63 27 3B 22 3A 20 22 3B 00 1A 2A |(A8.)c';": ";..*|
00003920: 4D 21 98 44 45 2C 41 52 24 28 42 2C 41 38 29 00 |M!.DE,AR$(B,A8).|
00003930: 22 2A 52 21 82 3A 8E 00 2F 2A 98 21 8F 20 50 52 |"*R!.:../*.!. PR|
00003940: 4F 43 20 50 00 4D 2A A2 21 99 22 D2 C5 C3 CF D2 |OC P.M*.!.".....|
00003950: C4 A0 CE 4F 2E 20 22 3B 42 3A 81 41 38 B2 31 A4 |...O. ";B:.A8.1.|
00003960: 46 25 00 7C 2A AC 21 99 22 13 22 3B C8 28 44 24 |F%.|*.!.".";.(D$|
00003970: 2C 33 AA 41 38 29 3B C9 28 46 24 28 41 38 29 2C |,3.A8);.(F$(A8),|
00003980: C3 28 46 24 28 41 38 29 29 AB 31 29 AA 22 3A 20 |.(F$(A8)).1).": |
00003990: 22 00 A5 2A B6 21 99 22 13 22 3B C8 28 44 24 2C |"..*.!.".";.(D$,|
000039A0: 33 AA 41 38 29 3B A3 31 AA 56 56 29 3B 41 52 24 |3.A8);.1.VV);AR$|
000039B0: 28 42 2C 41 38 29 3A 82 3A 8E 00 B3 2A FC 21 8F |(B,A8):.:...*.!.|
000039C0: 20 50 52 4F 43 20 43 48 00 EF 2A 06 22 4B 24 B2 | PROC CH..*."K$.|
000039D0: 22 28 CE 29 45 58 54 20 52 45 43 2C 20 28 C4 29 |"(.)EXT REC, (.)|
000039E0: 45 4C 45 54 45 2C 20 28 CD 29 45 4E 55 2C 20 28 |ELETE, (.)ENU, (|
000039F0: C1 29 4C 54 45 52 22 3A 49 25 B2 31 39 3A 8D 20 |.)LTER":I%.19:. |
00003A00: 33 35 30 30 00 06 2B 10 22 A1 47 24 3A 8B 20 47 |3500..+.".G$:. G|
00003A10: 24 B2 22 22 20 A7 20 38 37 32 30 00 19 2B 12 22 |$."" . 8720..+."|
00003A20: 47 24 B2 C7 28 C6 28 47 24 29 AF 39 35 29 00 2E |G$..(.(G$).95)..|
00003A30: 2B 15 22 8B 20 47 24 B2 22 4D 22 20 A7 20 42 B2 |+.". G$."M" . B.|
00003A40: 57 3A 8E 00 3F 2B 16 22 8B 20 47 24 B2 22 4E 22 |W:..?+.". G$."N"|
00003A50: 20 A7 20 8E 00 61 2B 1A 22 8B 20 47 24 B2 22 41 | . ..a+.". G$."A|
00003A60: 22 20 A7 20 99 22 93 22 3B 3A 53 B2 31 3A 8D 20 |" . .".";:S.1:. |
00003A70: 39 35 30 30 3A 8E 00 76 2B 24 22 8B 20 47 24 B3 |9500:..v+$". G$.|
00003A80: B1 22 44 22 20 A7 20 38 37 32 30 00 8E 2B 2E 22 |."D" . 8720..+."|
00003A90: 8D 20 38 38 30 30 3A 8B 20 47 24 B2 22 4E 22 20 |. 8800:. G$."N" |
00003AA0: A7 20 8E 00 BA 2B 38 22 4B 24 B2 22 28 CE 29 45 |. ...+8"K$."(.)E|
00003AB0: 58 54 20 52 45 43 4F 52 44 2C 20 28 CD 29 45 4E |XT RECORD, (.)EN|
00003AC0: 55 22 3A 49 25 B2 31 39 3A 8D 20 33 35 30 30 00 |U":I%.19:. 3500.|
00003AD0: EF 2B 42 22 A1 47 24 3A 47 24 B2 C7 28 C6 28 47 |.+B".G$:G$..(.(G|
00003AE0: 24 AA 22 21 22 29 AF 39 35 29 3A 8B 47 24 B3 B1 |$."!").95):.G$..|
00003AF0: 22 4E 22 20 AF 20 47 24 B3 B1 22 4D 22 20 A7 20 |"N" . G$.."M" . |
00003B00: 38 37 37 30 00 02 2C 4C 22 8B 20 47 24 B2 22 4D |8770..,L". G$."M|
00003B10: 22 20 A7 20 42 B2 57 00 08 2C 56 22 8E 00 15 2C |" . B.W..,V"...,|
00003B20: 60 22 8F 20 50 52 4F 43 20 44 00 50 2C 6A 22 4B |`". PROC D.P,j"K|
00003B30: 24 B2 22 C1 D2 C5 A0 D9 CF D5 A0 D3 D5 D2 C5 A0 |$.".............|
00003B40: D4 C8 C1 D4 A0 D9 CF D5 A0 D7 C9 D3 C8 A0 D4 CF |................|
00003B50: A0 C4 C5 CC C5 D4 C5 22 3A 49 25 B2 31 39 3A 8D |.......":I%.19:.|
00003B60: 20 33 35 30 30 00 81 2C 74 22 4B 24 B2 22 D2 C5 | 3500..,t"K$."..|
00003B70: C3 CF D2 C4 20 CE 4F 2E 20 22 AA C4 28 42 29 AA |.... .O. "..(B).|
00003B80: 22 20 28 D9 2F CE 29 3F 22 3A 49 25 B2 32 30 3A |" (./.)?":I%.20:|
00003B90: 8D 20 33 35 30 30 00 AE 2C 7E 22 A1 47 24 3A 47 |. 3500..,~".G$:G|
00003BA0: 24 B2 C7 28 C6 28 47 24 AA 22 21 22 29 AF 39 35 |$..(.(G$."!").95|
00003BB0: 29 3A 8B 47 24 B2 22 4E 22 20 A7 20 42 B2 42 AB |):.G$."N" . B.B.|
00003BC0: 31 3A 8E 00 C3 2C 88 22 8B 20 47 24 B3 B1 22 59 |1:...,.". G$.."Y|
00003BD0: 22 20 A7 20 38 38 33 30 00 D3 2C 8D 22 41 52 24 |" . 8830..,."AR$|
00003BE0: 28 42 2C 31 29 B2 22 22 00 F8 2C 92 22 4B 24 B2 |(B,1).""..,."K$.|
00003BF0: 22 D2 C5 C3 CF D2 C4 A0 C4 C5 CC C5 D4 C5 C4 22 |".............."|
00003C00: 3A 49 25 B2 31 39 3A 8D 20 33 35 30 30 00 0F 2D |:I%.19:. 3500..-|
00003C10: 9C 22 4B 24 B2 22 22 3A 49 25 B2 32 30 3A 8D 20 |."K$."":I%.20:. |
00003C20: 33 35 30 30 00 21 2D A6 22 56 25 B2 56 25 AA 31 |3500.!-."V%.V%.1|
00003C30: 3A 99 C7 28 37 29 00 2C 2D B0 22 8D 31 38 E3 30 |:..(7).,-.".18.0|
00003C40: 60 2E 00 32 2D BA 22 8E 00 42 2D 28 23 8F 20 4C |`..2-."..B-(#. L|
00003C50: 4F 41 44 20 44 41 54 41 00 8F 2D 2B 23 44 45 B2 |OAD DATA..-+#DE.|
00003C60: 31 3A 8F 20 44 45 56 49 43 45 3D 54 41 50 45 3A |1:. DEVICE=TAPE:|
00003C70: ED 2A 21 20 80 27 2A 60 97 00 9F 2D 2C 23 8F 20 |.*! .'*`...-,#. |
00003C80: 45 52 41 53 45 20 41 52 24 00 B6 2D 2D 23 4B 24 |ERASE AR$..--#K$|
00003C90: B2 22 22 3A 49 25 B2 32 30 3A 8D 20 33 35 30 30 |."":I%.20:. 3500|
00003CA0: 00 C7 2D 2E 23 49 25 B2 32 32 3A 8D 20 33 35 30 |..-.#I%.22:. 350|
00003CB0: 30 00 EA 2D 3C 23 4B 24 B2 22 CC CF C1 C4 C9 CE |0..-<#K$."......|
00003CC0: C7 A0 C6 C9 CC C5 22 3A 49 25 B2 31 38 3A 8D 20 |......":I%.18:. |
00003CD0: 33 35 30 30 00 03 2E 46 23 99 22 C9 4E 50 55 54 |3500...F#.".NPUT|
00003CE0: 20 46 49 4C 45 20 4E 41 4D 45 3A 22 3B 00 29 2E | FILE NAME:";.).|
00003CF0: 50 23 4D 49 24 B2 22 21 22 3A 4D 41 24 B2 22 FF |P#MI$."!":MA$.".|
00003D00: 22 3A 4D 49 B2 31 3A 4D 41 B2 31 30 3A 8D 20 35 |":MI.1:MA.10:. 5|
00003D10: E3 30 39 00 39 2E 5A 23 9F 20 31 2C 44 45 2C 30 |.09.9.Z#. 1,DE,0|
00003D20: 2C 53 24 00 4C 2E 64 23 84 31 2C 46 02 25 2C 52 |,S$.L.d#.1,F.%,R|
00003D30: 60 87 30 2C 56 56 00 63 2E 6E 23 8F 20 44 49 4D |`.0,VV.c.n#. DIM|
00003D40: 20 41 52 24 28 52 30 2C 46 25 2B 31 29 00 83 2E | AR$(R0,F%+1)...|
00003D50: 78 23 81 20 41 B2 31 20 A4 20 46 25 3A 84 31 2C |x#. A.1 . F%:.1,|
00003D60: 46 25 28 41 29 2C 46 24 28 41 29 3A 82 00 90 2E |F%(A),F$(A):....|
00003D70: 82 23 81 41 B2 31 A4 20 52 25 00 AD 2E 96 23 81 |.#.A.1. R%....#.|
00003D80: 20 42 B2 31 20 A4 20 46 25 3A 84 31 2C 41 52 24 | B.1 . F%:.1,AR$|
00003D90: 28 41 2C 42 29 3A 82 00 B3 2E A0 23 82 00 BA 2E |(A,B):.....#....|
00003DA0: AA 23 A0 31 00 D2 2E AB 23 43 31 B2 31 36 36 3A |.#.1....#C1.166:|
00003DB0: 43 32 B2 34 34 3A 8D 31 33 E3 30 60 4C 00 F4 2E |C2.44:.13.0`L...|
00003DC0: AF 23 97 35 34 32 37 36 2C 31 37 3A 81 41 35 B2 |.#.54276,17:.A5.|
00003DD0: 31 A4 35 30 3A 82 3A 97 35 34 32 37 36 2C 30 00 |1.50:.:.54276,0.|
00003DE0: 16 2F B4 23 4B 24 B2 22 C6 49 4C 45 20 CC 4F 41 |./.#K$.".ILE .OA|
00003DF0: 44 45 44 22 3A 49 25 B2 31 38 3A 8D 20 33 35 30 |DED":I%.18:. 350|
00003E00: 30 00 21 2F BE 23 8D 31 38 E3 30 61 5F 00 27 2F |0.!/.#.18.0a_.'/|
00003E10: C8 23 8E 00 34 2F F0 23 8F 20 50 52 4F 43 20 41 |.#..4/.#. PROC A|
00003E20: 00 3E 2F F5 23 99 22 93 22 3B 00 69 2F FA 23 4B |.>/.#.".";.i/.#K|
00003E30: 24 B2 22 D2 C5 C3 CF D2 C4 A0 CE D5 CD C2 C5 D2 |$.".............|
00003E40: 22 AA C4 28 52 25 AA 31 29 3A 49 25 B2 31 3A 8D |"..(R%.1):I%.1:.|
00003E50: 20 33 35 30 30 00 81 2F 04 24 52 25 B2 52 25 AA | 3500../.$R%.R%.|
00003E60: 31 3A 81 20 41 38 B2 31 20 A4 20 46 25 00 B0 2F |1:. A8.1 . F%../|
00003E70: 0E 24 99 22 13 22 3B C8 28 44 24 2C 33 AA 41 38 |.$.".";.(D$,3.A8|
00003E80: 29 3B C9 28 46 24 28 41 38 29 2C C3 28 46 24 28 |);.(F$(A8),.(F$(|
00003E90: 41 38 29 29 AB 31 29 AA 22 3A 20 22 00 DD 2F 18 |A8)).1).": "../.|
00003EA0: 24 99 22 13 22 3B C8 28 44 24 2C 33 AA 41 38 29 |$.".";.(D$,3.A8)|
00003EB0: 3B A3 31 AA 56 56 29 3B 3A 4F B2 46 25 28 41 38 |;.1.VV);:O.F%(A8|
00003EC0: 29 3A 4D 49 24 B2 22 20 22 00 F8 2F 1D 24 8B C8 |):MI$." "../.$..|
00003ED0: 28 46 24 28 41 38 29 2C 31 29 B3 B1 22 4E 22 A7 |(F$(A8),1).."N".|
00003EE0: 39 32 36 30 00 15 30 22 24 50 B2 AB 32 45 39 3A |9260..0"$P..2E9:|
00003EF0: 51 B2 32 45 39 3A 4D 43 B2 31 3A 8D 20 35 32 30 |Q.2E9:MC.1:. 520|
00003F00: 30 00 29 30 23 24 41 52 24 28 52 25 2C 41 38 29 |0.)0#$AR$(R%,A8)|
00003F10: B2 C4 28 44 29 00 50 30 27 24 8B 44 B1 AB 31 A7 |..(D).P0'$.D..1.|
00003F20: 41 52 24 28 52 25 2C 41 38 29 B2 C9 28 C4 28 44 |AR$(R%,A8)..(.(D|
00003F30: 29 2C C3 28 C4 28 44 29 29 AB 31 29 00 91 30 2C |),.(.(D)).1)..0,|
00003F40: 24 8B C8 28 46 24 28 41 38 29 2C 31 29 B2 22 53 |$..(F$(A8),1)."S|
00003F50: 22 20 A7 4D 41 24 B2 22 FF 22 3A 4D 49 B2 31 3A |" .MA$.".":MI.1:|
00003F60: 4D 41 B2 46 25 28 41 38 29 3A 8D 35 E3 30 61 89 |MA.F%(A8):.5.0a.|
00003F70: 3A 41 52 24 28 52 25 2C 41 38 29 B2 53 24 00 99 |:AR$(R%,A8).S$..|
00003F80: 30 40 24 99 3A 82 00 CE 30 4A 24 4B 24 B2 22 28 |0@$.:...0J$K$."(|
00003F90: CD 29 45 4E 55 2C 20 28 CE 29 45 58 54 20 52 45 |.)ENU, (.)EXT RE|
00003FA0: 43 4F 52 44 2C 20 28 C1 29 4C 54 45 52 22 3A 49 |CORD, (.)LTER":I|
00003FB0: 25 B2 32 33 3A 8D 20 33 35 30 30 00 E5 30 54 24 |%.23:. 3500..0T$|
00003FC0: A1 47 24 3A 8B 20 47 24 B2 22 22 20 A7 20 39 33 |.G$:. G$."" . 93|
00003FD0: 30 30 00 F8 30 59 24 47 24 B2 C7 28 C6 28 47 24 |00..0Y$G$..(.(G$|
00003FE0: 29 AF 39 35 29 00 09 31 5E 24 8B 20 47 24 B2 22 |).95)..1^$. G$."|
00003FF0: 4D 22 20 A7 20 8E 00 42 31 68 24 8B 47 24 B2 22 |M" . ..B1h$.G$."|
00004000: 4E 22 AF 52 25 B1 B2 52 30 A7 20 4B 24 B2 22 CD |N".R%..R0. K$.".|
00004010: C5 CD CF D2 D9 A0 C6 D5 CC CC 22 3A 49 25 B2 32 |..........":I%.2|
00004020: 33 3A 8D 20 33 35 30 30 3A 89 20 39 34 30 30 00 |3:. 3500:. 9400.|
00004030: 86 31 72 24 8B 20 47 24 B2 22 4E 22 20 AF 20 52 |.1r$. G$."N" . R|
00004040: 25 AA 35 B1 B2 52 30 20 A7 20 4B 24 B2 22 D2 CF |%.5..R0 . K$."..|
00004050: CF CD A0 C6 CF D2 A0 CF CE CC D9 A0 22 AA C4 28 |............"..(|
00004060: 52 30 AB 52 25 29 AA 22 20 D2 C5 C3 CF D2 C4 28 |R0.R%)." ......(|
00004070: D3 29 22 00 B4 31 73 24 8B 20 47 24 B2 22 4E 22 |.)"..1s$. G$."N"|
00004080: 20 AF 20 52 25 AA 35 B1 B2 52 30 20 A7 20 49 25 | . R%.5..R0 . I%|
00004090: B2 32 33 3A 8D 20 33 35 30 30 3A 8D 20 39 34 30 |.23:. 3500:. 940|
000040A0: 30 00 E9 31 7C 24 8B 20 47 24 B2 22 41 22 20 A7 |0..1|$. G$."A" .|
000040B0: 20 42 B2 52 25 3A 99 22 93 CD CF C4 C9 C6 D9 A0 | B.R%:."........|
000040C0: D2 C5 C3 CF D2 C4 3A 22 3A 8D 20 39 35 30 30 3A |......:":. 9500:|
000040D0: 89 20 39 32 39 30 00 FA 31 AE 24 8B 47 24 B2 22 |. 9290..1.$.G$."|
000040E0: 4E 22 A7 39 32 30 35 00 04 32 B3 24 89 39 33 30 |N".9205..2.$.930|
000040F0: 30 00 0F 32 B8 24 8D 31 38 E3 30 62 40 00 15 32 |0..2.$.18.0b@..2|
00004100: C2 24 8E 00 23 32 1C 25 8F 20 50 52 4F 43 20 4D |.$..#2.%. PROC M|
00004110: 4F 00 41 32 26 25 99 22 D2 C5 C3 CF D2 C4 A0 CE |O.A2&%."........|
00004120: 4F 2E 20 22 3B 42 3A 81 41 38 B2 31 A4 46 25 00 |O. ";B:.A8.1.F%.|
00004130: 70 32 30 25 99 22 13 22 3B C8 28 44 24 2C 33 AA |p20%.".";.(D$,3.|
00004140: 41 38 29 3B C9 28 46 24 28 41 38 29 2C C3 28 46 |A8);.(F$(A8),.(F|
00004150: 24 28 41 38 29 29 AB 31 29 AA 22 3A 20 22 00 95 |$(A8)).1).": "..|
00004160: 32 31 25 99 22 13 22 3B C8 28 44 24 2C 33 AA 41 |21%.".";.(D$,3.A|
00004170: 38 29 3B A3 31 AA 56 56 29 3B 41 52 24 28 42 2C |8);.1.VV);AR$(B,|
00004180: 41 38 29 00 C4 32 3A 25 4B 24 B2 22 C9 53 20 54 |A8)..2:%K$.".S T|
00004190: 48 49 53 20 43 4F 52 52 45 43 54 20 28 D9 2F CE |HIS CORRECT (./.|
000041A0: 29 3F 22 3A 49 25 B2 34 AA 41 38 3A 8D 20 33 35 |)?":I%.4.A8:. 35|
000041B0: 30 30 00 EE 32 44 25 A1 47 24 3A 47 24 B2 C7 28 |00..2D%.G$:G$..(|
000041C0: C6 28 47 24 AA 22 21 22 29 AF 39 35 29 3A 8B 47 |.(G$."!").95):.G|
000041D0: 24 B2 22 59 22 20 A7 20 39 35 39 39 00 03 33 4E |$."Y" . 9599..3N|
000041E0: 25 8B 20 47 24 B3 B1 22 4E 22 20 A7 20 39 35 34 |%. G$.."N" . 954|
000041F0: 30 00 1C 33 58 25 4B 24 B2 22 22 3A 49 25 B2 33 |0..3X%K$."":I%.3|
00004200: AA 41 38 3A 8D 20 33 35 30 30 00 4C 33 5D 25 4B |.A8:. 3500.L3]%K|
00004210: 24 B2 22 D0 4C 45 41 53 45 20 45 4E 54 45 52 20 |$.".LEASE ENTER |
00004220: 43 4F 52 52 45 43 54 49 4F 4E 22 3A 49 25 B2 34 |CORRECTION":I%.4|
00004230: AA 41 38 3A 8D 20 33 35 30 30 00 7B 33 62 25 99 |.A8:. 3500.{3b%.|
00004240: 22 13 22 3B C8 28 44 24 2C 33 AA 41 38 29 3B C9 |".";.(D$,3.A8);.|
00004250: 28 46 24 28 41 38 29 2C C3 28 46 24 28 41 38 29 |(F$(A8),.(F$(A8)|
00004260: 29 AB 31 29 AA 22 3A 20 22 00 A8 33 63 25 99 22 |).1).": "..3c%."|
00004270: 13 22 3B C8 28 44 24 2C 33 AA 41 38 29 3B A3 31 |.";.(D$,3.A8);.1|
00004280: AA 56 56 29 3B 3A 4F B2 46 25 28 41 38 29 3A 4D |.VV);:O.F%(A8):M|
00004290: 49 24 B2 22 20 22 00 C5 33 67 25 8B 20 C8 28 46 |I$." "..3g%. .(F|
000042A0: 24 28 41 38 29 2C 31 29 B3 B1 22 4E 22 20 A7 39 |$(A8),1).."N" .9|
000042B0: 35 39 30 00 E1 33 6C 25 50 B2 AB 32 45 39 3A 51 |590..3l%P..2E9:Q|
000042C0: B2 32 45 39 3A 4D 43 B2 31 3A 8D 35 32 30 30 00 |.2E9:MC.1:.5200.|
000042D0: F4 33 6D 25 41 52 24 28 42 2C 41 38 29 B2 C4 28 |.3m%AR$(B,A8)..(|
000042E0: 44 29 00 1D 34 71 25 8B 20 44 B1 AB 31 20 A7 20 |D)..4q%. D..1 . |
000042F0: 41 52 24 28 42 2C 41 38 29 B2 C9 28 C4 28 44 29 |AR$(B,A8)..(.(D)|
00004300: 2C C3 28 C4 28 44 29 29 AB 31 29 00 5F 34 76 25 |,.(.(D)).1)._4v%|
00004310: 8B 20 C8 28 46 24 28 41 38 29 2C 31 29 B2 22 53 |. .(F$(A8),1)."S|
00004320: 22 20 A7 20 4D 41 24 B2 22 FF 22 3A 4D 49 B2 31 |" . MA$.".":MI.1|
00004330: 3A 4D 41 B2 46 25 28 41 38 29 3A 8D 35 E3 30 60 |:MA.F%(A8):.5.0`|
00004340: 8B 3A 41 52 24 28 42 2C 41 38 29 B2 53 24 00 78 |.:AR$(B,A8).S$.x|
00004350: 34 7F 25 4B 24 B2 22 22 3A 49 25 B2 34 AA 41 38 |4.%K$."":I%.4.A8|
00004360: 3A 8D 20 33 35 30 30 00 80 34 80 25 82 3A 8E 00 |:. 3500..4.%.:..|
00004370: 86 34 0F 27 3A 00 9A 34 10 27 8F 20 53 4F 52 54 |.4.':..4.'. SORT|
00004380: 20 52 4F 55 54 49 4E 45 53 00 B4 34 1A 27 99 22 | ROUTINES..4.'."|
00004390: 93 CD D5 CC D4 C9 2D C6 C9 C5 CC C4 A0 D3 CF D2 |......-.........|
000043A0: D4 3A 22 00 CC 34 24 27 42 25 B2 46 25 3A 8B 20 |.:"..4$'B%.F%:. |
000043B0: 46 25 B1 34 20 A7 20 42 25 B2 34 00 E0 34 2E 27 |F%.4 . B%.4..4.'|
000043C0: 8B 20 46 25 B1 31 20 A7 20 8D 20 38 E3 30 61 7E |. F%.1 . . 8.0a~|
000043D0: 00 1D 35 38 27 8B 46 25 B2 31 20 A7 99 22 11 11 |..58'.F%.1 .."..|
000043E0: D3 4F 52 54 20 54 4F 20 42 45 20 44 4F 4E 45 20 |.ORT TO BE DONE |
000043F0: 4F 4E 20 46 49 45 4C 44 20 4F 4E 45 2E 22 3A 5A |ON FIELD ONE.":Z|
00004400: B2 30 3A 41 B2 31 3A 89 31 30 30 39 37 00 4F 35 |.0:A.1:.10097.O5|
00004410: 42 27 99 3A 99 22 11 D3 45 4C 45 43 54 20 55 50 |B'.:."..ELECT UP|
00004420: 20 54 4F 22 3B 42 25 3B 22 20 C6 C9 C5 CC C4 D3 | TO";B%;" ......|
00004430: 20 46 4F 52 20 53 4F 52 54 22 3A 5A B2 AB 31 00 | FOR SORT":Z..1.|
00004440: 8F 35 4C 27 5A B2 5A AA 31 3A 99 22 D3 4F 52 54 |.5L'Z.Z.1:.".ORT|
00004450: 20 C6 49 45 4C 44 22 3B 5A AA 31 3B 22 3A 20 22 | .IELD";Z.1;": "|
00004460: 3B 3A 4F B2 C3 28 C4 28 46 25 29 29 3A 50 B2 B6 |;:O..(.(F%)):P..|
00004470: 28 5A B2 30 29 3A 51 B2 46 25 3A 4D 43 B2 30 00 |(Z.0):Q.F%:MC.0.|
00004480: BB 35 56 27 8D 20 35 32 30 30 3A 41 28 5A 29 B2 |.5V'. 5200:A(Z).|
00004490: 44 3A 99 3A 8B 20 5A B3 33 20 AF 20 41 28 5A 29 |D:.:. Z.3 . A(Z)|
000044A0: B3 B1 30 20 A7 20 31 30 30 36 30 00 CD 35 60 27 |..0 . 10060..5`'|
000044B0: 8B 20 5A B2 30 20 A7 20 31 30 30 37 30 00 E2 35 |. Z.0 . 10070..5|
000044C0: 6A 27 8B 20 41 28 5A 29 B2 30 20 A7 20 5A B2 5A |j'. A(Z).0 . Z.Z|
000044D0: AB 31 00 10 36 6B 27 43 B2 30 3A 81 41 B2 30 A4 |.1..6k'C.0:.A.0.|
000044E0: 5A AB 31 3A 81 42 B2 41 AA 31 20 A4 20 5A 3A 8B |Z.1:.B.A.1 . Z:.|
000044F0: 20 41 28 41 29 B2 41 28 42 29 20 A7 20 43 B2 31 | A(A).A(B) . C.1|
00004500: 00 2E 36 6C 27 82 20 42 2C 41 3A 99 22 93 22 3B |..6l'. B,A:.".";|
00004510: 3A 8B 20 43 B3 31 20 A7 20 31 30 30 39 36 00 56 |:. C.1 . 10096.V|
00004520: 36 6D 27 4B 24 B2 22 C9 4C 4C 45 47 41 4C 20 53 |6m'K$.".LLEGAL S|
00004530: 45 4C 45 43 54 49 4F 4E 22 3A 49 25 B2 31 35 3A |ELECTION":I%.15:|
00004540: 8D 20 33 35 30 30 00 61 36 6E 27 8D 31 38 E3 30 |. 3500.a6n'.18.0|
00004550: 28 00 6D 36 6F 27 89 20 31 E4 30 60 48 00 A7 36 |(.m6o'. 1.0`H..6|
00004560: 70 27 99 22 93 C6 C9 C5 CC C4 20 4F 52 44 45 52 |p'."...... ORDER|
00004570: 20 46 4F 52 20 53 4F 52 54 3A 22 3B 3A 81 41 B2 | FOR SORT:";:.A.|
00004580: 30 A4 5A 3A 99 41 28 41 29 3B 22 2C 22 3B 3A 82 |0.Z:.A(A);",";:.|
00004590: 3A 99 C7 28 32 30 29 00 E8 36 71 27 41 B2 41 28 |:..(20)..6q'A.A(|
000045A0: 30 29 3A 99 22 E3 11 60 25 D3 4F 52 54 20 49 4E |0):."..`%.ORT IN|
000045B0: 54 4F 20 28 C1 29 53 43 45 4E 44 49 4E 47 20 4F |TO (.)SCENDING O|
000045C0: 52 20 28 C4 29 45 53 43 45 4E 44 49 4E 47 E3 20 |R (.)ESCENDING. |
000045D0: 60 66 4F 52 44 45 52 20 3F 22 00 1B 37 72 27 A1 |`fORDER ?"..7r'.|
000045E0: 47 24 3A 47 24 B2 C7 28 C6 28 47 24 AA 22 21 22 |G$:G$..(.(G$."!"|
000045F0: 29 AF 39 35 29 3A 8B 20 47 24 B3 B1 22 41 22 AF |).95):. G$.."A".|
00004600: 47 24 B3 B1 22 44 22 A7 31 30 30 39 38 00 51 37 |G$.."D".10098.Q7|
00004610: 73 27 4B 24 B2 22 D3 4F 52 54 49 4E 47 22 3A 49 |s'K$.".ORTING":I|
00004620: 25 B2 32 31 3A 8D 20 33 35 30 30 3A 8B 20 5A B3 |%.21:. 3500:. Z.|
00004630: B1 30 20 A7 20 8D 31 31 E3 30 60 55 3A 89 20 31 |.0 . .11.0`U:. 1|
00004640: 30 31 35 30 00 5D 37 74 27 8D 20 31 30 32 30 30 |0150.]7t'. 10200|
00004650: 00 74 37 A6 27 4B 24 B2 22 D3 4F 52 54 45 44 22 |.t7.'K$.".ORTED"|
00004660: 3A 8D 20 33 35 30 30 00 96 37 AB 27 97 35 34 32 |:. 3500..7.'.542|
00004670: 37 36 2C 31 37 3A 81 41 35 B2 31 A4 35 30 3A 82 |76,17:.A5.1.50:.|
00004680: 3A 97 35 34 32 37 36 2C 30 00 A1 37 B0 27 8D 31 |:.54276,0..7.'.1|
00004690: 38 E3 30 60 7D 00 A7 37 BA 27 8E 00 C2 37 D8 27 |8.0`}..7.'...7.'|
000046A0: 8F 20 53 4F 52 54 20 4F 4E 20 53 49 4E 47 4C 45 |. SORT ON SINGLE|
000046B0: 20 46 49 45 4C 44 00 F0 37 D9 27 54 B2 28 C8 28 | FIELD..7.'T.(.(|
000046C0: 46 24 28 41 29 2C 31 29 B2 22 4E 22 29 AC AB 32 |F$(A),1)."N")..2|
000046D0: AA 28 C8 28 46 24 28 41 29 2C 31 29 B2 22 53 22 |.(.(F$(A),1)."S"|
000046E0: 29 AC AB 31 00 10 38 E2 27 81 41 39 B2 31 A4 52 |)..1..8.'.A9.1.R|
000046F0: 25 3A 42 24 28 41 39 29 B2 41 52 24 28 41 39 2C |%:B$(A9).AR$(A9,|
00004700: 41 29 3A 82 00 21 38 EC 27 4E B2 52 25 3A 8D 20 |A):..!8.'N.R%:. |
00004710: 31 37 E3 30 69 A5 00 33 38 F6 27 8B 20 47 24 B3 |17.0i..38.'. G$.|
00004720: B1 22 44 22 20 A7 20 8E 00 77 38 00 28 81 41 39 |."D" . ..w8.(.A9|
00004730: B2 31 A4 B5 28 52 25 AD 32 29 3A 81 41 38 B2 31 |.1..(R%.2):.A8.1|
00004740: A4 46 25 3A 4B 24 B2 41 52 24 28 41 39 2C 41 38 |.F%:K$.AR$(A9,A8|
00004750: 29 3A 41 52 24 28 41 39 2C 41 38 29 B2 41 52 24 |):AR$(A9,A8).AR$|
00004760: 28 52 25 AA 31 AB 41 39 2C 41 38 29 00 94 38 0A |(R%.1.A9,A8)..8.|
00004770: 28 41 52 24 28 52 25 AA 31 AB 41 39 2C 41 38 29 |(AR$(R%.1.A9,A8)|
00004780: B2 4B 24 3A 82 3A 82 3A 8E 00 AB 38 F8 2A 8F 20 |.K$:.:.:...8.*. |
00004790: 4D 55 4C 54 49 20 46 49 45 4C 44 20 53 4F 52 54 |MULTI FIELD SORT|
000047A0: 00 D1 38 02 2B 41 B2 41 28 30 29 3A 8D 20 31 30 |..8.+A.A(0):. 10|
000047B0: 32 30 30 3A 8F 20 53 4F 52 54 20 46 49 52 53 54 |200:. SORT FIRST|
000047C0: 20 46 49 45 4C 44 00 E0 38 0C 2B 81 20 41 35 B2 | FIELD..8.+. A5.|
000047D0: 30 A4 5A AB 31 00 1A 39 16 2B 54 B2 28 C8 28 46 |0.Z.1..9.+T.(.(F|
000047E0: 24 28 41 28 41 35 AA 31 29 29 2C 31 29 B2 22 4E |$(A(A5.1)),1)."N|
000047F0: 22 29 AC AB 32 AA 28 C8 28 46 24 28 41 28 41 35 |")..2.(.(F$(A(A5|
00004800: AA 31 29 29 2C 31 29 B2 22 53 22 29 AC AB 31 00 |.1)),1)."S")..1.|
00004810: 28 39 20 2B 50 31 B2 30 3A 50 32 B2 30 00 37 39 |(9 +P1.0:P2.0.79|
00004820: 2A 2B 81 20 41 37 B2 31 A4 20 52 25 00 6C 39 34 |*+. A7.1. R%.l94|
00004830: 2B 8B 20 41 52 24 28 41 37 2C 41 28 41 35 29 29 |+. AR$(A7,A(A5))|
00004840: B3 B1 41 52 24 28 41 37 AA 31 2C 41 28 41 35 29 |..AR$(A7.1,A(A5)|
00004850: 29 20 B0 20 50 31 B3 B1 30 20 A7 20 31 31 30 37 |) . P1..0 . 1107|
00004860: 30 00 7F 39 35 2B 8B 20 41 35 B2 30 20 A7 20 31 |0..95+. A5.0 . 1|
00004870: 31 30 36 39 00 AA 39 36 2B 8B 20 41 52 24 28 41 |1069..96+. AR$(A|
00004880: 37 2C 41 28 30 29 29 B3 B1 41 52 24 28 41 37 AA |7,A(0))..AR$(A7.|
00004890: 31 2C 41 28 30 29 29 20 A7 20 31 31 30 36 35 00 |1,A(0)) . 11065.|
000048A0: BD 39 37 2B 8B 20 41 35 B2 31 20 A7 20 31 31 30 |.97+. A5.1 . 110|
000048B0: 36 39 00 E7 39 38 2B 8B 20 41 52 24 28 41 37 2C |69..98+. AR$(A7,|
000048C0: 41 28 31 29 29 B2 41 52 24 28 41 37 AA 31 2C 41 |A(1)).AR$(A7.1,A|
000048D0: 28 31 29 29 20 A7 20 31 31 30 36 39 00 FE 39 39 |(1)) . 11069..99|
000048E0: 2B 41 35 B2 5A 3A 41 37 B2 52 25 3A 89 20 31 31 |+A5.Z:A7.R%:. 11|
000048F0: 30 38 30 00 08 3A 3D 2B 50 31 B2 41 37 00 45 3A |080..:=+P1.A7.E:|
00004900: 3E 2B 8B 20 41 52 24 28 41 37 2C 41 28 41 35 29 |>+. AR$(A7,A(A5)|
00004910: 29 B3 B1 41 52 24 28 41 37 AA 31 2C 41 28 41 35 |)..AR$(A7.1,A(A5|
00004920: 29 29 20 AF 20 50 31 B3 B1 30 20 A7 20 50 32 B2 |)) . P1..0 . P2.|
00004930: 41 37 3A 8D 20 31 31 32 30 30 00 4B 3A 48 2B 82 |A7:. 11200.K:H+.|
00004940: 00 51 3A 52 2B 82 00 57 3A 5C 2B 8E 00 69 3A C0 |.Q:R+..W:\+..i:.|
00004950: 2B 8F 20 4D 41 54 43 48 20 46 4F 55 4E 44 00 85 |+. MATCH FOUND..|
00004960: 3A C5 2B 81 20 41 39 B2 31 20 A4 20 31 36 3A 42 |:.+. A9.1 . 16:B|
00004970: 24 28 41 39 29 B2 22 22 3A 82 00 AC 3A CA 2B 81 |$(A9)."":...:.+.|
00004980: 41 38 B2 50 31 A4 50 32 3A 42 24 28 41 38 29 B2 |A8.P1.P2:B$(A8).|
00004990: 41 52 24 28 41 38 2C 41 28 41 35 AA 31 29 29 3A |AR$(A8,A(A5.1)):|
000049A0: 82 00 E0 3A D4 2B 4C B2 50 31 3A 52 B2 50 32 3A |...:.+L.P1:R.P2:|
000049B0: 4E B2 50 32 AB 50 31 AA 31 3A 42 24 28 50 31 AB |N.P2.P1.1:B$(P1.|
000049C0: 31 29 B2 22 22 3A 42 24 28 50 32 AA 31 29 B2 C7 |1)."":B$(P2.1)..|
000049D0: 28 32 35 35 29 00 EC 3A DE 2B 8D 20 31 37 31 30 |(255)..:.+. 1710|
000049E0: 30 00 01 3B E8 2B 8B 47 24 B3 B1 22 44 22 20 A7 |0..;.+.G$.."D" .|
000049F0: 20 31 31 32 35 30 00 33 3B E9 2B 81 41 39 B2 30 | 11250.3;.+.A9.0|
00004A00: A4 B5 28 28 50 32 AB 50 31 29 AD 32 29 3A 81 20 |..((P2.P1).2):. |
00004A10: 41 38 B2 31 A4 46 25 3A 4B 24 B2 41 52 24 28 41 |A8.1.F%:K$.AR$(A|
00004A20: 39 AA 50 31 2C 41 38 29 00 68 3B EA 2B 41 52 24 |9.P1,A8).h;.+AR$|
00004A30: 28 41 39 AA 50 31 2C 41 38 29 B2 41 52 24 28 50 |(A9.P1,A8).AR$(P|
00004A40: 32 AB 41 39 2C 41 38 29 3A 41 52 24 28 50 32 AB |2.A9,A8):AR$(P2.|
00004A50: 41 39 2C 41 38 29 B2 4B 24 3A 82 3A 82 00 71 3B |A9,A8).K$:.:..q;|
00004A60: F2 2B 50 31 B2 30 00 77 3B FC 2B 8E 00 87 3B C8 |.+P1.0.w;.+...;.|
00004A70: 32 81 20 41 37 B2 31 20 A4 20 52 25 00 A4 3B D2 |2. A7.1 . R%..;.|
00004A80: 32 81 20 41 38 B2 31 20 A4 20 46 25 3A 41 24 B2 |2. A8.1 . F%:A$.|
00004A90: 22 22 3A 41 31 24 B2 22 22 00 BF 3B DC 32 81 20 |"":A1$.""..;.2. |
00004AA0: 41 39 B2 31 20 A4 20 C3 28 41 52 24 28 41 37 2C |A9.1 . .(AR$(A7,|
00004AB0: 41 38 29 29 00 FF 3B E6 32 41 31 24 B2 C7 28 43 |A8))..;.2A1$..(C|
00004AC0: 32 29 3A 8B CA 28 41 52 24 28 41 37 2C 41 38 29 |2):..(AR$(A7,A8)|
00004AD0: 2C 41 39 2C 31 29 B3 B1 C7 28 43 31 29 A7 41 31 |,A9,1)...(C1).A1|
00004AE0: 24 B2 CA 28 41 52 24 28 41 37 2C 41 38 29 2C 41 |$..(AR$(A7,A8),A|
00004AF0: 39 2C 31 29 00 0D 3C F0 32 41 24 B2 41 24 AA 41 |9,1)..<.2A$.A$.A|
00004B00: 31 24 00 16 3C FA 32 82 20 41 39 00 30 3C 04 33 |1$..<.2. A9.0<.3|
00004B10: 41 52 24 28 41 37 2C 41 38 29 B2 41 24 3A 82 20 |AR$(A7,A8).A$:. |
00004B20: 41 38 2C 41 37 00 36 3C 0E 33 8E 00 6A 3C 68 42 |A8,A7.6<.3..j<hB|
00004B30: 8F 20 51 55 49 43 4B 20 53 4F 52 54 20 52 4F 55 |. QUICK SORT ROU|
00004B40: 54 49 4E 45 20 2D 20 53 49 4E 47 4C 45 20 46 49 |TINE - SINGLE FI|
00004B50: 45 4C 44 20 45 4E 54 52 59 20 50 4F 49 4E 54 00 |ELD ENTRY POINT.|
00004B60: 76 3C 72 42 4C B2 31 3A 52 B2 4E 00 92 3C 7C 42 |v<rBL.1:R.N..<|B|
00004B70: 42 24 28 30 29 B2 22 22 3A 42 24 28 4E AA 31 29 |B$(0)."":B$(N.1)|
00004B80: B2 C7 28 32 35 35 29 00 C5 3C CC 42 8F 20 51 55 |..(255)..<.B. QU|
00004B90: 49 43 4B 20 53 4F 52 54 20 52 4F 55 54 49 4E 45 |ICK SORT ROUTINE|
00004BA0: 20 2D 20 4D 55 4C 54 49 20 46 49 45 4C 44 20 45 | - MULTI FIELD E|
00004BB0: 4E 54 52 59 20 50 4F 49 4E 54 00 DD 3C D6 42 81 |NTRY POINT..<.B.|
00004BC0: 20 41 39 B2 31 A4 31 30 3A 53 28 41 39 29 B2 30 | A9.1.10:S(A9).0|
00004BD0: 3A 82 00 EA 3C E0 42 50 B2 31 3A 4D B2 31 30 00 |:...<.BP.1:M.10.|
00004BE0: FE 3C 44 43 8B 20 52 AB 4C B3 4D 20 A7 20 31 37 |.<DC. R.L.M . 17|
00004BF0: 36 33 30 00 06 3D 4E 43 49 B2 4C 00 0E 3D 58 43 |630..=NCI.L..=XC|
00004C00: 4A B2 52 00 37 3D 62 43 4B 24 B2 42 24 28 4C 29 |J.R.7=bCK$.B$(L)|
00004C10: 3A 81 41 38 B2 31 A4 46 25 3A 4B 24 28 41 38 29 |:.A8.1.F%:K$(A8)|
00004C20: B2 41 52 24 28 4C 2C 41 38 29 3A 82 00 69 3D 76 |.AR$(L,A8):..i=v|
00004C30: 43 8B 20 28 4B 24 B3 42 24 28 4A 29 AF 54 B2 31 |C. (K$.B$(J).T.1|
00004C40: 29 B0 28 C5 28 4B 24 29 B3 C5 28 42 24 28 4A 29 |).(.(K$)..(B$(J)|
00004C50: 29 AF 54 B2 32 29 20 A7 20 31 37 32 38 30 00 75 |).T.2) . 17280.u|
00004C60: 3D 77 43 89 20 31 37 33 31 30 00 7F 3D 80 43 4A |=wC. 17310..=.CJ|
00004C70: B2 4A AB 31 00 8B 3D 8A 43 89 20 31 37 32 37 30 |.J.1..=.C. 17270|
00004C80: 00 9D 3D 9E 43 8B 20 4A B1 49 20 A7 20 31 37 33 |..=.C. J.I . 173|
00004C90: 34 30 00 C6 3D A8 43 42 24 28 49 29 B2 4B 24 3A |40..=.CB$(I).K$:|
00004CA0: 81 41 38 B2 31 A4 46 25 3A 41 52 24 28 49 2C 41 |.A8.1.F%:AR$(I,A|
00004CB0: 38 29 B2 4B 24 28 41 38 29 3A 82 00 D2 3D B2 43 |8).K$(A8):...=.C|
00004CC0: 89 20 31 37 34 39 30 00 01 3E BC 43 42 24 28 49 |. 17490..>.CB$(I|
00004CD0: 29 B2 42 24 28 4A 29 3A 81 41 38 B2 31 A4 46 25 |).B$(J):.A8.1.F%|
00004CE0: 3A 41 52 24 28 49 2C 41 38 29 B2 41 52 24 28 4A |:AR$(I,A8).AR$(J|
00004CF0: 2C 41 38 29 3A 82 00 0B 3E C6 43 49 B2 49 AA 31 |,A8):...>.CI.I.1|
00004D00: 00 3F 3E DA 43 8B 20 28 42 24 28 49 29 B3 4B 24 |.?>.C. (B$(I).K$|
00004D10: 20 AF 20 54 B2 31 29 B0 28 C5 28 42 24 28 49 29 | . T.1).(.(B$(I)|
00004D20: 29 B3 C5 28 4B 24 29 AF 54 B2 32 29 20 A7 20 31 |)..(K$).T.2) . 1|
00004D30: 37 33 38 30 00 4B 3E DB 43 89 20 31 37 34 31 30 |7380.K>.C. 17410|
00004D40: 00 55 3E E4 43 49 B2 49 AA 31 00 61 3E EE 43 89 |.U>.CI.I.1.a>.C.|
00004D50: 20 31 37 33 37 30 00 73 3E 02 44 8B 20 4A B1 49 | 17370.s>.D. J.I|
00004D60: 20 A7 20 31 37 34 35 30 00 9F 3E 0C 44 42 24 28 | . 17450..>.DB$(|
00004D70: 4A 29 B2 4B 24 3A 81 20 41 38 B2 31 20 A4 20 46 |J).K$:. A8.1 . F|
00004D80: 25 3A 41 52 24 28 4A 2C 41 38 29 B2 4B 24 28 41 |%:AR$(J,A8).K$(A|
00004D90: 38 29 3A 82 00 A7 3E 16 44 49 B2 4A 00 B3 3E 20 |8):...>.DI.J..> |
00004DA0: 44 89 20 31 37 34 39 30 00 E5 3E 2A 44 42 24 28 |D. 17490..>*DB$(|
00004DB0: 4A 29 B2 42 24 28 49 29 3A 81 20 41 38 B2 31 20 |J).B$(I):. A8.1 |
00004DC0: A4 20 46 25 3A 41 52 24 28 4A 2C 41 38 29 B2 41 |. F%:AR$(J,A8).A|
00004DD0: 52 24 28 49 2C 41 38 29 3A 82 00 EF 3E 34 44 4A |R$(I,A8):...>4DJ|
00004DE0: B2 4A AB 31 00 FB 3E 3E 44 89 20 31 37 32 37 30 |.J.1..>>D. 17270|
00004DF0: 00 11 3F 52 44 8B 20 52 AB 49 B3 49 AB 4C 20 A7 |..?RD. R.I.I.L .|
00004E00: 20 31 37 35 36 30 00 1C 3F 5C 44 53 28 50 29 B2 | 17560..?\DS(P).|
00004E10: 52 00 26 3F 66 44 50 B2 50 AA 31 00 33 3F 70 44 |R.&?fDP.P.1.3?pD|
00004E20: 53 28 50 29 B2 49 AA 31 00 3D 3F 7A 44 50 B2 50 |S(P).I.1.=?zDP.P|
00004E30: AA 31 00 47 3F 84 44 52 B2 49 AB 31 00 53 3F 8E |.1.G?.DR.I.1.S?.|
00004E40: 44 89 20 31 37 32 32 30 00 60 3F 98 44 53 28 50 |D. 17220.`?.DS(P|
00004E50: 29 B2 49 AB 31 00 6A 3F A2 44 50 B2 50 AA 31 00 |).I.1.j?.DP.P.1.|
00004E60: 75 3F AC 44 53 28 50 29 B2 4C 00 7F 3F B6 44 50 |u?.DS(P).L..?.DP|
00004E70: B2 50 AA 31 00 89 3F C0 44 4C B2 49 AA 31 00 95 |.P.1..?.DL.I.1..|
00004E80: 3F CA 44 89 20 31 37 32 32 30 00 9D 3F DE 44 4A |?.D. 17220..?.DJ|
00004E90: B2 4C 00 A7 3F E8 44 4A B2 4A AA 31 00 B9 3F F2 |.L..?.DJ.J.1..?.|
00004EA0: 44 8B 20 4A B1 52 20 A7 20 31 37 37 35 30 00 E5 |D. J.R . 17750..|
00004EB0: 3F FC 44 4B 24 B2 42 24 28 4A 29 3A 81 20 41 38 |?.DK$.B$(J):. A8|
00004EC0: B2 31 20 A4 20 46 25 3A 4B 24 28 41 38 29 B2 41 |.1 . F%:K$(A8).A|
00004ED0: 52 24 28 4A 2C 41 38 29 3A 82 00 EF 3F 06 45 49 |R$(J,A8):...?.EI|
00004EE0: B2 4A AB 31 00 22 40 10 45 8B 20 28 42 24 28 49 |.J.1."@.E. (B$(I|
00004EF0: 29 B1 4B 24 20 AF 54 B2 31 29 B0 28 C5 28 42 24 |).K$ .T.1).(.(B$|
00004F00: 28 49 29 29 B1 C5 28 4B 24 29 AF 54 B2 32 29 20 |(I))..(K$).T.2) |
00004F10: A7 20 31 37 36 39 30 00 2E 40 11 45 89 20 31 37 |. 17690..@.E. 17|
00004F20: 37 32 30 00 62 40 1A 45 42 24 28 49 AA 31 29 B2 |720.b@.EB$(I.1).|
00004F30: 42 24 28 49 29 3A 81 20 41 38 B2 31 A4 46 25 3A |B$(I):. A8.1.F%:|
00004F40: 41 52 24 28 49 AA 31 2C 41 38 29 B2 41 52 24 28 |AR$(I.1,A8).AR$(|
00004F50: 49 2C 41 38 29 3A 82 00 6C 40 24 45 49 B2 49 AB |I,A8):..l@$EI.I.|
00004F60: 31 00 78 40 2E 45 89 20 31 37 36 38 30 00 A8 40 |1.x@.E. 17680..@|
00004F70: 38 45 42 24 28 49 AA 31 29 B2 4B 24 3A 81 20 41 |8EB$(I.1).K$:. A|
00004F80: 38 B2 31 20 A4 20 46 25 3A 41 52 24 28 49 AA 31 |8.1 . F%:AR$(I.1|
00004F90: 2C 41 38 29 B2 4B 24 28 41 38 29 3A 82 00 B4 40 |,A8).K$(A8):...@|
00004FA0: 42 45 89 20 31 37 36 34 30 00 C6 40 56 45 8B 20 |BE. 17640..@VE. |
00004FB0: 50 B2 31 20 A7 20 31 37 38 32 30 00 D0 40 60 45 |P.1 . 17820..@`E|
00004FC0: 50 B2 50 AB 31 00 DB 40 6A 45 4C B2 53 28 50 29 |P.P.1..@jEL.S(P)|
00004FD0: 00 E5 40 74 45 50 B2 50 AB 31 00 F0 40 7E 45 52 |..@tEP.P.1..@~ER|
00004FE0: B2 53 28 50 29 00 FC 40 88 45 89 20 31 37 32 32 |.S(P)..@.E. 1722|
00004FF0: 30 00 02 41 9C 45 8E 00 2C 41 50 46 99 82 C7 28 |0..A.E..,APF...(|
00005000: 37 29 22 AB 3A 81 49 B2 31 A4 33 30 30 3A A1 47 |7)".:.I.1.300:.G|
00005010: 24 3A 8B 47 24 B3 B1 22 22 A7 49 B2 31 30 30 31 |$:.G$.."".I.1001|
00005020: 00 34 41 55 46 82 3A 8E 00 3F 41 20 4E 8F 20 44 |.4AUF.:..?A N. D|
00005030: 41 54 41 00 83 41 2A 4E 83 22 CC 4F 41 44 20 4F |ATA..A*N.".OAD O|
00005040: 4C 44 20 46 49 4C 45 22 2C 22 D3 45 54 55 50 20 |LD FILE",".ETUP |
00005050: 4E 45 57 20 46 49 4C 45 22 2C 22 C1 44 44 20 52 |NEW FILE",".DD R|
00005060: 45 43 4F 52 44 53 22 2C 22 C6 49 45 4C 44 20 53 |ECORDS",".IELD S|
00005070: 55 4D 4D 41 52 59 22 00 C6 41 34 4E 83 22 CD 4F |UMMARY"..A4N.".O|
00005080: 44 49 46 59 20 52 45 43 4F 52 44 22 2C 22 CC 49 |DIFY RECORD",".I|
00005090: 53 54 20 52 45 43 4F 52 44 53 22 2C 22 C6 49 45 |ST RECORDS",".IE|
000050A0: 4C 44 20 53 45 41 52 43 48 22 2C 22 D2 45 50 4C |LD SEARCH",".EPL|
000050B0: 41 43 45 20 46 49 45 4C 44 22 A2 61 F1 42 3E 4E |ACE FIELD".a.B>N|
000050C0: 83 22 CD 55 4C 54 49 2D 46 49 45 4C 44 20 53 4F |.".ULTI-FIELD SO|
000050D0: 52 54 22 2C 22 D3 41 56 45 20 43 55 52 52 45 4E |RT",".AVE CURREN|
000050E0: 54 20 46 49 4C 45 22 2C 22 C5 4E 44 20 50 52 4F |T FILE",".ND PRO|
000050F0: 47 52 41 4D 22 00 38 42 48 4E 83 22 CC 49 53 54 |GRAM".8BHN.".IST|
00005100: 20 52 45 43 4F 52 44 53 20 54 4F 20 53 43 52 45 | RECORDS TO SCRE|
00005110: 45 4E 22 2C 22 CC 49 53 54 20 52 45 43 4F 52 44 |EN",".IST RECORD|
00005120: 53 20 54 4F 20 50 52 49 4E 54 45 52 22 00 5D 42 |S TO PRINTER".]B|
00005130: 52 4E 83 20 22 D3 45 41 52 43 48 20 46 4F 52 20 |RN. ".EARCH FOR |
00005140: 41 20 53 50 45 43 49 46 49 43 20 53 54 52 49 4E |A SPECIFIC STRIN|
00005150: 47 22 00 A6 42 5C 4E 83 34 2C 22 D3 45 41 52 43 |G"..B\N.4,".EARC|
00005160: 48 20 46 4F 52 20 41 20 56 41 4C 55 45 20 58 22 |H FOR A VALUE X"|
00005170: 2C 22 D3 45 41 52 43 48 20 46 4F 52 20 56 41 4C |,".EARCH FOR VAL|
00005180: 55 45 53 3E 58 22 2C 22 D3 45 41 52 43 48 20 4F |UES>X",".EARCH O|
00005190: 52 20 56 41 4C 55 45 53 3C 58 22 00 BE 42 66 4E |R VALUES<X"..BfN|
000051A0: 83 22 D3 45 41 52 43 48 20 46 4F 52 20 41 3C 58 |.".EARCH FOR A<X|
000051B0: 3C 42 22 00 D6 42 70 4E 97 35 36 33 33 34 2C C2 |<B"..BpN.56334,.|
000051C0: 28 35 36 33 33 34 29 AF 32 35 34 00 FE 42 75 4E |(56334).254..BuN|
000051D0: 41 B2 C2 28 34 33 29 AA C2 28 34 34 29 AC 32 35 |A..(43)..(44).25|
000051E0: 36 3A 43 B2 C2 28 34 35 29 AA C2 28 34 36 29 AC |6:C..(45)..(46).|
000051F0: 32 35 36 00 39 43 7A 4E 81 42 B2 31 A4 39 3A 97 |256.9CzN.B.1.9:.|
00005200: 36 33 30 AA 42 2C C6 28 CA 28 22 53 59 53 36 34 |630.B,.(.("SYS64|
00005210: 37 33 38 22 AA C7 28 31 33 29 2C 42 2C 31 29 29 |738"..(13),B,1))|
00005220: 3A 82 3A 97 31 39 38 2C 39 3A 99 22 90 22 00 4B |:.:.198,9:.".".K|
00005230: 43 7F 4E 81 42 B2 41 A4 43 3A 97 42 2C 30 3A 82 |C.N.B.A.C:.B,0:.|
00005240: 00 51 43 81 4E A2 00 6E 43 08 52 8F 20 20 53 54 |.QC.N..nC.R. ST|
00005250: 4F 50 20 50 52 49 4E 54 45 52 20 42 52 45 41 4B |OP PRINTER BREAK|
00005260: 20 49 4E 00 A0 43 12 52 81 58 42 B2 31 A4 39 3A | IN..C.R.XB.1.9:|
00005270: 97 36 33 30 AA 58 42 2C C6 28 CA 28 22 90 47 CF |.630.XB,.(.(".G.|
00005280: 32 31 30 33 30 22 AA C7 28 31 33 29 2C 58 42 2C |21030"..(13),XB,|
00005290: 31 29 29 3A 82 00 AD 43 1C 52 97 31 39 38 2C 39 |1)):...C.R.198,9|
000052A0: 3A 8E 00 B9 43 26 52 A0 34 3A 89 32 31 30 A3 C2 |:...C&R.4:.210..|
..%....2064......L(.LLONS PA..ER V2.23..
.X.4.. .F.N8......HP...I.P. ..W.....P.._
...HP....L....G......F...****).........)
.. 6. ......PZ.7..XL..D.\.RUOQ..P...`..P
...`........L6..<.... =.JP.`.. 6.LS.....
=. 6.JP.`...........HD.P...E....... .JP
....E.......` D... S.F.P.L6. D. D.F.P.`.
.....2064C PI.. ....I....HP..VOZ._.F.;F.
.F..F.;7/..Y..V..S..P.RP.6//!F..F..F..F.
.7/.............R..6O/!VHZ....U.VKZ._.F.
.F..7/.......R..6O/.F..F.;7/..P..M.RM.6/
/._.FN.F..7/...._.F..F..7/.......R..6./.
VHZ..V.ZRZQV.ZQZP...`+.....9.3W...9#9...
A.??..|...CN #\..~..X`P>.....P.@.|..NF.|
..FF.FFB.C<C. ,......L.X.....HLF....``N.
.D..VFF..B...NFD.|.CF %.|.|.F..``.|.FF..
~...FL.LF.<V`<..|.~.D....LLFF..|.DF #.|0
..FFV..D.F.<.<FF.FF.<..0.....8..`1......
..0J...$"BA.C..H....(HD..D.@."...@ .....
.Y...~..W...I.|.NV..|..88C. A...N..P....
....N....<LL...~..~....<P`.F.|.~....80.|
F.|NF|.|NFN..XB......`3....<C?.<...?.C..
.?<C?.<?..?........<<??...?C....?C<.??..
.?D....??<C?...........??<C?.<.....D..C<
.??...?.<....C<C?.<.??..C....F...C.C....
?<B.<?...??C....??<?.?<..?...?..C<C?..E.
.....F?...?..O...<E?.<.?.O.??...<<C?....
?D....?<<C?.<..?...C..?<<??...??.O.O.?<<
C?.<..??<..?.?<?..??......?..?.E......C.
...C<D?..??C..?..<?D....C..<<...C<C?.<.?
?...?..<?...?<..?...?..?C........O.....?
.B...?...?..O.D...?<`K....CC..ACC..?.
D..C.D....?C.>.C.??...CE.C.....C.A....C
..>CC...F....C.....C..D.E....C.....C..
C...D..?.C...E....G..C..|...C......F...C
....C..C...`H.C.C....GO..............C.
.A............G.C.C...............A....
D.....A>C|.....H....>>||.G....?~.....D..
..>>||.G....?~..GO.?>||....D...D.......E
........?..C.C....?>~|....?~.C........
.X.......`F....??C.....B.....>~........
..>.....C.C>C|.....C..?...C......?....A
..C.......C......................G......
............C.C....C.C.H.......?..AC...
............?......C..|~?....?C.....`H.
........?.....C..G...BD.....D..C........
....O.....C..G..D....C..>>.E.....C..??.
..C.D......C..??...C...................
..........C..?~.....G...........D..C.
.....C......`H..8W...F.......B..G.NW..G.
.G.O.....B.....D..G.O.....B.....D..G..G.
.G..G..G..G..G..G..G..`F.!.. ., .+ N+ .*
...+ *..+Y.+P.....HN.+ *..+Y.+P.HL.*.
* ..P.L3*X.1.........7......P.....X ..
.. [. ...YH.H..P.ID.....HP..T*LR*`.H..
.HP....P. 4- ./ 4HH.`X....P..........*.
..X`..P..P......P.......+..P..+..P..+..P
..+. P.!P..+..P....LO+.<.P.N.+N.+..+I.PS
.G..+.G..+ ...A.....<.P.......H.'P..<.P.
.=....I@0...?./..=..=.I)P..<..<....@..@.
IDP....@.N<..A.P!.A.....I ..I.P. N+L1...
@.IA...L1.NA.....I ....@.IB.....P...L.-.
;D.C..G.G..D.F!.LN....QTQ^QHQ...........
......A........-... ...`.. .. .. ,.{ ...
. .. .. ,.{ .... .. .. ,.. .... .. .. ,.
. .... .. .. ,.H .... .. .. ,.. .. ....Q
,.X.. ..H..........XX. X.HX..X..YH...P..
..(PQ`.00..`..00.#.'%.&$.'#.%#.&$.#.'$.'
%.$#.%$.'$.&.#%.'$.#%.&$.'%.#.&$.'$.#&..
THE.PRESENTS..CRACKED : 16.05.87.PRESS S
PACE!.....<.H..P..F.... R..P...D.. .J`.>
.....+..Z.G+....PZ..'P..>..>.I.P....>.L1
..?..?.I...` ..?..'..YH.XZH..Y..Y.YZ.XZH
J.'P.H.ZH..Y ..X.H.Y..X..... ..I..H....
.........H.'P.H....G........?.`E OGREET
INGS TO THE ALLIANCE[ NEW BENCOR[ FUTUR
E PROJECTS[ RAW DEAL INC[ TWR[ SCS[ DS C
OMPWARE[ ACA[ HEAVY CRACKERS[ TRIAD[ ART
WORX[ FANTASTIC FIVE[ TTI[ PACO CREW[ PR
OLINE[ GOFFY CRACKINGS[ DCC[ WIZAX AND T
DC_ ..P..DATABASEP.. WAS CRACKED : 16.0
5.87D .BY THE PAPILLONS C.C &MEMBERS AR
E: ALPHA ZAZ AND THE CATMAN.C .HIT ANY K
EY TO END THIS LOGO !!C 'LOOK IN THE OT
HER SCROLL FOR GREETINGS C.`0 %...8!).I
.P.8L./.~.!~ !~(!~0!~8!...P.``....H .. .
Z. .................D.......2.....C..
........................................
....... ........... >...................
.................................... ...
........ ...............................
....................... .........A...D..
.....................D.........2........
......................... .........A...D
.......................D.........2......
........................... ...........!
6.........A.............C...D.......C...
.....C...D.....C.............C.........
C... .....C...D.....C.............C.....
..C... .....C...D.....C...........C.....
...... ...C..... .....C...D.....C.......
....C........... ...C..... .....C...D...
..C.............C.......B...............
..C. .7.@...C. ...@...C. ...,...B. NL.GL
GGLQGL/HL)HX.... .JX`.3M./M...CL.BL.AL..
L.YL..M..L..L..L..L..L..M3M..L...7M..O.+
M.P.+M...*M..)M`.... .GX`C. /X....P.S..
..G...........P..P.D..P .J`..`.. /HL1`L.
$B` .J`X 4HX`....P..O.. .L.|....L... KH.
|..L..... .L.3MM.LP.....O.*M.)M.+M)..+M.
. .H.. .H.R..L..S.....OP... .H.Y..L..S..
.0... . .H.Y..L..S....|..L..S...`...GL..
....T.GL`..L....O.I...J.YM......L.}.L..L
..L..LY.L....L.I.)...L....L.IL.I..IL.0M.
..,M.. ...8..I......ZM.8I.{M.9I ..... .K
.LL.I......LP.L.I.IL.HL...DL.. L..M.Y.
M..M....M.. .K..L.5I.....L).P"..L8.....I
LI.....L...IL....L..\MP...L..M....L.4I.P
. PLL.II.P...M.}.M..ML.I..L).P..EL..M.FL
..ML.I CL.....4M.4M..L.J...GL....M.IL..M
..M..L..M..M..M ....7I..9.}.L..I.....JL!
J....BM.VM.CM.WM....NVMNWMJL;J..LTJ.VM.
WM.VM....M..L.WM..M..L ......4M .L.4MICP
...L.FL..L.ELL.J..L..M..L.4MI.....M)...M
.....0M...,M.....LYH ....E..M0M..(`H(..E
.M,MP.....O.`....L...`.|....J..L......I.
.0M..I..,M.~ ....M0M..L.H(..M,M..LH.....
..O....O...L...`.+M`..L`..M`..L`.TM..LP.
....L.TM.<M.<M.<M...DM...HM..`....L`...D
M...HM`.TM..LP.....L.TM.@M.@M.@M...LM...
PM..`....L`...LM...PM`..L`..M`..L`..L`..
M`ID..8.D..J`..L`..L`..L`..L`.DL`.JL`.HL
`.IL.HL....L).J..I..NI..J..L.}JL..M..LI.
L.L..L8.JL..M..L....M`I.P6.EL..L..P..FL.
.L....L.Y.L..L....LLCL..L8..L..L....LLCL
I...I..T`..L..M..L..M`..L).P...LJ..M..LJ
LLL`H..``D..`...I.......`B..D.'..B....:A
F..B...G.......D..:B..B..KB.<HC...C.I...
B.2D.....A.E.....DDB..'.....:...A..D....
J..EFG.|...C...D..E A..0...FFG...C.DF..7
.'.7....A!..Q.H.9...E...I.WD.P....%..*K2
K.K.K.CK )OKSK.K6K.K.K.K.KWK:KFKQK.K.K..
.......(D..B.A!........C...$.CD !...4.DF
H..H.9...E...I.WD.P....%..C.WU... .N.. (
2064)C.X.4.....B..-.J... .F2N,..1.B.HP..
2I.P..H....HP.L.....DAD./D*#.)........./
).. ".L...C.YX;?)./P..0`./ "..-.-P...JP.
.E......P../.-./P..0.-P...JP... Q../ "..
-.-P...JP.F9..0..9./.L". Q../.-./P..0.-P
...JP.F9..L.. Z..7..X Y.L........,...../
.-HD.P...-E..-..I... .JP.../E../.0I..0L.
.......HP.N..N.....I.P.``Y.....788,52:.7
92,193.9.... (C) DATABASE SOFTWARE 198
5.R.B.. 54296,15:.54277,64.L.C.. 54278,1
28:.54273,55...D.. 54272,37::.54276,0...
E.. B$(200),S(10),AR$(200,15)...F.. F%(1
4),K$(14),F$(14).T.G..G(8)G(14);".";...H
..1.01...R..1500......2.0B2......".";H(D
$,18);BL$;".";H(D$,22);.27);.<.... F(S$)
.97 . F(S$).122 . 230.L....".";H(D$,18);
.11);"PRESS SHIFT LOCK KEY !"......".";H
(D$,18);BL$;".";H(D$,22);.27);:. 220....
.. S$."A" . S$."K" . .G(20);:.220.....K$
."FILE NOT SET UP - USE OPTION B":I%.1
8.0....(S$."C".S$."D".S$."J").F%.0..3500
:.".";H(D$,22);.27);:.220.T...K$."ZERO R
ECORDS ENTERED":I%.18......S$."D".S$."K"
.R%.0..3500:.".";H(D$,22);.27);:.220.J.,
.. F(S$).64 . 2500,2.500,63400,600,550,7
00,750,800,460,900.T.6.. 210...... " FIE
LD SUMMARY......".";"DEFINITION OF FIELD
:";:. F%.1 . .".S:";.'.... 8.0`..R...K$.
"PRESS SPACE FOR MENU.":I%.23:.3500.K...
. G$:. G$.." " . 440.Q.B.....L.." SAVE
FILE...V.. 7500............ " ADD RECORD
S...... R%..R0 . .G(7):....... .(8).1.0=
. RO.R:. G(7):....... 9200:..`..&.. " L
IST RECORD...0.. 8100...:...'.X.. " MODI
FY RECORD.@.B..".MODIFY A RECORD:".Z.L..
"INPUT RECORD NUMBER ";:O.4:P.1:Q.R%:MC.
1:. 5200:B.D...Q..".... `.":."...";...V.
. 9500:K$."(M)ODIFY A RECORD, (R)ETURN T
O MENU":I%.22:. 3500...... G$:G$.G(F(G$.
"!").95):.G$."M" . 610.".... G$.."R" . 6
40.(.....=.... " FIELD SEARCH.H.F.. 4100
.N.P...D.... " REPLACE FIELD.O.... 6100.
U....... .. " SORT...*.. 1.0`&...4......
..".";:. R%..0 . 960......"...`.DO YOU W
ISH TO SAVE THE DATA FILE (Y/N)?";......
G$:G$.G(F(G$."!").95):. G$."N" . 950.#.
... G$.."Y" . 920...... 7500.8....".";.C
....20080.N....20080._.... INITIALISE...
..D$."..+".....BL$.".' `.".J....53280,0:
.53281,0.X...R%.0:F%.0.....DE.0:. " SPEC
IFY DEVICE FOR OUTPUT DURING LISTING...Z
.......:.%.... MENU.+.....V....".";.8);"
..D A T A B A S E. 3M E N U"......7);".
=B..."......A.1.11:.A$:..10);".";G(96.A)
;.15);".";A$:......I%.18:K$.".".D(R%)."
RECORD(S) ENTERED":.3500...... F%..0 .I%
.20:K$.".MAXIMUM OF ".D(R0)." RECORDS":.
3500.[....".";H(D$,24);".MINI OFFICE (C
) DATABASE SOFTWARE 1985";......".";H(D$
,22);.10);".SELECT OPTION .. ";.........
P.. GET KEY INPUT.B.... S$:.". ..";:.S$.
"".S$."!".U...S$.G(F(S$).95)......(S$."A
".S$."K").(S$."0".S$."9").(S$."A".S$."K"
).." .";:.2020.<....S$.."A".S$.."K".S$.G
(F(S$).128).E....S$;.K.....`.D.. SETUP N
EW FILE.{.I.. A8.1 . 14:F%(A8).0:....N.S
1$."":.R%.0 . .3.09...S.. S1$."N" . ....
X..1.02.E.... S$."A" . .9.0`..Z.... S$."
B" . .4500............ ARE YOU SURE MESS
AGE.+.B..".";.9);H(D$,18);"ARE YOU SURE
? (Y/N) ";.M.L..S1$:.". ..";:.S1$."".S1
$."!".B.Q.S1$.G(F(S1$).95)...V.. S1$.."Y
" . S1$.."N" . ." .";:.3020......S1$;...
....W.... PRINTTAB(Y) SECTION. A%SPECIFY
K$ AND I%......".";H(D$,I%);BL$;"."....
.K.(40.C(K$)).2...J..".";H(D$,I%);.K);K$
;.2.O.. I%.24 . .".";.8.P...>.T...M. ..
PROC DEL.U...B.0.U...B.B.1:. AR$(B,1).."
" . 4030......A8.B.R%:.A9.1.F%:AR$(A8,A9
).AR$(A8.1,A9):.:.:V%.V%.1.A...R%.R%.1:B
.B.1.S.... B.R% . V%.0...H.. V%.0 . 4020
...R...`=.... " FIELD SEARCH."....".FIEL
D SEARCH:":.F%.1 .4140.B.... 8.0`.:.".";
H(D$,19);"SEARCH ON WHICH FIELD ( 1 -";F
%;")?";...".O.1:P.1:Q.F%:MC.1:.5200:J.D:
.".";:. 4150...,.J.1:."SEARCH ON FIELD O
NE".M.6.."TH.IS 7A ";:A$."STRING"...;..
.F$,`WF$:. H(F$(J),1)."N" . A$."NUMERIC"
:. 4160.<.<.L.2:C.1:.A$;" FIELD:...";H(D
$,4.C.3);F$;"..AB":. 4200.F.@.. A$;.Z.J.
." FIELD:":. L:. C.1.L:. F$:."...";H(D$,
4.C.3);...T.."<";G(96.C);"> ";F$:....Y.
K$."SELECT OPTION":I%.19:. 3500.R.^.. G$
:. G$."" . 4190...A.G$.G(F(G$).95)...C.C
.F(G$).64:.C.1.C.L.4190.9.H.."SEARCH ";:
A$."STRING ?: ":. L.4 . A$."VALUE ?: ".V
.R.. C.4 . A$."VALUE A ?: ".R.W.MA$.".":
. C.1 . MA$."Z"...|.. A$;:MI$." ":MI.1:M
A.F%(J):. 5.0A!:F$.S$...... L..2 .D1.E(F
$):. C.4 ..:."VALUE B ?: ";:O.F%(J):P..2
E9......L..2.C.4.Q.2E9:MC.1:. 5200:P1.D.
%...K$."":I%.21:. 3500:I%.22:. 3500.;...
E%.0:S.0:. B.1.R%.N...K$."SEARCHING":I%.
19:. 3500:K$."":I%.20:. 3500...... C.1 .
. AR$(B,J).F$ . . 4400.I....C.2 . L.2 .
."CAN'T DO AT LINE 4270. &HELP .!A.":.
...... C.2 . L..2 . . E(AR$(B,J)).D1 . .
4400.#.B.. C.3 . L..2 . . E(AR$(B,J)).D
1 . . 4400._.L.. C.4 . L..2 . . E(AR$(B,
J)).D1 . E(AR$(B,J)).P1 ..4400...V..:. E
%.0.K$."SEARCH COMPLETED, NO RECORDS FOU
ND":I%.19:. 3500...... E%.1 .G$.."M".K$.
"NO MORE ENTRIES FOUND TO MATCH":I%.19:.
3500......54276,17:.A5.1.50:.:.54276,0.:
....S$:S$.G(F(S$."!").95):. S$."". G$.."
M" . 4330.N.... V%.0 . . 4.0(.Y....18.0A
.._.....Y.0.. " SEARCH SUCCESSFUL...:.E%
.1:.".";:.8600:.8700:. G$."M" . B.R%:..Y
.D.. S.1 . K$."(M)ENU, (N)EXT RECORD":I%
.19:.3500...I.. S..1 . ....N.. G$:G$.G(F
(G$."!").95):.G$."M" . B.R%:..&.X.. G$."
N" . ..1.B.. 4430.S.... " SET UP FILE FR
OM KEYBOARD.W....".";.11);"S E T U P. 4M
O D E".......10);".=`."......".";H(D$,8
);"(1 TO 14)"......".";H(D$,6);"HOW MANY
FIELDS PER RECORD? ";...F.O.2:P.1:Q.14:
MC.1:.5200:F%.D...K.. A9.1 . F%.I.P.."."
;.10);"DEFINITION OF FIELD";:.F%.1.."S";
.F.Z.."...`EFIELD NUMBER ";A9.Y...X.2:Y.
7:. 5500...........".FIELD SUMMARY:";:.
8.0A..M....".";.9);H(D$,24);"IS THIS COR
RECT (Y/N)?";......G$:G$.G(F(G$."!").95)
:.". ..";:.G$.."Y".G$.."N".." .";:.4610.
#.... G$."Y" . 4700.S....".";.9);H(D$,24
);"CORRECT WHICH FIELD ? ";... .O.2:P.1:
Q.F%:MC.1:.5200:.".";H(D$,24);.9);H(BL$,
25);...*.A9.D:X.2:Y.19:.5500...4..4595..
.\.. 7.0B3...P........ DEFFN I(MI$,MA$,M
I,MA).....S$.""...... G$:.". ..";.0....
G$.".". G$."." . G$."." . G$."." . G$.G(
34). 5020.G.... G$.G(147) . 5020.B.... G
$.G(141) . G$.G(13).}.... G$.G(148) . G$
.G(20)......(G$..MI$.G$..MA$.C(S$).MA).(
G$.G(13).C(S$)..MI).5060.B...." .";.....
.(G$.G(20).C(S$)..0).(G$." ".C(S$)..0.C(
S$).MA.D...255).5060......5020...D.." ."
;.*.I.S$.S$.G$:C%.0.?.N..G$.G(20) . C%.2
.T.X..G$.G(13) . C%.1.J...S$.H(S$,C(S$).
C%)...... G$..G(13) . .G$;...... C(S$)..
MA.G$..G(13) .5020.........P.. DEFFN R(O
,P,Q,MC).J.Z.D..255...D.MI$."-":MA$."9":
MI.MC:MA.O:.5.0`.:D.E(S$).'.N..(D.P . D.
Q) . S$.."" ..A.1.C(S$):.G(20);:..>.X..
D.P . D.Q . 5220.D.....^.|.. INPUT FIELD
DETAILS......".";H(D$,Y);" FIELD TITLE
";.....MI$." ":MA$.".":MI.1:MA.13:.5.0B-
.A.... C(S$).VV . VV.C(S$).1.O...F$(A9).
S$......".";H(D$,Y.X);" FIELD TYPE (S/N)
";.: ...G$:G$.G(F(G$."!").95):.". ..";:
.G$.."S".G$.."N".." .";:.5560.X ...G$."S
" . ."STRING":.5590.M B.. G$.."N" . 5560
.| L.."NUMERIC".. V.F$(A9).G$.F$(A9).. .
..".";H(D$,Y.2.X);" FIELD LENGTH ";.T ..
O.2:P.1:Q.23:MC.1:.5200.. ..F%(A9).D.. .
.... P.. PROCI..!Z.F%.0:R%.0:V%.0:VV.0:L
%.0:E%.0:. 6500.?!... I%.1 . 14:F$(I%).H
(BL$,15):..!...I%.0.1:A$(I%)..BL$..H(BL
$,12):B$(I%)..BL$..H(BL$,12):...!..A$..B
L$.?8H(BL$,12):B$.A$:F$.A$..!.....!T.. P
ROC G..!...".REPLACE FIELD:":. 8.0`.:.".
SELECT FIELD? ";.."..O.2:P.1:Q.F%:MC.1:.
5200:A.D:..G"...".SEARCH ";:A$."VALUE":
. H(F$(A),1)."S" . A$."STRING".."... A$;
"? ";:MI$." ":MA$.".":MI.1:MA.F%(A):. 5.
0`C:F$.S$.A"...:."REPLACE ";A$;"? ";:MI$
." ":MA$.".":MI.1:MA.F%(A):. 5.0`..."..A
$.S$:.".";:K$."REPLACING":I%.3:. 3500.."
..S.0:. D.1 . R%.%#$.. F$.AR$(D,A) . AR$
(D,A).A$:S.S.1.+#....J#8.K$."COMPLETED":
I%.3:. 3500.W#B.K$.D(S)." FIELD(S) REPLA
CED":I%.5:. 3500..#G..54276,17:.A5.1.50:
.:.54276,0..#L..18.00..#V....#D.. PRO.C`
..Y#N.E%.0:. H(F$(L%),1)."N" . E%.1..#X.
...#X.. PROCSI..$B.R0.0:.A8.1.14:R0.R0.F
%(A8).2:..4$L.R0..(14300.R0):. R0.200 .
R0.200.:$....H$L.. PROC SA..$P.DE.1:. DE
VICE=TAPE:.*! .'*`..$Q.K$."":I%.20:.350
0:I%.22:.3500.X$V.K$."SAVING FILE":I%.18
:.3500..$`.."INPUT FILE NAME: ";..%J.MI$
."!":MA$.".":M1.1:MA.10:.5.08:..2%O.C1.4
4:C2.166:. 13.0`..B%T.. 1,DE,1,S$.^%~..1
,F%:.1,R%:.1,R0:.1,VV..%... A.1 . F%:.1,
F%(A):.1,F$(A):...%... A.1 . R%..%... B.
1 . F%:.1,AR$(A,B):...%.....%.. 1.S%..C1
.166:C2.44:. 13.0`K..%..K$."FILE SAVED":
I%.18:. 3500..&...54276,17:.A5.1.50:.:.5
4276,0.!&D..18.0`..K&N.DE.0:. RESTORE SC
REEN AS OUPUT DEVICE.Q&X...^&@.. PROC F.
.&T.."...NO";.11);"TITLE";.11);"LENGTH S
/N"..&^..A.1.F%:.".";H(D$,3.A);..&_..A;.
11);I(F$(A),C(F$(A)).1);.35.C(D(F%(A).1.
)';F%(A);.A.'H.. .38);G(F(H(F$(A),1)).12
8)..'R....'|....'... LIST RECORDS.6'..."
. LIST RECORDS:".P'...B.1.2:.F$:.".";H(D
$,4.B.4);.6);"<";G(B.192);"> ";F$.V'...
..'..K$."SELECT OPTION :":I%.20:. 3500.Q
'B..G$:G$.G(F(G$."!").95):.G$.."A" . G$.
."B" . 8130..'G.K$."":I%.20:. 3500..(L.A
$.G$:K$.D(R%)." RECORD(S) ENTERED":I%.14
:. 3500.=(V..".INPUT RANGE":.:."FROM ";.
`(..O.4:P.1:Q.R%:MC.1:. 5200:B.D.1..(...
" TO ";:O.4:P.B.1:Q.R%:MC.1:. 5200:W.D..
(...A$."B". .21.0`':.4,4,7.Z(... A$."B"
. DE.4:B.B.1:.8500.:.4`.:. B.W . 8180..(
... A$."B" . DE.0: 4:.198,0:..*). B.B.1:
.".";:. 8600:S.0:. 8700:. S.1 . B.B.1.;)
. . B.W . 8200.O). . G$."M" . 8240.|)! K
$."NO MORE ENTRIES":I%.19:. 3500:. G(7).
.)& .18.01..)0 . V%.0 . . 4.0`D..): ...)
4!. PROC PR.P)>!.DE,"RECORD NO. ";B:.A8.
1.F%..*H!.DE,I(F$(A8),C(F$(A8)).1);I(BL$
,25.C(F$(A8.)C';": ";..*M!.DE,AR$(B,A8).
"*R!.:../*.!. PROC P.M*.!."RECORD NO. ";
B:.A8.1.F%.|*.!.".";H(D$,3.A8);I(F$(A8),
C(F$(A8)).1).": "..*.!.".";H(D$,3.A8);.1
.VV);AR$(B,A8):.:...*.!. PROC CH..*."K$.
"(N)EXT REC, (D)ELETE, (M)ENU, (A)LTER":
I%.19:. 3500..+.".G$:. G$."" . 8720..+."
G$.G(F(G$).95)..+.". G$."M" . B.W:..?+."
. G$."N" . ..A+.". G$."A" . .".";:S.1:.
9500:..V+$". G$.."D" . 8720..+.". 8800:.
G$."N" . ...+8"K$."(N)EXT RECORD, (M)EN
U":I%.19:. 3500..+B".G$:G$.G(F(G$."!").9
5):.G$.."N" . G$.."M" . 8770..,L". G$."M
" . B.W..,V"...,`". PROC D.P,J"K$."ARE Y
OU SURE THAT YOU WISH TO DELETE":I%.19:.
3500..,T"K$."RECORD NO. ".D(B)." (Y/N)?
":I%.20:. 3500..,~".G$:G$.G(F(G$."!").95
):.G$."N" . B.B.1:..C,.". G$.."Y" . 8830
.S,."AR$(B,1).""..,."K$."RECORD DELETED"
:I%.19:. 3500..-."K$."":I%.20:. 3500.!-.
"V%.V%.1:.G(7).,-.".18.0`..2-."..B-(#. L
OAD DATA..-+#DE.1:. DEVICE=TAPE:.*! .'*`
...-,#. ERASE AR$..--#K$."":I%.20:. 3500
.G-.#I%.22:. 3500..-<#K$."LOADING FILE":
I%.18:. 3500...F#."INPUT FILE NAME:";.).
P#MI$."!":MA$.".":MI.1:MA.10:. 5.09.9.Z#
. 1,DE,0,S$.L.D#.1,F.%,R`.0,VV.C.N#. DIM
AR$(R0,F%+1)...X#. A.1 . F%:.1,F%(A),F$
(A):.....#.A.1. R%....#. B.1 . F%:.1,AR$
(A,B):.... #.....# 1.R..#C1.166:C2.44:.1
3.0`L....#.54276,17:.A5.1.50:.:.54276,0.
./.#K$."FILE LOADED":I%.18:. 3500.!/.#.1
8.0A_.'/H#..4/.#. PROC A.>/.#.".";.I/.#K
$."RECORD NUMBER".D(R%.1):I%.1:. 3500../
.$R%.R%.1:. A8.1 . F%../.$.".";H(D$,3.A8
);I(F$(A8),C(F$(A8)).1).": "../.$.".";H(
D$,3.A8);.1.VV);:O.F%(A8):MI$." "../.$.H
(F$(A8),1).."N".9260..0"$P..2E9:Q.2E9:MC
.1:. 5200.)0#$AR$(R%,A8).D(D).P0'$.D..1.
AR$(R%,A8).I(D(D),C(D(D)).1)..0,$.H(F$(A
8),1)."S" .MA$.".":MI.1:MA.F%(A8):.5.0A.
:AR$(R%,A8).S$..0@$.:..N0J$K$."(M)ENU, (
N)EXT RECORD, (A)LTER":I%.23:. 3500..0T$
.G$:. G$."" . 9300..0Y$G$.G(F(G$).95)..1
^$. G$."M" . ..B1H$.G$."N".R%..R0. K$."M
EMORY FULL":I%.23:. 3500:. 9400..1R$. G$
."N" . R%.5..R0 . K$."ROOM FOR ONLY ".D(
R0.R%)." RECORD(S)"..1S$. G$."N" . R%.5.
.R0 . I%.23:. 3500:. 9400..1|$. G$."A" .
B.R%:.".MODIFY RECORD:":. 9500:. 9290..
1.$.G$."N".9205..2.$.9300..2.$.18.0B@..2
B$..#2.%. PROC MO.A2&%."RECORD NO. ";B:.
A8.1.F%.P20%.".";H(D$,3.A8);I(F$(A8),C(F
$(A8)).1).": "..21%.".";H(D$,3.A8);.1.VV
);AR$(B,A8).D2:%K$."IS THIS CORRECT (Y/N
)?":I%.4.A8:. 3500..2D%.G$:G$.G(F(G$."!"
).95):.G$."Y" . 9599..3N%. G$.."N" . 954
0..3X%K$."":I%.3.A8:. 3500.L3]%K$."PLEAS
E ENTER CORRECTION":I%.4.A8:. 3500.{3B%.
".";H(D$,3.A8);I(F$(A8),C(F$(A8)).1).":
"..3C%.".";H(D$,3.A8);.1.VV);:O.F%(A8):M
I$." ".E3G%. H(F$(A8),1).."N" .9590..3L%
P..2E9:Q.2E9:MC.1:.5200..3M%AR$(B,A8).D(
D)..4Q%. D..1 . AR$(B,A8).I(D(D),C(D(D))
.1)._4V%. H(F$(A8),1)."S" . MA$.".":MI.1
:MA.F%(A8):.5.0`.:AR$(B,A8).S$.X4%K$.""
:I%.4.A8:. 3500..4.%.:...4.':..4.'. SORT
ROUTINES..4.'.".MULTI-FIELD SORT:".L4$'
B%.F%:. F%.4 . B%.4..4.'. F%.1 . . 8.0A~
..58'.F%.1 .."..SORT TO BE DONE ON FIELD
ONE.":Z.0:A.1:.10097.O5B'.:.".SELECT UP
TO";B%;" FIELDS FOR SORT":Z..1..5L'Z.Z.
1:."SORT FIELD";Z.1;": ";:O.C(D(F%)):P..
(Z.0):Q.F%:MC.0..5V'. 5200:A(Z).D:.:. Z.
3 . A(Z)..0 . 10060.M5`'. Z.0 . 10070..5
J'. A(Z).0 . Z.Z.1..6K'C.0:.A.0.Z.1:.B.A
.1 . Z:. A(A).A(B) . C.1..6L'. B,A:.".";
:. C.1 . 10096.V6M'K$."ILLEGAL SELECTION
":I%.15:. 3500.A6N'.18.0(.M6O'. 1.0`H..6
P'.".FIELD ORDER FOR SORT:";:.A.0.Z:.A(A
);",";:.:.G(20)..6Q'A.A(0):."..`%SORT IN
TO (A)SCENDING OR (D)ESCENDING. `FORDER
?"..7R'.G$:G$.G(F(G$."!").95):. G$.."A".
G$.."D".10098.Q7S'K$."SORTING":I%.21:. 3
500:. Z..0 . .11.0`U:. 10150.]7T'. 10200
.T7.'K$."SORTED":. 3500..7.'.54276,17:.A
5.1.50:.:.54276,0..7.'.18.0`}..7.'..B7X'
. SORT ON SINGLE FIELD..7Y'T.(H(F$(A),1)
."N")..2.(H(F$(A),1)."S")..1..8.'.A9.1.R
%:B$(A9).AR$(A9,A):..!8.'N.R%:. 17.0I..3
8.'. G$.."D" . ..W8.(.A9.1..(R%.2):.A8.1
.F%:K$.AR$(A9,A8):AR$(A9,A8).AR$(R%.1.A9
,A8)..8.(AR$(R%.1.A9,A8).K$:.:.:...8.*.
MULTI FIELD SORT.Q8.+A.A(0):. 10200:. SO
RT FIRST FIELD..8.+. A5.0.Z.1..9.+T.(H(F
$(A(A5.1)),1)."N")..2.(H(F$(A(A5.1)),1).
"S")..1.(9 +P1.0:P2.0.79*+. A7.1. R%.L94
+. AR$(A7,A(A5))..AR$(A7.1,A(A5)) . P1..
0 . 11070.95+. A5.0 . 11069..96+. AR$(A
7,A(0))..AR$(A7.1,A(0)) . 11065..97+. A5
.1 . 11069..98+. AR$(A7,A(1)).AR$(A7.1,A
(1)) . 11069..99+A5.Z:A7.R%:. 11080..:=+
P1.A7.E:>+. AR$(A7,A(A5))..AR$(A7.1,A(A5
)) . P1..0 . P2.A7:. 11200.K:H+..Q:R+..W
:\+..I:.+. MATCH FOUND..:E+. A9.1 . 16:B
$(A9)."":...:J+.A8.P1.P2:B$(A8).AR$(A8,A
(A5.1)):...:T+L.P1:R.P2:N.P2.P1.1:B$(P1.
1)."":B$(P2.1).G(255)..:.+. 17100..;.+.G
$.."D" . 11250.3;.+.A9.0..((P2.P1).2):.
A8.1.F%:K$.AR$(A9.P1,A8).H;.+AR$(A9.P1,A
8).AR$(P2.A9,A8):AR$(P2.A9,A8).K$:.:..Q;
.+P1.0.W;.+...;H2. A7.1 . R%..;R2. A8.1
. F%:A$."":A1$.""..;.2. A9.1 . C(AR$(A7,
A8))..;.2A1$.G(C2):.J(AR$(A7,A8),A9,1)..
G(C1).A1$.J(AR$(A7,A8),A9,1)..<.2A$.A$.A
1$..<.2. A9.0<.3AR$(A7,A8).A$:. A8,A7.6<
.3..J<HB. QUICK SORT ROUTINE - SINGLE FI
ELD ENTRY POINT.V<RBL.1:R.N..<|BB$(0).""
:B$(N.1).G(255).E<LB. QUICK SORT ROUTINE
- MULTI FIELD ENTRY POINT..<VB. A9.1.10
:S(A9).0:...<.BP.1:M.10..<DC. R.L.M . 17
630..=NCI.L..=XCJ.R.7=BCK$.B$(L):.A8.1.F
%:K$(A8).AR$(L,A8):..I=VC. (K$.B$(J).T.1
).(E(K$).E(B$(J)).T.2) . 17280.U=WC. 173
10.=.CJ.J.1..=.C. 17270..=.C. J.I . 173
40.F=.CB$(I).K$:.A8.1.F%:AR$(I,A8).K$(A8
):..R=.C. 17490..>.CB$(I).B$(J):.A8.1.F%
:AR$(I,A8).AR$(J,A8):...>FCI.I.1.?>ZC. (
B$(I).K$ . T.1).(E(B$(I)).E(K$).T.2) . 1
7380.K>.C. 17410.U>.CI.I.1.A>.C. 17370.S
>.D. J.I . 17450..>.DB$(J).K$:. A8.1 . F
%:AR$(J,A8).K$(A8):...>.DI.J..> D. 17490
..>*DB$(J).B$(I):. A8.1 . F%:AR$(J,A8).A
R$(I,A8):...>4DJ.J.1..>>D. 17270..?RD. R
.I.I.L . 17560..?\DS(P).R.&?FDP.P.1.3?PD
S(P).I.1.=?ZDP.P.1.G?.DR.I.1.S?.D. 17220
.`?.DS(P).I.1.J?.DP.P.1.U?.DS(P).L.?.DP
.P.1..?.DL.I.1..?JD. 17220..?.DJ.L..?.DJ
.J.1..?.D. J.R . 17750..?.DK$.B$(J):. A8
.1 . F%:K$(A8).AR$(J,A8):...?.EI.J.1."@.
E. (B$(I).K$ .T.1).(E(B$(I)).E(K$).T.2)
. 17690..@.E. 17720.B@.EB$(I.1).B$(I):.
A8.1.F%:AR$(I.1,A8).AR$(I,A8):..L@$EI.I.
1.X@.E. 17680..@8EB$(I.1).K$:. A8.1 . F%
:AR$(I.1,A8).K$(A8):...@BE. 17640.F@VE.
P.1 . 17820.P@`EP.P.1..@JEL.S(P)..@TEP.P
.1..@~ER.S(P)..@.E. 17220..A.E..,APF..G(
7)".:.I.1.300:.G$:.G$.."".I.1001.4AUF.:.
.?A N. DATA..A*N."LOAD OLD FILE","SETUP
NEW FILE","ADD RECORDS","FIELD SUMMARY".
FA4N."MODIFY RECORD","LIST RECORDS","FIE
LD SEARCH","REPLACE FIELD".A.B>N."MULTI-
FIELD SORT","SAVE CURRENT FILE","END PRO
GRAM".8BHN."LIST RECORDS TO SCREEN","LIS
T RECORDS TO PRINTER".]BRN. "SEARCH FOR
A SPECIFIC STRING"..B\N.4,"SEARCH FOR A
VALUE X","SEARCH FOR VALUES>X","SEARCH O
R VALUES<X"..BFN."SEARCH FOR A<X<B".VBPN
.56334,B(56334).254..BUNA.B(43).B(44).25
6:C.B(45).B(46).256.9CZN.B.1.9:.630.B,F(
J("SYS64738".G(13),B,1)):.:.198,9:.".".K
CN.B.A.C:.B,0:..QC.N..NC.R. STOP PRINT
ER BREAK IN. C.R.XB.1.9:.630.XB,F(J(".GO
21030".G(13),XB,1)):...C.R.198,9:...C&R
4:.210.B
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL