000000: 45 58 54 45 4E 44 45 44 20 43 50 43 20 44 53 4B EXTENDED CPC DSK
000010: 20 46 69 6C 65 0D 0A 44 69 73 6B 2D 49 6E 66 6F File..Disk-Info
000020: 0D 0A 53 41 4D 64 69 73 6B 31 35 30 37 30 38 00 ..SAMdisk150708.
000030: 28 01 00 13 13 13 13 13 13 13 13 13 13 13 13 13 (...............
000040: 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13 13 ................
000050: 13 13 13 13 13 13 13 13 13 13 13 13 00 00 00 00 ................
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
000110: 00 00 01 00 02 09 52 E5 00 00 41 02 00 00 00 02 ......R...A.....
000120: 00 00 46 02 00 00 00 02 00 00 42 02 00 00 00 02 ..F.......B.....
000130: 00 00 47 02 00 00 00 02 00 00 43 02 00 00 00 02 ..G.......C.....
000140: 00 00 48 02 00 00 00 02 00 00 44 02 00 00 00 02 ..H.......D.....
000150: 00 00 49 02 00 00 00 02 00 00 45 02 00 00 00 02 ..I.......E.....
000160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000200: 11 00 03 21 00 00 06 04 CD 01 02 30 34 10 F9 CD ...!.......04...
000210: C5 01 20 64 11 00 0C 06 10 7E B7 28 1A E5 C5 6F .. d.....~.(...o
000220: 26 00 CD FC 01 30 1A C1 E1 23 10 ED 21 2A 02 34 &....0...#..!*.4
000230: D5 CD C5 01 D1 28 E0 21 00 0C 0E FF CD 9B BE 16 .....(.!........
000240: BD 21 46 01 18 6B 0D 0A 44 69 73 63 65 74 74 65 .!F..k..Discette
000250: 20 72 65 61 64 20 66 61 69 6C 75 72 65 0D 0A 50 read failure..P
000260: 72 65 73 73 20 61 6E 79 20 6B 65 79 20 74 6F 20 ress any key to
000270: 72 65 73 74 61 72 74 FF 21 7D 01 18 34 0D 0A 43 restart.!}..4..C
000280: 61 6E 6E 6F 74 20 66 69 6E 64 20 22 2E 45 4D 53 annot find ".EMS
000290: 22 20 66 69 6C 65 0D 0A 50 72 65 73 73 20 61 6E " file..Press an
0002A0: 79 20 6B 65 79 20 74 6F 20 72 65 73 74 61 72 74 y key to restart
0002B0: FF 7E 23 FE FF C4 5A BB 20 F7 CD 1B BB 38 FB CD .~#...Z. ....8..
0002C0: 18 BB CF 00 00 21 00 03 06 40 7E E6 F0 20 22 C5 .....!...@~.. ".
0002D0: E5 11 0D 00 19 11 2B 02 01 FF 0C 1B 1A 2B AE A1 ......+......+..
0002E0: 28 09 1A FE 3F 20 08 7E A1 12 AF 0E 7F 10 EC E1 (...? .~........
0002F0: C1 11 10 00 19 C8 19 10 D1 F6 FF C9 29 CD 01 02 ............)...
000300: D0 C5 E5 01 F7 FF 3E 01 3C 09 38 FC 67 7D C6 4A ......>.<.8.g}.J
000310: 4F 2E 00 EB CD 89 BE EB E1 C1 D0 14 14 23 C9 3F O............#.?
000320: 3F 3F 3F 3F 3F 3F 3F 45 4D 53 00 CF CF CF CF CF ???????EMS......
000330: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
000340: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
000350: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
000360: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
000370: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
000380: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
000390: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
0003A0: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
0003B0: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
0003C0: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
0003D0: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
0003E0: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
0003F0: CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF CF ................
000400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0004A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0004B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0004C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0004D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0004E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0004F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0005A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0005B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0005C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0005D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0005E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0005F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0006A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0006B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0006C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0006D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0006E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0006F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0007A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0007B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0007C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0007D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0007E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0007F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0008A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0008B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0008C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0008D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0008E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0008F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0009A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0009B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0009C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0009D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0009E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0009F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000A90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000AA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000AB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000AC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000AD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000AE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000AF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000C00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000C10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000C20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000C30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000C40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000C50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000C60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000C70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000C80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000C90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000CA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000CB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000CC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000CD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000CE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000CF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000D00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000D10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000D20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000D30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000D40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000D50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000D60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000D70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000D80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000D90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000DA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000DB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000DC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000DD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000DE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000DF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000E90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000EA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000EB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000EC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000ED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000EE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000EF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000F90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000FA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000FB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000FC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000FD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000FE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000FF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0010A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0010B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0010C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0010D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0010E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0010F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0011A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0011B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0011C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0011D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0011E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0011F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0012A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0012B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0012C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0012D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0012E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0012F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0013A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0013B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0013C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0013D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0013E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0013F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001400: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
001410: 01 00 01 00 02 09 52 E5 01 00 41 02 00 00 00 02 ......R...A.....
001420: 01 00 46 02 00 00 00 02 01 00 42 02 00 00 00 02 ..F.......B.....
001430: 01 00 47 02 00 00 00 02 01 00 43 02 00 00 00 02 ..G.......C.....
001440: 01 00 48 02 00 00 00 02 01 00 44 02 00 00 00 02 ..H.......D.....
001450: 01 00 49 02 00 00 00 02 01 00 45 02 00 00 00 02 ..I.......E.....
001460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001480: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0014F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0015A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0015B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0015C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0015D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0015E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0015F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0016A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0016B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0016C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0016D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0016E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0016F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001700: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001710: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001720: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001730: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001740: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001750: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001760: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001770: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001780: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001790: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0017A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0017B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0017C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0017D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0017E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0017F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001800: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001810: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001820: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001830: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001840: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001850: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001860: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001870: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001880: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001890: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0018A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0018B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0018C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0018D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0018E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0018F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0019A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0019B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0019C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0019D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0019E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0019F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001A00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001A10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001A20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001A30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001A40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001A50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001A60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001A70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001A80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001A90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001AA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001AB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001AC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001AD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001AE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001AF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001C90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001CA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001CB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001CC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001CD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001CE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001CF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001D00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001D10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001D20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001D30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001D40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001D50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001D60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001D70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001D80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001D90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001DA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001DB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001DC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001DD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001DE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001DF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001E00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001E10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001E20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001E30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001E40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001E50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001E60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001E70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001E80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001E90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001EA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001EB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001EC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001ED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001EE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001EF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001F00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001F10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001F20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001F30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001F40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001F50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001F60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001F70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001F80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001F90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001FA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001FB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001FC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001FD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001FE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
001FF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0020A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0020B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0020C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0020D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0020E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0020F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0021A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0021B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0021C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0021D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0021E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0021F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002200: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0022A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0022B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0022C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0022D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0022E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0022F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0023A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0023B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0023C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0023D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0023E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0023F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0024A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0024B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0024C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0024D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0024E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0024F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0025A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0025B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0025C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0025D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0025E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0025F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0026A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0026B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0026C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0026D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0026E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0026F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002700: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
002710: 02 00 01 00 02 09 52 E5 02 00 41 02 00 00 00 02 ......R...A.....
002720: 02 00 46 02 00 00 00 02 02 00 42 02 00 00 00 02 ..F.......B.....
002730: 02 00 47 02 00 00 00 02 02 00 43 02 00 00 00 02 ..G.......C.....
002740: 02 00 48 02 00 00 00 02 02 00 44 02 00 00 00 02 ..H.......D.....
002750: 02 00 49 02 00 00 00 02 02 00 45 02 00 00 00 02 ..I.......E.....
002760: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002770: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002780: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002790: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0027F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002800: 00 41 43 43 45 53 53 31 20 42 4F 58 00 00 00 30 .ACCESS1 BOX...0
002810: 1E 1F 20 21 22 23 00 00 00 00 00 00 00 00 00 00 .. !"#..........
002820: 00 41 43 43 45 53 53 32 20 42 4F 58 00 00 00 28 .ACCESS2 BOX...(
002830: 24 25 26 27 28 00 00 00 00 00 00 00 00 00 00 00 $%&'(...........
002840: 00 41 44 44 4B 45 59 20 20 42 4F 58 00 00 00 20 .ADDKEY BOX...
002850: 29 2A 2B 2C 00 00 00 00 00 00 00 00 00 00 00 00 )*+,............
002860: 00 42 54 52 45 45 20 20 20 50 41 53 00 00 00 20 .BTREE PAS...
002870: 2D 2E 2F 30 00 00 00 00 00 00 00 00 00 00 00 00 -./0............
002880: 00 42 54 52 45 45 31 20 20 49 4E 43 00 00 00 30 .BTREE1 INC...0
002890: 31 32 33 34 35 36 00 00 00 00 00 00 00 00 00 00 123456..........
0028A0: 00 42 54 52 45 45 32 20 20 49 4E 43 00 00 00 38 .BTREE2 INC...8
0028B0: 37 38 39 3A 3B 3C 3D 00 00 00 00 00 00 00 00 00 789:;<=.........
0028C0: 00 43 31 30 43 50 4D 33 20 45 4D 53 00 00 00 80 .C10CPM3 EMS....
0028D0: 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F 10 11 ................
0028E0: 00 43 31 30 43 50 4D 33 20 45 4D 53 01 00 00 48 .C10CPM3 EMS...H
0028F0: 12 13 14 15 16 17 18 19 1A 00 00 00 00 00 00 00 ................
002900: 00 43 55 53 54 4F 4D 45 52 44 54 41 00 00 00 40 .CUSTOMERDTA...@
002910: 3E 3F 40 41 42 43 44 45 00 00 00 00 00 00 00 00 >?@ABCDE........
002920: 00 44 45 4C 4B 45 59 20 20 42 4F 58 00 00 00 38 .DELKEY BOX...8
002930: 46 47 48 49 4A 4B 4C 00 00 00 00 00 00 00 00 00 FGHIJKL.........
002940: 00 47 45 54 4B 45 59 20 20 42 4F 58 00 00 00 30 .GETKEY BOX...0
002950: 4D 4E 4F 50 51 52 00 00 00 00 00 00 00 00 00 00 MNOPQR..........
002960: 00 47 49 4E 53 54 20 20 20 43 4F 44 00 00 00 80 .GINST COD....
002970: 53 54 55 56 57 58 59 5A 5B 5C 5D 5E 5F 60 61 62 STUVWXYZ[\]^_`ab
002980: 00 47 49 4E 53 54 20 20 20 43 4F 44 01 00 00 38 .GINST COD...8
002990: 63 64 65 66 67 68 69 00 00 00 00 00 00 00 00 00 cdefghi.........
0029A0: 00 47 49 4E 53 54 20 20 20 43 4F 4D 00 00 00 58 .GINST COM...X
0029B0: 6A 6B 6C 6D 6E 6F 70 71 72 73 74 00 00 00 00 00 jklmnopqrst.....
0029C0: 00 47 49 4E 53 54 20 20 20 44 54 41 00 00 00 28 .GINST DTA...(
0029D0: 75 76 77 78 79 00 00 00 00 00 00 00 00 00 00 00 uvwxy...........
0029E0: 00 47 49 4E 53 54 20 20 20 4D 53 47 00 00 00 18 .GINST MSG....
0029F0: 7A 7B 7C 00 00 00 00 00 00 00 00 00 00 00 00 00 z{|.............
002A00: 41 BE E1 38 02 36 00 CD D7 0A CD BA 0D 9F 32 40 A..8.6........2@
002A10: BE CD 00 04 CD 78 01 CD 9A 01 3A 41 BE C9 3E FF .....x....:A..>.
002A20: 32 F3 FF 06 08 3A 41 BE 4F 3A 40 BE 21 E8 FF C9 2....:A.O:@.!...
002A30: AF 21 01 02 01 00 01 C9 11 00 01 3E 08 CD 72 05 .!.........>..r.
002A40: 3A 40 BE B7 3E 09 28 01 3C CD 72 05 3A 41 BE B7 :@..>.(.<.r.:A..
002A50: 3E 0B C4 72 05 3E 0D C3 72 05 01 00 08 11 67 8C >..r.>..r.....g.
002A60: 21 00 8A E5 CD D9 01 2B 70 2B 70 23 23 E5 06 0A !......+p+p##...
002A70: CD D9 01 01 02 17 11 80 50 CD D9 01 2B 70 2B 70 ........P...+p+p
002A80: 21 CE 01 11 E8 FF 01 0B 00 ED B0 E1 D1 C9 00 67 !..............g
002A90: 8C 69 24 02 80 50 80 2F FF 78 B7 C8 36 FF D5 11 .i$..P./.x..6...
002AA0: 0F 00 19 54 5D 2B 72 2B 73 2B 71 EB E3 EB 2B 72 ...T]+r+s+q...+r
002AB0: 2B 73 E1 14 14 10 E5 C9 FF FF FF FF FF FF FF FF +s..............
002AC0: 78 B7 CA 06 BB FE 02 CA 29 03 AF C9 04 05 CA 11 x.......).......
002AD0: 04 05 79 CA 31 BD C3 5C 03 04 10 0B CD 09 BB DC ..y.1..\........
002AE0: 0C BB 9F 32 F3 FF C9 78 EE 01 C4 48 03 9F C9 CD ...2...x...H....
002AF0: 34 02 9F C9 04 05 37 C8 10 05 CD 2E BD 3F C9 C3 4.....7......?..
002B00: 66 03 CD 77 02 CD 00 3D CD 87 02 FE 43 28 12 FE f..w...=....C(..
002B10: 49 37 28 0D FE 52 28 08 CD 45 06 CD 7D 02 18 E5 I7(..R(..E..}...
002B20: B7 F5 CD 72 02 F1 C9 CD 8C 06 06 0E CD 77 02 CD ...r.........w..
002B30: 00 3D CD 5A 06 18 06 CD 2E 06 CD B0 0E CD 06 3D .=.Z...........=
002B40: 3C C0 CD 00 3D 18 F6 FE 61 D8 FE 7B D0 C6 E0 C9 <...=...a..{....
002B50: CB 42 79 C4 27 BB CB 4A 79 C4 2D BB CB 62 79 C4 .By.'..Jy.-..by.
002B60: 33 BB C9 C3 3F BB CD 1B BB 4F 06 00 C9 C9 01 DD 3...?....O......
002B70: FA 22 5C BE ED 53 5A BE 32 58 BE 3E 18 ED 79 3E ."\..SZ.2X.>..y>
002B80: 04 ED 79 7B FE 02 38 01 1C 7A 3C 87 87 B3 F6 40 ..y{..8..z<....@
002B90: ED 79 3E 05 ED 79 7D CD 0F 03 0F 5F 3A 58 BE 2F .y>..y}...._:X./
002BA0: E6 80 F6 0A B3 32 59 BE ED 79 3E 03 ED 79 7C CD .....2Y..y>..y|.
002BB0: 0F 03 F6 01 ED 79 0C 0C 21 A5 02 CD 01 03 D0 2E .....y..!.......
002BC0: 5A ED 61 ED 69 ED 61 ED 78 AD E6 F8 C0 37 C9 D6 Z.a.i.a.x....7..
002BD0: 05 C8 0F 0F EE C0 C0 3E C0 C9 ED 4B 5E BE ED 5B .......>...K^..[
002BE0: 5A BE 2A 5C BE 3A 58 BE C9 01 DD FA 3A 58 BE B7 Z.*\.:X.....:X..
002BF0: 28 08 ED 78 1F 38 08 CD 8B 03 ED 78 1F 30 FB 7A (..x.8.....x.0.z
002C00: 00 49 4E 53 54 41 4C 4C 31 44 4F 43 00 00 00 28 .INSTALL1DOC...(
002C10: 7D 7E 7F 80 81 00 00 00 00 00 00 00 00 00 00 00 }~..............
002C20: 00 49 4E 53 54 41 4C 4C 32 44 4F 43 00 00 00 38 .INSTALL2DOC...8
002C30: 82 83 84 85 86 87 88 00 00 00 00 00 00 00 00 00 ................
002C40: 00 52 45 41 44 20 20 20 20 4D 45 20 00 00 00 08 .READ ME ....
002C50: 89 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002C60: 00 53 4F 52 54 31 20 20 20 42 4F 58 00 00 00 38 .SORT1 BOX...8
002C70: 8A 8B 8C 8D 8E 8F 90 00 00 00 00 00 00 00 00 00 ................
002C80: 00 53 4F 52 54 31 20 20 20 50 41 53 00 00 00 10 .SORT1 PAS....
002C90: 91 92 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002CA0: 00 53 4F 52 54 32 20 20 20 42 4F 58 00 00 00 40 .SORT2 BOX...@
002CB0: 93 94 95 96 97 98 99 9A 00 00 00 00 00 00 00 00 ................
002CC0: 00 53 4F 52 54 32 20 20 20 50 41 53 00 00 00 20 .SORT2 PAS...
002CD0: 9B 9C 9D 9E 00 00 00 00 00 00 00 00 00 00 00 00 ................
002CE0: 00 53 54 4F 43 4B 20 20 20 44 54 41 00 00 00 28 .STOCK DTA...(
002CF0: 9F A0 A1 A2 A3 00 00 00 00 00 00 00 00 00 00 00 ....£...........
002D00: 00 54 59 50 45 20 20 20 20 43 4F 4D 00 00 00 18 .TYPE COM....
002D10: 1B 1C 1D 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002D20: 00 58 52 45 46 20 20 20 20 43 4F 4D 00 00 00 38 .XREF COM...8
002D30: A4 A5 A6 A7 A8 A9 AA 00 00 00 00 00 00 00 00 00 ................
002D40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002D50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002D60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002D70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002D80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002D90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002DA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002DB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002DC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002DD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002DE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002DF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002E00: B7 C4 87 03 0D ED 78 C9 01 DD FA 3A 58 BE B7 28 ......x....:X..(
002E10: 07 ED 78 1F D8 CD 8B 03 ED 78 1F C9 5F CD 66 03 ..x......x.._.f.
002E20: 30 FB 0D ED 59 C9 01 DD FA 3E 10 ED 79 3A 58 BE 0...Y....>..y:X.
002E30: B7 20 07 ED 78 E6 04 C8 37 C9 ED 78 E6 20 C8 3E . ..x...7..x. .>
002E40: 01 ED 79 ED 78 1F C9 1E 00 18 02 1E 80 3E 05 ED ..y.x........>..
002E50: 79 3A 59 BE E6 7F B3 ED 79 C9 79 D6 02 C0 60 68 y:Y.....y.y...`h
002E60: 22 5E BE E5 7D 11 DC 36 CD AF 03 F1 11 DD 76 87 "^..}..6......v.
002E70: C6 C4 6F CE 03 95 67 01 DF FB ED 51 4B 04 ED A3 ..o...g....QK..£
002E80: 7E ED 79 C9 FF FF C4 09 83 06 70 04 A1 03 41 03 ~.y.......p...A.
002E90: A1 01 D0 00 68 00 45 00 34 00 23 00 1A 00 11 00 ....h.E.4.#.....
002EA0: 0D 00 07 00 FF FF FF FF FF FF FF FF FF FF FF FF ................
002EB0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
002EC0: 32 68 BE CD 2D 05 CD 17 06 CD 4D 07 CD 6C 05 18 2h..-.....M..l..
002ED0: 3D 79 2A 69 BE E9 CD 4B 05 79 FE 20 38 09 2A E5 =y*i...K.y. 8.*.
002EE0: BE CD CF 07 C3 44 05 CD E1 08 79 FE 1B 28 09 21 .....D....y..(.!
002EF0: C8 04 CD 5A 04 C3 44 05 CD 55 04 21 70 04 CD 5A ...Z..D..U.!p..Z
002F00: 04 D8 21 D5 04 CD 5A 04 2A E5 BE D4 CF 07 CD 44 ..!...Z.*......D
002F10: 05 21 16 04 E5 E1 22 69 BE C9 46 23 BE 23 30 04 .!...."i..F#.#0.
002F20: 23 10 F8 3F C0 5E 23 56 2A E5 BE CD 16 00 37 C9 #..?.^#V*.....7.
002F30: 05 63 A8 04 62 9C 04 59 80 04 33 BE 04 32 B4 04 .c..b..Y..3..2..
002F40: CD 55 04 D6 20 30 01 AF 32 6B BE CD 55 04 D6 20 .U.. 0..2k..U..
002F50: 30 01 AF 2A 6A BE 6F CD 4D 08 18 B2 CD 55 04 D6 0..*j.o.M....U..
002F60: 20 E6 3F CD FE 08 18 A6 CD 55 04 D6 20 E6 3F CD .?......U.. .?.
002F70: F6 08 18 9A CD 55 04 E6 07 CD 20 0A 18 90 CD 55 .....U.... ....U
002F80: 04 E6 03 CD 8B 07 18 86 04 0D 35 08 0A 39 08 08 ..........5..9..
002F90: 22 08 07 FD 07 1D 79 81 07 78 84 07 77 06 08 76 ".....y..x..w..v
002FA0: 02 08 75 EC 08 72 EB 08 71 F1 08 70 ED 08 6F 9A ..u..r..q..p..o.
002FB0: 08 6C 97 08 6B 4A 08 6A 69 08 66 69 05 65 6C 05 .l..kJ.ji.fi.el.
002FC0: 64 6D 08 4E BC 08 4D A3 08 4C 9F 08 4B 93 08 4A dm.N..M£.L..K..J
002FD0: 7B 08 49 19 08 48 45 08 45 72 08 44 0F 08 43 16 {.I..HE.Er.D..C.
002FE0: 08 42 13 08 41 0B 08 31 9D 07 30 9A 07 01 FF 80 .B..A..1..0.....
002FF0: 21 72 BE 11 5C 05 CD EF BC 21 6C BE 11 00 00 42 !r..\....!l....B
003000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0030A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0030B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0030C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0030D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0030E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0030F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0031A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0031B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0031C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0031D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0031E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0031F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003200: 4B C3 E9 BC 21 05 00 22 6E BE C9 21 00 00 22 6E K...!.."n..!.."n
003210: BE 21 7A BE 7E 36 00 B7 C8 C3 84 BB 2A 79 BE 7C .!z.~6......*y.|
003220: 2F A5 C8 32 7A BE C3 81 BB AF 18 02 3E FF 32 79 /..2z.......>.2y
003230: BE C9 21 03 3D 22 7B BE E6 7F 47 21 00 88 04 18 ..!.="{...G!....
003240: 05 7E 23 3C 20 FB 10 F9 7E 23 FE FF C8 B7 F2 98 .~#< ...~#......
003250: 05 E5 CD 9D 05 E1 18 F0 CD 09 06 18 EB FE FE 28 ...............(
003260: 5B FE FD 28 5C 26 00 6A FE FB 28 0E 6B FE FA 28 [..(\&.j..(.k..(
003270: 09 62 FE F8 28 38 FE F9 20 BE C5 D5 16 00 01 F0 .b..(8.. .......
003280: D8 CD DF 05 01 18 FC CD DF 05 01 9C FF CD DF 05 ................
003290: 01 F6 FF CD DF 05 7D C6 30 CD 09 06 D1 C1 C9 3E ......}.0......>
0032A0: FF 3C 09 38 FC ED 42 B2 C8 16 30 B2 18 1B C5 06 .<.8..B...0.....
0032B0: 06 7E 23 FE 20 C4 09 06 10 F7 C1 C9 3A 68 BE B7 .~#. .......:h..
0032C0: C8 79 C6 41 CD 09 06 3E 3A C5 D5 E5 4F 2A 7B BE .y.A...>:...O*{.
0032D0: CD 1E 00 E1 D1 C1 C9 3E FF 32 7D BE 01 FF 80 21 .......>.2}....!
0032E0: 81 BE 11 F2 06 CD EF BC 21 7F BE C3 DA BC CD 91 ........!.......
0032F0: 06 20 0B C5 3E 10 CD 72 05 C1 78 C3 72 05 AF 32 . ..>..r..x.r..2
003300: 8B BE CD 96 06 CD 91 06 0E 07 CA 03 3D AF 32 8A ............=.2.
003310: BE CD FD 07 3E FF 32 8A BE C9 CD 91 06 3E 10 CA ....>.2......>..
003320: 72 05 AF 32 8A BE CD E9 06 CD 91 06 C8 3A 68 BE r..2.........:h.
003330: B7 20 10 3A 7E BE 4F 06 11 3A E3 BE D6 10 CD 96 . .:~.O..:......
003340: 06 18 66 CD 91 06 C8 CD CF 06 18 5D 79 32 7E BE ..f........]y2~.
003350: C9 3A 7D BE B7 C9 F5 78 21 8C BE 06 05 36 20 23 .:}....x!....6 #
003360: 10 FB 22 DC BE 21 C4 06 CD 75 05 CD CF 06 F1 32 .."..!...u.....2
003370: DE BE 21 8C BE 22 DC BE 7E FE FF C4 34 07 D0 CD ..!.."..~...4...
003380: 16 07 18 F4 2A DC BE 71 23 36 FF 22 DC BE C9 CD ....*..q#6."....
003390: 4B 05 CD E1 08 CD 78 BB 22 88 BE 2A E2 BE 2C 26 K.....x."..*..,&
0033A0: 01 CD 75 BB 3E 12 C3 5A BB 2A 88 BE CD 75 BB C3 ..u.>..Z.*...u..
0033B0: 44 05 3A 8A BE B7 C8 CD 34 07 DC 16 07 38 F8 D5 D.:.....4....8..
0033C0: 0E 4F 6B 11 01 00 62 CD B5 09 D1 CD 14 0A 05 21 .Ok...b........!
0033D0: 8B BE 34 7E A0 C0 2A DC BE 7E FE FF 20 04 21 8C ..4~..*..~.. .!.
0033E0: BE 7E 23 22 DC BE 4F EB 24 2C CD 75 BB EB 79 CD .~#"..O.$,.u..y.
0033F0: 5A BB 37 C9 ED 5B E2 BE 3A DE BE 14 BA 15 D0 57 Z.7..[..:......W
003400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0034A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0034B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0034C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0034D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0034E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0034F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0035A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0035B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0035C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0035D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0035E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0035F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
003600: 3C 32 DE BE C9 ED 5B E0 BE 2A E5 BE C9 3E 40 CD <2....[..*...>@.
003610: 08 BC 3E 02 CD 0E BC CD 02 BC AF 32 EB BE 32 E9 ..>........2..2.
003620: BE 32 EA BE 3E 01 CD F6 08 3E 3F CD FE 08 AF 32 .2..>....>?....2
003630: DF BE 2F 32 E4 BE 21 00 00 22 E5 BE 22 E7 BE 18 ../2..!..".."...
003640: 26 AF 18 02 3E FF 32 DF BE 3E 02 FE 02 28 06 D0 &...>.2..>...(..
003650: 21 DF BE 36 00 CD 0E BC 18 0D AF 18 02 3E FF F5 !..6.........>..
003660: CD 83 06 F1 32 7D BE CD 17 BC ED 43 E2 BE 3A DF ....2}.....C..:.
003670: BE B7 21 4F 17 20 0C 2A E2 BE 7C 65 6F CD 91 06 ..!O. .*..|eo...
003680: 28 01 25 22 E0 BE 2A E5 BE CD 4D 08 C3 69 06 E5 (.%"..*...M..i..
003690: CD D8 08 79 CD 5D BB E1 2C 22 E5 BE ED 5B E0 BE ...y.]..,"...[..
0036A0: 7B BD D0 2D 3A E4 BE B7 28 10 2E 00 24 7A BC 30 {..-:...(...$z.0
0036B0: 09 25 E5 CD E1 08 CD 5F 09 E1 C3 4D 08 3E 07 C3 .%....._...M.>..
0036C0: 5A BB 3E FF 18 01 AF 32 E4 BE C9 25 F8 18 4C 2D Z.>....2...%..L-
0036D0: F8 18 48 24 18 37 2C 18 34 25 F2 5B 08 CD 57 09 ..H$.7,.4%.[..W.
0036E0: 18 3C 2D F2 5B 08 2C 3A E4 BE B7 C8 7C 3D F8 2A .<-.[.,:....|=.*
0036F0: E0 BE 67 18 26 2E 00 18 22 24 3A E1 BE BC 30 1B ..g.&..."$:...0.
003700: CD 5F 09 18 19 21 00 00 18 11 2A E7 BE ED 5B E0 ._...!....*...[.
003710: BE 7B BD 30 01 6B 7A BC 30 01 62 22 E5 BE 2A E5 .{.0.kz.0.b"..*.
003720: BE 7C 65 6F 2C 24 C3 75 BB 22 E7 BE C9 3E 13 C3 .|eo,$.u."...>..
003730: 5A BB CD 6C BB CD 69 06 C3 5E 08 E5 CD 99 BB CD Z..l..i..^......
003740: 2C BC 47 7C 2A E0 BE 55 5C 26 00 6F 2C BB 78 DC ,.G|*..U\&.o,.x.
003750: 44 BC E1 3E 12 18 05 CD 93 08 3E 11 C3 5A BB 06 D..>......>..Z..
003760: 00 18 02 06 FF 3A E1 BE BC 28 EC 5F 3A E0 BE 57 .....:...(._:..W
003770: 6C 26 00 CD 99 BB CD 2C BC C3 50 BC 7D 6C 67 3A l&.....,..P.}lg:
003780: E0 BE F5 E5 94 C4 A7 09 E1 F1 67 2C 24 CD 75 BB ..........g,$.u.
003790: 3E 10 CD 5A BB C3 5E 08 3A E9 BE B7 C8 3E FF 18 >..Z..^.:....>..
0037A0: 01 AF 21 EA BE BE C8 77 C3 9C BB C9 C9 3E FF 18 ..!....w.....>..
0037B0: 01 AF 32 E9 BE C9 1E 00 CD 00 09 C3 38 BC 1E 01 ..2.........8...
0037C0: 4F 47 CD 20 09 C5 7B CD 32 BC C1 C9 E6 0F 3D 28 OG. ..{.2.....=(
0037D0: ED 3C 28 E2 CD 20 09 C3 32 BC CD 20 09 C3 38 BC .<(.. ..2.. ..8.
0037E0: F5 D5 78 CD 2F 09 47 79 CD 2F 09 4F D1 F1 C9 C5 ..x./.Gy./.O....
0037F0: 07 07 01 00 03 18 05 4F 87 81 4F 7A 07 07 57 E6 .......O..Oz..W.
003800: 31 00 C0 CD D5 0C CD 19 BD 3E 10 3D F5 01 01 01 1........>.=....
003810: CD 32 BC F1 20 F5 CD 19 BD 21 80 5F 11 00 C0 01 .2.. ....!._....
003820: 80 0C ED B0 01 C1 7F ED 49 11 00 C0 D5 21 36 0C ........I....!6.
003830: 01 9F 00 ED B0 C9 21 40 0D 11 80 00 01 80 0E ED ......!@........
003840: B0 21 C0 1B 11 A0 FF 01 40 00 ED B0 21 00 1C 11 .!......@...!...
003850: 00 88 01 00 02 ED B0 11 00 00 21 00 80 CD AB BB ..........!.....
003860: 21 00 1E 11 00 80 01 00 08 ED B0 21 00 29 11 00 !..........!.)..
003870: FC 3E 05 CD 95 C0 21 00 2F 11 00 F6 3E 0C CD 95 .>....!./...>...
003880: C0 21 7F 5F 11 FF 7F 01 00 31 ED B8 21 80 52 11 .!._.....1..!.R.
003890: 00 3D 3E 06 CD 95 C0 21 80 80 11 00 0F 3E 5C CD .=>....!.....>\.
0038A0: 95 C0 AF 21 D0 B0 11 D1 B0 01 2F 00 77 ED B0 21 ...!....../.w..!
0038B0: 40 BE 11 41 BE 01 BF 01 77 ED B0 21 58 FE 11 59 @..A....w..!X..Y
0038C0: FE 01 47 01 77 ED B0 F3 C3 00 FC 25 01 80 00 ED ..G.w......%....
0038D0: B0 3D 20 F7 C9 0E FF CD 15 B9 11 FF FD 19 7C B5 .= ...........|.
0038E0: C9 21 F6 0C 7E 23 FE FF C4 5A BB 20 F7 CD 09 BB .!..~#...Z. ....
0038F0: 38 FB CD 06 BB C7 0D 0A 54 68 69 73 20 70 72 6F 8.......This pro
003900: 67 72 61 6D 20 77 69 6C 6C 20 6E 6F 74 20 72 75 gram will not ru
003910: 6E 20 69 6E 20 74 68 69 73 0D 0A 65 6E 76 69 72 n in this..envir
003920: 6F 6E 6D 65 6E 74 2E 20 20 50 72 65 73 73 20 61 onment. Press a
003930: 6E 79 20 6B 65 79 20 FF FF FF FF FF FF FF FF FF ny key .........
003940: C3 D7 0A C3 E7 0A C3 A3 0B C3 B1 0B C3 B6 0B C3 .......£........
003950: C4 0B C3 3F 0C C3 5A 0C C3 C6 0D C3 D2 0B C3 7F ...?..Z.........
003960: 0C C3 7F 0C C3 6D 0E C3 8F 0E C3 B0 0E C3 09 0E .....m..........
003970: C3 12 0E C3 DA 0C C3 AE 02 C3 A0 03 C3 1A 03 C3 ................
003980: 45 07 C3 09 04 C3 91 06 C3 9F 07 C3 0C 09 C3 1A E...............
003990: 09 C3 4B 09 C3 0F BB C3 90 02 C3 A6 02 C3 AD 02 ..K.............
0039A0: C3 A3 02 C3 70 01 C3 63 01 C3 04 01 C3 19 02 C3 .£..p..c........
0039B0: 00 02 C3 2F 02 C3 0C 02 C3 9A 03 C3 42 02 C3 67 .../........B..g
0039C0: 02 C3 72 05 E5 D5 11 4F BE D5 21 5E 01 01 05 00 ..r....O..!^....
0039D0: ED B0 0E 03 21 F4 BD ED B0 E1 22 F5 BD FB D1 01 ....!.....".....
0039E0: FF 80 21 48 BE CD EF BC 01 32 00 50 59 21 42 BE ..!H.....2.PY!B.
0039F0: CD E9 BC 3E FF 11 00 00 21 08 08 CD AE 02 9F 32 ...>....!......2
003A00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
003A10: 03 00 01 00 02 09 52 E5 03 00 41 02 00 00 00 02 ......R...A.....
003A20: 03 00 46 02 00 00 00 02 03 00 42 02 00 00 00 02 ..F.......B.....
003A30: 03 00 47 02 00 00 00 02 03 00 43 02 00 00 00 02 ..G.......C.....
003A40: 03 00 48 02 00 00 00 02 03 00 44 02 00 00 00 02 ..H.......D.....
003A50: 03 00 49 02 00 00 00 02 03 00 45 02 00 00 00 02 ..I.......E.....
003A60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003A90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003AF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003B00: 03 FE 02 38 01 3D 81 10 EE C1 C9 C3 3E BC CD 99 ...8.=......>...
003B10: BB CD 2C BC C3 4D BC 06 00 CD 4E 09 C3 69 06 3A ..,..M....N..i.:
003B20: E1 BE FE 18 06 FF 28 E6 CD 99 BB CD 2C BC 4F 21 ......(.....,.O!
003B30: 18 00 E5 CD 1A BC E3 2C CD 1A BC E5 21 01 00 CD .......,....!...
003B40: 1A BC CD 19 BD CD 05 BC D1 E1 06 08 C5 D5 E5 06 ................
003B50: 50 7E 12 71 1C CC FB 09 2C CC 03 0A 10 F3 E1 D1 P~.q....,.......
003B60: CD 0B 0A C1 10 E6 C9 4F CD 14 0A AF 57 58 81 10 .......O....WX..
003B70: FD 4F CD 19 BD CD 1A BC EB 7A 19 AC E6 F8 AC 67 .O.......z.....g
003B80: 06 08 C5 D5 E5 CD D3 09 AF 12 E1 D1 CD 0B 0A C1 ................
003B90: 10 F0 C9 06 00 7D BB 30 01 7B 2F B7 28 0C B9 30 .....}.0.{/.(..0
003BA0: 17 C5 4F ED B0 C1 2F 3C 81 4F 7E 12 1C CC FB 09 ..O.../<.O~.....
003BB0: 2C CC 03 0A 0D 20 DE C9 ED B0 C9 7A 3C AA E6 07 ,.... .....z<...
003BC0: AA 57 C9 7C 3C AC E6 07 AC 67 C9 7A C6 08 57 7C .W.|<....g.z..W|
003BD0: C6 08 67 C9 CD 11 BC 06 04 D8 06 02 C8 06 01 C9 ..g.............
003BE0: F5 3A EB BE CD 2B 0A F1 32 EB BE 6F 87 87 85 87 .:...+..2..o....
003BF0: 85 6F 26 00 11 62 0A 19 06 0B C5 D5 E5 CD 57 0A .o&..b........W.
003C00: EB CD 57 0A 06 08 4E 1A 77 79 12 13 23 10 F7 E1 ..W...N.wy..#...
003C10: D1 C1 13 23 10 E4 C9 6E 26 00 29 29 29 01 00 80 ...#...n&.)))...
003C20: 09 C9 23 40 5B 5C 5D 5E 60 7B 7C 7D 7E 23 EA A2 ..#@[\]^`{|}~#..
003C30: F5 A6 5E 60 E1 EE EB B2 23 A6 D0 D3 D4 5E 60 F0 ..^`....#....^`.
003C40: F3 F4 BA A3 40 5B 5C 5D 5E 60 7B 7C 7D 7E 23 40 ...£@[\]^`{|}~#@
003C50: D6 D8 D7 5E 60 F6 F8 F7 7E 23 C1 D0 D3 D7 D4 E1 ...^`...~#......
003C60: F0 F3 F7 F4 23 40 A2 5C E1 5E EE EA ED EB EC AD ....#@.\.^......
003C70: 40 AF D9 AE 5E 60 B2 F9 7D 7E FF FF FF FF FF FF @...^`..}~......
003C80: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
003C90: 0A 32 AF 1E 0C 0F 03 21 D0 B0 06 30 36 00 23 10 .2.....!...06.#.
003CA0: FB CD B5 0E 21 D0 0A 11 ED B0 01 05 00 ED B0 3A ....!..........:
003CB0: F1 B0 3D 07 07 07 2F E6 F0 B6 23 66 6F 3E 03 CD ..=.../...#fo>..
003CC0: 56 0E 7D CD 56 0E 7C C3 56 0E DD 7E 19 E6 40 F6 V.}.V.|.V..~..@.
003CD0: 0D CD 6F 0B DD 6E 0F DD 66 13 22 E6 B0 63 DD 6E ..o..n..f."..c.n
003CE0: 18 22 E8 B0 3E 06 32 E3 B0 C9 DD 7E 19 F6 06 18 ."..>.2....~....
003CF0: 07 DD 7E 19 E6 C0 F6 05 CD 49 0B 36 FF C9 DD 7E ..~......I.6...~
003D00: 7C C6 DE DE DE C0 7C 00 18 3C 66 66 7E 66 66 00 |.....|..<ff~ff.
003D10: FC 66 66 7C 66 66 FC 00 3C 66 C0 C0 C0 66 3C 00 .ff|ff..<f...f<.
003D20: F8 6C 66 66 66 6C F8 00 FE 62 68 78 68 62 FE 00 .lfffl...bhxhb..
003D30: FE 62 68 78 68 60 F0 00 3C 66 C0 C0 CE 66 3E 00 .bhxh`..<f...f>.
003D40: 66 66 66 7E 66 66 66 00 7E 18 18 18 18 18 7E 00 fff~fff.~.....~.
003D50: 1E 0C 0C 0C CC CC 78 00 E6 66 6C 78 6C 66 E6 00 ......x..flxlf..
003D60: F0 60 60 60 62 66 FE 00 C6 EE FE FE D6 C6 C6 00 .```bf..........
003D70: C6 E6 F6 DE CE C6 C6 00 7C C6 C6 C6 C6 C6 7C 00 ........|.....|.
003D80: FC 66 66 7C 60 60 F0 00 7C C6 C6 C6 DA CC 76 00 .ff|``..|.....v.
003D90: FC 66 66 7C 6C 66 E6 00 3C 66 60 3C 06 66 3C 00 .ff|lf..<f`<.f<.
003DA0: 7E 5A 18 18 18 18 3C 00 66 66 66 66 66 66 3C 00 ~Z....<.ffffff<.
003DB0: 66 66 66 66 66 3C 18 00 C6 C6 C6 D6 FE EE C6 00 fffff<..........
003DC0: C6 6C 38 38 6C C6 C6 00 66 66 66 3C 18 18 3C 00 .l88l...fff<..<.
003DD0: FE C6 8C 18 32 66 FE 00 3C 30 30 30 30 30 3C 00 ....2f..<00000<.
003DE0: C0 60 30 18 0C 06 02 00 3C 0C 0C 0C 0C 0C 3C 00 .`0.....<.....<.
003DF0: 18 3C 7E 18 18 18 18 00 00 00 00 00 00 00 00 FF .<~.............
003E00: 30 18 0C 00 00 00 00 00 00 00 78 0C 7C CC 76 00 0.........x.|.v.
003E10: E0 60 7C 66 66 66 DC 00 00 00 3C 66 60 66 3C 00 .`|fff....<f`f<.
003E20: 1C 0C 7C CC CC CC 76 00 00 00 3C 66 7E 60 3C 00 ..|...v...<f~`<.
003E30: 1C 36 30 78 30 30 78 00 00 00 3E 66 66 3E 06 7C .60x00x...>ff>.|
003E40: E0 60 7C 66 66 66 E6 00 18 00 38 18 18 18 3C 00 .`|fff....8...<.
003E50: 06 00 0E 06 06 66 66 3C E0 60 66 6C 78 6C E6 00 .....ff<.`flxl..
003E60: 38 18 18 18 18 18 3C 00 00 00 6C FE D6 D6 C6 00 8.....<...l.....
003E70: 00 00 DC 66 66 66 66 00 00 00 3C 66 66 66 3C 00 ...ffff...<fff<.
003E80: 00 00 DC 66 66 7C 60 F0 00 00 76 CC CC 7C 0C 1E ...ff|`...v..|..
003E90: 00 00 DC 76 60 60 F0 00 00 00 3C 60 3C 06 7C 00 ...v``....<`<.|.
003EA0: 30 30 7C 30 30 36 1C 00 00 00 66 66 66 66 3E 00 00|006....ffff>.
003EB0: 00 00 66 66 66 3C 18 00 00 00 C6 D6 D6 FE 6C 00 ..fff<........l.
003EC0: 00 00 C6 6C 38 6C C6 00 00 00 66 66 66 3E 06 7C ...l8l....fff>.|
003ED0: 00 00 7E 4C 18 32 7E 00 0E 18 18 70 18 18 0E 00 ..~L.2~....p....
003EE0: 18 18 18 18 18 18 18 00 70 18 18 0E 18 18 70 00 ........p.....p.
003EF0: 76 DC 00 00 00 00 00 00 38 6C C6 C6 C6 6C 38 00 v.......8l...l8.
003F00: 19 F6 11 CD 49 0B 36 01 C9 CD 6F 0B 7B DD 86 14 ....I.6...o.{...
003F10: 5F 32 E8 B0 DD 6E 0F 67 22 E9 B0 DD 7E 17 32 EB _2...n.g"...~.2.
003F20: B0 60 6A 22 E6 B0 3E 09 32 E3 B0 21 EC B0 C9 22 .`j"..>.2..!..."
003F30: DF B0 6F 78 32 DE B0 CD 7F 0B 61 22 E4 B0 C9 DD ..ox2.....a"....
003F40: 7E 11 06 00 B7 C8 3D 20 08 7A 1F 57 78 17 47 18 ~.....= .z.Wx.G.
003F50: 0C 7A DD 96 12 38 06 DD 96 12 2F 57 04 78 87 87 .z...8..../W.x..
003F60: B1 4F C9 CD 2A 0B 21 AB 0B 18 40 21 DE B0 C3 09 .O..*.!...@!....
003F70: 0E CD 31 0B 18 11 CD 3E 0B CD C7 0B D0 3A E3 FF ..1....>.....:..
003F80: FE 08 37 C9 CD 0A 0B 21 CC 0B 18 1F 21 DE B0 C3 ..7....!....!...
003F90: 12 0E CD DD 0B 21 E0 FF D0 3A E6 FF C9 CD 7F 0B .....!...:......
003FA0: 21 E5 0B 18 06 DD 7E 19 C3 43 0E CD 6D 0E FD E5 !.....~..C..m...
003FB0: CD FB 0B CD 83 0C FD E1 C3 8F 0E C5 79 E6 03 87 ............y...
003FC0: 4F 06 00 FD 21 F2 B0 FD 09 C1 C9 24 00 03 07 00 O...!......$....
003FD0: AA 00 3F 00 C0 00 10 00 02 00 02 03 00 28 09 41 ..?..........(.A
003FE0: 00 02 2A 52 60 24 00 03 07 00 B3 00 3F 00 C0 00 ..*R`$......?...
003FF0: 10 00 00 00 02 03 00 28 09 C1 00 02 2A 52 60 3E .......(....*R`>
004000: 01 CD 5A 0C 16 00 C5 CD D2 0B C1 D0 E6 C0 1E 01 ..Z.............
004010: FE 40 28 05 1C FE C0 20 26 7B 21 0B 0C 11 2C 00 .@(.... &{!...,.
004020: FE 01 28 0A 21 25 0C 11 2E 00 FE 02 20 11 D5 C5 ..(.!%...... ...
004030: DD E5 D1 01 1A 00 ED B0 C1 D1 21 00 01 37 C9 3E ..........!..7.>
004040: 06 B7 C9 06 0F C5 CD B0 0C C1 C8 FE 04 20 1D E5 ............. ..
004050: D5 C5 DD 7E 19 CD 43 0E CD 7F 0D C1 D1 E1 20 0C ...~..C....... .
004060: D0 3A E6 FF DD AE 14 E6 C0 3E 08 C0 10 D7 B7 C9 .:.......>......
004070: 78 E6 07 28 0A FE 04 20 10 FD 36 00 00 18 0A D5 x..(... ..6.....
004080: DD 56 12 15 CD DD 0C D1 D0 CD DD 0C D0 E5 D5 C5 .V..............
004090: CD 1E 00 C1 D1 CD 7F 0D E1 C9 CD FB 0B 06 0A FD ................
0040A0: 7E 00 B7 20 19 E5 C5 CB A1 DD 46 12 CD 23 0D CD ~.. ......F..#..
0040B0: 5A 0D C1 E1 30 21 FD 36 01 00 FD 36 00 FF FD 7E Z...0!.6...6...~
0040C0: 01 BA 37 C8 E5 C5 FD 46 01 CD 2C 0D CD 5A 0D C1 ..7....F..,..Z..
0040D0: E1 30 04 FD 72 01 C9 FD 36 00 00 C8 CD AC 0D 10 .0..r...6.......
0040E0: BE BF C9 05 3E 07 CD 56 0E 79 18 11 7A 90 30 02 ....>..V.y..z.0.
0040F0: 2F 3C 47 3E 0F CD 56 0E 79 CD 56 0E 7A CD 56 0E /<G>..V.y.V.z.V.
004100: 00 00 3C 3C 3C 3C 00 00 18 18 FF 00 00 FF 00 00 ..<<<<..........
004110: 24 24 24 27 27 24 24 24 24 24 27 20 20 3F 00 00 $$$''$$$$$' ?..
004120: 00 00 FF 00 00 FF 18 18 24 24 24 24 24 24 24 24 ........$$$$$$$$
004130: 00 00 3F 20 20 27 24 24 24 24 27 20 20 27 24 24 ..? '$$$$' '$$
004140: 24 24 24 E4 E4 24 24 24 24 24 E4 04 04 FC 00 00 $$$..$$$$$......
004150: 00 00 FF 00 00 FF 00 00 24 24 E7 00 00 FF 00 00 ........$$......
004160: 00 00 FC 04 04 E4 24 24 24 24 E4 04 04 E4 24 24 ......$$$$....$$
004170: 00 00 FF 00 00 E7 24 24 24 24 E7 00 00 E7 24 24 ......$$$$....$$
004180: 00 00 00 18 18 00 00 00 18 18 18 18 18 00 00 00 ................
004190: 00 00 00 1F 1F 00 00 00 18 18 18 1F 0F 00 00 00 ................
0041A0: 00 00 00 18 18 18 18 18 18 18 18 18 18 18 18 18 ................
0041B0: 00 00 00 0F 1F 18 18 18 18 18 18 1F 1F 18 18 18 ................
0041C0: 00 00 00 F8 F8 00 00 00 18 18 18 F8 F0 00 00 00 ................
0041D0: 00 00 00 FF FF 00 00 00 18 18 18 FF FF 00 00 00 ................
0041E0: 00 00 00 F0 F8 18 18 18 18 18 18 F8 F8 18 18 18 ................
0041F0: 00 00 00 FF FF 18 18 18 18 18 18 FF FF 18 18 18 ................
004200: 78 0C 7C CC 76 00 FE 00 3C 66 66 66 3C 00 7E 00 x.|.v...<fff<.~.
004210: 38 44 38 00 00 00 00 00 3C 66 60 F8 60 66 FE 00 8D8.....<f`.`f..
004220: 38 44 BA A2 BA 44 38 00 7E F4 F4 74 34 34 34 00 8D...D8.~..t444.
004230: 1E 30 38 6C 38 18 F0 00 18 18 7E 18 18 18 18 00 .08l8.....~.....
004240: 40 C0 44 4C 54 1E 04 00 40 C0 4C 52 44 08 1E 00 @.DLT...@.LRD...
004250: E0 10 62 16 EA 0F 02 00 00 33 66 CC 66 33 00 00 ..b......3f.f3..
004260: 00 CC 66 33 66 CC 00 00 E0 90 94 EE 84 84 83 00 ..f3f...........
004270: 18 00 18 30 66 66 3C 00 18 00 18 18 18 18 18 00 ...0ff<.........
004280: 1C 36 30 FC 30 30 E0 00 00 18 3C 66 60 66 3C 18 .60.00....<f`f<.
004290: 00 66 00 00 00 00 00 00 0C 18 30 00 00 00 00 00 .f........0.....
0042A0: 10 38 6C C6 00 00 00 00 00 C6 CC 18 20 5B DB 00 .8l......... [..
0042B0: 40 C0 46 49 46 09 06 00 E0 10 66 19 E6 09 06 00 @.FIF.....f.....
0042C0: F0 80 E6 19 E6 09 06 00 F0 10 26 49 86 09 06 00 ..........&I....
0042D0: 38 C6 C6 F8 C6 C6 F8 00 00 38 6C C6 C6 6C 38 00 8........8l..l8.
0042E0: 00 38 7C FE FE 7C 38 00 66 66 3C 18 7E 18 3C 00 .8|..|8.ff<.~.<.
0042F0: 3C 42 B9 A5 B9 A9 66 3C FB 55 51 51 00 00 00 00 <B....f<.UQQ....
004300: 3A F1 B0 CD 51 0D 10 F8 3A F0 B0 CD 51 0D C3 DD :...Q...:...Q...
004310: 0D 2E F8 2D 20 FD 3D 20 F8 C9 79 F6 20 23 BE 37 ...- .= ..y. #.7
004320: C8 7E E6 C0 EE 80 28 14 7E E6 07 B9 28 05 CD DD .~....(.~...(...
004330: 0D 18 E7 7E E6 08 28 04 3E 00 BF C9 F6 02 C9 23 ...~..(.>......#
004340: 7E B9 37 C8 E6 08 EE 08 3E 00 C8 23 7E FE 80 37 ~.7.....>..#~..7
004350: C8 EE 02 3E 01 C8 7E E6 20 3E 03 C0 7E E6 04 3E ...>..~. >..~..>
004360: 04 C0 7E E6 01 3E 05 C0 3E 07 B7 C9 E5 F5 CD DD ..~..>..>.......
004370: 0D E6 C0 FE 80 20 F7 F1 E1 C9 C5 0E 01 CD C6 0D ..... ..........
004380: C1 E6 60 C8 37 C9 CD 6D 0E CD AC 0D CD D2 0D C3 ..`.7..m........
004390: 8F 0E 3E 04 CD 56 0E 79 CD 56 0E 18 05 3E 08 CD ..>..V.y.V...>..
0043A0: 56 0E D5 C5 01 7E FB 16 00 21 E1 FF E5 ED 78 87 V....~...!....x.
0043B0: 30 FB F2 02 0E 03 ED 78 0B 77 23 14 E3 E3 E3 E3 0......x.w#.....
0043C0: 18 EB E1 7E 2B 72 C1 D1 C9 CD 24 0E CD A0 FF C3 ...~+r....$.....
0043D0: E2 0D CD 24 0E CD BA FF 3A EF B0 3D 03 03 03 20 ...$....:..=...
0043E0: FA C3 E2 0D CD AC 0D 7E 3C F6 C0 4F 23 5E 23 56 .......~<..O#^#V
0043F0: 23 23 23 46 23 05 7E 23 CD 56 0E 10 F9 7E EB 06 ###F#.~#.V...~..
004400: 7F F3 C9 F5 CD AC 0D F1 E6 40 F6 0A CD 56 0E 79 .........@...V.y
004410: CD 56 0E C3 E2 0D D5 C5 57 01 7E FB ED 78 87 30 .V......W.~..x.0
004420: FB 87 38 06 03 ED 51 0B E3 E3 C1 D1 C9 E5 D5 C5 ..8...Q.........
004430: F5 CD DC 0E 3A DD B0 B7 20 13 01 7E FA 3E 01 ED ....:... ..~.>..
004440: 79 2A ED B0 CD CB 0E 3A DD B0 B7 28 FA 18 13 E5 y*.....:...(....
004450: D5 C5 F5 CD DC 0E 3A DD B0 B7 28 06 2A EE B0 CD ......:...(.*...
004460: CB 0E F1 C1 D1 E1 C9 21 DD B0 7E 2F 77 B7 20 2C .......!..~/w. ,
004470: CD DC 0E 18 0C 01 FF 80 21 D6 B0 11 A7 0E CD EF ........!.......
004480: BC 01 7E FA AF ED 79 32 DD B0 C9 26 00 54 5D 29 ..~...y2...&.T])
004490: 29 19 EB 21 D0 B0 01 00 00 C3 E9 BC 21 D0 B0 C3 )..!........!...
0044A0: EC BC FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
0044B0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
0044C0: CD 56 0E ED 49 01 7E FB 18 05 0C ED A2 04 0D ED .V..I.~.........
0044D0: 78 F2 AF FF E6 20 20 F2 18 18 CD 56 0E ED 49 01 x.... ....V..I.
0044E0: 7E FB 18 05 0C 04 ED A3 0D ED 78 F2 C9 FF E6 20 ~......£..x....
0044F0: 20 F2 01 C1 7F ED 49 CD 2A B9 FB C9 FF FF FF FF .....I.*.......
004500: 0C 30 18 3C 66 7E 66 00 0C 30 7E 60 7C 60 7E 00 .0.<f~f..0~`|`~.
004510: 0C 30 7E 18 18 18 7E 00 0C 30 3C 66 66 66 3C 00 .0~...~..0<fff<.
004520: 0C 30 66 66 66 66 3C 00 18 66 18 3C 66 7E 66 00 .0ffff<..f.<f~f.
004530: 18 66 7E 60 7C 60 7E 00 18 66 7E 18 18 18 7E 00 .f~`|`~..f~...~.
004540: 18 66 3C 66 66 66 3C 00 18 66 66 66 66 66 3C 00 .f<fff<..fffff<.
004550: 30 0C 18 3C 66 7E 66 00 30 0C 7E 60 7C 60 7E 00 0..<f~f.0.~`|`~.
004560: 30 0C 7E 18 18 18 7E 00 30 0C 3C 66 66 66 3C 00 0.~...~.0.<fff<.
004570: 30 0C 66 66 66 66 3C 00 66 00 66 3C 18 18 18 00 0.ffff<.f.f<....
004580: 66 00 18 3C 66 7E 66 00 66 00 7E 60 7C 60 7E 00 f..<f~f.f.~`|`~.
004590: 66 00 7E 18 18 18 7E 00 66 00 3C 66 66 66 3C 00 f.~...~.f.<fff<.
0045A0: 66 00 66 66 66 66 3C 00 3C 66 C0 C0 66 3C 00 18 f.ffff<.<f..f<..
0045B0: 3E 78 D8 FE D8 D8 DE 00 18 00 18 3C 66 7E 66 00 >x.........<f~f.
0045C0: 7A CC CE D6 E6 66 BC 00 32 4C 00 66 76 6E 66 00 z....f..2L.fvnf.
0045D0: 32 4C 00 3C 66 7E 66 00 32 4C 3C 66 66 66 3C 00 2L.<f~f.2L<fff<.
0045E0: C0 30 0C 30 CC 30 C0 00 06 18 60 18 66 18 06 00 .0.0.0....`.f...
0045F0: 06 0C 7E 18 7E 30 60 00 00 00 32 4C 00 7E 00 00 ..~.~0`...2L.~..
004600: 0C 30 78 0C 7C CC 76 00 0C 30 3C 66 7E 60 3C 00 .0x.|.v..0<f~`<.
004610: 0C 30 00 38 18 18 3C 00 0C 30 00 3C 66 66 3C 00 .0.8..<..0.<ff<.
004620: 0C 30 00 66 66 66 3E 00 18 66 78 0C 7C CC 76 00 .0.fff>..fx.|.v.
004630: 18 66 3C 66 7E 60 3C 00 18 66 00 38 18 18 3C 00 .f<f~`<..f.8..<.
004640: 18 66 00 3C 66 66 3C 00 18 66 00 66 66 66 3C 00 .f.<ff<..f.fff<.
004650: 30 0C 78 0C 7C CC 76 00 30 0C 3C 66 7E 60 3C 00 0.x.|.v.0.<f~`<.
004660: 30 0C 00 38 18 18 3C 00 30 0C 00 3C 66 66 3C 00 0..8..<.0..<ff<.
004670: 30 0C 00 66 66 66 3C 00 66 00 66 66 66 3E 06 7C 0..fff<.f.fff>.|
004680: 66 00 78 0C 7C CC 76 00 66 00 3C 66 7E 60 3C 00 f.x.|.v.f.<f~`<.
004690: 66 00 38 18 18 18 3C 00 66 00 00 3C 66 66 3C 00 f.8...<.f..<ff<.
0046A0: 66 00 00 66 66 66 3E 00 00 00 3C 60 60 3C 00 18 f..fff>...<``<..
0046B0: 00 00 6C 1A 7E D8 6E 00 18 00 78 0C 7C CC 76 00 ..l.~.n...x.|.v.
0046C0: 00 00 7A CC D6 66 BC 00 32 4C 00 DC 66 66 66 00 ..z..f..2L..fff.
0046D0: 32 4C 78 0C 7C CC 76 00 32 4C 00 3C 66 66 3C 00 2Lx.|.v.2L.<ff<.
0046E0: 08 0C FE 07 FE 0C 08 00 10 30 7F E0 7F 30 10 00 .........0...0..
0046F0: 00 24 7E C3 7E 24 00 00 00 7E 00 7E 00 7E 00 00 .$~.~$...~.~.~..
004700: FE 92 20 6E 6F 74 20 72 65 61 64 79 9B FF FE 9D .. not ready....
004710: 20 99 20 77 72 69 74 98 70 72 6F 74 65 63 74 65 . writ.protecte
004720: 64 9B FF 93 20 73 65 65 6B 20 66 61 69 6C 9B FF d... seek fail..
004730: 9C 9A 9E 9B FF 9C 6E 6F 20 9A 9B FF 9C 6D 99 73 ......no ....m.s
004740: 69 6E 67 20 61 64 64 96 6D 61 72 6B 9B FF FE 20 ing add.mark...
004750: 62 61 64 20 66 94 6D 61 74 9B FF FE 20 75 6E 6B bad f.mat... unk
004760: 6E 6F 77 6E 9E 9B FF 0A 43 50 2F 4D 20 50 6C 75 nown....CP/M Plu
004770: 73 20 20 41 6D 73 74 72 61 64 20 43 6F 6E 73 75 s Amstrad Consu
004780: 6D 65 72 20 45 6C 65 63 74 72 6F 6E 69 63 73 20 mer Electronics
004790: 70 6C 63 8D 76 20 FB 2E FA 2C 20 36 31 4B 20 54 plc.v ..., 61K T
0047A0: 50 41 97 FF 31 9D 92 FF 32 9D 92 73 FF 97 31 20 PA..1...2..s..1
0047B0: 73 65 72 69 61 6C 20 70 6F 72 74 FF 97 F9 4B 92 serial port...K.
0047C0: 20 4D 3A FF 90 0A FF 50 6C 65 61 73 98 70 75 74 M:....Pleas.put
0047D0: 95 9D 20 66 94 20 FD 20 69 6E 74 6F 95 92 95 6E .. f. . into...n
0047E0: 20 70 96 61 6E 79 20 6B 65 79 FF F8 20 6E 6F 74 p.any key.. not
0047F0: 20 72 65 61 64 79 9B FF 0D 0A FF 44 72 69 76 98 ready.....Driv.
004800: 99 20 FD FF 20 64 72 69 76 65 FF FE 20 74 72 61 . .. drive.. tra
004810: 63 6B 20 FB FF 6F 72 FF 20 74 68 65 FF 72 65 73 ck ..or. the.res
004820: 73 20 FF 2C 20 FF 65 20 FF 69 73 FF 64 61 74 61 s ., .e .is.data
004830: FF 20 2D 20 52 65 74 72 79 97 49 67 6E 94 98 94 . - Retry.Ign...
004840: 20 43 61 6E 63 65 6C 3F FF 93 97 73 65 63 74 94 Cancel?...sect.
004850: 20 FA 20 FF 20 64 99 63 FF 20 65 72 72 94 FF FF . . d.c. err...
004860: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
004870: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
004880: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
004890: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
0048A0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
0048B0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
0048C0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
0048D0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
0048E0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
0048F0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
004900: 2A 3E 21 2F FE C9 CD 1C FD 56 3E CD 1C FD 97 3E *>!/.....V>....>
004910: CD 1C FD 9C 3E C9 43 52 54 20 20 20 03 00 4C 50 ....>.CRT ..LP
004920: 54 20 20 20 02 00 53 49 4F 20 20 20 0F 0E 00 94 T ..SIO ....
004930: 3F B7 3F 00 00 00 00 00 00 00 00 00 00 00 00 00 ?.?.............
004940: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004950: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004960: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004970: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004980: 32 AF FD 08 D9 ED 43 E1 FE E1 D1 C1 F1 08 D9 F1 2.....C.........
004990: ED 7B DB FE FB C9 F5 E5 D9 3E C1 ED 79 D9 2A DF .{.......>..y.*.
0049A0: FE CD AD FD 3A 58 FE CD 04 FD E1 F1 C9 E9 18 FE ....:X..........
0049B0: CD 1C FD 3F 3E 21 16 FE C9 2A C4 FB 18 08 2A C6 ...?>!...*....*.
0049C0: FB 18 03 2A C0 FB CD 1C FD 6C 3D 2A C4 FB 18 08 ...*.....l=*....
0049D0: 2A C6 FB 18 03 2A C0 FB CD 1C FD C8 3D 2A C2 FB *....*......=*..
0049E0: 18 0E 2A BE FB 7C EE 80 B5 20 05 3A F3 FF B7 C8 ..*..|... .:....
0049F0: CD 1C FD 19 3E 2A C2 FB 18 03 2A BE FB CD 1C FD ....>*....*.....
004A00: 32 59 FE AF C5 32 58 FE C6 C1 06 7F ED 79 C1 C9 2Y...2X......y..
004A10: 22 DD FE E1 E5 23 23 E3 E5 2A DD FE F3 08 D9 E3 "....##..*......
004A20: ED 73 DB FE 31 64 FF D5 C5 F5 5E 23 56 3A 58 FE .s..1d....^#V:X.
004A30: F5 CD 03 FD 3E E6 32 AF FD ED 4B E1 FE B7 CD 5D ....>.2...K....]
004A40: FD F3 08 D9 ED 43 E1 FE 3E B2 32 AF FD F1 CD 04 .....C..>.2.....
004A50: FD F1 C1 D1 ED 7B DB FE E1 08 D9 FB C9 D5 08 D9 .....{..........
004A60: FB C9 ED 73 DB FE 31 64 FF F5 D9 08 F5 C5 D5 E5 ...s..1d........
004A70: ED 4B E1 FE B7 D9 08 3E E6 32 AF FD FF F3 3E B2 .K.....>.2....>.
004A80: CD 04 FD 3E C3 21 AE FD 32 38 00 22 39 00 21 03 ...>.!..28."9.!.
004A90: FC 32 00 00 22 01 00 2A FE FB 32 05 00 22 06 00 .2.."..*..2.."..
004AA0: 2E 00 F9 FB 01 02 01 CD B6 FC 01 80 0C 11 00 40 ...............@
004AB0: 21 00 01 E5 18 0A ED 43 59 FE C9 EB ED B0 EB C9 !......CY.......
004AC0: 3A 59 FE 3C 28 F5 CD 1C FD CB FC EB C5 E3 7D 01 :Y.<(.........}.
004AD0: 80 00 B7 ED 42 30 04 4F 21 00 00 E3 3A 59 FE CD ....B0.O!...:Y..
004AE0: 04 FD D5 C5 11 5B FE ED B0 C1 D1 3A 5A FE CD 04 .....[.....:Z...
004AF0: FD E5 21 5B FE ED B0 E1 C1 78 B1 20 CF EB 3E FF ..![.....x. ..>.
004B00: 00 00 66 DB DB DB 66 00 3C 42 81 99 81 42 3C 00 ..f...f.<B...B<.
004B10: FE C6 C0 C0 C0 C0 C0 00 10 38 38 6C 6C C6 FE 00 .........88ll...
004B20: 3C 42 A5 99 A5 42 3C 00 00 00 00 24 18 24 00 00 <B...B<....$.$..
004B30: 00 00 18 00 7E 00 18 00 00 00 18 18 00 66 66 00 ....~........ff.
004B40: FE 6C 6C 6C 6C 6C 6C 00 18 18 18 18 7E 3C 18 00 .llllll.....~<..
004B50: FE C6 60 30 60 C6 FE 00 00 20 60 FE FE 60 20 00 ..`0`.... `..` .
004B60: 00 08 0C FE FE 0C 08 00 00 18 18 7E 18 18 7E 00 ...........~..~.
004B70: 00 24 66 FF FF 66 24 00 7C C6 C6 C6 C6 6C EE 00 .$f..f$.|....l..
004B80: 00 00 73 DE CC DE 73 00 7C C6 C6 FC C6 C6 F8 C0 ..s...s.|.......
004B90: 66 66 3C 66 66 66 3C 00 3C 60 3C 66 66 66 3C 00 ff<fff<.<`<fff<.
004BA0: 00 00 1E 30 7C 30 1E 00 38 6C C6 FE C6 6C 38 00 ...0|0..8l...l8.
004BB0: 00 C0 60 30 38 6C C6 00 00 00 66 66 66 7C 60 60 ..`08l....fff|``
004BC0: 00 00 FE 6C 6C 6C 6C 00 00 00 3C 66 66 7C 60 60 ...llll...<ff|``
004BD0: 00 00 7E D8 D8 D8 70 00 00 73 CE 18 18 18 0C 00 ..~...p..s......
004BE0: 03 06 3C 66 66 3C 60 C0 00 E6 3C 18 38 6C C7 00 ..<ff<`...<.8l..
004BF0: 03 06 66 66 66 3C 60 C0 00 00 66 C3 DB DB 7E 00 ..fff<`...f...~.
004C00: 00 00 00 00 00 00 00 00 18 18 18 18 18 00 18 00 ................
004C10: 6C 6C 6C 00 00 00 00 00 6C 6C FE 6C FE 6C 6C 00 lll.....ll.l.ll.
004C20: 18 3E 58 3C 1A 7C 18 00 00 C6 CC 18 30 66 C6 00 .>X<.|......0f..
004C30: 38 6C 38 76 DC CC 76 00 18 18 18 00 00 00 00 00 8l8v..v.........
004C40: 0C 18 30 30 30 18 0C 00 30 18 0C 0C 0C 18 30 00 ..000...0.....0.
004C50: 00 66 3C FF 3C 66 00 00 00 18 18 7E 18 18 00 00 .f<.<f.....~....
004C60: 00 00 00 00 00 18 18 30 00 00 00 7E 00 00 00 00 .......0...~....
004C70: 00 00 00 00 00 18 18 00 06 0C 18 30 60 C0 80 00 ...........0`...
004C80: 38 6C CE D6 E6 6C 38 00 18 38 18 18 18 18 7E 00 8l...l8..8....~.
004C90: 3C 66 06 3C 60 66 7E 00 3C 66 06 1C 06 66 3C 00 <f.<`f~.<f...f<.
004CA0: 1C 3C 6C CC FE 0C 1E 00 7E 62 60 7C 06 66 3C 00 .<l.....~b`|.f<.
004CB0: 3C 66 60 7C 66 66 3C 00 7E 66 06 0C 18 18 18 00 <f`|ff<.~f......
004CC0: 3C 66 66 3C 66 66 3C 00 3C 66 66 3E 06 66 3C 00 <ff<ff<.<ff>.f<.
004CD0: 00 00 18 18 00 18 18 00 00 00 18 18 00 18 18 30 ...............0
004CE0: 0C 18 30 60 30 18 0C 00 00 00 7E 00 7E 00 00 00 ..0`0.....~.~...
004CF0: 60 30 18 0C 18 30 60 00 3C 66 66 0C 18 00 18 00 `0...0`.<ff.....
004D00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
004D10: 04 00 01 00 02 09 52 E5 04 00 41 02 00 00 00 02 ......R...A.....
004D20: 04 00 46 02 00 00 00 02 04 00 42 02 00 00 00 02 ..F.......B.....
004D30: 04 00 47 02 00 00 00 02 04 00 43 02 00 00 00 02 ..G.......C.....
004D40: 04 00 48 02 00 00 00 02 04 00 44 02 00 00 00 02 ..H.......D.....
004D50: 04 00 49 02 00 00 00 02 04 00 45 02 00 00 00 02 ..I.......E.....
004D60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004D70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004D80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004D90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004DA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004DB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004DC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004DD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004DE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004DF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004E00: C3 0C 3D C3 7A FC C3 E2 FD C3 FA FD C3 C3 FD C3 ..=.z...........
004E10: BE FD C3 B9 FD C3 F5 FD C3 74 3E C3 06 FE C3 77 .........t>....w
004E20: 3E C3 7C 3E C3 81 3E C3 0B FE C3 10 FE C3 D0 FD >.|>..>.........
004E30: C3 8C 3E C3 D5 FD C3 DD FD C3 CB FD C3 B5 FD C3 ..>.............
004E40: B0 FD C3 02 FE C3 B4 3E C3 B9 3E C3 C0 FC C3 15 .......>..>.....
004E50: FE C3 04 FD C3 88 3E C3 B6 FC C3 10 FD C3 00 00 ......>.........
004E60: C3 00 00 D9 ED 43 E1 FE D9 2A 39 00 22 DF FE 21 .....C...*9."..!
004E70: AE FD 22 39 00 3E B2 32 AF FD F3 31 64 FF 3E 01 .."9.>.2...1d.>.
004E80: C3 0F FC C3 83 F7 00 00 00 00 00 00 00 00 00 00 ................
004E90: 00 00 00 00 00 00 00 07 06 F6 00 00 00 00 00 00 ................
004EA0: 00 31 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .1..............
004EB0: 00 00 00 00 00 00 4E 00 17 00 00 00 00 00 00 00 ......N.........
004EC0: 00 00 00 00 00 00 00 00 00 00 00 FF 00 00 00 00 ................
004ED0: 00 6A FA 24 00 00 9C FB 80 00 00 00 00 00 00 00 .j.$............
004EE0: 00 00 00 00 00 00 01 00 00 FF FF FF 00 00 00 00 ................
004EF0: 00 00 00 80 12 07 00 00 00 00 C0 C3 7C 0F 06 F6 ............|...
004F00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004F10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004F20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004F30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004F40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004F50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004F60: 00 00 00 00 00 00 00 00 C3 03 FC C3 83 F7 C3 06 ................
004F70: FC C3 83 F7 C3 09 FC C3 83 F7 C3 0C FC C3 83 F7 ................
004F80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004F90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004FA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004FB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004FC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004FD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004FE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004FF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005000: DA 97 23 3E FF 32 23 3C C3 97 23 FE 03 C2 1F 1D ..#>.2#<..#.....
005010: 3A 23 3C 3C C2 1F 1D E1 C3 D6 38 AF 32 23 3C 2A :#<<......8.2#<*
005020: F0 37 C9 00 21 00 00 22 BA FB 22 B1 FB 2B 2B C9 .7..!..".."..++.
005030: 22 F4 37 D6 03 32 39 3C C9 00 CD 43 3C C3 13 34 ".7..29<...C<..4
005040: CD 77 22 2A 7B 37 7D A4 3C C8 5E 23 56 7A B3 C8 .w"*{7}.<.^#Vz..
005050: 21 AA 37 1A BE C2 63 3C 21 04 00 19 3E FF BE C2 !.7...c<!...>...
005060: 63 3C 12 21 0D 00 19 C3 4A 3C CD 77 22 2A 71 37 c<.!....J<.w"*q7
005070: 7E B7 C0 36 02 C9 CD 39 20 21 17 F6 C9 CD 90 2D ~..6...9 !.....-
005080: 3D C2 87 3B 2A 87 37 22 12 F6 3A 7F 37 2A 7D 37 =..;*.7"..:.7*}7
005090: CD 0F F6 C2 AE 3B 3A 14 F6 B7 0E 00 C4 3D 22 3A .....;:......=":
0050A0: DF FB D6 12 C8 3A 9C FB 3C CC 01 22 AF C9 CD F8 .....:..<.."....
0050B0: 21 C0 CD F5 20 C0 3E FF 32 9C FB 2A 69 37 5E 23 !... .>.2..*i7^#
0050C0: 56 EB 2B CD 0D 28 AF C9 CD 64 3B C8 21 B8 37 11 V.+..(...d;.!.7.
0050D0: 9D FB 01 04 00 E5 D5 C5 CD 4B FC 2A 7D 37 E5 CD .........K.*}7..
0050E0: 40 20 CD E0 3A 2A E1 FB 29 29 D1 19 C1 D1 D5 C5 @ ..:*..))......
0050F0: 3A 7F 37 CD 09 F6 C1 E1 D1 C3 4B FC 3A 8C 37 17 :.7.......K.:.7.
005100: DA 07 3B F1 29 8F F5 1A E6 7F D6 20 1F D2 11 3B ..;.)...... ...;
005110: 17 4F 06 00 F1 09 CE 00 C1 13 05 C2 F1 3A 22 9E .O...........:".
005120: FB 21 9D FB E6 03 0F 0F B6 77 E6 20 C2 5B 3B 1A .!.......w. .[;.
005130: E6 1F 4F 13 13 1A E6 3F 0F 0F 0F 57 E6 07 47 7A ..O....?...W..Gz
005140: E6 E0 B1 4F 3A 84 37 1F D2 56 3B F5 78 1F 47 79 ...O:.7..V;.x.Gy
005150: 1F 4F F1 C3 47 3B 78 E6 01 0F 0F 0F B6 77 11 03 .O..G;x......w..
005160: 00 19 71 C9 2A 7D 37 7D B4 3C C9 CD 64 3B C8 3A ..q.*}7}.<..d;.:
005170: 9C FB 3C C8 3A E5 FB B7 C8 2A 69 37 5E 23 56 EB ..<.:....*i7^#V.
005180: 7C B5 C9 3A EF 37 77 B7 C8 3A 90 37 3C 77 C9 E5 |..:.7w..:.7<w..
005190: D5 CD E0 3A E1 11 9D FB 01 04 00 3A 7F 37 CD 09 ...:.......:.7..
0051A0: F6 22 B1 37 E1 C9 B7 C8 FE 0C DA DC 3A 3E 02 CA .".7........:>..
0051B0: B4 3A 3E 03 32 9C FB EB CD 64 3B C8 EB 3A DF FB .:>.2....d;..:..
0051C0: FE 10 CA E0 3A FE 23 CA CF 3A FE 14 D2 E0 3A 3E ....:.#..:....:>
0051D0: 02 32 9C FB E5 CD 39 26 E1 C2 E0 3A AF 32 9C FB .2....9&...:.2..
0051E0: 7E 32 9D FB 23 EB 21 00 00 E6 20 C2 1E 3B 01 08 ~2..#.!... ..;..
0051F0: 0B 0D C5 CA 06 3B 0D 0D CA 06 3B 29 8F F5 78 1F .....;....;)..x.
005200: 83 00 00 82 82 42 42 00 00 00 82 82 00 00 00 00 .....BB.........
005210: 08 00 00 02 02 00 03 03 00 83 03 02 12 02 06 00 ................
005220: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005230: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005240: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005250: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005260: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005270: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005280: FB EB E1 2B 22 E1 FB C1 7D E6 03 FE 03 C8 7B E6 ...+"...}.....{.
005290: FC 5F 7D E6 FC 6F CD DD F9 B5 C8 3E FF 32 14 F6 ._}..o.....>.2..
0052A0: AF C9 7E E6 10 CA 37 F9 1A AE E6 0F C2 37 F9 C3 ..~...7......7..
0052B0: B8 F9 7E FE F5 C2 37 F9 EB E1 22 17 F6 C3 39 F9 ..~...7..."...9.
0052C0: 3A 9C FB B7 C8 4F 0F 0F 1F 47 1A AE A0 C0 E5 23 :....O...G.....#
0052D0: 13 CD E4 F9 E1 C9 F5 AF CD 51 FC F1 C9 7B 95 6F .........Q...{.o
0052E0: 7A 9C 67 C9 1A BE C0 23 13 0D C8 C3 E4 F9 00 00 z.g....#........
0052F0: 00 83 82 22 22 03 82 82 83 03 00 00 00 00 00 00 ...""...........
005300: 21 D6 F9 E5 AF 32 14 F6 2A 25 FA 44 4D 2A 12 F6 !....2..*%.DM*..
005310: EB 2A E1 FB E5 CD DD F9 D1 B5 C8 E5 13 EB E5 2B .*.............+
005320: 29 29 09 11 04 00 19 11 9D FB 1A AE E6 1F C2 48 )).............H
005330: F9 CD C0 F9 CA 7E F9 EB E1 23 E3 2B 7D B4 E3 E5 .....~...#.+}...
005340: EB C2 23 F9 3C E1 E1 C9 3A 18 F6 3C CA B2 F9 3C ..#.<...:..<...<
005350: C2 37 F9 D5 CD C0 F9 D1 C2 37 F9 3A 16 F6 3C CA .7.......7.:..<.
005360: A2 F9 3C CA 6F F9 7E E6 1F C2 37 F9 C3 7E F9 1A ..<.o.~...7..~..
005370: AE E6 0F C2 37 F9 7E E6 30 FE 30 CA 37 F9 2A E1 ....7.~.0.0.7.*.
005380: C5 D5 22 2C FA 21 2E FA 22 2A FA 01 80 00 CD 4B ..",.!.."*.....K
005390: FC 36 00 0E 98 11 2A FA CD D5 F8 C1 7D B4 CA B4 .6....*.....}...
0053A0: F8 7D A4 3C CA B4 F8 11 2E FA 7D 93 6F 7C 9A 67 .}.<......}.o|.g
0053B0: 09 22 28 FA E1 D1 01 24 00 C3 4B FC FE 98 CA 74 ."(....$..K....t
0053C0: F8 17 3E 00 DA C8 F8 3D 32 28 FA 2A 66 FB F9 2A ..>....=2(.*f..*
0053D0: 28 FA 7D 44 C9 AF CD 51 FC CD 06 0F 22 28 FA 3E (.}D...Q...."(.>
0053E0: 01 C3 51 FC B7 CA 4B FC CD 51 FC CD 4B FC AF C3 ..Q...K..Q..K...
0053F0: 51 FC 3E 01 CD 51 FC C3 EB F8 22 25 FA CD 51 FC Q.>..Q...."%..Q.
005400: EB C3 B0 39 2A F6 37 7D B4 C2 14 3A 2A F8 37 7D ...9*.7}...:*.7}
005410: B4 CA 17 3A 22 F2 37 2A F2 37 CD 78 3A 22 F0 37 ...:".7*.7.x:".7
005420: CD 78 3A EB CD 6D 3A 2A F4 37 5E 23 56 2A F0 37 .x:..m:*.7^#V*.7
005430: 01 0D 00 09 73 23 72 2A F0 37 EB 2A F4 37 73 23 ....s#r*.7.*.7s#
005440: 72 EB C9 2A F0 37 11 05 00 19 3A EF 37 BE CA 59 r..*.7....:.7..Y
005450: 3A 34 BE CA 59 3A CD 83 3A 2A F0 37 EB 2A F4 37 :4..Y:..:*.7.*.7
005460: 7E 23 6E 67 CD 7F 20 B5 EB C8 C3 17 3A 2A F2 37 ~#ng.. .....:*.7
005470: 01 0D 00 09 73 23 72 C9 01 0D 00 09 5E 23 56 EB ....s#r.....^#V.
005480: 9E 1D F4 93 1D CD 61 39 23 23 11 FB 37 0E 04 C3 ......a9##..7...
005490: 29 1D CD 30 3C 11 F3 FF 19 22 F2 37 CD 78 3A E5 )..0<....".7.x:.
0054A0: CD 78 3A E1 C8 EB 21 00 00 22 F6 37 22 F8 37 EB .x:...!..".7".7.
0054B0: 22 F0 37 CD 58 39 CD 1F 1D CA 43 3A 2A F0 37 7E ".7.X9....C:*.7~
0054C0: 3C C2 CE 39 EB 2A F2 37 22 F6 37 C3 F3 39 3A AA <..9.*.7".7..9:.
0054D0: 37 BE C2 F4 39 EB 21 05 00 19 3A 90 37 B7 CA F3 7...9.!...:.7...
0054E0: 39 BE C2 F3 39 3A 39 3C B7 00 C2 F3 39 2A F2 37 9...9:9<....9*.7
0054F0: 22 F8 37 EB E5 CD 78 3A D1 CA 04 3A EB 22 F2 37 ".7...x:...:.".7
005500: 38 EB 2A 1B F6 19 F1 FE 03 C2 10 39 22 67 37 C9 8.*........9"g7.
005510: EB 2A D8 FB 01 80 00 FE 01 C2 33 39 3A FA FB 3D .*........39:..=
005520: BA DA 0C F6 3A FA 37 4F 06 01 CD 69 39 01 80 00 ....:.7O...i9...
005530: C3 0C F6 EB 3A FA FB 3D BC DA 48 39 3A FA 37 47 ....:..=..H9:.7G
005540: 0E 01 CD 69 39 01 80 00 CD 0C F6 CD 61 39 36 FF ...i9.......a96.
005550: C9 3A 90 37 47 2F 4F C9 2A F0 37 11 AA 37 0E 04 .:.7G/O.*.7..7..
005560: C9 11 04 00 2A F0 37 19 C9 E5 D5 CD 57 FC D1 E1 ....*.7.....W...
005570: C9 F5 CD 0C 1E 3A FA 37 CD 54 FC 0E 01 F1 3D CA .....:.7.T....=.
005580: F5 FE 04 D2 8D 38 CD 0B 3C CA F2 38 AF CD 61 39 .....8..<..8..a9
005590: FE 05 CA 9A 38 7E B7 CA C2 38 36 00 2A AB 37 E5 ....8~...86.*.7.
0055A0: 3A AD 37 F5 CD 58 39 EB CD 29 1D 21 A9 37 3A AA :.7..X9..).!.7:.
0055B0: 37 BE C4 54 2D 3E 01 CC 71 39 C1 D1 CD 03 1E CD 7..T->..q9......
0055C0: 6B 2D F1 FE 04 D0 F5 FE 02 C2 D6 38 21 94 37 3A k-.........8!.7:
0055D0: 93 37 BE D2 E0 38 CD 1B 3C 36 FF 3E 02 C3 E3 38 .7...8..<6.>...8
0055E0: 3C 77 AF CD 71 39 CD 58 39 CD 29 1D 36 00 23 CD <w..q9.X9.).6.#.
0055F0: 83 3A 3A EF 37 3C 11 80 00 21 80 FF 19 3D C2 FC .::.7<...!...=..
005600: 21 2A FA 01 24 00 CD 4B FC 11 2A FA E1 C1 C5 E5 !*..$..K..*.....
005610: 22 1E F6 CD D5 F8 D1 C1 78 E6 FC C8 21 2A FA EB ".......x...!*..
005620: 01 21 00 17 DA 40 F8 0E 24 17 DA 40 F8 17 DA 68 .!...@..$..@...h
005630: F8 0E 04 17 DA 4B FC 17 DA 5C F8 0E 06 C3 4B FC .....K...\....K.
005640: 3A 1D F6 B7 CA 4B FC 01 0E 00 09 EB 09 7E 12 23 :....K.......~.#
005650: 13 7E 12 03 03 03 09 EB 09 1A 77 C9 2A D8 FB 01 .~........w.*...
005660: 03 00 11 4E FA C3 4B FC 2A D8 FB 01 80 00 11 4E ...N..K.*......N
005670: FA C3 4B FC EB 5E 23 56 23 4E 23 46 21 AF FA E5 ..K..^#V#N#F!...
005680: FC 78 C9 11 8D F7 D5 3E 01 CD 51 FC E9 47 AF CD .x.....>..Q..G..
005690: 51 FC 78 C9 FE 33 DA B0 F7 FE 62 DA BC F8 FE 71 Q.x..3....b....q
0056A0: D2 BC F8 FE 6F CA 35 F7 FE 70 CA 35 F7 C3 CF F7 ....o.5..p.5....
0056B0: FE 11 CA C7 F7 FE 12 CA CB F7 FE 1A C2 CF F7 EB ................
0056C0: 22 D8 FB 22 1B F6 C9 EB 22 E3 FB 2A E3 FB EB 21 ".."...."..*...!
0056D0: E2 F9 79 FE 62 DA DB F7 21 B3 F9 06 00 09 7E 47 ..y.b...!.....~G
0056E0: C5 D5 1F DA ED F7 1F DA FC F7 C3 13 F8 2A D8 FB .............*..
0056F0: EB 21 4E FA 01 10 00 CD 4B FC D1 D5 AF 32 1D F6 .!N.....K....2..
005700: F6 EB 7D B4 C2 10 F7 21 2C FA 22 BA FB 2A D8 FB ..}....!,."..*..
005710: E5 11 2A FA D5 06 00 4E 03 03 03 EB CD 4B FC 36 ..*....N.....K.6
005720: 00 D1 D5 0E 0A CD D5 F8 3A 2B FA 4F 06 00 03 03 ........:+.O....
005730: D1 E1 C3 4B FC 32 24 FA EB 5E 23 56 23 4E 23 46 ...K.2$..^#V#N#F
005740: EB 78 B1 C8 C5 E5 4E 11 70 F7 D5 3A 24 FA FE 70 .x....N.p..:$..p
005750: CA 0F FC 3A CF FB 47 E6 02 CA 6A F7 78 E6 14 CA ...:..G...j.x...
005760: 6A F7 E6 10 C2 0C FC C3 0C FC 59 0E 02 C3 D5 F8 j.........Y.....
005770: E1 23 C1 0B C3 41 F7 3E 01 CD 51 FC 46 AF CD 51 .#...A.>..Q.F..Q
005780: 00 00 00 00 00 00 03 FC D5 F8 D5 F8 9E F6 A4 F6 ................
005790: A8 F6 AC F6 E3 F6 E9 F6 EF F6 01 F7 D5 F8 CD 15 ................
0057A0: FC C3 C8 F8 4B C3 12 FC 4B C3 0F FC 7B 3C CA C3 ....K...K...{<..
0057B0: F6 3C CA BD F6 3C CA C8 F6 4B C3 0C FC CD CE F6 .<...<...K......
0057C0: C3 C8 F8 CD CE F6 B7 C8 CD D8 F6 C3 C8 F8 3A 20 ..............:
0057D0: F6 B7 3E FF C0 C3 06 FC 21 20 F6 7E 36 00 B7 C0 ..>.....! .~6...
0057E0: C3 09 FC CD 36 FC C3 C8 F8 CD 39 FC C3 C8 F8 42 ....6.....9....B
0057F0: 4B 21 D3 FB 0A BE C8 03 C5 4F CD 53 F7 C1 C3 F1 K!.......O.S....
005800: 7B 37 FE 04 C2 58 38 5E 23 56 21 FF FF 22 FB 37 {7...X8^#V!..".7
005810: EB 3A AA 37 BE C2 3C 38 EB 21 04 00 19 7E EB 3C .:.7..<8.!...~.<
005820: C2 3C 38 E5 13 13 EB 5E 23 56 2A FB 37 CD 7F 20 .<8....^#V*.7..
005830: E1 D2 3C 38 EB 22 FB 37 EB 22 FD 37 CD 78 3A C2 ..<8.".7.".7.x:.
005840: 11 38 21 FB 37 CD FB 21 C8 2A FD 37 AF 3E 04 CD .8!.7..!.*.7.>..
005850: 58 38 2A 7B 37 C3 07 38 F5 CD 51 39 3A AB 37 5F X8*{7..8..Q9:.7_
005860: A0 32 EF 37 7B A1 32 AB 37 F1 F5 C4 92 39 22 F0 .2.7{.2.7....9".
005870: 37 CD 82 21 22 1B F6 CD 58 39 7E 3C CA C2 38 F1 7..!"...X9~<..8.
005880: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005890: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0058A0: 00 00 00 00 00 00 00 00 00 FF FF 00 00 00 00 00 ................
0058B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0058C0: 0F 10 11 13 16 17 1E 23 63 64 66 67 00 14 15 21 .......#cdfg...!
0058D0: 22 28 29 00 10 12 00 00 00 00 00 00 00 00 00 00 "().............
0058E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0058F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2A ...............*
005900: CD 4E FC 21 F4 FB EB CD 0E 37 1A C3 72 19 0E 04 .N.!.....7..r...
005910: C3 29 1D 21 EE 37 EB 01 08 00 E5 C3 4E 2F 21 00 .).!.7......N/!.
005920: 0F EB 0E 06 C3 29 1D 7A A3 3C 2A AC FB CA 29 33 .....).z£<*...)3
005930: EB 22 AC FB C9 21 FF FF 22 9F 1C 3A DD FB B7 CA ."...!.."..:....
005940: 58 37 2A DB FB 3A BF 37 77 11 07 00 19 3A B6 37 X7*..:.7w....:.7
005950: B6 77 23 3A B5 37 B6 77 2A 32 12 F9 2A 9F 1C 7D .w#:.7.w*2..*..}
005960: 44 C9 E5 00 00 00 00 00 00 00 00 00 00 00 00 00 D...............
005970: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005980: C8 CD 03 28 CD 10 30 B7 CA E4 36 CD 83 2F C2 A1 ...(..0...6../..
005990: 36 3E FF 32 15 F6 CD F5 23 C8 CD 16 28 C8 CD B1 6>.2....#...(...
0059A0: 2F CD D4 2F C2 DF 2E E5 CD 3F 1F D1 EB 7E B7 C2 /../.....?...~..
0059B0: BE 36 1A E6 01 C2 BE 36 CD 19 36 C3 CA 36 1A E6 .6.....6..6..6..
0059C0: E0 C2 C6 36 3E 80 77 CD 03 36 CD 99 2F 3D 32 E4 ...6>.w..6../=2.
0059D0: 37 CD 9C 1F CD F0 23 C8 CD 10 30 B7 C0 3A E4 37 7.....#...0..:.7
0059E0: 77 C3 9A 21 7E F5 CD 83 2F C1 CA 91 36 70 C3 A1 w..!~.../...6p..
0059F0: 36 21 F4 FB CD 0E 37 36 00 0E FF C3 4E FC 0E 00 6!....76....N...
005A00: 36 35 34 33 32 31 C3 24 F6 C3 E4 F8 C3 F2 F8 C3 654321.$........
005A10: FA F8 00 00 00 00 00 00 00 4E FA 00 00 00 00 00 .........N......
005A20: 00 C3 77 F7 79 21 00 00 22 28 FA 39 22 66 FB 31 ..w.y!.."(.9"f.1
005A30: 66 FB 21 CB F8 E5 FE 0C D2 94 F7 32 DF FB 21 86 f.!........2..!.
005A40: F6 06 00 09 09 7E 23 66 6F E9 43 4F 50 59 52 49 .....~#fo.COPYRI
005A50: 47 48 54 20 28 43 29 20 31 39 38 32 2C 20 44 49 GHT (C) 1982, DI
005A60: 47 49 54 41 4C 20 52 45 53 45 41 52 43 48 20 31 GITAL RESEARCH 1
005A70: 35 31 32 38 32 00 00 00 00 00 00 00 00 00 00 00 51282...........
005A80: C9 7D 32 B6 FB 7C 32 B8 FB C9 1C 3F 17 3F D6 3E .}2..|2....?.?.>
005A90: CB 3E 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .>..............
005AA0: 64 FF FF BE 1F BF FB BE FD BE 80 4C 02 1C 3F 17 d..........L..?.
005AB0: 3F D6 3E CB 3E 01 00 00 00 00 00 00 00 00 00 00 ?.>.>...........
005AC0: 00 00 00 7F FF 7A BF 9A BF FB BE FD BE 80 4E 02 .....z........N.
005AD0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF ................
005AE0: D5 5E 23 56 EB D1 C9 00 00 00 00 00 00 00 00 00 .^#V............
005AF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005B00: 3F E1 D8 EB 20 D0 21 00 00 C9 3A E7 FB FE FF C8 ?... .!...:.....
005B10: 3A F0 BE 4F C3 FB 00 21 86 00 18 03 21 89 00 DD :..O...!....!...
005B20: E5 E5 D5 CD 4D 3F 38 10 FE 08 47 C5 3A F2 BE 57 ....M?8...G.:..W
005B30: 3A F4 BE 5F C4 0A 3F C1 D1 E1 DD E1 3E 00 D8 20 :.._..?.....>..
005B40: DE 78 EE 08 28 05 FE 09 3E 02 C8 3D C9 E5 CD 76 .x..(...>..=...v
005B50: 3F 2A F0 BE 7C B7 20 0A 4D 21 FA BE 7E B9 71 C4 ?*..|. .M!..~.q.
005B60: FE 00 3A F1 BE 4F 3A F4 BE 5F 3A F2 BE 57 3A F9 ..:..O:.._:..W:.
005B70: BE 47 2A F6 BE C9 21 0C 00 19 CD E0 3F E5 DD E1 .G*...!.....?...
005B80: C9 ED 43 F6 BE 3A 58 FE 32 F9 BE C9 69 60 7A B3 ..C..:X.2...i`z.
005B90: C8 EB 09 6E 26 00 C9 11 F8 FF 18 03 11 F6 FF 3A ...n&..........:
005BA0: F0 BE CD BB 3E E5 19 CD E0 3F D1 1B 1B 1A 32 F1 ....>....?....2.
005BB0: BE 13 13 E9 79 32 F8 BE C9 AF C9 21 2F FE 87 8D ....y2.....!/...
005BC0: 6F 8C 95 67 C3 E0 3F AF 32 FA BE C9 CD E6 00 B7 o..g..?.2.......
005BD0: C0 11 B5 3F 12 C9 DD E5 D5 CD 4E 3F DD 7E 1A B7 ...?......N?.~..
005BE0: 37 20 13 CD 92 00 30 0E 01 FF FD 09 38 05 EB 01 7 ....0.....8...
005BF0: A4 FF 09 3E 06 3F E1 DD E1 47 11 00 00 E5 D4 0A ...>.?...G......
005C00: 37 77 E1 1A E6 01 CA 19 36 11 08 00 CD A7 2F CD 7w......6...../.
005C10: 42 2F 70 11 F8 FF CD A7 2F CD C8 3B C3 9A 21 CD B/p...../..;..!.
005C20: 67 2D CD 73 2E C3 72 19 CD 90 2D CD 2D 26 CD 9C g-.s..r...-.-&..
005C30: 1F CD F0 23 C8 CD C4 1E 01 08 00 CD A4 1F E5 0E ...#............
005C40: 00 CD 12 30 B7 C2 53 36 D1 EB 0E 08 CD 29 1D 1A ...0..S6.....)..
005C50: C3 5F 36 E1 01 08 00 CD A4 1F CD 83 2F C8 7E CD ._6........./.~.
005C60: 3F 1F 77 C9 CD 90 2D CD 73 2E 17 D2 C0 24 CD 2D ?.w...-.s....$.-
005C70: 26 CD 3F 1F 46 E5 C5 CD 9C 1F CD F0 23 C1 E1 70 &.?.F.......#..p
005C80: 1B 1B 1A 4E CD 86 23 C8 1A BE C9 3C 21 A3 37 34 ...N..#....<!£74
005C90: CA 94 35 87 35 CD C4 1E 4F 06 00 09 3E 10 B9 C8 ..5.5...O...>...
005CA0: 70 23 0C C3 9E 35 CD 90 2D 2A DB FB 36 21 0E 01 p#...5..-*..6!..
005CB0: CD F7 23 C2 BF 35 CD 3F 1F 7E E6 70 C2 C0 24 2A ..#..5.?.~.p..$*
005CC0: DB FB 36 20 0E 01 CD 03 28 CD F7 23 C2 E4 35 3E ..6 ....(..#..5>
005CD0: FF 32 15 F6 CD 16 28 C8 CD B1 2F 01 18 00 CD 05 .2....(.../.....
005CE0: 30 CD DD 2F 01 1C 00 CD 05 30 CD E2 2F CD D4 2F 0../.....0../../
005CF0: C2 DF 2E 01 00 00 CD B7 2F 1A F6 01 77 E5 2A 6F ......../...w.*o
005D00: 23 CD 71 35 DA 1C 35 F5 0E 00 CD 8B 22 F1 CA 22 #.q5..5.....".."
005D10: 35 CD 40 20 36 E5 CD C8 3B CD 9A 21 CD 03 24 C3 5.@ 6...;..!..$.
005D20: FE 34 CD 58 1F CD A4 1E CD 8B 35 CD 97 23 BE 77 .4.X......5..#.w
005D30: F5 CD 4F 1F 7E 3C 12 F1 EB C4 15 27 3A 9F 37 B7 ..O.~<.....':.7.
005D40: CC 15 27 01 0B 00 CD 67 35 EB 7E E6 7F 77 23 13 ..'....g5.~..w#.
005D50: 1A 77 23 36 00 23 23 13 13 13 0E 11 CD 29 1D 0E .w#6.##......)..
005D60: 01 CD 8B 22 C3 19 35 CD 40 20 09 EB 2A DB FB 09 ..."..5.@ ..*...
005D70: C9 01 0E 00 CD 67 35 7E E6 3F 47 1A B8 C0 2B 2B .....g5~.?G...++
005D80: 21 00 FC 85 6F E3 23 7E E1 E3 C9 3E 01 C3 54 FC !...o.#~...>..T.
005D90: 7D B4 C8 EB 21 0A 00 19 36 00 2A F9 FB CD 7F 20 }...!...6.*....
005DA0: EB D0 EB 2A DB FB 23 E5 01 19 00 CD 4B FC E1 C9 ...*..#.....K...
005DB0: 22 9F 1C 47 2A DB FB 7E FE 09 C8 FE 10 C8 FE 14 "..G*..~........
005DC0: C8 FE 16 C8 78 C3 72 19 CD 90 2D CD 2D 26 CD 78 ....x.r...-.-&.x
005DD0: 2E C4 85 2E 0E FF CD E4 2B C2 C0 24 CD 40 20 11 ........+..$.@ .
005DE0: 0F 00 CD CB 2C CD 37 1F CD FE 2C DA C0 24 B2 CA ....,.7...,..$..
005DF0: C0 24 CD 28 20 CD 9A 21 CD 53 30 CD F5 23 CA 80 .$.( ..!.S0..#..
005E00: 20 01 77 7E B7 C5 C4 F2 00 C1 E1 B7 C9 C5 E5 CD .w~............
005E10: EC 00 B7 E1 C1 C9 2A BE FB 06 00 AF 29 DC 0D 3E ......*.....)..>
005E20: C0 04 7C B5 20 F5 C9 2A BE FB E5 06 00 AF 29 DC ..|. ..*......).
005E30: 0D 3E 20 05 04 7C B5 20 F4 E1 28 EE C3 EF 00 41 .> ..|. ..(....A
005E40: 1E 07 CD 49 3E 46 C3 F8 00 16 00 62 68 29 29 29 ...I>F.....bh)))
005E50: 19 11 16 FE 19 C9 79 32 F0 BE CD BB 3E 7C B5 C8 ......y2....>|..
005E60: 7B 1F D8 EB 21 FE FF 19 7E 32 F1 BE 21 FA FF 19 {...!...~2..!...
005E70: CD E0 3F E9 01 00 00 ED 43 F2 BE C9 ED 43 F4 BE ..?.....C....C..
005E80: 90 3D 20 EE C5 C4 F5 00 C1 E1 04 7C B5 20 DF C9 .= ........|. ..
005E90: C5 2A C0 FB E5 21 C2 FB CD B9 3D 1E 00 CD 49 3E .*...!....=...I>
005EA0: EB 06 0F CD FB 00 E1 C1 20 02 30 04 22 C0 FB C9 ........ .0."...
005EB0: 21 C8 FB CD B9 3D 21 C6 FB C5 04 3E FE 0F 38 01 !....=!....>..8.
005EC0: 2B 10 FA A6 77 C1 AF C9 06 00 37 9F 29 DC D8 3D +...w.....7.)..=
005ED0: C8 04 7C B5 20 F4 2F C9 E5 1E 06 CD 49 3E 7E 2F ..|. ./.....I>~/
005EE0: E6 10 20 21 78 C6 D0 6F CE 3F 95 67 CD 0D 3E 28 .. !x..o.?.g..>(
005EF0: 12 C5 E5 CD EF 00 E1 C1 FE 11 20 02 36 FF EE 13 .......... .6...
005F00: C3 27 3E C3 69 3D C3 16 3E C3 81 3F 31 64 FF 21 .'>.i=..>..?1d.!
005F10: 00 80 22 BE FB 22 C0 FB 26 40 22 C6 FB 21 26 FE ..".."..&@"..!&.
005F20: 11 47 3D CD E9 00 ED 53 FB BE 22 FD BE E6 20 67 .G=....S.."... g
005F30: 2E 00 22 C2 FB 22 C4 FB 0E 02 CD 3F 3E CD C7 3E .."..".....?>..>
005F40: CD CC 3E F3 C3 63 FC 21 F9 FB 06 60 CD 60 3D CC ..>..c.!...`.`=.
005F50: 60 3D 06 24 CC 60 3D C0 2A F4 FB 23 22 F4 FB C9 `=.$.`=.*..#"...
005F60: 2B 7E 3C 27 77 A8 C0 77 C9 2A C0 FB 06 00 29 30 +~<'w..w.*....)0
005F70: 19 E5 21 10 A4 CD D8 3D 20 0A 2B 7C B5 20 F6 CD ..!....= .+|. ..
005F80: C3 39 20 CD 62 20 C3 F0 23 00 00 00 00 00 00 00 .9 .b ..#.......
005F90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005FA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005FB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005FC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005FD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005FE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005FF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006000: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
006010: 05 00 01 00 02 09 52 E5 05 00 41 02 00 00 00 02 ......R...A.....
006020: 05 00 46 02 00 00 00 02 05 00 42 02 00 00 00 02 ..F.......B.....
006030: 05 00 47 02 00 00 00 02 05 00 43 02 00 00 00 02 ..G.......C.....
006040: 05 00 48 02 00 00 00 02 05 00 44 02 00 00 00 02 ..H.......D.....
006050: 05 00 49 02 00 00 00 02 05 00 45 02 00 00 00 02 ..I.......E.....
006060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006100: CD 77 22 C3 3A 3C CD 20 34 3A 9E 37 3C C2 13 34 .w".:<. 4:.7<..4
006110: CD 52 21 E1 F1 B7 C2 ED 33 C9 CD 48 FC CD A5 1D .R!.....3..H....
006120: 3A 90 37 B7 C8 3E 04 C3 FF 37 EB 7E FE 63 D0 EB :.7..>...7.~.c..
006130: 21 9C FB 85 6F EB 23 7E FE FE D2 45 34 EB 5E 23 !...o.#~...E4.^#
006140: 56 EB C3 29 33 47 23 7E 12 04 C8 23 13 7E 12 C9 V..)3G#~...#.~..
006150: 21 B0 34 E5 EB 7E FE 1B C8 FE 0C C2 62 34 11 8B !.4..~......b4..
006160: 34 D5 FE 09 C2 6B 34 11 90 34 D5 E5 23 23 4E 23 4....k4..4..##N#
006170: 46 23 5E 23 56 23 7E 23 66 6F E3 7E E5 6F 87 85 F#^#V#~#fo.~.o..
006180: C0 24 FE 81 D2 C0 24 32 E6 FB C9 7B 32 E7 FB C9 .$....$2...{2...
006190: CD 67 2D 2A 77 37 EB CD DE 22 01 00 00 1A B7 CA .g-*w7..."......
0061A0: AA 33 1F D2 A2 33 03 C3 9E 33 13 2B 7D B4 C2 9D .3...3...3.+}...
0061B0: 33 2A 85 37 23 7D 91 6F 7C 98 67 3A 82 37 4F AF 3*.7#}.o|.g:.7O.
0061C0: CD F6 1C EB 2A 19 F6 73 23 72 23 77 C9 21 B3 FB ....*..s#r#w.!..
0061D0: 7E F6 80 77 1C C2 2F 12 7E F6 40 77 C3 2F 12 CD ~..w../.~.@w./..
0061E0: 2F 2E CD 48 FC CD A5 1D 2A 65 37 3E 10 3D 29 D2 /..H....*e7>.=).
0061F0: 15 34 F5 E5 5F CD 67 2D 3A DF FB FE 30 CA 06 34 .4.._.g-:...0..4
006200: 19 EB 22 D8 FB C3 B6 21 CD 6B 2D 2A 77 37 C3 29 .."....!.k-*w7.)
006210: 33 2A 63 37 C3 29 33 CD 2D 26 CD 7D 3C CD A4 26 3*c7.)3.-&.}<..&
006220: C3 80 23 CD 6B 2D 2A 73 37 22 9F 1C C9 3A 9E 37 ..#.k-*s7"...:.7
006230: FE FF C2 3B 33 3A E0 FB C3 72 19 E6 0F 32 E0 FB ...;3:...r...2..
006240: C9 CD 9A 2D CD CE 1F C3 B9 2C CD 9A 2D CD CE 1F ...-.....,..-...
006250: C3 C2 2C CD 9A 2D C3 13 2D EB 7D 2F 5F 7C 2F 2A ..,..-..-.}/_|/*
006260: 65 37 A4 57 7D A3 5F 2A 63 37 EB 22 65 37 7D A3 e7.W}£_*c7."e7}£
006270: 6F 7C A2 67 22 63 37 3E FF 32 A9 37 C9 7B B7 CA o|.g"c7>.2.7.{..
006280: C2 97 32 3E FF 32 15 F6 CD 16 28 C2 97 32 CD F0 ..2>.2....(..2..
006290: 23 CD 87 25 C3 C0 24 CD B1 2F EB 2A 19 F6 01 08 #..%..$../.*....
0062A0: 00 09 EB 1A E6 E0 C2 AB 32 3E 80 32 E4 37 F5 CD ........2>.2.7..
0062B0: 99 2F F1 77 CD 42 2F 70 CD 19 36 CD 2B 25 C8 0E ./.w.B/p..6.+%..
0062C0: 08 CD 12 30 B7 C2 D2 32 3A E4 37 77 CD 9A 21 CD ...0...2:.7w..!.
0062D0: 41 21 0E 50 CD 7B 31 0E 20 CD 32 30 C0 CD E2 2F A!.P.{1. .20.../
0062E0: C3 57 2A 3E 08 4F 32 A0 1C CD C0 24 C3 B8 1C CD .W*>.O2....$....
0062F0: 7D 3C C3 52 26 2A 65 37 C3 29 33 3A A4 37 C3 72 }<.R&*e7.)3:.7.r
006300: 3A 83 37 3C 4F 05 CA 0D 2A 81 C3 05 2A C1 41 4F :.7<O...*...*.AO
006310: 3A 9C 37 B7 CA 1C 2A 78 B9 DA 1D 2A 79 E1 C1 70 :.7...*x...*y..p
006320: C1 21 99 37 56 90 BA D2 2B 2A 57 79 2F A2 32 98 .!.7V...+*Wy/.2.
006330: 37 CA 6F 29 F5 3A 9C 37 B7 CA 42 2A CD 20 34 CD 7.o).:.7..B*. 4.
006340: B6 21 F1 67 CD 9D 1E 7C FE 01 4F C4 45 FC AF C9 .!.g...|..O.E...
006350: CD 4B 20 E6 7F 77 C9 CD 4B 20 E6 40 F5 7E F6 40 .K ..w..K .@.~.@
006360: 77 F1 C9 3E 00 32 9C 37 CD 39 20 3A B6 37 B7 3E w..>.2.7.9 :.7.>
006370: 03 C2 E5 32 3A B5 37 B7 3E 03 C2 E5 32 2A DB FB ...2:.7.>...2*..
006380: 86 FE 80 DA 88 29 3E 80 C5 46 36 7F C5 E5 F5 3A .....)>..F6....:
006390: 83 37 5F 1C 2F A0 47 E1 3A 9C 37 B7 CA A7 29 3A .7_./.G.:.7...):
0063A0: A5 37 A2 BC DA A8 29 7C 90 4F BB DA 1C 2A C5 CD .7....)|.O...*..
0063B0: A4 1E 47 3A 9F 37 B8 5F CA FD 29 4F C5 06 00 CD ..G:.7._..)O....
0063C0: CC 1E E5 03 CD CC 1E D1 13 7A 94 57 7B 95 B2 CA .........z.W{...
0063D0: C2 29 7C B5 C2 F5 29 3A 9C 37 B7 C2 F5 29 2A 85 .)|...):.7...)*.
0063E0: 37 7D 93 7C 9A DA F5 29 C5 D5 42 4B CD 4E 22 E1 7}.|...)..BK.N".
0063F0: C1 1F D2 C2 29 0D D1 7A B9 DA FD 29 79 93 47 04 ....)..z...)y.G.
006400: 3A A8 37 21 A5 37 BE DA 19 29 FE 80 C2 76 19 CD :.7!.7...)...v..
006410: 71 28 3A 9F 1C B7 C2 76 19 CD D5 1C CD E0 1E CA q(:....v........
006420: 76 19 CD F2 1E CD 4D 29 DA 82 1F C2 3F 29 CD B6 v.....M)....?)..
006430: 21 CD 0C 1E 3E 01 CD 54 FC CD 93 1D C3 82 1F 21 !...>..T.......!
006440: 00 00 22 96 37 3E 01 CD FF 37 C3 82 1F 3A 93 37 ..".7>...7...:.7
006450: 47 3A 90 37 4F A0 F5 3A 98 37 FE 02 DA 68 29 3D G:.7O..:.7...h)=
006460: 32 98 37 F1 37 C0 AF C9 F1 CA 72 29 79 B7 C8 F6 2.7.7.....r)y...
006470: 01 C9 79 2F 57 21 A8 37 3A 99 37 FE 02 DA 6C 29 ..y/W!.7:.7...l)
006480: E5 C5 CD 3D 27 C1 E1 3A 9F 1C 3C C8 3E 1F A1 77 ...='..:..<.>..w
006490: 23 23 7E 32 A7 37 C2 A0 28 34 7E E6 3F CA C9 28 ##~2.7..(4~.?..(
0064A0: CD 03 28 CD 83 3C C2 B9 28 3A 9C 37 3C CA C9 28 ..(..<..(:.7<..(
0064B0: CD 16 28 CA C9 28 C3 BC 28 CD DE 26 CD 41 21 CD ..(..(..(..&.A!.
0064C0: 58 1F AF 32 A8 37 C3 72 19 CD 4B 20 3A A7 37 77 X..2.7.r..K :.7w
0064D0: 2B 2B 7E 3D E6 1F 77 C3 76 19 34 CD 97 23 4F BE ++~=..w.v.4..#O.
0064E0: D2 EC 28 35 3A 9C 37 3C CA 76 19 34 CD 2D 27 CD ..(5:.7<.v.4.-'.
0064F0: FD 26 C3 BC 28 CD EE 21 3E FF 32 9C 37 CD 58 1F .&..(..!>.2.7.X.
006500: 1F C3 F5 28 CD 9A 2D CD CE 1F C3 63 2A CD 18 1F ...(..-....c*...
006510: 32 B3 37 CD 5A 20 CD 54 20 CD 90 2D CD 2D 26 CD 2.7.Z .T ..-.-&.
006520: 03 28 CD DA 26 CD F8 21 B7 CA 33 32 CD 97 23 BE .(..&..!..32..#.
006530: D2 E3 32 F5 CD 40 30 CA 59 32 CD 73 2E E6 80 CA ..2..@0.Y2.s....
006540: 59 32 CD 83 2F CA 59 32 CD D7 2F CA 59 32 CD 85 Y2../.Y2../.Y2..
006550: 2E 3A E4 37 E6 C0 C2 DF 2E F1 D4 16 28 CD F8 21 .:.7........(..!
006560: C8 CD 41 21 CD 73 2E E6 80 CA D2 32 3A B3 37 E6 ..A!.s.....2:.7.
006570: 40 CA D2 32 CD 40 30 C2 D2 32 CD 24 25 CD 83 2F @..2.@0..2.$%../
006580: 2F 11 90 FB C3 08 20 CD 9A 2D CD 41 21 CD D8 1F /..... ..-.A!...
006590: CD 3D 27 3A 9F 1C 3C C8 C3 1A 34 EB AF F5 7E FE .=':..<...4...~.
0065A0: 3F C2 AF 31 CD 6B 2D CD E9 2D 0E 00 C3 C3 31 CD ?..1.k-..-....1.
0065B0: 3F 1F 7E FE 3F CA BE 31 CD 5A 20 CD 54 20 CD 90 ?.~.?..1.Z .T ..
0065C0: 2D 0E 0F F1 F5 CA DA 31 2A E1 FB E5 3E FC A5 6F -......1*...>..o
0065D0: 22 E1 FB CD 92 21 E1 22 E1 FB F1 21 C3 21 E5 CA "....!."...!.!..
0065E0: F7 23 3A E5 FB 4F CD DD 23 C3 03 24 EB 22 A0 37 .#:..O..#..$.".7
0065F0: F6 01 C3 9D 31 CD 7D 3C C3 36 25 CD 9A 2D CD CE ....1.}<.6%..-..
006600: DB FB 11 0A 00 19 7E E6 80 C2 12 31 32 B5 37 C3 ......~....12.7.
006610: C0 24 CD 41 21 CD 73 2E E6 80 CA 76 31 CD 40 30 .$.A!.s....v1.@0
006620: C2 4E 31 CD 10 30 B7 C2 4E 31 7E E6 C0 CA 76 31 .N1..0..N1~...v1
006630: CD 24 25 CD 83 2F C2 57 31 CD 2B 25 C8 CD 10 30 .$%../.W1.+%...0
006640: B7 C2 76 31 77 CD 1A 20 CC 9A 21 C3 76 31 CD 24 ..v1w.. ..!.v1.$
006650: 25 CD 83 2F CA 72 31 CD 02 2F CA 72 31 CD 85 2E %../.r1../.r1...
006660: 3A E4 37 E6 C0 CA 72 31 E6 80 C2 DF 2E 3E 80 32 :.7...r1.....>.2
006670: B6 37 CD 2B 25 C8 CD 41 21 0E 40 CD 32 30 CC DD .7.+%..A!.@.20..
006680: C3 72 19 21 FF FF CD 5A 33 AF 32 DA FB 21 80 00 .r.!...Z3.2..!..
006690: 22 D8 FB C3 B6 21 CD 67 2D 3A A4 37 32 DA FB C9 "....!.g-:.72...
0066A0: CD 54 20 CD 90 2D CD 2D 26 3A E0 FB B7 CA B9 30 .T ..-.-&:.....0
0066B0: 3E FE 32 18 F6 3C 32 BD 37 CD DA 26 CD E7 30 21 >.2..<2.7..&..0!
0066C0: BD 37 BE C8 77 3A 18 F6 FE FE C8 CD 0A 28 3E 80 .7..w:.......(>.
0066D0: 32 B5 37 2A DB FB 36 00 0E 0F CD DD 23 CD 03 24 2.7*..6.....#..$
0066E0: CD DD 26 CD E7 30 C9 CD F8 21 C8 CD 4F 1F 7E 3C ..&..0...!..O.~<
0066F0: C2 F7 30 1B 1B 1A 77 E1 3A B5 37 17 D2 12 31 2A ..0...w.:.7...1*
006700: C0 04 C9 21 FF FF 22 17 F6 C9 2A 17 F6 3E FC A5 ...!.."...*..>..
006710: 6F 2B 22 E1 FB C9 CD 76 3C CD FB 21 C4 0A 28 2A o+"....v<..!..(*
006720: DB FB E5 21 62 37 22 DB FB 0E 01 CD DD 23 CD 03 ...!b7"......#..
006730: 24 E1 22 DB FB C8 3A 15 F6 B7 C0 11 0D 00 19 72 $."...:........r
006740: 23 7E F5 E5 E6 3F 77 23 3E 01 0E 11 72 23 0D C2 #~...?w#>...r#..
006750: 4C 28 3D 4A CC 12 30 B7 0E 0A CA 4C 28 CD 76 20 L(=J..0....L(.v
006760: 0E 00 11 20 00 CD F9 25 E1 F1 77 CD C8 3B C3 62 ... ...%..w..;.b
006770: 20 CD DC 1C CD 3F 1F 7E 4F 0C CD 86 23 CA DA 28 ....?.~O...#..(
006780: B7 1A C2 86 27 77 B7 C2 8C 27 7E 12 BE C2 F2 27 ....'w...'~....'
006790: C3 A8 27 CD 1F 27 EB CD 1F 27 EB 1A BE C2 F2 27 ..'..'...'.....'
0067A0: 13 23 1A BE C2 F2 27 0D 13 23 0D C2 78 27 EB 01 .#....'..#..x'..
0067B0: EC FF 09 E5 CD 97 23 D1 CD F8 27 77 12 C5 01 03 ......#...'w....
0067C0: 00 09 EB 09 C1 05 CA D9 27 05 CA DA 27 1A BE DA ........'...'...
0067D0: D9 27 B7 C2 DA 27 CD 15 27 EB 1A 77 CD 40 20 11 .'...'..'..w.@ .
0067E0: 0B 00 19 7E E6 7F 77 CD 62 20 0E 01 CD 90 22 C3 ...~..w.b ....".
0067F0: 9A 21 CD DD 21 C3 C0 24 06 01 BE C0 04 EB BE EB .!..!..$........
006800: 21 03 00 19 1A 91 CA 12 27 78 D2 10 27 3E 80 B6 !.......'x..'>..
006810: 77 C9 7E B7 C0 36 00 3A 9F 37 B7 C8 36 80 C9 7E w.~..6.:.7..6..~
006820: 23 B6 2B C0 1A 77 13 23 1A 77 1B 2B C9 E5 11 03 #.+..w.#.w.+....
006830: 00 19 7E FE 81 DA 3B 27 E6 7F 77 E1 C9 AF 32 9F ..~...;'..w...2.
006840: 1C CD 1A 20 C0 CD 4B 20 E6 80 C0 CD E8 21 CA F2 ... ..K .....!..
006850: 27 CD FC 3B 4F 46 C5 71 CD 2D 27 79 B8 DC FD 26 '..;OF.q.-'y...&
006860: CD 6C 27 CD 3F 1F C1 4E 70 C3 FD 26 CD F0 23 C8 .l'.?..Np..&..#.
006870: 01 10 00 CD 67 35 0E 10 3A A3 37 B7 CA 93 27 7E ....g5..:£7...'~
006880: 24 CD F5 23 C8 CD 28 20 0E 10 1E 0C CD F7 25 CD $..#..( ......%.
006890: C8 3B CD 03 24 C2 88 26 CD 08 25 CA 80 23 CD 48 .;..$..&..%..#.H
0068A0: 26 C3 88 26 CD 18 1F 32 B3 37 CD 78 2E C4 85 2E &..&...2.7.x....
0068B0: CD F5 23 C8 0E 00 1E 0C CD 10 26 CD 29 1D 3A B3 ..#.......&.).:.
0068C0: 37 E6 40 CA CE 26 E5 CD 4F 1F 7E E1 23 77 CD 9A 7.@..&..O.~.#w..
0068D0: 21 CD 03 24 CA 80 23 C3 B4 26 CD 83 3C C8 CD 62 !..$..#..&..<..b
0068E0: 20 5F E5 2B 2B 56 D5 CD 40 20 EB 2A DB FB 0E 20 _.++V..@ .*...
0068F0: CD 29 1D CD 97 23 4F D1 E1 73 2B 2B 72 06 00 EB .)...#O..s++r...
006900: C2 29 1D E1 C9 CD 40 20 09 11 75 19 D5 C3 ED 2F .)....@ ..u..../
006910: 0E 08 3A E1 FB E6 03 FE 03 C8 47 2A 67 37 11 60 ..:.......G*g7.`
006920: 00 19 7E D6 21 C0 78 87 5F 87 87 83 3C 81 5F 19 ..~.!.x._...<._.
006930: AF C9 CD 40 30 C0 2A 6F 37 79 A6 C2 1A 20 3C C9 ...@0.*o7y... <.
006940: 3A 84 37 F6 E0 2F 47 CD 3F 1F 7E A0 C0 23 23 7E :.7../G.?.~..##~
006950: E6 3F C9 0E 20 CD 36 30 C0 CD 4B 20 E6 40 C0 CD .?.. .60..K .@..
006960: 3F 1F 46 36 00 E5 23 23 4E 36 00 C5 CD F0 23 C4 ?.F6..##N6....#.
006970: E2 2F AF 32 9F 1C C1 E1 70 23 23 71 C9 3A A1 FB ./.2....p##q.:..
006980: 2F 23 C9 2A DB FB 7E F5 F6 10 77 CD F5 23 3E 00 /#.*..~...w..#>.
006990: 32 9F 1C 2A DB FB C1 70 C8 CD 40 20 EB 21 0C 00 2..*...p..@ .!..
0069A0: 19 7E E6 E0 F6 01 C9 E5 2A 19 F6 19 22 19 F6 E1 .~......*..."...
0069B0: C9 CD 76 20 01 14 10 C5 CD 40 20 EB 2A DB FB EB ..v .....@ .*...
0069C0: 1A B0 77 13 23 0E 0B CD 29 1D C1 0C 0D C8 36 00 ..w.#...).....6.
0069D0: 23 C3 CC 2F CD 99 2F E5 CD 02 2F E1 C9 0E 00 C3 #../../.../.....
0069E0: E4 2F 0E 04 CD 12 30 B7 C0 11 9A 21 D5 11 F4 FB ./....0....!....
0069F0: E5 D5 0E 00 CD 4E FC 0E 04 CD 1F 1D 0E 04 D1 E1 .....N..........
006A00: FB C9 23 46 78 B7 C2 1D 2F 54 5D 23 23 0E 09 23 ..#Fx.../T]##..#
006A10: 7E 0D C8 B7 CA 0F 2F FE 20 CA 0F 2F EB 11 0A 00 ~...../. ../....
006A20: 19 EB 2A 19 F6 0E 08 1A A8 BE C2 34 2F 1B 23 0D ..*........4/.#.
006A30: C2 27 2F C9 1B 0D C2 34 2F 13 21 E7 37 0E 08 C3 .'/....4/.!.7...
006A40: 1F 1D E5 01 08 00 11 0B 00 19 EB 2A 19 F6 AF F5 ...........*....
006A50: 7E 12 B7 CA 5E 2F FE 20 CA 5E 2F 33 33 F5 80 47 ~...^/. .^/33..G
006A60: 1B 23 0D C2 50 2F F1 B0 E1 C2 76 2F 3A DF FB FE .#..P/....v/:...
006A70: 64 CA 76 2F 36 00 13 0E 08 1A A8 12 13 0D C2 79 d.v/6..........y
006A80: 2F C8 C3 02 2F AF 32 18 F6 CD 40 20 EB 0E 0C 21 /.../.2...@ ...!
006A90: D7 37 E5 CD 29 1D 1A 23 77 D1 2A DB FB 7E 12 E5 .7..)..#w.*..~..
006AA0: EB 22 DB FB CD F0 23 CA E4 2E CD 10 30 B7 C2 D2 ."....#.....0...
006AB0: 2E EB 21 E4 37 46 1A 77 B7 CA E4 2E A8 E6 E0 CA ..!.7F.w........
006AC0: D2 2E CD 83 2F CA D2 2E 3A E4 37 77 CD 1A 20 CC ..../...:.7w.. .
006AD0: 9A 21 E1 22 DB FB 3A DF FB FE 0F C8 FE 16 C8 3E .!."..:........>
006AE0: 07 C3 E5 32 AF 32 E4 37 CD 1A 20 C2 FD 2E CD 83 ...2.2.7.. .....
006AF0: 2F F5 2A DB FB 7E F6 10 77 F1 C4 87 25 E1 22 DB /.*..~..w...%.".
006B00: 21 7E A0 C5 47 1A E6 7F B0 77 C1 23 13 C3 FD 25 !~..G....w.#...%
006B10: D5 06 00 2A DB FB 09 23 7E D6 24 CC 25 26 2B EB ...*...#~.$.%&+.
006B20: CD 40 20 C1 C9 11 B3 FB 1A F6 01 12 C9 2A DB FB .@ ..........*..
006B30: CD 39 26 C0 3E 09 C3 E5 32 0E 0B 23 3E 3F 96 E6 .9&.>...2..#>?..
006B40: 7F C8 0D C2 3B 26 B7 C9 2A DB FB 7E 01 10 00 09 ....;&..*..~....
006B50: 77 C9 CD 2D 26 CD 78 2E C4 85 2E CD FD 24 CD 48 w..-&.x......$.H
006B60: 26 22 A0 37 CD 30 26 0E 0C 2A A0 37 CD E3 23 CD &".7.0&..*.7..#.
006B70: FA 23 C2 E3 32 CD 08 25 C4 8A 25 CD 48 26 CD FD .#..2..%..%.H&..
006B80: 24 C3 45 25 CD F5 23 CA 80 23 CD 40 20 7E E6 10 $.E%..#..#.@ ~..
006B90: C2 9B 25 3A B3 37 E6 80 C2 9D 25 36 E5 F5 CD 10 ..%:.7....%6....
006BA0: 30 B7 C2 A6 25 77 CD 9A 21 0E 00 F1 CC 8B 22 CD 0...%w..!.....".
006BB0: C8 3B CD 03 24 C3 87 25 50 59 2A 85 37 7B 95 7A .;..$..%PY*.7{.z
006BC0: 9C D2 EE 25 13 C5 D5 42 4B CD 4E 22 1F D2 E6 25 ...%...BK.N"...%
006BD0: D1 C1 79 B0 CA BA 25 0B D5 C5 CD 4E 22 1F D2 E6 ..y...%....N"...
006BE0: 25 C1 D1 C3 BA 25 17 3C CD 70 22 E1 D1 C9 79 B0 %....%.<.p"...y.
006BF0: C2 D2 25 21 00 00 C9 16 80 CD 10 26 0C 0D CA 9A ..%!.......&....
006C00: 16 F6 3E FE 32 18 F6 C9 3A 18 F6 FE FE C8 CD 0A ..>.2...:.......
006C10: 28 AF CD FF 24 2A A0 37 7E F6 10 77 0E 0C CD E3 (...$*.7~..w....
006C20: 23 C3 03 24 2A E1 FB 22 17 F6 C9 CD 0A 28 0E 0F #..$*..".....(..
006C30: CD DD 23 C3 03 24 CD 18 1F 32 B3 37 3E FE CD FF ..#..$...2.7>...
006C40: 24 CD F5 23 C8 CA 84 25 CD 40 20 7E E6 10 C2 6B $..#...%.@ ~...k
006C50: 25 3A B3 37 17 D4 28 20 CD 73 2E 17 DA 7E 25 2A %:.7..( .s...~%*
006C60: DB FB CD 39 26 CA 7E 25 C3 8A 25 CD 73 2E 17 D2 ...9&.~%..%.s...
006C70: 7E 25 CD D4 2F CA 7E 25 CD 85 2E C3 3C 25 CD 03 ~%../.~%....<%..
006C80: 86 23 47 3A BE 37 3C CA DE 24 AF 32 BD 37 78 C1 .#G:.7<..$.2.7x.
006C90: B7 C2 03 24 13 23 04 0D C3 57 24 3A A2 37 3C C2 ...$.#...W$:.7<.
006CA0: AD 24 3A 18 F6 FE FE CC EA 24 C3 03 24 AF 32 9D .$:......$..$.2.
006CB0: 37 32 9F 1C 47 04 C9 E6 3F C9 CD ED 24 CD 01 22 72..G...?...$.."
006CC0: 3E FF 47 04 C3 72 19 78 B7 C2 03 24 7E B7 C2 03 >.G..r.x...$~...
006CD0: 24 3A BD 37 B7 CA 03 24 32 BE 37 C3 94 24 B0 C1 $:.7...$2.7..$..
006CE0: 01 03 24 C5 C0 23 23 7E B7 C0 CD F5 24 E5 2A 17 ..$..##~....$.*.
006CF0: F6 24 C2 FB 24 2A E1 FB 22 17 F6 E1 C9 3E FF 32 .$..$*.."....>.2
006D00: FB E5 CD 80 1D CD 01 22 0E 00 CD 0E 22 21 DE FB ......."...."!..
006D10: 7E B7 CA 24 2E 36 00 E1 3A DF FB FE 30 C8 CD 33 ~..$.6..:...0..3
006D20: 21 C3 13 21 CD 69 20 DA 08 2E E1 22 E1 FB C9 21 !..!.i ...."...!
006D30: F0 FB 7E B7 C8 36 00 2A 65 37 3E 10 3D 29 D2 51 ..~..6.*e7>.=).Q
006D40: 2E F5 E5 21 A9 37 CD 51 2D CD 58 2E C4 F5 2D E1 ...!.7.Q-.X...-.
006D50: F1 B7 C2 3C 2E C3 6B 2D 2A 7B 37 7D A4 3C C8 5E ...<..k-*{7}.<.^
006D60: 23 56 7B B2 C8 21 04 00 19 7E B7 C0 21 0D 00 19 #V{..!...~..!...
006D70: C3 5F 2E 2A 6F 37 7E C9 CD 73 2E E6 80 C8 CD 83 ._.*o7~..s......
006D80: 71 37 7E E6 01 F5 86 77 F1 C4 E8 20 CD 05 20 C9 q7~....w... .. .
006D90: AF 32 B5 37 32 B6 37 C3 B9 2D 01 7F 80 2A DB FB .2.72.7..-...*..
006DA0: 11 07 00 EB 19 7E A0 32 B6 37 7E A1 77 23 7E A0 .....~.2.7~.w#~.
006DB0: 32 B5 37 7E A1 77 CD 5A 20 21 00 00 22 15 F6 22 2.7~.w.Z !..".."
006DC0: 17 F6 AF 32 BD 37 3D 32 DD FB 2A DB FB 7E 32 BF ...2.7=2..*..~2.
006DD0: 37 E6 1F 3D 32 9E 37 FE FF CA DF 2D 32 A4 37 CD 7..=2.7....-2.7.
006DE0: 6B 2D 3A E0 FB 2A DB FB 77 CD F5 20 CC 58 21 CD k-:..*..w.. .X!.
006DF0: F5 2D C3 2F 2E CD 0C 21 C8 36 00 CD 58 21 2A E1 .-./...!.6..X!*.
006E00: 96 57 23 78 9E 23 F5 B2 57 F1 7B 9E C9 73 2B 70 .W#x.#..W.{..s+p
006E10: 2B 71 C9 CD 37 1F E5 72 23 72 23 72 CD F5 23 CA +q..7..r#r#r..#.
006E20: 3E 2D CD 40 20 11 0F 00 CD CB 2C E1 E5 CD FE 2C >-.@ .....,....,
006E30: D4 0D 2D CD 03 24 3E 00 32 9F 1C C3 1F 2D E1 C9 ..-..$>.2....-..
006E40: EB 11 20 00 CD CB 2C 21 21 00 19 71 23 70 23 77 .. ...,!!..q#p#w
006E50: C9 32 AA 37 77 57 2A 65 37 CD 1D 20 5F D5 CD 33 .2.7wW*e7.. _..3
006E60: 1D E1 D2 AB 1C 2D C9 21 A4 37 73 3A A4 37 21 A9 .....-.!.7s:.7!.
006E70: 37 BE C2 78 2D FE FF C0 CD 51 2D C8 CD E8 22 2A 7..x-....Q-..."*
006E80: 26 3A 9F 1C 3C C2 9C 2C D1 E1 C1 C5 E5 D5 2E 04 &:..<..,........
006E90: 0C CA A9 2C CD 16 28 2E 05 CA A9 2C C1 C1 CD 41 ...,..(....,...A
006EA0: 21 CD DC 1C C1 AF C3 72 19 D1 E3 72 23 23 73 E1 !......r...r##s.
006EB0: CD DC 1C 3C C1 7D C3 72 19 0E FF CD E4 2B CC F5 ...<.}.r.....+..
006EC0: 28 C9 0E 00 CD E4 2B CC 63 2A C9 EB 19 4E 06 00 (.....+.c*...N..
006ED0: 21 0C 00 19 7E 0F E6 80 81 4F 3E 00 88 47 7E 0F !...~....O>..G~.
006EE0: E6 0F 80 47 21 0E 00 19 7E 87 87 87 87 B7 80 47 ...G!...~......G
006EF0: F5 7E 1F 1F 1F 1F E6 03 6F F1 3E 00 8D C9 5F 79 .~......o.>..._y
006F00: CC 80 1D AF 32 BE 37 CD 6B 3B C2 BA 24 0E 00 CD ....2.7.k;..$...
006F10: 08 22 CD F8 21 CA BA 24 2A A0 37 EB 1A FE E5 CA ."..!..$*.7.....
006F20: 2A 24 D5 CD 69 20 D1 D2 BA 24 CD 40 20 3A E5 FB *$..i ...$.@ :..
006F30: 4F 06 00 7E FE E5 CC ED 24 AF 32 A2 37 7E E6 EF O..~....$.2.7~..
006F40: BE CA 57 24 EB BE EB C2 57 24 3A 16 F6 B7 CA 03 ..W$....W$:.....
006F50: 24 32 A2 37 C3 94 24 79 B7 CA 9B 24 1A FE 3F CA $2.7..$y...$..?.
006F60: 94 24 78 FE 0D CA 94 24 FE 0C CA 7C 24 FE 0E 1A .$x....$...|$...
006F70: CC B7 24 96 E6 7F C2 C7 24 C3 94 24 1A C5 4E CD ..$.....$..$..N.
006F80: 3A 9D 37 C3 72 19 C5 F5 3A 84 37 2F 47 79 A0 4F :.7.r...:.7/Gy.O
006F90: F1 A0 91 E6 1F C1 C9 CD 4F 1F 0E 10 41 0C C5 C1 ........O...A...
006FA0: 0D AF 2B 05 BE C2 AC 23 0D C2 A2 23 79 32 9F 37 ..+....#...#y2.7
006FB0: 3A A3 37 B7 78 C2 B9 23 1F C5 E5 6F 26 00 3A 82 :£7.x..#...o&.:.
006FC0: 37 57 3E 07 92 4F CD AB 1F 45 3A 84 37 B8 E1 DA 7W>..O...E:.7...
006FD0: 9F 23 CD 3F 1F 4E 2F E6 1F A1 B0 C1 C9 2A DB FB .#.?.N/......*..
006FE0: 22 A0 37 79 32 E5 FB CD A6 3A 3E FF 32 9D 37 C9 ".7y2....:>.2.7.
006FF0: 0E 0F C3 F7 23 0E 0C CD DD 23 CD 01 22 CD F5 20 ....#....#.."..
007000: 52 21 CD 58 21 CD DE 22 44 4D 2A 77 37 36 00 23 R!.X!.."DM*w76.#
007010: 0B 78 B1 C2 0D 23 2A 6F 37 77 2A 89 37 EB 2A 77 .x...#*o7w*.7.*w
007020: 37 73 23 72 CD 80 1D 2A 69 37 36 04 23 36 00 CD 7s#r...*i76.#6..
007030: 01 22 2A 7D 37 22 B1 37 0E FF CD 08 22 CD F8 21 ."*}7".7...."..!
007040: CA 6A 3C CD 40 20 EB 2A B1 37 7C A5 3C EB C4 8F .j<.@ .*.7|.<...
007050: 3A 3E 21 BE CA 38 23 3E E5 BE CA 38 23 3E 20 BE :>!..8#>...8#> .
007060: CA 74 23 3E 10 A6 C2 6E 23 0E 01 CD A6 22 CD 76 .t#>...n#....".v
007070: 20 C3 38 23 11 0C 00 19 7E 2A 6F 37 77 C3 6E 23 .8#....~*o7w.n#
007080: 54 5D 09 F1 CA 4B FC EB C3 4B FC C5 CD A6 22 C1 T]...K...K....".
007090: C5 CD DE 22 EB 2A 77 37 C1 E5 19 22 77 37 CD A6 ...".*w7..."w7..
0070A0: 22 E1 22 77 37 C9 CD 40 20 11 10 00 19 C5 0E 11 "."w7..@ .......
0070B0: D1 0D C8 D5 3A A3 37 B7 CA C3 22 C5 E5 4E 06 00 ....:£7..."..N..
0070C0: C3 C9 22 0D C5 4E 23 46 E5 79 B0 CA D8 22 2A 85 .."..N#F.y..."*.
0070D0: 37 7D 91 7C 98 D4 68 22 E1 23 C1 C3 B0 22 2A 85 7}.|..h".#..."*.
0070E0: 37 0E 03 CD AB 1F 23 C9 CD 0C 21 36 00 CD EB 1D 7.....#...!6....
0070F0: C2 FF 22 2A 71 37 BE 00 00 CA FF 22 C3 40 3C CD .."*q7.....".@<.
007100: 0F 0F 47 7E E6 FC E1 2E 06 7C C2 B0 2C 21 20 00 ..G~.....|..,! .
007110: 19 77 3A DF FB FE 63 CA 6B 2C D5 CD E8 21 D1 CA .w:...c.k,...!..
007120: 5B 2C 21 0E 00 19 78 96 E6 3F C2 5B 2C 21 0C 00 [,!...x..?.[,!..
007130: 19 7E B9 CA A4 2C CD 86 23 C2 5B 2C C5 CD 97 23 .~...,..#.[,...#
007140: C1 B9 D2 50 2C D1 D5 1C C2 50 2C 1C D1 C3 76 19 ...P,....P,...v.
007150: 71 4F CD 2D 27 CD FD 26 C3 A1 2C C5 D5 CD 3D 27 qO.-'..&..,...='
007160: D1 C1 2E 03 3A 9F 1C 3C CA B0 2C CD 03 28 21 0C ....:..<..,..(!.
007170: 00 19 E5 56 71 23 23 7E 5F D5 E6 40 B0 77 CD DA ...Vq##~_..@.w..
007180: 37 CD B6 21 D1 3A A8 37 57 D5 CD 4D 29 DA BA 2B 7..!.:.7W..M)..+
007190: CA 9B 2B 3E 02 CD FF 37 C3 BA 2B CD B6 21 CD 0C ..+>...7..+..!..
0071A0: 1E 3E 01 CD 54 FC CD 4A 21 C1 C5 3A AB 37 21 83 .>..T..J!..:.7!.
0071B0: 37 A6 CA B7 2B 0E 00 CD 9E 1D C1 78 21 A5 37 BE 7...+......x!.7.
0071C0: DA C7 2B 77 34 0E 02 0D 0D C2 CF 2B CD 50 2A CD ..+w4......+.P*.
0071D0: 57 2A C2 DE 2B CD 50 2A CD DC 1C C3 82 1F CD D5 W*..+.P*........
0071E0: 1C C3 82 1F C5 2A DB FB EB 21 21 00 19 7E E6 7F .....*...!!..~..
0071F0: F5 7E 17 23 7E 17 E6 1F 4F 7E E6 F0 23 B6 0F 0F .~.#~...O~..#...
007200: CD 46 20 73 C3 0F 2B 4F 06 00 09 09 73 23 72 0E .F s..+O....s#r.
007210: 02 C5 CD F2 1E 3A DF FB FE 28 C2 84 2B 79 3D 3D .....:...(..+y==
007220: C2 84 2B C1 F5 2A AB 37 E5 21 90 37 5E 1C 57 D5 ..+..*.7.!.7^.W.
007230: 2A 79 37 5E 23 56 EB E5 CD 78 3A D1 C2 37 2B EB *y7^#V...x:..7+.
007240: 3D 32 94 37 77 CD BC 21 D1 D5 AF 77 23 14 F2 4B =2.7w..!...w#..K
007250: 2B 57 1D C2 4B 2B 2A B1 37 0E 02 22 AB 37 C5 CD +W..K+*.7..".7..
007260: 4A 21 CD 0C 1E AF CD 54 FC C1 CD 9E 1D 2A AB 37 J!.....T.....*.7
007270: D1 D5 19 3A 83 37 A5 0E 00 C2 5B 2B E1 E1 22 AB ...:.7....[+..".
007280: CD 2B 20 CD EE 21 CD 53 30 CD 58 1F 3A A8 37 FE .+ ..!.S0.X.:.7.
007290: 80 DA 9C 2A CD 71 28 3A 9F 1C B7 C0 CD E0 1E CA ...*.q(:........
0072A0: BA 2A 21 AA 37 11 95 37 0E 03 CD 1F 1D CA B5 2A .*!.7..7.......*
0072B0: 3E FF 32 94 37 0E 00 C3 11 2B CD DC 1C CD A4 1E >.2.7....+......
0072C0: 32 9F 37 01 00 00 B7 CA D1 2A 4F 0B CD CC 1E 44 2.7......*O....D
0072D0: 4D CD B8 25 7D B4 C2 DE 2A 3E 02 C3 72 19 22 AB M..%}...*>..r.".
0072E0: 37 22 96 37 AF 32 94 37 3A AA 37 32 95 37 EB 2A 7".7.2.7:.72.7.*
0072F0: DB FB 01 10 00 09 3A A3 37 B7 3A 9F 37 CA 07 2B ......:£7.:.7..+
007300: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
007310: 06 00 01 00 02 09 52 E5 06 00 41 02 00 00 00 02 ......R...A.....
007320: 06 00 46 02 00 00 00 02 06 00 42 02 00 00 00 02 ..F.......B.....
007330: 06 00 47 02 00 00 00 02 06 00 43 02 00 00 00 02 ..G.......C.....
007340: 06 00 48 02 00 00 00 02 06 00 44 02 00 00 00 02 ..H.......D.....
007350: 06 00 49 02 00 00 00 02 06 00 45 02 00 00 00 02 ..I.......E.....
007360: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007370: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007380: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007390: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0073A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0073B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0073C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0073D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0073E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0073F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007400: C9 21 FF FF 22 E1 FB C9 CD 0E 22 C3 40 22 2A 87 .!..".....".@"*.
007410: 37 EB 2A E1 FB 23 22 E1 FB CD 7F 20 DA 01 22 3A 7.*..#".... ..":
007420: E1 FB E6 03 06 05 87 05 C2 26 22 32 B7 37 B7 C0 .........&"2.7..
007430: C5 CD 92 21 C1 3A DE FB B7 C0 C3 88 20 CD 30 22 ...!.:...... .0"
007440: 3A DE FB B7 C8 CD 13 21 CD 2B 21 C3 92 21 79 E6 :......!.+!..!y.
007450: 07 3C 5F 57 60 69 0E 03 CD AB 1F 44 4D 2A 77 37 .<_W`i.....DM*w7
007460: 09 7E 07 1D C2 62 22 C9 D5 CD 4E 22 E6 FE C1 B1 .~...b"...N"....
007470: 0F 15 C2 70 22 77 C9 F5 CD DE 22 44 4D 2A 77 37 ...p"w...."DM*w7
007480: 65 21 D5 11 0A 00 19 5E 23 56 23 7E 32 FA 37 EB e!.....^#V#~2.7.
007490: D1 C9 CD F5 1D 3E 03 C3 A2 21 CD 39 20 CD 86 20 .....>...!.9 ..
0074A0: 3E 05 21 00 00 22 96 37 2A 79 37 FE 05 C2 B3 21 >.!..".7*y7....!
0074B0: 2A F0 37 CD 58 38 2A D8 FB C3 BF 21 CD 82 21 22 *.7.X8*....!..!"
0074C0: 1B F6 C9 2A 67 37 EB 2A 19 F6 01 80 00 CD 4B FC ...*g7.*......K.
0074D0: 21 9F 1C 7E 3C C8 3A E1 FB E6 03 77 C9 CD 62 20 !..~<.:....w..b
0074E0: 23 23 3E FF 77 23 77 C9 CD C4 1E C3 FB 21 CD E8 ##>.w#w......!..
0074F0: 21 C0 E1 3E 09 C3 72 19 21 E1 FB 7E 23 BE C0 3C !..>..r.!..~#..<
007500: FB 47 7E B8 C8 23 B7 C2 02 21 3C C9 2A 71 37 23 .G~..#...!<.*q7#
007510: 7E B7 C9 21 3B 37 E5 21 CD 37 CD FE 20 CA F9 1F ~..!;7.!.7.. ...
007520: 21 D4 37 CD FE 20 CA C0 24 E1 C9 21 DE FB 7E B7 !.7.. ..$..!..~.
007530: C8 36 00 CD 6B 2D 21 00 00 22 E1 FB AF 32 B7 37 .6..k-!.."...2.7
007540: C9 2A 71 37 4E CD 31 1F 71 C9 2A 7B 37 0E 04 C3 .*q7N.1.q.*{7...
007550: 5D 21 2A 7B 37 C3 5B 21 2A 79 37 0E 01 7D A4 3C ]!*{7.[!*y7..}.<
007560: C8 5E 23 56 EB E5 C5 11 AA 37 CD 1F 1D C1 E1 C2 .^#V.....7......
007570: 74 21 36 FF 11 0D 00 19 5E 23 56 EB 7D B4 C8 C3 t!6.....^#V.}...
007580: 95 6F 7A 9C 67 C9 0E FE 2A 91 37 EB 2A 8B 37 7C .oz.g...*.7.*.7|
007590: E6 7F 67 CD 7F 20 D0 C5 CD B8 1F 2A 75 37 EB 2A ..g.. .....*u7.*
0075A0: 91 37 19 C1 0C CA C6 20 0C CA D1 20 BE C8 CD 1A .7..... ... ....
0075B0: 20 00 CD 52 21 3E FF 32 DE FB 32 9C FB CD E8 20 ..R!>.2..2....
0075C0: CD 05 20 C3 5A 33 BE 77 C8 2A 71 37 3E 01 B6 77 .. .Z3.w.*q7>..w
0075D0: C9 77 C9 3A A4 37 11 63 37 CD 0B 20 2A 87 37 23 .w.:.7.c7.. *.7#
0075E0: EB 2A 69 37 73 23 72 C9 2A 90 FB CD 1D 20 C8 11 .*i7s#r.*.... ..
0075F0: 92 FB C3 08 20 3A 8C 37 E6 80 C0 21 C0 37 3A DF .... :.7...!.7:.
007600: 3E 17 32 2B 1C 32 2A 1C C3 01 16 C5 CD 6A 14 C1 >.2+.2*......j..
007610: E1 E5 C5 78 B7 CA 2E 18 23 4E 05 D1 D5 7A 90 57 ...x....#N...z.W
007620: C5 E5 3A BE 19 BA DC 13 14 E1 C1 C3 13 18 E5 3A ..:............:
007630: BC 19 B7 CA 01 16 21 B7 FB 96 32 BC 19 CD 57 14 ......!...2...W.
007640: 21 BC 19 35 C2 3D 18 CD 5E 15 C3 01 16 F5 78 B9 !..5.=..^.....x.
007650: DA 5E 18 F1 C5 E5 0E 07 CD 7A FB C3 01 16 3A BF .^.......z....:.
007660: 19 FE 07 CA 6D 18 3A 2A 1C B7 C4 3B 15 F1 23 77 ....m.:*...;..#w
007670: 04 C5 E5 4F CD 14 15 CD 13 14 E1 C1 3A BF 19 FE ...O........:...
007680: 1C B7 C4 1B 15 CD 82 14 CD 5E 15 AF 32 BD 19 C3 .........^..2...
007690: 01 16 FE 10 C2 A2 17 E5 C5 AF CD A0 13 C1 E1 C3 ................
0076A0: FF 15 FE 18 C2 C4 17 E1 3A BD 19 21 B7 FB BE DA ........:..!....
0076B0: BD 17 2A 28 1C 7E B7 C2 DD 15 C3 D7 15 35 CD 57 ..*(.~.......5.W
0076C0: 14 C3 A8 17 FE 15 C2 D5 17 E3 CD D8 14 E3 CD 6A ...............j
0076D0: 14 E1 C3 D7 15 FE 12 C2 4D 18 AF 32 BE 19 EB CD ........M..2....
0076E0: A8 15 EB 78 B7 CA CE 17 EB 2A 28 1C 04 05 CA F8 ...x.....*(.....
0076F0: 17 2B 1A 77 1B C3 ED 17 22 28 1C C5 D5 CD 6A 14 .+.w...."(....j.
007700: CA 01 16 0E 08 CD CD 13 C3 F8 16 FE 0B C2 1E 17 ................
007710: EB 21 25 1C 22 28 1C EB CD 5E 15 C3 FF 15 FE 07 .!%."(...^......
007720: C2 2D 17 3A 2A 1C B7 CA FF 15 C3 24 16 FE 08 C2 .-.:*......$....
007730: 50 17 3A CA FB 3C CA 5C 17 3A BD 19 57 3A B7 FB P.:..<.\.:..W:..
007740: BA CA FF 15 32 BC 19 78 B7 CA 4D 17 05 C3 0B 18 ....2..x..M.....
007750: FE 7F C2 73 17 3A CB FB 3C CA 39 17 3E 7F 32 BF ...s.:..<.9.>.2.
007760: 19 3A 2A 1C B7 C2 39 17 78 B7 CA FF 15 7E 05 2B .:*...9.x....~.+
007770: C3 71 18 FE 05 C2 92 17 C5 78 32 BE 19 E5 3A 2A .q.......x2...:*
007780: B3 15 2A 26 1C 7E B7 32 2B 1C CA 6F 16 23 22 26 ..*&.~.2+..o.#"&
007790: 1C 21 2B 1C 36 17 EB C3 4D 18 FE 01 C2 C5 16 3A .!+.6...M......:
0077A0: BD 19 57 3A B7 FB BA CA FF 15 32 BC 19 78 B7 CA ..W:......2..x..
0077B0: 0B 18 05 E5 CD BA 15 D1 2A 28 1C 2B 22 28 1C 1A ........*(.+"(..
0077C0: 77 EB C3 0B 18 FE 02 C2 0B 17 3A BE 19 B8 C2 DC w.........:.....
0077D0: 16 3E 17 32 2A 1C 32 BF 19 C3 3A 16 EB 2A 28 1C .>.2*.2...:..*(.
0077E0: 04 05 3A BE 19 B8 CA F0 16 2B 1A 77 1B C3 E1 16 ..:......+.w....
0077F0: 22 28 1C C5 D5 CD BA 15 3A B7 FB 47 3A BD 19 B8 "(......:..G:...
007800: C8 29 C3 FF 1F 11 65 37 3A A9 37 4F 21 01 00 CD .)....e7:.7O!...
007810: FE 1F 1A B5 12 13 1A B4 12 C9 2A 63 37 3A A9 37 ..........*c7:.7
007820: 4F CD AB 1F 7D E6 01 C9 CD 40 20 CD 32 20 D0 C3 O...}....@ .2 ..
007830: A6 1C 11 09 00 19 7E 17 C9 CD 1A 20 C8 C3 A1 1C ......~.... ....
007840: 2A 67 37 3A B7 37 85 6F D0 24 C9 2A DB FB 11 0E *g7:.7.o.$.*....
007850: 00 19 7E C9 CD 4B 20 36 00 C9 CD 3F 1F 7E E6 1F ..~..K 6...?.~..
007860: 77 C9 CD 4B 20 F6 80 77 C9 2A E1 FB EB 2A 69 37 w..K ..w.*...*i7
007870: 7B 96 23 7A 9E C9 CD 69 20 D8 13 72 2B 73 C9 7B {.#z...i ..r+s.{
007880: 37 C9 CD 4F 1F 3A A8 37 77 3A DF FB FE 16 D2 92 7..O.:.7w:......
007890: 1F 34 EB 7E FE 80 D0 3A A5 37 77 C9 CD 3F 1F 72 .4.~...:.7w..?.r
0078A0: 23 23 72 C9 70 23 0D C8 C3 A4 1F 0C 0D C8 7C B7 ##r.p#........|.
0078B0: 1F 67 7D 1F 6F C3 AC 1F 2A 67 37 01 04 00 16 20 .g}.o...*g7....
0078C0: AF 86 23 15 C2 C1 1F A8 47 0D C2 BE 1F C9 CD 31 ..#.....G......1
0078D0: 1F 2A 71 37 BE C4 E3 1F 3A B5 37 B7 C8 2A DB FB .*q7....:.7..*..
0078E0: AF 77 C9 2A 1E F6 EB 2A FE FB CD 7F 20 D2 F7 1F .w.*...*.... ...
0078F0: 2A 92 FB CD 1D 20 C8 E1 E1 3E 0A C3 72 19 0C 0D *.... ...>..r...
007900: 32 AD 37 22 B1 37 3A 83 37 4F 3A A8 37 A1 47 32 2.7".7:.7O:.7.G2
007910: 93 37 21 AB 37 B6 77 C9 2A DB FB 11 08 00 19 0E .7!.7.w.*.......
007920: 04 7E 87 F5 7A 1F 57 F1 0F 77 2B 0D C2 21 1F 7A .~..z.W..w+..!.z
007930: C9 CD 3F 1F 23 7E C9 2A DB FB 11 21 00 19 C9 2A ..?.#~.*...!...*
007940: DB FB 11 0C 00 19 C9 2A DB FB 11 0F 00 19 C9 CD .......*........
007950: 47 1F EB 21 11 00 19 C9 CD 4F 1F 7E 32 A8 37 EB G..!.....O.~2.7.
007960: 7E B7 C2 6D 1F CD 97 23 4F CD FD 26 7E FE 81 DA ~..m...#O..&~...
007970: 74 1F 3E 80 32 A5 37 CD 3F 1F 3A 84 37 A6 32 A6 t.>.2.7.?.:.7.2.
007980: 67 CD 9D 1E 44 4D 2A 9A 37 EB CD 30 FC 4D 44 22 g...DM*.7..0.MD"
007990: FD 37 CD 21 FC 2A 1B F6 4D 44 C3 24 FC 3A 8F 37 .7.!.*..MD.$.:.7
0079A0: 4F C3 AB 1F 21 82 37 4E 3A A8 37 B7 1F 0D C2 AB O...!.7N:.7.....
0079B0: 1E 47 3E 08 96 4F 3A A6 37 0D CA C2 1E B7 17 C3 .G>..O:.7.......
0079C0: B9 1E 80 C9 2A DB FB 11 10 00 19 C9 CD C4 1E 09 ....*...........
0079D0: 3A A3 37 B7 CA DA 1E 6E 60 C9 09 7E 23 66 6F C9 :£7....n`..~#fo.
0079E0: CD A4 1E 32 9F 37 4F 06 00 CD CC 1E 22 AB 37 7D ...2.7O.....".7}
0079F0: B4 C9 3A 82 37 4F 2A AB 37 AF CD F6 1C 22 AB 37 ..:.7O*.7....".7
007A00: E5 3A 2B 1C B7 CC 9C 14 32 BF 19 E1 C1 FE 0D CA .:+.....2.......
007A10: E7 18 FE 0A CA E7 18 FE 06 C2 35 16 CD C0 14 1D ..........5.....
007A20: BB D2 FF 15 EB 2A 28 1C 7E B7 CA 6F 16 23 22 28 .....*(.~..o.#"(
007A30: 1C EB C3 4D 18 FE 17 C2 9A 16 EB 2A 28 1C 7E B7 ...M.......*(.~.
007A40: CA 60 16 EB CD C0 14 1D BB EB DA 55 16 EB CD 6F .`.........U...o
007A50: 15 EB C3 6A 16 2A 28 1C 7E 23 22 28 1C C3 91 16 ...j.*(.~#"(....
007A60: 21 2A 1C 7E 36 00 B7 CA 73 16 21 2B 1C 36 00 EB !*.~6...s.!+.6..
007A70: C3 FF 15 3A 2B 1C B7 C2 82 16 78 B7 C2 6F 16 CD ...:+.....x..o..
007A80: DA 8A 15 7B 32 B7 FB C3 93 15 E5 CD 13 14 E1 23 ...{2..........#
007A90: C3 77 15 3A B7 FB 32 2E 1C CD 1B 15 CD 2B 15 3A .w.:..2......+.:
007AA0: 2E 1C 32 2D 1C C1 E1 C9 21 25 1C 22 28 1C AF 32 ..2-....!%."(..2
007AB0: 2A 1C C9 21 C2 1A 22 26 1C C9 21 2A 1C 7E B7 C0 *..!.."&..!*.~..
007AC0: 34 3A B7 FB 32 2D 1C C9 CD C0 14 D4 82 14 3A C0 4:..2-........:.
007AD0: 19 47 0E 00 CD EE 14 CD B3 15 CD A8 15 CD 5E 15 .G............^.
007AE0: AF 32 2B 1C 3E 01 32 DF FB 3A B7 FB 32 BD 19 2A .2+.>.2..:..2..*
007AF0: DB FB 4E 23 E5 AF 47 32 BE 19 B9 C2 FF 15 0C C5 ..N#..G2........
007B00: C8 32 C0 19 D5 01 0F 15 C5 47 04 48 C3 29 1D E1 .2.......G.H.)..
007B10: 2B 36 00 C9 3A B7 FB 32 2C 1C C9 3A B7 FB 21 2D +6..:..2,..:..!-
007B20: 1C BE D0 0E 20 CD CD 13 C3 1B 15 3A 2C 1C 21 B7 .... ......:,.!.
007B30: FB BE D0 0E 08 CD CD 13 C3 2B 15 C5 E5 2A 28 1C .........+...*(.
007B40: 1E 00 7E B7 CA 4C 15 1C 23 C3 42 15 78 83 B9 F5 ..~..L..#.B.x...
007B50: 0E 07 D4 7A FB F1 E1 C1 D8 D1 D1 C3 FF 15 3A 2A ...z..........:*
007B60: 1C B7 C8 3A BF 19 FE 01 C8 FE 06 C8 FE 17 C8 E5 ...:............
007B70: C5 CD 14 15 2A 28 1C 7E B7 CA 93 15 4F CD C0 14 ....*(.~....O...
007B80: 72 14 0E 0D CD CD 13 0E 0A C3 CD 13 21 D3 FB 0A r...........!...
007B90: BE C8 03 C5 4F CD 28 14 C1 C3 8C 14 2A 28 1C 7E ....O.(.....*(.~
007BA0: 32 2A 1C 2A BA FB 7D B4 CA B7 12 CD 21 F6 23 B7 2*.*..}.....!.#.
007BB0: C2 B6 14 21 00 00 22 BA FB 22 BC FB C0 C3 B7 12 ...!..".."......
007BC0: 3A B6 FB 5F 3A B7 FB BB C9 EB 2A 28 1C EB 1A B7 :.._:.....*(....
007BD0: C8 13 23 77 04 C3 CE 14 78 B7 C8 C5 48 E5 EB 13 ..#w....x...H...
007BE0: 21 C2 1A CD 29 1D 36 00 22 26 1C E1 C1 C9 3A B4 !...).6."&....:.
007BF0: FB 17 D0 21 C2 1A 11 C1 19 0C C2 0A 15 EB 78 B7 ...!..........x.
007C00: 06 00 EB 21 AB 37 73 23 72 23 70 C9 2A 6B 37 4E ...!.7s#r#p.*k7N
007C10: 23 46 C5 2A 6D 37 5E 23 56 23 46 2A AB 37 3A AD #F.*m7^#V#F*.7:.
007C20: 37 4F 7D 93 7C 9A 79 98 E5 D2 39 1E 2A 80 37 CD 7O}.|.y...9.*.7.
007C30: E4 1C E1 E3 2B E3 C3 22 1E 2A 80 37 CD ED 1C E1 ....+..".*.7....
007C40: 7D 93 7C 9A 79 98 DA 50 1E E3 23 E3 E5 C3 39 1E }.|.y..P..#...9.
007C50: E3 E5 2A 80 37 CD E4 1C E1 D5 C5 E5 EB 2A 8D 37 ..*.7........*.7
007C60: 19 44 4D 22 FB 37 CD 1E FC D1 2A 6B 37 73 23 72 .DM".7....*k7s#r
007C70: C1 D1 2A 6D 37 73 23 72 23 70 C1 79 93 6F 78 9A ..*m7s#r#p.y.ox.
007C80: CD 18 FC AF 2A 6B 37 77 23 77 2A 6D 37 77 23 77 ....*k7w#w*m7w#w
007C90: 23 77 C9 3E 01 32 B4 37 CD 27 FC C3 A5 1D AF 32 #w.>.2.7.'.....2
007CA0: B4 37 CD 2A FC B7 C8 4F CD B6 1D 79 FE 03 DA B2 .7.*...O...y....
007CB0: 1C 0E 01 C3 B2 1C 3C C0 CD EB 1D C8 2A 65 37 CD ......<.....*e7.
007CC0: 1D 20 0E 01 C8 CD B2 20 E1 3A DF FB FE 30 C8 21 . ..... .:...0.!
007CD0: AA 37 3A A4 37 BE C2 E6 1D CD 13 21 3A B4 37 B7 .7:.7......!:.7.
007CE0: C0 0E 02 C3 B2 1C AF 32 DE FB C9 2A 8B 37 3E 80 .......2...*.7>.
007CF0: BC C0 AF BD C9 2A E1 FB 0E 02 CD AB 1F 22 91 37 .....*.......".7
007D00: 1F 34 C0 23 34 C0 23 34 C9 CD 12 1D EB 0E 03 C3 .4.#4.#4........
007D10: 29 1D CD 37 1F 11 AE 37 C9 CD 12 1D C3 0D 1D 1A )..7...7........
007D20: BE C0 23 13 0D C8 C3 1F 1D 0C 0D C8 1A 77 13 23 ..#..........w.#
007D30: C3 2A 1D 4A CD 1B FC 7C B5 C8 5E 23 56 23 22 69 .*.J...|..^#V#"i
007D40: 37 23 23 22 6B 37 23 23 22 6D 37 23 23 23 22 6F 7##"k7##"m7###"o
007D50: 37 23 22 71 37 23 23 EB 22 9A 37 21 73 37 0E 0D 7#"q7##.".7!s7..
007D60: CD 29 1D 2A 73 37 EB 21 80 37 0E 11 CD 29 1D 2A .).*s7.!.7...).*
007D70: 85 37 7C 21 A3 37 36 FF B7 CA 7E 1D 36 00 37 C9 .7|!£76...~.6.7.
007D80: 72 72 6F 72 00 46 69 6C 65 20 45 78 69 73 74 73 rror.File Exists
007D90: 00 3F 20 69 6E 20 46 69 6C 65 6E 61 6D 65 00 00 .? in Filename..
007DA0: 00 0E 02 C3 B2 1C 0E 03 C3 B2 1C 0E 04 3E FF 32 .............>.2
007DB0: A9 37 61 2E FF 22 9F 1C 3A AA 37 32 ED FB 3A E7 .7a.."..:.72..:.
007DC0: FB 3C C4 FB FB 3A DF FB FE 1B CA 35 37 FE 1F CA .<...:.....57...
007DD0: 35 37 C3 3B 37 3A BC 37 32 1D F6 C9 AF 32 BC 37 57.;7:.72....2.7
007DE0: 32 1D F6 C9 7B 95 5F 7A 9C 57 D0 05 C9 7B 85 5F 2...{._z.W...{._
007DF0: 7A 8C 57 D0 04 C9 0C 0D C8 29 8F C3 F7 1C CD 37 z.W......).....7
007E00: D0 35 7E B7 C8 79 FE 08 C2 0D 14 35 C9 FE 0D C0 .5~..y.....5....
007E10: 36 00 C9 79 CD F0 12 D2 28 14 F5 0E 5E CD CD 13 6..y....(...^...
007E20: F1 F6 40 4F CD C0 14 C8 3A DF FB 3D CA 37 14 3A ..@O....:..=.7.:
007E30: CF FB E6 14 C2 CD 13 79 FE 09 C2 CD 13 3A DF FB .......y.....:..
007E40: FE 01 C2 49 14 CD C0 14 C8 0E 20 CD CD 13 3A B7 ...I...... ...:.
007E50: FB E6 07 C2 3D 14 C9 CD 65 14 3A BF 19 FE 01 C8 ....=...e.:.....
007E60: 0E 20 CD 7A FB 0E 08 C3 7A FB 0E 23 CD CD 13 CD . .z....z..#....
007E70: 82 14 3A B7 FB 21 BD 19 BE D0 0E 20 CD CD 13 C3 ..:..!..... ....
007E80: 20 F6 47 3A CF FB 1F D2 8E 13 3E 03 BE C8 78 FE .G:......>...x.
007E90: 11 CA 9D 13 FE 10 CA 9D 13 77 3E 01 C9 AF 77 C9 .........w>...w.
007EA0: CC A9 13 0E 07 C4 7A FB C9 3A CF FB E6 14 C2 BB ......z..:......
007EB0: 13 21 D4 FB 3E 01 AE E6 01 77 C9 AF C9 3A DF FB .!..>....w...:..
007EC0: 3D CA 7A FB 78 E6 10 C2 7A FB C3 7A FB 3A BC 19 =.z.x...z..z.:..
007ED0: B7 C2 F6 13 3A CF FB E6 14 47 C5 3A DF FB 3D C4 ....:....G.:..=.
007EE0: 2F 13 C1 C5 CD BD 13 C1 78 B7 C2 F6 13 C5 3A D4 /.......x.....:.
007EF0: FB B7 C4 80 FB C1 79 21 B7 FB FE 7F C8 34 FE 20 ......y!.....4.
007F00: 20 F6 B7 C2 9A 13 CD 6E FB E6 01 C9 21 D5 FB 36 ......n....!..6
007F10: 40 E3 E9 47 3A CF FB E6 02 78 C9 CD 13 13 C2 FF @..G:....x......
007F20: 12 3A 20 F6 B7 C2 50 13 3A CC FB 3C CA FF 12 CD .: ...P.:..<....
007F30: 13 13 C0 3A 20 F6 FE 13 CA 50 13 CD 0C 13 CD 6E ...: ....P.....n
007F40: FB E1 36 00 E6 01 C8 CD 0C 13 CD 74 FB E1 36 00 ..6........t..6.
007F50: FE 13 C2 7F 13 21 20 F6 BE C2 5E 13 36 00 CD 0C .....! ...^.6...
007F60: 13 CD 74 FB E1 36 00 FE 03 C2 75 13 3A CF FB E6 ..t..6....u.:...
007F70: 08 CA 29 12 AF D6 11 C8 3C CD A0 13 C3 5E 13 21 ..).....<....^.!
007F80: D8 FB 11 80 00 19 C3 93 12 2A D8 FB 22 72 12 C9 .........*.."r..
007F90: 2A 72 12 22 D8 FB C3 BF 21 C1 3C C8 3A E6 FB 90 *r."....!.<.:...
007FA0: 67 C9 E5 3A DF FB FE 21 D4 19 1D CD 90 12 D1 2A g..:...!.......*
007FB0: 66 12 F9 EB 7D 44 C9 21 20 F6 7E 36 00 B7 C0 C3 f...}D.! .~6....
007FC0: 74 FB 21 72 19 E5 CD B7 12 CD F0 12 DA D6 12 F5 t.!r............
007FD0: 4F CD 28 14 F1 C9 CD 13 13 C0 FE 13 C2 E5 12 CD O.(.............
007FE0: 5E 13 C3 C6 12 FE 11 CA C6 12 FE 10 CA C6 12 C9 ^...............
007FF0: FE 0D C8 FE 0A C8 FE 09 C8 FE 08 C8 FE 20 C9 3A ............. .:
008000: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008010: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 43 ...............C
008030: 50 2F 4D 20 45 72 72 6F 72 20 4F 6E 20 20 3A 20 P/M Error On :
008040: 00 44 69 73 6B 20 49 2F 4F 00 49 6E 76 61 6C 69 .Disk I/O.Invali
008050: 64 20 44 72 69 76 65 00 52 65 61 64 2F 4F 6E 6C d Drive.Read/Onl
008060: 79 20 46 69 6C 65 00 52 65 61 64 2F 4F 6E 6C 79 y File.Read/Only
008070: 20 44 69 73 6B 00 50 61 73 73 77 6F 72 64 20 45 Disk.Password E
008080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0080A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0080B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0080C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0080D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0080E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0080F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0081A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0081B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0081C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0081D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0081E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0081F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008200: 46 75 6E 63 74 69 6F 6E 20 3D 20 20 20 20 20 46 Function = F
008210: 69 6C 65 20 3D 20 00 00 00 00 00 00 00 00 00 00 ile = ..........
008220: 00 00 00 21 FD FF C3 2C 12 CD 24 3C 22 AC FB C3 ...!...,..$<"...
008230: 68 FB 00 00 21 00 00 39 22 66 12 21 A2 12 E5 CD h...!..9"f.!....
008240: 09 1D CD 89 12 3A E6 FB F5 32 99 37 CD 74 12 B7 .....:...2.7.t..
008250: C2 99 12 3A DF FB FE 21 D4 FE 1C CD 7F 12 F1 3D ...:...!.......=
008260: C2 48 12 67 6F C9 00 00 C7 C7 C7 C7 C7 C7 C7 C7 .H.go...........
008270: C7 C7 00 00 3A DF FB 4F 2A DB FB EB C3 3B 0F 2A ....:..O*....;.*
008280: E5 CD 82 14 3A AA 37 C6 41 32 3D 1C 01 2F 1C CD ....:.7.A2=../..
008290: EE 11 C1 3A F3 FB 17 D2 EE 11 CD EE 11 3A DF FB ...:.........:..
0082A0: 06 30 21 0B 12 FE 64 DA AF 11 36 31 23 D6 64 D6 .0!...d...61#.d.
0082B0: 0A DA B8 11 04 C3 AF 11 70 23 C6 3A 77 23 36 20 ........p#.:w#6
0082C0: 21 0E 12 36 00 3A DD FB B7 CA E5 11 36 20 D5 2A !..6.:......6 .*
0082D0: DB FB 23 EB 21 16 12 0E 08 CD 29 1D 36 2E 23 0E ..#.!.....).6.#.
0082E0: 03 CD 29 1D D1 CD 82 14 01 FB 11 C3 EE 11 0A B7 ..).............
0082F0: C8 C5 4F CD 28 14 C1 03 C3 EE 11 42 44 4F 53 20 ..O.(......BDOS
008300: 00 09 01 01 07 CD 19 11 C2 05 11 3E 07 90 E1 E5 ...........>....
008310: 01 1A 00 09 77 1A C3 E0 10 CD 4D 11 C8 FE 20 13 ....w.....M... .
008320: DA F5 10 04 05 FA F5 10 0C 0D C2 32 11 FE 2A CA ...........2..*.
008330: 37 11 77 23 05 B7 C9 36 3F 23 05 F2 37 11 C9 0D 7.w#...6?#..7...
008340: 09 20 2E 2C 3A 3B 5B 5D 3D 3C 3E 7C 00 1A E5 21 . .,:;[]=<>|...!
008350: 3F 11 BE CA 5D 11 34 35 23 C2 52 11 B7 E1 C8 FE ?...].45#.R.....
008360: 61 D8 FE 7B D2 69 11 E6 5F E6 7F C9 70 23 0D C2 a..{.i.._...p#..
008370: 6C 11 C9 1A 13 FE 20 CA 73 11 FE 09 CA 73 11 C9 l..... .s....s..
008380: 01 08 20 CD 6C 11 01 0C 00 CD 6C 11 CD 73 11 1A .. .l.....l..s..
008390: FE 3A 1B E1 E5 C2 AC 10 CD 4D 11 CA E0 10 D6 41 .:.......M.....A
0083A0: DA F6 10 FE 10 D2 F6 10 13 13 3C 77 23 CD 4D 11 ..........<w#.M.
0083B0: CA E0 10 01 00 07 1A FE 2E CA CA 10 FE 3B CA FB .............;..
0083C0: 10 CD 19 11 C2 B6 10 C3 E0 10 13 E1 E5 01 09 00 ................
0083D0: 09 01 00 02 1A FE 3B CA FB 10 CD 19 11 C2 D4 10 ......;.........
0083E0: C1 D5 CD 73 11 1B CD 4D 11 E1 C0 21 00 00 B7 C8 ...s...M...!....
0083F0: FE 0D C8 EB C9 C1 C1 21 FF FF C9 13 E1 E5 01 10 .......!........
008400: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008410: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008420: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008430: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008440: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008450: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008480: FB CA 29 33 EB 22 CF FB C9 21 D3 FB 7A A3 3C 7E ..)3."...!..z£<~
008490: CA 72 19 73 C9 EB 5E 23 56 23 4E 23 46 EB 78 B1 .r.s..^#V#N#F.x.
0084A0: C8 C5 E5 4E 3A DF FB FE 6F CA B2 19 CD 80 FB C3 ...N:...o.......
0084B0: B5 19 CD 28 14 E1 23 C1 0B C3 9E 19 00 00 00 00 ...(..#.........
0084C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0084D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0084E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0084F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008500: 13 CD 15 FC C3 72 19 79 3C CA 20 19 3C CA 17 19 .....r.y<. .<...
008510: 3C CA 25 19 C3 7A FB CD FF 12 C2 C0 24 C3 72 19 <.%..z......$.r.
008520: CD FF 12 B7 C8 CD B7 12 C3 72 19 CD 36 FC C3 72 .........r..6..r
008530: 19 CD 39 FC C3 72 19 EB 4D 44 C3 8C 14 3A CF FB ..9..r..MD...:..
008540: 1F D2 6F 19 21 D5 FB 36 80 E5 21 68 19 E5 3A 20 ..o.!..6..!h..:
008550: F6 FE 03 CA 9A 13 CD 6E FB B7 C8 CD 74 FB FE 03 .......n....t...
008560: CA 7F 13 32 20 F6 AF C9 CD 72 19 E1 36 00 C9 CD ...2 ....r..6...
008570: 1B 13 32 9F 1C C9 3E 01 C3 72 19 7A A3 3C 2A CF ..2...>..r.z£<*.
008580: 07 CA 39 17 FE 7F CA 8C 18 CD 5E 15 3A CF FB E6 ..9.......^.:...
008590: 08 C2 97 18 7E FE 03 78 C2 A0 18 FE 01 CA 29 12 ....~..x......).
0085A0: B9 D2 E0 18 C5 E5 CD C0 14 DA 01 16 3A 2A 1C B7 ............:*..
0085B0: CA C0 18 3A BF 19 FE 17 CA C5 18 FE 06 CA C5 18 ...:............
0085C0: 3E 05 C3 08 16 E1 C1 05 EB 2A 28 1C 2B 22 28 1C >........*(.+"(.
0085D0: 1A 77 EB 2B C5 E5 CD 2B 15 AF 32 2B 1C C3 01 16 .w.+...+..2+....
0085E0: AF 32 2B 1C C3 FF 15 CD C9 14 E1 70 C5 CD D8 14 .2+........p....
0085F0: C1 0E FF CD EE 14 21 00 00 22 BA FB 0E 0D C3 CD ......!.."......
008600: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
008610: 07 00 01 00 02 09 52 E5 07 00 41 02 00 00 00 02 ......R...A.....
008620: 07 00 46 02 00 00 00 02 07 00 42 02 00 00 00 02 ..F.......B.....
008630: 07 00 47 02 00 00 00 02 07 00 43 02 00 00 00 02 ..G.......C.....
008640: 07 00 48 02 00 00 00 02 07 00 44 02 00 00 00 02 ..H.......D.....
008650: 07 00 49 02 00 00 00 02 07 00 45 02 00 00 00 02 ..I.......E.....
008660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0086A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0086B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0086C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0086D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0086E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0086F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008700: 11 33 17 33 23 33 2D 33 41 33 4A 33 53 33 40 2D .3.3#3-3A3J3S3@-
008710: 59 33 75 19 75 19 4A 33 C0 24 75 19 75 19 7D 33 Y3u.u.J3.$u.u.}3
008720: 8B 33 90 33 CD 33 DF 33 2A 34 50 34 E8 33 C8 34 .3.3.3.3*4P4.3.4
008730: A6 35 1F 36 28 36 64 36 F1 36 FE 36 13 37 1E 37 .5.6(6d6.6.6.7.7
008740: 27 37 7B 19 89 19 95 19 95 19 41 1C 67 1C 58 1C '7{.......A.g.X.
008750: 4A 1C 00 00 00 00 76 1C 85 1C 91 1C FE 98 C0 21 J.....v........!
008760: 29 33 E5 2A DB FB 5E 23 56 D5 23 5E 23 56 E1 EB )3.*..^#V.#^#V..
008770: E5 AF 77 23 01 0B 20 CD 6C 11 01 04 00 CD 6C 11 ..w#.. .l.....l.
008780: 21 4A 10 09 09 5E 23 56 EB CD 80 11 C1 3A E7 FB !J...^#V.....:..
008790: B7 C0 C3 23 12 14 15 21 22 28 00 43 4F 50 59 52 ...#...!"(.COPYR
0087A0: 49 47 48 54 20 28 43 29 20 31 39 38 32 2C 20 44 IGHT (C) 1982, D
0087B0: 49 47 49 54 41 4C 20 52 45 53 45 41 52 43 48 20 IGITAL RESEARCH
0087C0: 31 35 31 32 38 32 2F 12 C2 12 28 14 01 19 12 FC 151282/...(.....
0087D0: 80 FB 07 19 2B 19 31 19 37 19 C8 15 3D 19 7D 30 ....+.1.7...=.}0
0087E0: 83 30 96 30 A0 30 87 31 9B 31 EC 31 F5 31 FB 31 .0.0.0.1.1.1.1.1
0087F0: 04 32 0D 32 EF 32 F5 32 FB 32 01 33 08 33 D3 20 .2.2.2.2.2.3.3.
008800: 36 35 34 33 32 31 EB 22 DB FB EB 79 32 DF FB FE 654321."...y2...
008810: 0E DA 3B 0F 21 00 00 22 98 37 3A DA FB 32 A4 37 ..;.!..".7:..2.7
008820: 3D 32 BC 37 3A E6 FB 3D CA 3B 0F 21 95 0F 7E B7 =2.7:..=.;.!..~.
008830: CA 3B 0F B9 CA 34 12 23 C3 2E 0F 7B 32 9E 37 21 .;...4.#...{2.7!
008840: 00 00 22 9F 1C 22 DD FB 39 22 32 12 21 3B 37 E5 ..".."..9"2.!;7.
008850: 79 FE 33 D2 5D 0F 4B 21 C6 0F C3 6F 0F FE 80 D2 y.3.].K!...o....
008860: 5C 10 D6 62 DA C0 24 FE 0F D2 C0 24 21 2C 10 5F \..b..$....$!,._
008870: 16 00 19 19 5E 23 56 2A DB FB EB E9 06 00 C5 0D ....^#V*........
008880: C3 1A 04 00 00 00 C3 1B 01 C3 06 00 07 00 00 00 ................
008890: 4C 4F 41 44 45 52 20 20 FF 00 00 79 FE 3B C2 09 LOADER ...y.;..
0088A0: 01 C1 C5 21 00 00 39 31 BE 03 22 9A 03 C5 EB 22 ...!..91.."...."
0088B0: 98 03 7C B5 F5 CC 00 02 F1 C4 30 02 D1 21 00 01 ..|.......0..!..
0088C0: 7E FE C9 CA 9E 01 7A 3D B3 C2 5F 01 3A 0D 01 B7 ~.....z=.._.:...
0088D0: C2 5F 01 2A 0A 01 22 06 00 22 94 03 CD F8 01 2A ._.*.."..".....*
0088E0: 9A 03 F9 AF 6F 67 C9 11 FE 00 2A 9A 03 F9 E1 E5 ....og....*.....
0088F0: 25 7C B5 EB 7D 44 C0 0E 09 11 53 03 CD 05 00 C3 %|..}D....S.....
008900: 5F 0E 0E C3 05 00 06 E0 C3 F9 0B 01 0F 00 11 AD _...............
008910: 0D 21 20 00 19 36 00 C5 D5 1A A0 3D F4 80 09 11 .! ..6.....=....
008920: A2 0D CD 7B 09 D1 C1 D5 2A 8D 03 2E E7 70 E5 CD ...{....*....p..
008930: 05 00 D1 AF 12 3A 72 0D 1E DA 12 E5 CD 78 09 E1 .....:r......x..
008940: 2C D1 C9 0E 11 C3 CA 09 0E 12 11 5C 00 CD 05 00 ,..........\....
008950: 3C C8 3D 87 87 87 87 87 21 80 00 CD B0 0C EB AF <.=.....!.......
008960: 3D C9 AF 32 9F 0D 0E 14 11 5C 00 CD 05 00 B7 C9 =..2.....\......
008970: 11 73 0D C3 EB 09 CD EE 0B EB AF 32 A1 0D 21 F6 .s.........2..!.
008980: 0D CD 44 0A EB FE 3B C8 FE 21 CA 1C 0A FE 3A C2 ..D...;..!....:.
008990: 1D 0A 2E AC 34 34 CA 1C 0A 23 34 C8 13 EB 22 6C ....44...#4..."l
0089A0: 0D 7E FE 5B C2 2A 0A 32 A1 0D FE 61 DA 37 0A FE .~.[.*.2...a.7..
0089B0: 7B D2 37 0A D6 20 77 FE 21 CC 59 0A 23 B7 C2 21 {.7.. w.!.Y.#..!
0089C0: 0A 2A 6C 0D 22 6C 0D 22 9B 0D 7E B7 C8 FE 20 CA .*l."l."..~... .
0089D0: 55 0A FE 09 C0 23 C3 44 0A 5D 54 13 1A FE 21 F5 U....#.D.]T...!.
0089E0: E5 CC B7 0B E1 F1 C8 36 00 EB 2A 06 00 25 2E 18 .......6..*..%..
0089F0: 77 E5 23 13 1A 77 FE 21 C2 7D 0A 36 0D B7 C2 72 w.#..w.!.}.6...r
008A00: 0A 36 0D 23 77 2E 06 36 C3 23 36 09 23 74 23 36 .6.#w..6.#6.#t#6
008A10: C3 2E 0E 77 6F EB CD D0 01 2A 8D 03 2E B1 D1 13 ...wo....*......
008A20: 73 23 72 2E AE 72 AF C9 11 B1 BA CD A7 0B B7 11 s#r..r..........
008A30: B1 BC CC A7 0B E5 CD 6D 09 E1 2E B1 C2 CB 0A 5E .......m.......^
008A40: 23 56 34 35 2B CA CB 0A 1A B7 C0 AF 77 23 77 2E #V45+.......w#w.
008A50: AE 66 2E 0E 35 C3 00 02 11 5C 00 CD 41 0A F5 CD .f..5....\..A...
008A60: E4 0A F1 C9 22 6C 0D 22 9B 0D D5 11 6C 0D 0E 98 ...."l."....l...
008A70: CD 05 00 D1 7C B5 46 23 C2 FE 0A 21 28 0B 7C B5 ....|.F#...!(.|.
008A80: C2 09 0B 21 28 0B CD 3A 0C 78 FE 2E C2 10 0B 2B ...!(..:.x.....+
008A90: 22 6C 0D 0E 10 21 D0 0D D5 CD AE 0B 11 A2 0D 0E "l...!..........
008AA0: 0A CD AE 0B D1 7E 21 00 00 B7 47 CA 38 0B 2A 9B .....~!...G.8.*.
008AB0: 0D 7E FE 3B 23 C2 31 0B C9 D5 AF 12 13 12 13 CD .~.;#.1.........
008AC0: 41 0A 2A 6C 0D D1 D5 06 04 7E FE 3A CA 67 0B B7 A.*l.....~.:.g..
008AD0: C3 0A 04 05 23 C2 49 0B D1 AF 12 2A 6C 0D 13 1A ....#.I....*l...
008AE0: F5 CD E4 0A F1 12 C9 2A 6C 0D 7E FE 30 DA 85 0B .......*l.~.0...
008AF0: FE 3A D2 85 0B CD 71 0C D1 D5 1A B7 C2 58 0B 78 .:....q......X.x
008B00: 00 00 23 4E 23 46 3A 8F 03 B7 CA 92 01 23 34 CA ..#N#F:......#4.
008B10: 9D 01 D5 CD 0F 03 E1 CD CA 02 CD D0 01 E1 11 10 ................
008B20: 00 19 E5 5E 23 56 7B B2 C2 82 01 CD 03 01 3A 00 ...^#V{.......:.
008B30: 02 FE C9 C2 BF 01 2A 8D 03 2E B3 7E F6 02 77 2A ......*....~..w*
008B40: 01 01 44 4D 21 00 02 11 00 01 CD 26 03 C3 5F 01 ..DM!......&.._.
008B50: 2A 06 00 2E 00 01 06 00 CD 26 03 1E 18 12 1E 0D *........&......
008B60: 12 1B 3E 07 12 6B 1E 0B 73 23 72 EB 72 2B 36 06 ..>..k..s#r.r+6.
008B70: 2E 06 22 06 00 22 94 03 11 92 03 0E 31 C3 05 00 ..".."......1...
008B80: 2A 06 00 44 60 2E 18 34 35 C0 2E 0B 46 2E 0E 7E *..D`..45...F..~
008B90: B7 CA 04 02 2E 0C 5E 23 56 78 12 1B 3E 06 12 13 ......^#Vx..>...
008BA0: 60 2E 0C 73 23 72 7A B7 C5 CC F0 01 C1 C3 04 02 `..s#rz.........
008BB0: E5 11 90 03 CD FB 01 EB E1 E5 01 20 00 09 36 00 ........... ..6.
008BC0: 23 4E 23 66 69 25 24 CA 67 01 E5 D5 E5 CD 31 03 #N#fi%$.g.....1.
008BD0: E1 F5 1E 80 3A 07 00 3D 94 DA FA 02 3C FE 40 D2 ....:..=....<.@.
008BE0: 76 02 07 5F 7D B7 CA 76 02 06 02 3D FA 70 02 05 v.._}..v...=.p..
008BF0: 7B 90 CA FA 02 5F D5 E5 CD 33 03 E1 E5 CD 3B 03 {...._...3....;.
008C00: E1 D1 F5 7B 3C 1F 84 67 22 96 03 F1 CA 54 02 C1 ...{<..g"....T..
008C10: 3D 58 CD 33 03 0E 1A D1 F5 CD 05 00 F1 2A 9C 03 =X.3.........*..
008C20: EB C2 6A 01 D1 E1 01 09 00 09 7E E6 7F FE 50 C0 ..j.......~...P.
008C30: 23 7E E6 7F FE 52 C0 23 7E E6 7F D6 4C C0 7B B7 #~...R.#~...L.{.
008C40: C2 67 01 62 6B 23 4E 23 46 6B 24 D5 C5 CD 26 03 .g.bk#N#Fk$...&.
008C50: C1 D1 D5 5A 1D E5 63 1E 00 78 B1 CA F7 02 0B 7B ...Z..c..x.....{
008C60: E6 07 C2 EA 02 E3 7E 23 E3 6F 7D 17 6F D2 F3 02 ......~#.o}.o...
008C70: 1A 84 12 13 C3 D9 02 D1 D1 C9 CD 31 03 21 80 00 ...........1.!..
008C80: CD 3B 03 C2 8F 02 21 FE 00 22 9C 03 C3 8F 02 3A .;....!..".....:
008C90: 07 00 3D 0B 90 03 FE 0F DA 77 01 2A 96 03 BC DA ..=......w.*....
008CA0: 77 01 57 1E 00 C9 78 B1 C8 0B 7E 12 13 23 C3 26 w.W...x...~..#.&
008CB0: 03 1E 01 2A 8D 03 2E E6 7E 73 C9 EB 0E 1A E5 CD ...*....~s......
008CC0: 05 00 0E 14 2A 98 03 EB CD 05 00 22 9C 03 D1 B7 ....*......"....
008CD0: C8 5C C9 0D 0A 43 61 6E 6E 6F 74 20 6C 6F 61 64 .\...Cannot load
008CE0: 20 50 72 6F 67 72 61 6D 24 32 32 31 32 38 32 20 Program$221282
008CF0: 20 43 4F 50 59 52 20 27 38 32 20 44 52 49 20 00 COPYR '82 DRI .
008D00: 3C 12 C3 9C 0B FE 41 DA 58 0B FE 51 D2 58 0B D1 <.....A.X..Q.X..
008D10: D5 13 1A B7 C2 58 0B 7E D6 40 12 23 7E FE 3A C2 .....X.~.@.#~.:.
008D20: 6B 0B 23 D1 C3 5E 0B 2A 8D 03 6A 54 0E 02 7E 12 k.#..^.*..jT..~.
008D30: 23 13 0D C2 AE 0B C9 0E 00 1A 77 B7 79 C8 23 13 #.........w.y.#.
008D40: 03 C3 B9 0B AF 21 9F 0D 34 FC E2 09 B7 C0 3A 9F .....!..4.....:.
008D50: 0D 21 80 00 CD B0 0C AF 7E C9 01 40 B4 2A 8D 03 .!......~..@.*..
008D60: 68 7E A1 C9 01 A0 B4 CD DD 0B 79 B6 77 C9 01 A0 h~........y.w...
008D70: B4 CD DD 0B 79 2F A6 77 C9 2A 8D 03 68 77 C9 2A ....y/.w.*..hw.*
008D80: 8D 03 68 7E C9 CD 49 09 45 3E 0D CD A6 0C 3E 0A ..h~..I.E>....>.
008D90: C3 A6 0C D6 0A DA 25 0C 1E 30 1C D6 0A D2 1A 0C ......%..0......
008DA0: F5 CD 3C 09 F1 C6 3A C3 16 09 7E B7 C8 B9 C8 CD ..<...:...~.....
008DB0: A6 0C 23 C3 2A 0C CD 41 0A C8 21 67 0D 7E B7 36 ..#.*..A..!g.~.6
008DC0: 00 C0 2A 9B 0D 0E 20 CD 2A 0C 3E 3F CD 16 09 C3 ..*... .*.>?....
008DD0: 06 05 CD 41 0A 2A 6C 0D 22 9B 0D C8 7E FE 30 DA ...A.*l."...~.0.
008DE0: 3A 0C FE 3A D2 3A 0C CD 71 0C 22 6C 0D F6 01 78 :..:.:..q."l...x
008DF0: C9 06 00 7E D6 30 D8 FE 0A D0 F5 78 87 87 80 87 ...~.0.....x....
008E00: 47 F1 23 80 47 FE 10 DA 73 0C C3 3A 0C 13 26 08 G.#.G...s..:..&.
008E10: CD 98 0C CD A4 0C 26 03 1A E6 7F CD A6 0C 13 25 ......&........%
008E20: C2 98 0C C9 3E 20 C5 D5 E5 CD 16 09 E1 D1 C1 C9 ....> ..........
008E30: 85 6F D0 24 C9 3E 3F 12 13 05 C2 B7 0C B7 C9 01 .o.$.>?.........
008E40: FF 00 D5 E5 1A E6 7F FE 21 DA D0 0C BE C2 E0 0C ........!.......
008E50: 13 0C 3E 20 BE 23 C2 C4 0C E1 D1 CD AE 0B 78 C9 ..> .#........x.
008E60: 3E 20 BE 23 C2 E2 0C D1 D1 04 0E FF 7E D6 01 D2 > .#........~...
008E70: C2 0C C9 45 6E 74 65 72 20 55 73 65 72 20 23 3A ...Enter User #:
008E80: 20 24 4E 6F 20 46 69 6C 65 24 20 72 65 71 75 69 $No File$ requi
008E90: 72 65 64 24 45 52 41 53 45 20 24 20 28 59 2F 4E red$ERASE $ (Y/N
008EA0: 29 3F 20 24 0D 0A 0D 0A 50 72 65 73 73 20 52 45 )? $....Press RE
008EB0: 54 55 52 4E 20 74 6F 20 43 6F 6E 74 69 6E 75 65 TURN to Continue
008EC0: 20 24 20 20 28 55 73 65 72 20 30 29 24 00 4E 4F $ (User 0)$.NO
008ED0: 4E 2D 53 59 53 54 45 4D 20 46 49 4C 45 28 53 29 N-SYSTEM FILE(S)
008EE0: 20 45 58 49 53 54 24 00 00 00 3A 00 00 00 D0 0D EXIST$...:.....
008EF0: 00 00 00 01 24 24 24 20 20 20 20 20 53 55 42 00 ....$$$ SUB.
008F00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008F10: 3C 00 62 FE 00 80 00 00 80 48 41 10 04 12 24 12 <.b......HA...$.
008F20: 40 08 00 10 00 88 44 48 00 20 04 80 00 09 00 20 @.....DH. .....
008F30: 00 00 01 20 00 00 10 00 00 11 12 00 00 41 00 10 ... .........A..
008F40: 40 82 08 21 00 22 08 01 10 00 00 00 20 01 00 04 @..!."...... ...
008F50: 08 01 02 08 24 12 00 24 40 00 84 00 02 04 00 00 ....$..$@.......
008F60: 00 00 00 00 00 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
008F70: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
008F80: 00 00 00 AF 32 4D 0D C3 99 06 CA 58 0B FE 20 CA ....2M.....X.. .
008F90: 58 0B FE 09 CA 58 0B C3 53 0B 31 2D 0F 21 0C 05 X....X..S.1-.!..
008FA0: E5 11 6A 0D 0E 31 CD 05 00 22 8D 03 2E FA 7E 32 ..j..1..."....~2
008FB0: 8F 03 2E 99 7E 32 A0 0D 3A 07 00 96 C2 58 04 01 ....~2..:....X..
008FC0: 94 02 CD 0F 03 63 6B CD CA 02 2A 06 00 6B 0E 06 .....ck...*..k..
008FD0: CD AE 0B 1E 0B CD EB 01 0E 62 CD 05 00 06 B6 CD .........b......
008FE0: FF 0B 3C 0F 0F 0F 0F E6 0F 11 97 0D 12 2E B8 7E ..<............~
008FF0: 3D 13 12 AF 13 12 3E 24 13 12 2E D3 77 2E E6 36 =.....>$....w..6
009000: 01 23 AF 77 2E CF 36 01 23 77 2E A1 36 31 2E B4 .#.w..6.#w..61..
009010: 7E E6 20 0E 0D E5 C4 05 00 E1 2E B3 7E E6 02 E5 ~. .........~...
009020: CC 00 02 E1 7E E6 FD 77 E6 40 E5 2E B0 01 70 0D ....~..w.@....p.
009030: 54 1E E0 1A 02 7E C2 BA 04 02 12 03 1E DA 1A C2 T....~..........
009040: C4 04 3E FF 02 2B 03 7E 02 12 2E EC 03 7E 02 E1 ..>..+.~.....~..
009050: 7E E6 80 CA E7 04 21 80 00 11 F5 0D 0E 7F 79 12 ~.....!.......y.
009060: 13 CD AE 0B C3 8B 05 2E B5 7E E6 02 C2 06 05 7E .........~.....~
009070: F6 02 77 32 67 0D 21 FC 04 C3 D9 04 50 52 4F 46 ..w2g.!.....PROF
009080: 49 4C 45 2E 53 00 CD E4 0B CD 09 0C 21 2B 0F F9 ILE.S.......!+..
009090: AF 32 99 0D 21 0C 05 E5 CD E4 0B 2B 7E E6 01 CA .2..!......+~...
0090A0: 64 05 11 F5 0D CD 7B 09 0E 0F CD F0 09 0E 0B CC d.....{.........
0090B0: F0 09 C2 4F 05 21 96 0D 77 2B 77 2B E5 3A 82 0D ...O.!..w+w+.:..
0090C0: 3D 77 0E 21 F4 F0 09 E1 35 0E 13 FC F0 09 B7 F5 =w.!....5.......
0090D0: 0E 63 CD F0 09 F1 CA 8B 05 01 01 B3 CD F1 0B 0E .c..............
0090E0: 13 CD F0 09 3A 70 0D B7 C4 13 0C CD 6D 06 3E 3E ....:p......m.>>
0090F0: CD 16 09 11 BA B1 CD A7 0B B7 F5 01 80 B4 C4 F1 ................
009100: 1A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0091A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0091B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0091C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0091D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0091E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0091F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009200: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009210: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009220: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009230: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009240: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009250: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009260: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009270: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009280: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009290: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0092A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0092B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0092C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0092D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0092E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0092F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009300: 0B CD 4E 09 CD EE 0B F1 C4 A8 0A CD DA 0B C2 96 ..N.............
009310: 05 2E C9 7E 2B 77 2E C8 7E 32 9A 0D CD F6 09 C8 ...~+w..~2......
009320: 11 AC 0D CD 39 0B 3A B6 0D FE 20 C2 04 06 21 AC ....9.:... ...!.
009330: 0D 7E 23 B6 23 7E C2 0A 06 21 37 06 11 AE 0D 3A .~#.#~...!7....:
009340: B0 0D FE 21 D4 BF 0C C2 E8 05 3A A1 0D B7 78 2A ...!......:...x*
009350: 6C 0D 22 9D 0D 21 5A 06 CA 58 08 FE 04 DA 86 07 l."..!Z..X......
009360: 21 B1 0D C2 E8 05 36 20 01 18 B4 CD DD 0B CA 04 !.....6 ........
009370: 06 06 08 90 CA F9 05 06 00 C5 CD 7A 08 CD E4 07 ...........z....
009380: F1 CD 7A 08 CD E4 07 C3 3A 0C FE 20 C2 E8 05 CD ..z.....:.. ....
009390: 36 0C 3A AC 0D D6 01 DA 25 06 32 70 0D 06 B0 CD 6.:.....%.2p....
0093A0: F9 0B CD 86 09 3A AD 0D 3D F8 F5 CD 80 09 F1 32 .....:..=......2
0093B0: 72 0D 06 AF C3 F9 0B 44 49 52 20 54 59 50 45 20 r......DIR TYPE
0093C0: 45 52 41 53 45 20 52 45 4E 41 4D 45 20 44 49 52 ERASE RENAME DIR
0093D0: 53 59 53 20 55 53 45 52 20 00 75 06 F4 06 22 07 SYS USER .u...".
0093E0: 51 07 7D 06 15 07 3A 5C 00 3D F2 70 06 3A 72 0D Q.}...:\.=.p.:r.
0093F0: C6 41 C3 A6 0C 0E 00 11 52 0D C3 82 06 0E 80 11 .A......R.......
009400: 4E 0D D5 CD 03 04 D1 CA B8 07 7D B8 D4 09 0C 21 N.........}....!
009410: 4D 0D 35 34 C8 35 C3 05 0C C5 CD 78 09 CD D8 0A M.54.5.....x....
009420: 11 5D 00 1A FE 20 06 0B CC B5 0C CD 36 0C CD C3 .]... ......6...
009430: 09 C1 C8 3A 97 0D 6F 47 04 E5 21 0A 00 19 7E E1 ...:..oG..!...~.
009440: E6 80 B9 CA CE 06 3E 01 32 4D 0D C3 E5 06 05 CC ......>.2M......
009450: 08 0C 78 BD CC 66 06 3E 3A CD A6 0C CD A4 0C CD ..x..f.>:.......
009460: 8D 0C CD A4 0C C5 E5 CD 66 09 CD C8 09 E1 C1 C2 ........f.......
009470: B9 06 3C C9 21 06 05 E5 CD D8 0A 3E 7F 32 9F 0D ..<.!......>.2..
009480: 0E 0F CD 6C 07 CD 66 09 CD C4 0B C0 FE 1A C8 CD ...l..f.........
009490: 16 09 C3 05 07 11 F3 0C CD AB 07 CD 52 0C C8 C3 ............R...
0094A0: 1A 06 CD D8 0A CA 4C 07 CD 9E 07 C2 4C 07 11 14 ......L.....L...
0094B0: 0D CD 49 09 2A 9B 0D 0E 20 CD 2A 0C 11 1B 0D CD ..I.*... .*.....
0094C0: 41 09 CD 09 0C 7D E6 5F FE 59 C0 B7 0E 13 C3 6C A....}._.Y.....l
0094D0: 07 CD D8 0A F5 21 10 00 19 EB D5 E5 0E 10 CD AE .....!..........
0094E0: 0B CD D8 0A E1 D1 CD 92 07 0E 17 F1 F5 C4 36 0C ..............6.
0094F0: F1 11 5C 00 06 FF 26 01 C4 91 09 C0 25 FA B8 07 ..\...&.....%...
009500: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009510: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009520: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009530: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009540: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009550: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009560: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009570: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009580: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009590: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0095A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0095B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0095C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0095D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0095E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0095F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009600: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009610: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009620: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009630: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009640: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009650: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0096A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0096B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0096C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0096D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0096E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0096F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009700: 2A 9D 0D 22 6C 0D CD E4 07 CD 8D 0C 11 0A 0D C3 *.."l...........
009710: BB 07 1A BE C8 B7 C8 34 35 C2 3A 0C 77 C9 06 0B .......45.:.w...
009720: 13 1A FE 3F C8 05 C2 A0 07 05 C9 CD 41 0A C0 CD ...?........A...
009730: 49 09 CD 4E 09 C3 F6 09 11 02 0D CD 05 0C C3 0C I..N............
009740: 05 00 53 55 42 4D 49 54 20 20 43 4F 4D 1A 06 AB ..SUBMIT COM...
009750: CD F9 0B 21 C1 07 0E 0C CD AE 0B 21 F5 0D 36 20 ...!.......!..6
009760: 23 22 6C 0D 11 B6 0D 21 63 08 CD BF 0C C0 11 AC #"l....!c.......
009770: 0D 1A B7 C0 13 1A 4F C5 0E 00 B7 C2 21 08 01 04 ......O.....!...
009780: E7 3A 72 0D 3C 67 2E 01 04 0D 79 E5 F4 FF 0B E1 .:r.<g....y.....
009790: B7 FA 76 08 CA 1B 08 BC C2 20 08 7C 2D FA 08 08 ..v...... .|-...
0097A0: 12 C5 E5 CD 8B 09 E1 C1 CA 08 08 01 03 B4 CD DD ................
0097B0: 0B CA 54 08 1A CD 69 06 3E 3A CD A6 0C D5 CD 8D ..T...i.>:......
0097C0: 0C D1 D5 21 08 00 19 7E E6 80 11 42 0D C4 49 09 ...!...~...B..I.
0097D0: CD 09 0C D1 F1 21 70 08 87 CD B0 0C D5 5E 23 56 .....!p......^#V
0097E0: EB D1 E9 43 4F 4D 20 53 55 42 20 50 52 4C 20 00 ...COM SUB PRL .
0097F0: 89 08 CD 07 89 08 C1 79 12 C9 0F 21 63 08 CD B0 .......y...!c...
009800: 0C 11 B6 0D 0E 03 C3 AE 0B 21 00 01 22 CE 0D 2A .........!.."..*
009810: 9F 0D 25 2E C0 E5 1A 32 50 00 EB 0E 23 CD AE 0B ..%....2P...#...
009820: 21 67 0D 34 2A 6C 0D 2B 11 81 00 EB 22 6C 0D CD !g.4*l.+...."l..
009830: B7 0B 32 80 00 CD D8 0A 22 51 00 78 32 53 00 11 ..2....."Q.x2S..
009840: 6C 00 CD DB 0A 22 54 00 78 32 56 00 21 71 0D 7E l...."T.x2V.!q.~
009850: B7 F4 80 09 3A 70 0D CD 86 09 87 87 87 87 2E DA ....:p..........
009860: B6 32 04 00 D1 2A 9F 0D AF 6F F9 67 E5 24 E5 32 .2...*...o.g.$.2
009870: 7C 00 06 CF CD F9 0B 2E 90 77 23 77 23 77 23 77 |........w#w#w#w
009880: 2E B3 7E E6 80 C2 0D 09 2E AC 77 23 77 7E E6 3F ..~.......w#w~.?
009890: 77 0E 3B C3 05 00 FE 0A C2 3B 09 21 98 0D 7E 23 w.;......;.!..~#
0098A0: 34 96 C2 39 09 77 23 7E B7 11 24 0D CC 41 09 FE 4..9.w#~..$..A..
0098B0: 03 CA 06 05 1E 0D CD 3C 09 3E 0A 5F 0E 02 C3 05 .......<.>._....
0098C0: 00 CD 49 09 0E 01 C3 05 00 0E 09 C3 05 00 21 F4 ..I...........!.
0098D0: 0D 36 E7 EB 0E 0A CD 05 00 21 F5 0D 7E 23 CD B0 .6.......!..~#..
0098E0: 0C 36 00 C3 09 0C CD 6D 09 C8 C3 06 05 0E 0B CD .6.....m........
0098F0: EB 09 C8 0E 01 C3 EB 09 11 80 00 0E 1A C3 05 00 ................
009900: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
009910: 08 00 01 00 02 09 52 E5 08 00 41 02 00 00 00 02 ......R...A.....
009920: 08 00 46 02 00 00 00 02 08 00 42 02 00 00 00 02 ..F.......B.....
009930: 08 00 47 02 00 00 00 02 08 00 43 02 00 00 00 02 ..G.......C.....
009940: 08 00 48 02 00 00 00 02 08 00 44 02 00 00 00 02 ..H.......D.....
009950: 08 00 49 02 00 00 00 02 08 00 45 02 00 00 00 02 ..I.......E.....
009960: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009970: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009980: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009990: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0099A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0099B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0099C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0099D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0099E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0099F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009A00: 31 D2 0C C3 8A 02 00 00 00 00 00 00 00 00 00 00 1...............
009A10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009A20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009A30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009A40: 43 50 2F 4D 20 56 65 72 73 69 6F 6E 20 33 2E 30 CP/M Version 3.0
009A50: 43 4F 50 59 52 49 47 48 54 20 31 39 38 32 2C 20 COPYRIGHT 1982,
009A60: 44 49 47 49 54 41 4C 20 52 45 53 45 41 52 43 48 DIGITAL RESEARCH
009A70: 31 35 31 32 38 32 00 00 00 00 36 35 34 33 32 31 151282....654321
009A80: 0D 0A 0D 0A 50 72 65 73 73 20 52 45 54 55 52 4E ....Press RETURN
009A90: 20 74 6F 20 43 6F 6E 74 69 6E 75 65 20 24 0D 0A to Continue $..
009AA0: 45 52 52 4F 52 3A 20 4E 6F 74 20 74 79 70 65 64 ERROR: Not typed
009AB0: 3A 20 24 50 61 73 73 77 6F 72 64 3A 20 24 4E 6F : $Password: $No
009AC0: 20 46 69 6C 65 24 0D 0A 42 44 4F 53 20 42 61 64 File$..BDOS Bad
009AD0: 20 53 65 63 74 6F 72 24 0D 0A 49 6E 76 61 6C 69 Sector$..Invali
009AE0: 64 20 44 72 69 76 65 24 43 75 72 72 65 6E 74 6C d Drive$Currentl
009AF0: 79 20 4F 70 65 6E 65 64 24 50 61 73 73 77 6F 72 y Opened$Passwor
009B00: 64 20 45 72 72 6F 72 24 45 52 52 4F 52 3A 20 24 d Error$ERROR: $
009B10: 49 6E 76 61 6C 69 64 20 6F 72 20 6D 69 73 73 69 Invalid or missi
009B20: 6E 67 20 64 65 6C 69 6D 69 74 65 72 28 73 29 20 ng delimiter(s)
009B30: 24 54 72 79 20 27 50 41 47 45 27 20 6F 72 20 27 $Try 'PAGE' or '
009B40: 4E 4F 20 50 41 47 45 27 20 24 52 65 71 75 69 72 NO PAGE' $Requir
009B50: 65 73 20 43 50 2F 4D 20 33 2E 30 24 45 6E 74 65 es CP/M 3.0$Ente
009B60: 72 20 66 69 6C 65 3A 20 24 0D 0A 24 45 52 52 4F r file: $..$ERRO
009B70: 52 3A 20 49 6E 76 61 6C 69 64 20 66 69 6C 65 20 R: Invalid file
009B80: 6E 61 6D 65 2E 20 24 31 D2 0C 31 D2 0C CD 75 05 name. $1..1...u.
009B90: 22 D8 0C 2A D8 0C 7D D6 30 9F 2A D8 0C F5 7C D6 "..*..}.0.*...|.
009BA0: 01 D6 01 9F C1 48 B1 1F D2 B4 02 01 4A 02 CD 3E .....H......J..>
009BB0: 05 CD D7 05 CD 4F 06 01 81 00 CD 18 08 2F 1F D2 .....O......./..
009BC0: 34 03 01 5C 02 CD 3E 05 1E 28 01 80 00 CD 4E 05 4..\..>..(....N.
009BD0: 32 E0 0C 01 69 02 CD 3E 05 21 81 00 36 20 E5 2A 2...i..>.!..6 .*
009BE0: E0 0C 26 00 C1 03 09 36 00 21 D3 0C 36 02 3A E0 ..&....6.!..6.:.
009BF0: 0C 3C 21 D3 0C BE DA 34 03 2A D3 0C 26 00 01 80 .<!....4.*..&...
009C00: E5 E5 60 69 5E 23 56 23 7E 23 66 6F CD 3A 0C CD ..`i^#V#~#fo.:..
009C10: F8 0B C2 1E 0B 79 B7 C2 A0 0B 77 C3 4F 0B 47 13 .....y....w.O.G.
009C20: 1A FE 3A C2 4C 0B 78 D6 41 DA A0 0B FE 10 D2 A0 ..:.L.x.A.......
009C30: 0B 3C 77 13 CD F8 0B C2 4F 0B FE 2E CA A0 0B FE .<w.....O.......
009C40: 3A CA A0 0B FE 3B CA A0 0B C3 4F 0B 1B 36 00 06 :....;....O..6..
009C50: 08 CD A6 0B 06 03 FE 2E CA 61 0B CD F0 0B C3 65 .........a.....e
009C60: 0B 13 CD A6 0B 06 04 23 36 00 05 C2 67 0B 06 08 .......#6...g...
009C70: FE 3B CA 7B 0B CD F0 0B C3 7F 0B 13 CD C9 0B D5 .;.{............
009C80: CD 3A 0C CD F8 0B C2 8E 0B 33 33 C3 8F 0B D1 79 .:.......33....y
009C90: B7 C1 79 C1 23 71 23 70 23 77 EB C0 21 00 00 C9 ..y.#q#p#w..!...
009CA0: E1 E1 21 FF FF C9 CD F8 0B CA F0 0B 23 FE 2A C2 ..!.........#.*.
009CB0: BB 0B 36 3F 05 C2 A6 0B C3 BD 0B 77 05 13 C2 A6 ..6?.......w....
009CC0: 0B CD F8 0B C8 E1 C3 A0 0B CD F8 0B CA F0 0B 33 ...............3
009CD0: 33 33 33 33 33 D5 E5 2E 00 E3 3B 3B 33 33 E3 2C 33333.....;;33.,
009CE0: E3 3B 3B 23 77 13 05 CA C1 0B CD F8 0B C2 DC 0B .;;#w...........
009CF0: 23 36 20 05 C2 F0 0B C9 1A 4F B7 C8 0E 00 FE 0D #6 ......O......
009D00: C8 4F FE 09 C8 FE 20 DA 36 0C C8 FE 2E C8 FE 3A .O.... .6......:
009D10: C8 FE 3B C8 FE 3D C8 FE 2C C8 FE 2F C8 FE 5B C8 ..;..=..,../..[.
009D20: FE 5D C8 FE 3C C8 FE 3E C8 FE 61 D8 FE 7B D2 33 .]..<..>..a..{.3
009D30: 0C E6 5F E6 7F C9 E1 C3 A0 0B 1A FE 20 CA 46 0C .._......... .F.
009D40: FE 09 CA 46 0C C9 13 C3 3A 0C 69 60 4E 23 46 1A ...F....:.i`N#F.
009D50: 91 6F 13 1A 98 67 C9 6F 26 00 1A 95 6F 13 1A 9C .o...g.o&...o...
009D60: 67 C9 5F 16 00 7B 96 5F 7A 23 9E 57 EB C9 00 00 g._..{._z#.W....
009D70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009D80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009D90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009DA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009DB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009DC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009DD0: 00 00 00 00 00 00 00 00 00 00 00 00 FF 00 00 00 ................
009DE0: 00 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
009DF0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
009E00: 00 09 7E FE 61 DA 2A 03 2A D3 0C 26 00 01 80 00 ..~.a.*.*..&....
009E10: 09 7E FE 7D D2 2A 03 2A D3 0C 26 00 01 80 00 09 .~.}.*.*..&.....
009E20: 7E D6 20 2A D3 0C 26 00 09 77 3A D3 0C 3C 32 D3 ~. *..&..w:..<2.
009E30: 0C C2 EE 02 21 D6 0C 36 00 2B 36 00 21 81 00 22 ....!..6.+6.!.."
009E40: 1E 0D 21 5C 00 22 20 0D 01 1E 0D CD FD 0A 22 DE ..!\." .......".
009E50: 0C 01 FF FF 11 DE 0C CD 4F 0C B5 C2 67 03 01 6C ........O...g..l
009E60: 02 CD 3E 05 CD D7 05 0E 2C CD F9 05 FE 00 CA 76 ..>.....,......v
009E70: 03 21 DC 0C 36 00 3E 00 11 DE 0C CD 57 0C B5 CA .!..6.>.....W...
009E80: B9 04 CD D8 0A 2A DE 0C 7E FE 00 C2 91 03 C3 B9 .....*..~.......
009E90: 04 2A DE 0C 7E FE 5B CA 9F 03 0E 00 CD EE 07 2A .*..~.[........*
009EA0: DE 0C 23 22 DE 0C CD D8 0A 2A DE 0C 7E FE 4E C2 ..#".....*..~.N.
009EB0: EA 03 2A DE 0C 23 22 DE 0C 2A DE 0C 7E D6 4F D6 ..*..#"..*..~.O.
009EC0: 01 9F 2A DE 0C F5 7E D6 20 D6 01 9F C1 48 B1 1F ..*...~. ....H..
009ED0: D2 E2 03 2A DE 0C 23 22 DE 0C 21 DD 0C 36 FF C3 ...*..#"..!..6..
009EE0: E7 03 0E 01 CD EE 07 CD D8 0A 2A DE 0C 7E FE 50 ..........*..~.P
009EF0: C2 FB 03 21 DC 0C 36 FF C3 00 04 0E 01 CD EE 07 ...!..6.........
009F00: 2A DE 0C 23 22 DE 0C 2A DE 0C 7E D6 5D D6 01 9F *..#"..*..~.]...
009F10: 2A DE 0C F5 7E D6 00 D6 01 9F C1 48 B1 1F D2 24 *...~......H...$
009F20: 04 C3 B9 04 2A DE 0C 7E FE 41 CA 30 04 C3 97 04 ....*..~.A.0....
009F30: 2A DE 0C 23 22 DE 0C 2A DE 0C 7E D6 5D D6 01 9F *..#"..*..~.]...
009F40: 2A DE 0C F5 7E D6 00 D6 01 9F C1 48 B1 1F D2 54 *...~......H...T
009F50: 04 C3 B9 04 2A DE 0C 7E FE 47 CA 60 04 C3 97 04 ....*..~.G.`....
009F60: 2A DE 0C 23 22 DE 0C 2A DE 0C 7E D6 5D D6 01 9F *..#"..*..~.]...
009F70: 2A DE 0C F5 7E D6 00 D6 01 9F C1 48 B1 1F D2 84 *...~......H....
009F80: 04 C3 B9 04 2A DE 0C 7E FE 45 CA 90 04 C3 97 04 ....*..~.E......
009F90: 2A DE 0C 23 22 DE 0C CD D8 0A 2A DE 0C 7E D6 5D *..#".....*..~.]
009FA0: C6 FF 9F 2A DE 0C F5 7E D6 00 C6 FF 9F C1 48 A1 ...*...~......H.
009FB0: 1F D2 B9 04 0E 01 CD EE 07 3A DD 0C 1F D2 C7 04 .........:......
009FC0: 3A DC 0C 2F 32 DC 0C 3A DC 0C 1F D2 E8 04 0E 1C :../2..:........
009FD0: CD F9 05 3D 3D 32 D5 0C 3A D5 0C FE 00 C2 E5 04 ...==2..:.......
009FE0: 21 D5 0C 36 16 C3 ED 04 21 D5 0C 36 00 01 5C 00 !..6....!..6..\.
009FF0: CD 4F 08 32 E2 0C 3A E2 0C FE FF C2 04 05 CD DB .O.2..:.........
00A000: 28 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A (***************
00A010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00A020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00A030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 29 0D 0A 28 ************)..(
00A040: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
00A050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A070: 20 20 20 20 20 20 20 20 20 20 2A 29 0D 0A 28 2A *)..(*
00A080: 20 20 20 20 20 20 20 20 20 20 20 54 55 52 42 4F TURBO
00A090: 2D 61 63 63 65 73 73 20 76 65 72 73 69 6F 6E 20 -access version
00A0A0: 31 2E 30 30 20 28 43 50 2F 4D 2D 38 30 29 20 20 1.00 (CP/M-80)
00A0B0: 20 20 20 20 20 20 20 20 20 2A 29 0D 0A 28 2A 20 *)..(*
00A0C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A0D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A0E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A0F0: 20 20 20 20 20 20 20 20 2A 29 0D 0A 28 2A 20 20 *)..(*
00A100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A110: 20 20 20 20 20 41 43 43 45 53 53 20 6D 6F 64 75 ACCESS modu
00A120: 6C 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 le
00A130: 20 20 20 20 20 20 20 2A 29 0D 0A 28 2A 20 20 20 *)..(*
00A140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A170: 20 20 20 20 20 20 2A 29 0D 0A 28 2A 20 20 20 20 *)..(*
00A180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 C
00A190: 6F 70 79 72 69 67 68 74 20 28 43 29 20 31 39 38 opyright (C) 198
00A1A0: 34 20 62 79 20 20 20 20 20 20 20 20 20 20 20 20 4 by
00A1B0: 20 20 20 20 20 2A 29 0D 0A 28 2A 20 20 20 20 20 *)..(*
00A1C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A1D0: 20 20 20 42 4F 52 4C 41 4E 44 20 49 6E 74 2E 20 BORLAND Int.
00A1E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A1F0: 20 20 20 20 2A 29 0D 0A 28 2A 20 20 20 20 20 20 *)..(*
00A200: 09 C3 17 05 2E 10 11 E3 0C 01 5C 00 0A 12 03 13 ..........\.....
00A210: 2D C2 0C 05 CD CA 08 CD D7 05 FB 76 11 00 00 0E -..........v....
00A220: 01 CD 05 00 C9 21 04 0D 71 2A 04 0D 26 00 EB 0E .....!..q*..&...
00A230: 02 CD 05 00 C9 11 FD 00 0E 06 CD 05 00 C9 21 06 ..............!.
00A240: 0D 70 2B 71 2A 05 0D EB 0E 09 CD 05 00 C9 21 09 .p+q*.........!.
00A250: 0D 73 2B 70 2B 71 2A 07 0D 3A 09 0D 77 23 36 00 .s+p+q*..:..w#6.
00A260: 2A 07 0D EB 0E 0A CD 05 00 2A 07 0D 23 22 07 0D *........*..#"..
00A270: 4E 23 46 79 C9 11 00 00 0E 0C CD 05 00 C9 11 00 N#Fy............
00A280: 00 0E 0B CD 05 00 C9 21 0B 0D 70 2B 71 2A 0A 0D .......!..p+q*..
00A290: EB 0E 0F CD 05 00 C9 21 0D 0D 70 2B 71 2A 0C 0D .......!..p+q*..
00A2A0: EB 0E 10 CD 05 00 C9 21 0F 0D 70 2B 71 2A 0E 0D .......!..p+q*..
00A2B0: EB 0E 14 CD 05 00 C9 21 11 0D 70 2B 71 2A 10 0D .......!..p+q*..
00A2C0: EB 0E 1A CD 05 00 C9 21 12 0D 71 2A 12 0D 26 00 .......!..q*..&.
00A2D0: EB 0E 2D CD 05 00 C9 11 00 00 0E 00 CD 05 00 C9 ..-.............
00A2E0: 21 14 0D 70 2B 71 2A 13 0D EB 0E 11 CD 05 00 C9 !..p+q*.........
00A2F0: 11 00 00 0E 12 CD 05 00 C9 21 19 0D 71 3A 19 0D .........!..q:..
00A300: 32 15 0D 21 16 0D 36 00 11 15 0D 0E 31 CD 05 00 2..!..6.....1...
00A310: C9 21 1A 0D 71 3A 1A 0D 32 15 0D 21 16 0D 36 00 .!..q:..2..!..6.
00A320: 11 15 0D 0E 31 CD 05 00 C9 21 1D 0D 72 2B 73 2B ....1....!..r+s+
00A330: 71 3A 1B 0D 32 15 0D 21 16 0D 36 FE E5 2A 1C 0D q:..2..!..6..*..
00A340: EB E1 23 73 23 72 11 15 0D 0E 31 CD 05 00 C9 11 ..#s#r....1.....
00A350: 01 00 0E 6D CD 05 00 C9 0E 0D CD 25 05 0E 0A CD ...m.......%....
00A360: 25 05 C9 21 25 0D 73 2B 71 2B D1 C1 70 2B 71 D5 %..!%.s+q+..p+q.
00A370: 3A 25 0D 3D 32 25 0D FE FF CA 8D 06 2A 22 0D 3A :%.=2%......*".:
00A380: 24 0D 77 2A 22 0D 23 22 22 0D C3 70 06 C9 CD 35 $.w*".#""..p...5
00A390: 05 32 26 0D FE 61 DA A7 06 3A 26 0D FE 7B D2 A7 .2&..a...:&..{..
00A3A0: 06 3A 26 0D D6 20 C9 3A 26 0D C9 CD 58 06 CD 58 .:&.. .:&...X..X
00A3B0: 06 01 B3 01 CD 3E 05 01 6C 00 C5 1E 08 0E 20 CD .....>..l..... .
00A3C0: 63 06 21 27 0D 36 00 3E 07 21 27 0D BE DA 36 07 c.!'.6.>.!'...6.
00A3D0: CD 8E 06 32 28 0D FE 20 DA E8 06 2A 27 0D 26 00 ...2(.. ...*'.&.
00A3E0: 01 6C 00 09 3A 28 0D 77 3A 28 0D FE 0D C2 F3 06 .l..:(.w:(......
00A3F0: C3 36 07 3A 28 0D FE 18 C2 FE 06 C3 B7 06 3A 28 .6.:(.........:(
00A400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A430: 20 20 20 2A 29 0D 0A 28 2A 2A 2A 2A 2A 2A 2A 2A *)..(********
00A440: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00A450: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00A460: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00A470: 2A 2A 2A 29 0D 0A 0D 0A 28 2A 24 41 2B 2C 49 2D ***)....(*$A+,I-
00A480: 2C 52 2D 2A 29 0D 0A 0D 0A 74 79 70 65 0D 0A 20 ,R-*)....type..
00A490: 20 54 61 53 74 72 31 34 20 20 20 3D 20 20 73 74 TaStr14 = st
00A4A0: 72 69 6E 67 5B 31 34 5D 3B 0D 0A 20 20 44 61 74 ring[14];.. Dat
00A4B0: 61 46 69 6C 65 20 20 3D 20 20 72 65 63 6F 72 64 aFile = record
00A4C0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
00A4D0: 20 63 61 73 65 20 49 6E 74 65 67 65 72 20 6F 66 case Integer of
00A4E0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
00A4F0: 20 20 20 30 20 3A 20 28 46 20 20 20 20 20 20 20 0 : (F
00A500: 20 20 20 3A 20 66 69 6C 65 20 6F 66 20 42 79 74 : file of Byt
00A510: 65 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 e;..
00A520: 20 20 20 20 20 20 20 20 20 20 46 69 72 73 74 46 FirstF
00A530: 72 65 65 2C 0D 0A 20 20 20 20 20 20 20 20 20 20 ree,..
00A540: 20 20 20 20 20 20 20 20 20 20 20 20 4E 75 6D 62 Numb
00A550: 65 72 46 72 65 65 2C 0D 0A 20 20 20 20 20 20 20 erFree,..
00A560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 I
00A570: 6E 74 31 2C 0D 0A 20 20 20 20 20 20 20 20 20 20 nt1,..
00A580: 20 20 20 20 20 20 20 20 20 20 20 20 49 6E 74 32 Int2
00A590: 20 20 20 20 20 20 20 3A 20 49 6E 74 65 67 65 72 : Integer
00A5A0: 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 );..
00A5B0: 20 20 20 20 20 31 20 3A 20 28 46 69 6C 31 20 20 1 : (Fil1
00A5C0: 20 20 20 20 20 3A 20 61 72 72 61 79 5B 31 2E 2E : array[1..
00A5D0: 34 5D 20 6F 66 20 42 79 74 65 3B 0D 0A 20 20 20 4] of Byte;..
00A5E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A5F0: 20 20 20 4E 65 77 52 65 63 2C 0D 0A 20 20 20 20 NewRec,..
00A600: 0D FE 08 C2 24 07 3A 27 0D FE 01 D2 11 07 C3 B7 ....$.:'........
00A610: 06 3A 27 0D 3D 32 27 0D 4F 06 00 21 6C 00 09 36 .:'.=2'.O..!l..6
00A620: 20 C3 D0 06 3A 28 0D FE 03 C2 2F 07 CD D7 05 21 ...:(..../....!
00A630: 27 0D 34 C2 C7 06 CD 7E 05 32 28 0D C9 21 29 0D '.4....~.2(..!).
00A640: 71 3A 29 0D FE 00 C2 52 07 01 BE 01 CD 3E 05 CD q:)....R.....>..
00A650: D7 05 3A 29 0D FE 01 C2 63 07 01 C6 01 CD 3E 05 ..:)....c.....>.
00A660: CD D7 05 3A 29 0D FE 04 C2 74 07 01 D8 01 CD 3E ...:)....t.....>
00A670: 05 CD D7 05 3A 29 0D FE 05 C2 82 07 01 E8 01 CD ....:)..........
00A680: 3E 05 3A 29 0D FE 07 C2 90 07 01 F9 01 CD 3E 05 >.:)..........>.
00A690: C9 21 2B 0D 70 2B 71 2A 2A 0D 7E FE 00 CA AF 07 .!+.p+q**.~.....
00A6A0: 2A 2A 0D 3E 40 86 4F CD 25 05 0E 3A CD 25 05 21 **.>@.O.%..:.%.!
00A6B0: 2C 0D 36 01 3E 0B 21 2C 0D BE DA ED 07 3A 2C 0D ,.6.>.!,.....:,.
00A6C0: FE 09 C2 CA 07 0E 2E CD 25 05 2A 2C 0D 26 00 EB ........%.*,.&..
00A6D0: 2A 2A 0D 19 3E 7F A6 32 2D 0D FE 20 CA E6 07 2A **..>..2-.. ...*
00A6E0: 2D 0D 4D CD 25 05 21 2C 0D 34 C2 B4 07 C9 21 2E -.M.%.!,.4....!.
00A6F0: 0D 71 01 08 02 CD 3E 05 3A 2E 0D FE 00 C2 06 08 .q....>.:.......
00A700: 01 10 02 CD 3E 05 3A 2E 0D FE 01 C2 14 08 01 31 ....>.:........1
00A710: 02 CD 3E 05 CD D7 05 C9 21 30 0D 70 2B 71 2A 2F ..>.....!0.p+q*/
00A720: 0D 7E D6 20 D6 01 9F F5 7E D6 09 D6 01 9F C1 48 .~. ....~......H
00A730: B1 1F D2 3F 08 2A 2F 0D 23 22 2F 0D C3 1E 08 2A ...?.*/.#"/....*
00A740: 2F 0D 7E FE 00 C2 4B 08 3E 00 C9 3E FF C9 C9 21 /.~...K.>..>...!
00A750: 32 0D 70 2B 71 21 33 0D 36 00 23 36 00 3A 33 0D 2.p+q!3.6.#6.:3.
00A760: FE 0B D2 81 08 2A 31 0D 7E FE 3F C2 73 08 21 34 .....*1.~.?.s.!4
00A770: 0D 36 FF 21 33 0D 34 2A 31 0D 23 22 31 0D C3 5D .6.!3.4*1.#"1..]
00A780: 08 3A 34 0D C9 3A D5 0C FE 00 CA C9 08 3A D6 0C .:4..:.......:..
00A790: 3C 32 D6 0C 21 D5 0C BE DA C9 08 01 80 01 CD 3E <2..!..........>
00A7A0: 05 CD 35 05 32 D6 0C 0E 0D CD 25 05 3A D6 0C FE ..5.2.....%.:...
00A7B0: 03 C2 B7 08 CD D7 05 3A D6 0C FE 0F C2 C4 08 21 .......:.......!
00A7C0: D2 0C 36 FF 21 D6 0C 36 FF C9 0E FF CD C7 05 01 ..6.!..6........
00A7D0: 6C 00 CD B7 05 3A E9 0C F6 80 32 E9 0C 21 EF 0C l....:....2..!..
00A7E0: 36 00 01 E3 0C CD 87 05 22 DA 0C 2A DA 0C 7D FE 6......."..*..}.
00A7F0: FF C2 3D 09 2A DA 0C 7C 32 D7 0C FE 07 C2 25 09 ..=.*..|2.....%.
00A800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A810: 20 20 52 65 63 4C 2C 0D 0A 20 20 20 20 20 20 20 RecL,..
00A820: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 T
00A830: 61 52 65 63 2C 0D 0A 20 20 20 20 20 20 20 20 20 aRec,..
00A840: 20 20 20 20 20 20 20 20 20 20 20 20 20 46 69 6C Fil
00A850: 32 20 20 20 20 20 20 20 3A 20 49 6E 74 65 67 65 2 : Intege
00A860: 72 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 r;..
00A870: 20 20 20 20 20 20 20 20 20 20 54 61 44 72 69 76 TaDriv
00A880: 65 20 20 20 20 3A 20 42 79 74 65 3B 0D 0A 20 20 e : Byte;..
00A890: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A8A0: 20 20 20 20 54 61 4E 61 6D 65 20 20 20 20 20 3A TaName :
00A8B0: 20 61 72 72 61 79 5B 31 2E 2E 38 5D 20 6F 66 20 array[1..8] of
00A8C0: 43 68 61 72 3B 0D 0A 20 20 20 20 20 20 20 20 20 Char;..
00A8D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 54 61 54 TaT
00A8E0: 79 70 65 20 20 20 20 20 3A 20 61 72 72 61 79 5B ype : array[
00A8F0: 31 2E 2E 33 5D 20 6F 66 20 43 68 61 72 29 3B 0D 1..3] of Char);.
00A900: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
00A910: 65 6E 64 3B 0D 0A 20 20 54 61 4B 65 79 53 74 72 end;.. TaKeyStr
00A920: 20 20 3D 20 20 73 74 72 69 6E 67 5B 4D 61 78 4B = string[MaxK
00A930: 65 79 4C 65 6E 5D 3B 0D 0A 20 20 54 61 49 74 65 eyLen];.. TaIte
00A940: 6D 20 20 20 20 3D 20 20 72 65 63 6F 72 64 0D 0A m = record..
00A950: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A960: 20 44 61 74 61 52 65 66 2C 50 61 67 65 52 65 66 DataRef,PageRef
00A970: 20 3A 20 49 6E 74 65 67 65 72 3B 0D 0A 20 20 20 : Integer;..
00A980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4B 65 Ke
00A990: 79 20 3A 20 54 61 4B 65 79 53 74 72 3B 0D 0A 20 y : TaKeyStr;..
00A9A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E en
00A9B0: 64 3B 0D 0A 20 20 54 61 50 61 67 65 20 20 20 20 d;.. TaPage
00A9C0: 3D 20 20 72 65 63 6F 72 64 0D 0A 20 20 20 20 20 = record..
00A9D0: 20 20 20 20 20 20 20 20 20 20 20 20 49 74 65 6D Item
00A9E0: 73 4F 6E 50 61 67 65 20 3A 20 30 2E 2E 50 61 67 sOnPage : 0..Pag
00A9F0: 65 53 69 7A 65 3B 0D 0A 20 20 20 20 20 20 20 20 eSize;..
00AA00: CD AB 06 CD 58 06 01 6C 00 CD B7 05 3A E9 0C F6 ....X..l....:...
00AA10: 80 32 E9 0C 0E 00 CD C7 05 01 E3 0C CD 87 05 22 .2............."
00AA20: DA 0C C3 3D 09 01 9E 01 CD 3E 05 01 E3 0C CD 91 ...=.....>......
00AA30: 07 0E 20 CD 25 05 2A D7 0C 4D CD 3D 07 2A DA 0C .. .%.*..M.=.*..
00AA40: 7D FE FF CA D5 09 0E 00 CD C7 05 01 80 00 CD B7 }...............
00AA50: 05 21 03 0D 36 00 21 D2 0C 36 00 3A D2 0C 2F F5 .!..6.!..6.:../.
00AA60: 01 E3 0C CD A7 05 D6 00 D6 01 9F C1 48 A1 1F D2 ............H...
00AA70: D2 09 21 D3 0C 36 00 3E 7F 21 D3 0C BE DA CF 09 ..!..6.>.!......
00AA80: 2A D3 0C 26 00 01 80 00 09 7E 32 D4 0C FE 1A C2 *..&.....~2.....
00AA90: 97 09 21 D2 0C 36 FF 3A D2 0C 1F DA C8 09 CD 7E ..!..6.:.......~
00AAA0: 05 1F D2 AE 09 CD 35 05 32 D6 0C CD D7 05 3A D5 ......5.2.....:.
00AAB0: 0C FE 00 CA C1 09 3A D4 0C FE 0A C2 C1 09 CD 85 ......:.........
00AAC0: 08 2A D4 0C 4D CD 25 05 21 D3 0C 34 C2 77 09 C3 .*..M.%.!..4.w..
00AAD0: 5B 09 C3 DA 09 0E 00 CD 3D 07 C9 01 80 00 CD B7 [.......=.......
00AAE0: 05 01 5C 00 CD E0 05 32 36 0D FE FF C2 F4 09 0E ..\....26.......
00AAF0: 00 CD 3D 07 3A 36 0D FE FF CA D7 0A 3A 36 0D 87 ..=.:6......:6..
00AB00: 87 87 87 87 6F 26 00 11 80 00 19 22 37 0D 0E 45 ....o&....."7..E
00AB10: CD 11 06 22 39 0D 0E 47 CD 11 06 22 3B 0D 0E 49 ..."9..G...";..I
00AB20: CD 11 06 22 3D 0D 0E 00 CD 11 06 22 3F 0D 0E 02 ..."=......"?...
00AB30: CD 11 06 22 41 0D 0E 04 CD 11 06 22 43 0D 2E 10 ..."A......"C...
00AB40: E5 2A 37 0D 44 4D 11 E3 0C E1 0A 12 03 13 2D C2 .*7.DM........-.
00AB50: 4A 0A 3A 5C 00 32 E3 0C CD 85 08 CD 58 06 01 E3 J.:\.2......X...
00AB60: 0C CD 91 07 0E 3A CD 25 05 CD 85 08 CD 58 06 CD .....:.%.....X..
00AB70: CA 08 01 80 00 CD B7 05 2A 39 0D EB 0E 45 CD 29 ........*9...E.)
00AB80: 06 2A 3B 0D EB 0E 47 CD 29 06 2A 3D 0D EB 0E 49 .*;...G.).*=...I
00AB90: CD 29 06 2A 3F 0D EB 0E 00 CD 29 06 2A 41 0D EB .).*?.....).*A..
00ABA0: 0E 02 CD 29 06 2A 43 0D EB 0E 04 CD 29 06 21 3B ...).*C.....).!;
00ABB0: 0D 11 5C 00 CD 65 0C B5 CA CE 0A 2E 10 E5 2A 3B ..\..e........*;
00ABC0: 0D EB 01 5C 00 E1 0A 12 03 13 2D C2 C6 0A CD F0 ...\......-.....
00ABD0: 05 32 36 0D C3 F4 09 C9 2A DE 0C 7E D6 20 D6 01 .26.....*..~. ..
00ABE0: 9F 2A DE 0C F5 7E D6 09 D6 01 9F C1 48 B1 1F D2 .*...~......H...
00ABF0: FC 0A 2A DE 0C 23 22 DE 0C C3 D8 0A C9 21 00 00 ..*..#"......!..
00AC00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00AC10: 09 00 01 00 02 09 52 E5 09 00 41 02 00 00 00 02 ......R...A.....
00AC20: 09 00 46 02 00 00 00 02 09 00 42 02 00 00 00 02 ..F.......B.....
00AC30: 09 00 47 02 00 00 00 02 09 00 43 02 00 00 00 02 ..G.......C.....
00AC40: 09 00 48 02 00 00 00 02 09 00 44 02 00 00 00 02 ..H.......D.....
00AC50: 09 00 49 02 00 00 00 02 09 00 45 02 00 00 00 02 ..I.......E.....
00AC60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00AC70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00AC80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00AC90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ACA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ACB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ACC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ACD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ACE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ACF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00AD00: 20 20 20 20 20 20 20 20 20 42 63 6B 77 50 61 67 BckwPag
00AD10: 65 52 65 66 20 3A 20 49 6E 74 65 67 65 72 3B 0D eRef : Integer;.
00AD20: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
00AD30: 20 20 49 74 65 6D 41 72 72 61 79 20 3A 20 61 72 ItemArray : ar
00AD40: 72 61 79 5B 31 2E 2E 50 61 67 65 53 69 7A 65 5D ray[1..PageSize]
00AD50: 20 6F 66 20 54 61 49 74 65 6D 3B 0D 0A 20 20 20 of TaItem;..
00AD60: 20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 3B end;
00AD70: 0D 0A 20 20 54 61 50 61 67 65 50 74 72 20 3D 20 .. TaPagePtr =
00AD80: 20 5E 54 61 50 61 67 65 3B 0D 0A 20 20 54 61 53 ^TaPage;.. TaS
00AD90: 65 61 72 63 68 53 74 65 70 20 3D 0D 0A 20 20 20 earchStep =..
00ADA0: 20 20 20 20 20 20 20 20 20 20 20 20 72 65 63 6F reco
00ADB0: 72 64 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 rd..
00ADC0: 20 20 20 20 20 50 61 67 65 52 65 66 2C 49 74 65 PageRef,Ite
00ADD0: 6D 41 72 72 49 6E 64 65 78 20 3A 20 49 6E 74 65 mArrIndex : Inte
00ADE0: 67 65 72 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 ger;..
00ADF0: 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 54 61 50 end;.. TaP
00AE00: 61 74 68 20 20 20 20 3D 20 20 61 72 72 61 79 5B ath = array[
00AE10: 31 2E 2E 4D 61 78 48 65 69 67 68 74 5D 20 6F 66 1..MaxHeight] of
00AE20: 20 54 61 53 65 61 72 63 68 53 74 65 70 3B 0D 0A TaSearchStep;..
00AE30: 20 20 49 6E 64 65 78 46 69 6C 65 20 3D 20 20 72 IndexFile = r
00AE40: 65 63 6F 72 64 0D 0A 20 20 20 20 20 20 20 20 20 ecord..
00AE50: 20 20 20 20 20 20 20 20 44 61 74 61 46 20 3A 20 DataF :
00AE60: 44 61 74 61 46 69 6C 65 3B 0D 0A 20 20 20 20 20 DataFile;..
00AE70: 20 20 20 20 20 20 20 20 20 20 20 20 41 6C 6C 6F Allo
00AE80: 77 44 75 70 6C 4B 65 79 73 20 3A 20 42 6F 6F 6C wDuplKeys : Bool
00AE90: 65 61 6E 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 ean;..
00AEA0: 20 20 20 20 20 20 20 4B 65 79 4C 2C 52 52 2C 50 KeyL,RR,P
00AEB0: 50 20 3A 20 49 6E 74 65 67 65 72 3B 0D 0A 20 20 P : Integer;..
00AEC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 P
00AED0: 61 74 68 20 3A 20 54 61 50 61 74 68 3B 0D 0A 20 ath : TaPath;..
00AEE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6E en
00AEF0: 64 3B 0D 0A 20 20 49 6E 64 65 78 46 69 6C 65 50 d;.. IndexFileP
00AF00: 64 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 d;..end;....proc
00AF10: 65 64 75 72 65 20 4F 70 65 6E 46 69 6C 65 28 76 edure OpenFile(v
00AF20: 61 72 20 44 61 74 46 20 20 20 3A 20 44 61 74 61 ar DatF : Data
00AF30: 46 69 6C 65 3B 0D 0A 20 20 20 20 20 20 20 20 20 File;..
00AF40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 4E FN
00AF50: 61 6D 65 20 20 3A 20 54 61 53 74 72 31 34 3B 0D ame : TaStr14;.
00AF60: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
00AF70: 20 20 20 20 20 20 20 20 52 65 63 4C 65 6E 20 3A RecLen :
00AF80: 20 49 6E 74 65 67 65 72 29 3B 0D 0A 62 65 67 69 Integer);..begi
00AF90: 6E 0D 0A 20 20 41 73 73 69 67 6E 28 44 61 74 46 n.. Assign(DatF
00AFA0: 2E 46 2C 46 4E 61 6D 65 29 3B 0D 0A 20 20 52 65 .F,FName);.. Re
00AFB0: 73 65 74 28 44 61 74 46 2E 46 29 3B 0D 0A 20 20 set(DatF.F);..
00AFC0: 49 4F 73 74 61 74 75 73 20 3A 3D 20 49 4F 72 65 IOstatus := IOre
00AFD0: 73 75 6C 74 3B 0D 0A 20 20 4F 4B 3A 3D 28 49 4F sult;.. OK:=(IO
00AFE0: 73 74 61 74 75 73 20 3D 20 30 29 20 6F 72 20 28 status = 0) or (
00AFF0: 49 4F 73 74 61 74 75 73 20 3D 20 24 39 30 29 3B IOstatus = $90);
00B000: 0D 0A 20 20 69 66 20 4F 4B 20 74 68 65 6E 0D 0A .. if OK then..
00B010: 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 44 61 74 begin.. Dat
00B020: 46 2E 52 65 63 4C 20 3A 3D 20 52 65 63 4C 65 6E F.RecL := RecLen
00B030: 3B 0D 0A 20 20 20 20 47 65 74 52 65 63 28 44 61 ;.. GetRec(Da
00B040: 74 46 2C 30 2C 54 61 52 65 63 42 75 66 29 3B 0D tF,0,TaRecBuf);.
00B050: 0A 20 20 20 20 4D 6F 76 65 28 54 61 52 65 63 42 . Move(TaRecB
00B060: 75 66 2C 44 61 74 46 2E 46 69 72 73 74 46 72 65 uf,DatF.FirstFre
00B070: 65 2C 38 29 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 65 e,8);.. end;..e
00B080: 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 nd;....procedure
00B090: 20 43 6C 6F 73 65 46 69 6C 65 28 76 61 72 20 44 CloseFile(var D
00B0A0: 61 74 46 20 3A 20 44 61 74 61 46 69 6C 65 29 3B atF : DataFile);
00B0B0: 0D 0A 62 65 67 69 6E 0D 0A 20 20 4D 6F 76 65 28 ..begin.. Move(
00B0C0: 44 61 74 46 2E 46 69 72 73 74 46 72 65 65 2C 54 DatF.FirstFree,T
00B0D0: 61 52 65 63 42 75 66 2C 38 29 3B 0D 0A 20 20 50 aRecBuf,8);.. P
00B0E0: 75 74 52 65 63 28 44 61 74 46 2C 30 2C 54 61 52 utRec(DatF,0,TaR
00B0F0: 65 63 42 75 66 29 3B 0D 0A 20 20 43 6C 6F 73 65 ecBuf);.. Close
00B100: 74 72 20 3D 20 5E 49 6E 64 65 78 46 69 6C 65 3B tr = ^IndexFile;
00B110: 0D 0A 20 20 54 61 53 74 61 63 6B 52 65 63 20 3D .. TaStackRec =
00B120: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
00B130: 20 72 65 63 6F 72 64 0D 0A 20 20 20 20 20 20 20 record..
00B140: 20 20 20 20 20 20 20 20 20 20 50 61 67 65 20 3A Page :
00B150: 20 54 61 50 61 67 65 3B 0D 0A 20 20 20 20 20 20 TaPage;..
00B160: 20 20 20 20 20 20 20 20 20 20 20 49 6E 64 65 78 Index
00B170: 46 50 74 72 20 3A 20 49 6E 64 65 78 46 69 6C 65 FPtr : IndexFile
00B180: 50 74 72 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 Ptr;..
00B190: 20 20 20 20 20 20 20 50 61 67 65 52 65 66 20 3A PageRef :
00B1A0: 20 49 6E 74 65 67 65 72 3B 0D 0A 20 20 20 20 20 Integer;..
00B1B0: 20 20 20 20 20 20 20 20 20 20 20 20 55 70 64 61 Upda
00B1C0: 74 65 64 20 3A 20 42 6F 6F 6C 65 61 6E 3B 0D 0A ted : Boolean;..
00B1D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 e
00B1E0: 6E 64 3B 0D 0A 20 20 54 61 53 74 61 63 6B 52 65 nd;.. TaStackRe
00B1F0: 63 50 74 72 20 3D 20 5E 54 61 53 74 61 63 6B 52 cPtr = ^TaStackR
00B200: 65 63 3B 0D 0A 20 20 54 61 50 61 67 65 53 74 61 ec;.. TaPageSta
00B210: 63 6B 20 3D 20 61 72 72 61 79 5B 31 2E 2E 50 61 ck = array[1..Pa
00B220: 67 65 53 74 61 63 6B 53 69 7A 65 5D 20 6F 66 20 geStackSize] of
00B230: 54 61 53 74 61 63 6B 52 65 63 3B 0D 0A 20 20 54 TaStackRec;.. T
00B240: 61 50 61 67 65 4D 61 70 20 20 3D 20 20 61 72 72 aPageMap = arr
00B250: 61 79 5B 31 2E 2E 50 61 67 65 53 74 61 63 6B 53 ay[1..PageStackS
00B260: 69 7A 65 5D 20 6F 66 20 49 6E 74 65 67 65 72 3B ize] of Integer;
00B270: 0D 0A 20 20 54 61 52 65 63 6F 72 64 42 75 66 66 .. TaRecordBuff
00B280: 65 72 20 20 3D 0D 0A 20 20 20 20 20 20 20 20 20 er =..
00B290: 20 20 20 20 20 20 72 65 63 6F 72 64 0D 0A 20 20 record..
00B2A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 c
00B2B0: 61 73 65 20 49 6E 74 65 67 65 72 20 6F 66 0D 0A ase Integer of..
00B2C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00B2D0: 20 20 20 30 20 3A 20 28 50 61 67 65 20 3A 20 54 0 : (Page : T
00B2E0: 61 53 74 61 63 6B 52 65 63 29 3B 0D 0A 20 20 20 aStackRec);..
00B2F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00B300: 28 44 61 74 46 2E 46 29 3B 0D 0A 20 20 49 4F 73 (DatF.F);.. IOs
00B310: 74 61 74 75 73 20 3A 3D 20 49 4F 72 65 73 75 6C tatus := IOresul
00B320: 74 3B 0D 0A 20 20 54 61 49 4F 63 68 65 63 6B 28 t;.. TaIOcheck(
00B330: 44 61 74 46 2C 30 29 3B 0D 0A 65 6E 64 3B 0D 0A DatF,0);..end;..
00B340: 0D 0A 70 72 6F 63 65 64 75 72 65 20 41 64 64 52 ..procedure AddR
00B350: 65 63 28 76 61 72 20 44 61 74 46 20 20 20 3A 20 ec(var DatF :
00B360: 44 61 74 61 46 69 6C 65 3B 0D 0A 20 20 20 20 20 DataFile;..
00B370: 20 20 20 20 20 20 20 20 20 20 20 20 76 61 72 20 var
00B380: 52 20 20 20 20 20 20 3A 20 49 6E 74 65 67 65 72 R : Integer
00B390: 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ;..
00B3A0: 20 20 20 20 76 61 72 20 42 75 66 66 65 72 20 20 var Buffer
00B3B0: 20 20 20 20 20 20 20 20 20 29 3B 0D 0A 62 65 67 );..beg
00B3C0: 69 6E 0D 0A 20 20 69 66 20 44 61 74 46 2E 46 69 in.. if DatF.Fi
00B3D0: 72 73 74 46 72 65 65 20 3D 20 20 2D 20 31 20 74 rstFree = - 1 t
00B3E0: 68 65 6E 0D 0A 20 20 20 20 52 20 3A 3D 20 44 61 hen.. R := Da
00B3F0: 74 46 2E 4E 65 77 52 65 63 0D 0A 20 20 65 6C 73 tF.NewRec.. els
00B400: 65 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 e.. begin..
00B410: 52 20 3A 3D 20 44 61 74 46 2E 46 69 72 73 74 46 R := DatF.FirstF
00B420: 72 65 65 3B 0D 0A 20 20 20 20 47 65 74 52 65 63 ree;.. GetRec
00B430: 28 44 61 74 46 2C 52 2C 54 61 52 65 63 42 75 66 (DatF,R,TaRecBuf
00B440: 29 3B 0D 0A 20 20 20 20 4D 6F 76 65 28 54 61 52 );.. Move(TaR
00B450: 65 63 42 75 66 2C 44 61 74 46 2E 46 69 72 73 74 ecBuf,DatF.First
00B460: 46 72 65 65 2C 32 29 3B 0D 0A 20 20 20 20 44 61 Free,2);.. Da
00B470: 74 46 2E 4E 75 6D 62 65 72 46 72 65 65 20 3A 3D tF.NumberFree :=
00B480: 20 44 61 74 46 2E 4E 75 6D 62 65 72 46 72 65 65 DatF.NumberFree
00B490: 20 2D 20 31 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 20 - 1;.. end;..
00B4A0: 20 50 75 74 52 65 63 28 44 61 74 46 2C 52 2C 42 PutRec(DatF,R,B
00B4B0: 75 66 66 65 72 29 3B 0D 0A 65 6E 64 3B 0D 0A 0D uffer);..end;...
00B4C0: 0A 70 72 6F 63 65 64 75 72 65 20 44 65 6C 65 74 .procedure Delet
00B4D0: 65 52 65 63 28 76 61 72 20 44 61 74 46 20 3A 20 eRec(var DatF :
00B4E0: 44 61 74 61 46 69 6C 65 3B 0D 0A 20 20 20 20 20 DataFile;..
00B4F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00B500: 31 20 3A 20 28 52 20 3A 20 61 72 72 61 79 5B 31 1 : (R : array[1
00B510: 2E 2E 4D 61 78 44 61 74 61 52 65 63 53 69 7A 65 ..MaxDataRecSize
00B520: 5D 20 6F 66 20 42 79 74 65 29 3B 0D 0A 20 20 20 ] of Byte);..
00B530: 20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 3B end;
00B540: 0D 0A 0D 0A 76 61 72 0D 0A 20 20 49 4F 73 74 61 ....var.. IOsta
00B550: 74 75 73 20 20 3A 20 49 6E 74 65 67 65 72 3B 0D tus : Integer;.
00B560: 0A 20 20 4F 4B 20 20 20 20 20 20 20 20 3A 20 42 . OK : B
00B570: 6F 6F 6C 65 61 6E 3B 0D 0A 20 20 54 61 52 65 63 oolean;.. TaRec
00B580: 42 75 66 20 20 3A 20 54 61 52 65 63 6F 72 64 42 Buf : TaRecordB
00B590: 75 66 66 65 72 3B 0D 0A 20 20 54 61 50 61 67 65 uffer;.. TaPage
00B5A0: 53 74 6B 20 3A 20 54 61 50 61 67 65 53 74 61 63 Stk : TaPageStac
00B5B0: 6B 3B 0D 0A 20 20 54 61 50 67 4D 61 70 20 20 20 k;.. TaPgMap
00B5C0: 3A 20 54 61 50 61 67 65 4D 61 70 3B 0D 0A 0D 0A : TaPageMap;....
00B5D0: 70 72 6F 63 65 64 75 72 65 20 54 61 49 4F 63 68 procedure TaIOch
00B5E0: 65 63 6B 28 76 61 72 20 44 61 74 46 20 3A 20 44 eck(var DatF : D
00B5F0: 61 74 61 46 69 6C 65 3B 20 52 20 3A 20 49 6E 74 ataFile; R : Int
00B600: 65 67 65 72 29 3B 0D 0A 62 65 67 69 6E 0D 0A 20 eger);..begin..
00B610: 20 69 66 20 49 4F 73 74 61 74 75 73 20 3C 3E 20 if IOstatus <>
00B620: 30 20 74 68 65 6E 20 77 69 74 68 20 44 61 74 46 0 then with DatF
00B630: 20 64 6F 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 do.. begin..
00B640: 20 20 57 72 69 74 65 6C 6E 3B 0D 0A 20 20 20 20 Writeln;..
00B650: 57 72 69 74 65 6C 6E 28 27 54 55 52 42 4F 2D 61 Writeln('TURBO-a
00B660: 63 63 65 73 73 20 49 2F 4F 20 65 72 72 6F 72 20 ccess I/O error
00B670: 27 2C 49 4F 73 74 61 74 75 73 29 3B 0D 0A 20 20 ',IOstatus);..
00B680: 20 20 57 72 69 74 65 6C 6E 28 27 66 69 6C 65 20 Writeln('file
00B690: 27 2C 43 68 72 28 54 61 44 72 69 76 65 20 2B 20 ',Chr(TaDrive +
00B6A0: 36 34 29 2C 27 3A 27 2C 54 61 4E 61 6D 65 2C 27 64),':',TaName,'
00B6B0: 2E 27 2C 54 61 54 79 70 65 2C 27 20 72 65 63 6F .',TaType,' reco
00B6C0: 72 64 20 27 2C 52 29 3B 0D 0A 20 20 20 20 57 72 rd ',R);.. Wr
00B6D0: 69 74 65 6C 6E 28 27 50 72 6F 67 72 61 6D 20 74 iteln('Program t
00B6E0: 65 72 6D 69 6E 61 74 65 64 27 29 3B 0D 0A 20 20 erminated');..
00B6F0: 20 20 48 61 6C 74 3B 0D 0A 20 20 65 6E 64 3B 0D Halt;.. end;.
00B700: 20 20 20 52 20 20 20 20 3A 20 49 6E 74 65 67 65 R : Intege
00B710: 72 29 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 4D 6F r);..begin.. Mo
00B720: 76 65 28 44 61 74 46 2E 46 69 72 73 74 46 72 65 ve(DatF.FirstFre
00B730: 65 2C 54 61 52 65 63 42 75 66 2C 32 29 3B 0D 0A e,TaRecBuf,2);..
00B740: 20 20 50 75 74 52 65 63 28 44 61 74 46 2C 52 2C PutRec(DatF,R,
00B750: 54 61 52 65 63 42 75 66 29 3B 0D 0A 20 20 44 61 TaRecBuf);.. Da
00B760: 74 46 2E 46 69 72 73 74 46 72 65 65 20 3A 3D 20 tF.FirstFree :=
00B770: 52 3B 20 0D 0A 20 20 44 61 74 46 2E 4E 75 6D 62 R; .. DatF.Numb
00B780: 65 72 46 72 65 65 20 3A 3D 20 44 61 74 46 2E 4E erFree := DatF.N
00B790: 75 6D 62 65 72 46 72 65 65 20 2B 20 31 3B 0D 0A umberFree + 1;..
00B7A0: 65 6E 64 3B 0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E end;....function
00B7B0: 20 46 69 6C 65 4C 65 6E 28 76 61 72 20 44 61 74 FileLen(var Dat
00B7C0: 46 20 3A 20 44 61 74 61 46 69 6C 65 29 20 3A 20 F : DataFile) :
00B7D0: 49 6E 74 65 67 65 72 3B 0D 0A 62 65 67 69 6E 0D Integer;..begin.
00B7E0: 0A 20 20 46 69 6C 65 4C 65 6E 20 3A 3D 20 44 61 . FileLen := Da
00B7F0: 74 46 2E 4E 65 77 52 65 63 3B 0D 0A 65 6E 64 3B tF.NewRec;..end;
00B800: 0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E 20 55 73 65 ....function Use
00B810: 64 52 65 63 73 28 76 61 72 20 44 61 74 46 20 3A dRecs(var DatF :
00B820: 20 44 61 74 61 46 69 6C 65 29 20 3A 20 49 6E 74 DataFile) : Int
00B830: 65 67 65 72 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 eger;..begin..
00B840: 55 73 65 64 52 65 63 73 20 3A 3D 20 44 61 74 46 UsedRecs := DatF
00B850: 2E 4E 65 77 52 65 63 20 2D 20 44 61 74 46 2E 4E .NewRec - DatF.N
00B860: 75 6D 62 65 72 46 72 65 65 20 2D 20 31 3B 0D 0A umberFree - 1;..
00B870: 65 6E 64 3B 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A end;............
00B880: 20 44 61 74 46 2E 4E 75 6D 62 65 72 46 72 65 65 DatF.NumberFree
00B890: 20 2D 20 31 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 20 - 1;.. end;..
00B8A0: 20 50 75 74 52 65 63 28 44 61 74 46 2C 52 2C 42 PutRec(DatF,R,B
00B8B0: 75 66 66 65 72 29 3B 0D 0A 65 6E 64 3B 0D 0A 0D uffer);..end;...
00B8C0: 0A 70 72 6F 63 65 64 75 72 65 20 44 65 6C 65 74 .procedure Delet
00B8D0: 65 52 65 63 28 76 61 72 20 44 61 74 46 20 3A 20 eRec(var DatF :
00B8E0: 44 61 74 61 46 69 6C 65 3B 0D 0A 20 20 20 20 20 DataFile;..
00B8F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00B900: 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 .end;....procedu
00B910: 72 65 20 47 65 74 52 65 63 28 76 61 72 20 44 61 re GetRec(var Da
00B920: 74 46 20 20 20 3A 20 44 61 74 61 46 69 6C 65 3B tF : DataFile;
00B930: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
00B940: 20 20 20 20 20 20 20 52 20 20 20 20 20 20 3A 20 R :
00B950: 49 6E 74 65 67 65 72 3B 0D 0A 20 20 20 20 20 20 Integer;..
00B960: 20 20 20 20 20 20 20 20 20 20 20 76 61 72 20 42 var B
00B970: 75 66 66 65 72 20 20 20 20 20 20 20 20 20 20 20 uffer
00B980: 29 3B 0D 0A 76 61 72 0D 0A 20 20 42 20 3A 20 42 );..var.. B : B
00B990: 79 74 65 20 61 62 73 6F 6C 75 74 65 20 42 75 66 yte absolute Buf
00B9A0: 66 65 72 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 53 fer;..begin.. S
00B9B0: 65 65 6B 28 44 61 74 46 2E 46 2C 52 29 3B 0D 0A eek(DatF.F,R);..
00B9C0: 20 20 52 65 61 64 28 44 61 74 46 2E 46 2C 42 29 Read(DatF.F,B)
00B9D0: 3B 0D 0A 20 20 49 4F 73 74 61 74 75 73 20 3A 3D ;.. IOstatus :=
00B9E0: 20 49 4F 72 65 73 75 6C 74 3B 0D 0A 20 20 54 61 IOresult;.. Ta
00B9F0: 49 4F 63 68 65 63 6B 28 44 61 74 46 2C 52 29 3B IOcheck(DatF,R);
00BA00: 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 ..end;....proced
00BA10: 75 72 65 20 50 75 74 52 65 63 28 76 61 72 20 44 ure PutRec(var D
00BA20: 61 74 46 20 20 20 3A 20 44 61 74 61 46 69 6C 65 atF : DataFile
00BA30: 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ;..
00BA40: 20 20 20 20 20 20 20 20 52 20 20 20 20 20 20 3A R :
00BA50: 20 49 6E 74 65 67 65 72 3B 0D 0A 20 20 20 20 20 Integer;..
00BA60: 20 20 20 20 20 20 20 20 20 20 20 20 76 61 72 20 var
00BA70: 42 75 66 66 65 72 20 20 20 20 20 20 20 20 20 20 Buffer
00BA80: 20 29 3B 0D 0A 76 61 72 0D 0A 20 20 42 20 3A 20 );..var.. B :
00BA90: 42 79 74 65 20 61 62 73 6F 6C 75 74 65 20 42 75 Byte absolute Bu
00BAA0: 66 66 65 72 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 ffer;..begin..
00BAB0: 53 65 65 6B 28 44 61 74 46 2E 46 2C 52 29 3B 0D Seek(DatF.F,R);.
00BAC0: 0A 20 20 57 72 69 74 65 28 44 61 74 46 2E 46 2C . Write(DatF.F,
00BAD0: 42 29 3B 0D 0A 20 20 49 4F 73 74 61 74 75 73 20 B);.. IOstatus
00BAE0: 3A 3D 20 49 4F 72 65 73 75 6C 74 3B 0D 0A 20 20 := IOresult;..
00BAF0: 54 61 49 4F 63 68 65 63 6B 28 44 61 74 46 2C 52 TaIOcheck(DatF,R
00BB00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BB10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BB20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BB30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BB40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BB50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BB60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BB70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BB80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BB90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BBA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BBB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BBC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BBD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BBE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BBF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BC00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BC10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BC20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BC30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BC40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BC50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BC60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BC70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BC80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BC90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BCA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BCB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BCC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BCD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BCE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BCF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
00BD00: 29 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 0D 0A 70 72 );..end;......pr
00BD10: 6F 63 65 64 75 72 65 20 4D 61 6B 65 46 69 6C 65 ocedure MakeFile
00BD20: 28 76 61 72 20 44 61 74 46 20 20 20 3A 20 44 61 (var DatF : Da
00BD30: 74 61 46 69 6C 65 3B 0D 0A 20 20 20 20 20 20 20 taFile;..
00BD40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00BD50: 46 4E 61 6D 65 20 20 3A 20 54 61 53 74 72 31 34 FName : TaStr14
00BD60: 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ;..
00BD70: 20 20 20 20 20 20 20 20 20 20 52 65 63 4C 65 6E RecLen
00BD80: 20 3A 20 49 6E 74 65 67 65 72 29 3B 0D 0A 62 65 : Integer);..be
00BD90: 67 69 6E 0D 0A 20 20 41 73 73 69 67 6E 28 44 61 gin.. Assign(Da
00BDA0: 74 46 2E 46 2C 46 4E 61 6D 65 29 3B 0D 0A 20 20 tF.F,FName);..
00BDB0: 52 65 77 72 69 74 65 28 44 61 74 46 2E 46 29 3B Rewrite(DatF.F);
00BDC0: 0D 0A 20 20 49 4F 73 74 61 74 75 73 20 3A 3D 20 .. IOstatus :=
00BDD0: 49 4F 72 65 73 75 6C 74 3B 0D 0A 20 20 69 66 20 IOresult;.. if
00BDE0: 49 4F 73 74 61 74 75 73 20 3D 20 33 20 74 68 65 IOstatus = 3 the
00BDF0: 6E 0D 0A 20 20 20 20 4F 4B 20 3A 3D 20 66 61 6C n.. OK := fal
00BE00: 73 65 0D 0A 20 20 65 6C 73 65 0D 0A 20 20 62 65 se.. else.. be
00BE10: 67 69 6E 0D 0A 20 20 20 20 54 61 49 4F 63 68 65 gin.. TaIOche
00BE20: 63 6B 28 44 61 74 46 2C 30 29 3B 0D 0A 20 20 20 ck(DatF,0);..
00BE30: 20 44 61 74 46 2E 52 65 63 4C 20 3A 3D 20 52 65 DatF.RecL := Re
00BE40: 63 4C 65 6E 3B 0D 0A 20 20 20 20 44 61 74 46 2E cLen;.. DatF.
00BE50: 46 69 72 73 74 46 72 65 65 20 3A 3D 20 2D 31 3B FirstFree := -1;
00BE60: 0D 0A 20 20 20 20 44 61 74 46 2E 4E 75 6D 62 65 .. DatF.Numbe
00BE70: 72 46 72 65 65 20 3A 3D 20 30 3B 0D 0A 20 20 20 rFree := 0;..
00BE80: 20 44 61 74 46 2E 49 6E 74 31 20 3A 3D 20 30 3B DatF.Int1 := 0;
00BE90: 0D 0A 20 20 20 20 44 61 74 46 2E 49 6E 74 32 20 .. DatF.Int2
00BEA0: 3A 3D 20 30 3B 0D 0A 20 20 20 20 4D 6F 76 65 28 := 0;.. Move(
00BEB0: 44 61 74 46 2E 46 69 72 73 74 46 72 65 65 2C 54 DatF.FirstFree,T
00BEC0: 61 52 65 63 42 75 66 2C 38 29 3B 0D 0A 20 20 20 aRecBuf,8);..
00BED0: 20 50 75 74 52 65 63 28 44 61 74 46 2C 30 2C 54 PutRec(DatF,0,T
00BEE0: 61 52 65 63 42 75 66 29 3B 0D 0A 20 20 20 20 4F aRecBuf);.. O
00BEF0: 4B 20 3A 3D 20 74 72 75 65 3B 0D 0A 20 20 65 6E K := true;.. en
00BF00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00BF10: 0A 00 01 00 02 09 52 E5 0A 00 41 02 00 00 00 02 ......R...A.....
00BF20: 0A 00 46 02 00 00 00 02 0A 00 42 02 00 00 00 02 ..F.......B.....
00BF30: 0A 00 47 02 00 00 00 02 0A 00 43 02 00 00 00 02 ..G.......C.....
00BF40: 0A 00 48 02 00 00 00 02 0A 00 44 02 00 00 00 02 ..H.......D.....
00BF50: 0A 00 49 02 00 00 00 02 0A 00 45 02 00 00 00 02 ..I.......E.....
00BF60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BF70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BF80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BF90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BFA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BFB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BFC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BFD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BFE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BFF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C000: 0D 0A 70 72 6F 63 65 64 75 72 65 20 49 6E 69 74 ..procedure Init
00C010: 49 6E 64 65 78 3B 0D 0A 76 61 72 0D 0A 20 20 49 Index;..var.. I
00C020: 20 3A 20 49 6E 74 65 67 65 72 3B 0D 0A 62 65 67 : Integer;..beg
00C030: 69 6E 0D 0A 20 20 66 6F 72 20 49 20 3A 3D 20 31 in.. for I := 1
00C040: 20 74 6F 20 50 61 67 65 53 74 61 63 6B 53 69 7A to PageStackSiz
00C050: 65 20 64 6F 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 e do.. begin..
00C060: 20 20 20 54 61 50 61 67 65 53 74 6B 5B 49 5D 2E TaPageStk[I].
00C070: 49 6E 64 65 78 46 50 74 72 20 3A 3D 20 6E 69 6C IndexFPtr := nil
00C080: 3B 0D 0A 20 20 20 20 54 61 50 61 67 65 53 74 6B ;.. TaPageStk
00C090: 5B 49 5D 2E 55 70 64 61 74 65 64 20 3A 3D 20 66 [I].Updated := f
00C0A0: 61 6C 73 65 3B 0D 0A 20 20 20 20 54 61 50 67 4D alse;.. TaPgM
00C0B0: 61 70 5B 49 5D 20 3A 3D 20 49 3B 0D 0A 20 20 65 ap[I] := I;.. e
00C0C0: 6E 64 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F nd;..end;....pro
00C0D0: 63 65 64 75 72 65 20 54 61 50 61 63 6B 28 76 61 cedure TaPack(va
00C0E0: 72 20 50 61 67 65 20 3A 20 54 61 50 61 67 65 3B r Page : TaPage;
00C0F0: 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
00C100: 20 20 20 20 20 20 20 20 4B 65 79 4C 20 3A 20 49 KeyL : I
00C110: 6E 74 65 67 65 72 29 3B 0D 0A 76 61 72 0D 0A 20 nteger);..var..
00C120: 20 49 20 3A 20 49 6E 74 65 67 65 72 3B 0D 0A 20 I : Integer;..
00C130: 20 50 20 3A 20 61 72 72 61 79 5B 30 2E 2E 4D 61 P : array[0..Ma
00C140: 78 49 6E 74 5D 20 6F 66 20 42 79 74 65 20 61 62 xInt] of Byte ab
00C150: 73 6F 6C 75 74 65 20 50 61 67 65 3B 0D 0A 62 65 solute Page;..be
00C160: 67 69 6E 0D 0A 20 20 69 66 20 4B 65 79 4C 20 3C gin.. if KeyL <
00C170: 3E 20 4D 61 78 4B 65 79 4C 65 6E 20 74 68 65 6E > MaxKeyLen then
00C180: 0D 0A 20 20 20 20 66 6F 72 20 49 20 3A 3D 20 31 .. for I := 1
00C190: 20 74 6F 20 50 61 67 65 53 69 7A 65 20 64 6F 20 to PageSize do
00C1A0: 0D 0A 20 20 20 20 20 20 4D 6F 76 65 28 50 61 67 .. Move(Pag
00C1B0: 65 2E 49 74 65 6D 41 72 72 61 79 5B 49 5D 2C 50 e.ItemArray[I],P
00C1C0: 5B 28 49 20 2D 20 31 29 20 2A 20 28 4B 65 79 4C [(I - 1) * (KeyL
00C1D0: 20 2B 20 35 29 20 2B 20 33 5D 2C 4B 65 79 4C 20 + 5) + 3],KeyL
00C1E0: 2B 20 35 29 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 + 5);..end;....p
00C1F0: 72 6F 63 65 64 75 72 65 20 54 61 55 6E 70 61 63 rocedure TaUnpac
00C200: 20 20 20 20 20 20 20 20 20 20 20 28 50 61 67 65 (Page
00C210: 52 65 66 20 3D 20 52 29 20 20 20 20 20 20 20 20 Ref = R)
00C220: 20 20 20 20 20 20 20 20 20 74 68 65 6E 0D 0A 20 then..
00C230: 20 62 65 67 69 6E 0D 0A 20 20 20 20 49 20 3A 3D begin.. I :=
00C240: 20 4A 3B 20 0D 0A 20 20 20 20 46 6F 75 6E 64 20 J; .. Found
00C250: 3A 3D 20 74 72 75 65 3B 0D 0A 20 20 65 6E 64 3B := true;.. end;
00C260: 0D 0A 20 20 69 66 20 6E 6F 74 20 46 6F 75 6E 64 .. if not Found
00C270: 20 74 68 65 6E 0D 0A 20 20 62 65 67 69 6E 0D 0A then.. begin..
00C280: 20 20 20 20 49 20 3A 3D 20 54 61 50 67 4D 61 70 I := TaPgMap
00C290: 5B 31 5D 3B 0D 0A 20 20 20 20 77 69 74 68 20 54 [1];.. with T
00C2A0: 61 50 61 67 65 53 74 6B 5B 49 5D 20 64 6F 0D 0A aPageStk[I] do..
00C2B0: 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 begin..
00C2C0: 20 69 66 20 55 70 64 61 74 65 64 20 74 68 65 6E if Updated then
00C2D0: 0D 0A 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 .. begin..
00C2E0: 20 20 20 20 20 20 20 54 61 50 61 63 6B 28 50 61 TaPack(Pa
00C2F0: 67 65 2C 49 6E 64 65 78 46 50 74 72 5E 2E 4B 65 ge,IndexFPtr^.Ke
00C300: 79 4C 29 3B 0D 0A 20 20 20 20 20 20 20 20 50 75 yL);.. Pu
00C310: 74 52 65 63 28 49 6E 64 65 78 46 50 74 72 5E 2E tRec(IndexFPtr^.
00C320: 44 61 74 61 46 2C 50 61 67 65 52 65 66 2C 50 61 DataF,PageRef,Pa
00C330: 67 65 29 3B 0D 0A 20 20 20 20 20 20 65 6E 64 3B ge);.. end;
00C340: 0D 0A 20 20 20 20 20 20 47 65 74 52 65 63 28 49 .. GetRec(I
00C350: 64 78 46 2E 44 61 74 61 46 2C 52 2C 50 61 67 65 dxF.DataF,R,Page
00C360: 29 3B 20 0D 0A 20 20 20 20 20 20 54 61 55 6E 70 ); .. TaUnp
00C370: 61 63 6B 28 50 61 67 65 2C 49 64 78 46 2E 4B 65 ack(Page,IdxF.Ke
00C380: 79 4C 29 3B 0D 0A 20 20 20 20 20 20 49 6E 64 65 yL);.. Inde
00C390: 78 46 50 74 72 20 3A 3D 20 50 74 72 28 41 64 64 xFPtr := Ptr(Add
00C3A0: 72 28 49 64 78 46 29 29 3B 20 0D 0A 20 20 20 20 r(IdxF)); ..
00C3B0: 20 20 50 61 67 65 52 65 66 20 3A 3D 20 52 3B 20 PageRef := R;
00C3C0: 0D 0A 20 20 20 20 20 20 55 70 64 61 74 65 64 20 .. Updated
00C3D0: 3A 3D 20 66 61 6C 73 65 3B 0D 0A 20 20 20 20 65 := false;.. e
00C3E0: 6E 64 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 20 20 54 nd;.. end;.. T
00C3F0: 61 4C 61 73 74 28 49 29 3B 20 0D 0A 20 20 50 67 aLast(I); .. Pg
00C400: 6B 28 76 61 72 20 50 61 67 65 20 3A 20 54 61 50 k(var Page : TaP
00C410: 61 67 65 3B 20 0D 0A 20 20 20 20 20 20 20 20 20 age; ..
00C420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4B 65 Ke
00C430: 79 4C 20 3A 20 49 6E 74 65 67 65 72 29 3B 0D 0A yL : Integer);..
00C440: 76 61 72 0D 0A 20 20 49 20 3A 20 49 6E 74 65 67 var.. I : Integ
00C450: 65 72 3B 0D 0A 20 20 50 20 3A 20 61 72 72 61 79 er;.. P : array
00C460: 5B 30 2E 2E 4D 61 78 49 6E 74 5D 20 6F 66 20 42 [0..MaxInt] of B
00C470: 79 74 65 20 61 62 73 6F 6C 75 74 65 20 50 61 67 yte absolute Pag
00C480: 65 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 69 66 20 e;..begin.. if
00C490: 4B 65 79 4C 20 3C 3E 20 4D 61 78 4B 65 79 4C 65 KeyL <> MaxKeyLe
00C4A0: 6E 20 74 68 65 6E 0D 0A 20 20 20 20 66 6F 72 20 n then.. for
00C4B0: 49 20 3A 3D 20 50 61 67 65 53 69 7A 65 20 64 6F I := PageSize do
00C4C0: 77 6E 74 6F 20 31 20 64 6F 20 0D 0A 20 20 20 20 wnto 1 do ..
00C4D0: 20 20 4D 6F 76 65 28 50 5B 28 49 20 2D 20 31 29 Move(P[(I - 1)
00C4E0: 20 2A 20 28 4B 65 79 4C 20 2B 20 35 29 20 2B 20 * (KeyL + 5) +
00C4F0: 33 5D 2C 50 61 67 65 2E 49 74 65 6D 41 72 72 61 3],Page.ItemArra
00C500: 79 5B 49 5D 2C 4B 65 79 4C 20 2B 20 35 29 3B 0D y[I],KeyL + 5);.
00C510: 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 .end;....procedu
00C520: 72 65 20 4D 61 6B 65 49 6E 64 65 78 28 76 61 72 re MakeIndex(var
00C530: 20 49 64 78 46 20 20 20 3A 20 49 6E 64 65 78 46 IdxF : IndexF
00C540: 69 6C 65 3B 20 0D 0A 20 20 20 20 20 20 20 20 20 ile; ..
00C550: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 F
00C560: 4E 61 6D 65 20 20 3A 20 54 61 53 74 72 31 34 3B Name : TaStr14;
00C570: 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
00C580: 20 20 20 20 20 20 20 20 20 20 20 4B 65 79 4C 65 KeyLe
00C590: 6E 2C 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 n,..
00C5A0: 20 20 20 20 20 20 20 20 20 20 20 20 53 20 20 20 S
00C5B0: 20 20 20 3A 20 49 6E 74 65 67 65 72 29 3B 0D 0A : Integer);..
00C5C0: 76 61 72 0D 0A 20 20 4B 20 3A 20 49 6E 74 65 67 var.. K : Integ
00C5D0: 65 72 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 4B 20 er;..begin.. K
00C5E0: 3A 3D 20 28 4B 65 79 4C 65 6E 20 2B 20 35 29 2A := (KeyLen + 5)*
00C5F0: 50 61 67 65 53 69 7A 65 20 2B 20 33 3B 0D 0A 20 PageSize + 3;..
00C600: 50 74 72 20 3A 3D 20 50 74 72 28 41 64 64 72 28 Ptr := Ptr(Addr(
00C610: 54 61 50 61 67 65 53 74 6B 5B 49 5D 29 29 3B 0D TaPageStk[I]));.
00C620: 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 .end;....procedu
00C630: 72 65 20 54 61 4E 65 77 50 61 67 65 28 76 61 72 re TaNewPage(var
00C640: 20 49 64 78 46 20 20 3A 20 49 6E 64 65 78 46 69 IdxF : IndexFi
00C650: 6C 65 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 le;..
00C660: 20 20 20 20 20 20 20 20 20 76 61 72 20 52 20 20 var R
00C670: 20 20 20 3A 20 49 6E 74 65 67 65 72 3B 0D 0A 20 : Integer;..
00C680: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00C690: 20 20 20 76 61 72 20 50 67 50 74 72 20 3A 20 54 var PgPtr : T
00C6A0: 61 50 61 67 65 50 74 72 29 3B 0D 0A 76 61 72 0D aPagePtr);..var.
00C6B0: 0A 20 20 49 20 3A 20 49 6E 74 65 67 65 72 3B 0D . I : Integer;.
00C6C0: 0A 62 65 67 69 6E 0D 0A 20 20 49 20 3A 3D 20 54 .begin.. I := T
00C6D0: 61 50 67 4D 61 70 5B 31 5D 3B 0D 0A 20 20 77 69 aPgMap[1];.. wi
00C6E0: 74 68 20 54 61 50 61 67 65 53 74 6B 5B 49 5D 20 th TaPageStk[I]
00C6F0: 64 6F 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 20 do.. begin..
00C700: 20 69 66 20 55 70 64 61 74 65 64 20 74 68 65 6E if Updated then
00C710: 0D 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 .. begin..
00C720: 20 20 20 54 61 50 61 63 6B 28 50 61 67 65 2C 49 TaPack(Page,I
00C730: 6E 64 65 78 46 50 74 72 5E 2E 4B 65 79 4C 29 3B ndexFPtr^.KeyL);
00C740: 20 0D 0A 20 20 20 20 20 20 50 75 74 52 65 63 28 .. PutRec(
00C750: 49 6E 64 65 78 46 50 74 72 5E 2E 44 61 74 61 46 IndexFPtr^.DataF
00C760: 2C 50 61 67 65 52 65 66 2C 50 61 67 65 29 3B 0D ,PageRef,Page);.
00C770: 0A 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 41 . end;.. A
00C780: 64 64 52 65 63 28 49 64 78 46 2E 44 61 74 61 46 ddRec(IdxF.DataF
00C790: 2C 52 2C 50 61 67 65 29 3B 0D 0A 20 20 20 20 49 ,R,Page);.. I
00C7A0: 6E 64 65 78 46 50 74 72 20 3A 3D 20 50 74 72 28 ndexFPtr := Ptr(
00C7B0: 41 64 64 72 28 49 64 78 46 29 29 3B 20 0D 0A 20 Addr(IdxF)); ..
00C7C0: 20 20 20 50 61 67 65 52 65 66 20 3A 3D 20 52 3B PageRef := R;
00C7D0: 20 0D 0A 20 20 20 20 55 70 64 61 74 65 64 20 3A .. Updated :
00C7E0: 3D 20 66 61 6C 73 65 3B 0D 0A 20 20 65 6E 64 3B = false;.. end;
00C7F0: 0D 0A 20 20 54 61 4C 61 73 74 28 49 29 3B 20 0D .. TaLast(I); .
00C800: 20 4D 61 6B 65 46 69 6C 65 28 49 64 78 46 2E 44 MakeFile(IdxF.D
00C810: 61 74 61 46 2C 46 4E 61 6D 65 2C 4B 29 3B 0D 0A ataF,FName,K);..
00C820: 20 20 49 64 78 46 2E 41 6C 6C 6F 77 44 75 70 6C IdxF.AllowDupl
00C830: 4B 65 79 73 20 3A 3D 20 53 20 3C 3E 20 30 3B 20 Keys := S <> 0;
00C840: 0D 0A 20 20 49 64 78 46 2E 4B 65 79 4C 20 3A 3D .. IdxF.KeyL :=
00C850: 20 4B 65 79 4C 65 6E 3B 0D 0A 20 20 49 64 78 46 KeyLen;.. IdxF
00C860: 2E 52 52 20 3A 3D 20 30 3B 20 0D 0A 20 20 49 64 .RR := 0; .. Id
00C870: 78 46 2E 50 50 20 3A 3D 20 30 3B 0D 0A 65 6E 64 xF.PP := 0;..end
00C880: 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 4F ;....procedure O
00C890: 70 65 6E 49 6E 64 65 78 28 76 61 72 20 49 64 78 penIndex(var Idx
00C8A0: 46 20 20 20 3A 20 49 6E 64 65 78 46 69 6C 65 3B F : IndexFile;
00C8B0: 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
00C8C0: 20 20 20 20 20 20 20 20 20 20 20 46 4E 61 6D 65 FName
00C8D0: 20 20 3A 20 54 61 53 74 72 31 34 3B 20 0D 0A 20 : TaStr14; ..
00C8E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00C8F0: 20 20 20 20 20 20 20 4B 65 79 4C 65 6E 2C 0D 0A KeyLen,..
00C900: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00C910: 20 20 20 20 20 20 20 20 53 20 20 20 20 20 20 3A S :
00C920: 20 49 6E 74 65 67 65 72 29 3B 0D 0A 76 61 72 0D Integer);..var.
00C930: 0A 20 20 4B 20 3A 20 49 6E 74 65 67 65 72 3B 0D . K : Integer;.
00C940: 0A 62 65 67 69 6E 0D 0A 20 20 4B 20 3A 3D 20 28 .begin.. K := (
00C950: 4B 65 79 4C 65 6E 20 2B 20 35 29 20 2A 20 50 61 KeyLen + 5) * Pa
00C960: 67 65 53 69 7A 65 20 2B 20 33 3B 0D 0A 20 20 4F geSize + 3;.. O
00C970: 70 65 6E 46 69 6C 65 28 49 64 78 46 2E 44 61 74 penFile(IdxF.Dat
00C980: 61 46 2C 46 4E 61 6D 65 2C 4B 29 3B 0D 0A 20 20 aF,FName,K);..
00C990: 49 64 78 46 2E 41 6C 6C 6F 77 44 75 70 6C 4B 65 IdxF.AllowDuplKe
00C9A0: 79 73 20 3A 3D 20 53 20 3C 3E 20 30 3B 20 0D 0A ys := S <> 0; ..
00C9B0: 20 20 49 64 78 46 2E 4B 65 79 4C 20 3A 3D 20 4B IdxF.KeyL := K
00C9C0: 65 79 4C 65 6E 3B 0D 0A 20 20 49 64 78 46 2E 52 eyLen;.. IdxF.R
00C9D0: 52 20 3A 3D 20 49 64 78 46 2E 44 61 74 61 46 2E R := IdxF.DataF.
00C9E0: 49 6E 74 31 3B 20 0D 0A 20 20 49 64 78 46 2E 50 Int1; .. IdxF.P
00C9F0: 50 20 3A 3D 20 30 3B 0D 0A 65 6E 64 3B 0D 0A 0D P := 0;..end;...
00CA00: 0A 20 20 50 67 50 74 72 20 3A 3D 20 50 74 72 28 . PgPtr := Ptr(
00CA10: 41 64 64 72 28 54 61 50 61 67 65 53 74 6B 5B 49 Addr(TaPageStk[I
00CA20: 5D 29 29 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 ]));..end;....pr
00CA30: 6F 63 65 64 75 72 65 20 54 61 55 70 64 61 74 65 ocedure TaUpdate
00CA40: 50 61 67 65 28 50 67 50 74 72 20 3A 20 54 61 50 Page(PgPtr : TaP
00CA50: 61 67 65 50 74 72 29 3B 0D 0A 76 61 72 0D 0A 20 agePtr);..var..
00CA60: 20 50 20 3A 20 54 61 53 74 61 63 6B 52 65 63 50 P : TaStackRecP
00CA70: 74 72 20 61 62 73 6F 6C 75 74 65 20 50 67 50 74 tr absolute PgPt
00CA80: 72 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 50 5E 2E r;..begin.. P^.
00CA90: 55 70 64 61 74 65 64 20 3A 3D 20 74 72 75 65 3B Updated := true;
00CAA0: 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 ..end;....proced
00CAB0: 75 72 65 20 54 61 52 65 74 75 72 6E 50 61 67 65 ure TaReturnPage
00CAC0: 28 76 61 72 20 50 67 50 74 72 20 3A 20 54 61 50 (var PgPtr : TaP
00CAD0: 61 67 65 50 74 72 29 3B 0D 0A 76 61 72 0D 0A 20 agePtr);..var..
00CAE0: 20 50 20 3A 20 54 61 53 74 61 63 6B 52 65 63 50 P : TaStackRecP
00CAF0: 74 72 20 61 62 73 6F 6C 75 74 65 20 50 67 50 74 tr absolute PgPt
00CB00: 72 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 77 69 74 r;..begin.. wit
00CB10: 68 20 50 5E 20 64 6F 0D 0A 20 20 62 65 67 69 6E h P^ do.. begin
00CB20: 0D 0A 20 20 20 20 44 65 6C 65 74 65 52 65 63 28 .. DeleteRec(
00CB30: 49 6E 64 65 78 46 50 74 72 5E 2E 44 61 74 61 46 IndexFPtr^.DataF
00CB40: 2C 50 61 67 65 52 65 66 29 3B 20 0D 0A 20 20 20 ,PageRef); ..
00CB50: 20 49 6E 64 65 78 46 50 74 72 20 3A 3D 20 6E 69 IndexFPtr := ni
00CB60: 6C 3B 20 0D 0A 20 20 20 20 55 70 64 61 74 65 64 l; .. Updated
00CB70: 20 3A 3D 20 66 61 6C 73 65 3B 0D 0A 20 20 65 6E := false;.. en
00CB80: 64 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 d;..end;....proc
00CB90: 65 64 75 72 65 20 54 61 58 4B 65 79 28 76 61 72 edure TaXKey(var
00CBA0: 20 4B 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D K ;.
00CBB0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
00CBC0: 20 20 20 20 20 20 4B 65 79 4C 20 3A 20 49 6E 74 KeyL : Int
00CBD0: 65 67 65 72 29 3B 0D 0A 76 61 72 0D 0A 20 20 4B eger);..var.. K
00CBE0: 65 79 20 3A 20 54 61 4B 65 79 53 74 72 20 61 62 ey : TaKeyStr ab
00CBF0: 73 6F 6C 75 74 65 20 4B 3B 0D 0A 62 65 67 69 6E solute K;..begin
00CC00: 0A 70 72 6F 63 65 64 75 72 65 20 43 6C 6F 73 65 .procedure Close
00CC10: 49 6E 64 65 78 28 76 61 72 20 49 64 78 46 20 3A Index(var IdxF :
00CC20: 20 49 6E 64 65 78 46 69 6C 65 29 3B 0D 0A 76 61 IndexFile);..va
00CC30: 72 0D 0A 20 20 49 20 3A 20 49 6E 74 65 67 65 72 r.. I : Integer
00CC40: 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 66 6F 72 20 ;..begin.. for
00CC50: 49 20 3A 3D 20 31 20 74 6F 20 50 61 67 65 53 74 I := 1 to PageSt
00CC60: 61 63 6B 53 69 7A 65 20 64 6F 20 0D 0A 20 20 20 ackSize do ..
00CC70: 20 77 69 74 68 20 54 61 50 61 67 65 53 74 6B 5B with TaPageStk[
00CC80: 49 5D 20 64 6F 0D 0A 20 20 20 20 20 20 69 66 20 I] do.. if
00CC90: 49 6E 64 65 78 46 50 74 72 20 3D 20 50 74 72 28 IndexFPtr = Ptr(
00CCA0: 41 64 64 72 28 49 64 78 46 29 29 20 74 68 65 6E Addr(IdxF)) then
00CCB0: 0D 0A 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 .. begin..
00CCC0: 20 20 20 20 20 20 20 49 6E 64 65 78 46 50 74 72 IndexFPtr
00CCD0: 20 3A 3D 20 6E 69 6C 3B 0D 0A 20 20 20 20 20 20 := nil;..
00CCE0: 20 20 69 66 20 55 70 64 61 74 65 64 20 74 68 65 if Updated the
00CCF0: 6E 0D 0A 20 20 20 20 20 20 20 20 62 65 67 69 6E n.. begin
00CD00: 0D 0A 20 20 20 20 20 20 20 20 20 20 54 61 50 61 .. TaPa
00CD10: 63 6B 28 50 61 67 65 2C 49 64 78 46 2E 4B 65 79 ck(Page,IdxF.Key
00CD20: 4C 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 50 L);.. P
00CD30: 75 74 52 65 63 28 49 64 78 46 2E 44 61 74 61 46 utRec(IdxF.DataF
00CD40: 2C 50 61 67 65 52 65 66 2C 50 61 67 65 29 3B 0D ,PageRef,Page);.
00CD50: 0A 20 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 . end;..
00CD60: 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 49 64 78 end;.. Idx
00CD70: 46 2E 44 61 74 61 46 2E 49 6E 74 31 20 3A 3D 20 F.DataF.Int1 :=
00CD80: 49 64 78 46 2E 52 52 3B 20 0D 0A 20 20 43 6C 6F IdxF.RR; .. Clo
00CD90: 73 65 46 69 6C 65 28 49 64 78 46 2E 44 61 74 61 seFile(IdxF.Data
00CDA0: 46 29 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F F);..end;....pro
00CDB0: 63 65 64 75 72 65 20 54 61 4C 61 73 74 28 49 20 cedure TaLast(I
00CDC0: 3A 20 49 6E 74 65 67 65 72 29 3B 0D 0A 76 61 72 : Integer);..var
00CDD0: 0D 0A 20 20 4A 2C 4B 20 3A 20 49 6E 74 65 67 65 .. J,K : Intege
00CDE0: 72 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 4A 20 3A r;..begin.. J :
00CDF0: 3D 20 31 3B 20 0D 0A 20 20 77 68 69 6C 65 20 28 = 1; .. while (
00CE00: 0D 0A 20 20 69 66 20 4F 72 64 28 4B 65 79 5B 30 .. if Ord(Key[0
00CE10: 5D 29 20 3E 20 4B 65 79 4C 20 74 68 65 6E 20 4B ]) > KeyL then K
00CE20: 65 79 5B 30 5D 20 3A 3D 20 43 68 72 28 4B 65 79 ey[0] := Chr(Key
00CE30: 4C 29 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 66 75 6E L);..end;....fun
00CE40: 63 74 69 6F 6E 20 54 61 43 6F 6D 70 4B 65 79 73 ction TaCompKeys
00CE50: 28 76 61 72 20 4B 31 2C 0D 0A 20 20 20 20 20 20 (var K1,..
00CE60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00CE70: 20 20 4B 32 20 20 20 20 20 20 20 20 20 20 20 3B K2 ;
00CE80: 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
00CE90: 20 20 20 20 20 20 20 20 20 20 20 44 52 31 2C 0D DR1,.
00CEA0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
00CEB0: 20 20 20 20 20 20 20 20 20 44 52 32 20 3A 20 49 DR2 : I
00CEC0: 6E 74 65 67 65 72 3B 20 0D 0A 20 20 20 20 20 20 nteger; ..
00CED0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00CEE0: 20 20 44 75 70 20 3A 20 42 6F 6F 6C 65 61 6E 20 Dup : Boolean
00CEF0: 29 20 3A 20 49 6E 74 65 67 65 72 3B 0D 0A 76 61 ) : Integer;..va
00CF00: 72 0D 0A 20 20 4B 65 79 31 20 3A 20 54 61 4B 65 r.. Key1 : TaKe
00CF10: 79 53 74 72 20 61 62 73 6F 6C 75 74 65 20 4B 31 yStr absolute K1
00CF20: 3B 0D 0A 20 20 4B 65 79 32 20 3A 20 54 61 4B 65 ;.. Key2 : TaKe
00CF30: 79 53 74 72 20 61 62 73 6F 6C 75 74 65 20 4B 32 yStr absolute K2
00CF40: 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 69 66 20 4B ;..begin.. if K
00CF50: 65 79 31 20 3D 20 4B 65 79 32 20 74 68 65 6E 0D ey1 = Key2 then.
00CF60: 0A 20 20 20 20 69 66 20 44 75 70 20 74 68 65 6E . if Dup then
00CF70: 20 0D 0A 20 20 20 20 20 20 54 61 43 6F 6D 70 4B .. TaCompK
00CF80: 65 79 73 20 3A 3D 20 44 52 31 20 2D 20 44 52 32 eys := DR1 - DR2
00CF90: 20 0D 0A 20 20 20 20 65 6C 73 65 20 54 61 43 6F .. else TaCo
00CFA0: 6D 70 4B 65 79 73 20 3A 3D 20 30 0D 0A 20 20 65 mpKeys := 0.. e
00CFB0: 6C 73 65 0D 0A 20 20 20 20 69 66 20 4B 65 79 31 lse.. if Key1
00CFC0: 20 3E 20 4B 65 79 32 20 74 68 65 6E 20 0D 0A 20 > Key2 then ..
00CFD0: 20 20 20 20 20 54 61 43 6F 6D 70 4B 65 79 73 20 TaCompKeys
00CFE0: 3A 3D 20 31 0D 0A 20 20 20 20 65 6C 73 65 20 54 := 1.. else T
00CFF0: 61 43 6F 6D 70 4B 65 79 73 20 3A 3D 20 20 2D 20 aCompKeys := -
00D000: 54 61 50 67 4D 61 70 5B 4A 5D 20 3C 3E 20 49 29 TaPgMap[J] <> I)
00D010: 20 61 6E 64 20 28 4A 20 3C 20 50 61 67 65 53 74 and (J < PageSt
00D020: 61 63 6B 53 69 7A 65 29 20 64 6F 20 0D 0A 20 20 ackSize) do ..
00D030: 20 20 4A 20 3A 3D 20 4A 20 2B 20 31 3B 0D 0A 20 J := J + 1;..
00D040: 20 66 6F 72 20 4B 20 3A 3D 20 4A 20 74 6F 20 50 for K := J to P
00D050: 61 67 65 53 74 61 63 6B 53 69 7A 65 20 2D 20 31 ageStackSize - 1
00D060: 20 64 6F 20 0D 0A 20 20 20 20 54 61 50 67 4D 61 do .. TaPgMa
00D070: 70 5B 4B 5D 20 3A 3D 20 54 61 50 67 4D 61 70 5B p[K] := TaPgMap[
00D080: 4B 20 2B 20 31 5D 3B 0D 0A 20 20 54 61 50 67 4D K + 1];.. TaPgM
00D090: 61 70 5B 50 61 67 65 53 74 61 63 6B 53 69 7A 65 ap[PageStackSize
00D0A0: 5D 20 3A 3D 20 49 3B 0D 0A 65 6E 64 3B 0D 0A 0D ] := I;..end;...
00D0B0: 0A 70 72 6F 63 65 64 75 72 65 20 54 61 47 65 74 .procedure TaGet
00D0C0: 50 61 67 65 28 76 61 72 20 49 64 78 46 20 20 3A Page(var IdxF :
00D0D0: 20 49 6E 64 65 78 46 69 6C 65 3B 0D 0A 20 20 20 IndexFile;..
00D0E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00D0F0: 20 20 20 20 20 52 20 20 20 20 20 3A 20 49 6E 74 R : Int
00D100: 65 67 65 72 3B 20 0D 0A 20 20 20 20 20 20 20 20 eger; ..
00D110: 20 20 20 20 20 20 20 20 20 20 20 20 76 61 72 20 var
00D120: 50 67 50 74 72 20 3A 20 54 61 50 61 67 65 50 74 PgPtr : TaPagePt
00D130: 72 29 3B 0D 0A 76 61 72 0D 0A 20 20 49 2C 4A 2C r);..var.. I,J,
00D140: 4B 20 3A 20 49 6E 74 65 67 65 72 3B 0D 0A 20 20 K : Integer;..
00D150: 46 6F 75 6E 64 20 3A 20 42 6F 6F 6C 65 61 6E 3B Found : Boolean;
00D160: 0D 0A 62 65 67 69 6E 0D 0A 20 20 46 6F 75 6E 64 ..begin.. Found
00D170: 20 3A 3D 20 66 61 6C 73 65 3B 0D 0A 20 20 66 6F := false;.. fo
00D180: 72 20 4A 20 3A 3D 20 31 20 74 6F 20 50 61 67 65 r J := 1 to Page
00D190: 53 74 61 63 6B 53 69 7A 65 20 64 6F 0D 0A 20 20 StackSize do..
00D1A0: 20 20 69 66 20 6E 6F 74 20 46 6F 75 6E 64 20 74 if not Found t
00D1B0: 68 65 6E 0D 0A 20 20 20 20 20 20 77 69 74 68 20 hen.. with
00D1C0: 54 61 50 61 67 65 53 74 6B 5B 4A 5D 20 64 6F 0D TaPageStk[J] do.
00D1D0: 0A 20 20 20 20 20 20 20 20 69 66 20 28 49 6E 64 . if (Ind
00D1E0: 65 78 46 50 74 72 20 3D 20 50 74 72 28 41 64 64 exFPtr = Ptr(Add
00D1F0: 72 28 49 64 78 46 29 29 29 20 61 6E 64 20 0D 0A r(IdxF))) and ..
00D200: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00D210: 0B 00 01 00 02 09 52 E5 0B 00 41 02 00 00 00 02 ......R...A.....
00D220: 0B 00 46 02 00 00 00 02 0B 00 42 02 00 00 00 02 ..F.......B.....
00D230: 0B 00 47 02 00 00 00 02 0B 00 43 02 00 00 00 02 ..G.......C.....
00D240: 0B 00 48 02 00 00 00 02 0B 00 44 02 00 00 00 02 ..H.......D.....
00D250: 0B 00 49 02 00 00 00 02 0B 00 45 02 00 00 00 02 ..I.......E.....
00D260: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D270: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D280: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D290: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D2A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D2B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D2C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D2D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D2E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D2F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D300: 31 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 1;..end;....proc
00D310: 65 64 75 72 65 20 43 6C 65 61 72 4B 65 79 28 76 edure ClearKey(v
00D320: 61 72 20 49 64 78 46 20 3A 20 49 6E 64 65 78 46 ar IdxF : IndexF
00D330: 69 6C 65 29 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 ile);..begin..
00D340: 49 64 78 46 2E 50 50 20 3A 3D 20 30 3B 0D 0A 65 IdxF.PP := 0;..e
00D350: 6E 64 3B 0D 0A 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A nd;.............
00D360: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00D370: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00D380: 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
00D390: 20 20 20 20 20 20 20 20 20 20 20 44 52 31 2C 0D DR1,.
00D3A0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
00D3B0: 20 20 20 20 20 20 20 20 20 44 52 32 20 3A 20 49 DR2 : I
00D3C0: 6E 74 65 67 65 72 3B 20 0D 0A 20 20 20 20 20 20 nteger; ..
00D3D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00D3E0: 20 20 44 75 70 20 3A 20 42 6F 6F 6C 65 61 6E 20 Dup : Boolean
00D3F0: 29 20 3A 20 49 6E 74 65 67 65 72 3B 0D 0A 76 61 ) : Integer;..va
00D400: 72 0D 0A 20 20 4B 65 79 31 20 3A 20 54 61 4B 65 r.. Key1 : TaKe
00D410: 79 53 74 72 20 61 62 73 6F 6C 75 74 65 20 4B 31 yStr absolute K1
00D420: 3B 0D 0A 20 20 4B 65 79 32 20 3A 20 54 61 4B 65 ;.. Key2 : TaKe
00D430: 79 53 74 72 20 61 62 73 6F 6C 75 74 65 20 4B 32 yStr absolute K2
00D440: 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 69 66 20 4B ;..begin.. if K
00D450: 65 79 31 20 3D 20 4B 65 79 32 20 74 68 65 6E 0D ey1 = Key2 then.
00D460: 0A 20 20 20 20 69 66 20 44 75 70 20 74 68 65 6E . if Dup then
00D470: 20 0D 0A 20 20 20 20 20 20 54 61 43 6F 6D 70 4B .. TaCompK
00D480: 65 79 73 20 3A 3D 20 44 52 31 20 2D 20 44 52 32 eys := DR1 - DR2
00D490: 20 0D 0A 20 20 20 20 65 6C 73 65 20 54 61 43 6F .. else TaCo
00D4A0: 6D 70 4B 65 79 73 20 3A 3D 20 30 0D 0A 20 20 65 mpKeys := 0.. e
00D4B0: 6C 73 65 0D 0A 20 20 20 20 69 66 20 4B 65 79 31 lse.. if Key1
00D4C0: 20 3E 20 4B 65 79 32 20 74 68 65 6E 20 0D 0A 20 > Key2 then ..
00D4D0: 20 20 20 20 20 54 61 43 6F 6D 70 4B 65 79 73 20 TaCompKeys
00D4E0: 3A 3D 20 31 0D 0A 20 20 20 20 65 6C 73 65 20 54 := 1.. else T
00D4F0: 61 43 6F 6D 70 4B 65 79 73 20 3A 3D 20 20 2D 20 aCompKeys := -
00D500: 5E 2E 49 74 65 6D 41 72 72 61 79 5B 49 5D 20 3A ^.ItemArray[I] :
00D510: 3D 20 49 74 65 6D 41 72 72 61 79 5B 49 20 2B 20 = ItemArray[I +
00D520: 4F 72 64 65 72 20 2B 20 31 5D 3B 0D 0A 20 20 20 Order + 1];..
00D530: 20 20 20 20 20 50 61 67 65 50 74 72 32 5E 2E 49 PagePtr2^.I
00D540: 74 65 6D 41 72 72 61 79 5B 52 5D 20 3A 3D 20 50 temArray[R] := P
00D550: 72 6F 63 49 74 65 6D 31 3B 0D 0A 20 20 20 20 20 rocItem1;..
00D560: 20 20 20 66 6F 72 20 49 20 3A 3D 20 52 20 2B 20 for I := R +
00D570: 31 20 74 6F 20 4F 72 64 65 72 20 64 6F 20 0D 0A 1 to Order do ..
00D580: 20 20 20 20 20 20 20 20 20 20 50 61 67 65 50 74 PagePt
00D590: 72 32 5E 2E 49 74 65 6D 41 72 72 61 79 5B 49 5D r2^.ItemArray[I]
00D5A0: 20 3A 3D 20 49 74 65 6D 41 72 72 61 79 5B 49 20 := ItemArray[I
00D5B0: 2B 20 4F 72 64 65 72 5D 3B 0D 0A 20 20 20 20 20 + Order];..
00D5C0: 20 65 6E 64 3B 0D 0A 20 20 20 20 20 20 49 74 65 end;.. Ite
00D5D0: 6D 73 4F 6E 50 61 67 65 20 3A 3D 20 4F 72 64 65 msOnPage := Orde
00D5E0: 72 3B 0D 0A 20 20 20 20 20 20 50 61 67 65 50 74 r;.. PagePt
00D5F0: 72 32 5E 2E 49 74 65 6D 73 4F 6E 50 61 67 65 20 r2^.ItemsOnPage
00D600: 3A 3D 20 4F 72 64 65 72 3B 20 0D 0A 20 20 20 20 := Order; ..
00D610: 20 20 50 61 67 65 50 74 72 32 5E 2E 42 63 6B 77 PagePtr2^.Bckw
00D620: 50 61 67 65 52 65 66 20 3A 3D 20 50 72 6F 63 49 PageRef := ProcI
00D630: 74 65 6D 32 2E 50 61 67 65 52 65 66 3B 20 0D 0A tem2.PageRef; ..
00D640: 20 20 20 20 20 20 50 72 6F 63 49 74 65 6D 32 2E ProcItem2.
00D650: 50 61 67 65 52 65 66 20 3A 3D 20 50 72 50 67 52 PageRef := PrPgR
00D660: 65 66 32 3B 0D 0A 20 20 20 20 20 20 50 72 6F 63 ef2;.. Proc
00D670: 49 74 65 6D 31 20 3A 3D 20 50 72 6F 63 49 74 65 Item1 := ProcIte
00D680: 6D 32 3B 20 0D 0A 20 20 20 20 20 20 54 61 55 70 m2; .. TaUp
00D690: 64 61 74 65 50 61 67 65 28 50 61 67 65 50 74 72 datePage(PagePtr
00D6A0: 32 29 3B 0D 0A 20 20 20 20 65 6E 64 3B 0D 0A 20 2);.. end;..
00D6B0: 20 65 6E 64 3B 0D 0A 20 20 54 61 55 70 64 61 74 end;.. TaUpdat
00D6C0: 65 50 61 67 65 28 50 61 67 65 50 74 72 31 29 3B ePage(PagePtr1);
00D6D0: 0D 0A 65 6E 64 3B 0D 0A 0D 0A 62 65 67 69 6E 0D ..end;....begin.
00D6E0: 0A 20 20 69 66 20 50 72 50 67 52 65 66 31 20 3D . if PrPgRef1 =
00D6F0: 20 30 20 74 68 65 6E 0D 0A 20 20 62 65 67 69 6E 0 then.. begin
00D700: 28 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A (***************
00D710: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00D720: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00D730: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 29 20 0D 0A ************) ..
00D740: 28 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (*
00D750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00D760: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00D770: 20 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A *) ..
00D780: 28 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (*
00D790: 20 20 54 55 52 42 4F 2D 61 63 63 65 73 73 20 76 TURBO-access v
00D7A0: 65 72 73 69 6F 6E 20 31 2E 30 30 20 20 20 20 20 ersion 1.00
00D7B0: 20 20 20 20 20 20 20 20 20 20 20 2A 29 0D 0A 28 *)..(
00D7C0: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
00D7D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00D7E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00D7F0: 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A 28 *) ..(
00D800: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
00D810: 20 20 20 20 20 20 20 20 41 44 44 4B 45 59 20 6D ADDKEY m
00D820: 6F 64 75 6C 65 20 20 20 20 20 20 20 20 20 20 20 odule
00D830: 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A 28 *) ..(
00D840: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
00D850: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00D860: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00D870: 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A 28 *) ..(
00D880: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
00D890: 20 20 20 20 43 6F 70 79 72 69 67 68 74 20 28 43 Copyright (C
00D8A0: 29 20 31 39 38 34 20 62 79 20 20 20 20 20 20 20 ) 1984 by
00D8B0: 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A 28 *) ..(
00D8C0: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
00D8D0: 20 20 20 20 20 20 20 20 20 42 4F 52 4C 41 4E 44 BORLAND
00D8E0: 20 49 6E 74 2E 20 20 20 20 20 20 20 20 20 20 20 Int.
00D8F0: 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A 28 *) ..(
00D900: 0D 0A 20 20 20 20 50 61 73 73 55 70 20 3A 3D 20 .. PassUp :=
00D910: 74 72 75 65 3B 0D 0A 20 20 20 20 77 69 74 68 20 true;.. with
00D920: 50 72 6F 63 49 74 65 6D 31 20 64 6F 0D 0A 20 20 ProcItem1 do..
00D930: 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 4B begin.. K
00D940: 65 79 20 3A 3D 20 50 4B 65 79 3B 20 0D 0A 20 20 ey := PKey; ..
00D950: 20 20 20 20 44 61 74 61 52 65 66 20 3A 3D 20 50 DataRef := P
00D960: 72 6F 63 44 61 74 52 65 66 3B 20 0D 0A 20 20 20 rocDatRef; ..
00D970: 20 20 20 50 61 67 65 52 65 66 20 3A 3D 20 30 3B PageRef := 0;
00D980: 0D 0A 20 20 20 20 65 6E 64 3B 0D 0A 20 20 65 6E .. end;.. en
00D990: 64 0D 0A 20 20 65 6C 73 65 0D 0A 20 20 62 65 67 d.. else.. beg
00D9A0: 69 6E 0D 0A 20 20 20 20 54 61 47 65 74 50 61 67 in.. TaGetPag
00D9B0: 65 28 49 64 78 46 2C 50 72 50 67 52 65 66 31 2C e(IdxF,PrPgRef1,
00D9C0: 50 61 67 65 50 74 72 31 29 3B 0D 0A 20 20 20 20 PagePtr1);..
00D9D0: 77 69 74 68 20 50 61 67 65 50 74 72 31 5E 20 64 with PagePtr1^ d
00D9E0: 6F 0D 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 o.. begin..
00D9F0: 20 20 20 20 4C 20 3A 3D 20 31 3B 20 0D 0A 20 20 L := 1; ..
00DA00: 20 20 20 20 52 20 3A 3D 20 49 74 65 6D 73 4F 6E R := ItemsOn
00DA10: 50 61 67 65 3B 0D 0A 20 20 20 20 20 20 72 65 70 Page;.. rep
00DA20: 65 61 74 0D 0A 20 20 20 20 20 20 20 20 4B 20 3A eat.. K :
00DA30: 3D 20 28 4C 20 2B 20 52 29 20 64 69 76 20 32 3B = (L + R) div 2;
00DA40: 0D 0A 20 20 20 20 20 20 20 20 43 20 3A 3D 20 54 .. C := T
00DA50: 61 43 6F 6D 70 4B 65 79 73 28 50 4B 65 79 2C 0D aCompKeys(PKey,.
00DA60: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
00DA70: 20 20 20 20 20 20 20 20 20 49 74 65 6D 41 72 72 ItemArr
00DA80: 61 79 5B 4B 5D 2E 4B 65 79 2C 0D 0A 20 20 20 20 ay[K].Key,..
00DA90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00DAA0: 20 20 20 20 50 72 6F 63 44 61 74 52 65 66 2C 0D ProcDatRef,.
00DAB0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
00DAC0: 20 20 20 20 20 20 20 20 20 49 74 65 6D 41 72 72 ItemArr
00DAD0: 61 79 5B 4B 5D 2E 44 61 74 61 52 65 66 2C 0D 0A ay[K].DataRef,..
00DAE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00DAF0: 20 20 20 20 20 20 20 20 49 64 78 46 2E 41 6C 6C IdxF.All
00DB00: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
00DB10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00DB20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00DB30: 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A 28 *) ..(
00DB40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00DB50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00DB60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00DB70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 29 0D 0A 20 0D ***********).. .
00DB80: 0A 28 2A 24 41 2B 2C 52 2D 2A 29 0D 0A 0D 0A 70 .(*$A+,R-*)....p
00DB90: 72 6F 63 65 64 75 72 65 20 41 64 64 4B 65 79 28 rocedure AddKey(
00DBA0: 76 61 72 20 49 64 78 46 20 20 20 20 20 20 20 3A var IdxF :
00DBB0: 20 49 6E 64 65 78 46 69 6C 65 3B 0D 0A 20 20 20 IndexFile;..
00DBC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 61 va
00DBD0: 72 20 50 72 6F 63 44 61 74 52 65 66 20 3A 20 49 r ProcDatRef : I
00DBE0: 6E 74 65 67 65 72 3B 0D 0A 20 20 20 20 20 20 20 nteger;..
00DBF0: 20 20 20 20 20 20 20 20 20 20 76 61 72 20 50 72 var Pr
00DC00: 6F 63 4B 65 79 20 20 20 20 20 20 20 20 20 20 20 ocKey
00DC10: 20 20 20 20 20 29 3B 0D 0A 76 61 72 0D 0A 20 20 );..var..
00DC20: 50 4B 65 79 20 20 20 20 20 20 3A 20 54 61 4B 65 PKey : TaKe
00DC30: 79 53 74 72 20 61 62 73 6F 6C 75 74 65 20 50 72 yStr absolute Pr
00DC40: 6F 63 4B 65 79 3B 0D 0A 20 20 50 72 50 67 52 65 ocKey;.. PrPgRe
00DC50: 66 31 2C 0D 0A 20 20 50 72 50 67 52 65 66 32 2C f1,.. PrPgRef2,
00DC60: 0D 0A 20 20 43 2C 49 2C 4B 2C 4C 20 20 20 3A 20 .. C,I,K,L :
00DC70: 49 6E 74 65 67 65 72 3B 0D 0A 20 20 50 61 73 73 Integer;.. Pass
00DC80: 55 70 20 20 20 20 3A 20 42 6F 6F 6C 65 61 6E 3B Up : Boolean;
00DC90: 0D 0A 20 20 50 61 67 65 50 74 72 31 2C 0D 0A 20 .. PagePtr1,..
00DCA0: 20 50 61 67 65 50 74 72 32 20 20 3A 20 54 61 50 PagePtr2 : TaP
00DCB0: 61 67 65 50 74 72 3B 0D 0A 20 20 50 72 6F 63 49 agePtr;.. ProcI
00DCC0: 74 65 6D 31 2C 0D 0A 20 20 50 72 6F 63 49 74 65 tem1,.. ProcIte
00DCD0: 6D 32 20 3A 20 54 61 49 74 65 6D 3B 0D 0A 20 0D m2 : TaItem;.. .
00DCE0: 0A 28 2A 24 41 2D 2A 29 0D 0A 0D 0A 70 72 6F 63 .(*$A-*)....proc
00DCF0: 65 64 75 72 65 20 53 65 61 72 63 68 28 50 72 50 edure Search(PrP
00DD00: 6F 77 44 75 70 6C 4B 65 79 73 20 20 20 29 3B 0D owDuplKeys );.
00DD10: 0A 20 20 20 20 20 20 20 20 69 66 20 43 20 3C 3D . if C <=
00DD20: 20 30 20 74 68 65 6E 20 0D 0A 20 20 20 20 20 20 0 then ..
00DD30: 20 20 20 20 52 20 3A 3D 20 4B 20 2D 20 31 3B 0D R := K - 1;.
00DD40: 0A 20 20 20 20 20 20 20 20 69 66 20 43 20 3E 3D . if C >=
00DD50: 20 30 20 74 68 65 6E 20 0D 0A 20 20 20 20 20 20 0 then ..
00DD60: 20 20 20 20 4C 20 3A 3D 20 4B 20 2B 20 31 3B 0D L := K + 1;.
00DD70: 0A 20 20 20 20 20 20 75 6E 74 69 6C 20 52 20 3C . until R <
00DD80: 20 4C 3B 0D 0A 20 20 20 20 20 20 69 66 20 4C 20 L;.. if L
00DD90: 2D 20 52 20 3E 20 31 20 74 68 65 6E 0D 0A 20 20 - R > 1 then..
00DDA0: 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 begin..
00DDB0: 20 20 20 4F 4B 20 3A 3D 20 66 61 6C 73 65 3B 20 OK := false;
00DDC0: 0D 0A 20 20 20 20 20 20 20 20 50 61 73 73 55 70 .. PassUp
00DDD0: 20 3A 3D 20 66 61 6C 73 65 3B 0D 0A 20 20 20 20 := false;..
00DDE0: 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 65 6C 73 end.. els
00DDF0: 65 0D 0A 20 20 20 20 20 20 62 65 67 69 6E 0D 0A e.. begin..
00DE00: 09 69 66 20 52 20 3D 20 30 20 74 68 65 6E 20 0D .if R = 0 then .
00DE10: 0A 20 20 20 20 20 20 20 20 20 20 53 65 61 72 63 . Searc
00DE20: 68 28 42 63 6B 77 50 61 67 65 52 65 66 29 0D 0A h(BckwPageRef)..
00DE30: 20 20 20 20 20 20 20 20 65 6C 73 65 20 53 65 61 else Sea
00DE40: 72 63 68 28 49 74 65 6D 41 72 72 61 79 5B 52 5D rch(ItemArray[R]
00DE50: 2E 50 61 67 65 52 65 66 29 3B 0D 0A 09 69 66 20 .PageRef);...if
00DE60: 50 61 73 73 55 70 20 74 68 65 6E 20 0D 0A 20 20 PassUp then ..
00DE70: 20 20 20 20 20 20 20 20 49 6E 73 65 72 74 3B 0D Insert;.
00DE80: 0A 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 . end;..
00DE90: 20 65 6E 64 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 65 end;.. end;..e
00DEA0: 6E 64 3B 0D 0A 0D 0A 62 65 67 69 6E 0D 0A 20 20 nd;....begin..
00DEB0: 77 69 74 68 20 49 64 78 46 20 64 6F 0D 0A 20 20 with IdxF do..
00DEC0: 62 65 67 69 6E 0D 0A 20 20 20 20 54 61 58 4B 65 begin.. TaXKe
00DED0: 79 28 50 4B 65 79 2C 4B 65 79 4C 29 3B 20 0D 0A y(PKey,KeyL); ..
00DEE0: 20 20 20 20 4F 4B 20 3A 3D 20 74 72 75 65 3B 20 OK := true;
00DEF0: 0D 0A 20 20 20 20 53 65 61 72 63 68 28 52 52 29 .. Search(RR)
00DF00: 67 52 65 66 31 20 3A 20 49 6E 74 65 67 65 72 29 gRef1 : Integer)
00DF10: 3B 0D 0A 76 61 72 0D 0A 20 20 52 20 3A 20 49 6E ;..var.. R : In
00DF20: 74 65 67 65 72 3B 0D 0A 20 0D 0A 28 2A 24 41 2B teger;.. ..(*$A+
00DF30: 2A 29 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 *)....procedure
00DF40: 49 6E 73 65 72 74 3B 0D 0A 62 65 67 69 6E 0D 0A Insert;..begin..
00DF50: 20 20 54 61 47 65 74 50 61 67 65 28 49 64 78 46 TaGetPage(IdxF
00DF60: 2C 50 72 50 67 52 65 66 31 2C 50 61 67 65 50 74 ,PrPgRef1,PagePt
00DF70: 72 31 29 3B 0D 0A 20 20 77 69 74 68 20 50 61 67 r1);.. with Pag
00DF80: 65 50 74 72 31 5E 20 64 6F 0D 0A 20 20 62 65 67 ePtr1^ do.. beg
00DF90: 69 6E 0D 0A 20 20 20 20 69 66 20 49 74 65 6D 73 in.. if Items
00DFA0: 4F 6E 50 61 67 65 20 3C 20 50 61 67 65 53 69 7A OnPage < PageSiz
00DFB0: 65 20 74 68 65 6E 0D 0A 20 20 20 20 62 65 67 69 e then.. begi
00DFC0: 6E 0D 0A 20 20 20 20 20 20 49 74 65 6D 73 4F 6E n.. ItemsOn
00DFD0: 50 61 67 65 20 3A 3D 20 49 74 65 6D 73 4F 6E 50 Page := ItemsOnP
00DFE0: 61 67 65 20 2B 20 31 3B 0D 0A 20 20 20 20 20 20 age + 1;..
00DFF0: 66 6F 72 20 49 20 3A 3D 20 49 74 65 6D 73 4F 6E for I := ItemsOn
00E000: 50 61 67 65 20 64 6F 77 6E 74 6F 20 52 20 2B 20 Page downto R +
00E010: 32 20 64 6F 20 0D 0A 20 20 20 20 20 20 20 20 49 2 do .. I
00E020: 74 65 6D 41 72 72 61 79 5B 49 5D 20 3A 3D 20 49 temArray[I] := I
00E030: 74 65 6D 41 72 72 61 79 5B 49 20 2D 20 31 5D 3B temArray[I - 1];
00E040: 0D 0A 20 20 20 20 20 20 49 74 65 6D 41 72 72 61 .. ItemArra
00E050: 79 5B 52 20 2B 20 31 5D 20 3A 3D 20 50 72 6F 63 y[R + 1] := Proc
00E060: 49 74 65 6D 31 3B 20 0D 0A 20 20 20 20 20 20 50 Item1; .. P
00E070: 61 73 73 55 70 20 3A 3D 20 66 61 6C 73 65 3B 0D assUp := false;.
00E080: 0A 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 65 6C . end.. el
00E090: 73 65 0D 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 se.. begin..
00E0A0: 20 20 20 20 20 54 61 4E 65 77 50 61 67 65 28 49 TaNewPage(I
00E0B0: 64 78 46 2C 50 72 50 67 52 65 66 32 2C 50 61 67 dxF,PrPgRef2,Pag
00E0C0: 65 50 74 72 32 29 3B 0D 0A 20 20 20 20 20 20 69 ePtr2);.. i
00E0D0: 66 20 52 20 3C 3D 20 4F 72 64 65 72 20 74 68 65 f R <= Order the
00E0E0: 6E 0D 0A 20 20 20 20 20 20 62 65 67 69 6E 0D 0A n.. begin..
00E0F0: 20 20 20 20 20 20 20 20 69 66 20 52 20 3D 20 4F if R = O
00E100: 3B 0D 0A 20 20 20 20 69 66 20 50 61 73 73 55 70 ;.. if PassUp
00E110: 20 74 68 65 6E 0D 0A 20 20 20 20 62 65 67 69 6E then.. begin
00E120: 0D 0A 20 20 20 20 20 20 50 72 50 67 52 65 66 31 .. PrPgRef1
00E130: 20 3A 3D 20 52 52 3B 20 0D 0A 20 20 20 20 20 20 := RR; ..
00E140: 54 61 4E 65 77 50 61 67 65 28 49 64 78 46 2C 52 TaNewPage(IdxF,R
00E150: 52 2C 50 61 67 65 50 74 72 31 29 3B 0D 0A 20 20 R,PagePtr1);..
00E160: 20 20 20 20 77 69 74 68 20 50 61 67 65 50 74 72 with PagePtr
00E170: 31 5E 20 64 6F 0D 0A 20 20 20 20 20 20 62 65 67 1^ do.. beg
00E180: 69 6E 0D 0A 20 20 20 20 20 20 20 20 49 74 65 6D in.. Item
00E190: 73 4F 6E 50 61 67 65 20 3A 3D 20 31 3B 20 0D 0A sOnPage := 1; ..
00E1A0: 20 20 20 20 20 20 20 20 42 63 6B 77 50 61 67 65 BckwPage
00E1B0: 52 65 66 20 3A 3D 20 50 72 50 67 52 65 66 31 3B Ref := PrPgRef1;
00E1C0: 20 0D 0A 20 20 20 20 20 20 20 20 49 74 65 6D 41 .. ItemA
00E1D0: 72 72 61 79 5B 31 5D 20 3A 3D 20 50 72 6F 63 49 rray[1] := ProcI
00E1E0: 74 65 6D 31 3B 0D 0A 20 20 20 20 20 20 65 6E 64 tem1;.. end
00E1F0: 3B 0D 0A 20 20 20 20 20 20 54 61 55 70 64 61 74 ;.. TaUpdat
00E200: 65 50 61 67 65 28 50 61 67 65 50 74 72 31 29 3B ePage(PagePtr1);
00E210: 0D 0A 20 20 20 20 65 6E 64 3B 0D 0A 20 20 65 6E .. end;.. en
00E220: 64 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 1A 1A 1A 1A d;..end;........
00E230: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E240: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E250: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E260: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E270: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E280: 0A 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 . end;..
00E290: 20 65 6E 64 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 65 end;.. end;..e
00E2A0: 6E 64 3B 0D 0A 0D 0A 62 65 67 69 6E 0D 0A 20 20 nd;....begin..
00E2B0: 77 69 74 68 20 49 64 78 46 20 64 6F 0D 0A 20 20 with IdxF do..
00E2C0: 62 65 67 69 6E 0D 0A 20 20 20 20 54 61 58 4B 65 begin.. TaXKe
00E2D0: 79 28 50 4B 65 79 2C 4B 65 79 4C 29 3B 20 0D 0A y(PKey,KeyL); ..
00E2E0: 20 20 20 20 4F 4B 20 3A 3D 20 74 72 75 65 3B 20 OK := true;
00E2F0: 0D 0A 20 20 20 20 53 65 61 72 63 68 28 52 52 29 .. Search(RR)
00E300: 72 64 65 72 20 74 68 65 6E 20 0D 0A 20 20 20 20 rder then ..
00E310: 20 20 20 20 20 20 50 72 6F 63 49 74 65 6D 32 20 ProcItem2
00E320: 3A 3D 20 50 72 6F 63 49 74 65 6D 31 0D 0A 20 20 := ProcItem1..
00E330: 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 else..
00E340: 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 begin..
00E350: 20 20 20 20 20 50 72 6F 63 49 74 65 6D 32 20 3A ProcItem2 :
00E360: 3D 20 49 74 65 6D 41 72 72 61 79 5B 4F 72 64 65 = ItemArray[Orde
00E370: 72 5D 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 66 r];.. f
00E380: 6F 72 20 49 20 3A 3D 20 4F 72 64 65 72 20 64 6F or I := Order do
00E390: 77 6E 74 6F 20 52 20 2B 20 32 20 64 6F 20 0D 0A wnto R + 2 do ..
00E3A0: 20 20 20 20 20 20 20 20 20 20 20 20 49 74 65 6D Item
00E3B0: 41 72 72 61 79 5B 49 5D 20 3A 3D 20 49 74 65 6D Array[I] := Item
00E3C0: 41 72 72 61 79 5B 49 20 2D 20 31 5D 3B 0D 0A 20 Array[I - 1];..
00E3D0: 20 20 20 20 20 20 20 20 20 49 74 65 6D 41 72 72 ItemArr
00E3E0: 61 79 5B 52 20 2B 20 31 5D 20 3A 3D 20 50 72 6F ay[R + 1] := Pro
00E3F0: 63 49 74 65 6D 31 3B 0D 0A 20 20 20 20 20 20 20 cItem1;..
00E400: 20 65 6E 64 3B 0D 0A 20 20 20 20 20 20 20 20 66 end;.. f
00E410: 6F 72 20 49 20 3A 3D 20 31 20 74 6F 20 4F 72 64 or I := 1 to Ord
00E420: 65 72 20 64 6F 20 0D 0A 20 20 20 20 20 20 20 20 er do ..
00E430: 20 20 50 61 67 65 50 74 72 32 5E 2E 49 74 65 6D PagePtr2^.Item
00E440: 41 72 72 61 79 5B 49 5D 20 3A 3D 20 49 74 65 6D Array[I] := Item
00E450: 41 72 72 61 79 5B 49 20 2B 20 4F 72 64 65 72 5D Array[I + Order]
00E460: 3B 0D 0A 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 ;.. end..
00E470: 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 else..
00E480: 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 52 begin.. R
00E490: 20 3A 3D 20 52 20 2D 20 4F 72 64 65 72 3B 20 0D := R - Order; .
00E4A0: 0A 20 20 20 20 20 20 20 20 50 72 6F 63 49 74 65 . ProcIte
00E4B0: 6D 32 20 3A 3D 20 49 74 65 6D 41 72 72 61 79 5B m2 := ItemArray[
00E4C0: 4F 72 64 65 72 20 2B 20 31 5D 3B 0D 0A 20 20 20 Order + 1];..
00E4D0: 20 20 20 20 20 66 6F 72 20 49 20 3A 3D 20 31 20 for I := 1
00E4E0: 74 6F 20 52 20 2D 20 31 20 64 6F 20 0D 0A 20 20 to R - 1 do ..
00E4F0: 20 20 20 20 20 20 20 20 50 61 67 65 50 74 72 32 PagePtr2
00E500: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00E510: 0C 00 01 00 02 09 52 E5 0C 00 41 02 00 00 00 02 ......R...A.....
00E520: 0C 00 46 02 00 00 00 02 0C 00 42 02 00 00 00 02 ..F.......B.....
00E530: 0C 00 47 02 00 00 00 02 0C 00 43 02 00 00 00 02 ..G.......C.....
00E540: 0C 00 48 02 00 00 00 02 0C 00 44 02 00 00 00 02 ..H.......D.....
00E550: 0C 00 49 02 00 00 00 02 0C 00 45 02 00 00 00 02 ..I.......E.....
00E560: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E570: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E580: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E590: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E5A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E5B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E5C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E5D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E5E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E5F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E600: 70 72 6F 67 72 61 6D 20 44 61 74 61 42 61 73 65 program DataBase
00E610: 3B 0D 0A 28 2A 24 41 2B 2C 43 2D 2C 52 2D 2C 56 ;..(*$A+,C-,R-,V
00E620: 2D 2A 29 0D 0A 0D 0A 0D 0A 28 2A 2A 2A 2A 2A 2A -*)......(******
00E630: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00E640: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00E650: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00E660: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 29 0D 0A 28 2A 20 **********)..(*
00E670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00E680: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00E690: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00E6A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 29 0D *).
00E6B0: 0A 28 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 .(*
00E6C0: 20 20 20 20 20 54 55 52 42 4F 2D 61 63 63 65 73 TURBO-acces
00E6D0: 73 20 76 65 72 73 69 6F 6E 20 31 2E 30 30 20 20 s version 1.00
00E6E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00E6F0: 20 2A 29 0D 0A 28 2A 20 20 20 20 20 20 20 20 20 *)..(*
00E700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00E710: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00E720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00E730: 20 20 20 20 20 2A 29 0D 0A 28 2A 20 20 20 20 20 *)..(*
00E740: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00E750: 20 20 44 41 54 41 42 41 53 45 20 65 78 61 6D 70 DATABASE examp
00E760: 6C 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 le
00E770: 20 20 20 20 20 20 20 20 20 2A 29 0D 0A 28 2A 20 *)..(*
00E780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00E790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00E7A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00E7B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 29 0D *).
00E7C0: 0A 28 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 .(*
00E7D0: 20 20 20 20 20 20 20 43 6F 70 79 72 69 67 68 74 Copyright
00E7E0: 20 28 43 29 20 31 39 38 34 20 62 79 20 20 20 20 (C) 1984 by
00E7F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00E800: 49 6E 64 65 78 46 69 6C 65 2C 0D 0A 20 20 4E 61 IndexFile,.. Na
00E810: 6D 65 49 6E 64 65 78 46 69 6C 65 20 3A 20 49 6E meIndexFile : In
00E820: 64 65 78 46 69 6C 65 3B 0D 0A 20 20 43 68 20 20 dexFile;.. Ch
00E830: 20 20 20 20 20 20 20 20 20 20 3A 20 43 68 61 72 : Char
00E840: 3B 0D 0A 0D 0A 0D 0A 28 2A 24 49 20 42 54 52 45 ;......(*$I BTRE
00E850: 45 31 2E 49 4E 43 2A 29 0D 0A 28 2A 24 49 20 42 E1.INC*)..(*$I B
00E860: 54 52 45 45 32 2E 49 4E 43 2A 29 0D 0A 0D 0A 28 TREE2.INC*)....(
00E870: 2A 20 20 4D 61 69 6E 20 70 72 6F 67 72 61 6D 20 * Main program
00E880: 2A 29 0D 0A 0D 0A 62 65 67 69 6E 0D 0A 20 20 43 *)....begin.. C
00E890: 6C 72 53 63 72 20 3B 0D 0A 20 20 57 72 69 74 65 lrScr ;.. Write
00E8A0: 6C 6E 28 43 6F 6E 73 74 53 74 72 28 27 2D 27 2C ln(ConstStr('-',
00E8B0: 37 39 29 29 3B 0D 0A 20 20 57 72 69 74 65 6C 6E 79));.. Writeln
00E8C0: 28 27 54 55 52 42 4F 2D 41 63 63 65 73 73 20 43 ('TURBO-Access C
00E8D0: 75 73 74 6F 6D 65 72 20 44 61 74 61 62 61 73 65 ustomer Database
00E8E0: 27 29 3B 0D 0A 20 20 57 72 69 74 65 6C 6E 28 43 ');.. Writeln(C
00E8F0: 6F 6E 73 74 53 74 72 28 27 2D 27 2C 37 39 29 29 onstStr('-',79))
00E900: 3B 0D 0A 20 20 47 6F 74 6F 58 59 28 31 2C 32 32 ;.. GotoXY(1,22
00E910: 29 3B 20 57 72 69 74 65 6C 6E 28 43 6F 6E 73 74 ); Writeln(Const
00E920: 53 74 72 28 27 2D 27 2C 37 39 29 29 3B 0D 0A 20 Str('-',79));..
00E930: 20 57 72 69 74 65 6C 6E 3B 0D 0A 20 20 57 72 69 Writeln;.. Wri
00E940: 74 65 28 43 6F 6E 73 74 53 74 72 28 27 2D 27 2C te(ConstStr('-',
00E950: 37 39 29 29 3B 20 47 6F 74 6F 58 59 28 31 2C 34 79)); GotoXY(1,4
00E960: 29 3B 0D 0A 20 20 49 6E 69 74 49 6E 64 65 78 3B );.. InitIndex;
00E970: 0D 0A 20 20 4F 70 65 6E 46 69 6C 65 28 44 61 74 .. OpenFile(Dat
00E980: 46 2C 27 43 55 53 54 2E 44 41 54 27 2C 43 75 73 F,'CUST.DAT',Cus
00E990: 74 52 65 67 53 69 7A 65 29 3B 0D 0A 20 20 69 66 tRegSize);.. if
00E9A0: 20 4F 4B 20 74 68 65 6E 0D 0A 20 20 20 20 4F 70 OK then.. Op
00E9B0: 65 6E 49 6E 64 65 78 28 43 6F 64 65 49 6E 64 65 enIndex(CodeInde
00E9C0: 78 46 69 6C 65 2C 27 43 55 53 54 2E 49 58 43 27 xFile,'CUST.IXC'
00E9D0: 2C 31 35 2C 30 29 3B 0D 0A 20 20 69 66 20 4F 4B ,15,0);.. if OK
00E9E0: 20 74 68 65 6E 0D 0A 20 20 20 20 4F 70 65 6E 49 then.. OpenI
00E9F0: 6E 64 65 78 28 4E 61 6D 65 49 6E 64 65 78 46 69 ndex(NameIndexFi
00EA00: 20 2A 29 0D 0A 28 2A 20 20 20 20 20 20 20 20 20 *)..(*
00EA10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00EA20: 42 4F 52 4C 41 4E 44 20 49 6E 74 2E 20 20 20 20 BORLAND Int.
00EA30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00EA40: 20 20 20 20 20 2A 29 0D 0A 28 2A 20 20 20 20 20 *)..(*
00EA50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00EA60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00EA70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00EA80: 20 20 20 20 20 20 20 20 20 2A 29 0D 0A 28 2A 2A *)..(**
00EA90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00EAA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00EAB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
00EAC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 29 0D **************).
00EAD0: 0A 0D 0A 0D 0A 6C 61 62 65 6C 20 53 74 6F 70 3B .....label Stop;
00EAE0: 0D 0A 0D 0A 63 6F 6E 73 74 0D 0A 0D 0A 28 2A 20 ....const....(*
00EAF0: 20 64 61 74 61 20 72 65 63 6F 72 64 20 53 69 7A data record Siz
00EB00: 65 20 64 65 66 69 6E 69 74 69 6F 6E 20 2A 29 0D e definition *).
00EB10: 0A 20 20 43 75 73 74 52 65 67 53 69 7A 65 20 20 . CustRegSize
00EB20: 3D 20 20 33 34 32 3B 20 20 20 20 20 20 20 20 28 = 342; (
00EB30: 2A 20 20 63 75 73 74 6F 6D 65 72 20 72 65 63 6F * customer reco
00EB40: 72 64 20 53 69 7A 65 20 2A 29 0D 0A 0D 0A 28 2A rd Size *)....(*
00EB50: 20 20 54 55 52 42 4F 2D 61 63 63 65 73 73 20 63 TURBO-access c
00EB60: 6F 6E 73 74 61 6E 74 73 20 2A 29 0D 0A 20 20 4D onstants *).. M
00EB70: 61 78 44 61 74 61 52 65 63 53 69 7A 65 20 20 3D axDataRecSize =
00EB80: 20 20 43 75 73 74 52 65 67 53 69 7A 65 3B 20 20 CustRegSize;
00EB90: 20 28 2A 20 20 6D 61 78 20 72 65 63 6F 72 64 20 (* max record
00EBA0: 53 69 7A 65 20 2A 29 0D 0A 20 20 4D 61 78 4B 65 Size *).. MaxKe
00EBB0: 79 4C 65 6E 20 20 20 20 20 20 20 3D 20 20 32 35 yLen = 25
00EBC0: 3B 20 20 20 20 20 20 20 20 20 20 20 20 28 2A 20 ; (*
00EBD0: 20 6D 61 78 20 6B 65 79 20 53 69 7A 65 20 2A 29 max key Size *)
00EBE0: 0D 0A 20 20 50 61 67 65 53 69 7A 65 20 20 20 20 .. PageSize
00EBF0: 20 20 20 20 3D 20 20 31 36 3B 20 20 20 20 20 20 = 16;
00EC00: 6C 65 2C 27 43 55 53 54 2E 49 58 4E 27 2C 32 35 le,'CUST.IXN',25
00EC10: 2C 31 29 3B 0D 0A 20 20 69 66 20 6E 6F 74 20 4F ,1);.. if not O
00EC20: 4B 20 74 68 65 6E 0D 0A 20 20 62 65 67 69 6E 0D K then.. begin.
00EC30: 0A 20 20 20 20 53 65 6C 65 63 74 28 27 44 61 74 . Select('Dat
00EC40: 61 20 66 69 6C 65 73 20 6D 69 73 73 69 6E 67 2E a files missing.
00EC50: 20 43 72 65 61 74 65 20 6E 65 77 20 66 69 6C 65 Create new file
00EC60: 73 20 28 59 2F 4E 29 27 2C 20 5B 27 59 27 2C 27 s (Y/N)', ['Y','
00EC70: 4E 27 5D 2C 20 43 68 29 3B 0D 0A 20 20 20 20 69 N'], Ch);.. i
00EC80: 66 20 43 68 20 3D 20 27 59 27 20 74 68 65 6E 0D f Ch = 'Y' then.
00EC90: 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 . begin..
00ECA0: 20 20 4D 61 6B 65 46 69 6C 65 28 44 61 74 46 2C MakeFile(DatF,
00ECB0: 27 43 55 53 54 2E 44 41 54 27 2C 43 75 73 74 52 'CUST.DAT',CustR
00ECC0: 65 67 53 69 7A 65 29 3B 0D 0A 20 20 20 20 20 20 egSize);..
00ECD0: 4D 61 6B 65 49 6E 64 65 78 28 43 6F 64 65 49 6E MakeIndex(CodeIn
00ECE0: 64 65 78 46 69 6C 65 2C 27 43 55 53 54 2E 49 58 dexFile,'CUST.IX
00ECF0: 43 27 2C 31 35 2C 30 29 3B 0D 0A 20 20 20 20 20 C',15,0);..
00ED00: 20 4D 61 6B 65 49 6E 64 65 78 28 4E 61 6D 65 49 MakeIndex(NameI
00ED10: 6E 64 65 78 46 69 6C 65 2C 27 43 55 53 54 2E 49 ndexFile,'CUST.I
00ED20: 58 4E 27 2C 32 35 2C 31 29 3B 0D 0A 20 20 20 20 XN',25,1);..
00ED30: 65 6E 64 0D 0A 20 20 20 20 65 6C 73 65 20 67 6F end.. else go
00ED40: 74 6F 20 53 74 6F 70 3B 0D 0A 20 20 65 6E 64 3B to Stop;.. end;
00ED50: 0D 0A 20 20 47 6F 74 6F 58 59 28 36 30 2C 32 29 .. GotoXY(60,2)
00ED60: 3B 20 57 72 69 74 65 28 55 73 65 64 52 65 63 73 ; Write(UsedRecs
00ED70: 28 44 61 74 46 29 3A 35 2C 27 20 52 65 63 6F 72 (DatF):5,' Recor
00ED80: 64 73 20 69 6E 20 75 73 65 27 29 3B 0D 0A 20 20 ds in use');..
00ED90: 72 65 70 65 61 74 0D 0A 20 20 20 20 53 65 6C 65 repeat.. Sele
00EDA0: 63 74 28 27 53 65 6C 65 63 74 20 3A 20 55 29 70 ct('Select : U)p
00EDB0: 64 61 74 65 2C 20 4C 29 69 73 74 2C 20 51 29 75 date, L)ist, Q)u
00EDC0: 69 74 27 2C 20 5B 27 55 27 2C 27 4C 27 2C 27 51 it', ['U','L','Q
00EDD0: 27 5D 2C 20 43 68 29 3B 0D 0A 20 20 20 20 63 61 '], Ch);.. ca
00EDE0: 73 65 20 43 68 20 6F 66 0D 0A 20 20 20 20 20 20 se Ch of..
00EDF0: 27 55 27 20 3A 20 55 70 64 61 74 65 3B 0D 0A 20 'U' : Update;..
00EE00: 20 20 20 20 20 20 28 2A 20 20 70 61 67 65 20 53 (* page S
00EE10: 69 7A 65 20 2A 29 0D 0A 20 20 4F 72 64 65 72 20 ize *).. Order
00EE20: 20 20 20 20 20 20 20 20 20 20 3D 20 20 38 3B 20 = 8;
00EE30: 20 20 20 20 20 20 20 20 20 20 20 20 28 2A 20 20 (*
00EE40: 68 61 6C 66 20 70 61 67 65 20 53 69 7A 65 20 2A half page Size *
00EE50: 29 0D 0A 20 20 50 61 67 65 53 74 61 63 6B 53 69 ).. PageStackSi
00EE60: 7A 65 20 20 20 3D 20 20 35 3B 20 20 20 20 20 20 ze = 5;
00EE70: 20 20 20 20 20 20 20 28 2A 20 20 70 61 67 65 20 (* page
00EE80: 62 75 66 66 65 72 20 53 69 7A 65 20 2A 29 0D 0A buffer Size *)..
00EE90: 20 20 4D 61 78 48 65 69 67 68 74 20 20 20 20 20 MaxHeight
00EEA0: 20 20 3D 20 20 35 3B 20 20 20 20 20 20 20 20 20 = 5;
00EEB0: 20 20 20 20 28 2A 20 20 6D 61 78 20 42 2D 74 72 (* max B-tr
00EEC0: 65 65 20 68 65 69 67 68 74 20 2A 29 0D 0A 0D 0A ee height *)....
00EED0: 0D 0A 76 61 72 0D 0A 20 20 4E 6F 4F 66 52 65 63 ..var.. NoOfRec
00EEE0: 73 20 20 20 20 20 20 3A 20 49 6E 74 65 67 65 72 s : Integer
00EEF0: 3B 0D 0A 0D 0A 28 2A 20 20 69 6E 63 6C 75 64 65 ;....(* include
00EF00: 20 54 55 52 42 4F 2D 61 63 63 65 73 73 20 6D 6F TURBO-access mo
00EF10: 64 75 6C 65 73 20 2A 29 0D 0A 0D 0A 28 2A 24 49 dules *)....(*$I
00EF20: 20 41 43 43 45 53 53 31 2E 42 4F 58 2A 29 0D 0A ACCESS1.BOX*)..
00EF30: 28 2A 24 49 20 41 43 43 45 53 53 32 2E 42 4F 58 (*$I ACCESS2.BOX
00EF40: 2A 29 0D 0A 28 2A 24 49 20 47 45 54 4B 45 59 2E *)..(*$I GETKEY.
00EF50: 42 4F 58 2A 29 0D 0A 28 2A 24 49 20 41 44 44 4B BOX*)..(*$I ADDK
00EF60: 45 59 2E 42 4F 58 2A 29 0D 0A 28 2A 24 49 20 44 EY.BOX*)..(*$I D
00EF70: 45 4C 4B 45 59 2E 42 4F 58 2A 29 0D 0A 0D 0A 74 ELKEY.BOX*)....t
00EF80: 79 70 65 0D 0A 20 20 53 74 72 35 20 20 20 20 3D ype.. Str5 =
00EF90: 20 20 73 74 72 69 6E 67 5B 35 5D 3B 0D 0A 20 20 string[5];..
00EFA0: 53 74 72 31 30 20 20 20 3D 20 20 73 74 72 69 6E Str10 = strin
00EFB0: 67 5B 31 30 5D 3B 0D 0A 20 20 53 74 72 31 35 20 g[10];.. Str15
00EFC0: 20 20 3D 20 20 73 74 72 69 6E 67 5B 31 35 5D 3B = string[15];
00EFD0: 0D 0A 20 20 53 74 72 32 35 20 20 20 3D 20 20 73 .. Str25 = s
00EFE0: 74 72 69 6E 67 5B 32 35 5D 3B 0D 0A 20 20 53 74 tring[25];.. St
00EFF0: 72 38 30 20 20 20 3D 20 20 73 74 72 69 6E 67 5B r80 = string[
00F000: 20 20 20 20 20 27 4C 27 20 3A 20 4C 69 73 74 3B 'L' : List;
00F010: 0D 0A 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 .. end;..
00F020: 69 66 20 43 68 20 3C 3E 20 27 51 27 20 74 68 65 if Ch <> 'Q' the
00F030: 6E 20 43 6C 65 61 72 46 72 61 6D 65 3B 0D 0A 20 n ClearFrame;..
00F040: 20 75 6E 74 69 6C 20 55 70 43 61 73 65 28 43 68 until UpCase(Ch
00F050: 29 20 3D 20 27 51 27 3B 0D 0A 20 20 43 6C 6F 73 ) = 'Q';.. Clos
00F060: 65 46 69 6C 65 28 44 61 74 46 29 3B 0D 0A 20 20 eFile(DatF);..
00F070: 43 6C 6F 73 65 49 6E 64 65 78 28 43 6F 64 65 49 CloseIndex(CodeI
00F080: 6E 64 65 78 46 69 6C 65 29 20 3B 0D 0A 20 20 43 ndexFile) ;.. C
00F090: 6C 6F 73 65 49 6E 64 65 78 28 4E 61 6D 65 49 6E loseIndex(NameIn
00F0A0: 64 65 78 46 69 6C 65 29 20 3B 0D 0A 20 20 53 74 dexFile) ;.. St
00F0B0: 6F 70 20 3A 0D 0A 20 20 43 6C 72 53 63 72 3B 0D op :.. ClrScr;.
00F0C0: 0A 65 6E 64 2E 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A .end............
00F0D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F0E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F0F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F100: 20 4D 61 6B 65 49 6E 64 65 78 28 4E 61 6D 65 49 MakeIndex(NameI
00F110: 6E 64 65 78 46 69 6C 65 2C 27 43 55 53 54 2E 49 ndexFile,'CUST.I
00F120: 58 4E 27 2C 32 35 2C 31 29 3B 0D 0A 20 20 20 20 XN',25,1);..
00F130: 65 6E 64 0D 0A 20 20 20 20 65 6C 73 65 20 67 6F end.. else go
00F140: 74 6F 20 53 74 6F 70 3B 0D 0A 20 20 65 6E 64 3B to Stop;.. end;
00F150: 0D 0A 20 20 47 6F 74 6F 58 59 28 36 30 2C 32 29 .. GotoXY(60,2)
00F160: 3B 20 57 72 69 74 65 28 55 73 65 64 52 65 63 73 ; Write(UsedRecs
00F170: 28 44 61 74 46 29 3A 35 2C 27 20 52 65 63 6F 72 (DatF):5,' Recor
00F180: 64 73 20 69 6E 20 75 73 65 27 29 3B 0D 0A 20 20 ds in use');..
00F190: 72 65 70 65 61 74 0D 0A 20 20 20 20 53 65 6C 65 repeat.. Sele
00F1A0: 63 74 28 27 53 65 6C 65 63 74 20 3A 20 55 29 70 ct('Select : U)p
00F1B0: 64 61 74 65 2C 20 4C 29 69 73 74 2C 20 51 29 75 date, L)ist, Q)u
00F1C0: 69 74 27 2C 20 5B 27 55 27 2C 27 4C 27 2C 27 51 it', ['U','L','Q
00F1D0: 27 5D 2C 20 43 68 29 3B 0D 0A 20 20 20 20 63 61 '], Ch);.. ca
00F1E0: 73 65 20 43 68 20 6F 66 0D 0A 20 20 20 20 20 20 se Ch of..
00F1F0: 27 55 27 20 3A 20 55 70 64 61 74 65 3B 0D 0A 20 'U' : Update;..
00F200: 38 30 5D 3B 0D 0A 20 20 41 6E 79 53 74 72 20 20 80];.. AnyStr
00F210: 3D 20 20 73 74 72 69 6E 67 5B 32 35 35 5D 3B 0D = string[255];.
00F220: 0A 0D 0A 28 2A 20 20 63 68 61 72 61 63 74 65 72 ...(* character
00F230: 20 73 65 74 20 74 79 70 65 20 2A 29 0D 0A 20 20 set type *)..
00F240: 43 68 61 72 53 65 74 3D 20 20 73 65 74 20 6F 66 CharSet= set of
00F250: 20 43 68 61 72 3B 0D 0A 0D 0A 28 2A 20 20 63 75 Char;....(* cu
00F260: 73 74 6F 6D 65 72 20 72 65 63 6F 72 64 20 64 65 stomer record de
00F270: 66 69 6E 69 74 69 6F 6E 20 2A 29 0D 0A 0D 0A 20 finition *)....
00F280: 20 43 75 73 74 52 65 63 20 3D 20 72 65 63 6F 72 CustRec = recor
00F290: 64 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 d..
00F2A0: 20 43 75 73 74 53 74 61 74 75 73 20 3A 20 49 6E CustStatus : In
00F2B0: 74 65 67 65 72 3B 20 20 20 20 20 20 20 20 20 28 teger; (
00F2C0: 2A 20 20 43 75 73 74 53 74 61 74 75 73 20 2A 29 * CustStatus *)
00F2D0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
00F2E0: 43 75 73 74 43 6F 64 65 20 20 20 3A 20 73 74 72 CustCode : str
00F2F0: 69 6E 67 5B 31 35 5D 3B 20 20 20 20 28 2A 20 20 ing[15]; (*
00F300: 63 75 73 74 6F 6D 65 72 20 63 6F 64 65 20 2A 29 customer code *)
00F310: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
00F320: 45 6E 74 72 79 44 61 74 65 20 20 3A 20 73 74 72 EntryDate : str
00F330: 69 6E 67 5B 38 5D 3B 20 20 20 20 20 28 2A 20 20 ing[8]; (*
00F340: 65 6E 74 72 79 20 64 61 74 65 20 2A 29 0D 0A 20 entry date *)..
00F350: 20 20 20 20 20 20 20 20 20 20 20 20 20 46 69 72 Fir
00F360: 73 74 4E 61 6D 65 20 20 3A 20 73 74 72 69 6E 67 stName : string
00F370: 5B 31 35 5D 3B 20 20 20 20 28 2A 20 20 66 69 72 [15]; (* fir
00F380: 73 74 20 6E 61 6D 65 20 2A 29 0D 0A 20 20 20 20 st name *)..
00F390: 20 20 20 20 20 20 20 20 20 20 4C 61 73 74 4E 61 LastNa
00F3A0: 6D 65 20 20 20 3A 20 73 74 72 69 6E 67 5B 33 30 me : string[30
00F3B0: 5D 3B 20 20 20 20 28 2A 20 20 6C 61 73 74 20 6E ]; (* last n
00F3C0: 61 6D 65 20 2A 29 0D 0A 20 20 20 20 20 20 20 20 ame *)..
00F3D0: 20 20 20 20 20 20 43 6F 6D 70 61 6E 79 20 20 20 Company
00F3E0: 20 3A 20 73 74 72 69 6E 67 5B 34 30 5D 3B 20 20 : string[40];
00F3F0: 20 20 28 2A 20 20 63 6F 6D 70 61 6E 79 20 2A 29 (* company *)
00F400: 28 2A 20 20 55 70 63 61 73 65 53 74 72 20 63 6F (* UpcaseStr co
00F410: 6E 76 65 72 74 73 20 61 20 73 74 72 69 6E 67 20 nverts a string
00F420: 74 6F 20 75 70 70 65 72 20 63 61 73 65 20 2A 29 to upper case *)
00F430: 0D 0A 0D 0A 66 75 6E 63 74 69 6F 6E 20 55 70 63 ....function Upc
00F440: 61 73 65 53 74 72 28 53 20 3A 20 53 74 72 38 30 aseStr(S : Str80
00F450: 29 20 3A 20 53 74 72 38 30 3B 0D 0A 76 61 72 0D ) : Str80;..var.
00F460: 0A 20 20 50 20 3A 20 49 6E 74 65 67 65 72 3B 0D . P : Integer;.
00F470: 0A 62 65 67 69 6E 0D 0A 20 20 66 6F 72 20 50 20 .begin.. for P
00F480: 3A 3D 20 31 20 74 6F 20 4C 65 6E 67 74 68 28 53 := 1 to Length(S
00F490: 29 20 64 6F 20 0D 0A 20 20 20 20 53 5B 50 5D 20 ) do .. S[P]
00F4A0: 3A 3D 20 55 70 63 61 73 65 28 53 5B 50 5D 29 3B := Upcase(S[P]);
00F4B0: 0D 0A 20 20 55 70 63 61 73 65 53 74 72 20 3A 3D .. UpcaseStr :=
00F4C0: 20 53 3B 0D 0A 65 6E 64 3B 0D 0A 20 0D 0A 28 2A S;..end;.. ..(*
00F4D0: 20 20 43 6F 6E 73 74 53 74 72 20 72 65 74 75 72 ConstStr retur
00F4E0: 6E 73 20 61 20 73 74 72 69 6E 67 20 77 69 74 68 ns a string with
00F4F0: 20 4E 20 63 68 61 72 61 63 74 65 72 73 20 6F 66 N characters of
00F500: 20 76 61 6C 75 65 20 43 20 2A 29 0D 0A 0D 0A 66 value C *)....f
00F510: 75 6E 63 74 69 6F 6E 20 43 6F 6E 73 74 53 74 72 unction ConstStr
00F520: 28 43 20 3A 20 43 68 61 72 3B 20 4E 20 3A 20 49 (C : Char; N : I
00F530: 6E 74 65 67 65 72 29 20 3A 20 53 74 72 38 30 3B nteger) : Str80;
00F540: 0D 0A 76 61 72 0D 0A 20 20 53 20 3A 20 73 74 72 ..var.. S : str
00F550: 69 6E 67 5B 38 30 5D 3B 0D 0A 62 65 67 69 6E 0D ing[80];..begin.
00F560: 0A 20 20 69 66 20 4E 20 3C 20 30 20 74 68 65 6E . if N < 0 then
00F570: 20 0D 0A 20 20 20 20 4E 20 3A 3D 20 30 3B 20 0D .. N := 0; .
00F580: 0A 20 20 53 5B 30 5D 20 3A 3D 20 43 68 72 28 4E . S[0] := Chr(N
00F590: 29 3B 20 0D 0A 20 20 46 69 6C 6C 43 68 61 72 28 ); .. FillChar(
00F5A0: 53 5B 31 5D 2C 4E 2C 43 29 3B 0D 0A 20 20 43 6F S[1],N,C);.. Co
00F5B0: 6E 73 74 53 74 72 20 3A 3D 20 53 3B 0D 0A 65 6E nstStr := S;..en
00F5C0: 64 3B 0D 0A 20 0D 0A 28 2A 20 20 42 65 65 70 20 d;.. ..(* Beep
00F5D0: 73 6F 75 6E 64 73 20 74 68 65 20 74 65 72 6D 69 sounds the termi
00F5E0: 6E 61 6C 20 62 65 6C 6C 20 6F 72 20 62 65 65 70 nal bell or beep
00F5F0: 65 72 20 2A 29 0D 0A 0D 0A 70 72 6F 63 65 64 75 er *)....procedu
00F600: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
00F610: 41 64 64 72 31 20 20 20 20 20 20 3A 20 73 74 72 Addr1 : str
00F620: 69 6E 67 5B 34 30 5D 3B 20 20 20 20 28 2A 20 20 ing[40]; (*
00F630: 41 64 64 72 65 73 73 20 31 20 2A 29 0D 0A 20 20 Address 1 *)..
00F640: 20 20 20 20 20 20 20 20 20 20 20 20 41 64 64 72 Addr
00F650: 32 20 20 20 20 20 20 3A 20 73 74 72 69 6E 67 5B 2 : string[
00F660: 34 30 5D 3B 20 20 20 20 28 2A 20 20 41 64 64 72 40]; (* Addr
00F670: 65 73 73 20 32 20 2A 29 0D 0A 20 20 20 20 20 20 ess 2 *)..
00F680: 20 20 20 20 20 20 20 20 50 68 6F 6E 65 20 20 20 Phone
00F690: 20 20 20 3A 20 73 74 72 69 6E 67 5B 31 35 5D 3B : string[15];
00F6A0: 20 20 20 20 28 2A 20 20 50 68 6F 6E 65 20 6E 75 (* Phone nu
00F6B0: 6D 62 65 72 20 2A 29 0D 0A 20 20 20 20 20 20 20 mber *)..
00F6C0: 20 20 20 20 20 20 20 50 68 6F 6E 65 45 78 74 20 PhoneExt
00F6D0: 20 20 3A 20 73 74 72 69 6E 67 5B 35 5D 3B 20 20 : string[5];
00F6E0: 20 20 20 28 2A 20 20 65 78 74 65 6E 73 69 6F 6E (* extension
00F6F0: 20 2A 29 0D 0A 20 20 20 20 20 20 20 20 20 20 20 *)..
00F700: 20 20 20 52 65 6D 61 72 6B 73 31 20 20 20 3A 20 Remarks1 :
00F710: 73 74 72 69 6E 67 5B 34 30 5D 3B 20 20 20 20 28 string[40]; (
00F720: 2A 20 20 72 65 6D 61 72 6B 73 20 31 20 2A 29 0D * remarks 1 *).
00F730: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 . R
00F740: 65 6D 61 72 6B 73 32 20 20 20 3A 20 73 74 72 69 emarks2 : stri
00F750: 6E 67 5B 34 30 5D 3B 20 20 20 20 28 2A 20 20 72 ng[40]; (* r
00F760: 65 6D 61 72 6B 73 20 32 20 2A 29 0D 0A 20 20 20 emarks 2 *)..
00F770: 20 20 20 20 20 20 20 20 20 20 20 52 65 6D 61 72 Remar
00F780: 6B 73 33 20 20 20 3A 20 73 74 72 69 6E 67 5B 34 ks3 : string[4
00F790: 30 5D 3B 20 20 20 20 28 2A 20 20 72 61 6D 61 72 0]; (* ramar
00F7A0: 6B 73 20 33 20 2A 29 0D 0A 20 20 20 20 20 20 20 ks 3 *)..
00F7B0: 20 20 20 20 20 65 6E 64 3B 0D 0A 0D 0A 76 61 72 end;....var
00F7C0: 0D 0A 0D 0A 28 2A 20 20 67 6C 6F 62 61 6C 20 76 ....(* global v
00F7D0: 61 72 69 61 62 6C 65 73 20 2A 29 0D 0A 20 20 44 ariables *).. D
00F7E0: 61 74 46 20 20 20 20 20 20 20 20 20 20 3A 20 44 atF : D
00F7F0: 61 74 61 46 69 6C 65 3B 0D 0A 20 20 43 6F 64 65 ataFile;.. Code
00F800: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00F810: 0D 00 01 00 02 09 52 E5 0D 00 41 02 00 00 00 02 ......R...A.....
00F820: 0D 00 46 02 00 00 00 02 0D 00 42 02 00 00 00 02 ..F.......B.....
00F830: 0D 00 47 02 00 00 00 02 0D 00 43 02 00 00 00 02 ..G.......C.....
00F840: 0D 00 48 02 00 00 00 02 0D 00 44 02 00 00 00 02 ..H.......D.....
00F850: 0D 00 49 02 00 00 00 02 0D 00 45 02 00 00 00 02 ..I.......E.....
00F860: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F870: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F880: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F890: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F8A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F8B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F8C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F8D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F8E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F8F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F900: 72 65 20 42 65 65 70 3B 0D 0A 62 65 67 69 6E 0D re Beep;..begin.
00F910: 0A 20 20 57 72 69 74 65 28 5E 47 29 3B 0D 0A 65 . Write(^G);..e
00F920: 6E 64 3B 0D 0A 0D 0A 0D 0A 70 72 6F 63 65 64 75 nd;......procedu
00F930: 72 65 20 49 6E 70 75 74 53 74 72 28 76 61 72 20 re InputStr(var
00F940: 53 20 20 20 20 20 3A 20 41 6E 79 53 74 72 3B 0D S : AnyStr;.
00F950: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
00F960: 20 20 20 20 20 20 20 20 4C 2C 58 2C 59 20 3A 20 L,X,Y :
00F970: 49 6E 74 65 67 65 72 3B 0D 0A 20 20 20 20 20 20 Integer;..
00F980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00F990: 20 54 65 72 6D 20 20 3A 20 43 68 61 72 53 65 74 Term : CharSet
00F9A0: 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ;..
00F9B0: 20 20 20 20 20 20 76 61 72 20 54 43 20 20 20 20 var TC
00F9C0: 3A 20 43 68 61 72 20 20 20 20 29 3B 0D 0A 63 6F : Char );..co
00F9D0: 6E 73 74 0D 0A 20 20 55 6E 64 65 72 53 63 6F 72 nst.. UnderScor
00F9E0: 65 20 20 3D 20 20 27 5F 27 3B 0D 0A 76 61 72 0D e = '_';..var.
00F9F0: 0A 20 20 50 20 3A 20 49 6E 74 65 67 65 72 3B 0D . P : Integer;.
00FA00: 0A 20 20 43 68 20 3A 20 43 68 61 72 3B 0D 0A 62 . Ch : Char;..b
00FA10: 65 67 69 6E 0D 0A 20 20 47 6F 74 6F 58 59 28 58 egin.. GotoXY(X
00FA20: 20 2B 20 31 2C 59 20 2B 20 31 29 3B 20 57 72 69 + 1,Y + 1); Wri
00FA30: 74 65 28 53 2C 43 6F 6E 73 74 53 74 72 28 55 6E te(S,ConstStr(Un
00FA40: 64 65 72 53 63 6F 72 65 2C 4C 20 2D 20 4C 65 6E derScore,L - Len
00FA50: 67 74 68 28 53 29 29 29 3B 0D 0A 20 20 50 20 3A gth(S)));.. P :
00FA60: 3D 20 30 3B 0D 0A 20 20 72 65 70 65 61 74 0D 0A = 0;.. repeat..
00FA70: 20 20 20 20 47 6F 74 6F 58 59 28 58 20 2B 20 50 GotoXY(X + P
00FA80: 20 2B 20 31 2C 59 20 2B 20 31 29 3B 20 52 65 61 + 1,Y + 1); Rea
00FA90: 64 28 4B 62 64 2C 43 68 29 3B 0D 0A 20 20 20 20 d(Kbd,Ch);..
00FAA0: 63 61 73 65 20 43 68 20 6F 66 0D 0A 20 20 20 20 case Ch of..
00FAB0: 20 20 23 33 32 2E 2E 23 31 32 36 20 3A 20 69 66 #32..#126 : if
00FAC0: 20 50 20 3C 20 4C 20 74 68 65 6E 0D 0A 20 20 20 P < L then..
00FAD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 b
00FAE0: 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 egin..
00FAF0: 20 20 20 20 20 20 20 20 20 20 69 66 20 4C 65 6E if Len
00FB00: 64 64 72 65 73 73 20 31 20 3A 27 29 3B 0D 0A 20 ddress 1 :');..
00FB10: 20 47 6F 74 6F 58 59 28 32 2C 31 31 29 3B 20 57 GotoXY(2,11); W
00FB20: 72 69 74 65 28 27 41 64 64 72 65 73 73 20 32 20 rite('Address 2
00FB30: 3A 27 29 3B 0D 0A 20 20 47 6F 74 6F 58 59 28 36 :');.. GotoXY(6
00FB40: 2C 31 33 29 3B 20 57 72 69 74 65 28 27 50 68 6F ,13); Write('Pho
00FB50: 6E 65 20 3A 27 29 3B 0D 0A 20 20 47 6F 74 6F 58 ne :');.. GotoX
00FB60: 59 28 32 39 2C 31 33 29 3B 20 57 72 69 74 65 28 Y(29,13); Write(
00FB70: 27 45 78 74 65 6E 73 69 6F 6E 20 3A 27 29 3B 0D 'Extension :');.
00FB80: 0A 20 20 47 6F 74 6F 58 59 28 32 2C 31 35 29 3B . GotoXY(2,15);
00FB90: 20 57 72 69 74 65 28 27 52 65 6D 61 72 6B 73 20 Write('Remarks
00FBA0: 31 20 3A 27 29 3B 0D 0A 20 20 47 6F 74 6F 58 59 1 :');.. GotoXY
00FBB0: 28 32 2C 31 36 29 3B 20 57 72 69 74 65 28 27 52 (2,16); Write('R
00FBC0: 65 6D 61 72 6B 73 20 32 20 3A 27 29 3B 0D 0A 20 emarks 2 :');..
00FBD0: 20 47 6F 74 6F 58 59 28 32 2C 31 37 29 3B 20 57 GotoXY(2,17); W
00FBE0: 72 69 74 65 28 27 52 65 6D 61 72 6B 73 20 33 20 rite('Remarks 3
00FBF0: 3A 27 29 3B 0D 0A 65 6E 64 3B 0D 0A 20 0D 0A 28 :');..end;.. ..(
00FC00: 2A 20 20 43 6C 65 61 72 46 6F 72 6D 20 63 6C 65 * ClearForm cle
00FC10: 61 72 73 20 61 6C 6C 20 66 69 65 6C 64 73 20 69 ars all fields i
00FC20: 6E 20 74 68 65 20 65 6E 74 72 79 20 66 6F 72 6D n the entry form
00FC30: 20 2A 29 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 *)....procedure
00FC40: 20 43 6C 65 61 72 46 6F 72 6D 3B 0D 0A 62 65 67 ClearForm;..beg
00FC50: 69 6E 0D 0A 20 20 47 6F 74 6F 58 59 28 31 33 2C in.. GotoXY(13,
00FC60: 35 29 3B 20 57 72 69 74 65 28 27 27 20 3A 31 35 5); Write('' :15
00FC70: 29 3B 0D 0A 20 20 47 6F 74 6F 58 59 28 33 35 2C );.. GotoXY(35,
00FC80: 35 29 3B 20 43 6C 72 45 6F 6C 3B 0D 0A 20 20 47 5); ClrEol;.. G
00FC90: 6F 74 6F 58 59 28 31 33 2C 37 29 3B 20 57 72 69 otoXY(13,7); Wri
00FCA0: 74 65 28 27 27 20 3A 31 35 29 3B 0D 0A 20 20 47 te('' :15);.. G
00FCB0: 6F 74 6F 58 59 28 34 30 2C 37 29 3B 20 43 6C 72 otoXY(40,7); Clr
00FCC0: 45 6F 6C 3B 0D 0A 20 20 47 6F 74 6F 58 59 28 31 Eol;.. GotoXY(1
00FCD0: 33 2C 39 29 3B 20 43 6C 72 45 6F 6C 3B 0D 0A 20 3,9); ClrEol;..
00FCE0: 20 47 6F 74 6F 58 59 28 31 33 2C 31 30 29 3B 20 GotoXY(13,10);
00FCF0: 43 6C 72 45 6F 6C 3B 0D 0A 20 20 47 6F 74 6F 58 ClrEol;.. GotoX
00FD00: 67 74 68 28 53 29 20 3D 20 4C 20 74 68 65 6E 0D gth(S) = L then.
00FD10: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
00FD20: 20 20 20 20 20 20 20 44 65 6C 65 74 65 28 53 2C Delete(S,
00FD30: 4C 2C 31 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 L,1);..
00FD40: 20 20 20 20 20 20 20 20 20 20 20 50 20 3A 3D 20 P :=
00FD50: 50 20 2B 20 31 3B 0D 0A 20 20 20 20 20 20 20 20 P + 1;..
00FD60: 20 20 20 20 20 20 20 20 20 20 20 20 49 6E 73 65 Inse
00FD70: 72 74 28 43 68 2C 53 2C 50 29 3B 0D 0A 20 20 20 rt(Ch,S,P);..
00FD80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00FD90: 20 57 72 69 74 65 28 43 6F 70 79 28 53 2C 50 2C Write(Copy(S,P,
00FDA0: 4C 29 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 L));..
00FDB0: 20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 20 end..
00FDC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 e
00FDD0: 6C 73 65 20 42 65 65 70 3B 0D 0A 20 20 20 20 20 lse Beep;..
00FDE0: 20 5E 53 20 20 20 20 20 20 20 20 3A 20 69 66 20 ^S : if
00FDF0: 50 20 3E 20 30 20 74 68 65 6E 0D 0A 20 20 20 20 P > 0 then..
00FE00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00FE10: 50 20 3A 3D 20 50 20 2D 20 31 0D 0A 20 20 20 20 P := P - 1..
00FE20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C el
00FE30: 73 65 20 42 65 65 70 3B 0D 0A 20 20 20 20 20 20 se Beep;..
00FE40: 5E 44 20 20 20 20 20 20 20 20 3A 20 69 66 20 50 ^D : if P
00FE50: 20 3C 20 4C 65 6E 67 74 68 28 53 29 20 74 68 65 < Length(S) the
00FE60: 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 n..
00FE70: 20 20 20 20 20 20 20 50 20 3A 3D 20 50 20 2B 20 P := P +
00FE80: 31 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 1..
00FE90: 20 20 20 20 20 65 6C 73 65 20 42 65 65 70 3B 0D else Beep;.
00FEA0: 0A 20 20 20 20 20 20 5E 41 20 20 20 20 20 20 20 . ^A
00FEB0: 20 3A 20 50 20 3A 3D 20 30 3B 0D 0A 20 20 20 20 : P := 0;..
00FEC0: 20 20 5E 46 20 20 20 20 20 20 20 20 3A 20 50 20 ^F : P
00FED0: 3A 3D 20 4C 65 6E 67 74 68 28 53 29 3B 0D 0A 20 := Length(S);..
00FEE0: 20 20 20 20 20 5E 47 20 20 20 20 20 20 20 20 3A ^G :
00FEF0: 20 69 66 20 50 20 3C 20 4C 65 6E 67 74 68 28 53 if P < Length(S
00FF00: 59 28 31 33 2C 31 31 29 3B 20 43 6C 72 45 6F 6C Y(13,11); ClrEol
00FF10: 3B 0D 0A 20 20 47 6F 74 6F 58 59 28 31 33 2C 31 ;.. GotoXY(13,1
00FF20: 33 29 3B 20 57 72 69 74 65 28 27 27 20 3A 31 35 3); Write('' :15
00FF30: 29 3B 0D 0A 20 20 47 6F 74 6F 58 59 28 34 30 2C );.. GotoXY(40,
00FF40: 31 33 29 3B 20 43 6C 72 45 6F 6C 3B 0D 0A 20 20 13); ClrEol;..
00FF50: 47 6F 74 6F 58 59 28 31 33 2C 31 35 29 3B 20 43 GotoXY(13,15); C
00FF60: 6C 72 45 6F 6C 3B 0D 0A 20 20 47 6F 74 6F 58 59 lrEol;.. GotoXY
00FF70: 28 31 33 2C 31 36 29 3B 20 43 6C 72 45 6F 6C 3B (13,16); ClrEol;
00FF80: 0D 0A 20 20 47 6F 74 6F 58 59 28 31 33 2C 31 37 .. GotoXY(13,17
00FF90: 29 3B 20 43 6C 72 45 6F 6C 3B 0D 0A 65 6E 64 3B ); ClrEol;..end;
00FFA0: 0D 0A 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 ......procedure
00FFB0: 49 6E 70 75 74 43 75 73 74 28 76 61 72 20 43 75 InputCust(var Cu
00FFC0: 73 74 20 3A 20 43 75 73 74 52 65 63 29 3B 0D 0A st : CustRec);..
00FFD0: 63 6F 6E 73 74 0D 0A 20 20 54 65 72 6D 20 3A 20 const.. Term :
00FFE0: 43 68 61 72 53 65 74 20 20 3D 20 20 5B 5E 45 2C CharSet = [^E,
00FFF0: 5E 49 2C 5E 4D 2C 5E 58 2C 5E 5A 5D 3B 0D 0A 76 ^I,^M,^X,^Z];..v
010000: 61 72 0D 0A 20 20 4C 20 3A 20 49 6E 74 65 67 65 ar.. L : Intege
010010: 72 3B 0D 0A 20 20 54 43 20 3A 20 43 68 61 72 3B r;.. TC : Char;
010020: 0D 0A 62 65 67 69 6E 0D 0A 20 20 4C 20 3A 3D 20 ..begin.. L :=
010030: 31 3B 0D 0A 20 20 77 69 74 68 20 43 75 73 74 20 1;.. with Cust
010040: 64 6F 0D 0A 20 20 72 65 70 65 61 74 0D 0A 20 20 do.. repeat..
010050: 20 20 63 61 73 65 20 4C 20 6F 66 0D 0A 20 20 20 case L of..
010060: 20 20 20 31 20 3A 20 49 6E 70 75 74 53 74 72 28 1 : InputStr(
010070: 43 75 73 74 43 6F 64 65 2C 31 35 2C 31 32 2C 34 CustCode,15,12,4
010080: 2C 54 65 72 6D 2C 54 43 29 3B 0D 0A 20 20 20 20 ,Term,TC);..
010090: 20 20 32 20 3A 20 49 6E 70 75 74 53 74 72 28 45 2 : InputStr(E
0100A0: 6E 74 72 79 44 61 74 65 2C 38 2C 33 34 2C 34 2C ntryDate,8,34,4,
0100B0: 54 65 72 6D 2C 54 43 29 3B 0D 0A 20 20 20 20 20 Term,TC);..
0100C0: 20 33 20 3A 20 49 6E 70 75 74 53 74 72 28 46 69 3 : InputStr(Fi
0100D0: 72 73 74 4E 61 6D 65 2C 31 35 2C 31 32 2C 36 2C rstName,15,12,6,
0100E0: 54 65 72 6D 2C 54 43 29 3B 0D 0A 20 20 20 20 20 Term,TC);..
0100F0: 20 34 20 3A 20 49 6E 70 75 74 53 74 72 28 4C 61 4 : InputStr(La
010100: 29 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20 ) then..
010110: 20 20 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D begin.
010120: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
010130: 20 20 20 20 20 44 65 6C 65 74 65 28 53 2C 50 20 Delete(S,P
010140: 2B 20 31 2C 31 29 3B 0D 0A 20 20 20 20 20 20 20 + 1,1);..
010150: 20 20 20 20 20 20 20 20 20 20 20 20 20 57 72 69 Wri
010160: 74 65 28 43 6F 70 79 28 53 2C 50 20 2B 20 31 2C te(Copy(S,P + 1,
010170: 4C 29 2C 55 6E 64 65 72 53 63 6F 72 65 29 3B 0D L),UnderScore);.
010180: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
010190: 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20 20 5E end;.. ^
0101A0: 48 2C 23 31 32 37 20 20 20 3A 20 69 66 20 50 20 H,#127 : if P
0101B0: 3E 20 30 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 > 0 then..
0101C0: 20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 69 begi
0101D0: 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 n..
0101E0: 20 20 20 20 20 20 20 44 65 6C 65 74 65 28 53 2C Delete(S,
0101F0: 50 2C 31 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 P,1);..
010200: 20 20 20 20 20 20 20 20 20 20 20 57 72 69 74 65 Write
010210: 28 5E 48 2C 43 6F 70 79 28 53 2C 50 2C 4C 29 2C (^H,Copy(S,P,L),
010220: 55 6E 64 65 72 53 63 6F 72 65 29 3B 0D 0A 20 20 UnderScore);..
010230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
010240: 20 20 50 20 3A 3D 20 50 20 2D 20 31 3B 0D 0A 20 P := P - 1;..
010250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
010260: 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 20 20 20 end..
010270: 20 20 20 20 20 20 20 20 65 6C 73 65 20 42 65 65 else Bee
010280: 70 3B 0D 0A 20 20 20 20 20 20 5E 59 20 20 20 20 p;.. ^Y
010290: 20 20 20 20 3A 20 62 65 67 69 6E 0D 0A 20 20 20 : begin..
0102A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0102B0: 20 57 72 69 74 65 28 43 6F 6E 73 74 53 74 72 28 Write(ConstStr(
0102C0: 55 6E 64 65 72 53 63 6F 72 65 2C 4C 65 6E 67 74 UnderScore,Lengt
0102D0: 68 28 53 29 20 2D 20 50 29 29 3B 0D 0A 20 20 20 h(S) - P));..
0102E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0102F0: 20 44 65 6C 65 74 65 28 53 2C 50 20 2B 20 31 2C Delete(S,P + 1,
010300: 73 74 4E 61 6D 65 2C 33 30 2C 33 39 2C 36 2C 54 stName,30,39,6,T
010310: 65 72 6D 2C 54 43 29 3B 0D 0A 20 20 20 20 20 20 erm,TC);..
010320: 35 20 3A 20 49 6E 70 75 74 53 74 72 28 43 6F 6D 5 : InputStr(Com
010330: 70 61 6E 79 2C 34 30 2C 31 32 2C 38 2C 54 65 72 pany,40,12,8,Ter
010340: 6D 2C 54 43 29 3B 0D 0A 20 20 20 20 20 20 36 20 m,TC);.. 6
010350: 3A 20 49 6E 70 75 74 53 74 72 28 41 64 64 72 31 : InputStr(Addr1
010360: 2C 33 30 2C 31 32 2C 39 2C 54 65 72 6D 2C 54 43 ,30,12,9,Term,TC
010370: 29 3B 0D 0A 20 20 20 20 20 20 37 20 3A 20 49 6E );.. 7 : In
010380: 70 75 74 53 74 72 28 41 64 64 72 32 2C 33 30 2C putStr(Addr2,30,
010390: 31 32 2C 31 30 2C 54 65 72 6D 2C 54 43 29 3B 0D 12,10,Term,TC);.
0103A0: 0A 20 20 20 20 20 20 38 20 3A 20 49 6E 70 75 74 . 8 : Input
0103B0: 53 74 72 28 50 68 6F 6E 65 2C 31 35 2C 31 32 2C Str(Phone,15,12,
0103C0: 31 32 2C 54 65 72 6D 2C 54 43 29 3B 0D 0A 20 20 12,Term,TC);..
0103D0: 20 20 20 20 39 20 3A 20 49 6E 70 75 74 53 74 72 9 : InputStr
0103E0: 28 50 68 6F 6E 65 45 78 74 2C 35 2C 33 39 2C 31 (PhoneExt,5,39,1
0103F0: 32 2C 54 65 72 6D 2C 54 43 29 3B 0D 0A 20 20 20 2,Term,TC);..
010400: 20 20 20 31 30 20 3A 20 49 6E 70 75 74 53 74 72 10 : InputStr
010410: 28 52 65 6D 61 72 6B 73 31 2C 34 30 2C 31 32 2C (Remarks1,40,12,
010420: 31 34 2C 54 65 72 6D 2C 54 43 29 3B 0D 0A 20 20 14,Term,TC);..
010430: 20 20 20 20 31 31 20 3A 20 49 6E 70 75 74 53 74 11 : InputSt
010440: 72 28 52 65 6D 61 72 6B 73 32 2C 34 30 2C 31 32 r(Remarks2,40,12
010450: 2C 31 35 2C 54 65 72 6D 2C 54 43 29 3B 0D 0A 20 ,15,Term,TC);..
010460: 20 20 20 20 20 31 32 20 3A 20 49 6E 70 75 74 53 12 : InputS
010470: 74 72 28 52 65 6D 61 72 6B 73 33 2C 34 30 2C 31 tr(Remarks3,40,1
010480: 32 2C 31 36 2C 54 65 72 6D 2C 54 43 29 3B 0D 0A 2,16,Term,TC);..
010490: 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 69 66 end;.. if
0104A0: 20 28 54 43 20 3D 20 5E 49 29 20 6F 72 20 28 54 (TC = ^I) or (T
0104B0: 43 20 3D 20 5E 4D 29 20 6F 72 20 28 54 43 20 3D C = ^M) or (TC =
0104C0: 20 5E 58 29 20 74 68 65 6E 0D 0A 20 20 20 20 20 ^X) then..
0104D0: 20 69 66 20 4C 20 3D 20 31 32 20 74 68 65 6E 0D if L = 12 then.
0104E0: 0A 20 20 20 20 20 20 20 20 4C 20 3A 3D 20 31 0D . L := 1.
0104F0: 0A 20 20 20 20 20 20 65 6C 73 65 20 4C 20 3A 3D . else L :=
010500: 4C 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 L);..
010510: 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 end;..
010520: 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 69 66 20 else.. if
010530: 6E 6F 74 20 28 43 68 20 69 6E 20 54 65 72 6D 29 not (Ch in Term)
010540: 20 74 68 65 6E 20 42 65 65 70 3B 0D 0A 20 20 20 then Beep;..
010550: 20 65 6E 64 3B 20 20 7B 6F 66 20 63 61 73 65 7D end; {of case}
010560: 0D 0A 20 20 75 6E 74 69 6C 20 43 68 20 69 6E 20 .. until Ch in
010570: 54 65 72 6D 3B 0D 0A 20 20 50 20 3A 3D 20 4C 65 Term;.. P := Le
010580: 6E 67 74 68 28 53 29 3B 0D 0A 20 20 47 6F 74 6F ngth(S);.. Goto
010590: 58 59 28 58 20 2B 20 50 20 2B 20 31 2C 59 20 2B XY(X + P + 1,Y +
0105A0: 20 31 29 3B 0D 0A 20 20 57 72 69 74 65 28 27 27 1);.. Write(''
0105B0: 20 3A 4C 20 2D 20 50 29 3B 0D 0A 20 20 54 43 20 :L - P);.. TC
0105C0: 3A 3D 20 43 68 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A := Ch;..end;....
0105D0: 0D 0A 70 72 6F 63 65 64 75 72 65 20 53 65 6C 65 ..procedure Sele
0105E0: 63 74 28 20 20 20 20 50 72 6F 6D 70 74 20 3A 20 ct( Prompt :
0105F0: 53 74 72 38 30 3B 0D 0A 20 20 20 20 20 20 20 20 Str80;..
010600: 20 20 20 20 20 20 20 20 20 20 20 20 20 54 65 72 Ter
010610: 6D 20 20 20 3A 20 43 68 61 72 53 65 74 3B 0D 0A m : CharSet;..
010620: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
010630: 20 76 61 72 20 54 43 20 20 20 20 20 3A 20 43 68 var TC : Ch
010640: 61 72 20 20 20 20 29 3B 0D 0A 76 61 72 0D 0A 20 ar );..var..
010650: 20 43 68 20 3A 20 43 68 61 72 3B 0D 0A 62 65 67 Ch : Char;..beg
010660: 69 6E 0D 0A 20 20 47 6F 74 6F 58 59 28 31 2C 32 in.. GotoXY(1,2
010670: 33 29 3B 20 57 72 69 74 65 28 50 72 6F 6D 70 74 3); Write(Prompt
010680: 2C 27 3F 20 27 20 29 3B 20 43 6C 72 45 6F 6C 3B ,'? ' ); ClrEol;
010690: 0D 0A 20 20 72 65 70 65 61 74 0D 0A 20 20 20 20 .. repeat..
0106A0: 52 65 61 64 28 4B 62 64 2C 43 68 29 3B 0D 0A 20 Read(Kbd,Ch);..
0106B0: 20 20 20 54 43 20 3A 3D 20 55 70 63 61 73 65 28 TC := Upcase(
0106C0: 43 68 29 3B 0D 0A 20 20 20 20 69 66 20 6E 6F 74 Ch);.. if not
0106D0: 20 28 54 43 20 69 6E 20 54 65 72 6D 29 20 74 68 (TC in Term) th
0106E0: 65 6E 0D 0A 20 20 20 20 20 20 42 65 65 70 3B 0D en.. Beep;.
0106F0: 0A 20 20 75 6E 74 69 6C 20 54 43 20 69 6E 20 54 . until TC in T
010700: 20 4C 20 2B 20 31 0D 0A 20 20 20 20 65 6C 73 65 L + 1.. else
010710: 0D 0A 20 20 20 20 20 20 69 66 20 54 43 20 3D 20 .. if TC =
010720: 5E 45 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 ^E then..
010730: 20 69 66 20 4C 20 3D 20 31 20 74 68 65 6E 0D 0A if L = 1 then..
010740: 20 20 20 20 20 20 20 20 20 20 4C 20 3A 3D 20 31 L := 1
010750: 32 0D 0A 20 20 20 20 20 20 20 20 65 6C 73 65 20 2.. else
010760: 4C 20 3A 3D 20 4C 20 2D 20 31 3B 0D 0A 20 20 75 L := L - 1;.. u
010770: 6E 74 69 6C 20 28 54 43 20 3D 20 5E 4D 29 20 61 ntil (TC = ^M) a
010780: 6E 64 20 28 4C 20 3D 20 31 29 20 6F 72 20 28 54 nd (L = 1) or (T
010790: 43 20 3D 20 5E 5A 29 3B 0D 0A 65 6E 64 3B 0D 0A C = ^Z);..end;..
0107A0: 0D 0A 28 2A 20 20 4F 75 74 43 75 73 74 20 64 69 ..(* OutCust di
0107B0: 73 70 6C 61 79 73 20 74 68 65 20 63 75 73 74 6F splays the custo
0107C0: 6D 65 72 20 64 61 74 61 20 63 6F 6E 74 61 69 6E mer data contain
0107D0: 65 64 20 69 6E 20 43 75 73 74 20 2A 29 0D 0A 0D ed in Cust *)...
0107E0: 0A 70 72 6F 63 65 64 75 72 65 20 4F 75 74 43 75 .procedure OutCu
0107F0: 73 74 28 76 61 72 20 43 75 73 74 20 3A 20 43 75 st(var Cust : Cu
010800: 73 74 52 65 63 29 3B 0D 0A 62 65 67 69 6E 0D 0A stRec);..begin..
010810: 20 20 77 69 74 68 20 43 75 73 74 20 64 6F 0D 0A with Cust do..
010820: 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 47 6F 74 begin.. Got
010830: 6F 58 59 28 31 33 2C 35 29 3B 20 57 72 69 74 65 oXY(13,5); Write
010840: 28 43 75 73 74 43 6F 64 65 2C 27 27 20 3A 31 35 (CustCode,'' :15
010850: 20 2D 20 4C 65 6E 67 74 68 28 43 75 73 74 43 6F - Length(CustCo
010860: 64 65 29 29 3B 0D 0A 20 20 20 20 47 6F 74 6F 58 de));.. GotoX
010870: 59 28 33 35 2C 35 29 3B 20 57 72 69 74 65 28 45 Y(35,5); Write(E
010880: 6E 74 72 79 44 61 74 65 29 3B 20 43 6C 72 45 6F ntryDate); ClrEo
010890: 6C 20 3B 0D 0A 20 20 20 20 47 6F 74 6F 58 59 28 l ;.. GotoXY(
0108A0: 31 33 2C 37 29 3B 20 57 72 69 74 65 28 46 69 72 13,7); Write(Fir
0108B0: 73 74 4E 61 6D 65 2C 27 27 20 3A 31 35 20 2D 20 stName,'' :15 -
0108C0: 4C 65 6E 67 74 68 28 46 69 72 73 74 4E 61 6D 65 Length(FirstName
0108D0: 29 29 3B 0D 0A 20 20 20 20 47 6F 74 6F 58 59 28 ));.. GotoXY(
0108E0: 34 30 2C 37 29 3B 20 57 72 69 74 65 28 4C 61 73 40,7); Write(Las
0108F0: 74 4E 61 6D 65 29 3B 20 43 6C 72 45 6F 6C 3B 0D tName); ClrEol;.
010900: 65 72 6D 3B 0D 0A 20 20 57 72 69 74 65 28 43 68 erm;.. Write(Ch
010910: 29 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 28 2A 20 20 );..end;....(*
010920: 43 6C 65 61 72 46 72 61 6D 65 20 63 6C 65 61 72 ClearFrame clear
010930: 73 20 74 68 65 20 64 69 73 70 6C 61 79 20 66 72 s the display fr
010940: 61 6D 65 2C 20 49 2E 45 2E 20 4C 69 6E 65 73 20 ame, I.E. Lines
010950: 33 20 74 6F 20 32 30 20 2A 29 0D 0A 0D 0A 70 72 3 to 20 *)....pr
010960: 6F 63 65 64 75 72 65 20 43 6C 65 61 72 46 72 61 ocedure ClearFra
010970: 6D 65 3B 0D 0A 76 61 72 0D 0A 20 20 49 20 3A 20 me;..var.. I :
010980: 49 6E 74 65 67 65 72 3B 0D 0A 62 65 67 69 6E 0D Integer;..begin.
010990: 0A 20 20 66 6F 72 20 49 20 3A 3D 20 33 20 74 6F . for I := 3 to
0109A0: 20 32 30 20 64 6F 0D 0A 20 20 62 65 67 69 6E 0D 20 do.. begin.
0109B0: 0A 20 20 20 20 47 6F 74 6F 58 59 28 31 2C 49 20 . GotoXY(1,I
0109C0: 2B 20 31 29 3B 20 43 6C 72 45 6F 6C 20 3B 0D 0A + 1); ClrEol ;..
0109D0: 20 20 65 6E 64 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A end;..end;....
0109E0: 28 2A 20 20 4F 75 74 46 6F 72 6D 20 64 69 73 70 (* OutForm disp
0109F0: 6C 61 79 73 20 74 68 65 20 65 6E 74 72 79 20 66 lays the entry f
010A00: 6F 72 6D 20 6F 6E 20 74 68 65 20 73 63 72 65 65 orm on the scree
010A10: 6E 20 2A 29 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 n *)....procedur
010A20: 65 20 4F 75 74 46 6F 72 6D 3B 0D 0A 62 65 67 69 e OutForm;..begi
010A30: 6E 0D 0A 20 20 47 6F 74 6F 58 59 28 37 2C 35 29 n.. GotoXY(7,5)
010A40: 3B 20 57 72 69 74 65 28 27 43 6F 64 65 20 3A 27 ; Write('Code :'
010A50: 29 3B 0D 0A 20 20 47 6F 74 6F 58 59 28 32 39 2C );.. GotoXY(29,
010A60: 35 29 3B 20 57 72 69 74 65 28 27 44 61 74 65 20 5); Write('Date
010A70: 3A 27 29 3B 0D 0A 20 20 47 6F 74 6F 58 59 28 31 :');.. GotoXY(1
010A80: 2C 37 29 3B 20 57 72 69 74 65 28 27 46 69 72 73 ,7); Write('Firs
010A90: 74 20 6E 61 6D 65 20 3A 27 29 3B 0D 0A 20 20 47 t name :');.. G
010AA0: 6F 74 6F 58 59 28 32 39 2C 37 29 3B 20 57 72 69 otoXY(29,7); Wri
010AB0: 74 65 28 27 4C 61 73 74 20 6E 61 6D 65 20 3A 27 te('Last name :'
010AC0: 29 3B 0D 0A 20 20 47 6F 74 6F 58 59 28 34 2C 39 );.. GotoXY(4,9
010AD0: 29 3B 20 57 72 69 74 65 28 27 43 6F 6D 70 61 6E ); Write('Compan
010AE0: 79 20 3A 27 29 3B 0D 0A 20 20 47 6F 74 6F 58 59 y :');.. GotoXY
010AF0: 28 32 2C 31 30 29 3B 20 57 72 69 74 65 28 27 41 (2,10); Write('A
010B00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
010B10: 0E 00 01 00 02 09 52 E5 0E 00 41 02 00 00 00 02 ......R...A.....
010B20: 0E 00 46 02 00 00 00 02 0E 00 42 02 00 00 00 02 ..F.......B.....
010B30: 0E 00 47 02 00 00 00 02 0E 00 43 02 00 00 00 02 ..G.......C.....
010B40: 0E 00 48 02 00 00 00 02 0E 00 44 02 00 00 00 02 ..H.......D.....
010B50: 0E 00 49 02 00 00 00 02 0E 00 45 02 00 00 00 02 ..I.......E.....
010B60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010B70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010B80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010B90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010BA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010BB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010BC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010BD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010BE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010BF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010C00: 0A 20 20 20 20 47 6F 74 6F 58 59 28 31 33 2C 39 . GotoXY(13,9
010C10: 29 3B 20 57 72 69 74 65 28 43 6F 6D 70 61 6E 79 ); Write(Company
010C20: 29 3B 20 43 6C 72 45 6F 6C 3B 0D 0A 20 20 20 20 ); ClrEol;..
010C30: 47 6F 74 6F 58 59 28 31 33 2C 31 30 29 3B 20 57 GotoXY(13,10); W
010C40: 72 69 74 65 28 41 64 64 72 31 29 3B 20 43 6C 72 rite(Addr1); Clr
010C50: 45 6F 6C 3B 0D 0A 20 20 20 20 47 6F 74 6F 58 59 Eol;.. GotoXY
010C60: 28 31 33 2C 31 31 29 3B 20 57 72 69 74 65 28 41 (13,11); Write(A
010C70: 64 64 72 32 29 3B 20 43 6C 72 45 6F 6C 3B 0D 0A ddr2); ClrEol;..
010C80: 20 20 20 20 47 6F 74 6F 58 59 28 31 33 2C 31 33 GotoXY(13,13
010C90: 29 3B 20 57 72 69 74 65 28 50 68 6F 6E 65 2C 27 ); Write(Phone,'
010CA0: 27 20 3A 31 35 20 2D 20 4C 65 6E 67 74 68 28 50 ' :15 - Length(P
010CB0: 68 6F 6E 65 29 29 3B 0D 0A 20 20 20 20 47 6F 74 hone));.. Got
010CC0: 6F 58 59 28 34 30 2C 31 33 29 3B 20 57 72 69 74 oXY(40,13); Writ
010CD0: 65 28 50 68 6F 6E 65 45 78 74 29 3B 20 43 6C 72 e(PhoneExt); Clr
010CE0: 45 6F 6C 3B 0D 0A 20 20 20 20 47 6F 74 6F 58 59 Eol;.. GotoXY
010CF0: 28 31 33 2C 31 35 29 3B 20 57 72 69 74 65 28 52 (13,15); Write(R
010D00: 65 6D 61 72 6B 73 31 29 3B 20 43 6C 72 45 6F 6C emarks1); ClrEol
010D10: 3B 0D 0A 20 20 20 20 47 6F 74 6F 58 59 28 31 33 ;.. GotoXY(13
010D20: 2C 31 36 29 3B 20 57 72 69 74 65 28 52 65 6D 61 ,16); Write(Rema
010D30: 72 6B 73 32 29 3B 20 43 6C 72 45 6F 6C 3B 0D 0A rks2); ClrEol;..
010D40: 20 20 20 20 47 6F 74 6F 58 59 28 31 33 2C 31 37 GotoXY(13,17
010D50: 29 3B 20 57 72 69 74 65 28 52 65 6D 61 72 6B 73 ); Write(Remarks
010D60: 33 29 3B 20 43 6C 72 45 6F 6C 3B 0D 0A 20 20 65 3); ClrEol;.. e
010D70: 6E 64 3B 0D 0A 65 6E 64 3B 0D 0A 20 0D 0A 1A 1A nd;..end;.. ....
010D80: 6E 74 72 79 44 61 74 65 29 3B 20 43 6C 72 45 6F ntryDate); ClrEo
010D90: 6C 20 3B 0D 0A 20 20 20 20 47 6F 74 6F 58 59 28 l ;.. GotoXY(
010DA0: 31 33 2C 37 29 3B 20 57 72 69 74 65 28 46 69 72 13,7); Write(Fir
010DB0: 73 74 4E 61 6D 65 2C 27 27 20 3A 31 35 20 2D 20 stName,'' :15 -
010DC0: 4C 65 6E 67 74 68 28 46 69 72 73 74 4E 61 6D 65 Length(FirstName
010DD0: 29 29 3B 0D 0A 20 20 20 20 47 6F 74 6F 58 59 28 ));.. GotoXY(
010DE0: 34 30 2C 37 29 3B 20 57 72 69 74 65 28 4C 61 73 40,7); Write(Las
010DF0: 74 4E 61 6D 65 29 3B 20 43 6C 72 45 6F 6C 3B 0D tName); ClrEol;.
010E00: 0D 0A 20 20 20 20 20 20 20 20 20 20 4F 75 74 43 .. OutC
010E10: 75 73 74 28 43 75 73 74 29 3B 0D 0A 20 20 20 20 ust(Cust);..
010E20: 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 20 end..
010E30: 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 20 20 62 else.. b
010E40: 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 egin..
010E50: 47 6F 74 6F 58 59 28 36 2C 31 39 29 3B 0D 0A 20 GotoXY(6,19);..
010E60: 20 20 20 20 20 20 20 20 20 57 72 69 74 65 28 27 Write('
010E70: 45 52 52 4F 52 20 3A 20 43 75 73 74 6F 6D 65 72 ERROR : Customer
010E80: 20 63 6F 64 65 20 6E 6F 74 20 66 6F 75 6E 64 27 code not found'
010E90: 29 3B 20 42 65 65 70 3B 0D 0A 20 20 20 20 20 20 ); Beep;..
010EA0: 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20 20 65 6E end;.. en
010EB0: 64 3B 0D 0A 20 20 20 20 75 6E 74 69 6C 20 4F 4B d;.. until OK
010EC0: 20 6F 72 20 28 43 63 6F 64 65 20 3D 20 27 27 29 or (Ccode = '')
010ED0: 3B 0D 0A 20 20 20 20 47 6F 74 6F 58 59 28 36 2C ;.. GotoXY(6,
010EE0: 31 39 29 3B 20 43 6C 72 45 6F 6C 3B 0D 0A 20 20 19); ClrEol;..
010EF0: 20 20 69 66 20 43 63 6F 64 65 20 3D 20 27 27 20 if Ccode = ''
010F00: 74 68 65 6E 0D 0A 20 20 20 20 62 65 67 69 6E 0D then.. begin.
010F10: 0A 20 20 20 20 20 20 4C 20 3A 3D 20 31 3B 20 0D . L := 1; .
010F20: 0A 20 20 20 20 20 20 46 69 72 73 74 4E 6D 20 3A . FirstNm :
010F30: 3D 20 27 27 3B 20 0D 0A 20 20 20 20 20 20 4C 61 = ''; .. La
010F40: 73 74 4E 6D 20 3A 3D 20 27 27 3B 0D 0A 20 20 20 stNm := '';..
010F50: 20 20 20 72 65 70 65 61 74 0D 0A 20 20 20 20 20 repeat..
010F60: 20 20 20 63 61 73 65 20 4C 20 6F 66 0D 0A 20 20 case L of..
010F70: 20 20 20 20 20 20 20 20 31 20 3A 20 49 6E 70 75 1 : Inpu
010F80: 74 53 74 72 28 46 69 72 73 74 4E 6D 2C 31 35 2C tStr(FirstNm,15,
010F90: 31 32 2C 36 2C 5B 5E 49 2C 5E 4D 2C 5E 5A 5D 2C 12,6,[^I,^M,^Z],
010FA0: 54 43 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 TC);..
010FB0: 32 20 3A 20 49 6E 70 75 74 53 74 72 28 4C 61 73 2 : InputStr(Las
010FC0: 74 4E 6D 2C 33 30 2C 33 39 2C 36 2C 5B 5E 49 2C tNm,30,39,6,[^I,
010FD0: 5E 4D 2C 5E 5A 5D 2C 54 43 29 3B 0D 0A 20 20 20 ^M,^Z],TC);..
010FE0: 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20 end;..
010FF0: 20 20 20 69 66 20 28 54 43 20 3D 20 5E 49 29 20 if (TC = ^I)
011000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0110A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0110B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0110C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0110D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0110E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0110F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0111A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0111B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0111C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0111D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0111E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0111F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
011200: 6F 72 20 28 54 43 20 3D 20 5E 4D 29 20 74 68 65 or (TC = ^M) the
011210: 6E 20 0D 0A 20 20 20 20 20 20 20 20 20 20 4C 20 n .. L
011220: 3A 3D 20 33 20 2D 20 4C 3B 0D 0A 20 20 20 20 20 := 3 - L;..
011230: 20 75 6E 74 69 6C 20 28 54 43 20 3D 20 5E 4D 29 until (TC = ^M)
011240: 20 61 6E 64 20 28 4C 20 3D 20 31 29 20 6F 72 20 and (L = 1) or
011250: 28 54 43 20 3D 20 5E 5A 29 3B 0D 0A 20 20 20 20 (TC = ^Z);..
011260: 20 20 4B 65 79 4E 20 3A 3D 20 4B 65 79 46 72 6F KeyN := KeyFro
011270: 6D 4E 61 6D 65 28 4C 61 73 74 4E 6D 2C 46 69 72 mName(LastNm,Fir
011280: 73 74 4E 6D 29 3B 20 0D 0A 20 20 20 20 20 20 53 stNm); .. S
011290: 65 61 72 63 68 4B 65 79 28 4E 61 6D 65 49 6E 64 earchKey(NameInd
0112A0: 65 78 46 69 6C 65 2C 20 44 2C 4B 65 79 4E 29 3B exFile, D,KeyN);
0112B0: 0D 0A 20 20 20 20 20 20 69 66 20 6E 6F 74 20 4F .. if not O
0112C0: 4B 20 74 68 65 6E 20 0D 0A 20 20 20 20 20 20 20 K then ..
0112D0: 20 50 72 65 76 4B 65 79 28 4E 61 6D 65 49 6E 64 PrevKey(NameInd
0112E0: 65 78 46 69 6C 65 2C 44 2C 4B 65 79 4E 29 3B 0D exFile,D,KeyN);.
0112F0: 0A 20 20 20 20 20 20 72 65 70 65 61 74 0D 0A 20 . repeat..
011300: 20 20 20 20 20 20 20 47 65 74 52 65 63 28 44 61 GetRec(Da
011310: 74 46 2C 44 2C 43 75 73 74 29 3B 20 0D 0A 20 20 tF,D,Cust); ..
011320: 20 20 20 20 20 20 4F 75 74 43 75 73 74 28 43 75 OutCust(Cu
011330: 73 74 29 3B 0D 0A 20 20 20 20 20 20 20 20 53 65 st);.. Se
011340: 6C 65 63 74 28 27 46 69 6E 64 20 3A 20 4E 29 65 lect('Find : N)e
011350: 78 74 2C 20 50 29 72 65 76 69 6F 75 73 2C 20 51 xt, P)revious, Q
011360: 29 75 69 74 27 2C 5B 27 4E 27 2C 27 50 27 2C 27 )uit',['N','P','
011370: 51 27 5D 2C 43 68 29 3B 0D 0A 20 20 20 20 20 20 Q'],Ch);..
011380: 20 20 63 61 73 65 20 43 68 20 6F 66 0D 0A 20 20 case Ch of..
011390: 20 20 20 20 20 20 20 20 27 4E 27 20 3A 20 72 65 'N' : re
0113A0: 70 65 61 74 20 4E 65 78 74 4B 65 79 28 4E 61 6D peat NextKey(Nam
0113B0: 65 49 6E 64 65 78 46 69 6C 65 2C 20 44 2C 4B 65 eIndexFile, D,Ke
0113C0: 79 4E 29 20 75 6E 74 69 6C 20 4F 4B 3B 0D 0A 20 yN) until OK;..
0113D0: 20 20 20 20 20 20 20 20 20 27 50 27 20 3A 20 72 'P' : r
0113E0: 65 70 65 61 74 20 50 72 65 76 4B 65 79 28 4E 61 epeat PrevKey(Na
0113F0: 6D 65 49 6E 64 65 78 46 69 6C 65 2C 20 44 2C 4B meIndexFile, D,K
011400: 0D 0A 66 75 6E 63 74 69 6F 6E 20 4B 65 79 46 72 ..function KeyFr
011410: 6F 6D 4E 61 6D 65 28 4C 61 73 74 4E 6D 20 3A 20 omName(LastNm :
011420: 53 74 72 31 35 3B 20 46 69 72 73 74 4E 6D 20 3A Str15; FirstNm :
011430: 20 53 74 72 31 30 29 20 3A 20 53 74 72 32 35 3B Str10) : Str25;
011440: 0D 0A 63 6F 6E 73 74 0D 0A 20 20 42 6C 61 6E 6B ..const.. Blank
011450: 73 20 20 3D 20 20 27 20 20 20 20 20 20 20 20 20 s = '
011460: 20 20 20 20 20 20 27 3B 0D 0A 62 65 67 69 6E 0D ';..begin.
011470: 0A 20 20 4B 65 79 46 72 6F 6D 4E 61 6D 65 20 3A . KeyFromName :
011480: 3D 20 55 70 63 61 73 65 53 74 72 28 4C 61 73 74 = UpcaseStr(Last
011490: 4E 6D 29 20 2B 0D 0A 20 20 20 20 20 20 20 20 20 Nm) +..
0114A0: 20 20 20 20 20 20 20 20 43 6F 70 79 28 42 6C 61 Copy(Bla
0114B0: 6E 6B 73 2C 31 2C 31 35 20 2D 20 4C 65 6E 67 74 nks,1,15 - Lengt
0114C0: 68 28 4C 61 73 74 4E 6D 29 29 20 2B 0D 0A 20 20 h(LastNm)) +..
0114D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 U
0114E0: 70 63 61 73 65 53 74 72 28 46 69 72 73 74 4E 6D pcaseStr(FirstNm
0114F0: 29 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 28 2A 20 20 );..end;....(*
011500: 55 70 64 61 74 65 20 69 73 20 75 73 65 64 20 74 Update is used t
011510: 6F 20 75 70 64 61 74 65 20 74 68 65 20 64 61 74 o update the dat
011520: 61 20 62 61 73 65 20 2A 29 0D 0A 0D 0A 70 72 6F a base *)....pro
011530: 63 65 64 75 72 65 20 55 70 64 61 74 65 3B 0D 0A cedure Update;..
011540: 76 61 72 0D 0A 20 20 43 68 20 3A 20 43 68 61 72 var.. Ch : Char
011550: 3B 0D 0A 0D 0A 28 2A 20 20 41 64 64 20 69 73 20 ;....(* Add is
011560: 75 73 65 64 20 74 6F 20 61 64 64 20 63 75 73 74 used to add cust
011570: 6F 6D 65 72 73 20 2A 29 0D 0A 0D 0A 70 72 6F 63 omers *)....proc
011580: 65 64 75 72 65 20 41 64 64 3B 0D 0A 76 61 72 0D edure Add;..var.
011590: 0A 20 20 44 61 74 61 46 20 3A 20 49 6E 74 65 67 . DataF : Integ
0115A0: 65 72 3B 0D 0A 20 20 43 63 6F 64 65 20 3A 20 73 er;.. Ccode : s
0115B0: 74 72 69 6E 67 5B 31 35 5D 3B 0D 0A 20 20 4B 65 tring[15];.. Ke
0115C0: 79 4E 20 20 3A 20 73 74 72 69 6E 67 5B 32 35 5D yN : string[25]
0115D0: 3B 0D 0A 20 20 43 75 73 74 20 20 3A 20 43 75 73 ;.. Cust : Cus
0115E0: 74 52 65 63 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 tRec;..begin..
0115F0: 77 69 74 68 20 43 75 73 74 20 64 6F 0D 0A 20 20 with Cust do..
011600: 65 79 4E 29 20 75 6E 74 69 6C 20 4F 4B 3B 0D 0A eyN) until OK;..
011610: 20 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 end;..
011620: 20 20 20 20 75 6E 74 69 6C 20 43 68 20 3D 20 27 until Ch = '
011630: 51 27 3B 0D 0A 20 20 20 20 65 6E 64 3B 0D 0A 20 Q';.. end;..
011640: 20 20 20 53 65 6C 65 63 74 28 27 46 69 6E 64 20 Select('Find
011650: 3A 20 45 29 64 69 74 2C 20 44 29 65 6C 65 74 65 : E)dit, D)elete
011660: 2C 20 51 29 75 69 74 27 2C 5B 27 45 27 2C 27 44 , Q)uit',['E','D
011670: 27 2C 27 51 27 5D 2C 43 68 29 3B 0D 0A 20 20 20 ','Q'],Ch);..
011680: 20 77 69 74 68 20 43 75 73 74 20 64 6F 0D 0A 20 with Cust do..
011690: 20 20 20 63 61 73 65 20 43 68 20 6F 66 0D 0A 20 case Ch of..
0116A0: 20 20 20 20 20 27 45 27 20 3A 20 62 65 67 69 6E 'E' : begin
0116B0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
0116C0: 50 43 6F 64 65 20 3A 3D 20 43 75 73 74 43 6F 64 PCode := CustCod
0116D0: 65 3B 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 e; ..
0116E0: 20 20 20 50 4E 6D 20 3A 3D 20 4B 65 79 46 72 6F PNm := KeyFro
0116F0: 6D 4E 61 6D 65 28 4C 61 73 74 4E 61 6D 65 2C 46 mName(LastName,F
011700: 69 72 73 74 4E 61 6D 65 29 3B 0D 0A 20 20 20 20 irstName);..
011710: 20 20 20 20 20 20 20 20 20 20 72 65 70 65 61 74 repeat
011720: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
011730: 20 20 49 6E 70 75 74 43 75 73 74 28 43 75 73 74 InputCust(Cust
011740: 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 );..
011750: 20 20 20 20 69 66 20 43 75 73 74 43 6F 64 65 20 if CustCode
011760: 3D 20 50 43 6F 64 65 20 74 68 65 6E 20 0D 0A 20 = PCode then ..
011770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
011780: 20 4F 4B 20 3A 3D 20 66 61 6C 73 65 0D 0A 20 20 OK := false..
011790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6C el
0117A0: 73 65 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 se..
0117B0: 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 begin..
0117C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 43 63 6F Cco
0117D0: 64 65 20 3A 3D 20 43 75 73 74 43 6F 64 65 3B 20 de := CustCode;
0117E0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
0117F0: 20 20 20 20 46 69 6E 64 4B 65 79 28 43 6F 64 65 FindKey(Code
011800: 62 65 67 69 6E 0D 0A 20 20 20 20 46 69 6C 6C 43 begin.. FillC
011810: 68 61 72 28 43 75 73 74 2C 53 69 7A 65 4F 66 28 har(Cust,SizeOf(
011820: 43 75 73 74 29 2C 30 29 3B 0D 0A 20 20 20 20 72 Cust),0);.. r
011830: 65 70 65 61 74 0D 0A 20 20 20 20 20 20 49 6E 70 epeat.. Inp
011840: 75 74 43 75 73 74 28 43 75 73 74 29 3B 0D 0A 20 utCust(Cust);..
011850: 20 20 20 20 20 43 63 6F 64 65 20 3A 3D 20 43 75 Ccode := Cu
011860: 73 74 43 6F 64 65 3B 0D 0A 20 20 20 20 20 20 46 stCode;.. F
011870: 69 6E 64 4B 65 79 28 43 6F 64 65 49 6E 64 65 78 indKey(CodeIndex
011880: 46 69 6C 65 2C 20 44 61 74 61 46 2C 43 63 6F 64 File, DataF,Ccod
011890: 65 29 3B 0D 0A 20 20 20 20 20 20 69 66 20 4F 4B e);.. if OK
0118A0: 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 62 65 67 then.. beg
0118B0: 69 6E 0D 0A 20 20 20 20 20 20 20 20 47 6F 74 6F in.. Goto
0118C0: 58 59 28 36 2C 31 39 29 3B 0D 0A 20 20 20 20 20 XY(6,19);..
0118D0: 20 20 20 57 72 69 74 65 28 27 45 52 52 4F 52 20 Write('ERROR
0118E0: 3A 20 44 75 70 6C 69 63 61 74 65 20 63 75 73 74 : Duplicate cust
0118F0: 6F 6D 65 72 20 63 6F 64 65 27 29 3B 0D 0A 20 20 omer code');..
011900: 20 20 20 20 20 20 42 65 65 70 3B 0D 0A 20 20 20 Beep;..
011910: 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 75 6E 74 end;.. unt
011920: 69 6C 20 6E 6F 74 20 4F 4B 3B 0D 0A 20 20 20 20 il not OK;..
011930: 41 64 64 52 65 63 28 44 61 74 46 2C 44 61 74 61 AddRec(DatF,Data
011940: 46 2C 43 75 73 74 29 3B 0D 0A 20 20 20 20 41 64 F,Cust);.. Ad
011950: 64 4B 65 79 28 43 6F 64 65 49 6E 64 65 78 46 69 dKey(CodeIndexFi
011960: 6C 65 2C 20 44 61 74 61 46 2C 43 75 73 74 43 6F le, DataF,CustCo
011970: 64 65 29 3B 0D 0A 20 20 20 20 4B 65 79 4E 20 3A de);.. KeyN :
011980: 3D 20 4B 65 79 46 72 6F 6D 4E 61 6D 65 28 4C 61 = KeyFromName(La
011990: 73 74 4E 61 6D 65 2C 46 69 72 73 74 4E 61 6D 65 stName,FirstName
0119A0: 29 3B 0D 0A 20 20 20 20 41 64 64 4B 65 79 28 4E );.. AddKey(N
0119B0: 61 6D 65 49 6E 64 65 78 46 69 6C 65 2C 20 44 61 ameIndexFile, Da
0119C0: 74 61 46 2C 4B 65 79 4E 29 3B 0D 0A 20 20 20 20 taF,KeyN);..
0119D0: 47 6F 74 6F 58 59 28 36 2C 31 39 29 3B 20 43 6C GotoXY(6,19); Cl
0119E0: 72 45 6F 6C 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 65 rEol;.. end;..e
0119F0: 6E 64 3B 0D 0A 20 0D 0A 28 2A 20 20 46 69 6E 64 nd;.. ..(* Find
011A00: 49 6E 64 65 78 46 69 6C 65 2C 20 49 2C 43 63 6F IndexFile, I,Cco
011A10: 64 65 29 3B 20 0D 0A 20 20 20 20 20 20 20 20 20 de); ..
011A20: 20 20 20 20 20 20 20 20 20 69 66 20 4F 4B 20 74 if OK t
011A30: 68 65 6E 20 42 65 65 70 3B 0D 0A 20 20 20 20 20 hen Beep;..
011A40: 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 3B 0D end;.
011A50: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 75 . u
011A60: 6E 74 69 6C 20 6E 6F 74 20 4F 4B 3B 0D 0A 20 20 ntil not OK;..
011A70: 20 20 20 20 20 20 20 20 20 20 20 20 50 75 74 52 PutR
011A80: 65 63 28 44 61 74 46 2C 44 2C 43 75 73 74 29 3B ec(DatF,D,Cust);
011A90: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
011AA0: 69 66 20 43 75 73 74 43 6F 64 65 20 3C 3E 20 50 if CustCode <> P
011AB0: 43 6F 64 65 20 74 68 65 6E 0D 0A 20 20 20 20 20 Code then..
011AC0: 20 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A begin..
011AD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
011AE0: 44 65 6C 65 74 65 4B 65 79 28 43 6F 64 65 49 6E DeleteKey(CodeIn
011AF0: 64 65 78 46 69 6C 65 2C 20 44 2C 50 43 6F 64 65 dexFile, D,PCode
011B00: 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 );..
011B10: 20 20 20 20 41 64 64 4B 65 79 28 43 6F 64 65 49 AddKey(CodeI
011B20: 6E 64 65 78 46 69 6C 65 2C 20 44 2C 43 75 73 74 ndexFile, D,Cust
011B30: 43 6F 64 65 29 3B 0D 0A 20 20 20 20 20 20 20 20 Code);..
011B40: 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 end;..
011B50: 20 20 20 20 20 20 20 20 20 20 4B 65 79 4E 20 3A KeyN :
011B60: 3D 20 4B 65 79 46 72 6F 6D 4E 61 6D 65 28 4C 61 = KeyFromName(La
011B70: 73 74 4E 61 6D 65 2C 46 69 72 73 74 4E 61 6D 65 stName,FirstName
011B80: 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 );..
011B90: 20 20 69 66 20 4B 65 79 4E 20 3C 3E 20 50 4E 6D if KeyN <> PNm
011BA0: 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20 20 then..
011BB0: 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 begin..
011BC0: 20 20 20 20 20 20 20 20 20 20 20 20 44 65 6C 65 Dele
011BD0: 74 65 4B 65 79 28 4E 61 6D 65 49 6E 64 65 78 46 teKey(NameIndexF
011BE0: 69 6C 65 2C 20 44 2C 50 4E 6D 29 3B 0D 0A 20 20 ile, D,PNm);..
011BF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 64 Ad
011C00: 20 69 73 20 75 73 65 64 20 74 6F 20 66 69 6E 64 is used to find
011C10: 2C 20 65 64 69 74 20 61 6E 64 20 64 65 6C 65 74 , edit and delet
011C20: 65 20 63 75 73 74 6F 6D 65 72 73 20 2A 29 0D 0A e customers *)..
011C30: 0D 0A 70 72 6F 63 65 64 75 72 65 20 46 69 6E 64 ..procedure Find
011C40: 3B 0D 0A 76 61 72 0D 0A 20 20 44 2C 4C 2C 49 20 ;..var.. D,L,I
011C50: 20 20 3A 20 49 6E 74 65 67 65 72 3B 0D 0A 20 20 : Integer;..
011C60: 43 68 2C 0D 0A 20 20 54 43 20 20 20 20 20 20 3A Ch,.. TC :
011C70: 20 43 68 61 72 3B 0D 0A 20 20 43 63 6F 64 65 2C Char;.. Ccode,
011C80: 0D 0A 20 20 50 43 6F 64 65 2C 0D 0A 20 20 46 69 .. PCode,.. Fi
011C90: 72 73 74 4E 6D 20 3A 20 73 74 72 69 6E 67 5B 31 rstNm : string[1
011CA0: 35 5D 3B 0D 0A 20 20 4B 65 79 4E 2C 0D 0A 20 20 5];.. KeyN,..
011CB0: 50 4E 6D 20 20 20 20 20 3A 20 73 74 72 69 6E 67 PNm : string
011CC0: 5B 32 35 5D 3B 0D 0A 20 20 4C 61 73 74 4E 6D 20 [25];.. LastNm
011CD0: 20 3A 20 73 74 72 69 6E 67 5B 33 30 5D 3B 0D 0A : string[30];..
011CE0: 20 20 43 75 73 74 20 20 20 20 3A 20 43 75 73 74 Cust : Cust
011CF0: 52 65 63 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 69 Rec;..begin.. i
011D00: 66 20 55 73 65 64 52 65 63 73 28 44 61 74 46 29 f UsedRecs(DatF)
011D10: 20 3E 20 30 20 74 68 65 6E 0D 0A 20 20 62 65 67 > 0 then.. beg
011D20: 69 6E 0D 0A 20 20 20 20 43 63 6F 64 65 20 3A 3D in.. Ccode :=
011D30: 20 27 27 3B 0D 0A 20 20 20 20 72 65 70 65 61 74 '';.. repeat
011D40: 0D 0A 20 20 20 20 20 20 49 6E 70 75 74 53 74 72 .. InputStr
011D50: 28 43 63 6F 64 65 2C 31 35 2C 31 32 2C 34 2C 5B (Ccode,15,12,4,[
011D60: 5E 4D 2C 5E 5A 5D 2C 54 43 29 3B 0D 0A 20 20 20 ^M,^Z],TC);..
011D70: 20 20 20 69 66 20 43 63 6F 64 65 20 3C 3E 20 27 if Ccode <> '
011D80: 27 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 62 65 ' then.. be
011D90: 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 46 69 6E gin.. Fin
011DA0: 64 4B 65 79 28 43 6F 64 65 49 6E 64 65 78 46 69 dKey(CodeIndexFi
011DB0: 6C 65 2C 44 2C 43 63 6F 64 65 29 3B 0D 0A 20 20 le,D,Ccode);..
011DC0: 20 20 20 20 20 20 69 66 20 4F 4B 20 74 68 65 6E if OK then
011DD0: 0D 0A 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D .. begin.
011DE0: 0A 20 20 20 20 20 20 20 20 20 20 47 65 74 52 65 . GetRe
011DF0: 63 28 44 61 74 46 2C 44 2C 43 75 73 74 29 3B 20 c(DatF,D,Cust);
011E00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
011E10: 0F 00 01 00 02 09 52 E5 0F 00 41 02 00 00 00 02 ......R...A.....
011E20: 0F 00 46 02 00 00 00 02 0F 00 42 02 00 00 00 02 ..F.......B.....
011E30: 0F 00 47 02 00 00 00 02 0F 00 43 02 00 00 00 02 ..G.......C.....
011E40: 0F 00 48 02 00 00 00 02 0F 00 44 02 00 00 00 02 ..H.......D.....
011E50: 0F 00 49 02 00 00 00 02 0F 00 45 02 00 00 00 02 ..I.......E.....
011E60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011E70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011E80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011E90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011EA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011EB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011EC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011ED0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011EE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011EF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011F00: 64 4B 65 79 28 4E 61 6D 65 49 6E 64 65 78 46 69 dKey(NameIndexFi
011F10: 6C 65 2C 20 44 2C 4B 65 79 4E 29 3B 0D 0A 20 20 le, D,KeyN);..
011F20: 20 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 3B end;
011F30: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 65 6E .. en
011F40: 64 3B 0D 0A 20 20 20 20 20 20 27 44 27 20 3A 20 d;.. 'D' :
011F50: 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 begin..
011F60: 20 20 20 20 20 44 65 6C 65 74 65 4B 65 79 28 43 DeleteKey(C
011F70: 6F 64 65 49 6E 64 65 78 46 69 6C 65 2C 44 2C 43 odeIndexFile,D,C
011F80: 75 73 74 43 6F 64 65 29 3B 0D 0A 20 20 20 20 20 ustCode);..
011F90: 20 20 20 20 20 20 20 20 20 4B 65 79 4E 20 3A 3D KeyN :=
011FA0: 20 4B 65 79 46 72 6F 6D 4E 61 6D 65 28 4C 61 73 KeyFromName(Las
011FB0: 74 4E 61 6D 65 2C 46 69 72 73 74 4E 61 6D 65 29 tName,FirstName)
011FC0: 3B 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 ; ..
011FD0: 20 20 44 65 6C 65 74 65 4B 65 79 28 4E 61 6D 65 DeleteKey(Name
011FE0: 49 6E 64 65 78 46 69 6C 65 2C 44 2C 4B 65 79 4E IndexFile,D,KeyN
011FF0: 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 );..
012000: 20 20 44 65 6C 65 74 65 52 65 63 28 44 61 74 46 DeleteRec(DatF
012010: 2C 44 29 3B 0D 0A 20 20 20 20 20 20 65 6E 64 3B ,D);.. end;
012020: 0D 0A 20 20 20 20 65 6E 64 3B 0D 0A 20 20 65 6E .. end;.. en
012030: 64 20 7B 20 6F 66 20 55 73 65 64 52 65 63 73 28 d { of UsedRecs(
012040: 44 61 74 46 29 20 3E 20 30 20 2E 2E 20 7D 0D 0A DatF) > 0 .. }..
012050: 20 20 65 6C 73 65 20 42 65 65 70 3B 0D 0A 65 6E else Beep;..en
012060: 64 3B 0D 0A 0D 0A 62 65 67 69 6E 28 2A 20 55 70 d;....begin(* Up
012070: 64 61 74 65 2A 29 0D 0A 20 20 4F 75 74 46 6F 72 date*).. OutFor
012080: 6D 3B 0D 0A 20 20 72 65 70 65 61 74 0D 0A 20 20 m;.. repeat..
012090: 20 20 53 65 6C 65 63 74 28 27 55 70 64 61 74 65 Select('Update
0120A0: 20 3A 20 41 29 64 64 2C 20 46 29 69 6E 64 2C 20 : A)dd, F)ind,
0120B0: 51 29 75 69 74 27 2C 5B 27 41 27 2C 27 46 27 2C Q)uit',['A','F',
0120C0: 27 51 27 5D 2C 43 68 29 3B 0D 0A 20 20 20 20 63 'Q'],Ch);.. c
0120D0: 61 73 65 20 43 68 20 6F 66 0D 0A 20 20 20 20 20 ase Ch of..
0120E0: 20 27 41 27 20 3A 20 41 64 64 3B 0D 0A 20 20 20 'A' : Add;..
0120F0: 20 20 20 27 46 27 20 3A 20 46 69 6E 64 3B 0D 0A 'F' : Find;..
012100: 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 4C .. L
012110: 20 3A 3D 20 33 3B 0D 0A 20 20 20 20 20 20 20 20 := 3;..
012120: 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20 20 20 20 end;..
012130: 20 20 47 6F 74 6F 58 59 28 31 2C 4C 20 2B 20 31 GotoXY(1,L + 1
012140: 29 3B 20 57 72 69 74 65 28 43 75 73 74 43 6F 64 ); Write(CustCod
012150: 65 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 47 e);.. G
012160: 6F 74 6F 58 59 28 31 37 2C 4C 20 2B 20 31 29 3B otoXY(17,L + 1);
012170: 20 57 72 69 74 65 28 4E 61 6D 65 29 3B 0D 0A 20 Write(Name);..
012180: 20 20 20 20 20 20 20 20 20 47 6F 74 6F 58 59 28 GotoXY(
012190: 35 33 2C 4C 20 2B 20 31 29 3B 20 57 72 69 74 65 53,L + 1); Write
0121A0: 28 43 6F 70 79 28 43 6F 6D 70 61 6E 79 2C 31 2C (Copy(Company,1,
0121B0: 32 35 29 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 25));..
0121C0: 20 4C 20 3A 3D 20 4C 20 2B 20 31 3B 0D 0A 20 20 L := L + 1;..
0121D0: 20 20 20 20 20 20 65 6E 64 3B 20 7B 20 6F 66 20 end; { of
0121E0: 77 69 74 68 20 43 75 73 74 20 64 6F 20 2E 2E 20 with Cust do ..
0121F0: 7D 0D 0A 20 20 20 20 65 6E 64 3B 20 7B 20 6F 66 }.. end; { of
012200: 20 69 66 20 4F 4B 20 2E 2E 20 7D 0D 0A 20 20 75 if OK .. }.. u
012210: 6E 74 69 6C 20 6E 6F 74 20 4F 4B 3B 0D 0A 20 20 ntil not OK;..
012220: 69 66 20 43 4F 20 3D 20 27 53 27 20 74 68 65 6E if CO = 'S' then
012230: 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 47 .. begin.. G
012240: 6F 74 6F 58 59 28 31 2C 32 33 29 3B 20 57 72 69 otoXY(1,23); Wri
012250: 74 65 28 27 50 72 65 73 73 20 3C 52 45 54 55 52 te('Press <RETUR
012260: 4E 3E 27 29 3B 20 43 6C 72 45 6F 6C 3B 0D 0A 20 N>'); ClrEol;..
012270: 20 20 20 72 65 70 65 61 74 20 0D 0A 20 20 20 20 repeat ..
012280: 20 20 52 65 61 64 28 4B 62 64 2C 43 68 29 0D 0A Read(Kbd,Ch)..
012290: 20 20 20 20 75 6E 74 69 6C 20 43 68 20 3D 20 5E until Ch = ^
0122A0: 4D 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 20 20 45 73 M;.. end;.. Es
0122B0: 63 61 70 65 20 3A 0D 0A 65 6E 64 3B 0D 0A 20 0D cape :..end;.. .
0122C0: 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0122D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0122E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0122F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
012300: 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 69 66 end;.. if
012310: 20 43 68 20 3C 3E 20 27 51 27 20 74 68 65 6E 0D Ch <> 'Q' then.
012320: 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 . begin..
012330: 20 20 47 6F 74 6F 58 59 28 36 30 2C 32 29 3B 20 GotoXY(60,2);
012340: 57 72 69 74 65 28 55 73 65 64 52 65 63 73 28 44 Write(UsedRecs(D
012350: 61 74 46 29 20 3A 35 29 3B 0D 0A 20 20 20 20 20 atF) :5);..
012360: 20 43 6C 65 61 72 46 6F 72 6D 3B 0D 0A 20 20 20 ClearForm;..
012370: 20 65 6E 64 3B 0D 0A 20 20 75 6E 74 69 6C 20 43 end;.. until C
012380: 68 20 3D 20 27 51 27 3B 0D 0A 65 6E 64 3B 0D 0A h = 'Q';..end;..
012390: 0D 0A 28 2A 20 20 4C 69 73 74 20 69 73 20 75 73 ..(* List is us
0123A0: 65 64 20 74 6F 20 6C 69 73 74 20 63 75 73 74 6F ed to list custo
0123B0: 6D 65 72 73 20 2A 29 0D 0A 0D 0A 70 72 6F 63 65 mers *)....proce
0123C0: 64 75 72 65 20 4C 69 73 74 3B 0D 0A 6C 61 62 65 dure List;..labe
0123D0: 6C 20 45 73 63 61 70 65 3B 0D 0A 76 61 72 0D 0A l Escape;..var..
0123E0: 20 20 44 2C 4C 2C 4C 44 20 20 20 3A 20 49 6E 74 D,L,LD : Int
0123F0: 65 67 65 72 3B 0D 0A 20 20 43 68 2C 43 4F 2C 43 eger;.. Ch,CO,C
012400: 53 20 3A 20 43 68 61 72 3B 0D 0A 20 20 43 63 6F S : Char;.. Cco
012410: 64 65 20 20 20 20 3A 20 73 74 72 69 6E 67 5B 31 de : string[1
012420: 35 5D 3B 0D 0A 20 20 4B 65 79 4E 20 20 20 20 20 5];.. KeyN
012430: 3A 20 73 74 72 69 6E 67 5B 32 35 5D 3B 0D 0A 20 : string[25];..
012440: 20 4E 61 6D 65 20 20 20 20 20 3A 20 73 74 72 69 Name : stri
012450: 6E 67 5B 33 35 5D 3B 0D 0A 20 20 43 75 73 74 20 ng[35];.. Cust
012460: 20 20 20 20 3A 20 43 75 73 74 52 65 63 3B 0D 0A : CustRec;..
012470: 62 65 67 69 6E 0D 0A 20 20 53 65 6C 65 63 74 28 begin.. Select(
012480: 27 4F 75 74 70 75 74 20 64 65 76 69 63 65 20 3A 'Output device :
012490: 20 50 29 72 69 6E 74 65 72 2C 20 53 29 63 72 65 P)rinter, S)cre
0124A0: 65 6E 27 2C 5B 27 50 27 2C 27 53 27 5D 2C 43 4F en',['P','S'],CO
0124B0: 29 3B 0D 0A 20 20 53 65 6C 65 63 74 28 27 53 6F );.. Select('So
0124C0: 72 74 20 62 79 20 3A 20 43 29 6F 64 65 2C 20 4E rt by : C)ode, N
0124D0: 29 61 6D 65 2C 20 55 29 6E 73 6F 72 74 65 64 27 )ame, U)nsorted'
0124E0: 2C 5B 27 43 27 2C 27 4E 27 2C 27 55 27 5D 2C 43 ,['C','N','U'],C
0124F0: 53 29 3B 0D 0A 20 20 47 6F 74 6F 58 59 28 31 2C S);.. GotoXY(1,
012500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0125A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0125B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0125C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0125D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0125E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0125F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012600: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012610: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012620: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012630: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012640: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012650: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012660: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012670: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012680: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012690: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0126A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0126B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0126C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0126D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0126E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0126F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
012700: 32 33 29 3B 20 57 72 69 74 65 28 27 50 72 65 73 23); Write('Pres
012710: 73 20 3C 45 73 63 3E 20 74 6F 20 61 62 6F 72 74 s <Esc> to abort
012720: 27 29 3B 20 43 6C 72 45 6F 6C 3B 0D 0A 20 20 43 '); ClrEol;.. C
012730: 6C 65 61 72 4B 65 79 28 43 6F 64 65 49 6E 64 65 learKey(CodeInde
012740: 78 46 69 6C 65 29 3B 0D 0A 20 20 43 6C 65 61 72 xFile);.. Clear
012750: 4B 65 79 28 4E 61 6D 65 49 6E 64 65 78 46 69 6C Key(NameIndexFil
012760: 65 29 3B 0D 0A 20 20 44 20 3A 3D 20 30 3B 0D 0A e);.. D := 0;..
012770: 20 20 4C 44 20 3A 3D 20 46 69 6C 65 4C 65 6E 28 LD := FileLen(
012780: 44 61 74 46 29 20 2D 20 31 3B 0D 0A 20 20 4C 20 DatF) - 1;.. L
012790: 3A 3D 20 33 3B 0D 0A 20 20 72 65 70 65 61 74 0D := 3;.. repeat.
0127A0: 0A 20 20 20 20 69 66 20 4B 65 79 50 72 65 73 73 . if KeyPress
0127B0: 65 64 20 74 68 65 6E 0D 0A 20 20 20 20 62 65 67 ed then.. beg
0127C0: 69 6E 0D 0A 20 20 20 20 20 20 52 65 61 64 28 4B in.. Read(K
0127D0: 62 64 2C 43 68 29 3B 0D 0A 20 20 20 20 20 20 69 bd,Ch);.. i
0127E0: 66 20 43 68 20 3D 20 23 32 37 20 74 68 65 6E 0D f Ch = #27 then.
0127F0: 0A 20 20 20 20 20 20 20 20 67 6F 74 6F 20 45 73 . goto Es
012800: 63 61 70 65 3B 0D 0A 20 20 20 20 65 6E 64 3B 0D cape;.. end;.
012810: 0A 20 20 20 20 63 61 73 65 20 43 53 20 6F 66 0D . case CS of.
012820: 0A 20 20 20 20 20 20 27 43 27 20 3A 20 4E 65 78 . 'C' : Nex
012830: 74 4B 65 79 28 43 6F 64 65 49 6E 64 65 78 46 69 tKey(CodeIndexFi
012840: 6C 65 2C 44 2C 43 63 6F 64 65 29 3B 0D 0A 20 20 le,D,Ccode);..
012850: 20 20 20 20 27 4E 27 20 3A 20 4E 65 78 74 4B 65 'N' : NextKe
012860: 79 28 4E 61 6D 65 49 6E 64 65 78 46 69 6C 65 2C y(NameIndexFile,
012870: 44 2C 4B 65 79 4E 29 3B 0D 0A 20 20 20 20 20 20 D,KeyN);..
012880: 27 55 27 20 3A 20 62 65 67 69 6E 0D 0A 20 20 20 'U' : begin..
012890: 20 20 20 20 20 20 20 20 20 20 20 4F 4B 20 3A 3D OK :=
0128A0: 20 66 61 6C 73 65 3B 0D 0A 20 20 20 20 20 20 20 false;..
0128B0: 20 20 20 20 20 20 20 77 68 69 6C 65 20 28 44 20 while (D
0128C0: 3C 20 4C 44 29 20 61 6E 64 20 6E 6F 74 20 4F 4B < LD) and not OK
0128D0: 20 64 6F 0D 0A 20 20 20 20 20 20 20 20 20 20 20 do..
0128E0: 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 begin..
0128F0: 20 20 20 20 20 20 20 20 20 20 44 20 3A 3D 20 44 D := D
012900: 64 00 4D 00 84 22 15 4C 61 77 6E 20 4D 6F 76 69 d.M..".Lawn Movi
012910: 6E 67 20 55 6E 6C 69 6D 69 74 65 64 6F 6E 6E 73 ng Unlimitedonns
012920: 69 6F 6E 61 6C 0F 32 37 35 20 57 65 73 74 20 41 ional.275 West A
012930: 76 65 6E 75 65 65 65 75 65 2D 06 4B 61 64 6F 6B venueeeue-.Kadok
012940: 61 65 63 6B 69 74 79 02 49 4C 00 05 39 36 33 36 aeckity.IL..9636
012950: 31 EB 24 11 4D 69 63 72 6F 20 53 61 6C 65 73 20 1.$.Micro Sales
012960: 43 6F 72 70 2E 69 74 65 64 6F 6E 6E 73 69 6F 6E Corp.itedonnsion
012970: 61 6C 11 38 35 33 38 20 46 69 66 74 68 20 41 76 al.8538 Fifth Av
012980: 65 6E 75 65 75 65 2D 08 41 62 65 72 64 65 65 6E enueue-.Aberdeen
012990: 6B 69 74 79 02 4D 4F 00 05 36 31 36 33 38 6F 0F kity.MO..61638o.
0129A0: 11 4D 6F 72 65 20 6F 72 20 4C 65 73 73 20 49 6E .More or Less In
0129B0: 63 2E 69 74 65 64 6F 6E 6E 73 69 6F 6E 61 6C 0D c.itedonnsional.
0129C0: 38 36 20 39 74 68 20 41 76 65 6E 75 65 65 6E 75 86 9th Avenueenu
0129D0: 65 75 65 2D 06 52 75 73 6B 69 6E 65 6E 6B 69 74 eue-.Ruskinenkit
0129E0: 79 02 4D 4F 00 05 33 34 32 35 37 63 11 16 4D 6F y.MO..34257c..Mo
0129F0: 72 65 20 6F 72 20 4C 65 73 73 20 4E 61 74 6C 2E re or Less Natl.
012A00: 20 43 6F 2E 6E 6E 73 69 6F 6E 61 6C 10 34 35 38 Co.nnsional.458
012A10: 20 46 69 72 73 74 20 41 76 65 6E 75 65 65 75 65 First Avenueeue
012A20: 2D 09 47 72 65 65 76 69 6C 6C 65 69 74 79 02 4E -.Greevilleity.N
012A30: 59 00 05 36 34 32 36 35 2E 0F 1A 4D 6F 72 65 20 Y..64265...More
012A40: 6F 72 20 4C 65 73 73 20 49 6E 74 65 72 6E 61 74 or Less Internat
012A50: 69 6F 6E 61 6C 6F 6E 61 6C 12 39 39 39 20 53 65 ionalonal.999 Se
012A60: 76 65 6E 74 68 20 41 76 65 6E 75 65 65 2D 06 4D venth Avenuee-.M
012A70: 61 72 69 6F 6E 6C 6C 65 69 74 79 02 4D 4F 00 05 arionlleity.MO..
012A80: 37 31 38 32 33 4A 1C 12 49 6E 70 75 74 2F 4F 75 71823J..Input/Ou
012A90: 74 70 75 74 20 26 20 43 6F 2E 6E 61 74 69 6F 6E tput & Co.nation
012AA0: 61 6C 6F 6E 61 6C 10 38 32 20 53 65 63 6F 6E 64 alonal.82 Second
012AB0: 20 41 76 65 6E 75 65 75 65 65 2D 06 52 75 73 6B Avenueuee-.Rusk
012AC0: 69 6E 6C 6C 65 69 74 79 02 4D 41 00 05 36 34 39 inlleity.MA..649
012AD0: 32 38 06 0F 11 4C 61 77 6E 20 4D 6F 76 69 6E 67 28...Lawn Moving
012AE0: 20 26 20 43 6F 2E 2E 6E 61 74 69 6F 6E 61 6C 6F & Co..nationalo
012AF0: 6E 61 6C 0E 32 31 20 45 61 73 74 20 41 76 65 6E nal.21 East Aven
012B00: 20 2B 20 31 3B 20 0D 0A 20 20 20 20 20 20 20 20 + 1; ..
012B10: 20 20 20 20 20 20 20 20 47 65 74 52 65 63 28 44 GetRec(D
012B20: 61 74 46 2C 44 2C 43 75 73 74 29 3B 0D 0A 20 20 atF,D,Cust);..
012B30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4F 4B OK
012B40: 20 3A 3D 20 43 75 73 74 2E 43 75 73 74 53 74 61 := Cust.CustSta
012B50: 74 75 73 20 3D 20 30 3B 0D 0A 20 20 20 20 20 20 tus = 0;..
012B60: 20 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 end;..
012B70: 20 20 20 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A end;..
012B80: 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 69 66 end;.. if
012B90: 20 4F 4B 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 OK then..
012BA0: 77 69 74 68 20 43 75 73 74 20 64 6F 0D 0A 20 20 with Cust do..
012BB0: 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 begin..
012BC0: 20 20 20 69 66 20 43 53 20 3C 3E 20 27 55 27 20 if CS <> 'U'
012BD0: 74 68 65 6E 20 0D 0A 20 20 20 20 20 20 20 20 20 then ..
012BE0: 20 47 65 74 52 65 63 28 44 61 74 46 2C 44 2C 43 GetRec(DatF,D,C
012BF0: 75 73 74 29 3B 0D 0A 20 20 20 20 20 20 20 20 4E ust);.. N
012C00: 61 6D 65 20 3A 3D 20 4C 61 73 74 4E 61 6D 65 3B ame := LastName;
012C10: 0D 0A 20 20 20 20 20 20 20 20 69 66 20 46 69 72 .. if Fir
012C20: 73 74 4E 61 6D 65 20 3C 3E 20 27 27 20 74 68 65 stName <> '' the
012C30: 6E 20 0D 0A 20 20 20 20 20 20 20 20 20 20 4E 61 n .. Na
012C40: 6D 65 20 3A 3D 20 4E 61 6D 65 20 2B 20 27 2C 20 me := Name + ',
012C50: 27 20 2B 20 46 69 72 73 74 4E 61 6D 65 3B 0D 0A ' + FirstName;..
012C60: 20 20 20 20 20 20 20 20 69 66 20 43 4F 20 3D 20 if CO =
012C70: 27 50 27 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 'P' then..
012C80: 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 begin..
012C90: 20 20 20 57 72 69 74 65 28 4C 73 74 2C 43 75 73 Write(Lst,Cus
012CA0: 74 43 6F 64 65 2C 27 27 20 3A 31 36 20 2D 20 4C tCode,'' :16 - L
012CB0: 65 6E 67 74 68 28 43 75 73 74 43 6F 64 65 29 29 ength(CustCode))
012CC0: 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 57 72 69 ;.. Wri
012CD0: 74 65 28 4C 73 74 2C 4E 61 6D 65 2C 27 27 20 3A te(Lst,Name,'' :
012CE0: 33 36 20 2D 20 4C 65 6E 67 74 68 28 4E 61 6D 65 36 - Length(Name
012CF0: 29 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 57 ));.. W
012D00: 75 65 75 65 75 65 65 2D 08 41 62 65 72 64 65 65 ueueuee-.Aberdee
012D10: 6E 65 69 74 79 02 4D 41 00 05 35 35 38 32 35 32 neity.MA..558252
012D20: 24 12 49 6E 70 75 74 2F 4F 75 74 70 75 74 20 26 $.Input/Output &
012D30: 20 43 6F 2E 6E 61 74 69 6F 6E 61 6C 6F 6E 61 6C Co.nationalonal
012D40: 12 35 31 35 38 20 53 65 63 6F 6E 64 20 53 74 72 .5158 Second Str
012D50: 65 65 74 65 2D 06 41 75 73 74 69 6E 65 6E 65 69 eete-.Austinenei
012D60: 74 79 02 4E 59 00 05 33 31 34 31 38 9C 1C 10 4C ty.NY..31418...L
012D70: 61 77 6E 20 4D 6F 76 69 6E 67 20 49 6E 63 2E 6F awn Moving Inc.o
012D80: 2E 6E 61 74 69 6F 6E 61 6C 6F 6E 61 6C 0F 37 39 .nationalonal.79
012D90: 20 46 69 66 74 68 20 53 74 72 65 65 74 65 65 74 Fifth Streeteet
012DA0: 65 2D 06 57 61 62 61 73 68 65 6E 65 69 74 79 02 e-.Wabasheneity.
012DB0: 43 4F 00 05 33 33 38 38 33 94 24 17 4C 61 77 6E CO..33883.$.Lawn
012DC0: 20 4D 6F 76 69 6E 67 20 43 6F 72 70 6F 72 61 74 Moving Corporat
012DD0: 69 6F 6E 6E 61 6C 6F 6E 61 6C 10 39 34 36 20 53 ionnalonal.946 S
012DE0: 6F 75 74 68 20 41 76 65 6E 75 65 65 74 65 2D 08 outh Avenueete-.
012DF0: 41 62 65 72 64 65 65 6E 65 69 74 79 02 57 41 00 Aberdeeneity.WA.
012E00: 05 36 34 37 36 39 35 0A 1A 4D 6F 72 65 20 6F 72 .647695..More or
012E10: 20 4C 65 73 73 20 49 6E 74 65 72 6E 61 74 69 6F Less Internatio
012E20: 6E 61 6C 6F 6E 61 6C 0F 37 32 20 46 69 72 73 74 nalonal.72 First
012E30: 20 53 74 72 65 65 74 65 65 74 65 2D 06 52 75 73 Streeteete-.Rus
012E40: 6B 69 6E 65 6E 65 69 74 79 02 4D 4F 00 05 39 38 kineneity.MO..98
012E50: 31 33 35 54 0D 16 49 6E 70 75 74 2F 4F 75 74 70 135T..Input/Outp
012E60: 75 74 20 55 6E 6C 69 6D 69 74 65 64 6F 6E 61 6C ut Unlimitedonal
012E70: 6F 6E 61 6C 10 31 35 37 20 46 69 72 73 74 20 53 onal.157 First S
012E80: 74 72 65 65 74 65 74 65 2D 08 41 62 65 72 64 65 treetete-.Aberde
012E90: 65 6E 65 69 74 79 02 4E 59 00 05 35 37 31 37 36 eneity.NY..57176
012EA0: FA 0E 12 4A 6F 6E 65 73 20 26 20 4A 6F 6E 65 73 ...Jones & Jones
012EB0: 20 49 6E 63 2E 69 74 65 64 6F 6E 61 6C 6F 6E 61 Inc.itedonalona
012EC0: 6C 13 31 33 36 39 20 53 65 76 65 6E 74 68 20 41 l.1369 Seventh A
012ED0: 76 65 6E 75 65 2D 06 4B 61 64 6F 6B 61 65 6E 65 venue-.Kadokaene
012EE0: 69 74 79 02 43 4F 00 05 32 34 38 36 37 9D 0A 15 ity.CO..24867...
012EF0: 54 68 65 20 42 65 73 74 20 47 75 79 73 20 43 6F The Best Guys Co
012F00: 72 69 74 65 6C 6E 28 4C 73 74 2C 43 6F 70 79 28 riteln(Lst,Copy(
012F10: 43 6F 6D 70 61 6E 79 2C 31 2C 32 35 29 29 3B 0D Company,1,25));.
012F20: 0A 20 20 20 20 20 20 20 20 65 6E 64 0D 0A 20 20 . end..
012F30: 20 20 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 else..
012F40: 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 begin..
012F50: 20 20 20 20 20 69 66 20 4C 20 3D 20 32 31 20 74 if L = 21 t
012F60: 68 65 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 62 hen.. b
012F70: 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 egin..
012F80: 20 20 47 6F 74 6F 58 59 28 31 2C 32 33 29 3B 0D GotoXY(1,23);.
012F90: 0A 20 20 20 20 20 20 20 20 20 20 20 20 57 72 69 . Wri
012FA0: 74 65 28 27 50 72 65 73 73 20 3C 52 45 54 55 52 te('Press <RETUR
012FB0: 4E 3E 20 74 6F 20 63 6F 6E 74 69 6E 75 65 27 29 N> to continue')
012FC0: 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 57 ;.. W
012FD0: 72 69 74 65 28 27 20 6F 72 20 3C 45 73 63 3E 20 rite(' or <Esc>
012FE0: 74 6F 20 61 62 6F 72 74 27 29 3B 20 0D 0A 20 20 to abort'); ..
012FF0: 20 20 20 20 20 20 20 20 20 20 43 6C 72 45 6F 6C ClrEol
013000: 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 72 ;.. r
013010: 65 70 65 61 74 20 0D 0A 20 20 20 20 20 20 20 20 epeat ..
013020: 20 20 20 20 20 20 52 65 61 64 28 4B 62 64 2C 43 Read(Kbd,C
013030: 68 29 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 h)..
013040: 75 6E 74 69 6C 20 28 43 68 20 3D 20 5E 4D 29 20 until (Ch = ^M)
013050: 6F 72 20 28 43 68 20 3D 20 23 32 37 29 3B 0D 0A or (Ch = #27);..
013060: 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 43 if C
013070: 68 20 3D 20 23 32 37 20 74 68 65 6E 0D 0A 20 20 h = #27 then..
013080: 20 20 20 20 20 20 20 20 20 20 20 20 67 6F 74 6F goto
013090: 20 45 73 63 61 70 65 3B 0D 0A 20 20 20 20 20 20 Escape;..
0130A0: 20 20 20 20 20 20 47 6F 74 6F 58 59 28 31 2C 32 GotoXY(1,2
0130B0: 33 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 3);..
0130C0: 20 57 72 69 74 65 28 27 50 72 65 73 73 20 3C 45 Write('Press <E
0130D0: 73 63 3E 20 74 6F 20 61 62 6F 72 74 27 29 3B 20 sc> to abort');
0130E0: 43 6C 72 45 6F 6C 3B 0D 0A 20 20 20 20 20 20 20 ClrEol;..
0130F0: 20 20 20 20 20 43 6C 65 61 72 46 72 61 6D 65 3B ClearFrame;
013100: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
013110: 10 00 01 00 02 09 52 E5 10 00 41 02 00 00 00 02 ......R...A.....
013120: 10 00 46 02 00 00 00 02 10 00 42 02 00 00 00 02 ..F.......B.....
013130: 10 00 47 02 00 00 00 02 10 00 43 02 00 00 00 02 ..G.......C.....
013140: 10 00 48 02 00 00 00 02 10 00 44 02 00 00 00 02 ..H.......D.....
013150: 10 00 49 02 00 00 00 02 10 00 45 02 00 00 00 02 ..I.......E.....
013160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
013170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
013180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
013190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0131A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0131B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0131C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0131D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0131E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0131F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
013200: 6D 70 61 6E 79 64 6F 6E 61 6C 6F 6E 61 6C 0F 39 mpanydonalonal.9
013210: 39 20 46 69 66 74 68 20 53 74 72 65 65 74 65 6E 9 Fifth Streeten
013220: 75 65 2D 04 42 61 74 68 6B 61 65 6E 65 69 74 79 ue-.Bathkaeneity
013230: 02 4D 41 00 05 32 34 39 33 39 D7 06 17 4D 69 63 .MA..24939...Mic
013240: 72 6F 20 53 61 6C 65 73 20 43 6F 72 70 6F 72 61 ro Sales Corpora
013250: 74 69 6F 6E 6E 61 6C 6F 6E 61 6C 11 33 31 20 53 tionnalonal.31 S
013260: 65 76 65 6E 74 68 20 53 74 72 65 65 74 75 65 2D eventh Streetue-
013270: 06 4D 61 72 69 6F 6E 65 6E 65 69 74 79 02 49 4C .Marioneneity.IL
013280: 00 05 37 36 33 31 32 3A 24 14 4E 75 74 73 20 26 ..76312:$.Nuts &
013290: 20 42 6F 6C 74 73 20 43 6F 6D 70 61 6E 79 69 6F Bolts Companyio
0132A0: 6E 6E 61 6C 6F 6E 61 6C 12 32 34 32 37 20 46 6F nnalonal.2427 Fo
0132B0: 75 72 74 68 20 53 74 72 65 65 74 65 2D 07 57 61 urth Streete-.Wa
0132C0: 6C 6C 6F 77 61 6E 65 69 74 79 02 43 41 00 05 31 llowaneity.CA..1
0132D0: 32 33 36 34 47 20 16 54 68 65 20 42 65 73 74 20 2364G .The Best
0132E0: 47 75 79 73 20 61 6E 64 20 53 6F 6E 73 6E 6E 61 Guys and Sonsnna
0132F0: 6C 6F 6E 61 6C 0E 38 32 20 45 61 73 74 20 53 74 lonal.82 East St
013300: 72 65 65 74 72 65 65 74 65 2D 0C 43 72 79 73 74 reetreete-.Cryst
013310: 61 6C 20 43 69 74 79 02 43 41 00 05 38 37 34 34 al City.CA..8744
013320: 35 E2 14 14 4C 61 77 6E 20 4D 6F 76 69 6E 67 20 5...Lawn Moving
013330: 61 6E 64 20 53 6F 6E 73 6E 73 6E 6E 61 6C 6F 6E and Sonsnsnnalon
013340: 61 6C 10 37 38 33 38 20 57 65 73 74 20 53 74 72 al.7838 West Str
013350: 65 65 74 65 74 65 2D 06 57 61 62 61 73 68 6C 20 eetete-.Wabashl
013360: 43 69 74 79 02 4D 41 00 05 36 31 35 39 36 45 19 City.MA..61596E.
013370: 11 42 6F 72 6C 61 6E 64 20 55 6E 6C 69 6D 69 74 .Borland Unlimit
013380: 65 64 6F 6E 73 6E 73 6E 6E 61 6C 6F 6E 61 6C 10 edonsnsnnalonal.
013390: 37 33 37 20 46 69 72 73 74 20 41 76 65 6E 75 65 737 First Avenue
0133A0: 65 74 65 2D 08 48 75 6D 62 6F 6C 64 74 43 69 74 ete-.HumboldtCit
0133B0: 79 02 41 52 00 05 35 32 32 34 31 A8 0E 15 4C 61 y.AR..52241...La
0133C0: 77 6E 20 4D 6F 76 69 6E 67 20 55 6E 6C 69 6D 69 wn Moving Unlimi
0133D0: 74 65 64 73 6E 6E 61 6C 6F 6E 61 6C 11 34 39 39 tedsnnalonal.499
0133E0: 31 20 45 69 67 74 68 20 41 76 65 6E 75 65 74 65 1 Eigth Avenuete
0133F0: 2D 07 53 68 65 6C 74 6F 6E 74 43 69 74 79 02 4E -.SheltontCity.N
013400: 20 46 69 72 73 74 20 41 76 65 6E 75 65 65 65 2D First Avenueee-
013410: 08 41 62 65 72 64 65 65 6E 43 69 74 79 02 57 41 .AberdeenCity.WA
013420: 00 05 33 31 31 36 31 92 07 15 4D 6F 72 65 20 6F ..31161...More o
013430: 72 20 4C 65 73 73 20 61 6E 64 20 53 6F 6E 73 2E r Less and Sons.
013440: 20 43 6F 2E 6C 6E 61 6C 0E 38 35 20 31 30 74 68 Co.lnal.85 10th
013450: 20 41 76 65 6E 75 65 6E 75 65 65 65 2D 06 4D 61 Avenuenueee-.Ma
013460: 72 69 6F 6E 65 6E 43 69 74 79 02 54 58 00 05 31 rionenCity.TX..1
013470: 33 34 32 36 91 20 13 4D 69 63 72 6F 20 53 61 6C 3426. .Micro Sal
013480: 65 73 20 43 6F 6D 70 61 6E 79 6E 73 2E 20 43 6F es Companyns. Co
013490: 2E 6C 6E 61 6C 0F 35 37 34 20 31 32 74 68 20 53 .lnal.574 12th S
0134A0: 74 72 65 65 74 75 65 65 65 2D 09 47 72 65 65 76 treetueee-.Greev
0134B0: 69 6C 6C 65 69 74 79 02 57 41 00 05 34 31 32 35 illeity.WA..4125
0134C0: 31 28 10 1A 46 75 6C 6C 20 53 70 65 65 64 20 41 1(..Full Speed A
0134D0: 68 65 61 64 20 55 6E 6C 69 6D 69 74 65 64 6C 6E head Unlimitedln
0134E0: 61 6C 0F 34 36 20 53 69 78 74 68 20 53 74 72 65 al.46 Sixth Stre
0134F0: 65 74 75 65 65 65 2D 07 57 61 6C 6C 6F 77 61 6C etueee-.Wallowal
013500: 65 69 74 79 02 43 54 00 05 37 36 37 31 37 26 1D eity.CT..76717&.
013510: 16 46 75 6C 6C 20 53 70 65 65 64 20 41 68 65 61 .Full Speed Ahea
013520: 64 20 26 20 43 6F 2E 69 74 65 64 6C 6E 61 6C 0F d & Co.itedlnal.
013530: 36 39 20 54 68 69 72 64 20 41 76 65 6E 75 65 75 69 Third Avenueu
013540: 65 65 65 2D 08 48 75 6D 62 6F 6C 64 74 65 69 74 eee-.Humboldteit
013550: 79 02 57 41 00 05 32 38 32 33 33 A2 1A 11 4C 61 y.WA..28233...La
013560: 77 6E 20 4D 6F 76 69 6E 67 20 43 6F 72 70 2E 26 wn Moving Corp.&
013570: 20 43 6F 2E 69 74 65 64 6C 6E 61 6C 13 38 36 31 Co.itedlnal.861
013580: 35 20 53 65 76 65 6E 74 68 20 41 76 65 6E 75 65 5 Seventh Avenue
013590: 2D 0B 4E 65 77 20 4D 65 61 64 6F 77 73 79 02 41 -.New Meadowsy.A
0135A0: 52 00 05 39 31 36 31 31 3D 17 13 42 6F 72 6C 61 R..91611=..Borla
0135B0: 6E 64 20 43 6F 72 70 6F 72 61 74 69 6F 6E 43 6F nd CorporationCo
0135C0: 2E 69 74 65 64 6C 6E 61 6C 10 39 33 36 35 20 31 .itedlnal.9365 1
0135D0: 30 74 68 20 41 76 65 6E 75 65 6E 75 65 2D 06 52 0th Avenuenue-.R
0135E0: 75 73 6B 69 6E 61 64 6F 77 73 79 02 57 41 00 05 uskinadowsy.WA..
0135F0: 39 33 38 35 33 C4 10 1B 4A 6F 6E 65 73 20 26 20 93853...Jones &
013600: 59 00 05 39 39 36 33 39 D3 18 1C 46 75 6C 6C 20 Y..99639...Full
013610: 53 70 65 65 64 20 41 68 65 61 64 20 43 6F 72 70 Speed Ahead Corp
013620: 6F 72 61 74 69 6F 6E 61 6C 11 34 36 35 33 20 46 orational.4653 F
013630: 69 66 74 68 20 41 76 65 6E 75 65 74 65 2D 06 4D ifth Avenuete-.M
013640: 61 72 69 6F 6E 6E 74 43 69 74 79 02 54 58 00 05 arionntCity.TX..
013650: 33 37 36 38 33 5F 10 16 4E 75 74 73 20 26 20 42 37683_..Nuts & B
013660: 6F 6C 74 73 20 55 6E 6C 69 6D 69 74 65 64 72 61 olts Unlimitedra
013670: 74 69 6F 6E 61 6C 10 32 33 34 20 53 69 78 74 68 tional.234 Sixth
013680: 20 41 76 65 6E 75 65 65 74 65 2D 06 4D 61 72 69 Avenueete-.Mari
013690: 6F 6E 6E 74 43 69 74 79 02 4D 41 00 05 34 31 35 onntCity.MA..415
0136A0: 35 36 B3 24 16 46 75 6C 6C 20 53 70 65 65 64 20 56.$.Full Speed
0136B0: 41 68 65 61 64 20 43 6F 72 70 2E 72 61 74 69 6F Ahead Corp.ratio
0136C0: 6E 61 6C 11 39 39 31 34 20 53 69 78 74 68 20 53 nal.9914 Sixth S
0136D0: 74 72 65 65 74 74 65 2D 0C 43 72 79 73 74 61 6C treette-.Crystal
0136E0: 20 43 69 74 79 02 43 4F 00 05 33 32 39 31 33 1A City.CO..32913.
0136F0: 23 11 4E 75 74 73 20 26 20 42 6F 6C 74 73 20 49 #.Nuts & Bolts I
013700: 6E 63 2E 43 6F 72 70 2E 72 61 74 69 6F 6E 61 6C nc.Corp.rational
013710: 11 31 32 20 53 65 76 65 6E 74 68 20 41 76 65 6E .12 Seventh Aven
013720: 75 65 74 65 2D 07 53 68 65 6C 74 6F 6E 20 43 69 uete-.Shelton Ci
013730: 74 79 02 41 52 00 05 36 38 37 39 32 92 26 18 4E ty.AR..68792.&.N
013740: 75 74 73 20 26 20 42 6F 6C 74 73 20 43 6F 72 70 uts & Bolts Corp
013750: 6F 72 61 74 69 6F 6E 74 69 6F 6E 61 6C 12 35 34 orationtional.54
013760: 37 20 53 65 76 65 6E 74 68 20 53 74 72 65 65 74 7 Seventh Street
013770: 65 2D 0C 43 72 79 73 74 61 6C 20 43 69 74 79 02 e-.Crystal City.
013780: 41 52 00 05 36 34 37 36 33 B9 07 16 49 6E 70 75 AR..64763...Inpu
013790: 74 2F 4F 75 74 70 75 74 20 4E 61 74 6C 2E 20 43 t/Output Natl. C
0137A0: 6F 2E 6F 6E 74 69 6F 6E 61 6C 11 37 33 31 35 20 o.ontional.7315
0137B0: 45 69 67 74 68 20 53 74 72 65 65 74 74 65 2D 06 Eigth Streette-.
0137C0: 57 61 62 61 73 68 6C 20 43 69 74 79 02 4D 41 00 Wabashl City.MA.
0137D0: 05 36 32 31 35 32 79 15 13 4C 61 77 6E 20 4D 6F .62152y..Lawn Mo
0137E0: 76 69 6E 67 20 43 6F 6D 70 61 6E 79 43 6F 2E 6F ving CompanyCo.o
0137F0: 6E 74 69 6F 6E 61 6C 11 39 31 34 39 20 53 69 78 ntional.9149 Six
013800: 4A 6F 6E 65 73 20 49 6E 74 65 72 6E 61 74 69 6F Jones Internatio
013810: 6E 61 6C 6E 61 6C 10 37 35 33 20 45 69 67 74 68 nalnal.753 Eigth
013820: 20 41 76 65 6E 75 65 6E 75 65 2D 06 41 75 73 74 Avenuenue-.Aust
013830: 69 6E 61 64 6F 77 73 79 02 54 58 00 05 31 34 32 inadowsy.TX..142
013840: 31 38 DE 23 16 4E 75 74 73 20 26 20 42 6F 6C 74 18.#.Nuts & Bolt
013850: 73 20 4E 61 74 6C 2E 20 43 6F 2E 69 6F 6E 61 6C s Natl. Co.ional
013860: 6E 61 6C 10 37 37 39 20 4E 6F 72 74 68 20 41 76 nal.779 North Av
013870: 65 6E 75 65 6E 75 65 2D 09 45 73 63 6F 6E 64 69 enuenue-.Escondi
013880: 64 6F 77 73 79 02 49 4C 00 05 32 33 35 39 32 27 dowsy.IL..23592'
013890: 05 16 46 75 6C 6C 20 53 70 65 65 64 20 41 68 65 ..Full Speed Ahe
0138A0: 61 64 20 26 20 43 6F 2E 69 6F 6E 61 6C 6E 61 6C ad & Co.ionalnal
0138B0: 0E 32 34 20 45 61 73 74 20 41 76 65 6E 75 65 75 .24 East Avenueu
0138C0: 65 6E 75 65 2D 08 53 75 6E 64 61 6E 63 65 6F 77 enue-.Sundanceow
0138D0: 73 79 02 43 54 00 05 32 37 32 32 32 37 0A 14 4D sy.CT..272227..M
0138E0: 69 63 72 6F 20 53 61 6C 65 73 20 61 6E 64 20 53 icro Sales and S
0138F0: 6F 6E 73 6F 2E 69 6F 6E 61 6C 6E 61 6C 0F 36 34 onso.ionalnal.64
013900: 20 53 6F 75 74 68 20 53 74 72 65 65 74 65 6E 75 South Streetenu
013910: 65 2D 06 57 61 62 61 73 68 63 65 6F 77 73 79 02 e-.Wabashceowsy.
013920: 41 52 00 05 34 35 35 34 37 34 24 11 4D 69 63 72 AR..455474$.Micr
013930: 6F 20 53 61 6C 65 73 20 43 6F 72 70 2E 6F 6E 73 o Sales Corp.ons
013940: 6F 2E 69 6F 6E 61 6C 6E 61 6C 11 33 38 31 20 53 o.ionalnal.381 S
013950: 65 63 6F 6E 64 20 41 76 65 6E 75 65 75 65 2D 06 econd Avenueue-.
013960: 4D 61 72 69 6F 6E 63 65 6F 77 73 79 02 57 41 00 Marionceowsy.WA.
013970: 05 34 32 31 37 38 8E 1E 16 46 75 6C 6C 20 53 70 .42178...Full Sp
013980: 65 65 64 20 41 68 65 61 64 20 43 6F 72 70 2E 69 eed Ahead Corp.i
013990: 6F 6E 61 6C 6E 61 6C 0F 37 36 32 20 31 30 74 68 onalnal.762 10th
0139A0: 20 53 74 72 65 65 74 75 65 75 65 2D 08 53 75 6E Streetueue-.Sun
0139B0: 64 61 6E 63 65 6F 77 73 79 02 4E 59 00 05 33 32 danceowsy.NY..32
0139C0: 31 35 34 38 12 16 54 68 65 20 42 65 73 74 20 47 1548..The Best G
0139D0: 75 79 73 20 61 6E 64 20 53 6F 6E 73 69 6F 6E 61 uys and Sonsiona
0139E0: 6C 6E 61 6C 11 39 38 31 34 20 46 69 72 73 74 20 lnal.9814 First
0139F0: 41 76 65 6E 75 65 75 65 2D 04 42 61 74 68 61 6E Avenueue-.Bathan
013A00: 74 68 20 53 74 72 65 65 74 74 65 2D 07 53 68 65 th Streette-.She
013A10: 6C 74 6F 6E 20 43 69 74 79 02 43 41 00 05 34 37 lton City.CA..47
013A20: 31 31 34 6E 21 10 42 6F 72 6C 61 6E 64 20 61 6E 114n!.Borland an
013A30: 64 20 53 6F 6E 73 61 6E 79 43 6F 2E 6F 6E 74 69 d SonsanyCo.onti
013A40: 6F 6E 61 6C 0E 34 33 20 31 31 74 68 20 53 74 72 onal.43 11th Str
013A50: 65 65 74 65 65 74 74 65 2D 08 41 62 65 72 64 65 eeteette-.Aberde
013A60: 65 6E 43 69 74 79 02 57 41 00 05 31 37 31 34 37 enCity.WA..17147
013A70: 5C 20 11 42 6F 72 6C 61 6E 64 20 4E 61 74 6C 2E \ .Borland Natl.
013A80: 20 43 6F 2E 6E 79 43 6F 2E 6F 6E 74 69 6F 6E 61 Co.nyCo.ontiona
013A90: 6C 0F 31 36 20 46 69 66 74 68 20 53 74 72 65 65 l.16 Fifth Stree
013AA0: 74 65 74 74 65 2D 07 57 61 6C 6C 6F 77 61 6E 43 tette-.WallowanC
013AB0: 69 74 79 02 43 4F 00 05 34 34 32 35 38 77 22 1B ity.CO..44258w".
013AC0: 54 68 65 20 42 65 73 74 20 47 75 79 73 20 49 6E The Best Guys In
013AD0: 74 65 72 6E 61 74 69 6F 6E 61 6C 6E 61 6C 0F 31 ternationalnal.1
013AE0: 33 20 46 69 66 74 68 20 41 76 65 6E 75 65 65 74 3 Fifth Avenueet
013AF0: 74 65 2D 06 57 61 62 61 73 68 61 6E 43 69 74 79 te-.WabashanCity
013B00: 02 43 54 00 05 36 39 38 35 37 F3 18 15 4C 61 77 .CT..69857...Law
013B10: 6E 20 4D 6F 76 69 6E 67 20 55 6E 6C 69 6D 69 74 n Moving Unlimit
013B20: 65 64 74 69 6F 6E 61 6C 6E 61 6C 10 37 34 39 39 edtionalnal.7499
013B30: 20 31 32 74 68 20 41 76 65 6E 75 65 74 74 65 2D 12th Avenuette-
013B40: 06 52 75 73 6B 69 6E 61 6E 43 69 74 79 02 43 41 .RuskinanCity.CA
013B50: 00 05 35 34 33 37 31 D2 1A 16 49 6E 70 75 74 2F ..54371...Input/
013B60: 4F 75 74 70 75 74 20 4E 61 74 6C 2E 20 43 6F 2E Output Natl. Co.
013B70: 69 6F 6E 61 6C 6E 61 6C 12 33 32 38 20 53 65 76 ionalnal.328 Sev
013B80: 65 6E 74 68 20 41 76 65 6E 75 65 65 2D 07 57 61 enth Avenuee-.Wa
013B90: 6C 6C 6F 77 61 6E 43 69 74 79 02 4D 41 00 05 37 llowanCity.MA..7
013BA0: 34 31 33 32 8A 21 16 4A 6F 6E 65 73 20 26 20 4A 4132.!.Jones & J
013BB0: 6F 6E 65 73 20 61 6E 64 20 53 6F 6E 73 69 6F 6E ones and Sonsion
013BC0: 61 6C 6E 61 6C 12 39 31 34 20 53 65 76 65 6E 74 alnal.914 Sevent
013BD0: 68 20 41 76 65 6E 75 65 65 2D 09 45 73 63 6F 6E h Avenuee-.Escon
013BE0: 64 69 64 6F 69 74 79 02 43 4F 00 05 39 39 38 38 didoity.CO..9988
013BF0: 34 57 13 15 4C 61 77 6E 20 4D 6F 76 69 6E 67 20 4W..Lawn Moving
013C00: 63 65 6F 77 73 79 02 43 4F 00 05 31 34 36 34 35 ceowsy.CO..14645
013C10: 03 21 17 4D 69 63 72 6F 20 53 61 6C 65 73 20 43 .!.Micro Sales C
013C20: 6F 72 70 6F 72 61 74 69 6F 6E 6F 6E 61 6C 6E 61 orporationonalna
013C30: 6C 0F 35 39 38 20 57 65 73 74 20 41 76 65 6E 75 l.598 West Avenu
013C40: 65 75 65 75 65 2D 06 4B 61 64 6F 6B 61 63 65 6F eueue-.Kadokaceo
013C50: 77 73 79 02 4E 59 00 05 31 34 39 39 36 4A 0A 1A wsy.NY..14996J..
013C60: 46 75 6C 6C 20 53 70 65 65 64 20 41 68 65 61 64 Full Speed Ahead
013C70: 20 4E 61 74 6C 2E 20 43 6F 2E 6C 6E 61 6C 0F 31 Natl. Co.lnal.1
013C80: 35 20 46 69 66 74 68 20 41 76 65 6E 75 65 75 65 5 Fifth Avenueue
013C90: 75 65 2D 09 46 6F 72 74 20 50 65 63 6B 77 73 79 ue-.Fort Peckwsy
013CA0: 02 57 41 00 05 31 33 36 32 36 23 0D 11 4D 6F 72 .WA..13626#..Mor
013CB0: 65 20 6F 72 20 4C 65 73 73 20 49 6E 63 2E 4E 61 e or Less Inc.Na
013CC0: 74 6C 2E 20 43 6F 2E 6C 6E 61 6C 10 34 33 36 20 tl. Co.lnal.436
013CD0: 53 69 78 74 68 20 53 74 72 65 65 74 65 75 65 2D Sixth Streeteue-
013CE0: 09 47 72 65 65 76 69 6C 6C 65 77 73 79 02 54 58 .Greevillewsy.TX
013CF0: 00 05 34 34 39 35 35 B8 1E 1B 4A 6F 6E 65 73 20 ..44955...Jones
013D00: 26 20 4A 6F 6E 65 73 20 49 6E 74 65 72 6E 61 74 & Jones Internat
013D10: 69 6F 6E 61 6C 6E 61 6C 10 39 39 32 33 20 31 32 ionalnal.9923 12
013D20: 74 68 20 41 76 65 6E 75 65 65 75 65 2D 04 42 61 th Avenueeue-.Ba
013D30: 74 68 76 69 6C 6C 65 77 73 79 02 4D 4F 00 05 37 thvillewsy.MO..7
013D40: 36 38 34 38 96 21 13 4C 61 77 6E 20 4D 6F 76 69 6848.!.Lawn Movi
013D50: 6E 67 20 43 6F 6D 70 61 6E 79 6E 61 74 69 6F 6E ng Companynation
013D60: 61 6C 6E 61 6C 0F 39 39 20 53 6F 75 74 68 20 41 alnal.99 South A
013D70: 76 65 6E 75 65 65 65 75 65 2D 04 42 61 74 68 76 venueeeue-.Bathv
013D80: 69 6C 6C 65 77 73 79 02 54 58 00 05 33 39 36 33 illewsy.TX..3963
013D90: 39 87 13 19 46 75 6C 6C 20 53 70 65 65 64 20 41 9...Full Speed A
013DA0: 68 65 61 64 20 61 6E 64 20 53 6F 6E 73 61 6C 6E head and Sonsaln
013DB0: 61 6C 11 39 38 38 38 20 54 68 69 72 64 20 41 76 al.9888 Third Av
013DC0: 65 6E 75 65 75 65 2D 09 46 6F 72 74 20 50 65 63 enueue-.Fort Pec
013DD0: 6B 77 73 79 02 43 54 00 05 39 36 32 35 34 52 11 kwsy.CT..96254R.
013DE0: 14 4D 69 63 72 6F 20 53 61 6C 65 73 20 61 6E 64 .Micro Sales and
013DF0: 20 53 6F 6E 73 20 53 6F 6E 73 61 6C 6E 61 6C 0F Sons Sonsalnal.
013E00: 55 6E 6C 69 6D 69 74 65 64 73 69 6F 6E 61 6C 6E Unlimitedsionaln
013E10: 61 6C 11 32 35 39 38 20 53 6F 75 74 68 20 53 74 al.2598 South St
013E20: 72 65 65 74 65 65 2D 06 4D 61 72 69 6F 6E 69 64 reetee-.Marionid
013E30: 6F 69 74 79 02 41 52 00 05 37 32 34 37 32 10 19 oity.AR..72472..
013E40: 17 4D 69 63 72 6F 20 53 61 6C 65 73 20 43 6F 72 .Micro Sales Cor
013E50: 70 6F 72 61 74 69 6F 6E 6F 6E 61 6C 6E 61 6C 11 porationonalnal.
013E60: 39 34 32 38 20 53 69 78 74 68 20 41 76 65 6E 75 9428 Sixth Avenu
013E70: 65 65 65 2D 08 53 75 6E 64 61 6E 63 65 6F 69 74 eee-.Sundanceoit
013E80: 79 02 4D 41 00 05 36 38 37 35 36 C8 0C 11 4D 69 y.MA..68756...Mi
013E90: 63 72 6F 20 53 61 6C 65 73 20 26 20 43 6F 2E 72 cro Sales & Co.r
013EA0: 61 74 69 6F 6E 6F 6E 61 6C 6E 61 6C 11 31 31 37 ationonalnal.117
013EB0: 35 20 46 69 72 73 74 20 41 76 65 6E 75 65 65 65 5 First Avenueee
013EC0: 2D 06 4D 61 72 69 6F 6E 63 65 6F 69 74 79 02 43 -.Marionceoity.C
013ED0: 41 00 05 36 33 32 31 32 92 05 11 49 6E 70 75 74 A..63212...Input
013EE0: 2F 4F 75 74 70 75 74 20 49 6E 63 2E 72 61 74 69 /Output Inc.rati
013EF0: 6F 6E 6F 6E 61 6C 6E 61 6C 0E 39 32 20 31 31 74 ononalnal.92 11t
013F00: 68 20 41 76 65 6E 75 65 6E 75 65 65 65 2D 09 47 h Avenuenueee-.G
013F10: 72 65 65 76 69 6C 6C 65 69 74 79 02 43 54 00 05 reevilleity.CT..
013F20: 34 34 33 33 33 60 0C 10 42 6F 72 6C 61 6E 64 20 44333`..Borland
013F30: 61 6E 64 20 53 6F 6E 73 2E 72 61 74 69 6F 6E 6F and Sons.rationo
013F40: 6E 61 6C 6E 61 6C 10 38 33 36 20 53 69 78 74 68 nalnal.836 Sixth
013F50: 20 41 76 65 6E 75 65 65 65 65 2D 06 52 75 73 6B Avenueeee-.Rusk
013F60: 69 6E 6C 6C 65 69 74 79 02 49 4C 00 05 37 33 38 inlleity.IL..738
013F70: 38 35 1F 13 19 4A 6F 6E 65 73 20 26 20 4A 6F 6E 85...Jones & Jon
013F80: 65 73 20 43 6F 72 70 6F 72 61 74 69 6F 6E 61 6C es Corporational
013F90: 6E 61 6C 0F 36 37 31 20 45 61 73 74 20 53 74 72 nal.671 East Str
013FA0: 65 65 74 65 65 65 65 2D 0B 4E 65 77 20 4D 65 61 eeteeee-.New Mea
013FB0: 64 6F 77 73 79 02 4D 4F 00 05 34 33 35 37 35 9C dowsy.MO..43575.
013FC0: 26 17 4D 69 63 72 6F 20 53 61 6C 65 73 20 43 6F &.Micro Sales Co
013FD0: 72 70 6F 72 61 74 69 6F 6E 6F 6E 61 6C 6E 61 6C rporationonalnal
013FE0: 11 39 37 36 31 20 45 69 67 74 68 20 53 74 72 65 .9761 Eigth Stre
013FF0: 65 74 65 65 2D 0B 4E 65 77 20 4D 65 61 64 6F 77 etee-.New Meadow
014000: 39 34 31 37 20 39 74 68 20 53 74 72 65 65 74 75 9417 9th Streetu
014010: 65 75 65 2D 06 57 61 62 61 73 68 65 63 6B 77 73 eue-.Wabasheckws
014020: 79 02 49 4C 00 05 35 37 34 33 36 95 0C 1B 4A 6F y.IL..57436...Jo
014030: 6E 65 73 20 26 20 4A 6F 6E 65 73 20 49 6E 74 65 nes & Jones Inte
014040: 72 6E 61 74 69 6F 6E 61 6C 6E 61 6C 10 36 37 20 rnationalnal.67
014050: 46 6F 75 72 74 68 20 53 74 72 65 65 74 65 75 65 Fourth Streeteue
014060: 2D 08 41 62 65 72 64 65 65 6E 6B 77 73 79 02 57 -.Aberdeenkwsy.W
014070: 41 00 05 39 34 31 34 38 16 1D 15 54 68 65 20 42 A..94148...The B
014080: 65 73 74 20 47 75 79 73 20 43 6F 6D 70 61 6E 79 est Guys Company
014090: 74 69 6F 6E 61 6C 6E 61 6C 0F 33 37 20 53 69 78 tionalnal.37 Six
0140A0: 74 68 20 41 76 65 6E 75 65 74 65 75 65 2D 0B 4E th Avenueteue-.N
0140B0: 65 77 20 4D 65 61 64 6F 77 73 79 02 4E 59 00 05 ew Meadowsy.NY..
0140C0: 31 34 36 34 33 DA 09 14 4E 75 74 73 20 26 20 42 14643...Nuts & B
0140D0: 6F 6C 74 73 20 43 6F 6D 70 61 6E 79 79 74 69 6F olts Companyytio
0140E0: 6E 61 6C 6E 61 6C 0F 34 34 20 53 6F 75 74 68 20 nalnal.44 South
0140F0: 53 74 72 65 65 74 74 65 75 65 2D 06 4B 61 64 6F Streetteue-.Kado
014100: 6B 61 61 64 6F 77 73 79 02 54 58 00 05 37 38 32 kaadowsy.TX..782
014110: 37 37 B4 06 10 4D 69 63 72 6F 20 53 61 6C 65 73 77...Micro Sales
014120: 20 49 6E 63 2E 70 61 6E 79 79 74 69 6F 6E 61 6C Inc.panyytional
014130: 6E 61 6C 0F 35 32 36 20 31 30 74 68 20 41 76 65 nal.526 10th Ave
014140: 6E 75 65 74 65 75 65 2D 07 53 68 65 6C 74 6F 6E nueteue-.Shelton
014150: 64 6F 77 73 79 02 54 58 00 05 39 33 32 31 35 7F dowsy.TX..93215.
014160: 0D 12 54 68 65 20 42 65 73 74 20 47 75 79 73 20 ..The Best Guys
014170: 49 6E 63 2E 6E 79 79 74 69 6F 6E 61 6C 6E 61 6C Inc.nyytionalnal
014180: 11 38 36 34 20 46 6F 75 72 74 68 20 41 76 65 6E .864 Fourth Aven
014190: 75 65 75 65 2D 09 46 6F 72 74 20 50 65 63 6B 77 ueue-.Fort Peckw
0141A0: 73 79 02 54 58 00 05 38 32 36 34 32 86 04 17 4C sy.TX..82642...L
0141B0: 61 77 6E 20 4D 6F 76 69 6E 67 20 43 6F 72 70 6F awn Moving Corpo
0141C0: 72 61 74 69 6F 6E 6F 6E 61 6C 6E 61 6C 0F 35 38 rationonalnal.58
0141D0: 20 46 69 72 73 74 20 41 76 65 6E 75 65 75 65 75 First Avenueueu
0141E0: 65 2D 04 42 61 74 68 20 50 65 63 6B 77 73 79 02 e-.Bath Peckwsy.
0141F0: 43 54 00 05 31 34 32 34 38 16 20 19 4C 61 77 6E CT..14248. .Lawn
014200: 73 79 02 49 4C 00 05 32 38 36 33 36 91 09 15 54 sy.IL..28636...T
014210: 68 65 20 42 65 73 74 20 47 75 79 73 20 43 6F 6D he Best Guys Com
014220: 70 61 6E 79 6F 6E 6F 6E 61 6C 6E 61 6C 11 33 35 panyononalnal.35
014230: 31 34 20 45 69 67 74 68 20 41 76 65 6E 75 65 65 14 Eigth Avenuee
014240: 65 2D 04 42 61 74 68 4D 65 61 64 6F 77 73 79 02 e-.BathMeadowsy.
014250: 4D 41 00 05 34 38 39 39 35 FA 1D 13 4A 6F 6E 65 MA..48995...Jone
014260: 73 20 26 20 4A 6F 6E 65 73 20 26 20 43 6F 2E 6E s & Jones & Co.n
014270: 79 6F 6E 6F 6E 61 6C 6E 61 6C 0F 36 34 38 20 45 yononalnal.648 E
014280: 61 73 74 20 41 76 65 6E 75 65 75 65 65 65 2D 06 ast Avenueueee-.
014290: 52 75 73 6B 69 6E 61 64 6F 77 73 79 02 54 58 00 Ruskinadowsy.TX.
0142A0: 05 31 38 32 31 33 8E 24 13 54 68 65 20 42 65 73 .18213.$.The Bes
0142B0: 74 20 47 75 79 73 20 43 6F 72 70 2E 6E 79 6F 6E t Guys Corp.nyon
0142C0: 6F 6E 61 6C 6E 61 6C 11 38 35 31 33 20 53 6F 75 onalnal.8513 Sou
0142D0: 74 68 20 41 76 65 6E 75 65 65 65 2D 06 4B 61 64 th Avenueee-.Kad
0142E0: 6F 6B 61 61 64 6F 77 73 79 02 4E 59 00 05 39 39 okaadowsy.NY..99
0142F0: 35 31 37 6E 11 1B 4A 6F 6E 65 73 20 26 20 4A 6F 517n..Jones & Jo
014300: 6E 65 73 20 49 6E 74 65 72 6E 61 74 69 6F 6E 61 nes Internationa
014310: 6C 6E 61 6C 0E 36 33 33 20 39 74 68 20 53 74 72 lnal.633 9th Str
014320: 65 65 74 6E 75 65 65 65 2D 08 48 75 6D 62 6F 6C eetnueee-.Humbol
014330: 64 74 6F 77 73 79 02 43 54 00 05 37 37 33 31 34 dtowsy.CT..77314
014340: 4B 11 13 4D 69 63 72 6F 20 53 61 6C 65 73 20 43 K..Micro Sales C
014350: 6F 6D 70 61 6E 79 6E 61 74 69 6F 6E 61 6C 6E 61 ompanynationalna
014360: 6C 10 36 38 37 38 20 45 61 73 74 20 41 76 65 6E l.6878 East Aven
014370: 75 65 65 65 65 2D 09 47 72 65 65 76 69 6C 6C 65 ueeee-.Greeville
014380: 77 73 79 02 43 41 00 05 33 36 37 37 37 9E 1E 1A wsy.CA..36777...
014390: 46 75 6C 6C 20 53 70 65 65 64 20 41 68 65 61 64 Full Speed Ahead
0143A0: 20 4E 61 74 6C 2E 20 43 6F 2E 6C 6E 61 6C 0F 34 Natl. Co.lnal.4
0143B0: 31 20 4E 6F 72 74 68 20 53 74 72 65 65 74 65 65 1 North Streetee
0143C0: 65 65 2D 0C 43 72 79 73 74 61 6C 20 43 69 74 79 ee-.Crystal City
0143D0: 02 54 58 00 05 37 39 37 36 31 00 24 15 4D 69 63 .TX..79761.$.Mic
0143E0: 72 6F 20 53 61 6C 65 73 20 55 6E 6C 69 6D 69 74 ro Sales Unlimit
0143F0: 65 64 2E 20 43 6F 2E 6C 6E 61 6C 11 38 39 36 33 ed. Co.lnal.8963
014400: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
014410: 11 00 01 00 02 09 52 E5 11 00 41 02 00 00 00 02 ......R...A.....
014420: 11 00 46 02 00 00 00 02 11 00 42 02 00 00 00 02 ..F.......B.....
014430: 11 00 47 02 00 00 00 02 11 00 43 02 00 00 00 02 ..G.......C.....
014440: 11 00 48 02 00 00 00 02 11 00 44 02 00 00 00 02 ..H.......D.....
014450: 11 00 49 02 00 00 00 02 11 00 45 02 00 00 00 02 ..I.......E.....
014460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
014470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
014480: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
014490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0144A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0144B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0144C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0144D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0144E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0144F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
014500: 20 4D 6F 76 69 6E 67 20 49 6E 74 65 72 6E 61 74 Moving Internat
014510: 69 6F 6E 61 6C 61 6C 6E 61 6C 0F 34 35 20 54 68 ionalalnal.45 Th
014520: 69 72 64 20 41 76 65 6E 75 65 75 65 75 65 2D 08 ird Avenueueue-.
014530: 41 62 65 72 64 65 65 6E 6B 77 73 79 02 43 41 00 Aberdeenkwsy.CA.
014540: 05 38 31 39 31 37 71 21 12 4A 6F 6E 65 73 20 26 .81917q!.Jones &
014550: 20 4A 6F 6E 65 73 20 49 6E 63 2E 61 74 69 6F 6E Jones Inc.ation
014560: 61 6C 61 6C 6E 61 6C 10 33 33 34 34 20 31 31 74 alalnal.3344 11t
014570: 68 20 53 74 72 65 65 74 65 75 65 2D 08 53 75 6E h Streeteue-.Sun
014580: 64 61 6E 63 65 6B 77 73 79 02 4D 41 00 05 35 31 dancekwsy.MA..51
014590: 32 34 38 97 08 12 54 68 65 20 42 65 73 74 20 47 248...The Best G
0145A0: 75 79 73 20 49 6E 63 2E 61 74 69 6F 6E 61 6C 61 uys Inc.ationala
0145B0: 6C 6E 61 6C 0E 39 38 20 31 31 74 68 20 53 74 72 lnal.98 11th Str
0145C0: 65 65 74 65 74 65 75 65 2D 08 48 75 6D 62 6F 6C eeteteue-.Humbol
0145D0: 64 74 6B 77 73 79 02 4D 4F 00 05 36 31 31 31 34 dtkwsy.MO..61114
0145E0: B9 21 11 4D 69 63 72 6F 20 53 61 6C 65 73 20 26 .!.Micro Sales &
0145F0: 20 43 6F 2E 2E 61 74 69 6F 6E 61 6C 61 6C 6E 61 Co..ationalalna
014600: 6C 0E 36 31 20 31 32 74 68 20 41 76 65 6E 75 65 l.61 12th Avenue
014610: 65 74 65 75 65 2D 09 46 6F 72 74 20 50 65 63 6B eteue-.Fort Peck
014620: 77 73 79 02 54 58 00 05 38 32 35 37 34 0D 14 18 wsy.TX..82574...
014630: 49 6E 70 75 74 2F 4F 75 74 70 75 74 20 43 6F 72 Input/Output Cor
014640: 70 6F 72 61 74 69 6F 6E 6C 61 6C 6E 61 6C 0F 36 porationlalnal.6
014650: 32 33 20 31 31 74 68 20 53 74 72 65 65 74 74 65 23 11th Streette
014660: 75 65 2D 0C 43 72 79 73 74 61 6C 20 43 69 74 79 ue-.Crystal City
014670: 02 41 52 00 05 33 39 38 35 31 15 19 15 4E 75 74 .AR..39851...Nut
014680: 73 20 26 20 42 6F 6C 74 73 20 61 6E 64 20 53 6F s & Bolts and So
014690: 6E 73 69 6F 6E 6C 61 6C 6E 61 6C 11 36 38 39 31 nsionlalnal.6891
0146A0: 20 46 69 72 73 74 20 53 74 72 65 65 74 75 65 2D First Streetue-
0146B0: 07 57 61 6C 6C 6F 77 61 20 43 69 74 79 02 4D 41 .Wallowa City.MA
0146C0: 00 05 39 39 32 33 32 E3 0A 19 4C 61 77 6E 20 4D ..99232...Lawn M
0146D0: 6F 76 69 6E 67 20 49 6E 74 65 72 6E 61 74 69 6F oving Internatio
0146E0: 6E 61 6C 61 6C 6E 61 6C 0F 38 38 20 4E 6F 72 74 nalalnal.88 Nort
0146F0: 68 20 53 74 72 65 65 74 65 74 75 65 2D 0B 4E 65 h Streetetue-.Ne
014700: 28 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A (***************
014710: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
014720: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
014730: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 29 20 0D 0A ************) ..
014740: 28 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (*
014750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
014760: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
014770: 20 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A *) ..
014780: 28 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (*
014790: 20 20 20 54 55 52 42 4F 2D 61 63 63 65 73 73 20 TURBO-access
0147A0: 76 65 72 73 69 6F 6E 20 31 2E 30 30 20 20 20 20 version 1.00
0147B0: 20 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A *) ..
0147C0: 28 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (*
0147D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0147E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0147F0: 20 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A *) ..
014800: 28 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (*
014810: 20 20 20 20 20 20 20 20 20 44 45 4C 4B 45 59 20 DELKEY
014820: 6D 6F 64 75 6C 65 20 20 20 20 20 20 20 20 20 20 module
014830: 20 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A *) ..
014840: 28 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (*
014850: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
014860: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
014870: 20 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A *) ..
014880: 28 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (*
014890: 20 20 20 20 20 43 6F 70 79 72 69 67 68 74 20 28 Copyright (
0148A0: 43 29 20 31 39 38 34 20 62 79 20 20 20 20 20 20 C) 1984 by
0148B0: 20 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A *) ..
0148C0: 28 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (*
0148D0: 20 20 20 20 20 20 20 20 20 20 42 4F 52 4C 41 4E BORLAN
0148E0: 44 20 49 6E 74 2E 20 20 20 20 20 20 20 20 20 20 D Int.
0148F0: 20 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A *) ..
014900: 77 20 4D 65 61 64 6F 77 73 79 02 4D 41 00 05 33 w Meadowsy.MA..3
014910: 31 38 33 35 14 26 16 4D 6F 72 65 20 6F 72 20 4C 1835.&.More or L
014920: 65 73 73 20 55 6E 6C 69 6D 69 74 65 64 6E 61 6C ess Unlimitednal
014930: 61 6C 6E 61 6C 10 38 33 36 20 46 69 66 74 68 20 alnal.836 Fifth
014940: 41 76 65 6E 75 65 74 75 65 2D 0C 43 72 79 73 74 Avenuetue-.Cryst
014950: 61 6C 20 43 69 74 79 02 43 54 00 05 37 32 37 31 al City.CT..7271
014960: 32 43 1D 13 4A 6F 6E 65 73 20 26 20 4A 6F 6E 65 2C..Jones & Jone
014970: 73 20 26 20 43 6F 2E 74 65 64 6E 61 6C 61 6C 6E s & Co.tednalaln
014980: 61 6C 10 36 34 31 20 45 69 67 74 68 20 53 74 72 al.641 Eigth Str
014990: 65 65 74 74 75 65 2D 09 47 72 65 65 76 69 6C 6C eettue-.Greevill
0149A0: 65 69 74 79 02 4D 4F 00 05 31 39 31 34 32 DF 19 eity.MO..19142..
0149B0: 1A 4E 75 74 73 20 26 20 42 6F 6C 74 73 20 49 6E .Nuts & Bolts In
0149C0: 74 65 72 6E 61 74 69 6F 6E 61 6C 6C 6E 61 6C 12 ternationallnal.
0149D0: 31 33 38 38 20 53 65 63 6F 6E 64 20 53 74 72 65 1388 Second Stre
0149E0: 65 74 65 2D 09 45 73 63 6F 6E 64 69 64 6F 69 74 ete-.Escondidoit
0149F0: 79 02 57 41 00 05 36 32 35 37 35 3D 17 17 54 68 y.WA..62575=..Th
014A00: 65 20 42 65 73 74 20 47 75 79 73 20 55 6E 6C 69 e Best Guys Unli
014A10: 6D 69 74 65 64 6E 61 6C 6C 6E 61 6C 10 32 38 33 mitednallnal.283
014A20: 35 20 31 32 74 68 20 41 76 65 6E 75 65 65 74 65 5 12th Avenueete
014A30: 2D 06 4D 61 72 69 6F 6E 69 64 6F 69 74 79 02 54 -.Marionidoity.T
014A40: 58 00 05 36 38 38 39 31 59 19 12 49 6E 70 75 74 X..68891Y..Input
014A50: 2F 4F 75 74 70 75 74 20 43 6F 72 70 2E 6D 69 74 /Output Corp.mit
014A60: 65 64 6E 61 6C 6C 6E 61 6C 11 35 36 34 20 53 65 ednallnal.564 Se
014A70: 63 6F 6E 64 20 53 74 72 65 65 74 74 65 2D 09 47 cond Streette-.G
014A80: 72 65 65 76 69 6C 6C 65 69 74 79 02 43 41 00 05 reevilleity.CA..
014A90: 33 37 38 31 31 87 15 15 42 6F 72 6C 61 6E 64 20 37811...Borland
014AA0: 49 6E 74 65 72 6E 61 74 69 6F 6E 61 6C 65 64 6E Internationaledn
014AB0: 61 6C 6C 6E 61 6C 10 37 33 33 38 20 31 32 74 68 allnal.7338 12th
014AC0: 20 53 74 72 65 65 74 74 74 65 2D 06 41 75 73 74 Streettte-.Aust
014AD0: 69 6E 6C 6C 65 69 74 79 02 54 58 00 05 35 37 33 inlleity.TX..573
014AE0: 32 37 37 1D 15 46 75 6C 6C 20 53 70 65 65 64 20 277..Full Speed
014AF0: 41 68 65 61 64 20 49 6E 63 2E 65 64 6E 61 6C 6C Ahead Inc.ednall
014B00: 28 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 (*
014B10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
014B20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
014B30: 20 20 20 20 20 20 20 20 20 20 20 2A 29 20 0D 0A *) ..
014B40: 28 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A (***************
014B50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
014B60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
014B70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 29 0D 0A 20 ************)..
014B80: 0D 0A 28 2A 24 41 2B 2C 52 2D 2A 29 0D 0A 0D 0A ..(*$A+,R-*)....
014B90: 70 72 6F 63 65 64 75 72 65 20 44 65 6C 65 74 65 procedure Delete
014BA0: 4B 65 79 28 76 61 72 20 49 64 78 46 20 20 20 20 Key(var IdxF
014BB0: 20 20 20 3A 20 49 6E 64 65 78 46 69 6C 65 3B 0D : IndexFile;.
014BC0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
014BD0: 20 20 20 20 20 76 61 72 20 50 72 6F 63 44 61 74 var ProcDat
014BE0: 52 65 66 20 3A 20 49 6E 74 65 67 65 72 3B 0D 0A Ref : Integer;..
014BF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
014C00: 20 20 20 20 76 61 72 20 50 72 6F 63 4B 65 79 20 var ProcKey
014C10: 20 20 20 20 20 20 20 20 20 20 20 20 20 29 3B 0D );.
014C20: 0A 76 61 72 0D 0A 20 20 50 4B 65 79 20 20 20 20 .var.. PKey
014C30: 20 20 20 20 20 3A 20 54 61 4B 65 79 53 74 72 20 : TaKeyStr
014C40: 61 62 73 6F 6C 75 74 65 20 50 72 6F 63 4B 65 79 absolute ProcKey
014C50: 3B 0D 0A 20 20 50 61 67 65 54 6F 6F 53 6D 61 6C ;.. PageTooSmal
014C60: 6C 20 3A 20 42 6F 6F 6C 65 61 6E 3B 0D 0A 20 20 l : Boolean;..
014C70: 50 61 67 50 74 72 20 20 20 20 20 20 20 3A 20 54 PagPtr : T
014C80: 61 50 61 67 65 50 74 72 3B 0D 0A 20 0D 0A 28 2A aPagePtr;.. ..(*
014C90: 24 41 2D 2A 29 0D 0A 0D 0A 70 72 6F 63 65 64 75 $A-*)....procedu
014CA0: 72 65 20 44 65 6C 42 28 50 72 50 67 52 65 66 20 re DelB(PrPgRef
014CB0: 3A 20 49 6E 74 65 67 65 72 29 3B 0D 0A 76 61 72 : Integer);..var
014CC0: 0D 0A 20 20 43 2C 49 2C 4B 2C 4C 2C 52 2C 0D 0A .. C,I,K,L,R,..
014CD0: 20 20 58 50 61 67 65 52 65 66 20 20 3A 20 49 6E XPageRef : In
014CE0: 74 65 67 65 72 3B 0D 0A 20 20 50 61 67 50 74 72 teger;.. PagPtr
014CF0: 20 20 20 20 3A 20 54 61 50 61 67 65 50 74 72 3B : TaPagePtr;
014D00: 6E 61 6C 0F 38 32 20 53 6F 75 74 68 20 53 74 72 nal.82 South Str
014D10: 65 65 74 74 74 74 65 2D 09 45 73 63 6F 6E 64 69 eetttte-.Escondi
014D20: 64 6F 69 74 79 02 49 4C 00 05 32 31 36 31 37 96 doity.IL..21617.
014D30: 22 12 4D 6F 72 65 20 6F 72 20 4C 65 73 73 20 43 ".More or Less C
014D40: 6F 72 70 2E 6E 63 2E 65 64 6E 61 6C 6C 6E 61 6C orp.nc.ednallnal
014D50: 0F 34 39 20 46 69 66 74 68 20 53 74 72 65 65 74 .49 Fifth Street
014D60: 74 74 74 65 2D 04 42 61 74 68 6E 64 69 64 6F 69 ttte-.Bathndidoi
014D70: 74 79 02 41 52 00 05 35 33 33 38 31 F1 25 13 42 ty.AR..53381.%.B
014D80: 6F 72 6C 61 6E 64 20 43 6F 72 70 6F 72 61 74 69 orland Corporati
014D90: 6F 6E 63 2E 65 64 6E 61 6C 6C 6E 61 6C 0F 31 33 onc.ednallnal.13
014DA0: 36 20 31 30 74 68 20 41 76 65 6E 75 65 74 74 74 6 10th Avenuettt
014DB0: 65 2D 04 42 61 74 68 6E 64 69 64 6F 69 74 79 02 e-.Bathndidoity.
014DC0: 57 41 00 05 33 35 39 34 38 9F 15 16 46 75 6C 6C WA..35948...Full
014DD0: 20 53 70 65 65 64 20 41 68 65 61 64 20 26 20 43 Speed Ahead & C
014DE0: 6F 2E 64 6E 61 6C 6C 6E 61 6C 0F 32 37 33 33 20 o.dnallnal.2733
014DF0: 39 74 68 20 53 74 72 65 65 74 74 74 74 65 2D 07 9th Streetttte-.
014E00: 57 61 6C 6C 6F 77 61 64 6F 69 74 79 02 41 52 00 Wallowadoity.AR.
014E10: 05 31 36 33 38 35 B7 18 16 46 75 6C 6C 20 53 70 .16385...Full Sp
014E20: 65 65 64 20 41 68 65 61 64 20 26 20 43 6F 2E 64 eed Ahead & Co.d
014E30: 6E 61 6C 6C 6E 61 6C 11 38 32 36 36 20 46 69 66 nallnal.8266 Fif
014E40: 74 68 20 41 76 65 6E 75 65 74 65 2D 09 47 72 65 th Avenuete-.Gre
014E50: 65 76 69 6C 6C 65 69 74 79 02 4E 59 00 05 34 38 evilleity.NY..48
014E60: 32 33 35 23 0E 18 46 75 6C 6C 20 53 70 65 65 64 235#..Full Speed
014E70: 20 41 68 65 61 64 20 43 6F 6D 70 61 6E 79 61 6C Ahead Companyal
014E80: 6C 6E 61 6C 11 38 31 37 32 20 53 69 78 74 68 20 lnal.8172 Sixth
014E90: 41 76 65 6E 75 65 74 65 2D 0C 43 72 79 73 74 61 Avenuete-.Crysta
014EA0: 6C 20 43 69 74 79 02 49 4C 00 05 32 31 34 33 35 l City.IL..21435
014EB0: 81 04 11 4D 69 63 72 6F 20 53 61 6C 65 73 20 43 ...Micro Sales C
014EC0: 6F 72 70 2E 43 6F 6D 70 61 6E 79 61 6C 6C 6E 61 orp.Companyallna
014ED0: 6C 10 35 31 31 20 53 6F 75 74 68 20 41 76 65 6E l.511 South Aven
014EE0: 75 65 65 74 65 2D 08 41 62 65 72 64 65 65 6E 43 ueete-.AberdeenC
014EF0: 69 74 79 02 43 54 00 05 32 35 36 37 33 A0 26 11 ity.CT..25673.&.
014F00: 0D 0A 20 0D 0A 28 2A 24 41 2B 2A 29 0D 0A 0D 0A .. ..(*$A+*)....
014F10: 70 72 6F 63 65 64 75 72 65 20 55 6E 64 65 72 46 procedure UnderF
014F20: 6C 6F 77 28 50 72 50 67 52 65 66 2C 0D 0A 20 20 low(PrPgRef,..
014F30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
014F40: 20 20 50 72 50 67 52 65 66 32 2C 0D 0A 20 20 20 PrPgRef2,..
014F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
014F60: 20 52 20 20 20 20 20 20 20 20 3A 20 49 6E 74 65 R : Inte
014F70: 67 65 72 29 3B 0D 0A 76 61 72 0D 0A 20 20 49 2C ger);..var.. I,
014F80: 4B 2C 0D 0A 20 20 4C 49 74 65 6D 2C 0D 0A 20 20 K,.. LItem,..
014F90: 4C 50 61 67 65 52 65 66 20 3A 20 49 6E 74 65 67 LPageRef : Integ
014FA0: 65 72 3B 0D 0A 20 20 50 61 67 50 74 72 2C 0D 0A er;.. PagPtr,..
014FB0: 20 20 50 61 67 65 50 74 72 32 2C 0D 0A 20 20 4C PagePtr2,.. L
014FC0: 20 20 20 20 20 20 20 20 3A 20 54 61 50 61 67 65 : TaPage
014FD0: 50 74 72 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 54 Ptr;..begin.. T
014FE0: 61 47 65 74 50 61 67 65 28 49 64 78 46 2C 50 72 aGetPage(IdxF,Pr
014FF0: 50 67 52 65 66 2C 50 61 67 50 74 72 29 3B 20 0D PgRef,PagPtr); .
015000: 0A 20 20 54 61 47 65 74 50 61 67 65 28 49 64 78 . TaGetPage(Idx
015010: 46 2C 50 72 50 67 52 65 66 32 2C 50 61 67 65 50 F,PrPgRef2,PageP
015020: 74 72 32 29 3B 0D 0A 20 20 69 66 20 52 20 3C 20 tr2);.. if R <
015030: 50 61 67 50 74 72 5E 2E 49 74 65 6D 73 4F 6E 50 PagPtr^.ItemsOnP
015040: 61 67 65 20 74 68 65 6E 0D 0A 20 20 62 65 67 69 age then.. begi
015050: 6E 0D 0A 20 20 20 20 52 20 3A 3D 20 52 20 2B 20 n.. R := R +
015060: 31 3B 20 0D 0A 20 20 20 20 4C 50 61 67 65 52 65 1; .. LPageRe
015070: 66 20 3A 3D 20 50 61 67 50 74 72 5E 2E 49 74 65 f := PagPtr^.Ite
015080: 6D 41 72 72 61 79 5B 52 5D 2E 50 61 67 65 52 65 mArray[R].PageRe
015090: 66 3B 20 0D 0A 20 20 20 20 54 61 47 65 74 50 61 f; .. TaGetPa
0150A0: 67 65 28 49 64 78 46 2C 4C 50 61 67 65 52 65 66 ge(IdxF,LPageRef
0150B0: 2C 4C 29 3B 0D 0A 20 20 20 20 4B 20 3A 3D 20 28 ,L);.. K := (
0150C0: 4C 5E 2E 49 74 65 6D 73 4F 6E 50 61 67 65 20 2D L^.ItemsOnPage -
0150D0: 20 4F 72 64 65 72 20 2B 20 31 29 20 64 69 76 20 Order + 1) div
0150E0: 32 3B 0D 0A 20 20 20 20 50 61 67 65 50 74 72 32 2;.. PagePtr2
0150F0: 5E 2E 49 74 65 6D 41 72 72 61 79 5B 4F 72 64 65 ^.ItemArray[Orde
015100: 4D 69 63 72 6F 20 53 61 6C 65 73 20 43 6F 72 70 Micro Sales Corp
015110: 2E 43 6F 6D 70 61 6E 79 61 6C 6C 6E 61 6C 10 32 .Companyallnal.2
015120: 39 39 20 46 69 66 74 68 20 41 76 65 6E 75 65 65 99 Fifth Avenuee
015130: 74 65 2D 06 4D 61 72 69 6F 6E 65 6E 43 69 74 79 te-.MarionenCity
015140: 02 4D 4F 00 05 34 32 32 37 39 C2 0C 13 4A 6F 6E .MO..42279...Jon
015150: 65 73 20 26 20 4A 6F 6E 65 73 20 43 6F 72 70 2E es & Jones Corp.
015160: 6D 70 61 6E 79 61 6C 6C 6E 61 6C 0F 38 38 20 4E mpanyallnal.88 N
015170: 6F 72 74 68 20 53 74 72 65 65 74 65 65 74 65 2D orth Streeteete-
015180: 08 53 75 6E 64 61 6E 63 65 43 69 74 79 02 4E 59 .SundanceCity.NY
015190: 00 05 37 35 38 38 33 F6 21 13 4A 6F 6E 65 73 20 ..75883.!.Jones
0151A0: 26 20 4A 6F 6E 65 73 20 43 6F 72 70 2E 6D 70 61 & Jones Corp.mpa
0151B0: 6E 79 61 6C 6C 6E 61 6C 11 34 36 31 35 20 53 6F nyallnal.4615 So
0151C0: 75 74 68 20 53 74 72 65 65 74 74 65 2D 07 57 61 uth Streette-.Wa
0151D0: 6C 6C 6F 77 61 65 43 69 74 79 02 49 4C 00 05 34 llowaeCity.IL..4
0151E0: 37 32 32 35 0F 18 19 4A 6F 6E 65 73 20 26 20 4A 7225...Jones & J
0151F0: 6F 6E 65 73 20 43 6F 72 70 6F 72 61 74 69 6F 6E ones Corporation
015200: 6C 6C 6E 61 6C 11 35 36 39 34 20 53 69 78 74 68 llnal.5694 Sixth
015210: 20 41 76 65 6E 75 65 74 65 2D 06 4D 61 72 69 6F Avenuete-.Mario
015220: 6E 61 65 43 69 74 79 02 4D 41 00 05 36 32 34 38 naeCity.MA..6248
015230: 38 33 0D 1B 4A 6F 6E 65 73 20 26 20 4A 6F 6E 65 83..Jones & Jone
015240: 73 20 49 6E 74 65 72 6E 61 74 69 6F 6E 61 6C 6E s Internationaln
015250: 61 6C 0E 32 36 34 20 39 74 68 20 53 74 72 65 65 al.264 9th Stree
015260: 74 6E 75 65 74 65 2D 06 57 61 62 61 73 68 61 65 tnuete-.Wabashae
015270: 43 69 74 79 02 43 41 00 05 38 38 33 38 34 05 11 City.CA..88384..
015280: 16 4E 75 74 73 20 26 20 42 6F 6C 74 73 20 55 6E .Nuts & Bolts Un
015290: 6C 69 6D 69 74 65 64 69 6F 6E 61 6C 6E 61 6C 10 limitedionalnal.
0152A0: 31 39 34 20 54 68 69 72 64 20 41 76 65 6E 75 65 194 Third Avenue
0152B0: 65 74 65 2D 07 53 68 65 6C 74 6F 6E 65 43 69 74 ete-.SheltoneCit
0152C0: 79 02 43 4F 00 05 34 33 33 35 34 88 10 1B 54 68 y.CO..43354...Th
0152D0: 65 20 42 65 73 74 20 47 75 79 73 20 49 6E 74 65 e Best Guys Inte
0152E0: 72 6E 61 74 69 6F 6E 61 6C 6E 61 6C 0F 37 39 39 rnationalnal.799
0152F0: 20 31 32 74 68 20 53 74 72 65 65 74 65 65 74 65 12th Streeteete
015300: 72 5D 20 3A 3D 20 50 61 67 50 74 72 5E 2E 49 74 r] := PagPtr^.It
015310: 65 6D 41 72 72 61 79 5B 52 5D 3B 20 0D 0A 20 20 emArray[R]; ..
015320: 20 20 50 61 67 65 50 74 72 32 5E 2E 49 74 65 6D PagePtr2^.Item
015330: 41 72 72 61 79 5B 4F 72 64 65 72 5D 2E 50 61 67 Array[Order].Pag
015340: 65 52 65 66 20 3A 3D 20 4C 5E 2E 42 63 6B 77 50 eRef := L^.BckwP
015350: 61 67 65 52 65 66 3B 0D 0A 20 20 20 20 69 66 20 ageRef;.. if
015360: 4B 20 3E 20 30 20 74 68 65 6E 0D 0A 20 20 20 20 K > 0 then..
015370: 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 66 6F 72 begin.. for
015380: 20 49 20 3A 3D 20 31 20 74 6F 20 4B 20 2D 20 31 I := 1 to K - 1
015390: 20 64 6F 20 0D 0A 20 20 20 20 20 20 20 20 50 61 do .. Pa
0153A0: 67 65 50 74 72 32 5E 2E 49 74 65 6D 41 72 72 61 gePtr2^.ItemArra
0153B0: 79 5B 49 20 2B 20 4F 72 64 65 72 5D 20 3A 3D 20 y[I + Order] :=
0153C0: 4C 5E 2E 49 74 65 6D 41 72 72 61 79 5B 49 5D 3B L^.ItemArray[I];
0153D0: 0D 0A 20 20 20 20 20 20 50 61 67 50 74 72 5E 2E .. PagPtr^.
0153E0: 49 74 65 6D 41 72 72 61 79 5B 52 5D 20 3A 3D 20 ItemArray[R] :=
0153F0: 4C 5E 2E 49 74 65 6D 41 72 72 61 79 5B 4B 5D 3B L^.ItemArray[K];
015400: 20 0D 0A 20 20 20 20 20 20 50 61 67 50 74 72 5E .. PagPtr^
015410: 2E 49 74 65 6D 41 72 72 61 79 5B 52 5D 2E 50 61 .ItemArray[R].Pa
015420: 67 65 52 65 66 20 3A 3D 20 4C 50 61 67 65 52 65 geRef := LPageRe
015430: 66 3B 0D 0A 20 20 20 20 20 20 4C 5E 2E 42 63 6B f;.. L^.Bck
015440: 77 50 61 67 65 52 65 66 20 3A 3D 20 4C 5E 2E 49 wPageRef := L^.I
015450: 74 65 6D 41 72 72 61 79 5B 4B 5D 2E 50 61 67 65 temArray[K].Page
015460: 52 65 66 3B 20 0D 0A 20 20 20 20 20 20 4C 5E 2E Ref; .. L^.
015470: 49 74 65 6D 73 4F 6E 50 61 67 65 20 3A 3D 20 4C ItemsOnPage := L
015480: 5E 2E 49 74 65 6D 73 4F 6E 50 61 67 65 20 2D 20 ^.ItemsOnPage -
015490: 4B 3B 0D 0A 20 20 20 20 20 20 66 6F 72 20 49 20 K;.. for I
0154A0: 3A 3D 20 31 20 74 6F 20 4C 5E 2E 49 74 65 6D 73 := 1 to L^.Items
0154B0: 4F 6E 50 61 67 65 20 64 6F 20 0D 0A 20 20 20 20 OnPage do ..
0154C0: 20 20 20 20 4C 5E 2E 49 74 65 6D 41 72 72 61 79 L^.ItemArray
0154D0: 5B 49 5D 20 3A 3D 20 4C 5E 2E 49 74 65 6D 41 72 [I] := L^.ItemAr
0154E0: 72 61 79 5B 49 20 2B 20 4B 5D 3B 0D 0A 20 20 20 ray[I + K];..
0154F0: 20 20 20 50 61 67 65 50 74 72 32 5E 2E 49 74 65 PagePtr2^.Ite
015500: 2D 06 41 75 73 74 69 6E 6E 65 43 69 74 79 02 49 -.AustinneCity.I
015510: 4C 00 05 36 38 32 38 32 6F 6E 61 6C 6E 61 6C 10 L..68282onalnal.
015520: 31 39 34 20 54 68 69 72 64 20 41 76 65 6E 75 65 194 Third Avenue
015530: 65 74 65 2D 07 53 68 65 6C 74 6F 6E 65 43 69 74 ete-.SheltoneCit
015540: 79 02 43 4F 00 05 34 33 33 35 34 88 10 1B 54 68 y.CO..43354...Th
015550: 65 20 42 65 73 74 20 47 75 79 73 20 49 6E 74 65 e Best Guys Inte
015560: 72 6E 61 74 69 6F 6E 61 6C 6E 61 6C 0F 37 39 39 rnationalnal.799
015570: 20 31 32 74 68 20 53 74 72 65 65 74 65 65 74 65 12th Streeteete
015580: 08 53 75 6E 64 61 6E 63 65 43 69 74 79 02 4E 59 .SundanceCity.NY
015590: 00 05 37 35 38 38 33 F6 21 13 4A 6F 6E 65 73 20 ..75883.!.Jones
0155A0: 26 20 4A 6F 6E 65 73 20 43 6F 72 70 2E 6D 70 61 & Jones Corp.mpa
0155B0: 6E 79 61 6C 6C 6E 61 6C 11 34 36 31 35 20 53 6F nyallnal.4615 So
0155C0: 75 74 68 20 53 74 72 65 65 74 74 65 2D 07 57 61 uth Streette-.Wa
0155D0: 6C 6C 6F 77 61 65 43 69 74 79 02 49 4C 00 05 34 llowaeCity.IL..4
0155E0: 37 32 32 35 0F 18 19 4A 6F 6E 65 73 20 26 20 4A 7225...Jones & J
0155F0: 6F 6E 65 73 20 43 6F 72 70 6F 72 61 74 69 6F 6E ones Corporation
015600: 6C 6C 6E 61 6C 11 35 36 39 34 20 53 69 78 74 68 llnal.5694 Sixth
015610: 20 41 76 65 6E 75 65 74 65 2D 06 4D 61 72 69 6F Avenuete-.Mario
015620: 6E 61 65 43 69 74 79 02 4D 41 00 05 36 32 34 38 naeCity.MA..6248
015630: 38 33 0D 1B 4A 6F 6E 65 73 20 26 20 4A 6F 6E 65 83..Jones & Jone
015640: 73 20 49 6E 74 65 72 6E 61 74 69 6F 6E 61 6C 6E s Internationaln
015650: 61 6C 0E 32 36 34 20 39 74 68 20 53 74 72 65 65 al.264 9th Stree
015660: 74 6E 75 65 74 65 2D 06 57 61 62 61 73 68 61 65 tnuete-.Wabashae
015670: 43 69 74 79 02 43 41 00 05 38 38 33 38 34 05 11 City.CA..88384..
015680: 16 4E 75 74 73 20 26 20 42 6F 6C 74 73 20 55 6E .Nuts & Bolts Un
015690: 6C 69 6D 69 74 65 64 69 6F 6E 61 6C 6E 61 6C 10 limitedionalnal.
0156A0: 31 39 34 20 54 68 69 72 64 20 41 76 65 6E 75 65 194 Third Avenue
0156B0: 65 74 65 2D 07 53 68 65 6C 74 6F 6E 65 43 69 74 ete-.SheltoneCit
0156C0: 79 02 43 4F 00 05 34 33 33 35 34 88 10 1B 54 68 y.CO..43354...Th
0156D0: 65 20 42 65 73 74 20 47 75 79 73 20 49 6E 74 65 e Best Guys Inte
0156E0: 72 6E 61 74 69 6F 6E 61 6C 6E 61 6C 0F 37 39 39 rnationalnal.799
0156F0: 20 31 32 74 68 20 53 74 72 65 65 74 65 65 74 65 12th Streeteete
015700: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
015710: 12 00 01 00 02 09 52 E5 12 00 41 02 00 00 00 02 ......R...A.....
015720: 12 00 46 02 00 00 00 02 12 00 42 02 00 00 00 02 ..F.......B.....
015730: 12 00 47 02 00 00 00 02 12 00 43 02 00 00 00 02 ..G.......C.....
015740: 12 00 48 02 00 00 00 02 12 00 44 02 00 00 00 02 ..H.......D.....
015750: 12 00 49 02 00 00 00 02 12 00 45 02 00 00 00 02 ..I.......E.....
015760: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015770: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015780: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015790: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0157A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0157B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0157C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0157D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0157E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0157F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015800: 6D 73 4F 6E 50 61 67 65 20 3A 3D 20 4F 72 64 65 msOnPage := Orde
015810: 72 20 2D 20 31 20 2B 20 4B 3B 20 0D 0A 20 20 20 r - 1 + K; ..
015820: 20 20 20 50 61 67 65 54 6F 6F 53 6D 61 6C 6C 20 PageTooSmall
015830: 3A 3D 20 66 61 6C 73 65 3B 20 0D 0A 20 20 20 20 := false; ..
015840: 20 20 54 61 55 70 64 61 74 65 50 61 67 65 28 4C TaUpdatePage(L
015850: 29 3B 0D 0A 20 20 20 20 65 6E 64 0D 0A 20 20 20 );.. end..
015860: 20 65 6C 73 65 0D 0A 20 20 20 20 62 65 67 69 6E else.. begin
015870: 0D 0A 20 20 20 20 20 20 66 6F 72 20 49 20 3A 3D .. for I :=
015880: 20 31 20 74 6F 20 4F 72 64 65 72 20 64 6F 20 0D 1 to Order do .
015890: 0A 20 20 20 20 20 20 20 20 50 61 67 65 50 74 72 . PagePtr
0158A0: 32 5E 2E 49 74 65 6D 41 72 72 61 79 5B 49 20 2B 2^.ItemArray[I +
0158B0: 20 4F 72 64 65 72 5D 20 3A 3D 20 4C 5E 2E 49 74 Order] := L^.It
0158C0: 65 6D 41 72 72 61 79 5B 49 5D 3B 0D 0A 20 20 20 emArray[I];..
0158D0: 20 20 20 66 6F 72 20 49 20 3A 3D 20 52 20 74 6F for I := R to
0158E0: 20 50 61 67 50 74 72 5E 2E 49 74 65 6D 73 4F 6E PagPtr^.ItemsOn
0158F0: 50 61 67 65 20 2D 20 31 20 64 6F 20 0D 0A 20 20 Page - 1 do ..
015900: 20 20 20 20 20 20 50 61 67 50 74 72 5E 2E 49 74 PagPtr^.It
015910: 65 6D 41 72 72 61 79 5B 49 5D 20 3A 3D 20 50 61 emArray[I] := Pa
015920: 67 50 74 72 5E 2E 49 74 65 6D 41 72 72 61 79 5B gPtr^.ItemArray[
015930: 49 20 2B 20 31 5D 3B 0D 0A 20 20 20 20 20 20 50 I + 1];.. P
015940: 61 67 65 50 74 72 32 5E 2E 49 74 65 6D 73 4F 6E agePtr2^.ItemsOn
015950: 50 61 67 65 20 3A 3D 20 50 61 67 65 53 69 7A 65 Page := PageSize
015960: 3B 20 0D 0A 20 20 20 20 20 20 50 61 67 50 74 72 ; .. PagPtr
015970: 5E 2E 49 74 65 6D 73 4F 6E 50 61 67 65 20 3A 3D ^.ItemsOnPage :=
015980: 20 50 61 67 50 74 72 5E 2E 49 74 65 6D 73 4F 6E PagPtr^.ItemsOn
015990: 50 61 67 65 20 2D 20 31 3B 20 0D 0A 20 20 20 20 Page - 1; ..
0159A0: 20 20 54 61 52 65 74 75 72 6E 50 61 67 65 28 4C TaReturnPage(L
0159B0: 29 3B 0D 0A 20 20 20 20 20 20 50 61 67 65 54 6F );.. PageTo
0159C0: 6F 53 6D 61 6C 6C 20 3A 3D 20 50 61 67 50 74 72 oSmall := PagPtr
0159D0: 5E 2E 49 74 65 6D 73 4F 6E 50 61 67 65 20 3C 20 ^.ItemsOnPage <
0159E0: 4F 72 64 65 72 3B 0D 0A 20 20 20 20 65 6E 64 3B Order;.. end;
0159F0: 0D 0A 20 20 20 20 54 61 55 70 64 61 74 65 50 61 .. TaUpdatePa
015A00: 20 20 50 61 67 65 54 6F 6F 53 6D 61 6C 6C 20 3A PageTooSmall :
015A10: 3D 20 49 74 65 6D 73 4F 6E 50 61 67 65 20 3C 20 = ItemsOnPage <
015A20: 4F 72 64 65 72 3B 0D 0A 20 20 20 20 20 20 54 61 Order;.. Ta
015A30: 55 70 64 61 74 65 50 61 67 65 28 50 61 67 50 74 UpdatePage(PagPt
015A40: 72 29 3B 20 0D 0A 20 20 20 20 20 20 54 61 55 70 r); .. TaUp
015A50: 64 61 74 65 50 61 67 65 28 50 61 67 65 50 74 72 datePage(PagePtr
015A60: 32 29 3B 0D 0A 20 20 20 20 65 6E 64 3B 0D 0A 20 2);.. end;..
015A70: 20 65 6E 64 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 62 end;..end;....b
015A80: 65 67 69 6E 0D 0A 20 20 69 66 20 50 72 50 67 52 egin.. if PrPgR
015A90: 65 66 20 3D 20 30 20 74 68 65 6E 0D 0A 20 20 62 ef = 0 then.. b
015AA0: 65 67 69 6E 0D 0A 20 20 20 20 4F 4B 20 3A 3D 20 egin.. OK :=
015AB0: 66 61 6C 73 65 3B 20 0D 0A 20 20 20 20 50 61 67 false; .. Pag
015AC0: 65 54 6F 6F 53 6D 61 6C 6C 20 3A 3D 20 66 61 6C eTooSmall := fal
015AD0: 73 65 3B 0D 0A 20 20 65 6E 64 0D 0A 20 20 65 6C se;.. end.. el
015AE0: 73 65 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 20 se.. begin..
015AF0: 20 54 61 47 65 74 50 61 67 65 28 49 64 78 46 2C TaGetPage(IdxF,
015B00: 50 72 50 67 52 65 66 2C 50 61 67 50 74 72 29 3B PrPgRef,PagPtr);
015B10: 0D 0A 20 20 20 20 77 69 74 68 20 50 61 67 50 74 .. with PagPt
015B20: 72 5E 20 64 6F 0D 0A 20 20 20 20 62 65 67 69 6E r^ do.. begin
015B30: 0D 0A 20 20 20 20 20 20 4C 20 3A 3D 20 31 3B 20 .. L := 1;
015B40: 0D 0A 20 20 20 20 20 20 52 20 3A 3D 20 49 74 65 .. R := Ite
015B50: 6D 73 4F 6E 50 61 67 65 3B 0D 0A 20 20 20 20 20 msOnPage;..
015B60: 20 72 65 70 65 61 74 0D 0A 20 20 20 20 20 20 20 repeat..
015B70: 20 4B 20 3A 3D 20 28 4C 20 2B 20 52 29 20 64 69 K := (L + R) di
015B80: 76 20 32 3B 0D 0A 20 20 20 20 20 20 20 20 43 20 v 2;.. C
015B90: 3A 3D 20 54 61 43 6F 6D 70 4B 65 79 73 28 50 4B := TaCompKeys(PK
015BA0: 65 79 2C 0D 0A 20 20 20 20 20 20 20 20 20 20 20 ey,..
015BB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 49 74 65 Ite
015BC0: 6D 41 72 72 61 79 5B 4B 5D 2E 4B 65 79 2C 0D 0A mArray[K].Key,..
015BD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
015BE0: 20 20 20 20 20 20 20 20 50 72 6F 63 44 61 74 52 ProcDatR
015BF0: 65 66 2C 0D 0A 20 20 20 20 20 20 20 20 20 20 20 ef,..
015C00: 67 65 28 50 61 67 65 50 74 72 32 29 3B 0D 0A 20 ge(PagePtr2);..
015C10: 20 65 6E 64 0D 0A 20 20 65 6C 73 65 0D 0A 20 20 end.. else..
015C20: 62 65 67 69 6E 0D 0A 20 20 20 20 69 66 20 52 20 begin.. if R
015C30: 3D 20 31 20 74 68 65 6E 20 0D 0A 20 20 20 20 20 = 1 then ..
015C40: 20 4C 50 61 67 65 52 65 66 20 3A 3D 20 50 61 67 LPageRef := Pag
015C50: 50 74 72 5E 2E 42 63 6B 77 50 61 67 65 52 65 66 Ptr^.BckwPageRef
015C60: 0D 0A 20 20 20 20 65 6C 73 65 20 4C 50 61 67 65 .. else LPage
015C70: 52 65 66 20 3A 3D 20 50 61 67 50 74 72 5E 2E 49 Ref := PagPtr^.I
015C80: 74 65 6D 41 72 72 61 79 5B 52 20 2D 20 31 5D 2E temArray[R - 1].
015C90: 50 61 67 65 52 65 66 3B 20 0D 0A 20 20 20 20 54 PageRef; .. T
015CA0: 61 47 65 74 50 61 67 65 28 49 64 78 46 2C 4C 50 aGetPage(IdxF,LP
015CB0: 61 67 65 52 65 66 2C 4C 29 3B 0D 0A 20 20 20 20 ageRef,L);..
015CC0: 4C 49 74 65 6D 20 3A 3D 20 4C 5E 2E 49 74 65 6D LItem := L^.Item
015CD0: 73 4F 6E 50 61 67 65 20 2B 20 31 3B 20 0D 0A 20 sOnPage + 1; ..
015CE0: 20 20 20 4B 20 3A 3D 20 28 4C 49 74 65 6D 20 2D K := (LItem -
015CF0: 20 4F 72 64 65 72 29 20 64 69 76 20 32 3B 0D 0A Order) div 2;..
015D00: 20 20 20 20 69 66 20 4B 20 3E 20 30 20 74 68 65 if K > 0 the
015D10: 6E 0D 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 n.. begin..
015D20: 20 20 20 20 66 6F 72 20 49 20 3A 3D 20 4F 72 64 for I := Ord
015D30: 65 72 20 2D 20 31 20 64 6F 77 6E 74 6F 20 31 20 er - 1 downto 1
015D40: 64 6F 20 0D 0A 20 20 20 20 20 20 20 20 50 61 67 do .. Pag
015D50: 65 50 74 72 32 5E 2E 49 74 65 6D 41 72 72 61 79 ePtr2^.ItemArray
015D60: 5B 49 20 2B 20 4B 5D 20 3A 3D 20 50 61 67 65 50 [I + K] := PageP
015D70: 74 72 32 5E 2E 49 74 65 6D 41 72 72 61 79 5B 49 tr2^.ItemArray[I
015D80: 5D 3B 0D 0A 20 20 20 20 20 20 50 61 67 65 50 74 ];.. PagePt
015D90: 72 32 5E 2E 49 74 65 6D 41 72 72 61 79 5B 4B 5D r2^.ItemArray[K]
015DA0: 20 3A 3D 20 50 61 67 50 74 72 5E 2E 49 74 65 6D := PagPtr^.Item
015DB0: 41 72 72 61 79 5B 52 5D 3B 20 0D 0A 20 20 20 20 Array[R]; ..
015DC0: 20 20 50 61 67 65 50 74 72 32 5E 2E 49 74 65 6D PagePtr2^.Item
015DD0: 41 72 72 61 79 5B 4B 5D 2E 50 61 67 65 52 65 66 Array[K].PageRef
015DE0: 20 3A 3D 20 50 61 67 65 50 74 72 32 5E 2E 42 63 := PagePtr2^.Bc
015DF0: 6B 77 50 61 67 65 52 65 66 3B 20 0D 0A 20 20 20 kwPageRef; ..
015E00: 20 20 20 20 20 20 20 20 20 20 20 20 20 49 74 65 Ite
015E10: 6D 41 72 72 61 79 5B 4B 5D 2E 44 61 74 61 52 65 mArray[K].DataRe
015E20: 66 2C 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 f,..
015E30: 20 20 20 20 20 20 20 20 20 20 20 20 49 64 78 46 IdxF
015E40: 2E 41 6C 6C 6F 77 44 75 70 6C 4B 65 79 73 20 20 .AllowDuplKeys
015E50: 20 29 3B 0D 0A 20 20 20 20 20 20 20 20 69 66 20 );.. if
015E60: 43 20 3C 3D 20 30 20 74 68 65 6E 20 0D 0A 20 20 C <= 0 then ..
015E70: 20 20 20 20 20 20 20 20 52 20 3A 3D 20 4B 20 2D R := K -
015E80: 20 31 3B 0D 0A 20 20 20 20 20 20 20 20 69 66 20 1;.. if
015E90: 43 20 3E 3D 20 30 20 74 68 65 6E 20 0D 0A 20 20 C >= 0 then ..
015EA0: 20 20 20 20 20 20 20 20 4C 20 3A 3D 20 4B 20 2B L := K +
015EB0: 20 31 3B 0D 0A 20 20 20 20 20 20 75 6E 74 69 6C 1;.. until
015EC0: 20 4C 20 3E 20 52 3B 0D 0A 20 20 20 20 20 20 69 L > R;.. i
015ED0: 66 20 52 20 3D 20 30 20 74 68 65 6E 20 0D 0A 20 f R = 0 then ..
015EE0: 20 20 20 20 20 20 20 58 50 61 67 65 52 65 66 20 XPageRef
015EF0: 3A 3D 20 42 63 6B 77 50 61 67 65 52 65 66 0D 0A := BckwPageRef..
015F00: 20 20 20 20 20 20 65 6C 73 65 20 58 50 61 67 65 else XPage
015F10: 52 65 66 20 3A 3D 20 49 74 65 6D 41 72 72 61 79 Ref := ItemArray
015F20: 5B 52 5D 2E 50 61 67 65 52 65 66 3B 0D 0A 20 20 [R].PageRef;..
015F30: 20 20 20 20 69 66 20 4C 20 2D 20 52 20 3E 20 31 if L - R > 1
015F40: 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 62 65 67 then.. beg
015F50: 69 6E 0D 0A 09 50 72 6F 63 44 61 74 52 65 66 20 in...ProcDatRef
015F60: 3A 3D 20 49 74 65 6D 41 72 72 61 79 5B 4B 5D 2E := ItemArray[K].
015F70: 44 61 74 61 52 65 66 3B 0D 0A 09 69 66 20 58 50 DataRef;...if XP
015F80: 61 67 65 52 65 66 20 3D 20 30 20 74 68 65 6E 0D ageRef = 0 then.
015F90: 0A 09 62 65 67 69 6E 0D 0A 09 20 20 49 74 65 6D ..begin... Item
015FA0: 73 4F 6E 50 61 67 65 20 3A 3D 20 49 74 65 6D 73 sOnPage := Items
015FB0: 4F 6E 50 61 67 65 20 2D 20 31 3B 20 0D 0A 20 20 OnPage - 1; ..
015FC0: 20 20 20 20 20 20 20 20 50 61 67 65 54 6F 6F 53 PageTooS
015FD0: 6D 61 6C 6C 20 3A 3D 20 49 74 65 6D 73 4F 6E 50 mall := ItemsOnP
015FE0: 61 67 65 20 3C 20 4F 72 64 65 72 3B 0D 0A 09 20 age < Order;...
015FF0: 20 66 6F 72 20 49 20 3A 3D 20 4B 20 74 6F 20 49 for I := K to I
016000: 20 20 20 4C 49 74 65 6D 20 3A 3D 20 4C 49 74 65 LItem := LIte
016010: 6D 20 2D 20 4B 3B 0D 0A 20 20 20 20 20 20 66 6F m - K;.. fo
016020: 72 20 49 20 3A 3D 20 4B 20 2D 20 31 20 64 6F 77 r I := K - 1 dow
016030: 6E 74 6F 20 31 20 64 6F 20 0D 0A 20 20 20 20 20 nto 1 do ..
016040: 20 20 20 50 61 67 65 50 74 72 32 5E 2E 49 74 65 PagePtr2^.Ite
016050: 6D 41 72 72 61 79 5B 49 5D 20 3A 3D 20 4C 5E 2E mArray[I] := L^.
016060: 49 74 65 6D 41 72 72 61 79 5B 49 20 2B 20 4C 49 ItemArray[I + LI
016070: 74 65 6D 5D 3B 0D 0A 20 20 20 20 20 20 50 61 67 tem];.. Pag
016080: 65 50 74 72 32 5E 2E 42 63 6B 77 50 61 67 65 52 ePtr2^.BckwPageR
016090: 65 66 20 3A 3D 20 4C 5E 2E 49 74 65 6D 41 72 72 ef := L^.ItemArr
0160A0: 61 79 5B 4C 49 74 65 6D 5D 2E 50 61 67 65 52 65 ay[LItem].PageRe
0160B0: 66 3B 20 0D 0A 20 20 20 20 20 20 50 61 67 50 74 f; .. PagPt
0160C0: 72 5E 2E 49 74 65 6D 41 72 72 61 79 5B 52 5D 20 r^.ItemArray[R]
0160D0: 3A 3D 20 4C 5E 2E 49 74 65 6D 41 72 72 61 79 5B := L^.ItemArray[
0160E0: 4C 49 74 65 6D 5D 3B 20 0D 0A 20 20 20 20 20 20 LItem]; ..
0160F0: 50 61 67 50 74 72 5E 2E 49 74 65 6D 41 72 72 61 PagPtr^.ItemArra
016100: 79 5B 52 5D 2E 50 61 67 65 52 65 66 20 3A 3D 20 y[R].PageRef :=
016110: 50 72 50 67 52 65 66 32 3B 0D 0A 20 20 20 20 20 PrPgRef2;..
016120: 20 4C 5E 2E 49 74 65 6D 73 4F 6E 50 61 67 65 20 L^.ItemsOnPage
016130: 3A 3D 20 4C 49 74 65 6D 20 2D 20 31 3B 20 0D 0A := LItem - 1; ..
016140: 20 20 20 20 20 20 50 61 67 65 50 74 72 32 5E 2E PagePtr2^.
016150: 49 74 65 6D 73 4F 6E 50 61 67 65 20 3A 3D 20 4F ItemsOnPage := O
016160: 72 64 65 72 20 2D 20 31 20 2B 20 4B 3B 20 0D 0A rder - 1 + K; ..
016170: 20 20 20 20 20 20 50 61 67 65 54 6F 6F 53 6D 61 PageTooSma
016180: 6C 6C 20 3A 3D 20 66 61 6C 73 65 3B 20 0D 0A 20 ll := false; ..
016190: 20 20 20 20 20 54 61 55 70 64 61 74 65 50 61 67 TaUpdatePag
0161A0: 65 28 50 61 67 65 50 74 72 32 29 3B 0D 0A 20 20 e(PagePtr2);..
0161B0: 20 20 65 6E 64 0D 0A 20 20 20 20 65 6C 73 65 0D end.. else.
0161C0: 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 . begin..
0161D0: 20 20 4C 5E 2E 49 74 65 6D 41 72 72 61 79 5B 4C L^.ItemArray[L
0161E0: 49 74 65 6D 5D 20 3A 3D 20 50 61 67 50 74 72 5E Item] := PagPtr^
0161F0: 2E 49 74 65 6D 41 72 72 61 79 5B 52 5D 3B 20 0D .ItemArray[R]; .
016200: 74 65 6D 73 4F 6E 50 61 67 65 20 64 6F 20 0D 0A temsOnPage do ..
016210: 20 20 20 20 20 20 20 20 20 20 20 20 49 74 65 6D Item
016220: 41 72 72 61 79 5B 49 5D 20 3A 3D 20 49 74 65 6D Array[I] := Item
016230: 41 72 72 61 79 5B 49 20 2B 20 31 5D 3B 0D 0A 09 Array[I + 1];...
016240: 20 20 54 61 55 70 64 61 74 65 50 61 67 65 28 50 TaUpdatePage(P
016250: 61 67 50 74 72 29 3B 0D 0A 09 65 6E 64 0D 0A 20 agPtr);...end..
016260: 20 20 20 20 20 20 20 65 6C 73 65 0D 0A 09 62 65 else...be
016270: 67 69 6E 0D 0A 09 20 20 44 65 6C 41 28 58 50 61 gin... DelA(XPa
016280: 67 65 52 65 66 29 3B 0D 0A 20 20 20 20 20 20 20 geRef);..
016290: 20 20 20 69 66 20 50 61 67 65 54 6F 6F 53 6D 61 if PageTooSma
0162A0: 6C 6C 20 74 68 65 6E 20 0D 0A 20 20 20 20 20 20 ll then ..
0162B0: 20 20 20 20 20 20 55 6E 64 65 72 46 6C 6F 77 28 UnderFlow(
0162C0: 50 72 50 67 52 65 66 2C 58 50 61 67 65 52 65 66 PrPgRef,XPageRef
0162D0: 2C 52 29 3B 0D 0A 09 65 6E 64 3B 0D 0A 20 20 20 ,R);...end;..
0162E0: 20 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 65 6C end.. el
0162F0: 73 65 0D 0A 20 20 20 20 20 20 62 65 67 69 6E 0D se.. begin.
016300: 0A 20 20 20 20 20 20 20 20 44 65 6C 42 28 58 50 . DelB(XP
016310: 61 67 65 52 65 66 29 3B 0D 0A 20 20 20 20 20 20 ageRef);..
016320: 20 20 69 66 20 50 61 67 65 54 6F 6F 53 6D 61 6C if PageTooSmal
016330: 6C 20 74 68 65 6E 20 0D 0A 20 20 20 20 20 20 20 l then ..
016340: 20 20 20 55 6E 64 65 72 46 6C 6F 77 28 50 72 50 UnderFlow(PrP
016350: 67 52 65 66 2C 58 50 61 67 65 52 65 66 2C 52 29 gRef,XPageRef,R)
016360: 3B 0D 0A 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 ;.. end;..
016370: 20 20 20 65 6E 64 3B 0D 0A 20 20 65 6E 64 3B 0D end;.. end;.
016380: 0A 65 6E 64 3B 0D 0A 0D 0A 62 65 67 69 6E 0D 0A .end;....begin..
016390: 20 20 77 69 74 68 20 49 64 78 46 20 64 6F 0D 0A with IdxF do..
0163A0: 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 54 61 58 begin.. TaX
0163B0: 4B 65 79 28 50 4B 65 79 2C 4B 65 79 4C 29 3B 20 Key(PKey,KeyL);
0163C0: 0D 0A 20 20 20 20 4F 4B 20 3A 3D 20 74 72 75 65 .. OK := true
0163D0: 3B 20 0D 0A 20 20 20 20 44 65 6C 42 28 52 52 29 ; .. DelB(RR)
0163E0: 3B 0D 0A 20 20 20 20 69 66 20 50 61 67 65 54 6F ;.. if PageTo
0163F0: 6F 53 6D 61 6C 6C 20 74 68 65 6E 0D 0A 20 20 20 oSmall then..
016400: 0A 20 20 20 20 20 20 4C 5E 2E 49 74 65 6D 41 72 . L^.ItemAr
016410: 72 61 79 5B 4C 49 74 65 6D 5D 2E 50 61 67 65 52 ray[LItem].PageR
016420: 65 66 20 3A 3D 20 50 61 67 65 50 74 72 32 5E 2E ef := PagePtr2^.
016430: 42 63 6B 77 50 61 67 65 52 65 66 3B 0D 0A 20 20 BckwPageRef;..
016440: 20 20 20 20 66 6F 72 20 49 20 3A 3D 20 31 20 74 for I := 1 t
016450: 6F 20 4F 72 64 65 72 20 2D 20 31 20 64 6F 20 0D o Order - 1 do .
016460: 0A 20 20 20 20 20 20 20 20 4C 5E 2E 49 74 65 6D . L^.Item
016470: 41 72 72 61 79 5B 49 20 2B 20 4C 49 74 65 6D 5D Array[I + LItem]
016480: 20 3A 3D 20 50 61 67 65 50 74 72 32 5E 2E 49 74 := PagePtr2^.It
016490: 65 6D 41 72 72 61 79 5B 49 5D 3B 0D 0A 20 20 20 emArray[I];..
0164A0: 20 20 20 4C 5E 2E 49 74 65 6D 73 4F 6E 50 61 67 L^.ItemsOnPag
0164B0: 65 20 3A 3D 20 50 61 67 65 53 69 7A 65 3B 20 0D e := PageSize; .
0164C0: 0A 20 20 20 20 20 20 50 61 67 50 74 72 5E 2E 49 . PagPtr^.I
0164D0: 74 65 6D 73 4F 6E 50 61 67 65 20 3A 3D 20 50 61 temsOnPage := Pa
0164E0: 67 50 74 72 5E 2E 49 74 65 6D 73 4F 6E 50 61 67 gPtr^.ItemsOnPag
0164F0: 65 20 2D 20 31 3B 20 0D 0A 20 20 20 20 20 20 54 e - 1; .. T
016500: 61 52 65 74 75 72 6E 50 61 67 65 28 50 61 67 65 aReturnPage(Page
016510: 50 74 72 32 29 3B 0D 0A 20 20 20 20 20 20 50 61 Ptr2);.. Pa
016520: 67 65 54 6F 6F 53 6D 61 6C 6C 20 3A 3D 20 50 61 geTooSmall := Pa
016530: 67 50 74 72 5E 2E 49 74 65 6D 73 4F 6E 50 61 67 gPtr^.ItemsOnPag
016540: 65 20 3C 20 4F 72 64 65 72 3B 0D 0A 20 20 20 20 e < Order;..
016550: 65 6E 64 3B 0D 0A 20 20 20 20 54 61 55 70 64 61 end;.. TaUpda
016560: 74 65 50 61 67 65 28 4C 29 3B 0D 0A 20 20 65 6E tePage(L);.. en
016570: 64 3B 0D 0A 20 20 54 61 55 70 64 61 74 65 50 61 d;.. TaUpdatePa
016580: 67 65 28 50 61 67 50 74 72 29 3B 0D 0A 65 6E 64 ge(PagPtr);..end
016590: 3B 0D 0A 20 0D 0A 28 2A 24 41 2D 2A 29 0D 0A 0D ;.. ..(*$A-*)...
0165A0: 0A 70 72 6F 63 65 64 75 72 65 20 44 65 6C 41 28 .procedure DelA(
0165B0: 50 72 50 67 52 65 66 32 20 3A 20 49 6E 74 65 67 PrPgRef2 : Integ
0165C0: 65 72 29 3B 0D 0A 76 61 72 0D 0A 20 20 43 2C 0D er);..var.. C,.
0165D0: 0A 20 20 58 50 61 67 65 52 65 66 20 3A 20 49 6E . XPageRef : In
0165E0: 74 65 67 65 72 3B 0D 0A 20 20 50 61 67 65 50 74 teger;.. PagePt
0165F0: 72 32 20 3A 20 54 61 50 61 67 65 50 74 72 3B 0D r2 : TaPagePtr;.
016600: 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 54 61 begin.. Ta
016610: 47 65 74 50 61 67 65 28 49 64 78 46 2C 52 52 2C GetPage(IdxF,RR,
016620: 50 61 67 50 74 72 29 3B 0D 0A 20 20 20 20 20 20 PagPtr);..
016630: 69 66 20 50 61 67 50 74 72 5E 2E 49 74 65 6D 73 if PagPtr^.Items
016640: 4F 6E 50 61 67 65 20 3D 20 30 20 74 68 65 6E 0D OnPage = 0 then.
016650: 0A 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 . begin..
016660: 20 20 20 20 20 20 52 52 20 3A 3D 20 50 61 67 50 RR := PagP
016670: 74 72 5E 2E 42 63 6B 77 50 61 67 65 52 65 66 3B tr^.BckwPageRef;
016680: 20 0D 0A 20 20 20 20 20 20 20 20 54 61 52 65 74 .. TaRet
016690: 75 72 6E 50 61 67 65 28 50 61 67 50 74 72 29 3B urnPage(PagPtr);
0166A0: 0D 0A 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 .. end;..
0166B0: 20 20 65 6E 64 3B 0D 0A 20 20 65 6E 64 3B 0D 0A end;.. end;..
0166C0: 65 6E 64 3B 0D 0A 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A end;............
0166D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0166E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0166F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
016700: 0A 20 20 20 20 20 20 20 20 44 65 6C 42 28 58 50 . DelB(XP
016710: 61 67 65 52 65 66 29 3B 0D 0A 20 20 20 20 20 20 ageRef);..
016720: 20 20 69 66 20 50 61 67 65 54 6F 6F 53 6D 61 6C if PageTooSmal
016730: 6C 20 74 68 65 6E 20 0D 0A 20 20 20 20 20 20 20 l then ..
016740: 20 20 20 55 6E 64 65 72 46 6C 6F 77 28 50 72 50 UnderFlow(PrP
016750: 67 52 65 66 2C 58 50 61 67 65 52 65 66 2C 52 29 gRef,XPageRef,R)
016760: 3B 0D 0A 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 ;.. end;..
016770: 20 20 20 65 6E 64 3B 0D 0A 20 20 65 6E 64 3B 0D end;.. end;.
016780: 0A 65 6E 64 3B 0D 0A 0D 0A 62 65 67 69 6E 0D 0A .end;....begin..
016790: 20 20 77 69 74 68 20 49 64 78 46 20 64 6F 0D 0A with IdxF do..
0167A0: 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 54 61 58 begin.. TaX
0167B0: 4B 65 79 28 50 4B 65 79 2C 4B 65 79 4C 29 3B 20 Key(PKey,KeyL);
0167C0: 0D 0A 20 20 20 20 4F 4B 20 3A 3D 20 74 72 75 65 .. OK := true
0167D0: 3B 20 0D 0A 20 20 20 20 44 65 6C 42 28 52 52 29 ; .. DelB(RR)
0167E0: 3B 0D 0A 20 20 20 20 69 66 20 50 61 67 65 54 6F ;.. if PageTo
0167F0: 6F 53 6D 61 6C 6C 20 74 68 65 6E 0D 0A 20 20 20 oSmall then..
016800: 0A 62 65 67 69 6E 0D 0A 20 20 54 61 47 65 74 50 .begin.. TaGetP
016810: 61 67 65 28 49 64 78 46 2C 50 72 50 67 52 65 66 age(IdxF,PrPgRef
016820: 32 2C 50 61 67 65 50 74 72 32 29 3B 0D 0A 20 20 2,PagePtr2);..
016830: 77 69 74 68 20 50 61 67 65 50 74 72 32 5E 20 64 with PagePtr2^ d
016840: 6F 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 o.. begin..
016850: 58 50 61 67 65 52 65 66 20 3A 3D 20 49 74 65 6D XPageRef := Item
016860: 41 72 72 61 79 5B 49 74 65 6D 73 4F 6E 50 61 67 Array[ItemsOnPag
016870: 65 5D 2E 50 61 67 65 52 65 66 3B 0D 0A 20 20 20 e].PageRef;..
016880: 20 69 66 20 58 50 61 67 65 52 65 66 20 3C 3E 20 if XPageRef <>
016890: 30 20 74 68 65 6E 0D 0A 20 20 20 20 62 65 67 69 0 then.. begi
0168A0: 6E 0D 0A 20 20 20 20 20 20 43 20 3A 3D 20 49 74 n.. C := It
0168B0: 65 6D 73 4F 6E 50 61 67 65 3B 20 0D 0A 20 20 20 emsOnPage; ..
0168C0: 20 20 20 44 65 6C 41 28 58 50 61 67 65 52 65 66 DelA(XPageRef
0168D0: 29 3B 0D 0A 20 20 20 20 20 20 69 66 20 50 61 67 );.. if Pag
0168E0: 65 54 6F 6F 53 6D 61 6C 6C 20 74 68 65 6E 20 55 eTooSmall then U
0168F0: 6E 64 65 72 46 6C 6F 77 28 50 72 50 67 52 65 66 nderFlow(PrPgRef
016900: 32 2C 58 50 61 67 65 52 65 66 2C 43 29 3B 0D 0A 2,XPageRef,C);..
016910: 20 20 20 20 65 6E 64 0D 0A 20 20 20 20 65 6C 73 end.. els
016920: 65 0D 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 e.. begin..
016930: 20 20 20 20 54 61 47 65 74 50 61 67 65 28 49 64 TaGetPage(Id
016940: 78 46 2C 50 72 50 67 52 65 66 2C 50 61 67 50 74 xF,PrPgRef,PagPt
016950: 72 29 3B 0D 0A 20 20 20 20 20 20 49 74 65 6D 41 r);.. ItemA
016960: 72 72 61 79 5B 49 74 65 6D 73 4F 6E 50 61 67 65 rray[ItemsOnPage
016970: 5D 2E 50 61 67 65 52 65 66 20 3A 3D 20 50 61 67 ].PageRef := Pag
016980: 50 74 72 5E 2E 49 74 65 6D 41 72 72 61 79 5B 4B Ptr^.ItemArray[K
016990: 5D 2E 50 61 67 65 52 65 66 3B 20 0D 0A 20 20 20 ].PageRef; ..
0169A0: 20 20 20 50 61 67 50 74 72 5E 2E 49 74 65 6D 41 PagPtr^.ItemA
0169B0: 72 72 61 79 5B 4B 5D 20 3A 3D 20 49 74 65 6D 41 rray[K] := ItemA
0169C0: 72 72 61 79 5B 49 74 65 6D 73 4F 6E 50 61 67 65 rray[ItemsOnPage
0169D0: 5D 3B 0D 0A 20 20 20 20 20 20 49 74 65 6D 73 4F ];.. ItemsO
0169E0: 6E 50 61 67 65 20 3A 3D 20 49 74 65 6D 73 4F 6E nPage := ItemsOn
0169F0: 50 61 67 65 20 2D 20 31 3B 20 0D 0A 20 20 20 20 Page - 1; ..
016A00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
016A10: 13 00 01 00 02 09 52 E5 13 00 41 02 00 00 00 02 ......R...A.....
016A20: 13 00 46 02 00 00 00 02 13 00 42 02 00 00 00 02 ..F.......B.....
016A30: 13 00 47 02 00 00 00 02 13 00 43 02 00 00 00 02 ..G.......C.....
016A40: 13 00 48 02 00 00 00 02 13 00 44 02 00 00 00 02 ..H.......D.....
016A50: 13 00 49 02 00 00 00 02 13 00 45 02 00 00 00 02 ..I.......E.....
016A60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016A70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016A80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016A90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016AA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016AB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016AC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016AD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016AE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016AF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
016B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016C00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016C10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016C20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016C30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016C40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016C50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016C60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016C70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016C80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016C90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016CA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016CB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016CC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016CD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016CE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016CF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016D00: 20 20 3A 20 54 61 4B 65 79 53 74 72 20 61 62 73 : TaKeyStr abs
016D10: 6F 6C 75 74 65 20 50 72 6F 63 4B 65 79 3B 0D 0A olute ProcKey;..
016D20: 20 20 52 20 20 20 20 20 20 3A 20 49 6E 74 65 67 R : Integ
016D30: 65 72 3B 0D 0A 20 20 50 61 67 50 74 72 20 3A 20 er;.. PagPtr :
016D40: 54 61 50 61 67 65 50 74 72 3B 0D 0A 62 65 67 69 TaPagePtr;..begi
016D50: 6E 0D 0A 20 20 77 69 74 68 20 49 64 78 46 20 64 n.. with IdxF d
016D60: 6F 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 o.. begin..
016D70: 69 66 20 50 50 20 3D 20 30 20 74 68 65 6E 20 0D if PP = 0 then .
016D80: 0A 20 20 20 20 20 20 52 20 3A 3D 20 52 52 0D 0A . R := RR..
016D90: 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 20 20 else..
016DA0: 77 69 74 68 20 50 61 74 68 5B 50 50 5D 20 64 6F with Path[PP] do
016DB0: 0D 0A 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 .. begin..
016DC0: 20 20 20 20 20 20 20 54 61 47 65 74 50 61 67 65 TaGetPage
016DD0: 28 49 64 78 46 2C 50 61 67 65 52 65 66 2C 50 61 (IdxF,PageRef,Pa
016DE0: 67 50 74 72 29 3B 20 0D 0A 20 20 20 20 20 20 20 gPtr); ..
016DF0: 20 49 74 65 6D 41 72 72 49 6E 64 65 78 20 3A 3D ItemArrIndex :=
016E00: 20 49 74 65 6D 41 72 72 49 6E 64 65 78 20 2D 20 ItemArrIndex -
016E10: 31 3B 0D 0A 20 20 20 20 20 20 20 20 69 66 20 49 1;.. if I
016E20: 74 65 6D 41 72 72 49 6E 64 65 78 20 3D 20 30 20 temArrIndex = 0
016E30: 74 68 65 6E 20 0D 0A 20 20 20 20 20 20 20 20 20 then ..
016E40: 20 52 20 3A 3D 20 50 61 67 50 74 72 5E 2E 42 63 R := PagPtr^.Bc
016E50: 6B 77 50 61 67 65 52 65 66 0D 0A 20 20 20 20 20 kwPageRef..
016E60: 20 20 20 65 6C 73 65 20 52 20 3A 3D 20 50 61 67 else R := Pag
016E70: 50 74 72 5E 2E 49 74 65 6D 41 72 72 61 79 5B 49 Ptr^.ItemArray[I
016E80: 74 65 6D 41 72 72 49 6E 64 65 78 5D 2E 50 61 67 temArrIndex].Pag
016E90: 65 52 65 66 3B 0D 0A 20 20 20 20 20 20 65 6E 64 eRef;.. end
016EA0: 3B 0D 0A 20 20 20 20 77 68 69 6C 65 20 52 20 3C ;.. while R <
016EB0: 3E 20 30 20 64 6F 0D 0A 20 20 20 20 62 65 67 69 > 0 do.. begi
016EC0: 6E 0D 0A 20 20 20 20 20 20 54 61 47 65 74 50 61 n.. TaGetPa
016ED0: 67 65 28 49 64 78 46 2C 52 2C 50 61 67 50 74 72 ge(IdxF,R,PagPtr
016EE0: 29 3B 20 0D 0A 20 20 20 20 20 20 50 50 20 3A 3D ); .. PP :=
016EF0: 20 50 50 20 2B 20 31 3B 0D 0A 20 20 20 20 20 20 PP + 1;..
016F00: 28 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A (***************
016F10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
016F20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
016F30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 29 0D 0A 28 ************)..(
016F40: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
016F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
016F60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
016F70: 20 20 20 20 20 20 20 20 20 20 2A 29 0D 0A 28 2A *)..(*
016F80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
016F90: 20 54 55 52 42 4F 2D 61 63 63 65 73 73 20 76 65 TURBO-access ve
016FA0: 72 73 69 6F 6E 20 31 2E 30 30 20 20 20 20 20 20 rsion 1.00
016FB0: 20 20 20 20 20 20 20 20 20 2A 29 0D 0A 28 2A 20 *)..(*
016FC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
016FD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
016FE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
016FF0: 20 20 20 20 20 20 20 20 2A 29 0D 0A 28 2A 20 20 *)..(*
017000: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017010: 20 20 20 20 20 47 45 54 4B 45 59 20 6D 6F 64 75 GETKEY modu
017020: 6C 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 le
017030: 20 20 20 20 20 20 20 2A 29 0D 0A 28 2A 20 20 20 *)..(*
017040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017070: 20 20 20 20 20 20 2A 29 0D 0A 28 2A 20 20 20 20 *)..(*
017080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 C
017090: 6F 70 79 72 69 67 68 74 20 28 43 29 20 31 39 38 opyright (C) 198
0170A0: 34 20 62 79 20 20 20 20 20 20 20 20 20 20 20 20 4 by
0170B0: 20 20 20 20 20 2A 29 0D 0A 28 2A 20 20 20 20 20 *)..(*
0170C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0170D0: 20 20 20 42 4F 52 4C 41 4E 44 20 49 6E 74 2E 20 BORLAND Int.
0170E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0170F0: 20 20 20 20 2A 29 0D 0A 28 2A 20 20 20 20 20 20 *)..(*
017100: 77 69 74 68 20 50 61 74 68 5B 50 50 5D 20 64 6F with Path[PP] do
017110: 0D 0A 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 .. begin..
017120: 20 20 20 20 20 20 20 50 61 67 65 52 65 66 20 3A PageRef :
017130: 3D 20 52 3B 20 0D 0A 20 20 20 20 20 20 20 20 49 = R; .. I
017140: 74 65 6D 41 72 72 49 6E 64 65 78 20 3A 3D 20 50 temArrIndex := P
017150: 61 67 50 74 72 5E 2E 49 74 65 6D 73 4F 6E 50 61 agPtr^.ItemsOnPa
017160: 67 65 3B 0D 0A 20 20 20 20 20 20 65 6E 64 3B 0D ge;.. end;.
017170: 0A 20 20 20 20 20 20 77 69 74 68 20 50 61 67 50 . with PagP
017180: 74 72 5E 20 64 6F 20 0D 0A 20 20 20 20 20 20 20 tr^ do ..
017190: 20 52 20 3A 3D 20 49 74 65 6D 41 72 72 61 79 5B R := ItemArray[
0171A0: 49 74 65 6D 73 4F 6E 50 61 67 65 5D 2E 50 61 67 ItemsOnPage].Pag
0171B0: 65 52 65 66 3B 0D 0A 20 20 20 20 65 6E 64 3B 0D eRef;.. end;.
0171C0: 0A 20 20 20 20 69 66 20 50 50 20 3C 3E 20 30 20 . if PP <> 0
0171D0: 74 68 65 6E 0D 0A 20 20 20 20 62 65 67 69 6E 0D then.. begin.
0171E0: 0A 20 20 20 20 20 20 77 68 69 6C 65 20 28 50 50 . while (PP
0171F0: 20 3E 20 31 29 20 61 6E 64 20 28 50 61 74 68 5B > 1) and (Path[
017200: 50 50 5D 2E 49 74 65 6D 41 72 72 49 6E 64 65 78 PP].ItemArrIndex
017210: 20 3D 20 30 29 20 64 6F 0D 0A 20 20 20 20 20 20 = 0) do..
017220: 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 50 begin.. P
017230: 50 20 3A 3D 20 50 50 20 2D 20 31 3B 20 0D 0A 20 P := PP - 1; ..
017240: 20 20 20 20 20 20 20 54 61 47 65 74 50 61 67 65 TaGetPage
017250: 28 49 64 78 46 2C 50 61 74 68 5B 50 50 5D 2E 50 (IdxF,Path[PP].P
017260: 61 67 65 52 65 66 2C 50 61 67 50 74 72 29 3B 0D ageRef,PagPtr);.
017270: 0A 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 . end;..
017280: 20 20 20 69 66 20 50 61 74 68 5B 50 50 5D 2E 49 if Path[PP].I
017290: 74 65 6D 41 72 72 49 6E 64 65 78 20 3E 20 30 20 temArrIndex > 0
0172A0: 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20 77 69 then.. wi
0172B0: 74 68 20 50 61 67 50 74 72 5E 2E 49 74 65 6D 41 th PagPtr^.ItemA
0172C0: 72 72 61 79 5B 50 61 74 68 5B 50 50 5D 2E 49 74 rray[Path[PP].It
0172D0: 65 6D 41 72 72 49 6E 64 65 78 5D 20 64 6F 0D 0A emArrIndex] do..
0172E0: 20 20 20 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 begin..
0172F0: 20 20 20 20 20 20 20 20 20 50 4B 65 79 20 3A 3D PKey :=
017300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017330: 20 20 20 2A 29 0D 0A 28 2A 2A 2A 2A 2A 2A 2A 2A *)..(********
017340: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
017350: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
017360: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
017370: 2A 2A 2A 29 0D 0A 0D 0A 28 2A 24 41 2B 2C 52 2D ***)....(*$A+,R-
017380: 2C 57 33 2A 29 0D 0A 0D 0A 70 72 6F 63 65 64 75 ,W3*)....procedu
017390: 72 65 20 4E 65 78 74 4B 65 79 28 76 61 72 20 49 re NextKey(var I
0173A0: 64 78 46 20 20 20 20 20 20 20 3A 20 49 6E 64 65 dxF : Inde
0173B0: 78 46 69 6C 65 3B 0D 0A 20 20 20 20 20 20 20 20 xFile;..
0173C0: 20 20 20 20 20 20 20 20 20 20 76 61 72 20 50 72 var Pr
0173D0: 6F 63 44 61 74 52 65 66 20 3A 20 49 6E 74 65 67 ocDatRef : Integ
0173E0: 65 72 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 er;..
0173F0: 20 20 20 20 20 20 20 76 61 72 20 50 72 6F 63 4B var ProcK
017400: 65 79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ey
017410: 20 20 29 3B 0D 0A 76 61 72 0D 0A 20 20 50 4B 65 );..var.. PKe
017420: 79 20 20 20 3A 20 54 61 4B 65 79 53 74 72 20 61 y : TaKeyStr a
017430: 62 73 6F 6C 75 74 65 20 50 72 6F 63 4B 65 79 3B bsolute ProcKey;
017440: 0D 0A 20 20 52 20 20 20 20 20 20 3A 20 49 6E 74 .. R : Int
017450: 65 67 65 72 3B 0D 0A 20 20 50 61 67 50 74 72 20 eger;.. PagPtr
017460: 3A 20 54 61 50 61 67 65 50 74 72 3B 0D 0A 62 65 : TaPagePtr;..be
017470: 67 69 6E 0D 0A 20 20 77 69 74 68 20 49 64 78 46 gin.. with IdxF
017480: 20 64 6F 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 do.. begin..
017490: 20 20 69 66 20 50 50 20 3D 20 30 20 74 68 65 6E if PP = 0 then
0174A0: 0D 0A 20 20 20 20 20 20 52 20 3A 3D 20 52 52 0D .. R := RR.
0174B0: 0A 20 20 20 20 65 6C 73 65 0D 0A 20 20 20 20 77 . else.. w
0174C0: 69 74 68 20 50 61 74 68 5B 50 50 5D 20 64 6F 0D ith Path[PP] do.
0174D0: 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 . begin..
0174E0: 20 20 54 61 47 65 74 50 61 67 65 28 49 64 78 46 TaGetPage(IdxF
0174F0: 2C 50 61 67 65 52 65 66 2C 50 61 67 50 74 72 29 ,PageRef,PagPtr)
017500: 20 4B 65 79 3B 20 0D 0A 20 20 20 20 20 20 20 20 Key; ..
017510: 20 20 50 72 6F 63 44 61 74 52 65 66 20 3A 3D 20 ProcDatRef :=
017520: 44 61 74 61 52 65 66 3B 0D 0A 20 20 20 20 20 20 DataRef;..
017530: 20 20 65 6E 64 0D 0A 20 20 20 20 20 20 65 6C 73 end.. els
017540: 65 20 50 50 20 3A 3D 20 30 3B 0D 0A 20 20 20 20 e PP := 0;..
017550: 65 6E 64 3B 0D 0A 20 20 20 20 4F 4B 20 3A 3D 20 end;.. OK :=
017560: 50 50 20 3C 3E 20 30 3B 0D 0A 20 20 65 6E 64 3B PP <> 0;.. end;
017570: 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 ..end;....proced
017580: 75 72 65 20 54 61 46 69 6E 64 4B 65 79 28 76 61 ure TaFindKey(va
017590: 72 20 49 64 78 46 20 20 20 20 20 20 20 3A 20 49 r IdxF : I
0175A0: 6E 64 65 78 46 69 6C 65 3B 0D 0A 20 20 20 20 20 ndexFile;..
0175B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 v
0175C0: 61 72 20 50 72 6F 63 44 61 74 52 65 66 20 3A 20 ar ProcDatRef :
0175D0: 49 6E 74 65 67 65 72 3B 0D 0A 20 20 20 20 20 20 Integer;..
0175E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 76 61 va
0175F0: 72 20 50 72 6F 63 4B 65 79 20 20 20 20 20 20 20 r ProcKey
017600: 20 20 20 20 20 20 20 20 20 29 3B 0D 0A 76 61 72 );..var
017610: 0D 0A 20 20 50 4B 65 79 20 20 20 20 3A 20 54 61 .. PKey : Ta
017620: 4B 65 79 53 74 72 20 61 62 73 6F 6C 75 74 65 20 KeyStr absolute
017630: 50 72 6F 63 4B 65 79 3B 0D 0A 20 20 50 72 50 67 ProcKey;.. PrPg
017640: 52 65 66 2C 0D 0A 20 20 43 2C 4B 2C 4C 2C 52 20 Ref,.. C,K,L,R
017650: 3A 20 49 6E 74 65 67 65 72 3B 0D 0A 20 20 52 4B : Integer;.. RK
017660: 65 79 20 20 20 20 3A 20 54 61 4B 65 79 53 74 72 ey : TaKeyStr
017670: 3B 0D 0A 20 20 50 61 67 50 74 72 20 20 3A 20 54 ;.. PagPtr : T
017680: 61 50 61 67 65 50 74 72 3B 0D 0A 62 65 67 69 6E aPagePtr;..begin
017690: 0D 0A 20 20 77 69 74 68 20 49 64 78 46 20 64 6F .. with IdxF do
0176A0: 0D 0A 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 54 .. begin.. T
0176B0: 61 58 4B 65 79 28 50 4B 65 79 2C 4B 65 79 4C 29 aXKey(PKey,KeyL)
0176C0: 3B 20 0D 0A 20 20 20 20 4F 4B 20 3A 3D 20 66 61 ; .. OK := fa
0176D0: 6C 73 65 3B 20 0D 0A 20 20 20 20 50 50 20 3A 3D lse; .. PP :=
0176E0: 20 30 3B 20 0D 0A 20 20 20 20 50 72 50 67 52 65 0; .. PrPgRe
0176F0: 66 20 3A 3D 20 52 52 3B 0D 0A 20 20 20 20 77 68 f := RR;.. wh
017700: 3B 0D 0A 20 20 20 20 20 20 52 20 3A 3D 20 50 61 ;.. R := Pa
017710: 67 50 74 72 5E 2E 49 74 65 6D 41 72 72 61 79 5B gPtr^.ItemArray[
017720: 49 74 65 6D 41 72 72 49 6E 64 65 78 5D 2E 50 61 ItemArrIndex].Pa
017730: 67 65 52 65 66 3B 0D 0A 20 20 20 20 65 6E 64 3B geRef;.. end;
017740: 0D 0A 20 20 20 20 77 68 69 6C 65 20 52 20 3C 3E .. while R <>
017750: 20 30 20 64 6F 0D 0A 20 20 20 20 62 65 67 69 6E 0 do.. begin
017760: 0D 0A 20 20 20 20 20 20 50 50 20 3A 3D 20 50 50 .. PP := PP
017770: 20 2B 20 31 3B 0D 0A 20 20 20 20 20 20 77 69 74 + 1;.. wit
017780: 68 20 50 61 74 68 5B 50 50 5D 20 64 6F 0D 0A 20 h Path[PP] do..
017790: 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 begin..
0177A0: 20 20 20 20 50 61 67 65 52 65 66 20 3A 3D 20 52 PageRef := R
0177B0: 3B 0D 0A 20 20 20 20 20 20 20 20 49 74 65 6D 41 ;.. ItemA
0177C0: 72 72 49 6E 64 65 78 20 3A 3D 20 30 3B 0D 0A 20 rrIndex := 0;..
0177D0: 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20 end;..
0177E0: 20 54 61 47 65 74 50 61 67 65 28 49 64 78 46 2C TaGetPage(IdxF,
0177F0: 52 2C 50 61 67 50 74 72 29 3B 0D 0A 20 20 20 20 R,PagPtr);..
017800: 20 20 52 20 3A 3D 20 50 61 67 50 74 72 5E 2E 42 R := PagPtr^.B
017810: 63 6B 77 50 61 67 65 52 65 66 3B 0D 0A 20 20 20 ckwPageRef;..
017820: 20 65 6E 64 3B 0D 0A 20 20 20 20 69 66 20 50 50 end;.. if PP
017830: 20 3C 3E 20 30 20 74 68 65 6E 0D 0A 20 20 20 20 <> 0 then..
017840: 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 77 68 69 begin.. whi
017850: 6C 65 20 28 50 50 20 3E 20 31 29 20 61 6E 64 0D le (PP > 1) and.
017860: 0A 20 20 20 20 20 20 20 20 20 20 20 20 28 50 61 . (Pa
017870: 74 68 5B 50 50 5D 2E 49 74 65 6D 41 72 72 49 6E th[PP].ItemArrIn
017880: 64 65 78 20 3D 20 50 61 67 50 74 72 5E 2E 49 74 dex = PagPtr^.It
017890: 65 6D 73 4F 6E 50 61 67 65 29 20 64 6F 0D 0A 20 emsOnPage) do..
0178A0: 20 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 begin..
0178B0: 20 20 20 20 50 50 20 3A 3D 20 50 50 20 2D 20 31 PP := PP - 1
0178C0: 3B 0D 0A 20 20 20 20 20 20 20 20 54 61 47 65 74 ;.. TaGet
0178D0: 50 61 67 65 28 49 64 78 46 2C 50 61 74 68 5B 50 Page(IdxF,Path[P
0178E0: 50 5D 2E 50 61 67 65 52 65 66 2C 50 61 67 50 74 P].PageRef,PagPt
0178F0: 72 29 3B 0D 0A 20 20 20 20 20 20 65 6E 64 3B 0D r);.. end;.
017900: 69 6C 65 20 28 50 72 50 67 52 65 66 20 3C 3E 20 ile (PrPgRef <>
017910: 30 29 20 61 6E 64 20 6E 6F 74 20 4F 4B 20 64 6F 0) and not OK do
017920: 0D 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 20 .. begin..
017930: 20 20 20 50 50 20 3A 3D 20 50 50 20 2B 20 31 3B PP := PP + 1;
017940: 20 0D 0A 20 20 20 20 20 20 50 61 74 68 5B 50 50 .. Path[PP
017950: 5D 2E 50 61 67 65 52 65 66 20 3A 3D 20 50 72 50 ].PageRef := PrP
017960: 67 52 65 66 3B 20 0D 0A 20 20 20 20 20 20 54 61 gRef; .. Ta
017970: 47 65 74 50 61 67 65 28 49 64 78 46 2C 50 72 50 GetPage(IdxF,PrP
017980: 67 52 65 66 2C 50 61 67 50 74 72 29 3B 0D 0A 20 gRef,PagPtr);..
017990: 20 20 20 20 20 77 69 74 68 20 50 61 67 50 74 72 with PagPtr
0179A0: 5E 20 64 6F 0D 0A 20 20 20 20 20 20 62 65 67 69 ^ do.. begi
0179B0: 6E 0D 0A 20 20 20 20 20 20 20 20 4C 20 3A 3D 20 n.. L :=
0179C0: 31 3B 20 0D 0A 20 20 20 20 20 20 20 20 52 20 3A 1; .. R :
0179D0: 3D 20 49 74 65 6D 73 4F 6E 50 61 67 65 3B 0D 0A = ItemsOnPage;..
0179E0: 20 20 20 20 20 20 20 20 72 65 70 65 61 74 0D 0A repeat..
0179F0: 20 20 20 20 20 20 20 20 20 20 4B 20 3A 3D 20 28 K := (
017A00: 4C 20 2B 20 52 29 20 64 69 76 20 32 3B 0D 0A 20 L + R) div 2;..
017A10: 20 20 20 20 20 20 20 20 20 43 20 3A 3D 20 54 61 C := Ta
017A20: 43 6F 6D 70 4B 65 79 73 28 50 4B 65 79 2C 0D 0A CompKeys(PKey,..
017A30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017A40: 20 20 20 20 20 20 20 20 20 20 49 74 65 6D 41 72 ItemAr
017A50: 72 61 79 5B 4B 5D 2E 4B 65 79 2C 0D 0A 20 20 20 ray[K].Key,..
017A60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017A70: 20 20 20 20 20 20 20 30 2C 0D 0A 20 20 20 20 20 0,..
017A80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017A90: 20 20 20 20 20 49 74 65 6D 41 72 72 61 79 5B 4B ItemArray[K
017AA0: 5D 2E 44 61 74 61 52 65 66 2C 0D 0A 20 20 20 20 ].DataRef,..
017AB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017AC0: 20 20 20 20 20 20 41 6C 6C 6F 77 44 75 70 6C 4B AllowDuplK
017AD0: 65 79 73 20 20 20 20 20 20 20 20 29 3B 0D 0A 20 eys );..
017AE0: 20 20 20 20 20 20 20 20 20 69 66 20 43 20 3C 3D if C <=
017AF0: 20 30 20 74 68 65 6E 20 0D 0A 20 20 20 20 20 20 0 then ..
017B00: 0A 20 20 20 20 20 20 69 66 20 50 61 74 68 5B 50 . if Path[P
017B10: 50 5D 2E 49 74 65 6D 41 72 72 49 6E 64 65 78 20 P].ItemArrIndex
017B20: 3C 20 50 61 67 50 74 72 5E 2E 49 74 65 6D 73 4F < PagPtr^.ItemsO
017B30: 6E 50 61 67 65 20 74 68 65 6E 0D 0A 20 20 20 20 nPage then..
017B40: 20 20 20 20 77 69 74 68 20 50 61 74 68 5B 50 50 with Path[PP
017B50: 5D 20 64 6F 0D 0A 20 20 20 20 20 20 20 20 62 65 ] do.. be
017B60: 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 49 gin.. I
017B70: 74 65 6D 41 72 72 49 6E 64 65 78 20 3A 3D 20 49 temArrIndex := I
017B80: 74 65 6D 41 72 72 49 6E 64 65 78 20 2B 20 31 3B temArrIndex + 1;
017B90: 0D 0A 20 20 20 20 20 20 20 20 20 20 77 69 74 68 .. with
017BA0: 20 50 61 67 50 74 72 5E 2E 49 74 65 6D 41 72 72 PagPtr^.ItemArr
017BB0: 61 79 5B 49 74 65 6D 41 72 72 49 6E 64 65 78 5D ay[ItemArrIndex]
017BC0: 20 64 6F 0D 0A 20 20 20 20 20 20 20 20 20 20 62 do.. b
017BD0: 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 egin..
017BE0: 20 20 50 4B 65 79 20 3A 3D 20 4B 65 79 3B 20 50 PKey := Key; P
017BF0: 72 6F 63 44 61 74 52 65 66 20 3A 3D 20 44 61 74 rocDatRef := Dat
017C00: 61 52 65 66 3B 0D 0A 20 20 20 20 20 20 20 20 20 aRef;..
017C10: 20 65 6E 64 3B 0D 0A 20 20 20 20 20 20 20 20 65 end;.. e
017C20: 6E 64 0D 0A 20 20 20 20 20 20 65 6C 73 65 20 50 nd.. else P
017C30: 50 20 3A 3D 20 30 3B 0D 0A 20 20 20 20 65 6E 64 P := 0;.. end
017C40: 3B 0D 0A 20 20 20 20 4F 4B 20 3A 3D 20 50 50 20 ;.. OK := PP
017C50: 3C 3E 20 30 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 65 <> 0;.. end;..e
017C60: 6E 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 nd;....procedure
017C70: 20 50 72 65 76 4B 65 79 28 76 61 72 20 49 64 78 PrevKey(var Idx
017C80: 46 20 20 20 20 20 20 20 3A 20 49 6E 64 65 78 46 F : IndexF
017C90: 69 6C 65 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 ile;..
017CA0: 20 20 20 20 20 20 20 20 76 61 72 20 50 72 6F 63 var Proc
017CB0: 44 61 74 52 65 66 20 3A 20 49 6E 74 65 67 65 72 DatRef : Integer
017CC0: 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ;..
017CD0: 20 20 20 20 20 76 61 72 20 50 72 6F 63 4B 65 79 var ProcKey
017CE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
017CF0: 29 3B 0D 0A 76 61 72 0D 0A 20 20 50 4B 65 79 20 );..var.. PKey
017D00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
017D10: 14 00 01 00 02 09 52 E5 14 00 41 02 00 00 00 02 ......R...A.....
017D20: 14 00 46 02 00 00 00 02 14 00 42 02 00 00 00 02 ..F.......B.....
017D30: 14 00 47 02 00 00 00 02 14 00 43 02 00 00 00 02 ..G.......C.....
017D40: 14 00 48 02 00 00 00 02 14 00 44 02 00 00 00 02 ..H.......D.....
017D50: 14 00 49 02 00 00 00 02 14 00 45 02 00 00 00 02 ..I.......E.....
017D60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017D70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017D80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017D90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017DA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017DB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017DC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017DD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017DE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017DF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
017E00: 20 20 20 20 20 20 52 20 3A 3D 20 4B 20 2D 20 31 R := K - 1
017E10: 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 69 66 20 ;.. if
017E20: 43 20 3E 3D 20 30 20 74 68 65 6E 20 0D 0A 20 20 C >= 0 then ..
017E30: 20 20 20 20 20 20 20 20 20 20 4C 20 3A 3D 20 4B L := K
017E40: 20 2B 20 31 3B 0D 0A 20 20 20 20 20 20 20 20 75 + 1;.. u
017E50: 6E 74 69 6C 20 52 20 3C 20 4C 3B 0D 0A 20 20 20 ntil R < L;..
017E60: 20 20 20 20 20 69 66 20 4C 20 2D 20 52 20 3E 20 if L - R >
017E70: 31 20 74 68 65 6E 0D 0A 20 20 20 20 20 20 20 20 1 then..
017E80: 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 begin..
017E90: 20 50 72 6F 63 44 61 74 52 65 66 20 3A 3D 20 49 ProcDatRef := I
017EA0: 74 65 6D 41 72 72 61 79 5B 4B 5D 2E 44 61 74 61 temArray[K].Data
017EB0: 52 65 66 3B 20 0D 0A 20 20 20 20 20 20 20 20 20 Ref; ..
017EC0: 20 52 20 3A 3D 20 4B 3B 20 0D 0A 20 20 20 20 20 R := K; ..
017ED0: 20 20 20 20 20 4F 4B 20 3A 3D 20 74 72 75 65 3B OK := true;
017EE0: 0D 0A 20 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A .. end;..
017EF0: 20 20 20 20 20 20 20 20 69 66 20 52 20 3D 20 30 if R = 0
017F00: 20 74 68 65 6E 20 0D 0A 20 20 20 20 20 20 20 20 then ..
017F10: 20 20 50 72 50 67 52 65 66 20 3A 3D 20 42 63 6B PrPgRef := Bck
017F20: 77 50 61 67 65 52 65 66 0D 0A 20 20 20 20 20 20 wPageRef..
017F30: 20 20 65 6C 73 65 20 50 72 50 67 52 65 66 20 3A else PrPgRef :
017F40: 3D 20 49 74 65 6D 41 72 72 61 79 5B 52 5D 2E 50 = ItemArray[R].P
017F50: 61 67 65 52 65 66 3B 0D 0A 20 20 20 20 20 20 65 ageRef;.. e
017F60: 6E 64 3B 0D 0A 20 20 20 20 20 20 50 61 74 68 5B nd;.. Path[
017F70: 50 50 5D 2E 49 74 65 6D 41 72 72 49 6E 64 65 78 PP].ItemArrIndex
017F80: 20 3A 3D 20 52 3B 0D 0A 20 20 20 20 65 6E 64 3B := R;.. end;
017F90: 0D 0A 20 20 20 20 69 66 20 6E 6F 74 20 4F 4B 20 .. if not OK
017FA0: 61 6E 64 20 28 50 50 20 3E 20 30 29 20 74 68 65 and (PP > 0) the
017FB0: 6E 0D 0A 20 20 20 20 62 65 67 69 6E 0D 0A 20 20 n.. begin..
017FC0: 20 20 20 20 77 68 69 6C 65 20 28 50 50 20 3E 20 while (PP >
017FD0: 31 29 20 61 6E 64 20 28 50 61 74 68 5B 50 50 5D 1) and (Path[PP]
017FE0: 2E 49 74 65 6D 41 72 72 49 6E 64 65 78 20 3D 20 .ItemArrIndex =
017FF0: 30 29 20 64 6F 20 0D 0A 20 20 20 20 20 20 20 20 0) do ..
018000: 21 F0 00 06 00 09 EB 21 9B 01 34 35 28 02 12 C9 !......!..45(...
018010: 1B 1B 21 2E 03 06 03 2B 0E 2F 0C 96 30 FC 86 F5 ..!....+./..0...
018020: 79 FE 30 28 01 12 13 F1 10 ED C9 01 0A 64 21 6B y.0(.........d!k
018030: 01 C3 5A 02 21 7B 01 C3 5A 02 11 03 00 CD 88 03 ..Z.!{..Z.......
018040: E6 01 18 06 11 06 00 CD 88 03 6F 26 00 C9 11 12 ..........o&....
018050: 00 18 F4 11 0C 00 18 08 11 0F 00 18 03 11 09 00 ................
018060: E1 C1 E5 3A E1 00 B7 28 1F 79 FE 0D 20 1A D5 C5 ...:...(.y.. ...
018070: CD A0 00 7C B5 28 0F CD 12 02 FE 13 20 08 CD 12 ...|.(...... ...
018080: 02 FE 03 CA C5 1F C1 D1 2A 01 00 19 E9 22 DB 00 ........*...."..
018090: D5 78 32 E1 00 79 B7 28 0B 3E C3 32 38 00 21 3F .x2..y.(.>.28.!?
0180A0: 1F 22 39 00 21 C9 03 11 A0 00 01 18 00 ED B0 21 ."9.!..........!
0180B0: E1 03 11 B8 00 01 12 00 ED B0 E1 01 03 00 ED B0 ................
0180C0: 3E 7F 32 DA 00 AF C3 20 16 C3 3A 03 C3 44 03 C3 >.2.... ..:..D..
0180D0: 5D 03 C3 53 03 C3 58 03 C3 4E 03 C3 5D 03 C3 44 ]..S..X..N..]..D
0180E0: 03 03 00 00 03 01 00 01 02 00 02 03 00 03 04 00 ................
0180F0: 03 05 00 0E FF 18 0C 0E 00 ED 5B DB 00 13 1A FE ..........[.....
018100: 20 28 FA 21 65 00 06 03 CD 7D 04 1A CD 84 04 FE (.!e....}......
018110: 41 38 12 FE 51 30 0E 47 13 1A FE 3A 20 06 78 D6 A8..Q0.G...: .x.
018120: 40 13 18 02 1B AF 21 5C 00 77 23 0C 0D 28 0C 1A @.....!\.w#..(..
018130: FE 1A 20 07 06 0B CD 79 04 18 10 06 08 CD 56 04 .. ....y......V.
018140: 1A FE 2E 20 06 13 06 03 CD 56 04 21 68 00 06 18 ... .....V.!h...
018150: 36 00 23 10 FB C9 1A 0C 0D 28 04 FE 2A 28 19 FE 6.#......(..*(..
018160: 2E 28 1A FE 21 38 16 FE 7D 28 12 FE 2A 28 0E CD .(..!8..}(..*(..
018170: 84 04 77 23 13 10 DF C9 13 3E 3F 18 02 3E 20 77 ..w#.....>?..> w
018180: 23 10 FC C9 FE 61 D8 FE 7B D0 D6 20 C9 7C CD 92 #....a..{.. .|..
018190: 04 7D F5 1F 1F 1F 1F CD 9B 04 F1 E6 0F C6 90 27 .}.............'
0181A0: CE 40 27 C3 E8 01 AF 37 CB 7C C0 7C B7 7D C8 3E .@'....7.|.|.}.>
0181B0: FF C9 22 CD 00 ED 43 DF 00 22 ED 00 06 04 36 00 .."...C.."....6.
0181C0: 23 10 FB EB D1 F9 01 00 FC 09 22 CF 00 EB 22 D5 #........."...".
0181D0: 00 CD 90 02 CD A9 02 E9 E5 2A CF 00 B7 ED 42 22 .........*....B"
0181E0: CF 00 ED 5B CD 00 B7 ED 52 19 EB E1 DA 35 1D ED ...[....R....5..
0181F0: B0 C9 2A CF 00 ED B0 22 CF 00 D9 C9 5E 23 56 23 ..*...."....^#V#
018200: 50 50 20 3A 3D 20 50 50 20 2D 20 31 3B 0D 0A 20 PP := PP - 1;..
018210: 20 20 20 20 20 69 66 20 50 61 74 68 5B 50 50 5D if Path[PP]
018220: 2E 49 74 65 6D 41 72 72 49 6E 64 65 78 20 3D 20 .ItemArrIndex =
018230: 30 20 74 68 65 6E 20 0D 0A 20 20 20 20 20 20 20 0 then ..
018240: 20 50 50 20 3A 3D 20 30 3B 0D 0A 20 20 20 20 65 PP := 0;.. e
018250: 6E 64 3B 0D 0A 20 20 65 6E 64 3B 0D 0A 65 6E 64 nd;.. end;..end
018260: 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 46 ;....procedure F
018270: 69 6E 64 4B 65 79 28 76 61 72 20 49 64 78 46 20 indKey(var IdxF
018280: 20 20 20 20 20 20 3A 20 49 6E 64 65 78 46 69 6C : IndexFil
018290: 65 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 e;..
0182A0: 20 20 20 20 20 20 76 61 72 20 50 72 6F 63 44 61 var ProcDa
0182B0: 74 52 65 66 20 3A 20 49 6E 74 65 67 65 72 3B 0D tRef : Integer;.
0182C0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0182D0: 20 20 20 76 61 72 20 50 72 6F 63 4B 65 79 20 20 var ProcKey
0182E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 3B );
0182F0: 0D 0A 76 61 72 0D 0A 20 20 50 4B 65 79 20 20 20 ..var.. PKey
018300: 20 3A 20 54 61 4B 65 79 53 74 72 20 61 62 73 6F : TaKeyStr abso
018310: 6C 75 74 65 20 50 72 6F 63 4B 65 79 3B 0D 0A 20 lute ProcKey;..
018320: 20 54 65 6D 70 4B 65 79 20 3A 20 54 61 4B 65 79 TempKey : TaKey
018330: 53 74 72 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 54 Str;..begin.. T
018340: 61 46 69 6E 64 4B 65 79 28 49 64 78 46 2C 50 72 aFindKey(IdxF,Pr
018350: 6F 63 44 61 74 52 65 66 2C 50 4B 65 79 29 3B 0D ocDatRef,PKey);.
018360: 0A 20 20 69 66 20 6E 6F 74 20 4F 4B 20 61 6E 64 . if not OK and
018370: 20 49 64 78 46 2E 41 6C 6C 6F 77 44 75 70 6C 4B IdxF.AllowDuplK
018380: 65 79 73 20 74 68 65 6E 0D 0A 20 20 62 65 67 69 eys then.. begi
018390: 6E 0D 0A 20 20 20 20 54 65 6D 70 4B 65 79 20 3A n.. TempKey :
0183A0: 3D 20 50 4B 65 79 3B 20 0D 0A 20 20 20 20 4E 65 = PKey; .. Ne
0183B0: 78 74 4B 65 79 28 49 64 78 46 2C 50 72 6F 63 44 xtKey(IdxF,ProcD
0183C0: 61 74 52 65 66 2C 50 4B 65 79 29 3B 0D 0A 20 20 atRef,PKey);..
0183D0: 20 20 4F 4B 20 3A 3D 20 4F 4B 20 61 6E 64 20 28 OK := OK and (
0183E0: 50 4B 65 79 20 3D 20 54 65 6D 70 4B 65 79 29 3B PKey = TempKey);
0183F0: 0D 0A 20 20 65 6E 64 3B 0D 0A 65 6E 64 3B 0D 0A .. end;..end;..
018400: D5 5E 23 56 23 4E 23 46 E1 C9 DD E1 EB 1A 4F 06 .^#V#N#F......O.
018410: 00 2F 6F 26 FF 39 F9 EB 03 ED B0 DD E9 D1 1A 4F ./o&.9.........O
018420: 06 00 2F 6F 26 FF 39 F9 EB 03 ED B0 E9 DD E1 EB ../o&.9.........
018430: 21 E0 FF 39 F9 EB C5 04 05 28 05 AF 12 13 10 FC !..9.....(......
018440: ED B0 C1 3E 20 90 91 28 06 47 AF 12 13 10 FC DD ...> ..(.G......
018450: E9 DD E1 21 E0 FF 39 F9 06 20 AF 77 23 10 FC DD ...!..9.. .w#...
018460: E9 DD E1 45 CD 8A 05 B6 77 DD E9 DD E1 D1 7D 93 ...E....w.....}.
018470: 38 F7 3C 4F 43 CD 8A 05 5F 41 AF B3 CB 23 30 06 8.<OC..._A...#0.
018480: B6 77 23 AF 1E 01 10 F3 18 DD 78 E6 F8 0F 0F 0F .w#.......x.....
018490: C6 02 6F 26 00 39 78 E6 07 3C 47 AF 37 17 10 FD ..o&.9x..<G.7...
0184A0: C9 E5 D9 EB E3 73 23 72 23 D1 73 23 72 23 71 23 .....s#r#.s#r#q#
0184B0: 70 C9 DD E1 78 EB 21 00 00 44 39 4E E5 09 23 E3 p...x.!..D9N..#.
0184C0: B9 38 01 79 12 13 23 B7 28 03 4F ED B0 E1 F9 DD .8.y..#.(.O.....
0184D0: E9 DD E1 78 21 00 00 44 39 4E E5 09 23 5E 23 56 ...x!..D9N..#^#V
0184E0: 18 DC DD E1 EB 68 26 00 44 39 ED B0 21 20 00 39 .....h&.D9..! .9
0184F0: F9 DD E9 DD E1 21 20 00 39 5E 23 56 68 26 00 44 .....! .9^#Vh&.D
018500: 39 ED B0 21 22 00 18 E7 DD E1 EB 78 2F 6F 26 FF 9..!"......x/o&.
018510: 39 F9 70 23 48 06 00 EB ED B0 DD E9 B7 ED 52 19 9.p#H.........R.
018520: D8 3E 90 C3 75 1F B7 ED 52 B7 ED 42 30 03 09 19 .>..u...R..B0...
018530: C9 3E 91 18 EE B7 ED 52 EB 13 EA 40 06 F0 18 01 .>.....R...@....
018540: F8 11 00 00 C9 D5 EB B7 ED 52 EB E1 18 EB B7 ED .........R......
018550: 52 21 01 00 C8 2B C9 CD A8 0B 18 F5 CD 7A 09 18 R!...+.......z..
018560: F0 B7 ED 52 21 01 00 C0 2B C9 CD A8 0B 18 F5 CD ...R!...+.......
018570: 7A 09 18 F0 CD 3C 07 21 01 00 D0 2B C9 CD A8 0B z....<.!...+....
018580: 18 F5 CD 7A 09 18 F0 CD 3C 07 21 01 00 C8 D8 2B ...z....<.!....+
018590: C9 CD A8 0B 18 F4 CD 7A 09 18 EF CD 3C 07 21 00 .......z....<.!.
0185A0: 00 C8 D8 23 C9 CD A8 0B 18 F4 CD 7A 09 18 EF CD ...#.......z....
0185B0: 3C 07 21 01 00 D8 2B C9 CD A8 0B 18 F5 CD 7A 09 <.!...+.......z.
0185C0: 18 F0 54 5D 4B 42 EB 21 00 00 7A B7 3E 10 20 03 ..T]KB.!..z.>. .
0185D0: 53 3E 08 29 EB 29 EB 30 01 09 3D 20 F6 C9 7C AA S>.).).0..= ..|.
0185E0: F5 CD 4A 07 EB CD 4A 07 EB 44 4D AF 67 6F 3E 11 ..J...J..DM.go>.
0185F0: ED 6A ED 42 30 02 09 37 3F CB 13 CB 12 3D 20 F0 .j.B0..7?....= .
018600: 0D 0A 70 72 6F 63 65 64 75 72 65 20 53 65 61 72 ..procedure Sear
018610: 63 68 4B 65 79 28 76 61 72 20 49 64 78 46 20 3A chKey(var IdxF :
018620: 20 49 6E 64 65 78 46 69 6C 65 3B 0D 0A 20 20 20 IndexFile;..
018630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018640: 20 76 61 72 20 50 72 6F 63 44 61 74 52 65 66 20 var ProcDatRef
018650: 3A 20 49 6E 74 65 67 65 72 3B 0D 0A 20 20 20 20 : Integer;..
018660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
018670: 76 61 72 20 50 72 6F 63 4B 65 79 29 3B 0D 0A 76 var ProcKey);..v
018680: 61 72 0D 0A 20 20 50 4B 65 79 20 3A 20 54 61 4B ar.. PKey : TaK
018690: 65 79 53 74 72 20 61 62 73 6F 6C 75 74 65 20 50 eyStr absolute P
0186A0: 72 6F 63 4B 65 79 3B 0D 0A 62 65 67 69 6E 0D 0A rocKey;..begin..
0186B0: 20 20 54 61 46 69 6E 64 4B 65 79 28 49 64 78 46 TaFindKey(IdxF
0186C0: 2C 50 72 6F 63 44 61 74 52 65 66 2C 50 4B 65 79 ,ProcDatRef,PKey
0186D0: 29 3B 0D 0A 20 20 69 66 20 6E 6F 74 20 4F 4B 20 );.. if not OK
0186E0: 74 68 65 6E 20 0D 0A 20 20 20 20 4E 65 78 74 4B then .. NextK
0186F0: 65 79 28 49 64 78 46 2C 50 72 6F 63 44 61 74 52 ey(IdxF,ProcDatR
018700: 65 66 2C 50 4B 65 79 29 3B 0D 0A 65 6E 64 3B 0D ef,PKey);..end;.
018710: 0A 20 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A . ..............
018720: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
018730: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
018740: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
018750: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
018760: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
018770: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
018780: 65 79 73 20 74 68 65 6E 0D 0A 20 20 62 65 67 69 eys then.. begi
018790: 6E 0D 0A 20 20 20 20 54 65 6D 70 4B 65 79 20 3A n.. TempKey :
0187A0: 3D 20 50 4B 65 79 3B 20 0D 0A 20 20 20 20 4E 65 = PKey; .. Ne
0187B0: 78 74 4B 65 79 28 49 64 78 46 2C 50 72 6F 63 44 xtKey(IdxF,ProcD
0187C0: 61 74 52 65 66 2C 50 4B 65 79 29 3B 0D 0A 20 20 atRef,PKey);..
0187D0: 20 20 4F 4B 20 3A 3D 20 4F 4B 20 61 6E 64 20 28 OK := OK and (
0187E0: 50 4B 65 79 20 3D 20 54 65 6D 70 4B 65 79 29 3B PKey = TempKey);
0187F0: 0D 0A 20 20 65 6E 64 3B 0D 0A 65 6E 64 3B 0D 0A .. end;..end;..
018800: EB F1 F0 18 48 E5 CD 5C 07 CB 3C CB 1D D1 EB CD ....H..\..<.....
018810: DE 06 EB CB 7A C8 18 35 CD 2B 07 C8 29 10 FD C9 ....z..5.+..)...
018820: CD 2B 07 C8 CB 3C CB 1D 10 FA C9 EB 7A B7 20 08 .+...<......z. .
018830: 7B FE 10 30 03 47 B7 C9 AF 67 6F C9 EB 7C AA 7C {..0.G...go..|.|
018840: FA 48 07 BA C0 7D BB C9 17 C9 CB 7C C8 7C 2F 67 .H...}.....|.|/g
018850: 7D 2F 6F 23 C9 7D E6 01 6F 26 00 C9 ED 4B D3 00 }/o#.}..o&...K..
018860: ED 5B D1 00 C5 D5 78 41 4A 53 1E 00 1F CB 18 CB .[....xAJS......
018870: 19 CB 1A CB 1B E1 19 EB E1 ED 4A 44 4D 21 E9 62 ..........JDM!.b
018880: 19 22 D1 00 EB 21 19 36 ED 4A 22 D3 00 44 4D C9 ."...!.6.J"..DM.
018890: 06 00 11 10 27 CD AC 07 11 E8 03 CD AC 07 11 64 ....'..........d
0188A0: 00 CD AC 07 1E 0A CD AC 07 7D 18 0D AF 3C ED 52 .........}...<.R
0188B0: 30 FB 19 04 3D 20 02 05 C8 C6 30 DD 77 00 DD 23 0...= ....0.w..#
0188C0: C9 DD 7E 00 D6 24 4F 21 00 00 20 02 DD 23 DD 7E ..~..$O!.. ..#.~
0188D0: 00 CD 84 04 D6 30 38 29 FE 0A 38 0E 0C 0D 20 21 .....08)..8... !
0188E0: D6 07 FE 0A 38 1B FE 10 30 17 54 5D 29 D8 29 D8 ....8...0.T]).).
0188F0: 0C 0D 20 02 54 5D 19 D8 29 D8 5F 16 00 19 D8 18 .. .T]..)._.....
018900: CB 79 B7 C8 7C 87 C9 DD E1 E1 E5 7D 26 00 23 39 .y..|......}&.#9
018910: 4E 81 38 1C 77 EB 21 00 00 44 ED 42 39 F9 EB E5 N.8.w.!..D.B9...
018920: 03 ED B0 EB E1 2B 1B 4F 03 ED B8 EB 23 F9 DD E9 .....+.O....#...
018930: 3E 10 C3 77 1F DD E1 CD A6 04 57 E1 CD A7 09 5F >..w......W...._
018940: E1 E5 7D 93 38 1A 14 15 28 16 BA 38 16 4A 06 00 ..}.8...(..8.J..
018950: 60 39 7B 82 54 5D 3D 6F 60 39 79 ED B8 EB 18 09 `9{.T]=o`9y.....
018960: AF 18 03 3C 6B 2D 26 00 39 77 F9 DD E9 DD E1 E1 ...<k-&.9w......
018970: E5 7D 26 00 23 39 F9 6F 26 00 DD E9 DD E1 21 00 .}&.#9.o&.....!.
018980: 00 54 39 5E 4B 23 E5 19 5E 43 23 E5 19 E5 FD E1 .T9^K#..^C#.....
018990: D1 E1 79 90 38 10 3C 4F C5 D5 E5 1A BE 28 0C E1 ..y.8.<O.....(..
0189A0: D1 C1 23 0D 20 F2 21 00 00 18 0E 23 13 10 EC D1 ..#. .!....#....
0189B0: E1 C1 21 00 00 39 EB ED 52 FD F9 DD E9 DD E1 CD ..!..9..R.......
0189C0: A6 04 4F E1 CD A7 09 5F E1 7E 93 38 1B 0C 0D 28 ..O...._.~.8...(
0189D0: 17 91 38 12 F5 7E 91 77 06 00 50 19 54 5D 09 F1 ..8..~.w..P.T]..
0189E0: 3C 4F ED B0 18 02 1D 73 DD E9 DD E1 CD A7 09 4F <O.....s.......O
0189F0: D1 ED 53 E6 00 21 00 00 39 1A F5 86 38 03 B8 38 ..S..!..9...8..8
018A00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018A10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018A20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018A30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018A40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018A50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018A60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018A70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018A80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018A90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018AA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018AB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018AC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018AD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018AE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018AF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
018C00: 01 78 12 F1 57 5E 91 38 2F 3C 6F 7A 83 38 04 B8 .x..W^.8/<oz.8..
018C10: 7D 38 08 78 93 38 26 91 38 23 3C B7 28 1F C5 D5 }8.x.8&.8#<.(...
018C20: 2A E6 00 5F 1D 16 00 42 19 09 D1 D5 E5 50 19 EB *.._...B.....P..
018C30: E1 4F ED B8 D1 C1 18 05 7A 3C 28 19 4F 78 91 3C .O......z<(.Ox.<
018C40: BB 38 01 7B B7 28 0E 2A E6 00 06 00 09 EB 21 01 .8.{.(.*......!.
018C50: 00 39 4F ED B0 21 00 00 54 39 5E 13 19 F9 DD E9 .9O..!..T9^.....
018C60: DD E1 E1 2D C2 30 08 6C 26 00 DD E9 21 02 00 54 ...-.0.l&...!..T
018C70: 39 5E 13 19 7E 36 01 23 77 C9 21 04 00 54 39 5E 9^..~6.#w.!..T9^
018C80: 4B 23 E5 19 5E 43 23 E5 19 E5 FD E1 D1 E1 AF B8 K#..^C#.........
018C90: 28 04 B9 20 08 78 B9 E1 D1 FD F9 D5 E9 1A BE 20 (.. .x.........
018CA0: F6 23 13 05 0D 18 E7 7C B7 20 03 7D B7 C0 3E 11 .#.....|. .}..>.
018CB0: C3 77 1F CD D6 09 D0 3E 01 C3 75 1F CD 4A 0A 18 .w.....>..u..J..
018CC0: F5 CD 75 0F CD 60 0A 18 ED D9 7D B7 D9 3E 02 28 ..u..`....}..>.(
018CD0: E8 CD BE 0A 18 E0 D9 CB 78 D9 C2 51 0A D9 7D B7 ........x..Q..}.
018CE0: D9 C8 D9 C5 D5 E5 D9 7D B7 20 05 D9 CB B8 18 54 .......}. .....T
018CF0: C5 CB F8 AF 08 D9 CB F8 7D D9 95 28 13 30 06 ED ........}..(.0..
018D00: 44 08 3D 08 D9 CD 43 0B 2C 3D 20 F9 08 28 01 D9 D.=...C.,= ..(..
018D10: F1 E6 80 20 0F CD 5B 0B 30 25 CD 44 0B B7 2C 20 ... ..[.0%.D..,
018D20: 1E 37 18 20 CD 8F 0B 3F F5 28 10 38 01 D9 CD 75 .7. ...?.(.8...u
018D30: 0B CB 78 20 09 CD 4F 0B 2D 20 F6 CD 3B 0B F1 38 ..x ..O.- ..;..8
018D40: 02 CB B8 B7 D9 E1 D1 C1 D9 C9 D9 CB 78 D9 C2 DD ............x...
018D50: 09 CD 58 0A CD DD 09 D8 2C 2D C8 78 EE 80 47 C9 ..X.....,-.x..G.
018D60: D9 7D B7 D9 CA 3B 0B 7D B7 C8 D9 85 D9 CD 16 0B .}...;.}........
018D70: C5 D5 E5 DD 39 CD 3B 0B D9 2E 05 D9 3E 08 DD 23 ....9.;.....>..#
018D80: DD 6E 00 08 CB 1D 30 03 CD 5B 0B CD 44 0B 08 3D .n....0..[..D..=
018D90: 20 F1 D9 2D D9 20 E5 DD 6E FB CB 78 20 09 08 CD ..-. ..n..x ...
018DA0: 50 0B 2C 2D 28 01 2D F1 F1 F1 B7 08 F1 D9 C1 E1 P.,-(.-.........
018DB0: D9 DD E1 CB B8 B0 47 2C 2D CC 3B 0B 08 C9 7D B7 ......G,-.;...}.
018DC0: C8 D9 95 D9 3F CD 16 0B E5 E5 E5 DD 39 D9 2E 05 ....?.......9...
018DD0: D9 3E 08 08 CD 8F 0B 38 03 CD 75 0B 3F CB 15 08 .>.....8..u.?...
018DE0: 3D 20 0C DD 75 05 DD 2B D9 2D D9 28 0E 3E 08 CD = ..u..+.-.(.>..
018DF0: 4F 0B 30 DF 08 CD 75 0B B7 18 E1 CD 4F 0B 38 04 O.0...u.....O.8.
018E00: C3 C9 1F CD AB 43 6F 70 79 72 69 67 68 74 20 28 .....Copyright (
018E10: 43 29 20 31 39 38 34 20 42 4F 52 4C 41 4E 44 20 C) 1984 BORLAND
018E20: 49 6E 63 00 04 00 82 41 00 00 00 00 00 00 00 00 Inc....A........
018E30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
018E40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
018E50: 00 00 00 0A 56 69 73 75 61 6C 20 32 30 30 39 31 ....Visual 20091
018E60: 32 2F 39 32 30 2F 39 32 50 18 00 00 00 49 6E 69 2/920/92P....Ini
018E70: 74 00 00 00 00 00 00 00 00 00 00 00 00 45 78 69 t............Exi
018E80: 74 00 00 00 00 00 00 00 00 00 00 04 1B 59 00 00 t............Y..
018E90: 2C 30 30 30 29 00 00 00 00 00 00 01 20 20 04 03 ,000)....... ..
018EA0: 00 00 02 1B 76 00 00 00 00 00 48 6F 6D 65 02 1B ....v.....Home..
018EB0: 4C 6E 73 00 02 1B 4D 65 6C 00 00 00 02 1B 78 4F Lns...Mel.....xO
018EC0: 4C 00 02 1B 33 69 67 68 02 1B 34 6F 77 00 00 00 L...3igh..4ow...
018ED0: 7E B7 37 C8 23 F5 E5 7E CD 00 02 E1 F1 3D C8 18 ~.7.#..~.....=..
018EE0: F3 CD 25 02 0D 0A 00 C9 C5 D5 E5 DD E5 FD E5 F5 ..%.............
018EF0: 6F 26 00 E5 CD A6 00 F1 FD E1 DD E1 E1 D1 C1 C9 o&..............
018F00: 6F E5 CD A6 00 C9 FE 80 DC 90 02 D4 A9 02 E6 7F o...............
018F10: 18 EE C5 D5 E5 DD E5 FD E5 CD A3 00 7D 18 D9 E5 ..........£.}...
018F20: 21 06 02 18 04 E5 21 00 02 22 38 02 E1 E3 F5 C5 !.....!.."8.....
018F30: D5 7E 23 B7 28 07 E5 CD 00 02 E1 18 F4 D1 C1 F1 .~#.(...........
018F40: E3 C9 7D B4 C8 3A 24 01 87 87 87 E3 E3 E3 E3 C5 ..}..:$.........
018F50: 01 D2 04 C1 3D 20 F4 2B 18 E8 CD D0 01 D8 2A CE ....= .+......*.
018F60: 01 18 DF F5 C5 D5 E5 21 A8 01 CD 5A 02 21 A2 01 .......!...Z.!..
018F70: CD D0 01 2A BA 01 D4 42 02 E1 D1 C1 F1 C9 F5 C5 ...*...B........
018F80: D5 E5 21 B4 01 18 E9 F5 C5 D5 E5 21 AE 01 18 E0 ..!........!....
018F90: F5 3A BC 02 B7 28 10 C5 D5 E5 3D 32 BC 02 21 C8 .:...(....=2..!.
018FA0: 01 CD 5A 02 E1 D1 C1 F1 C9 F5 3A BC 02 B7 20 F7 ..Z.......:... .
018FB0: C5 D5 E5 3C 32 BC 02 21 C2 01 18 E5 01 F5 C5 D5 ...<2..!........
018FC0: E5 21 BC 01 18 DB F5 C5 D5 E5 E5 11 F0 00 21 8B .!............!.
018FD0: 01 01 10 00 ED B0 D1 3A 9E 01 4F 3A 9C 01 82 D5 .......:..O:....
018FE0: CD 00 03 D1 3A 9F 01 4F 3A 9D 01 83 CD 00 03 21 ....:..O:......!
018FF0: F0 00 CD D0 01 2A A0 01 CD 42 02 E1 D1 C1 F1 C9 .....*...B......
019000: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
019010: 15 00 01 00 02 09 52 E5 15 00 41 02 00 00 00 02 ......R...A.....
019020: 15 00 46 02 00 00 00 02 15 00 42 02 00 00 00 02 ..F.......B.....
019030: 15 00 47 02 00 00 00 02 15 00 43 02 00 00 00 02 ..G.......C.....
019040: 15 00 48 02 00 00 00 02 15 00 44 02 00 00 00 02 ..H.......D.....
019050: 15 00 49 02 00 00 00 02 15 00 45 02 00 00 00 02 ..I.......E.....
019060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0190A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0190B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0190C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0190D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0190E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0190F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
019100: CD 8F 0B 3F E1 D1 C1 CB 78 20 05 CD 50 0B 18 9A ...?....x ..P...
019110: 2C 20 97 37 18 95 38 06 C6 80 38 06 18 1B C6 80 , .7..8...8.....
019120: 38 17 6F DD E3 D9 E5 C5 78 CB F8 D9 A8 E6 80 F5 8.o.....x.......
019130: CB F8 DD E5 DD 21 00 00 C9 E1 D8 AF 6F 47 4F 57 .....!......oGOW
019140: 5F 67 C9 B7 CB 18 CB 19 CB 1A CB 1B CB 1C C9 B7 _g..............
019150: CB 14 CB 13 CB 12 CB 11 CB 10 C9 7C D9 84 D9 67 ...........|...g
019160: 7B D9 8B D9 5F 7A D9 8A D9 57 79 D9 89 D9 4F 78 {..._z...Wy...Ox
019170: D9 88 D9 47 C9 7C D9 94 D9 67 7B D9 9B D9 5F 7A ...G.|...g{..._z
019180: D9 9A D9 57 79 D9 99 D9 4F 78 D9 98 D9 47 C9 78 ...Wy...Ox...G.x
019190: D9 B8 D9 C0 79 D9 B9 D9 C0 7A D9 BA D9 C0 7B D9 ....y....z....{.
0191A0: BB D9 C0 7C D9 BC D9 C9 D9 78 D9 A8 F2 B2 0B 78 ...|.....x.....x
0191B0: 17 C9 CB 78 28 06 CD BC 0B C8 3F C9 7D D9 BD D9 ...x(.....?.}...
0191C0: C0 B7 C8 C3 8F 0B 7D D6 81 DA 3B 0B 3C FE 28 D0 ......}...;.<.(.
0191D0: D9 C5 D5 E5 08 CD 3B 0B 08 37 CD 44 0B 3D 20 F9 ......;..7.D.= .
0191E0: D9 7C D9 A4 D9 67 7B D9 A3 D9 5F 7A D9 A2 D9 57 .|...g{.£._z...W
0191F0: 79 D9 A1 D9 4F 78 D9 A0 D9 47 C3 44 0A D9 C5 D5 y...Ox...G.D....
019200: E5 D9 CD 75 0F D9 CD C6 0B D9 CD 4A 0A 18 EB 7D ...u.......J...}
019210: B7 C8 CB 78 3E 03 C2 75 1F CD 75 0F 7D C6 80 CB ...x>..u..u.}...
019220: 2F C6 80 6F D6 14 F5 D9 C5 D5 E5 CD BE 0A CD D6 /..o............
019230: 09 2D C5 D5 E5 CD 4A 0A 7D E1 D1 C1 D9 E1 D1 C1 .-....J.}.......
019240: E3 BC E3 30 E3 F1 D9 C9 D9 CD 57 0F 2D CD 4A 0A ...0......W.-.J.
019250: D9 CD 57 0F 2C D9 7D FE 6C D8 C5 CB B8 CD A8 0B ..W.,.}.l.......
019260: C1 38 09 CD BE 0A CD FD 0B CD 60 0A CB 78 28 03 .8........`..x(.
019270: CD D6 09 D9 2D D9 CD A8 0B F5 38 03 CD 4A 0A D9 ....-.....8..J..
019280: 2D D9 CD A8 0B 38 05 D9 2C CD 4A 0A 7D FE 6C 38 -....8..,.J.}.l8
019290: 3B D9 01 AA 2A 11 AA AA 21 7F AA CD 60 0A DD E5 ;...*...!...`...
0192A0: DD 21 D0 0C 3E 05 CD FD 0E DD E1 CD 75 0F CD 60 .!..>.......u..`
0192B0: 0A CD 60 0A C5 D5 E5 D9 CD 75 0F 2D 2D D9 2D CD ..`......u.--.-.
0192C0: D6 09 D9 E1 D1 C1 D9 CD 4A 0A 2C 2C F1 2C 2D C8 ........J.,,.,-.
0192D0: D8 78 EE 80 47 C9 67 AA 3F 2B 32 D7 6E B6 2A 1D .x..G.g.?+2.n.*.
0192E0: EF 38 74 0D D0 00 0D D0 7A 88 88 88 88 08 7E AB .8t.....z.....~.
0192F0: AA AA AA AA 2C 2D 3E 04 CA 75 1F CB 78 C2 75 1F ....,->..u..x.u.
019300: 18 3A D9 00 B7 20 0C 2A E2 00 CB 5E 20 EE 18 03 .:... .*...^ ...
019310: CB 46 C8 2A E2 00 E5 11 0C 00 19 EB 0E 10 CD 05 .F.*............
019320: 00 E1 3C 20 05 3E FF 32 D9 00 36 00 C9 22 E2 00 ..< .>.2..6.."..
019330: 7E E6 03 C8 CD 9F 1A 2A E2 00 11 2D 00 19 AF 77 ~......*...-...w
019340: 23 77 11 D5 FF 19 77 23 01 04 00 CD F3 19 CD 9F #w....w#........
019350: 1A 18 C0 22 E2 00 7E E6 03 C8 18 B7 CD 17 16 C0 ..."..~.........
019360: 11 0C 00 19 EB 0E 13 CD 05 00 3C C0 18 40 FD E1 ..........<..@..
019370: 2A DB 00 06 10 CD B2 05 AF 12 E1 FD E5 CD 17 16 *...............
019380: C0 E5 CD F7 03 E1 E5 11 1C 00 19 EB 21 5C 00 01 ............!\..
019390: 0C 00 ED B0 E1 11 0C 00 19 E5 EB 0E 17 CD 05 00 ................
0193A0: D1 3C CA AE 15 21 5C 00 01 24 00 ED B0 C9 3E 01 .<...!\..$....>.
0193B0: C3 20 16 3E AF 32 E6 00 CD 17 16 C0 2A DF 00 7C . .>.2......*..|
0193C0: B5 3E 21 20 EB 2A E2 00 11 0C 00 19 11 5C 00 01 .>! .*.......\..
0193D0: 24 00 ED B0 11 5C 00 0E 0F CD 05 00 3C 28 CF 21 $....\......<(.!
0193E0: FD 15 11 80 00 01 1A 00 ED B0 11 00 01 3A E6 00 .............:..
0193F0: B7 20 04 ED 5B 01 01 31 00 01 C3 81 00 FF D5 0E . ..[..1........
019400: 1A CD 05 00 11 5C 00 0E 14 CD 05 00 D1 21 80 00 .....\.......!..
019410: 19 EB B7 28 E9 18 66 22 E2 00 CD C2 16 C8 3E 20 ...(..f"......>
019420: 32 D9 00 C9 3A D9 00 B7 C8 F1 C9 DD E1 DD E5 E5 2...:...........
019430: 21 CA 00 CD 3C 16 E1 C9 DD E1 DD E5 22 E2 00 CB !...<......."...
019440: 46 28 0B 23 7E FE 00 C0 23 36 00 C3 65 16 3E 02 F(.#~...#6..e.>.
019450: 18 CE E5 21 CA 00 CD 5B 16 E1 C9 22 E2 00 CB 4E ...!...[..."...N
019460: C0 3E 03 18 EB 21 DA 00 7E FE 80 38 02 3E 7F 4F .>...!..~..8.>.O
019470: 36 7F 2A DB 00 22 DD 00 16 00 CD 12 02 77 FE 0D 6.*..".......w..
019480: 28 3D 1E 01 FE 08 28 26 FE 7F 28 22 1D FE 18 28 (=....(&..("...(
019490: 1D FE 03 20 09 3A E1 00 B7 28 DF C3 4E 1F FE 20 ... .:...(..N..
0194A0: 38 D8 79 BA 28 D4 7E 14 23 CD E8 01 18 CC 15 FA 8.y.(.~.#.......
0194B0: 78 16 2B CD 25 02 08 20 08 00 1D 28 BD 18 EF 36 x.+.%.. ...(...6
0194C0: 1A C9 E5 2A E2 00 23 7E FE 06 E1 C9 CD C2 16 C8 ...*..#~........
0194D0: CD 5B 17 FE 1A C8 C5 D5 E5 2A E2 00 23 7E B7 20 .[.......*..#~.
0194E0: 0E 2A DD 00 7E FE 1A 28 68 23 22 DD 00 18 62 3D .*..~..(h#"...b=
0194F0: 20 15 CD 12 02 F5 FE 20 38 05 CD E8 01 18 05 FE ...... 8.......
019500: D9 CD 61 0F D9 7D 2E 81 95 F5 CD BE 0A D9 CD 4F ..a..}.........O
019510: 0F D9 CD 4A 0A C5 D5 E5 D9 2C CD D6 09 D9 E1 D1 ...J.....,......
019520: C1 CD BE 0A DD E5 DD 21 55 0D 3E 06 CD FD 0E DD .......!U.>.....
019530: E1 2C D9 CD 6B 0F 2D D9 CD D6 09 F1 C5 D5 E5 6F .,..k.-........o
019540: 26 00 30 01 25 CD D1 0F D9 2C CD 60 0A D9 E1 D1 &.0.%....,.`....
019550: C1 CD D6 09 7D FE 67 DA 3B 0B C9 7D 8A 9D D8 89 ....}.g.;..}....
019560: 1D 7D E9 A2 8B 2E 3A 7D 8E E3 38 8E 63 7E 49 92 .}....:}..8.c~I.
019570: 24 49 12 7E CD CC CC CC 4C 7F AB AA AA AA 2A D9 $I.~....L.....*.
019580: CD 6B 0F D9 B7 CB 78 F5 CB B8 CD BE 0A 7D FE 88 .k....x......}..
019590: 30 47 C5 D5 E5 2C CD 99 0F E5 CB 3C CB 1D 7D E1 0G...,.....<..}.
0195A0: F5 CD D1 0F 2C 2D 28 01 2D D9 F1 E1 D1 C1 F5 CD ....,-(.-.......
0195B0: 4A 0A DD E5 DD 21 D9 0D 3E 08 CD 12 0F DD E1 F1 J....!..>.......
0195C0: 30 0A F5 D9 CD 61 0F D9 CD 60 0A F1 85 6F 38 09 0....a...`...o8.
0195D0: F1 C8 D9 CD 4F 0F C3 BE 0A E1 3E 01 C3 75 1F 6D ....O.....>..u.m
0195E0: 2E 1D 11 60 31 70 46 2C FE E5 7F 74 36 7C 89 84 ...`1pF,...t6|..
0195F0: 21 77 53 3C FF C3 2E 7A D2 7D 5B 95 1D 7C 25 B8 !wS<...z.}[..|%.
019600: 46 58 63 7E 16 FC EF FD 75 80 D2 F7 17 72 31 7D FXc~....u....r1}
019610: B7 C8 DD E5 D9 CD 4F 0F D9 AF CB 78 28 03 3C CB ......O....x(.<.
019620: B8 F5 CD A8 0B 38 08 D9 CD BE 0A F1 CB FF F5 D9 .....8..........
019630: 01 CF 06 11 8E E9 21 7E 4A D9 CD A8 0B 30 05 CD ......!~J....0..
019640: F7 0E 18 4F DD 21 97 0E 3E 02 08 D9 11 12 00 DD ...O.!..>.......
019650: 19 CD 3C 0F D9 CD A8 0B 38 0B 08 3D 20 EC D9 11 ..<.....8..= ...
019660: 0C 00 DD 19 D9 D9 CD 37 0F CB F8 CD D6 09 C5 D5 .......7........
019670: E5 CD 3C 0F CD 60 0A D9 CD 4F 0F CD D6 09 D9 E1 ..<..`...O......
019680: D1 C1 CD BE 0A DD E5 CD F7 0E DD E1 D9 CD 37 0F ..............7.
019690: CD D6 09 F1 17 30 0A F5 D9 CD 57 0F 2D CD 4A 0A .....0....W.-.J.
0196A0: F1 DD E1 CB 4F C8 CB F8 C9 7F E7 CF CC 13 54 7F ....O.........T.
0196B0: F6 F4 A2 30 09 7F 6A C1 91 0A 06 80 B5 9E 8A 6F ...0..j........o
0196C0: 44 80 82 2C 3A CD 13 80 6A C1 91 0A 06 81 00 00 D..,:...j.......
0196D0: 00 00 00 80 21 A2 DA 0F 49 7D E8 A2 8B 2E BA 7D ....!...I}.....}
0196E0: 8E E3 38 8E 63 7E 49 92 24 49 92 7E CD CC CC CC ..8.c~I.$I.~....
0196F0: 4C 7F AB AA AA AA AA DD 21 D3 0E 3E 05 C5 D5 E5 L.......!..>....
019700: 0D CC E1 01 F1 18 4A 3D 20 05 CD 12 02 18 42 3D ......J= .....B=
019710: 3D 20 06 CD AF 00 7D 18 38 3D 20 06 CD B5 00 7D = ....}.8= ....}
019720: 18 2F 0E 14 CD AD 1A 20 21 2A E2 00 23 23 23 E5 ./..... !*..###.
019730: 7E C6 2D 5F 16 00 19 7E E1 FE 1A 28 14 34 F2 51 ~.-_...~...(.4.Q
019740: 17 36 00 2A E2 00 CB D6 18 07 3E 99 32 D9 00 3E .6.*......>.2..>
019750: 1A 2A E2 00 23 23 77 E1 D1 C1 C9 3A D9 00 B7 3E .*..##w....:...>
019760: 1A C0 E5 2A E2 00 23 23 7E E1 C9 E5 2A E2 00 23 ...*..##~...*..#
019770: 7E FE FF 28 45 CD CC 16 CD 5B 17 FE 20 28 0C FE ~..(E....[.. (..
019780: 09 28 08 FE 0D 28 04 FE 0A 20 05 CD D6 16 18 E8 .(...(... ......
019790: 21 5D 00 06 1E CD 5B 17 FE 20 28 16 FE 09 28 12 !]....[.. (...(.
0197A0: FE 0D 28 14 FE 1A 28 10 77 23 05 28 05 CD D6 16 ..(...(.w#.(....
0197B0: 18 E3 CD C2 16 CC D6 16 36 00 E1 C9 DD 21 5D 00 ........6....!].
0197C0: DD 7E 00 B7 C8 06 00 FE 2D C0 04 DD 23 C9 38 05 .~......-...#.8.
0197D0: DD 7E 00 B7 C8 3E 10 37 C3 20 16 EB CD C2 16 20 .~...>.7. .....
0197E0: 07 CD 5B 17 12 C3 D6 16 CD D6 16 12 C9 3E AF 4F ..[..........>.O
0197F0: C5 CD 6B 17 C1 CD BC 17 C8 C5 E5 CD C1 07 D1 C1 ..k.............
019800: CD CE 17 D8 05 CC 4D 07 EB 73 0C 0D 20 02 23 72 ......M..s.. .#r
019810: EB C9 CD 6B 17 CD BC 17 C8 C5 E5 CD 70 11 D9 E1 ...k........p...
019820: C1 CD CE 17 D8 05 D9 CC 58 0A D9 C3 A1 05 E5 CD ........X.......
019830: CC 16 CD 5B 17 FE 0A 20 05 CD D6 16 18 F4 0E 00 ...[... ........
019840: CD 5B 17 FE 0D 28 15 FE 1A 28 11 0C 23 77 05 28 .[...(...(..#w.(
019850: 05 CD D6 16 18 EA CD C2 16 CC D6 16 E1 71 C9 2A .............q.*
019860: E2 00 23 7E FE 00 CA E1 01 CD 5B 17 FE 0D 28 08 ..#~......[...(.
019870: FE 1A C8 CD D6 16 18 F1 CD C2 16 20 09 CD D6 16 ........... ....
019880: FE 0A C0 C3 D6 16 2A E2 00 23 23 7E FE 1A C8 36 ......*..##~...6
019890: 00 C9 C5 D5 E5 CD 9C 18 E1 D1 C1 C9 4F CD 24 16 ............O.$.
0198A0: 2A E2 00 23 7E FE 06 28 1B 30 38 E1 06 00 C5 E5 *..#~..(.08.....
0198B0: B7 CA A6 00 3D CA A6 00 3D 3D CA A9 00 3D CA AC ....=...==...=..
0198C0: 00 C3 B2 00 2B CB DE 23 23 23 E5 7E C6 2D 5F 16 ....+..###.~.-_.
0198D0: 00 19 71 E1 34 F0 36 00 0E 15 CD A1 1A C8 3E F0 ..q.4.6.......>.
0198E0: C3 20 16 2A E6 00 3A E8 00 BE C8 34 5E 16 00 19 . .*..:....4^...
0198F0: 71 C9 7D C3 92 18 C1 D1 C5 DD 2A DB 00 CB 7C 28 q.}.......*...|(
019900: F5 CD 75 0F CD 60 0A F1 CD 12 0F D9 E1 D1 C1 C3 ..u..`..........
019910: 60 0A F5 D9 CD 37 0F 18 10 F5 D9 C5 D5 E5 CD 37 `....7.........7
019920: 0F CD D6 09 D9 E1 D1 C1 D9 CD 60 0A F1 3D 20 E9 ..........`..= .
019930: D9 CD 4F 0F C3 D6 09 11 06 00 DD 19 DD 6E 00 DD ..O..........n..
019940: 66 01 DD 5E 02 DD 56 03 DD 4E 04 DD 46 05 C9 21 f..^..V..N..F..!
019950: 81 00 44 4C 54 5C C9 01 0F 49 11 A2 DA 21 82 21 ..DLT\...I...!.!
019960: C9 01 04 35 11 33 F3 21 81 FA C9 01 72 31 11 F7 ...5.3.!....r1..
019970: 17 21 80 D2 C9 C5 D5 E5 D9 E1 D1 C1 C9 CD 5C 07 .!............\.
019980: 21 80 00 3E 20 CB 78 20 0D CB 23 CB 12 CB 11 CB !..> .x ..#.....
019990: 10 2D 3D 20 F0 6F CB B8 C9 CB 78 D9 CD 4F 0F 28 .-= .o....x..O.(
0199A0: 02 CB F8 2D CD D6 09 B7 CB 7D 28 1C CB 78 08 CB ...-.....}(..x..
0199B0: F8 3E 8F BD 38 16 28 06 CD 43 0B 2C 18 F3 CD 43 .>..8.(..C.,...C
0199C0: 0B 08 60 69 C8 C3 4D 07 21 00 00 C9 3E 92 C3 75 ..`i..M.!...>..u
0199D0: 1F 7C B5 CA 3B 0B CB 7C 08 CD 4A 07 3E 90 CB 7C .|..;..|..J.>..|
0199E0: 20 06 29 3D CB 7C 28 FA 44 4D 11 00 00 62 6F 08 .)=.|(.DM...bo.
0199F0: C0 CB B8 C9 CD A6 04 EB 1E 00 38 04 FE 19 38 18 ..........8...8.
019A00: 1D CD A6 04 D9 CB 78 D9 16 07 28 01 14 92 30 01 ......x...(...0.
019A10: AF FE 09 38 02 3E 09 3C 57 D5 D9 FD 21 5D 00 DD ...8.>.<W...!]..
019A20: E5 CD B8 10 DD E1 D1 4F 7A 3C CB 7B 20 10 81 F2 .......Oz<.{ ...
019A30: 38 10 FD 36 00 00 18 0B FE 0C 38 02 3E 0B D5 CD 8..6......8.>...
019A40: 4D 11 D1 CB 78 28 05 3E 2D CD B2 10 CB 7B 28 03 M...x(.>-....{(.
019A50: 61 0E 00 CB 79 28 05 CD B0 10 18 07 CD A6 10 0D a...y(..........
019A60: F2 5C 10 7A B7 28 17 3E 2E CD B2 10 0C 28 06 CD .\.z.(.>.....(..
019A70: B0 10 15 20 F7 15 FA 7E 10 CD A6 10 18 F7 CB 7B ... ...~.......{
019A80: C8 3E 45 CD B2 10 3E 2B CB 7C 28 06 7C ED 44 67 .>E...>+.|(.|.Dg
019A90: 3E 2D CD B2 10 7C 06 2F 04 D6 0A 30 FB C6 3A DD >-...|./...0..:.
019AA0: 70 00 DD 23 18 0C FD 7E 00 FD 23 B7 20 04 FD 2B p..#...~..#. ..+
019AB0: 3E 30 DD 77 00 DD 23 C9 FD E5 2C 2D 20 0E 06 0C >0.w..#...,- ...
019AC0: FD 36 00 30 FD 23 10 F8 AF C3 4A 11 C5 CB B8 7D .6.0.#....J....}
019AD0: D9 D6 80 6F 9F 67 11 4D 00 CD C4 06 11 05 00 19 ...o.g.M........
019AE0: 7C FE D9 20 01 3C FD 77 00 ED 44 CD 0D 12 7D FE |.. .<.w..D...}.
019AF0: 81 30 06 CD 80 12 FD 35 00 CB F8 3E 84 95 2E 00 .0.....5...>....
019B00: 06 CD 4D 07 EB 18 0E EB CB 7C 28 09 CD 4D 07 DD ..M......|(..M..
019B10: 36 00 2D DD 23 D5 CD 90 07 E1 CD A6 04 ED 5B DB 6.-.#.........[.
019B20: 00 DD E5 E1 B7 ED 52 EB 93 38 0A 28 08 47 3E 20 ......R..8.(.G>
019B30: CD 92 18 10 F9 43 04 05 C8 7E CD 92 18 23 18 F7 .....C...~...#..
019B40: C1 D1 D9 E1 D1 C1 D9 C5 DD 2A DB 00 D5 CD F4 0F .........*......
019B50: 18 C7 C1 D1 C5 CD A6 04 CB 43 21 68 19 1E 04 20 .........C!h...
019B60: C7 21 6C 19 1E 05 18 C0 54 52 55 45 46 41 4C 53 .!l.....TRUEFALS
019B70: 45 CD A6 04 21 02 00 39 5E 23 CD 28 19 D1 F9 D5 E...!..9^#.(....
019B80: C9 E1 7E 23 B7 28 08 47 7E CD 92 18 23 10 F9 E9 ..~#.(.G~...#...
019B90: 3E 0D CD 92 18 3E 0A C3 92 18 06 0D 11 06 1A 22 >....>........."
019BA0: E2 00 CB 46 21 00 00 C8 CD 5B 17 B8 28 03 FE 1A ...F!....[..(...
019BB0: C0 23 C9 E5 CD 52 1B EB B7 ED 52 E1 30 0F CD F4 .#...R....R.0...
019BC0: 19 2A E2 00 11 08 00 19 34 C0 23 34 C9 3E 99 C3 .*......4.#4.>..
019BD0: 20 16 E5 CD 52 1B B7 ED 52 20 0E 2A E2 00 11 04 ...R...R .*....
019BE0: 00 19 34 20 04 23 34 28 06 E1 CD F3 19 18 D2 3E ..4 .#4(.......>
019BF0: F2 18 DC 3E AF 32 E7 00 CD 24 16 EB 2A E2 00 CB ...>.2...$..*...
019C00: 56 28 2F CB 96 3A E7 00 B7 28 0F 23 7E 2B B7 20 V(/..:...(.#~+.
019C10: 09 78 B7 20 1D 79 B7 FA 32 1A C5 D5 0E 21 CD B5 .x. .y..2....!..
019C20: 1A D1 C1 28 0D 3D 28 04 FE 03 20 58 3A E7 00 B7 ...(.=(... X:...
019C30: 28 52 2A E2 00 3A E7 00 B7 28 02 CB DE 23 23 23 (R*..:...(...###
019C40: 7E C6 2D D5 5F 16 00 19 D1 D6 2D CD 8C 1A ED A0 ~.-._.....-.....
019C50: E2 58 1A 3C F2 4E 1A 3D 3C CD 8C 1A 2A E2 00 23 .X.<.N.=<...*..#
019C60: 23 23 E6 7F 77 20 16 C5 D5 E5 CD 9F 1A E1 D1 C1 ##..w ..........
019C70: 20 15 D5 11 2A 00 19 D1 34 20 02 23 34 78 B1 C2 ...*...4 .#4x..
019C80: FC 19 EB C9 3E 99 01 3E F0 C3 20 16 F5 3A E7 00 ....>..>.. ..:..
019C90: B7 28 01 EB F1 C9 22 E2 00 CD 9F 1A C8 18 E8 0E .(....".........
019CA0: 22 2A E2 00 CB D6 CB 5E C8 CB 9E 18 08 2A E2 00 "*.....^.....*..
019CB0: CB 56 C8 CB 96 E5 C5 11 30 00 19 EB 0E 1A CD 05 .V......0.......
019CC0: 00 C1 E1 11 0C 00 19 EB CD 05 00 B7 C9 C1 D1 ED ................
019CD0: 53 E2 00 C5 E5 CD 52 1B D1 B7 ED 52 38 41 2A E2 S.....R....R8A*.
019CE0: 00 01 06 00 09 4E 23 46 23 73 23 72 CD 24 1B 01 .....N#F#s#r.$..
019CF0: 04 00 09 30 01 13 7D E6 7F 29 EB ED 6A EB 53 5C ...0..}..)..j.S\
019D00: 28 08 CD 43 0B CB 1D 3D 20 F8 FD 7E 00 F5 3E 0C (..C...= ..~..>.
019D10: 08 78 1F 1F 1F 1F E6 0F C6 30 FD 77 00 FD 23 78 .x.......0.w..#x
019D20: E6 0F 47 C5 D5 E5 CB 25 CD 50 0B CB 25 CD 50 0B ..G....%.P..%.P.
019D30: EB E3 19 D1 E3 ED 5A EB E1 E3 ED 4A 44 4D E1 CB ......Z....JDM..
019D40: 25 CD 50 0B 08 3D 20 C8 F1 C1 FD E1 C9 FD E5 E1 %.P..= .........
019D50: 5F 16 00 19 7E 36 00 FE 35 D8 1D FA 69 11 2B 7E _...~6..5...i.+~
019D60: 3C 77 FE 3A D8 36 00 18 F1 36 31 23 36 00 0C C9 <w.:.6...61#6...
019D70: D9 01 00 00 D9 CD 3B 0B DD 7E 00 CD 84 04 FE 2E ......;..~......
019D80: 20 0C D9 CB 70 37 C0 CB F0 D9 DD 23 18 EA FE 45 ...p7.....#...E
019D90: 28 21 CD 06 12 30 54 08 CD 80 12 D8 08 D9 C5 6F (!...0T........o
019DA0: 26 00 CD D1 0F CD B3 09 D9 C1 D8 CB 70 28 01 0D &...........p(..
019DB0: D9 18 D7 CD EB 11 D8 D9 CB E0 DD 23 DD 7E 00 FE ...........#.~..
019DC0: 2B 28 06 FE 2D 20 04 CB E8 DD 23 CD 03 12 3F D8 +(..- ....#...?.
019DD0: 4F DD 23 CD 03 12 30 0A DD 23 57 79 87 87 81 87 O.#...0..#Wy....
019DE0: 82 4F CB 68 28 04 79 ED 44 4F D9 D9 79 C6 80 FE .O.h(.y.DO..y...
019DF0: 5A D8 FE A6 3F D8 C5 DD E5 79 CD 0D 12 DD E1 D9 Z...?....y......
019E00: C1 D9 C9 DD 7E 00 D6 30 3F D0 FE 0A C9 F5 B7 F2 ....~..0?.......
019E10: 14 12 ED 44 F5 CB 3F CB 3F 3C 21 FA FF 11 06 00 ...D..?.?<!.....
019E20: 19 3D 20 FC EB DD 21 44 12 DD 19 CD 3C 0F F1 E6 .= ...!D....<...
019E30: 03 28 08 F5 CD 80 12 F1 3D 20 F8 F1 B7 F2 60 0A .(......= ....`.
019E40: D9 C3 BE 0A 81 00 00 00 00 00 8E 00 00 00 40 1C ..............@.
019E50: 9B 00 00 20 BC 3E A8 00 10 A5 D4 68 B6 04 BF C9 ... .>.....h....
019E60: 1B 0E C3 AC C5 EB 78 2D D0 CD CE 1B C2 53 DE F9 ......x-.....S..
019E70: 78 39 3F 01 EB 2B A8 AD C5 1D F8 C9 7B CE 97 40 x9?..+......{..@
019E80: 7D B7 C8 CB F8 C5 D5 7C CD 43 0B CD 43 0B 84 67 }......|.C..C..g
019E90: E3 ED 5A EB E1 E3 ED 4A 44 4D E1 30 06 CD 44 0B ..Z....JDM.0..D.
019EA0: 2C 37 C8 7D C6 03 6F CB B8 C9 0E 01 18 02 0E 00 ,7.}..o.........
019EB0: CD 0C 13 1A BE 20 08 23 13 10 F8 79 EE 01 4F 21 ..... .#...y..O!
019EC0: 40 00 39 F9 69 26 00 DD E9 0E 01 18 02 0E 00 CD @.9.i&..........
019ED0: 0C 13 0D 20 01 EB 0E 00 1A B6 BE 20 E2 23 13 10 ... ....... .#..
019EE0: F7 0E 01 18 DA CD 0C 13 1A B6 77 23 13 10 F9 EB ..........w#....
019EF0: F9 DD E9 CD 0C 13 1A 2F A6 77 23 13 10 F8 18 EF ......./.w#.....
019F00: 2A E2 00 23 23 23 77 01 2A 00 09 4E 23 46 EB B7 *..###w.*..N#F..
019F10: ED 42 09 C8 D5 E5 CD 9F 1A D1 E1 72 2B 73 C9 3E .B.........r+s.>
019F20: 91 C3 20 16 D5 D9 E1 D9 21 00 00 54 5D 3E 10 29 .. .....!..T]>.)
019F30: EB ED 6A EB D9 29 D9 30 04 09 30 01 13 3D 20 EF ..j..).0..0..= .
019F40: C9 CD 55 1B B7 ED 52 21 00 00 C0 23 C9 CD 55 1B ..U...R!...#..U.
019F50: EB C9 2A E2 00 11 04 00 19 5E 23 56 23 D5 4E 23 ..*......^#V#.N#
019F60: 46 23 5E 23 56 E1 C9 3E 22 18 02 3E 21 32 E7 00 F#^#V..>"..>!2..
019F70: 44 4D DD E1 D1 E1 DD E5 22 E2 00 7E E6 03 CA F3 DM......"..~....
019F80: 1B 78 B1 28 4C C5 D5 0E 1A CD 05 00 2A E2 00 11 .x.(L.......*...
019F90: 0C 00 19 EB 3A E7 00 4F CD 05 00 D1 C1 B7 28 10 ....:..O......(.
019FA0: 6F 3A E7 00 FE 22 20 43 7D 3D 28 04 FE 03 20 3F o:..." C}=(... ?
019FB0: C5 D5 2A E2 00 11 2D 00 19 4E 23 46 03 70 2B 71 ..*...-..N#F.p+q
019FC0: 11 DB FF 19 71 23 70 D1 C1 21 80 00 19 EB 0B 18 ....q#p..!......
019FD0: B0 2A E2 00 11 09 00 19 46 2B 4E 2B 2B 2B 56 2B .*......F+N+++V+
019FE0: 5E EB B7 ED 42 D0 EB 71 23 70 C9 3E 99 18 06 3E ^...B..q#p.>...>
019FF0: F0 18 02 3E 04 C3 20 16 C1 D1 ED 53 E2 00 C5 E5 ...>.. ....S....
01A000: CD 52 1B D1 B7 ED 52 DA 1F 1B 2A E2 00 01 08 00 .R....R...*.....
01A010: 09 73 23 72 01 24 00 09 73 23 72 C9 22 E4 00 ED .s#r.$..s#r."...
01A020: 53 E6 00 19 EB E1 22 E2 00 01 21 00 09 4E 23 46 S....."...!..N#F
01A030: EB B7 ED 42 28 5E 78 B1 20 1A 2A E2 00 01 0C 00 ...B(^x. .*.....
01A040: 09 06 18 36 00 23 10 FB ED 5B E2 00 0E 0F CD 05 ...6.#...[......
01A050: 00 3C 28 48 2A E2 00 01 21 00 09 ED 4B E4 00 71 .<(H*...!...K..q
01A060: 23 70 23 23 EB ED 4B E6 00 C5 D5 0E 1A CD 05 00 #p##..K.........
01A070: ED 5B E2 00 0E 21 CD 05 00 B7 20 20 2A E2 00 01 .[...!.... *...
01A080: 21 00 09 34 20 02 23 34 D1 21 80 00 19 EB C1 0B !..4 .#4.!......
01A090: 78 B1 20 D5 2A E2 00 01 24 00 09 E9 DD 2A E2 00 x. .*...$....*..
01A0A0: 3E F0 C3 77 1F 22 F2 00 EB E1 E3 22 F4 00 13 13 >..w."....."....
01A0B0: 13 7B E6 FC 5F 21 ED 00 22 EB 00 DD 2A ED 00 DD .{.._!.."...*...
01A0C0: 6E 02 DD 66 03 7D B4 28 48 ED 52 30 0F DD 6E 00 n..f.}.(H.R0..n.
01A0D0: DD 66 01 E5 DD 22 EB 00 DD E1 18 E3 20 0A DD 5E .f..."...... ..^
01A0E0: 00 DD 56 01 DD E5 18 1B 4D 44 DD 6E 00 DD 66 01 ..V.....MD.n..f.
01A0F0: DD E5 DD 19 DD 75 00 DD 74 01 DD 71 02 DD 70 03 .....u..t..q..p.
01A100: CD 0C 13 1A A6 77 23 13 10 F9 18 E3 FD E1 DD E1 .....w#.........
01A110: 21 00 00 39 EB 21 20 00 45 39 FD E9 DD E1 21 21 !..9.! .E9....!!
01A120: 00 39 7E B7 28 03 AF 18 06 2B 46 CD 8A 05 A6 21 .9~.(....+F....!
01A130: 22 00 39 F9 21 00 00 28 01 23 DD E9 3E AF 32 E6 ".9.!..(.#..>.2.
01A140: 00 FD E1 2A DB 00 06 10 CD B2 05 AF 12 E1 22 E2 ...*..........".
01A150: 00 FD E5 7C B7 3E 22 CA 20 16 3A E6 00 B7 28 0D ...|.>". .:...(.
01A160: CD 86 13 20 08 2A E2 00 36 00 23 77 C9 CD F7 03 ... .*..6.#w....
01A170: 2A E2 00 36 00 23 36 06 11 0B 00 19 EB 21 5C 00 *..6.#6......!\.
01A180: 01 24 00 ED B0 C9 06 06 21 B6 13 C5 E5 06 03 ED .$......!.......
01A190: 5B DB 00 13 1A FE 20 28 FA 1A CD 84 04 96 28 0A [..... (......(.
01A1A0: E1 C1 11 04 00 19 10 E3 B7 C9 23 13 10 EB C1 C1 ..........#.....
01A1B0: 1A FE 3A C0 7E C9 43 4F 4E 00 54 52 4D 01 4B 42 ..:.~.CON.TRM.KB
01A1C0: 44 02 4C 53 54 03 41 55 58 04 55 53 52 05 3E AF D.LST.AUX.USR.>.
01A1D0: 32 E6 00 CD EE 14 CD 24 16 2A E2 00 23 7E FE 06 2......$.*..#~..
01A1E0: 20 1D CD B6 14 CD 24 16 2A E2 00 3A E6 00 B7 3E .....$.*..:...>
01A1F0: 06 20 02 3E 05 77 23 23 23 36 00 C0 C3 D6 16 06 . .>.w###6......
01A200: 03 FE 02 20 02 06 01 FE 03 20 02 06 02 23 36 00 ... ..... ...#6.
01A210: 2B 2B 70 C9 3E AF 32 E6 00 ED 53 E4 00 CD 2D 15 ++p.>.2...S...-.
01A220: CD 24 16 CD B6 14 3A D9 00 B7 C0 2A E2 00 36 07 .$....:....*..6.
01A230: 23 23 23 77 11 05 00 19 77 23 77 11 24 00 19 77 ###w....w#w.$..w
01A240: 23 77 11 D6 FF 19 3A E6 00 B7 20 19 E5 01 04 00 #w....:... .....
01A250: CD F4 19 E1 23 23 4E 23 46 2A E4 00 B7 ED 42 C8 ....##N#F*....B.
01A260: 3E 90 C3 20 16 E5 AF 77 23 77 23 ED 5B E4 00 73 >.. ...w#w#.[..s
01A270: 23 72 E1 01 04 00 C3 F3 19 3E AF 32 E6 00 CD 53 #r.......>.2...S
01A280: 15 CD 24 16 CD B6 14 CD 24 16 2A E2 00 36 07 E5 ..$.....$.*..6..
01A290: 11 0C 00 19 EB 0E 23 CD 05 00 E1 11 2D 00 19 AF ......#.....-...
01A2A0: 4E 77 23 46 77 11 D6 FF 19 71 23 70 23 36 80 23 Nw#Fw....q#p#6.#
01A2B0: 77 23 77 23 77 C9 CD DF 14 2A E2 00 11 0C 00 19 w#w#w....*......
01A2C0: EB 3A E6 00 B7 01 0F 01 28 0A D5 0E 13 CD 05 00 .:......(.......
01A2D0: D1 01 16 F1 C5 CD 05 00 C1 3C C0 78 C3 20 16 2A .........<.x. .*
01A2E0: E2 00 11 18 00 19 06 18 36 00 23 10 FB C9 22 E2 ........6.#...".
01A2F0: 00 23 7E 2B FE 06 20 32 CB 4E 28 14 3E 1A CD 92 .#~+.. 2.N(.>...
01A300: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01A310: 16 00 01 00 02 09 52 E5 16 00 41 02 00 00 00 02 ......R...A.....
01A320: 16 00 46 02 00 00 00 02 16 00 42 02 00 00 00 02 ..F.......B.....
01A330: 16 00 47 02 00 00 00 02 16 00 43 02 00 00 00 02 ..G.......C.....
01A340: 16 00 48 02 00 00 00 02 16 00 44 02 00 00 00 02 ..H.......D.....
01A350: 16 00 49 02 00 00 00 02 16 00 45 02 00 00 00 02 ..I.......E.....
01A360: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A370: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A380: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A390: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A3A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A3B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A3C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A3D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A3E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A3F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01A400: DD E5 D1 2A EB 00 73 23 72 D1 2A F4 00 73 23 72 ...*..s#r.*..s#r
01A410: C9 DD E5 E1 19 22 CD 00 2A F2 00 01 04 00 09 DD ....."..*.......
01A420: E5 C1 09 DA 35 1D ED 4B CF 00 ED 42 01 00 00 21 ....5..K...B...!
01A430: 00 00 DA F0 1C 3E FF C3 75 1F EB E1 E3 7E 23 66 .....>..u....~#f
01A440: 6F 13 13 13 7B E6 FC 5F EB 22 F2 00 2A ED 00 E5 o...{.._."..*...
01A450: DD E1 B7 ED 52 30 52 DD 6E 00 DD 66 01 E5 B7 ED ....R0R.n..f....
01A460: 52 30 04 DD E1 18 F0 E1 D5 FD E1 ED 4B F2 00 FD R0..........K...
01A470: 71 02 FD 70 03 FD 75 00 FD 74 01 DD 73 00 DD 72 q..p..u..t..s..r
01A480: 01 DD E5 E1 DD 4E 02 DD 46 03 CD C4 1D 28 09 DD .....N..F....(..
01A490: 5E 00 DD 56 01 D5 DD E1 DD E5 E1 DD 4E 02 DD 46 ^..V........N..F
01A4A0: 03 DD 5E 00 DD 56 01 18 1B 2A ED 00 ED 53 ED 00 ..^..V...*...S..
01A4B0: D5 DD E1 DD 75 00 DD 74 01 ED 4B F2 00 DD 71 02 ....u..t..K...q.
01A4C0: DD 70 03 EB 09 B7 ED 52 C0 D5 FD E1 2A CD 00 B7 .p.....R....*...
01A4D0: ED 52 28 1B FD 7E 00 DD 77 00 FD 7E 01 DD 77 01 .R(..~..w..~..w.
01A4E0: FD 6E 02 FD 66 03 09 DD 75 02 DD 74 03 AF C9 DD .n..f...u..t....
01A4F0: E5 E1 22 CD 00 06 04 36 00 23 10 FB C9 CD 0B 1E .."....6.#......
01A500: 2A F6 00 C9 CD 0B 1E 2A F8 00 C9 21 00 00 22 F6 *......*...!..".
01A510: 00 22 F8 00 DD 2A ED 00 DD 4E 02 DD 46 03 79 B0 ."...*...N..F.y.
01A520: 28 1E 2A F6 00 09 22 F6 00 2A F8 00 B7 ED 42 30 (.*..."..*....B0
01A530: 04 ED 43 F8 00 DD 6E 00 DD 66 01 E5 DD E1 18 D8 ..C...n..f......
01A540: 2A CF 00 01 FB FF 09 ED 5B CD 00 B7 ED 52 D8 EB *.......[....R..
01A550: 2A F6 00 19 22 F6 00 2A F8 00 B7 ED 52 D0 ED 53 *..."..*....R..S
01A560: F8 00 C9 ED 5B CD 00 73 23 72 C9 5E 23 56 ED 53 ....[..s#r.^#V.S
01A570: CD 00 C9 3E AF 4F 22 E6 00 AF 77 32 D9 00 78 32 ...>.O"...w2..x2
01A580: E8 00 21 EA 1E 22 E2 00 E1 22 E4 00 E1 0C 0D 20 ..!.."...".....
01A590: 05 CD F6 18 18 03 CD 40 19 2A E4 00 E9 3E AF 32 .......@.*...>.2
01A5A0: EA 00 22 E6 00 21 EA 1E 22 E2 00 E1 22 E4 00 E1 .."..!.."..."...
01A5B0: 22 E8 00 21 5C 00 06 1E CD B2 05 AF 12 2A E8 00 "..!\........*..
01A5C0: 3A EA 00 B7 20 05 CD EE 17 18 03 CD 12 18 21 D9 :... .........!.
01A5D0: 00 7E 36 00 B7 67 6F 28 08 DD E5 E1 11 5C 00 ED .~6..go(.....\..
01A5E0: 52 EB 2A E6 00 73 23 72 18 AF 03 FF 00 ED 5F 32 R.*..s#r......_2
01A5F0: D4 00 C9 EB DD E1 C1 E1 78 B1 28 0B 73 0B 78 B1 ........x.(.s.x.
01A600: E5 CD FD 22 2A 71 9F E5 2A 75 9F E5 CD D1 25 CB ..."*q..*u....%.
01A610: 45 CA 3D 27 2A 79 9F E5 21 01 00 D1 19 22 79 9F E.='*y..!...."y.
01A620: 2A 79 9F E5 2A 77 9F E5 2A 02 9F E5 CD 7B 23 2A *y..*w..*....{#*
01A630: 79 9F E5 21 71 9F E5 CD FD 22 C3 04 27 2A 77 9F y..!q...."..'*w.
01A640: E5 2A 79 9F E5 2A 02 9F E5 CD 7B 23 2A 77 9F E5 .*y..*....{#*w..
01A650: 21 6F 9F E5 CD FD 22 2A 75 9F E5 2A 6F 9F E5 CD !o...."*u..*o...
01A660: D1 25 CB 45 CA 93 27 2A 77 9F E5 21 01 00 D1 EB .%.E..'*w..!....
01A670: B7 ED 52 22 77 9F 2A 77 9F E5 2A 79 9F E5 2A 02 ..R"w.*w..*y..*.
01A680: 9F E5 CD 7B 23 2A 77 9F E5 21 6F 9F E5 CD FD 22 ...{#*w..!o...."
01A690: C3 57 27 2A 79 9F E5 2A 77 9F D1 CD 87 06 CB 45 .W'*y..*w......E
01A6A0: CA D9 27 2A 79 9F E5 2A 77 9F D1 CD 61 06 CB 45 ..'*y..*w...a..E
01A6B0: CA BE 27 2A 79 9F E5 2A 77 9F E5 CD 90 24 2A 79 ..'*y..*w....$*y
01A6C0: 9F E5 21 01 00 D1 19 22 79 9F 2A 77 9F E5 21 01 ..!...."y.*w..!.
01A6D0: 00 D1 EB B7 ED 52 22 77 9F 2A 79 9F E5 2A 77 9F .....R"w.*y..*w.
01A6E0: D1 CD 9B 06 CB 45 CA EA 26 2A 77 9F E5 2A 7D 9F .....E..&*w..*}.
01A6F0: D1 EB B7 ED 52 E5 2A 7B 9F E5 2A 79 9F D1 EB B7 ....R.*{..*y....
01A700: ED 52 D1 CD AF 06 CB 45 CA 58 28 2A 79 9F E5 2A .R.....E.X(*y..*
01A710: 7B 9F D1 CD AF 06 CB 45 CA 4F 28 2A 7F 9F E5 21 {......E.O(*...!
01A720: 01 00 D1 19 22 7F 9F 21 A9 9F E5 2A 7F 9F 2B 29 ...."..!...*..+)
01A730: D1 19 E5 2A 79 9F EB E1 73 23 72 21 81 9F E5 2A ...*y...s#r!...*
01A740: 7F 9F 2B 29 D1 19 E5 2A 7B 9F EB E1 73 23 72 2A ..+)...*{...s#r*
01A750: 77 9F 22 7B 9F C3 A2 28 2A 7D 9F E5 2A 77 9F D1 w."{...(*}..*w..
01A760: CD AF 06 CB 45 CA 9C 28 2A 7F 9F E5 21 01 00 D1 ....E..(*...!...
01A770: 19 22 7F 9F 21 A9 9F E5 2A 7F 9F 2B 29 D1 19 E5 ."..!...*..+)...
01A780: 2A 7D 9F EB E1 73 23 72 21 81 9F E5 2A 7F 9F 2B *}...s#r!...*..+
01A790: 29 D1 19 E5 2A 77 9F EB E1 73 23 72 2A 79 9F 22 )...*w...s#r*y."
01A7A0: 7D 9F 2A 7D 9F E5 2A 7B 9F D1 CD 74 06 CB 45 CA }.*}..*{...t..E.
01A7B0: A2 26 C3 5F 26 C9 2A E2 9F E5 21 00 00 D1 CD 4E .&._&.*...!....N
01A7C0: 06 E5 2A E4 9F E5 21 03 00 D1 CD 74 06 D1 7D A3 ..*...!....t..}£
01A7D0: 6F CB 45 CA 68 29 2A E4 9F E5 21 03 00 D1 CD 4E o.E.h)*...!....N
01A7E0: 06 CB 45 CA 23 29 21 3B 9F E5 CD 1D 05 0C 24 24 ..E.#)!;......$$
01A7F0: 24 53 4F 57 52 4B 2E 24 24 24 CD 3D 13 21 3B 9F $SOWRK.$$$.=.!;.
01A800: 28 05 54 5D 13 ED B0 DD E9 44 4D DD E1 D1 E1 B7 (.T].....DM.....
01A810: ED 52 19 30 F0 0B 09 EB 09 EB 03 ED B8 DD E9 D1 .R.0............
01A820: C1 D5 2D 61 25 C3 C6 02 7D CD 84 04 6F C9 2A 01 ..-a%...}...o.*.
01A830: 00 19 19 19 E9 21 D9 00 7E 36 00 6F 26 00 C9 CD .....!..~6.o&...
01A840: A0 00 7C B5 C8 CD A3 00 7D FE 03 C0 DD E1 CD 25 ..|...£.}......%
01A850: 02 5E 43 0D 0A 55 73 65 72 20 62 72 65 61 6B 00 .^C..User break.
01A860: 18 31 3A D9 00 B7 C8 DD E1 F5 CD 25 02 0D 0A 49 .1:........%...I
01A870: 2F 4F 00 18 10 DD E1 CD 25 02 0D 0A 52 75 6E 2D /O......%...Run-
01A880: 74 69 6D 65 00 CD 25 02 20 65 72 72 6F 72 20 00 time..%. error .
01A890: CD 92 04 CD 25 02 2C 20 50 43 3D 00 DD E5 E1 ED ....%., PC=.....
01A8A0: 5B D5 00 B7 ED 52 11 15 00 19 22 D7 00 CD 8D 04 [....R....".....
01A8B0: CD 25 02 0D 0A 50 72 6F 67 72 61 6D 20 61 62 6F .%...Program abo
01A8C0: 72 74 65 64 00 2A DF 00 E9 31 00 01 21 80 A0 11 rted.*...1..!...
01A8D0: B8 00 01 00 00 CD 8D 03 21 30 5B 11 BC 88 01 00 ........!0[.....
01A8E0: 00 CD B2 04 C3 D0 5A 0E 20 20 20 20 20 20 20 20 ......Z.
01A8F0: 20 20 20 20 20 20 0E 20 20 20 20 20 20 20 20 20 .
01A900: 20 20 20 20 20 0E 20 20 20 20 20 20 20 20 20 20 .
01A910: 20 20 20 20 03 43 4F 4D CD FD 1D 22 7C A0 2A 7C .COM..."|.*|
01A920: A0 C9 CD 04 1E 22 7A A0 2A 7A A0 C9 21 82 00 11 ....."z.*z..!...
01A930: 00 00 01 00 00 C5 D5 E5 CD 22 20 E5 21 01 00 D1 ........." .!...
01A940: CD 20 07 CD D1 0F D9 E1 D1 C1 CD C4 09 D9 21 74 . ............!t
01A950: A0 CD A1 05 21 74 A0 CD FC 04 C9 C9 FD E1 E1 22 ....!t........."
01A960: 72 A0 FD E5 00 2A 72 A0 00 E9 C9 FD E1 E1 22 70 r....*r......."p
01A970: A0 FD E5 21 01 00 E5 2A 70 A0 CD 0A 05 CD 6D 08 ...!...*p.....m.
01A980: D1 CD 35 06 7A B3 CA B2 20 D5 22 6E A0 2A 70 A0 ..5.z... ."n.*p.
01A990: E5 2A 6E A0 D1 19 E5 2A 70 A0 E5 2A 6E A0 D1 19 .*n....*p..*n...
01A9A0: 6E 26 00 CD 28 1F EB E1 73 2A 6E A0 23 D1 1B C3 n&..(...s*n.#...
01A9B0: 84 20 C9 FD E1 06 50 21 1D A0 CD B2 05 FD E5 CD . ....P!........
01A9C0: 35 1F E5 21 00 00 D1 CD 4E 06 CB 45 CA CF 20 CD 5..!....N..E.. .
01A9D0: 52 16 CD 90 19 CD 52 16 CD 81 19 11 2A 2A 2A 20 R.....R.....***
01A9E0: 46 41 54 41 4C 20 45 52 52 4F 52 3A 20 21 1D A0 FATAL ERROR: !..
01A9F0: CD 0A 05 21 00 00 CD 71 19 CD 90 19 CD C5 1F C9 ...!...q........
01AA00: CD 79 14 CD 62 1F 21 01 00 7D 32 3A 9F 21 00 00 .y..b.!..}2:.!..
01AA10: E5 21 00 00 E5 CD 2B 22 21 00 00 E5 21 01 00 E5 .!....+"!...!...
01AA20: CD 2B 22 21 DA 9F E5 21 02 00 29 D1 19 5E 23 56 .+"!...!..)..^#V
01AA30: EB E5 21 D4 9F E5 21 02 00 29 D1 19 5E 23 56 EB ..!...!..)..^#V.
01AA40: E5 CD 2B 22 21 D4 9F E5 21 02 00 29 D1 19 E5 21 ..+"!...!..)...!
01AA50: D4 9F E5 21 02 00 29 D1 19 5E 23 56 EB E5 21 01 ...!..)..^#V..!.
01AA60: 00 D1 19 EB E1 73 23 72 2A E4 9F E5 21 02 00 D1 .....s#r*...!...
01AA70: CD 9B 06 CB 45 CA 81 29 21 02 00 22 00 9F C3 87 ....E..)!.."....
01AA80: 29 2A E4 9F 22 00 9F 21 DA 9F E5 2A 00 9F 29 D1 )*.."..!...*..).
01AA90: 19 5E 23 56 EB E5 2A E2 9F E5 2A F8 9F D1 CD C4 .^#V..*...*.....
01AAA0: 06 D1 19 22 FE 9E 2A F0 9F E5 2A FE 9E E5 2A F8 ..."..*...*...*.
01AAB0: 9F CD 09 1F 2A EC 9F E5 21 01 00 D1 19 22 EC 9F ....*...!...."..
01AAC0: 2A E2 9F E5 21 01 00 D1 19 22 E2 9F 2A E2 9F E5 *...!...."..*...
01AAD0: 2A EA 9F D1 CD 4E 06 CB 45 CA EE 29 21 00 00 22 *....N..E..)!.."
01AAE0: E2 9F 2A E4 9F E5 21 01 00 D1 19 22 E4 9F C9 2A ..*...!...."...*
01AAF0: 6B 9F E5 2A EC 9F E5 21 01 00 D1 EB B7 ED 52 E5 k..*...!......R.
01AB00: 2A EA 9F 7D 2F 6F 7C 2F 67 23 E5 CD 7B 23 2A 6B *..}/o|/g#..{#*k
01AB10: 9F E5 21 FC 9E E5 CD FD 22 2A FC 9E E5 2A F0 9F ..!....."*...*..
01AB20: E5 2A F8 9F CD 09 1F 2A 6B 9F E5 21 01 00 D1 19 .*.....*k..!....
01AB30: 22 6B 9F C9 2A 6B 9F E5 2A EC 9F D1 CD 74 06 7D "k..*k..*....t.}
01AB40: 32 02 A0 C9 FD E1 E1 22 EE 9F E1 22 F0 9F E1 22 2......"..."..."
01AB50: F2 9F E1 22 F4 9F E1 22 F6 9F E1 22 F8 9F E1 D1 ..."..."..."....
01AB60: C1 D9 21 FA 9F CD A1 05 FD E5 21 B6 28 22 07 A0 ..!.......!.("..
01AB70: 21 EF 29 22 05 A0 21 34 2A 22 03 A0 21 00 00 22 !.)"..!4*"..!.."
01AB80: E0 9F 21 FA 9F CD FC 04 C5 D5 E5 2A F8 9F CD D1 ..!........*....
01AB90: 0F D9 E1 D1 C1 CD BC 09 C5 D5 E5 2A F8 9F CD D1 ...........*....
01ABA0: 0F D9 E1 D1 C1 CD BC 09 D9 21 FA 9F CD A1 05 21 .........!.....!
01ABB0: FA 9F CD FC 04 C5 D5 E5 21 03 00 CD D1 0F D9 E1 ........!.......
01ABC0: D1 C1 CD C9 09 C5 D5 E5 21 82 00 11 00 00 01 00 ........!.......
01ABD0: 00 C5 D5 E5 21 FF 7F CD D1 0F D9 E1 D1 C1 CD C4 ....!...........
01ABE0: 09 D9 E1 D1 C1 CD A5 06 CB 45 CA 0D 2B 21 83 00 .........E..+!..
01ABF0: 11 00 00 01 00 40 C5 D5 E5 21 FF 7F CD D1 0F D9 .....@...!......
01AC00: FD E1 E1 22 17 A0 E1 22 19 A0 FD E5 2A 19 A0 E5 ..."..."....*...
01AC10: 2A 17 A0 D1 CD AF 06 CB 45 CA 25 21 2A 19 A0 22 *.......E.%!*.."
01AC20: 1B A0 C3 2B 21 2A 17 A0 22 1B A0 2A 1B A0 C9 FD ...+!*.."..*....
01AC30: E1 E1 22 11 A0 E1 22 13 A0 FD E5 2A 13 A0 E5 2A .."..."....*...*
01AC40: 11 A0 D1 CD 9B 06 CB 45 CA 54 21 2A 13 A0 22 15 .......E.T!*..".
01AC50: A0 C3 5A 21 2A 11 A0 22 15 A0 2A 15 A0 C9 FD E1 ..Z!*.."..*.....
01AC60: E1 22 0C A0 E1 22 0E A0 FD E5 CD 2C 20 C5 D5 E5 ."..."....., ...
01AC70: 2A 0C A0 CD D1 0F D9 E1 D1 C1 CD A5 06 CB 45 CA *.............E.
01AC80: 96 21 2A 0E A0 E5 2A 0C A0 CD A5 1C 21 01 00 7D .!*...*.....!..}
01AC90: 32 10 A0 C3 9D 21 21 00 00 7D 32 10 A0 2A 10 A0 2....!!..}2..*..
01ACA0: 26 00 C9 FD E1 E1 22 0A A0 FD E5 2A 0A A0 CD 0A &....."....*....
01ACB0: 05 CD 6D 08 E5 21 00 00 D1 CD 9B 06 E5 2A 0A A0 ..m..!.......*..
01ACC0: E5 21 01 00 D1 19 6E 26 00 E5 21 20 00 D1 CD 4E .!....n&..! ...N
01ACD0: 06 D1 7D A3 6F CB 45 CA EB 21 2A 0A A0 E5 21 01 ..}£o.E..!*...!.
01ACE0: 00 E5 21 01 00 CD BD 08 C3 AB 21 2A 0A A0 E5 2A ..!.......!*...*
01ACF0: 0A A0 CD 0A 05 CD 6D 08 D1 19 6E 26 00 E5 21 20 ......m...n&..!
01AD00: 00 D1 CD 4E 06 CB 45 CA 27 22 2A 0A A0 E5 21 00 ...N..E.'"*...!.
01AD10: 00 D1 19 E5 2A 0A A0 E5 21 00 00 D1 19 6E 26 00 ....*...!....n&.
01AD20: 2B EB E1 73 C3 EB 21 C9 C3 44 2A FD E1 E1 22 36 +..s..!..D*..."6
01AD30: 9F E1 22 38 9F FD E5 21 3B 9F E5 2A 36 9F E5 2A .."8...!;..*6..*
01AD40: E8 9F D1 CD C4 06 CD F8 1B CD 62 1F 21 3B 9F E5 ..........b.!;..
01AD50: 2A 38 9F E5 2A E8 9F CD 67 1B CD 62 1F C9 FD E1 *8..*...g..b....
01AD60: E1 22 32 9F E1 22 34 9F FD E5 21 3B 9F E5 2A 32 ."2.."4...!;..*2
01AD70: 9F E5 2A E8 9F D1 CD C4 06 CD F8 1B CD 62 1F 21 ..*..........b.!
01AD80: 3B 9F E5 2A 34 9F E5 2A E8 9F CD 6B 1B CD 62 1F ;..*4..*...k..b.
01AD90: C9 FD E1 E1 22 2F 9F FD E5 2A 2F 9F E5 2A EA 9F ...."/...*/..*..
01ADA0: D1 CD DE 06 22 2D 9F 2A 2D 9F E5 21 D4 9F E5 21 ...."-.*-..!...!
01ADB0: 00 00 29 D1 19 5E 23 56 EB D1 CD 4E 06 E5 2A 2D ..)..^#V...N..*-
01ADC0: 9F E5 21 D4 9F E5 21 01 00 29 D1 19 5E 23 56 EB ..!...!..)..^#V.
01ADD0: D1 CD 4E 06 D1 7D B3 6F E5 2A 2D 9F E5 21 D4 9F ..N..}.o.*-..!..
01ADE0: E5 21 02 00 29 D1 19 5E 23 56 EB D1 CD 4E 06 D1 .!..)..^#V...N..
01ADF0: 7D B3 6F 7D 32 31 9F 2A 31 9F 26 00 C9 FD E1 E1 }.o}21.*1.&.....
01AE00: E1 D1 C1 CD C4 09 D9 21 FA 9F CD A1 05 21 FA 9F .......!.....!..
01AE10: CD FC 04 C5 D5 E5 21 80 00 CD D1 0F D9 E1 D1 C1 ......!.........
01AE20: CD C9 09 CD A7 0F E5 21 03 00 D1 CD DE 06 22 E8 .......!......".
01AE30: 9F 2A E8 9F E5 21 14 00 D1 CD 9B 06 CB 45 CA 57 .*...!.......E.W
01AE40: 2B 21 04 00 E5 2A E8 9F E5 21 04 00 D1 CD DE 06 +!...*...!......
01AE50: D1 CD C4 06 22 E8 9F 2A E8 9F E5 21 80 00 D1 CD ...."..*...!....
01AE60: C4 06 22 E6 9F 2A E6 9F E5 2A F8 9F D1 CD DE 06 .."..*...*......
01AE70: 22 EA 9F 2A EA 9F E5 21 00 00 D1 CD 87 06 CB 45 "..*...!.......E
01AE80: CA 8C 2B 21 03 00 22 00 A0 C3 F2 2C 21 DA 9F E5 ..+!.."....,!...
01AE90: 21 00 00 29 D1 19 E5 2A E6 9F E5 CD 5E 21 CB 45 !..)...*....^!.E
01AEA0: CA A9 2B 21 01 00 22 E0 9F 21 DA 9F E5 21 01 00 ..+!.."..!...!..
01AEB0: 29 D1 19 E5 2A E6 9F E5 CD 5E 21 CB 45 CA CC 2B )...*....^!.E..+
01AEC0: 2A E0 9F E5 21 02 00 D1 19 22 E0 9F 21 DA 9F E5 *...!...."..!...
01AED0: 21 02 00 29 D1 19 E5 2A E6 9F E5 CD 5E 21 CB 45 !..)...*....^!.E
01AEE0: CA EF 2B 2A E0 9F E5 21 04 00 D1 19 22 E0 9F 21 ..+*...!...."..!
01AEF0: 73 9F E5 2A F8 9F E5 CD 5E 21 CB 45 CA 0B 2C 2A s..*....^!.E..,*
01AF00: E0 9F E5 21 08 00 D1 19 22 E0 9F 21 75 9F E5 2A ...!...."..!u..*
01AF10: F8 9F E5 CD 5E 21 CB 45 CA 27 2C 2A E0 9F E5 21 ....^!.E.',*...!
01AF20: 10 00 D1 19 22 E0 9F 2A E0 9F E5 21 1F 00 D1 CD ...."..*...!....
01AF30: 61 06 CB 45 CA 40 2C 21 04 00 22 00 A0 C3 F2 2C a..E.@,!.."....,
01AF40: 21 00 00 22 00 A0 21 00 00 7D 32 3A 9F 21 00 00 !.."..!..}2:.!..
01AF50: 22 EC 9F 21 00 00 22 E2 9F 21 00 00 22 E4 9F 21 "..!.."..!.."..!
01AF60: D4 9F E5 21 00 00 29 D1 19 E5 21 00 00 EB E1 73 ...!..)...!....s
01AF70: 23 72 21 D4 9F E5 21 01 00 29 D1 19 E5 21 01 00 #r!...!..)...!..
01AF80: EB E1 73 23 72 21 D4 9F E5 21 02 00 29 D1 19 E5 ..s#r!...!..)...
01AF90: 21 02 00 EB E1 73 23 72 2A F6 9F E5 CD 5C 20 21 !....s#r*....\ !
01AFA0: D1 9F E5 21 00 00 D1 19 E5 21 01 00 EB E1 73 21 ...!.....!....s!
01AFB0: D1 9F E5 21 01 00 D1 19 E5 21 01 00 EB E1 73 21 ...!.....!....s!
01AFC0: D1 9F E5 21 02 00 D1 19 E5 21 01 00 EB E1 73 CD ...!.....!....s.
01AFD0: 0F 26 21 00 00 22 6B 9F 2A F2 9F E5 CD 5C 20 2A .&!.."k.*....\ *
01AFE0: 3A 9F 26 00 CB 45 CA F2 2C 21 3B 9F CD 5C 15 CD :.&..E..,!;..\..
01AFF0: 62 1F 2A E0 9F E5 21 10 00 D1 CD 74 06 CB 45 CA b.*...!....t..E.
01B000: 22 29 9F E1 22 2B 9F FD E5 2A 2B 9F E5 2A EA 9F ").."+...*+..*..
01B010: D1 CD DE 06 22 27 9F 21 00 00 7D 32 26 9F 21 D4 ...."'.!..}2&.!.
01B020: 9F E5 2A 26 9F 26 00 29 D1 19 5E 23 56 EB E5 2A ..*&.&.)..^#V..*
01B030: 27 9F D1 CD 61 06 CB 45 CA 4D 23 2A 26 9F 26 00 '...a..E.M#*&.&.
01B040: E5 21 01 00 D1 19 7D 32 26 9F C3 1E 23 21 DA 9F .!....}2&...#!..
01B050: E5 2A 26 9F 26 00 29 D1 19 5E 23 56 EB E5 2A 2B .*&.&.)..^#V..*+
01B060: 9F E5 2A EA 9F D1 CD 0F 07 E5 2A F8 9F D1 CD C4 ..*.......*.....
01B070: 06 D1 19 EB 2A 29 9F 73 23 72 C9 FD E1 E1 22 20 ....*).s#r...."
01B080: 9F E1 22 22 9F E1 22 24 9F FD E5 2A 24 9F E5 CD .."".."$...*$...
01B090: 91 22 7D EE 01 6F CB 45 CA 8F 24 2A 24 9F E5 2A ."}..o.E..$*$..*
01B0A0: EA 9F D1 CD DE 06 22 1A 9F 21 00 00 7D 32 19 9F ......"..!..}2..
01B0B0: 2A 22 9F E5 2A EA 9F D1 CD DE 06 22 1E 9F 2A 20 *"..*......"..*
01B0C0: 9F E5 2A EA 9F D1 CD DE 06 22 1C 9F 21 D4 9F E5 ..*......"..!...
01B0D0: 2A 19 9F 26 00 29 D1 19 5E 23 56 EB E5 2A 1E 9F *..&.)..^#V..*..
01B0E0: D1 CD 4E 06 E5 21 D4 9F E5 2A 19 9F 26 00 29 D1 ..N..!...*..&.).
01B0F0: 19 5E 23 56 EB E5 2A 1C 9F D1 CD 4E 06 D1 7D B3 .^#V..*....N..}.
01B100: 6F CB 45 CA 18 24 2A 19 9F 26 00 E5 21 01 00 D1 o.E..$*..&..!...
01B110: 19 7D 32 19 9F C3 CC 23 21 D1 9F E5 2A 19 9F 26 .}2....#!...*..&
01B120: 00 D1 19 6E 26 00 CB 45 CA 50 24 21 DA 9F E5 2A ...n&..E.P$!...*
01B130: 19 9F 26 00 29 D1 19 5E 23 56 EB E5 21 D4 9F E5 ..&.)..^#V..!...
01B140: 2A 19 9F 26 00 29 D1 19 5E 23 56 EB E5 CD 2B 22 *..&.)..^#V...+"
01B150: 21 DA 9F E5 2A 19 9F 26 00 29 D1 19 5E 23 56 EB !...*..&.)..^#V.
01B160: E5 2A 1A 9F E5 CD 5E 22 21 D4 9F E5 2A 19 9F 26 .*....^"!...*..&
01B170: 00 29 D1 19 E5 2A 1A 9F EB E1 73 23 72 21 D1 9F .)...*....s#r!..
01B180: E5 2A 19 9F 26 00 D1 19 E5 21 00 00 EB E1 73 C9 .*..&....!....s.
01B190: FD E1 E1 22 15 9F E1 22 17 9F FD E5 2A 17 9F E5 ..."..."....*...
01B1A0: 2A EA 9F D1 CD DE 06 22 13 9F 21 00 00 7D 32 0E *......"..!..}2.
01B1B0: 9F 21 D4 9F E5 2A 0E 9F 26 00 29 D1 19 5E 23 56 .!...*..&.)..^#V
01B1C0: EB E5 2A 13 9F D1 CD 61 06 CB 45 CA E0 24 2A 0E ..*....a..E..$*.
01B1D0: 9F 26 00 E5 21 01 00 D1 19 7D 32 0E 9F C3 B1 24 .&..!....}2....$
01B1E0: 2A 15 9F E5 2A EA 9F D1 CD DE 06 22 13 9F 21 00 *...*......"..!.
01B1F0: 00 7D 32 0D 9F 21 D4 9F E5 2A 0D 9F 26 00 29 D1 .}2..!...*..&.).
01B200: 1B 2D 21 75 9F E5 2A F8 9F CD 3A 1D 2A E0 9F E5 .-!u..*...:.*...
01B210: 21 10 00 D1 EB B7 ED 52 22 E0 9F 2A E0 9F E5 21 !......R"..*...!
01B220: 08 00 D1 CD 74 06 CB 45 CA 44 2D 21 73 9F E5 2A ....t..E.D-!s..*
01B230: F8 9F CD 3A 1D 2A E0 9F E5 21 08 00 D1 EB B7 ED ...:.*...!......
01B240: 52 22 E0 9F 2A E0 9F E5 21 04 00 D1 CD 74 06 CB R"..*...!....t..
01B250: 45 CA 74 2D 21 DA 9F E5 21 02 00 29 D1 19 E5 2A E.t-!...!..)...*
01B260: E6 9F CD 3A 1D 2A E0 9F E5 21 04 00 D1 EB B7 ED ...:.*...!......
01B270: 52 22 E0 9F 2A E0 9F E5 21 02 00 D1 CD 74 06 CB R"..*...!....t..
01B280: 45 CA A4 2D 21 DA 9F E5 21 01 00 29 D1 19 E5 2A E..-!...!..)...*
01B290: E6 9F CD 3A 1D 2A E0 9F E5 21 02 00 D1 EB B7 ED ...:.*...!......
01B2A0: 52 22 E0 9F 2A E0 9F E5 21 01 00 D1 CD 74 06 CB R"..*...!....t..
01B2B0: 45 CA D4 2D 21 DA 9F E5 21 00 00 29 D1 19 E5 2A E..-!...!..)...*
01B2C0: E6 9F CD 3A 1D 2A E0 9F E5 21 01 00 D1 EB B7 ED ...:.*...!......
01B2D0: 52 22 E0 9F 2A 00 A0 C9 2A 07 A0 E5 CD 5C 20 C9 R"..*...*....\ .
01B2E0: 2A 05 A0 E5 CD 5C 20 C9 2A 03 A0 E5 CD 5C 20 2A *....\ .*....\ *
01B2F0: 02 A0 26 00 7D 32 FB 9E 2A FB 9E 26 00 C9 FD E1 ..&.}2..*..&....
01B300: E1 22 F9 9E FD E5 2A F9 9E 22 F7 9E 2A F7 9E 11 ."....*.."..*...
01B310: 30 00 19 E5 21 FF FF EB E1 73 23 72 2A F7 9E 11 0...!....s#r*...
01B320: 32 00 19 E5 21 00 00 EB E1 73 C9 FD E1 E1 7D 32 2...!....s....}2
01B330: F2 9E E1 22 F3 9E E1 22 F5 9E FD E5 2A F5 9E 22 ..."..."....*.."
01B340: F0 9E 2A F3 9E E5 2A F0 9E 11 30 00 19 5E 23 56 ..*...*...0..^#V
01B350: EB D1 CD 61 06 CB 45 CA 4C 2F 2A F0 9E 11 32 00 ...a..E.L/*...2.
01B360: 19 6E 26 00 CB 45 CA A1 2E 2A F0 9E E5 2A F0 9E .n&..E...*...*..
01B370: 11 30 00 19 5E 23 56 EB CD F8 1B CD 62 1F 2A F0 .0..^#V.....b.*.
01B380: 9E E5 2A F0 9E 11 33 00 19 E5 21 01 00 CD 67 1B ..*...3...!...g.
01B390: CD 62 1F 2A F0 9E 11 32 00 19 E5 21 00 00 EB E1 .b.*...2...!....
01B3A0: 73 2A F3 9E E5 2A F0 9E CD 55 1B E5 21 01 00 D1 s*...*...U..!...
01B3B0: EB B7 ED 52 D1 CD 9B 06 CB 45 CA 1A 2F 2A F2 9E ...R.....E../*..
01B3C0: 26 00 CB 45 CA E0 2E CD 1D 05 0F 53 65 65 6B 20 &..E.......Seek
01B3D0: 72 65 61 64 20 65 72 72 6F 72 CD B3 20 C3 0A 2F read error.. ../
01B3E0: 2A F3 9E E5 2A F0 9E CD 55 1B D1 CD 9B 06 CB 45 *...*...U......E
01B3F0: CA 0A 2F CD 1D 05 10 53 65 65 6B 20 77 72 69 74 ../....Seek writ
01B400: 19 5E 23 56 EB E5 2A 13 9F D1 CD 61 06 CB 45 CA .^#V..*....a..E.
01B410: 24 25 2A 0D 9F 26 00 E5 21 01 00 D1 19 7D 32 0D $%*..&..!....}2.
01B420: 9F C3 F5 24 2A 17 9F E5 2A EA 9F D1 CD 0F 07 22 ...$*...*......"
01B430: 11 9F 2A 15 9F E5 2A EA 9F D1 CD 0F 07 22 0F 9F ..*...*......"..
01B440: 21 DA 9F E5 2A 0E 9F 26 00 29 D1 19 5E 23 56 EB !...*..&.)..^#V.
01B450: E5 2A 11 9F E5 2A F8 9F D1 CD C4 06 D1 19 22 0B .*...*........".
01B460: 9F 21 DA 9F E5 2A 0D 9F 26 00 29 D1 19 5E 23 56 .!...*..&.)..^#V
01B470: EB E5 2A 0F 9F E5 2A F8 9F D1 CD C4 06 D1 19 22 ..*...*........"
01B480: 09 9F 2A 0B 9F E5 2A 73 9F E5 2A F8 9F CD 09 1F ..*...*s..*.....
01B490: 2A 09 9F E5 2A 0B 9F E5 2A F8 9F CD 09 1F 2A 73 *...*...*.....*s
01B4A0: 9F E5 2A 09 9F E5 2A F8 9F CD 09 1F 21 D1 9F E5 ..*...*.....!...
01B4B0: 2A 0E 9F 26 00 D1 19 E5 21 01 00 EB E1 73 21 D1 *..&....!....s!.
01B4C0: 9F E5 2A 0D 9F 26 00 D1 19 E5 21 01 00 EB E1 73 ..*..&....!....s
01B4D0: C9 FD E1 E1 22 04 9F E1 22 06 9F FD E5 2A 06 9F ...."..."....*..
01B4E0: E5 2A F0 9F E5 2A F8 9F CD 09 1F 2A 04 9F E5 2A .*...*.....*...*
01B4F0: EE 9F E5 2A F8 9F CD 09 1F 2A F4 9F E5 CD 5C 20 ...*.....*....\
01B500: 2A 09 A0 26 00 7D 32 08 9F 2A 08 9F 26 00 C9 2A *..&.}2..*..&..*
01B510: EC 9F E5 21 00 00 D1 CD 9B 06 CB 45 CA 59 26 21 ...!.......E.Y&!
01B520: A9 9F E5 21 01 00 2B 29 D1 19 E5 21 00 00 EB E1 ...!..+)...!....
01B530: 73 23 72 21 81 9F E5 21 01 00 2B 29 D1 19 E5 2A s#r!...!..+)...*
01B540: EC 9F E5 21 01 00 D1 EB B7 ED 52 EB E1 73 23 72 ...!......R..s#r
01B550: 21 01 00 22 7F 9F C3 5F 26 21 00 00 22 7F 9F 2A !.."..._&!.."..*
01B560: 7F 9F E5 21 00 00 D1 CD 9B 06 CB 45 CA B5 28 21 ...!.......E..(!
01B570: A9 9F E5 2A 7F 9F 2B 29 D1 19 5E 23 56 EB 22 7D ...*..+)..^#V."}
01B580: 9F 21 81 9F E5 2A 7F 9F 2B 29 D1 19 5E 23 56 EB .!...*..+)..^#V.
01B590: 22 7B 9F 2A 7F 9F E5 21 01 00 D1 EB B7 ED 52 22 "{.*...!......R"
01B5A0: 7F 9F 2A 7D 9F 22 79 9F 2A 7B 9F 22 77 9F 2A 79 ..*}."y.*{."w.*y
01B5B0: 9F E5 2A 77 9F D1 19 E5 21 02 00 D1 CD DE 06 22 ..*w....!......"
01B5C0: 02 9F 2A 02 9F E5 2A 79 9F E5 2A 77 9F E5 CD 7B ..*...*y..*w...{
01B5D0: 23 2A 02 9F E5 21 6D 9F E5 CD FD 22 2A 6D 9F E5 #*...!m...."*m..
01B5E0: 2A 75 9F E5 2A F8 9F CD 09 1F 2A 79 9F E5 2A 77 *u..*.....*y..*w
01B5F0: 9F E5 2A 02 9F E5 CD 7B 23 2A 79 9F E5 21 71 9F ..*....{#*y..!q.
01B600: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01B610: 17 00 01 00 02 09 52 E5 17 00 41 02 00 00 00 02 ......R...A.....
01B620: 17 00 46 02 00 00 00 02 17 00 42 02 00 00 00 02 ..F.......B.....
01B630: 17 00 47 02 00 00 00 02 17 00 43 02 00 00 00 02 ..G.......C.....
01B640: 17 00 48 02 00 00 00 02 17 00 44 02 00 00 00 02 ..H.......D.....
01B650: 17 00 49 02 00 00 00 02 17 00 45 02 00 00 00 02 ..I.......E.....
01B660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B6A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B6B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B6C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B6D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B6E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B6F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01B700: 65 20 65 72 72 6F 72 CD B3 20 2A F0 9E E5 2A F3 e error.. *...*.
01B710: 9E CD F8 1B CD 62 1F C3 3C 2F 2A F0 9E E5 2A F3 .....b..</*...*.
01B720: 9E CD F8 1B CD 62 1F 2A F0 9E E5 2A F0 9E 11 33 .....b.*...*...3
01B730: 00 19 E5 21 01 00 CD 6B 1B CD 62 1F 2A F0 9E 11 ...!...k..b.*...
01B740: 30 00 19 E5 2A F3 9E EB E1 73 23 72 C9 FD E1 E1 0...*....s#r....
01B750: 22 EE 9E FD E5 2A EE 9E 22 EC 9E 2A EC 9E 11 32 "....*.."..*...2
01B760: 00 19 6E 26 00 CB 45 CA 94 2F 2A EC 9E E5 2A EC ..n&..E../*...*.
01B770: 9E 11 30 00 19 5E 23 56 EB CD F8 1B CD 62 1F 2A ..0..^#V.....b.*
01B780: EC 9E E5 2A EC 9E 11 33 00 19 E5 21 01 00 CD 67 ...*...3...!...g
01B790: 1B CD 62 1F 2A EC 9E CD 53 15 CD 62 1F C9 FD E1 ..b.*...S..b....
01B7A0: E1 22 E3 9E E1 7D 32 E5 9E E1 22 E6 9E E1 22 E8 ."...}2..."...".
01B7B0: 9E E1 22 EA 9E FD E5 2A EA 9E E5 2A E6 9E E5 21 .."....*...*...!
01B7C0: 01 00 E5 CD 2B 2E 21 80 00 E5 2A E5 9E 26 00 D1 ....+.!...*..&..
01B7D0: EB B7 ED 52 22 DF 9E 2A EA 9E 22 E1 9E 2A E1 9E ...R"..*.."..*..
01B7E0: 11 33 00 19 E5 2A E5 9E 26 00 D1 19 E5 2A E8 9E .3...*..&....*..
01B7F0: E5 2A DF 9E E5 2A E3 9E E5 CD 00 21 CD 09 1F 2A .*...*.....!...*
01B800: DF 9E E5 2A E3 9E D1 CD AF 06 CB 45 CA 64 30 2A ...*.......E.d0*
01B810: EA 9E E5 2A E1 9E 11 30 00 19 5E 23 56 EB E5 21 ...*...0..^#V..!
01B820: 01 00 D1 19 E5 21 01 00 E5 CD 2B 2E 2A E1 9E 11 .....!....+.*...
01B830: 33 00 19 E5 2A E8 9E E5 2A DF 9E D1 19 E5 21 80 3...*...*.....!.
01B840: 00 E5 2A E3 9E E5 2A DF 9E D1 EB B7 ED 52 E5 CD ..*...*......R..
01B850: 00 21 CD 09 1F 2A DF 9E E5 21 80 00 D1 19 22 DF .!...*...!....".
01B860: 9E C3 FF 2F C9 FD E1 E1 22 D6 9E E1 7D 32 D8 9E .../...."...}2..
01B870: E1 22 D9 9E E1 22 DB 9E E1 22 DD 9E FD E5 2A DD ."..."..."....*.
01B880: 9E E5 2A D9 9E E5 21 00 00 E5 CD 2B 2E 21 80 00 ..*...!....+.!..
01B890: E5 2A D8 9E 26 00 D1 EB B7 ED 52 E5 2A D6 9E E5 .*..&.....R.*...
01B8A0: CD 00 21 22 D2 9E 2A DD 9E 22 D4 9E 2A DB 9E E5 ..!"..*.."..*...
01B8B0: 2A D4 9E 11 33 00 19 E5 2A D8 9E 26 00 D1 19 E5 *...3...*..&....
01B8C0: 2A D2 9E CD 09 1F 2A D4 9E 11 32 00 19 E5 21 01 *.....*...2...!.
01B8D0: 00 EB E1 73 2A D2 9E E5 2A D6 9E D1 CD AF 06 CB ...s*...*.......
01B8E0: 45 CA 47 31 2A DD 9E E5 2A D4 9E 11 30 00 19 5E E.G1*...*...0..^
01B8F0: 23 56 EB E5 21 01 00 D1 19 E5 21 00 00 E5 CD 2B #V..!.....!....+
01B900: 0C 9A CD 41 1B 7D EE 01 6F CB 45 CA 66 39 2A 0C ...A.}..o.E.f9*.
01B910: 9A CD 4D 1B E5 21 0A 00 D1 CD 0F 07 E5 21 00 00 ..M..!.......!..
01B920: D1 CD 4E 06 CB 45 CA 35 39 CD 52 16 21 3C 00 CD ..N..E.59.R.!<..
01B930: F2 18 CD 62 1F 2A 0C 9A CD 38 16 21 24 99 CD B3 ...b.*...8.!$...
01B940: 19 CD 62 1F 2A 0C 9A CD 4D 1B E5 21 01 00 D1 EB ..b.*...M..!....
01B950: B7 ED 52 E5 2A B9 99 D1 CD 61 06 CB 45 CA 63 39 ..R.*....a..E.c9
01B960: CD D8 2D C3 FF 38 C9 2A 0C 9A 11 95 00 CD 14 14 ..-..8.*........
01B970: CD 62 1F CD E8 2D 7D EE 01 6F CB 45 CA BB 39 2A .b...-}..o.E..9*
01B980: 0C 9A CD 4D 1B E5 21 0A 00 D1 CD 0F 07 E5 21 00 ...M..!.......!.
01B990: 00 D1 CD 4E 06 CB 45 CA A6 39 CD 52 16 21 3E 00 ...N..E..9.R.!>.
01B9A0: CD F2 18 CD 62 1F CD E0 2D 2A 0C 9A CD 5B 16 21 ....b...-*...[.!
01B9B0: 24 99 CD D2 19 CD 62 1F C3 73 39 C9 FD E1 E1 22 $.....b..s9...."
01B9C0: B9 99 06 50 21 BB 99 CD B2 05 E1 22 0C 9A FD E5 ...P!......"....
01B9D0: 21 BB 99 CD 0A 05 CD 52 16 21 00 00 CD 71 19 21 !......R.!...q.!
01B9E0: 20 00 CD F2 18 CD 62 1F 21 01 00 22 8D 98 CD 2C .....b.!.."...,
01B9F0: 20 C5 D5 E5 21 00 02 CD D1 0F D9 E1 D1 C1 CD BC ...!...........
01BA00: 09 C5 D5 E5 21 95 00 E5 21 F3 38 E5 21 A8 38 E5 ....!...!.8.!.8.
01BA10: 21 67 39 E5 21 24 99 E5 21 8F 98 E5 CD 28 22 E5 !g9.!$..!....(".
01BA20: 21 00 00 D1 CD 61 06 CB 45 CA 84 3A CD 52 16 CD !....a..E..:.R..
01BA30: 90 19 CD 62 1F CD 52 16 CD 81 19 39 2A 2A 2A 20 ...b..R....9***
01BA40: 57 41 52 4E 49 4E 47 3A 20 55 6E 61 62 6C 65 20 WARNING: Unable
01BA50: 74 6F 20 73 6F 72 74 20 54 65 72 6D 69 6E 61 6C to sort Terminal
01BA60: 20 6E 61 6D 65 73 20 2D 20 50 72 65 73 73 20 52 names - Press R
01BA70: 45 54 55 52 4E CD 90 19 CD 62 1F CD 2B 16 CD 5F ETURN....b..+.._
01BA80: 18 CD 62 1F CD 52 16 CD 90 19 CD 62 1F C9 C3 80 ..b..R.....b....
01BA90: 51 FD E1 E1 22 04 91 FD E5 2A 04 91 E5 21 00 00 Q..."....*...!..
01BAA0: D1 19 E5 21 00 00 EB E1 73 21 BE 00 CD 38 16 21 ...!....s!...8.!
01BAB0: 01 91 CD DB 17 CD 62 1F 2A 01 91 26 00 E5 21 0D ......b.*..&..!.
01BAC0: 00 D1 CD 61 06 CB 45 CA D2 3B 2A 01 91 26 00 E5 ...a..E..;*..&..
01BAD0: CD 51 05 21 20 00 E5 21 7E 00 CD 6B 05 CD 1C 13 .Q.! ..!~..k....
01BAE0: CB 45 CA 2B 3B 2A 01 91 26 00 CD 52 16 CD F2 18 .E.+;*..&..R....
01BAF0: CD 62 1F 2A 04 91 E5 21 00 00 D1 19 E5 2A 04 91 .b.*...!.....*..
01BB00: 2E 2A DB 9E E5 2A D2 9E D1 19 E5 2A D4 9E 11 33 .*...*.....*...3
01BB10: 00 19 E5 21 80 00 E5 2A D6 9E E5 2A D2 9E D1 EB ...!...*...*....
01BB20: B7 ED 52 E5 CD 00 21 CD 09 1F 2A D4 9E 11 32 00 ..R...!...*...2.
01BB30: 19 E5 21 01 00 EB E1 73 2A D2 9E E5 21 80 00 D1 ..!....s*...!...
01BB40: 19 22 D2 9E C3 D4 30 C9 FD E1 E1 22 CC 9E E1 22 ."....0...."..."
01BB50: CE 9E E1 22 D0 9E FD E5 2A D0 9E CD 9D 19 7D EE ..."....*.....}.
01BB60: 01 6F CB 45 CA 16 32 2A D0 9E CD 38 16 21 CC 9D .o.E..2*...8.!..
01BB70: 06 FF CD 2E 18 CD 5F 18 21 CC 9D CD 0A 05 CD 6D ......_.!......m
01BB80: 08 E5 21 00 00 D1 CD 9B 06 CB 45 CA 13 32 21 CC ..!.......E..2!.
01BB90: 9D CD 0A 05 21 01 00 E5 21 20 00 65 2E 01 E5 21 ....!...! .e...!
01BBA0: CC 9D CD 0A 05 21 20 00 65 2E 01 E5 CD 07 08 CD .....! .e.......
01BBB0: 7C 08 2B CD 35 08 21 CA 9D E5 21 C8 9D CD 9E 1E |.+.5.!...!.....
01BBC0: 2A C8 9D E5 21 00 00 D1 CD 4E 06 E5 2A CA 9D E5 *...!....N..*...
01BBD0: 2A CE 9E D1 CD 4E 06 D1 7D A3 6F CB 45 CA 13 32 *....N..}£o.E..2
01BBE0: 21 CC 9D CD 0A 05 21 20 00 65 2E 01 E5 21 CC 9D !.....! .e...!..
01BBF0: CD 0A 05 21 20 00 65 2E 01 E5 CD 07 08 CD 7C 08 ...! .e.......|.
01BC00: 23 E5 21 FF 00 CD 35 08 06 FF 2A CC 9E CD B2 05 #.!...5...*.....
01BC10: C3 16 32 C3 58 31 C9 FD E1 E1 22 C4 9D E1 22 C6 ..2.X1...."...".
01BC20: 9D FD E5 2A C6 9D CD 9D 19 7D EE 01 6F CB 45 CA ...*.....}..o.E.
01BC30: 69 32 2A C6 9D CD 38 16 2A C4 9D 06 FF CD 2E 18 i2*...8.*.......
01BC40: CD 5F 18 2A C4 9D CD 0A 05 21 20 00 65 2E 01 E5 ._.*.....! .e...
01BC50: 2A C4 9D CD 0A 05 CD 7C 08 23 E5 21 FF 00 CD 35 *......|.#.!...5
01BC60: 08 06 FF 2A C4 9D CD B2 05 C9 C3 BF 32 2A B9 9C ...*........2*..
01BC70: 23 22 B9 9C 2A B9 9C E5 21 80 00 D1 CD 4E 06 CB #"..*...!....N..
01BC80: 45 CA A9 32 2A BB 9C 23 22 BB 9C 21 00 00 22 B9 E..2*..#"..!..".
01BC90: 9C 2A C1 9D E5 2A BB 9C CD F8 1B 2A C1 9D E5 21 .*...*.....*...!
01BCA0: 39 9C E5 21 01 00 CD 6B 1B 21 39 9C E5 2A B9 9C 9..!...k.!9..*..
01BCB0: D1 19 6E 26 00 7D 32 35 9B 2A 35 9B 26 00 C9 FD ..n&.}25.*5.&...
01BCC0: E1 E1 22 BD 9C E1 22 BF 9C 06 FF 21 C1 9C CD B2 .."..."....!....
01BCD0: 05 E1 22 C1 9D FD E5 21 00 00 7D 32 38 9C 21 FF .."....!..}28.!.
01BCE0: FF 22 BB 9C 21 7F 00 22 B9 9C 21 38 9B E5 21 00 ."..!.."..!8..!.
01BCF0: 00 D1 19 E5 21 C1 9C E5 21 00 00 D1 19 6E 26 00 ....!...!....n&.
01BD00: E5 21 00 00 D1 19 6E 26 00 23 EB E1 73 2A 04 91 .!....n&.#..s*..
01BD10: E5 2A 04 91 E5 21 00 00 D1 19 6E 26 00 D1 19 E5 .*...!....n&....
01BD20: 2A 01 91 26 00 EB E1 73 C3 C0 3B 2A 01 91 26 00 *..&...s..;*..&.
01BD30: E5 21 08 00 D1 CD 4E 06 E5 2A 01 91 26 00 E5 21 .!....N..*..&..!
01BD40: 7F 00 D1 CD 4E 06 D1 7D B3 6F E5 2A 04 91 CD 0A ....N..}.o.*....
01BD50: 05 CD 6D 08 E5 21 00 00 D1 CD 9B 06 D1 7D A3 6F ..m..!.......}£o
01BD60: CB 45 CA 9A 3B CD 52 16 21 08 00 CD F2 18 21 20 .E..;.R.!.....!
01BD70: 00 CD F2 18 21 08 00 CD F2 18 CD 62 1F 2A 04 91 ....!......b.*..
01BD80: E5 21 00 00 D1 19 E5 2A 04 91 E5 21 00 00 D1 19 .!.....*...!....
01BD90: 6E 26 00 2B EB E1 73 C3 C0 3B 2A 01 91 26 00 E5 n&.+..s..;*..&..
01BDA0: 21 11 00 D1 CD 4E 06 E5 2A DF 97 26 00 D1 7D A3 !....N..*..&..}£
01BDB0: 6F CB 45 CA C0 3B 21 01 00 7D 32 DE 97 C3 DB 3B o.E..;!..}2....;
01BDC0: 21 BE 00 CD 38 16 21 01 91 CD DB 17 CD 62 1F C3 !...8.!......b..
01BDD0: B8 3A CD 52 16 CD 90 19 CD 62 1F C9 FD E1 E1 22 .:.R.....b....."
01BDE0: FD 90 E1 22 FF 90 FD E5 21 96 94 CD 0A 05 CD 52 ..."....!......R
01BDF0: 16 21 00 00 CD 71 19 2A FF 90 E5 21 00 00 CD F6 .!...q.*...!....
01BE00: 18 21 2D 00 CD F2 18 2A FD 90 E5 21 00 00 CD F6 .!-....*...!....
01BE10: 18 21 45 94 CD 0A 05 21 00 00 CD 71 19 CD 62 1F .!E....!...q..b.
01BE20: C9 FD E1 E1 22 F4 90 E1 22 F6 90 E1 22 F8 90 FD ...."..."..."...
01BE30: E5 2A F8 90 E5 2A F6 90 D1 CD 74 06 E5 2A F8 90 .*...*....t..*..
01BE40: E5 2A F4 90 D1 CD 87 06 D1 7D A3 6F 7D 32 FA 90 .*.......}£o}2..
01BE50: 2A FA 90 26 00 C9 FD E1 E1 22 EA 90 E1 22 EC 90 *..&....."..."..
01BE60: E1 22 EE 90 E1 22 F0 90 FD E5 2A F0 90 CD 0A 05 ."..."....*.....
01BE70: CD 1D 05 00 CD 5C 06 CB 45 CA 87 3C 21 01 00 EB .....\..E..<!...
01BE80: 2A EC 90 73 C3 AF 3C 21 00 00 EB 2A EC 90 73 2A *..s..<!...*..s*
01BE90: F0 90 CD 0A 05 2A EE 90 E5 21 E6 90 CD 9E 1E 2A .....*...!.....*
01BEA0: E6 90 E5 21 00 00 D1 CD 4E 06 EB 2A EA 90 73 C9 ...!....N..*..s.
01BEB0: FD E1 E1 22 E4 90 FD E5 21 DA 95 E5 2A E4 90 E5 ..."....!...*...
01BEC0: CD 17 32 C9 21 A3 93 E5 CD B0 3C 21 A3 93 CD 0A ..2.!£....<!£...
01BED0: 05 CD 52 16 21 00 00 CD 71 19 21 20 00 CD F2 18 ..R.!...q.! ....
01BEE0: CD 62 1F C9 21 06 91 E5 CD B0 3C C9 FD E1 E1 22 .b..!.....<...."
01BEF0: DC 90 FD E5 21 01 00 E5 2A DC 90 D1 CD 35 06 7A ....!...*....5.z
01BF00: EB E1 73 21 01 00 E5 21 38 9B CD 0A 05 CD 6D 08 ..s!...!8.....m.
01BF10: D1 CD 35 06 7A B3 CA 36 33 D5 22 36 9B 21 38 9B ..5.z..63."6.!8.
01BF20: E5 2A 36 9B D1 19 E5 CD 6D 32 EB E1 73 2A 36 9B .*6.....m2..s*6.
01BF30: 23 D1 1B C3 14 33 21 38 9B CD 0A 05 21 C1 9C CD #....3!8....!...
01BF40: 0A 05 CD 5C 06 CB 45 CA 54 33 21 01 00 7D 32 38 ...\..E.T3!..}28
01BF50: 9C C3 92 33 21 38 9B E5 21 01 00 E5 21 01 00 CD ...3!8..!...!...
01BF60: BD 08 21 38 9B E5 21 00 00 D1 19 E5 21 38 9B E5 ..!8..!.....!8..
01BF70: 21 00 00 D1 19 6E 26 00 23 EB E1 73 21 38 9B E5 !....n&.#..s!8..
01BF80: 21 38 9B CD 0A 05 CD 6D 08 D1 19 E5 CD 6D 32 EB !8.....m.....m2.
01BF90: E1 73 2A C1 9D CD 41 1B E5 2A 38 9C 26 00 D1 7D .s*...A..*8.&..}
01BFA0: B3 6F CB 45 CA 36 33 2A 38 9C 26 00 7D 32 C3 9D .o.E.63*8.&.}2..
01BFB0: 2A BB 9C E5 21 80 00 D1 CD C4 06 E5 2A B9 9C D1 *...!.......*...
01BFC0: 19 E5 21 C1 9C CD 0A 05 CD 6D 08 D1 EB B7 ED 52 ..!......m.....R
01BFD0: E5 21 80 00 D1 CD DE 06 EB 2A BF 9C 73 23 72 2A .!.......*..s#r*
01BFE0: B9 9C E5 21 01 00 D1 19 E5 21 C1 9C CD 0A 05 CD ...!.....!......
01BFF0: 6D 08 D1 EB B7 ED 52 E5 21 80 00 D1 19 E5 21 80 m.....R.!.....!.
01C000: 00 D1 CD 0F 07 EB 2A BD 9C 73 23 72 2A C3 9D 26 ......*..s#r*..&
01C010: 00 C9 FD E1 E1 7D 32 34 9A FD E5 2A 34 9A 26 00 .....}24...*4.&.
01C020: E5 21 80 00 D1 CD 0F 07 11 00 00 01 0A 00 B7 ED .!..............
01C030: 52 B7 ED 42 DA 6A 34 19 09 11 0B 00 01 02 00 B7 R..B.j4.........
01C040: ED 52 B7 ED 42 DA 6A 34 19 09 11 0E 00 01 0D 00 .R..B.j4........
01C050: B7 ED 52 B7 ED 42 DA 6A 34 19 09 11 1C 00 01 04 ..R..B.j4.......
01C060: 00 B7 ED 52 B7 ED 42 D2 90 34 CD 1D 05 05 43 74 ...R..B..4....Ct
01C070: 72 6C 2D 2A 34 9A 26 00 E5 21 40 00 D1 19 65 2E rl-*4.&..!@...e.
01C080: 01 E5 CD 07 08 06 14 21 1F 9A CD B2 05 C3 38 35 .......!......85
01C090: 19 09 11 0A 00 B7 ED 52 C2 AE 34 CD 1D 05 04 3C .......R..4....<
01C0A0: 4C 46 3E 06 14 21 1F 9A CD B2 05 C3 38 35 19 11 LF>..!......85..
01C0B0: 0D 00 B7 ED 52 C2 CB 34 CD 1D 05 04 3C 43 52 3E ....R..4....<CR>
01C0C0: 06 14 21 1F 9A CD B2 05 C3 38 35 19 11 1B 00 B7 ..!......85.....
01C0D0: ED 52 C2 E9 34 CD 1D 05 05 3C 45 53 43 3E 06 14 .R..4....<ESC>..
01C0E0: 21 1F 9A CD B2 05 C3 38 35 19 11 20 00 B7 ED 52 !......85.. ...R
01C0F0: C2 09 35 CD 1D 05 07 3C 53 50 41 43 45 3E 06 14 ..5....<SPACE>..
01C100: B3 CA 14 3D D5 22 DC 90 CD E4 3C 2A DC 90 23 D1 ...=."....<*..#.
01C110: 1B C3 FF 3C C9 FD E1 E1 22 D8 90 FD E5 CD C4 3C ...<...."......<
01C120: 21 F4 93 CD 0A 05 CD 52 16 21 00 00 CD 71 19 21 !......R.!...q.!
01C130: 20 00 CD F2 18 CD 62 1F 2A 22 97 26 00 CB 45 CA .....b.*".&..E.
01C140: 72 3D 21 28 97 E5 2A D8 90 6E 26 00 D1 19 6E 26 r=!(..*..n&...n&
01C150: 00 CD 52 16 CD F2 18 21 20 00 CD F2 18 21 89 95 ..R....! ....!..
01C160: CD 0A 05 21 00 00 CD 71 19 21 20 00 CD F2 18 CD ...!...q.! .....
01C170: 62 1F 21 BE 00 CD 38 16 21 D5 90 CD DB 17 CD 62 b.!...8.!......b
01C180: 1F 2A 22 97 26 00 E5 2A D5 90 26 00 E5 21 0D 00 .*".&..*..&..!..
01C190: D1 CD 4E 06 D1 7D A3 6F CB 45 CA B3 3D 21 28 97 ..N..}£o.E..=!(.
01C1A0: E5 2A D8 90 6E 26 00 D1 19 6E 26 00 7D 32 D5 90 .*..n&...n&.}2..
01C1B0: C3 BF 3D 2A D5 90 26 00 CD 28 1F 7D 32 D5 90 2A ..=*..&..(.}2..*
01C1C0: D5 90 26 00 E5 CD 51 05 21 28 97 E5 21 01 00 D1 ..&...Q.!(..!...
01C1D0: 19 6E 26 00 CD 61 05 21 28 97 E5 21 00 00 D1 19 .n&..a.!(..!....
01C1E0: 6E 26 00 CD 61 05 CD 1C 13 CB 45 CA 72 3D 2A D5 n&..a.....E.r=*.
01C1F0: 90 26 00 CD 52 16 CD F2 18 CD 90 19 CD 62 1F 2A .&..R........b.*
01C200: D5 90 26 00 E5 21 28 97 E5 21 01 00 D1 19 6E 26 ..&..!(..!....n&
01C210: 00 D1 CD 4E 06 EB 2A D8 90 73 C9 FD E1 E1 22 CD ...N..*..s....".
01C220: 90 E1 22 CF 90 E1 22 D1 90 E1 22 D3 90 FD E5 21 .."..."..."....!
01C230: 00 00 7D 32 78 90 2A 22 97 26 00 CB 45 CA 6C 3E ..}2x.*".&..E.l>
01C240: 2A D3 90 5E 23 56 EB CD 52 16 E5 21 00 00 CD F6 *..^#V..R..!....
01C250: 18 21 20 00 CD F2 18 21 89 95 CD 0A 05 21 00 00 .! ....!.....!..
01C260: CD 71 19 21 20 00 CD F2 18 CD 62 1F 2A 78 90 26 .q.! .....b.*x.&
01C270: 00 7D EE 01 6F CB 45 CA 63 3F 21 7A 90 E5 CD 91 .}..o.E.c?!z....
01C280: 3A 2A DE 97 26 00 CB 45 CA 8E 3E C3 63 3F 21 7A :*..&..E..>.c?!z
01C290: 90 E5 2A D3 90 E5 21 79 90 E5 21 78 90 E5 CD 56 ..*...!y..!x...V
01C2A0: 3C 2A 79 90 26 00 E5 2A 22 97 26 00 D1 7D A3 6F <*y.&..*".&..}£o
01C2B0: CB 45 CA BF 3E 21 01 00 7D 32 78 90 C3 60 3F 2A .E..>!..}2x..`?*
01C2C0: 79 90 26 00 CB 45 CA 03 3F 2A CD 90 EB 2A D3 90 y.&..E..?*...*..
01C2D0: 73 23 72 2A D3 90 5E 23 56 EB E5 2A D1 90 E5 2A s#r*..^#V..*...*
01C2E0: CF 90 E5 CD 21 3C CB 45 CA F5 3E 21 01 00 7D 32 ....!<.E..>!..}2
01C2F0: 78 90 C3 00 3F 2A D1 90 E5 2A CF 90 E5 CD DC 3B x...?*...*.....;
01C300: 21 1F 9A CD B2 05 C3 38 35 19 11 7F 00 B7 ED 52 !......85......R
01C310: C2 27 35 CD 1D 05 05 3C 44 45 4C 3E 06 14 21 1F .'5....<DEL>..!.
01C320: 9A CD B2 05 C3 38 35 2A 34 9A 26 00 65 2E 01 E5 .....85*4.&.e...
01C330: 06 14 21 1F 9A CD B2 05 2A 34 9A 26 00 E5 21 7F ..!.....*4.&..!.
01C340: 00 D1 CD 9B 06 CB 45 CA 65 35 21 1F 9A CD 0A 05 ......E.e5!.....
01C350: CD 1D 05 06 28 2B 31 32 38 29 CD 07 08 06 14 21 ....(+128).....!
01C360: 1F 9A CD B2 05 21 1F 9A CD 0A 05 06 FF 21 35 9A .....!.......!5.
01C370: CD B2 05 FD E1 21 35 9A CD 0A 05 FD E5 C9 C3 08 .....!5.........
01C380: 38 2A 1C 9A CD 0A 05 CD 6D 08 E5 2A 1A 9A D1 CD 8*......m..*....
01C390: 74 06 CB 45 CA AD 35 21 01 00 7D 32 18 9A CD 52 t..E..5!..}2...R
01C3A0: 16 21 07 00 CD F2 18 CD 62 1F C3 B4 35 21 00 00 .!......b...5!..
01C3B0: 7D 32 18 9A 2A 18 9A 26 00 C9 C3 02 36 21 13 9A }2..*..&....6!..
01C3C0: CD 0A 05 21 11 9A E5 21 0F 9A CD 9E 1E 2A 0F 9A ...!...!.....*..
01C3D0: E5 21 00 00 D1 CD 4E 06 E5 2A 11 9A E5 21 00 00 .!....N..*...!..
01C3E0: D1 CD 74 06 D1 7D A3 6F E5 2A 11 9A E5 21 FF 00 ..t..}£o.*...!..
01C3F0: D1 CD 87 06 D1 7D A3 6F 7D 32 0E 9A 2A 0E 9A 26 .....}£o}2..*..&
01C400: 00 C9 2A 19 9A 26 00 65 2E 01 E5 06 04 21 13 9A ..*..&.e.....!..
01C410: CD B2 05 2A 19 9A 26 00 CD 52 16 CD F2 18 CD 62 ...*..&..R.....b
01C420: 1F 21 BE 00 CD 38 16 21 19 9A CD DB 17 CD 62 1F .!...8.!......b.
01C430: 21 13 9A CD 0A 05 2A 19 9A 26 00 65 2E 01 E5 CD !.....*..&.e....
01C440: 07 08 06 04 21 13 9A CD B2 05 2A 19 9A 26 00 E5 ....!.....*..&..
01C450: CD 51 05 21 20 00 CD 61 05 21 0D 00 CD 61 05 CD .Q.! ..a.!...a..
01C460: 1C 13 E5 21 13 9A CD 0A 05 CD 6D 08 E5 21 04 00 ...!......m..!..
01C470: D1 CD 4E 06 D1 7D B3 6F E5 CD BD 35 7D EE 01 6F ..N..}.o...5}..o
01C480: D1 7D B3 6F CB 45 CA 13 36 2A 19 9A 26 00 E5 CD .}.o.E..6*..&...
01C490: 51 05 21 20 00 CD 61 05 21 0D 00 CD 61 05 CD 1C Q.! ..a.!...a...
01C4A0: 13 CB 45 CA C0 36 21 13 9A E5 21 00 00 D1 19 E5 ..E..6!...!.....
01C4B0: 21 13 9A E5 21 00 00 D1 19 6E 26 00 2B EB E1 73 !...!....n&.+..s
01C4C0: CD BD 35 CB 45 CA 18 37 2A 1C 9A CD 0A 05 2A 11 ..5.E..7*.....*.
01C4D0: 9A 65 2E 01 E5 CD 07 08 06 FF 2A 1C 9A CD B2 05 .e........*.....
01C4E0: 2A 19 9A 26 00 E5 21 0D 00 D1 CD 61 06 CB 45 CA *..&..!....a..E.
01C4F0: 15 37 2A 19 9A 26 00 CD 52 16 CD F2 18 21 20 00 .7*..&..R....! .
01C500: C3 60 3F 2A 78 90 26 00 7D EE 01 6F CB 45 CA 32 .`?*x.&.}..o.E.2
01C510: 3F 21 E7 94 CD 0A 05 CD 52 16 21 00 00 CD 71 19 ?!......R.!...q.
01C520: 21 45 94 CD 0A 05 21 00 00 CD 71 19 CD 62 1F C3 !E....!...q..b..
01C530: 60 3F 2A D3 90 5E 23 56 EB E5 2A D1 90 E5 2A CF `?*..^#V..*...*.
01C540: 90 E5 CD 21 3C 7D EE 01 6F CB 45 CA 60 3F 2A D1 ...!<}..o.E.`?*.
01C550: 90 E5 2A CF 90 E5 CD DC 3B 21 00 00 7D 32 78 90 ..*.....;!..}2x.
01C560: C3 6C 3E C9 FD E1 E1 22 70 90 E1 22 72 90 E1 22 .l>...."p.."r.."
01C570: 74 90 E1 22 76 90 FD E5 2A 76 90 6E 26 00 22 6C t.."v...*v.n&."l
01C580: 90 21 6C 90 E5 2A 74 90 E5 2A 72 90 E5 2A 70 90 .!l..*t..*r..*p.
01C590: E5 CD 1B 3E 2A 6C 90 EB 2A 76 90 73 C9 FD E1 E1 ...>*l..*v.s....
01C5A0: 22 6A 90 FD E5 21 01 00 E5 2A 6A 90 D1 CD 35 06 "j...!...*j...5.
01C5B0: 7A B3 CA CE 3F D5 22 66 90 CD 52 16 21 5F 00 CD z...?."f..R.!_..
01C5C0: F2 18 CD 62 1F 2A 66 90 23 D1 1B C3 B0 3F 21 01 ...b.*f.#....?!.
01C5D0: 00 E5 2A 6A 90 D1 CD 35 06 7A B3 CA F7 3F D5 22 ..*j...5.z...?."
01C5E0: 66 90 CD 52 16 21 08 00 CD F2 18 CD 62 1F 2A 66 f..R.!......b.*f
01C5F0: 90 23 D1 1B C3 D9 3F C9 FD E1 E1 22 62 90 E1 22 .#....?...."b.."
01C600: 64 90 FD E5 2A 22 97 26 00 CB 45 CA E8 40 21 01 d...*".&..E..@!.
01C610: 00 E5 2A 64 90 CD 0A 05 CD 6D 08 D1 CD 35 06 7A ..*d.....m...5.z
01C620: B3 CA 53 40 D5 22 0D 90 CD 52 16 2A 64 90 E5 2A ..S@."...R.*d..*
01C630: 0D 90 D1 19 6E 26 00 E5 CD 12 34 21 00 00 CD 71 ....n&....4!...q
01C640: 19 21 20 00 CD F2 18 CD 62 1F 2A 0D 90 23 D1 1B .! .....b.*..#..
01C650: C3 1F 40 2A 64 90 CD 0A 05 CD 6D 08 E5 21 00 00 ..@*d.....m..!..
01C660: D1 CD 9B 06 CB 45 CA CA 40 CD 52 16 CD 81 19 03 .....E..@.R.....
01C670: 20 20 28 CD 62 1F 21 01 00 E5 2A 64 90 CD 0A 05 (.b.!...*d....
01C680: CD 6D 08 D1 CD 35 06 7A B3 CA B8 40 D5 22 0D 90 .m...5.z...@."..
01C690: CD 52 16 2A 64 90 E5 2A 0D 90 D1 19 6E 26 00 E5 .R.*d..*....n&..
01C6A0: 21 00 00 CD F6 18 21 20 00 CD F2 18 CD 62 1F 2A !.....! .....b.*
01C6B0: 0D 90 23 D1 1B C3 87 40 CD 52 16 21 08 00 CD F2 ..#....@.R.!....
01C6C0: 18 CD 81 19 02 29 20 CD 62 1F CD 52 16 21 20 00 .....) .b..R.! .
01C6D0: CD F2 18 21 89 95 CD 0A 05 21 00 00 CD 71 19 21 ...!.....!...q.!
01C6E0: 20 00 CD F2 18 CD 62 1F 21 0F 90 E5 2A 62 90 E5 .....b.!...*b..
01C6F0: CD 7E 35 7D 32 0C 90 21 0F 90 CD 0A 05 CD 1D 05 .~5}2..!........
01C700: CD F2 18 CD 62 1F 21 BE 00 CD 38 16 21 19 9A CD ....b.!...8.!...
01C710: DB 17 CD 62 1F C3 6E 37 CD 52 16 21 07 00 CD F2 ...b..n7.R.!....
01C720: 18 CD 62 1F 21 13 9A CD 0A 05 CD 6D 08 E5 21 02 ..b.!......m..!.
01C730: 00 D1 CD 45 06 7A B3 CA 5F 37 D5 22 11 9A CD 52 ...E.z.._7."...R
01C740: 16 21 08 00 CD F2 18 21 20 00 CD F2 18 21 08 00 .!.....! ....!..
01C750: CD F2 18 CD 62 1F 2A 11 9A 2B D1 1B C3 35 37 21 ....b.*..+...57!
01C760: BE 00 CD 38 16 21 19 9A CD DB 17 CD 62 1F CD 81 ...8.!......b...
01C770: 35 E5 2A 19 9A 26 00 E5 CD 51 05 21 24 00 CD 61 5.*..&...Q.!$..a
01C780: 05 21 30 00 E5 21 39 00 CD 6B 05 CD 1C 13 7D EE .!0..!9..k....}.
01C790: 01 6F D1 7D B3 6F CB 45 CA 02 36 C9 2A 19 9A 26 .o.}.o.E..6.*..&
01C7A0: 00 E5 21 0D 00 D1 CD 61 06 CB 45 CA 07 38 CD 52 ..!....a..E..8.R
01C7B0: 16 2A 19 9A 26 00 E5 CD 12 34 21 00 00 CD 71 19 .*..&....4!...q.
01C7C0: 21 20 00 CD F2 18 CD 62 1F 2A 1C 9A CD 0A 05 2A ! .....b.*.....*
01C7D0: 19 9A 26 00 65 2E 01 E5 CD 07 08 06 FF 2A 1C 9A ..&.e........*..
01C7E0: CD B2 05 CD 81 35 CB 45 CA F5 37 21 0D 00 7D 32 .....5.E..7!..}2
01C7F0: 19 9A C3 04 38 21 BE 00 CD 38 16 21 19 9A CD DB ....8!...8.!....
01C800: 17 CD 62 1F C3 9C 37 C9 FD E1 E1 22 1A 9A E1 22 ..b...7...."..."
01C810: 1C 9A FD E5 CD 1D 05 00 06 FF 2A 1C 9A CD B2 05 ..........*.....
01C820: 21 00 00 7D 32 1E 9A 21 BE 00 CD 38 16 21 19 9A !..}2..!...8.!..
01C830: CD DB 17 CD 62 1F 2A 19 9A 26 00 CD 28 1F E5 CD ....b.*..&..(...
01C840: 51 05 21 2D 00 CD 61 05 21 41 00 E5 21 5A 00 CD Q.!-..a.!A..!Z..
01C850: 6B 05 CD 1C 13 CB 45 CA 69 38 2A 19 9A 26 00 CD k.....E.i8*..&..
01C860: 28 1F 7D 32 1E 9A C3 9F 38 2A 19 9A 26 00 CD 28 (.}2....8*..&..(
01C870: 1F E5 CD 51 05 21 30 00 E5 21 39 00 CD 6B 05 21 ...Q.!0..!9..k.!
01C880: 24 00 CD 61 05 CD 1C 13 CB 45 CA 93 38 CD BA 35 $..a.....E..8..5
01C890: C3 96 38 CD 9C 37 CD 52 16 CD 90 19 CD 62 1F 2A ..8..7.R.....b.*
01C8A0: 1E 9A 26 00 C9 C3 BC 39 2A 8D 98 2B 22 8D 98 2A ..&....9*..+"..*
01C8B0: 8D 98 E5 21 00 00 D1 CD 4E 06 CB 45 CA D1 38 21 ...!....N..E..8!
01C8C0: 19 00 22 8D 98 CD 52 16 21 2A 00 CD F2 18 CD 62 .."...R.!*.....b
01C8D0: 1F 21 24 99 E5 CD 6B 20 21 8F 98 E5 CD 6B 20 21 .!$...k !....k !
01C8E0: 24 99 CD 0A 05 21 8F 98 CD 0A 05 CD BD 06 7D 32 $....!........}2
01C8F0: 09 A0 C9 2A 0C 9A 11 95 00 CD 15 14 CD 62 1F 2A ...*.........b.*
01C900: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01C910: 18 00 01 00 02 09 52 E5 18 00 41 02 00 00 00 02 ......R...A.....
01C920: 18 00 46 02 00 00 00 02 18 00 42 02 00 00 00 02 ..F.......B.....
01C930: 18 00 47 02 00 00 00 02 18 00 43 02 00 00 00 02 ..G.......C.....
01C940: 18 00 48 02 00 00 00 02 18 00 44 02 00 00 00 02 ..H.......D.....
01C950: 18 00 49 02 00 00 00 02 18 00 45 02 00 00 00 02 ..I.......E.....
01C960: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C970: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C980: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C990: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C9A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C9B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C9C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C9D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C9E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01C9F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01CA00: 00 CD 5C 06 E5 2A 22 97 26 00 D1 7D A3 6F 7D EE ..\..*".&..}£o}.
01CA10: 01 6F CB 45 CA 28 41 21 0F 90 CD 0A 05 06 FF 2A .o.E.(A!.......*
01CA20: 64 90 CD B2 05 C3 5B 41 2A 0C 90 26 00 E5 21 2D d.....[A*..&..!-
01CA30: 00 D1 CD 4E 06 CB 45 CA 5B 41 CD 1D 05 00 06 FF ...N..E.[A......
01CA40: 2A 64 90 CD B2 05 21 5F 92 CD 0A 05 CD 52 16 21 *d....!_.....R.!
01CA50: 00 00 CD 71 19 CD 90 19 CD 62 1F C9 FD E1 E1 22 ...q.....b....."
01CA60: 06 90 E1 22 08 90 E1 22 0A 90 FD E5 2A 22 97 26 ..."..."....*".&
01CA70: 00 CB 45 CA 9A 41 2A 0A 90 6E 26 00 E5 21 00 00 ..E..A*..n&..!..
01CA80: D1 CD 4E 06 CB 45 CA 93 41 21 00 00 7D 32 03 90 ..N..E..A!..}2..
01CA90: C3 9A 41 21 01 00 7D 32 03 90 21 03 90 E5 CD 15 ..A!..}2..!.....
01CAA0: 3D 2A 03 90 26 00 7D EE 01 6F CB 45 CA C9 41 21 =*..&.}..o.E..A!
01CAB0: 00 00 EB 2A 0A 90 73 CD 1D 05 00 06 FF 2A 08 90 ...*..s......*..
01CAC0: CD B2 05 CD E4 3C C3 84 43 2A 22 97 26 00 CB 45 .....<..C*".&..E
01CAD0: CA F7 41 2A 0A 90 6E 26 00 E5 21 01 00 D1 CD 4E ..A*..n&..!....N
01CAE0: 06 CB 45 CA F0 41 21 01 00 7D 32 03 90 C3 F7 41 ..E..A!..}2....A
01CAF0: 21 00 00 7D 32 03 90 21 03 90 E5 CD 15 3D 21 00 !..}2..!.....=!.
01CB00: 00 7D 32 02 90 2A 22 97 26 00 CB 45 CA 5E 42 2A .}2..*".&..E.^B*
01CB10: 03 90 26 00 E5 2A 0A 90 6E 26 00 E5 21 01 00 D1 ..&..*..n&..!...
01CB20: CD 61 06 D1 7D A3 6F CB 45 CA 36 42 21 01 00 7D .a..}£o.E.6B!..}
01CB30: 32 02 90 C3 5E 42 2A 03 90 26 00 7D EE 01 6F E5 2...^B*..&.}..o.
01CB40: 2A 0A 90 6E 26 00 E5 21 01 00 D1 CD 4E 06 D1 7D *..n&..!....N..}
01CB50: A3 6F CB 45 CA 5E 42 21 01 00 7D 32 02 90 2A 03 £o.E.^B!..}2..*.
01CB60: 90 26 00 CB 45 CA 73 42 21 01 00 EB 2A 0A 90 73 .&..E.sB!...*..s
01CB70: C3 7B 42 21 02 00 EB 2A 0A 90 73 2A 0A 90 6E 26 .{B!...*..s*..n&
01CB80: 00 E5 21 01 00 D1 CD 4E 06 CB 45 CA CA 42 2A 02 ..!....N..E..B*.
01CB90: 90 26 00 CB 45 CA A4 42 CD 1D 05 00 06 FF 2A 08 .&..E..B......*.
01CBA0: 90 CD B2 05 21 0E 92 CD 0A 05 CD 52 16 21 00 00 ....!......R.!..
01CBB0: CD 71 19 21 20 00 CD F2 18 CD 62 1F 2A 08 90 E5 .q.! .....b.*...
01CBC0: 2A 06 90 E5 CD F8 3F C3 84 43 2A 02 90 26 00 CB *.....?..C*..&..
01CBD0: 45 CA E0 42 CD 1D 05 00 06 FF 2A 08 90 CD B2 05 E..B......*.....
01CBE0: 21 BD 91 CD 0A 05 CD 52 16 21 00 00 CD 71 19 21 !......R.!...q.!
01CBF0: 20 00 CD F2 18 CD 62 1F 2A 22 97 26 00 E5 2A 08 .....b.*".&..*.
01CC00: 05 CD E4 3C C3 0E 4B 21 02 00 E5 CD EC 3C 21 07 ...<..K!.....<!.
01CC10: 00 E5 21 E8 97 01 02 00 CD 2D 05 CD 1C 13 CB 45 ..!......-.....E
01CC20: CA 39 4B CD C4 3C 2A 4B 8F 11 69 00 19 E5 21 06 .9K..<*K..i...!.
01CC30: 00 2B E5 CD F8 3F C3 3C 4B CD E4 3C 21 08 00 E5 .+...?.<K..<!...
01CC40: 21 E8 97 01 02 00 CD 2D 05 CD 1C 13 CB 45 CA A7 !......-.....E..
01CC50: 4B CD C4 3C 2A 4B 8F 11 5B 00 19 E5 21 06 00 2B K..<*K..[...!..+
01CC60: E5 CD F8 3F 2A 4B 8F 11 5B 00 19 CD 0A 05 CD 1D ...?*K..[.......
01CC70: 05 00 CD 6F 06 CB 45 CA 90 4B CD C4 3C 2A 4B 8F ...o..E..K..<*K.
01CC80: 11 61 00 19 E5 21 06 00 2B E5 CD F8 3F C3 A4 4B .a...!..+...?..K
01CC90: 2A 4B 8F 11 61 00 19 E5 CD 1D 05 00 06 05 CD D1 *K..a...........
01CCA0: 05 CD E4 3C C3 AE 4B 21 02 00 E5 CD EC 3C 21 0A ...<..K!.....<!.
01CCB0: 00 E5 21 E8 97 01 02 00 CD 2D 05 CD 1C 13 CB 45 ..!......-.....E
01CCC0: CA FA 4B CD C4 3C 2A 4B 8F 11 7C 00 19 E5 21 01 ..K..<*K..|...!.
01CCD0: 00 E5 21 00 01 E5 21 00 00 E5 CD 64 3F CD C4 3C ..!...!....d?..<
01CCE0: 2A 4B 8F 11 7B 00 19 E5 21 01 00 E5 21 00 01 E5 *K..{...!...!...
01CCF0: 21 00 00 E5 CD 64 3F C3 01 4C 21 02 00 E5 CD EC !....d?..L!.....
01CD00: 3C 21 04 00 E5 21 E8 97 01 02 00 CD 2D 05 CD 1C <!...!......-...
01CD10: 13 E5 2A 4B 8F 11 80 00 19 CD 0A 05 CD 1D 05 00 ..*K............
01CD20: CD 6F 06 D1 7D A3 6F CB 45 CA 49 4C CD C4 3C 2A .o..}£o.E.IL..<*
01CD30: 4B 8F 11 4B 00 19 E5 21 00 00 E5 21 0F 27 E5 21 K..K...!...!.'.!
01CD40: 00 00 E5 CD 1B 3E C3 4C 4C CD E4 3C 21 05 00 E5 .....>.LL..<!...
01CD50: 21 E8 97 01 02 00 CD 2D 05 CD 1C 13 E5 2A 4B 8F !......-.....*K.
01CD60: 11 4D 00 19 CD 0A 05 CD 1D 05 00 CD 6F 06 D1 7D .M..........o..}
01CD70: A3 6F E5 21 06 00 E5 21 E8 97 01 02 00 CD 2D 05 £o.!...!......-.
01CD80: CD 1C 13 E5 2A 4B 8F 11 75 00 19 CD 0A 05 CD 1D ....*K..u.......
01CD90: 05 00 CD 6F 06 D1 7D A3 6F D1 7D B3 6F CB 45 CA ...o..}£o.}.o.E.
01CDA0: BF 4C CD C4 3C 2A 4B 8F 11 59 00 19 E5 21 00 00 .L..<*K..Y...!..
01CDB0: E5 21 0F 27 E5 21 00 00 E5 CD 1B 3E C3 D2 4C 2A .!.'.!.....>..L*
01CDC0: 4B 8F 11 59 00 19 E5 21 00 00 EB E1 73 23 72 CD K..Y...!....s#r.
01CDD0: E4 3C 21 07 00 E5 21 E8 97 01 02 00 CD 2D 05 CD .<!...!......-..
01CDE0: 1C 13 E5 2A 4B 8F 11 69 00 19 CD 0A 05 CD 1D 05 ...*K..i........
01CDF0: 00 CD 6F 06 D1 7D A3 6F E5 21 08 00 E5 21 E8 97 ..o..}£o.!...!..
01CE00: 90 CD 0A 05 CD 1D 05 00 CD 6F 06 D1 7D A3 6F CB .........o..}£o.
01CE10: 45 CA 3E 43 2A 08 90 CD 0A 05 CD 52 16 21 00 00 E.>C*......R.!..
01CE20: CD 71 19 21 20 00 CD F2 18 21 89 95 CD 0A 05 21 .q.! ....!.....!
01CE30: 00 00 CD 71 19 21 20 00 CD F2 18 CD 62 1F 2A 06 ...q.! .....b.*.
01CE40: 90 2B E5 CD 9D 3F 21 60 8F E5 CD 91 3A CD 52 16 .+...?!`....:.R.
01CE50: CD 90 19 CD 62 1F 21 60 8F CD 0A 05 CD 1D 05 00 ....b.!`........
01CE60: CD 6F 06 E5 2A 22 97 26 00 7D EE 01 6F D1 7D B3 .o..*".&.}..o.}.
01CE70: 6F CB 45 CA 84 43 21 60 8F CD 0A 05 06 FF 2A 08 o.E..C!`......*.
01CE80: 90 CD B2 05 C9 FD E1 E1 22 5E 8F FD E5 2A 5E 8F ........"^...*^.
01CE90: 22 5C 8F 2A 5C 8F 11 80 00 19 CD 0A 05 CD 1D 05 "\.*\...........
01CEA0: 00 CD 5C 06 CB 45 CA BD 43 2A 5C 8F 11 36 00 19 ..\..E..C*\..6..
01CEB0: E5 CD 1D 05 00 06 0F CD D1 05 C3 CA 44 2A 5C 8F ............D*\.
01CEC0: 11 46 00 19 6E 26 00 CB 45 CA DE 43 21 00 00 65 .F..n&..E..C!..e
01CED0: 2E 01 E5 06 03 21 58 8F CD B2 05 C3 FF 43 CD 1D .....!X......C..
01CEE0: 05 03 30 30 30 21 01 00 E5 2A 5C 8F 11 93 00 19 ..000!...*\.....
01CEF0: 5E 23 56 EB CD 35 08 06 03 21 58 8F CD B2 05 2A ^#V..5...!X....*
01CF00: 5C 8F 11 36 00 19 E5 2A 5C 8F 11 80 00 19 CD 0A \..6...*\.......
01CF10: 05 21 58 8F CD 0A 05 CD 07 08 2A 5C 8F 11 86 00 .!X.......*\....
01CF20: 19 CD 0A 05 CD 07 08 21 58 8F CD 0A 05 CD 07 08 .......!X.......
01CF30: 2A 5C 8F 11 8C 00 19 CD 0A 05 CD 07 08 06 0F CD *\..............
01CF40: D1 05 2A 5C 8F 11 80 00 19 CD 0A 05 CD 6D 08 E5 ..*\.........m..
01CF50: 21 58 8F CD 0A 05 CD 6D 08 D1 19 22 56 8F 2A 56 !X.....m..."V.*V
01CF60: 8F E5 2A 5C 8F 11 86 00 19 CD 0A 05 CD 6D 08 D1 ..*\.........m..
01CF70: 19 E5 21 58 8F CD 0A 05 CD 6D 08 D1 19 22 54 8F ..!X.....m..."T.
01CF80: 2A 5C 8F 11 92 00 19 6E 26 00 CB 45 CA AE 44 2A *\.....n&..E..D*
01CF90: 5C 8F 11 47 00 19 E5 2A 56 8F EB E1 73 2A 5C 8F \..G...*V...s*\.
01CFA0: 11 48 00 19 E5 2A 54 8F EB E1 73 C3 CA 44 2A 5C .H...*T...s..D*\
01CFB0: 8F 11 47 00 19 E5 2A 54 8F EB E1 73 2A 5C 8F 11 ..G...*T...s*\..
01CFC0: 48 00 19 E5 2A 56 8F EB E1 73 C9 FD E1 E1 22 52 H...*V...s...."R
01CFD0: 8F FD E5 2A 52 8F E5 21 95 00 E5 21 00 00 CD F3 ...*R..!...!....
01CFE0: 1E 2A 52 8F 22 50 8F 2A 50 8F 11 7D 00 19 E5 21 .*R."P.*P..}...!
01CFF0: 01 00 EB E1 73 2A 50 8F 11 7E 00 19 E5 21 01 00 ....s*P..~...!..
01D000: 01 02 00 CD 2D 05 CD 1C 13 E5 2A 4B 8F 11 5B 00 ....-.....*K..[.
01D010: 19 CD 0A 05 CD 1D 05 00 CD 6F 06 D1 7D A3 6F D1 .........o..}£o.
01D020: 7D B3 6F CB 45 CA 45 4D CD C4 3C 2A 4B 8F 11 67 }.o.E.EM..<*K..g
01D030: 00 19 E5 21 00 00 E5 21 0F 27 E5 21 00 00 E5 CD ...!...!.'.!....
01D040: 1B 3E C3 58 4D 2A 4B 8F 11 67 00 19 E5 21 00 00 .>.XM*K..g...!..
01D050: EB E1 73 23 72 CD E4 3C 2A 4D 8F 26 00 C9 21 01 ..s#r..<*M.&..!.
01D060: 00 E5 21 1E 00 D1 CD 35 06 7A B3 CA 84 4D D5 22 ..!....5.z...M."
01D070: 47 8F CD 52 16 CD 90 19 CD 62 1F 2A 47 8F 23 D1 G..R.....b.*G.#.
01D080: 1B C3 69 4D 21 01 93 CD 0A 05 CD 52 16 21 00 00 ..iM!......R.!..
01D090: CD 71 19 CD 90 19 CD 62 1F CD 52 16 CD 90 19 CD .q.....b..R.....
01D0A0: 62 1F C9 C3 C0 4E C3 F7 4D FD E1 E1 22 88 8E FD b....N..M..."...
01D0B0: E5 2A 36 8F E5 2A 88 8E D1 19 22 36 8F 2A 36 8F .*6..*...."6.*6.
01D0C0: E5 2A 34 8F D1 CD 9B 06 CB 45 CA D6 4D 21 01 00 .*4......E..M!..
01D0D0: 22 36 8F C3 EC 4D 2A 36 8F E5 21 01 00 D1 CD AF "6...M*6..!.....
01D0E0: 06 CB 45 CA EC 4D 2A 34 8F 22 36 8F CD 5E 4D 21 ..E..M*4."6..^M!
01D0F0: 01 00 7D 32 8D 8E C9 21 00 00 7D 32 8D 8E 2A 34 ..}2...!..}2..*4
01D100: 8F E5 21 01 00 D1 CD 9B 06 CB 45 CA BA 4E CD 52 ..!.......E..N.R
01D110: 16 CD 90 19 CD 62 1F 21 52 93 CD 0A 05 CD 52 16 .....b.!R.....R.
01D120: 21 00 00 CD 71 19 CD 62 1F 21 BE 00 CD 38 16 21 !...q..b.!...8.!
01D130: 8A 8E CD DB 17 CD 62 1F 2A 8A 8E 26 00 E5 CD 51 ......b.*..&...Q
01D140: 05 21 03 00 CD 61 05 21 12 00 CD 61 05 21 11 00 .!...a.!...a.!..
01D150: CD 61 05 21 0D 00 CD 61 05 CD 1C 13 CB 45 CA 29 .a.!...a.....E.)
01D160: 4E 2A 8A 8E 26 00 11 03 00 B7 ED 52 C2 79 4E 21 N*..&......R.yN!
01D170: 01 00 E5 CD A9 4D C3 BA 4E 19 11 12 00 B7 ED 52 .....M..N......R
01D180: C2 8D 4E 21 FF FF E5 CD A9 4D C3 BA 4E 19 11 11 ..N!.....M..N...
01D190: 00 B7 ED 52 C2 A7 4E 2A DF 97 26 00 7D EE 01 6F ...R..N*..&.}..o
01D1A0: 7D 32 46 8F C3 BA 4E 19 11 0D 00 B7 ED 52 C2 BA }2F...N......R..
01D1B0: 4E CD 52 16 CD 90 19 CD 62 1F 2A 8D 8E 26 00 C9 N.R.....b.*..&..
01D1C0: 21 01 00 7D 32 46 8F 21 01 00 E5 2A 7E A0 E5 21 !..}2F.!...*~..!
01D1D0: 1B 00 D1 CD DE 06 E5 CD 2F 21 22 3C 8F 2A 7E A0 ......../!"<.*~.
01D1E0: E5 21 1B 00 E5 2A 3C 8F D1 CD C4 06 D1 EB B7 ED .!...*<.........
01D1F0: 52 E5 21 19 00 D1 CD 9B 06 CB 45 CA 05 4F 2A 3C R.!.......E..O*<
01D200: EB E1 73 2A 50 8F 11 46 00 19 E5 21 01 00 EB E1 ..s*P..F...!....
01D210: 73 C9 21 DA 95 E5 21 EA 97 CD 0A 05 CD 3C 13 CD s.!...!......<..
01D220: 62 1F 21 DA 95 CD CF 13 CD 35 1F E5 21 00 00 D1 b.!......5..!...
01D230: CD 61 06 CB 45 CA 75 45 CD 1D 05 36 46 69 6C 65 .a..E.uE...6File
01D240: 20 43 6F 6E 74 61 69 6E 69 6E 67 20 6D 65 73 73 Containing mess
01D250: 61 67 65 73 20 66 6F 72 20 74 68 69 73 20 70 72 ages for this pr
01D260: 6F 67 72 61 6D 20 69 73 20 6E 6F 74 20 66 6F 75 ogram is not fou
01D270: 6E 64 CD B3 20 21 DA 95 E5 21 65 00 E5 21 5F 92 nd.. !...!e..!_.
01D280: E5 CD 48 31 21 52 93 E5 CD B0 3C 21 B0 92 E5 CD ..H1!R....<!....
01D290: B0 3C 21 89 95 E5 CD B0 3C 21 F4 93 E5 CD B0 3C .<!.....<!.....<
01D2A0: 21 06 91 E5 CD B0 3C 21 28 97 E5 21 01 00 D1 19 !.....<!(..!....
01D2B0: E5 21 06 91 E5 21 01 00 D1 19 6E 26 00 CD 28 1F .!...!....n&..(.
01D2C0: EB E1 73 21 06 91 E5 CD B0 3C 21 28 97 E5 21 00 ..s!.....<!(..!.
01D2D0: 00 D1 19 E5 21 06 91 E5 21 01 00 D1 19 6E 26 00 ....!...!....n&.
01D2E0: CD 28 1F EB E1 73 21 BD 91 E5 CD B0 3C 21 0E 92 .(...s!.....<!..
01D2F0: E5 CD B0 3C 21 E7 94 E5 CD B0 3C 21 96 94 E5 CD ...<!.....<!....
01D300: B0 3C 21 45 94 E5 CD B0 3C C9 21 8A 96 22 4B 8F .<!E....<.!.."K.
01D310: 21 A3 93 E5 CD B0 3C 21 00 00 7D 32 24 97 2A 24 !£....<!..}2$.*$
01D320: 97 26 00 7D EE 01 6F CB 45 CA DE 46 21 A3 93 CD .&.}..o.E..F!£..
01D330: 0A 05 CD 52 16 21 00 00 CD 71 19 21 20 00 CD F2 ...R.!...q.! ...
01D340: 18 CD 62 1F 2A 22 97 26 00 CB 45 CA 78 46 2A 4B ..b.*".&..E.xF*K
01D350: 8F CD 0A 05 CD 52 16 21 00 00 CD 71 19 21 20 00 .....R.!...q.! .
01D360: CD F2 18 21 89 95 CD 0A 05 21 00 00 CD 71 19 21 ...!.....!...q.!
01D370: 20 00 CD F2 18 CD 62 1F 21 15 00 2B E5 CD 9D 3F .....b.!..+...?
01D380: 21 38 95 E5 CD 91 3A 21 38 95 CD 0A 05 CD 1D 05 !8....:!8.......
01D390: 00 CD 6F 06 7D 32 4D 8F 21 38 95 CD 0A 05 CD 1D ..o.}2M.!8......
01D3A0: 05 00 CD 6F 06 E5 2A 22 97 26 00 D1 7D B3 6F CB ...o..*".&..}.o.
01D3B0: 45 CA DB 46 21 01 00 7D 32 24 97 21 38 95 CD 0A E..F!..}2$.!8...
01D3C0: 05 CD 1D 05 00 CD 6F 06 CB 45 CA DB 46 21 38 95 ......o..E..F!8.
01D3D0: CD 0A 05 06 14 2A 4B 8F CD B2 05 C3 1E 46 21 00 .....*K......F!.
01D3E0: 00 E5 21 E8 97 01 02 00 CD 2D 05 CD 1C 13 CB 45 ..!......-.....E
01D3F0: CA AB 47 21 02 00 E5 21 E8 97 01 02 00 CD 2D 05 ..G!...!......-.
01D400: 8F 23 22 3C 8F 21 DF 8E E5 CD B0 3C 21 DF 8E E5 .#"<.!.....<!...
01D410: 21 00 00 D1 19 E5 21 14 00 E5 21 DF 8E CD 0A 05 !.....!...!.....
01D420: CD 6D 08 E5 CD 00 21 EB E1 73 21 8E 8E E5 CD B0 .m....!..s!.....
01D430: 3C 21 8E 8E E5 21 00 00 D1 19 E5 21 14 00 E5 21 <!...!.....!...!
01D440: 8E 8E CD 0A 05 CD 6D 08 E5 CD 00 21 EB E1 73 21 ......m....!..s!
01D450: 2A 97 CD 55 1B E5 21 02 00 D1 19 22 42 8F 2A 42 *..U..!...."B.*B
01D460: 8F E5 21 02 00 D1 CD 9B 06 CB 45 CA 7A 51 21 01 ..!.......E.zQ!.
01D470: 00 22 36 8F 2A 42 8F 2B E5 21 10 00 E5 2A 3C 8F ."6.*B.+.!...*<.
01D480: D1 CD C4 06 D1 CD DE 06 23 22 34 8F 2A 42 8F 2B ........#"4.*B.+
01D490: E5 2A 34 8F D1 CD DE 06 23 22 40 8F 2A 40 8F 2B .*4.....#"@.*@.+
01D4A0: E5 21 10 00 D1 CD DE 06 23 22 3A 8F 2A 36 8F E5 .!......#":.*6..
01D4B0: 2A 34 8F D1 CD 61 06 CB 45 CA D4 4F 2A 36 8F E5 *4...a..E..O*6..
01D4C0: 2A 40 8F D1 CD C4 06 2B 22 3E 8F 2A 40 8F 22 38 *@.....+">.*@."8
01D4D0: 8F C3 F3 4F 2A 42 8F 2B 22 3E 8F 2A 42 8F E5 2A ...O*B.+">.*B..*
01D4E0: 36 8F 2B E5 2A 40 8F D1 CD C4 06 D1 EB B7 ED 52 6.+.*@.........R
01D4F0: 22 38 8F 2A 38 8F 2B E5 2A 3A 8F D1 CD DE 06 23 "8.*8.+.*:.....#
01D500: 22 38 8F 21 00 00 E5 2A 38 8F 2B D1 CD 35 06 7A "8.!...*8.+..5.z
01D510: B3 CA 6E 51 D5 22 32 8F 21 00 00 E5 2A 3A 8F 2B ..nQ."2.!...*:.+
01D520: D1 CD 35 06 7A B3 CA 5C 51 D5 22 30 8F 2A 36 8F ..5.z..\Q."0.*6.
01D530: 2B E5 2A 40 8F D1 CD C4 06 E5 2A 30 8F E5 2A 38 +.*@......*0..*8
01D540: 8F D1 CD C4 06 D1 19 E5 2A 32 8F D1 19 22 25 97 ........*2..."%.
01D550: 2A 25 97 E5 2A 3E 8F D1 CD 87 06 CB 45 CA 53 51 *%..*>......E.SQ
01D560: CD 52 16 2A 25 97 23 E5 21 03 00 CD F6 18 CD 81 .R.*%.#.!.......
01D570: 19 02 29 20 CD 62 1F 2A 36 8F E5 2A 34 8F D1 CD ..) .b.*6..*4...
01D580: 61 06 E5 2A 3E 8F E5 2A 25 97 D1 EB B7 ED 52 E5 a..*>..*%.....R.
01D590: 21 02 00 D1 CD 74 06 D1 7D B3 6F CB 45 CA CD 50 !....t..}.o.E..P
01D5A0: 21 2A 97 E5 2A 25 97 CD CD 1A CD 62 1F 21 2A 97 !*..*%.....b.!*.
01D5B0: CD 38 16 21 8A 96 CD B3 19 CD 62 1F 21 8A 96 CD .8.!......b.!...
01D5C0: 0A 05 06 14 21 A8 91 CD B2 05 C3 0B 51 2A 3E 8F ....!.......Q*>.
01D5D0: E5 2A 25 97 D1 EB B7 ED 52 11 01 00 B7 ED 52 C2 .*%.....R.....R.
01D5E0: F3 50 21 DF 8E CD 0A 05 06 14 21 A8 91 CD B2 05 .P!.......!.....
01D5F0: C3 0B 51 19 11 00 00 B7 ED 52 C2 0B 51 21 8E 8E ..Q......R..Q!..
01D600: CD 1C 13 CB 45 CA 23 47 2A 4B 8F 11 7D 00 19 E5 ....E.#G*K..}...
01D610: 2A 4B 8F 11 16 00 19 E5 21 10 00 2B E5 CD 5C 41 *K......!..+..\A
01D620: C3 A8 47 2A 4B 8F 11 7D 00 19 6E 26 00 E5 21 01 ..G*K..}..n&..!.
01D630: 00 D1 CD 4E 06 7D 32 20 97 21 20 97 E5 CD 15 3D ...N.}2 .! ....=
01D640: 2A 20 97 26 00 CB 45 CA 86 47 2A 4B 8F 11 7D 00 * .&..E..G*K..}.
01D650: 19 E5 21 01 00 EB E1 73 21 0E 92 CD 0A 05 CD 52 ..!....s!......R
01D660: 16 21 00 00 CD 71 19 21 20 00 CD F2 18 CD 62 1F .!...q.! .....b.
01D670: 2A 4B 8F 11 16 00 19 E5 21 10 00 2B E5 CD F8 3F *K......!..+...?
01D680: CD E4 3C C3 A8 47 2A 4B 8F 11 7D 00 19 E5 21 00 ..<..G*K..}...!.
01D690: 00 EB E1 73 2A 4B 8F 11 16 00 19 E5 CD 1D 05 00 ...s*K..........
01D6A0: 06 0F CD D1 05 CD E4 3C C3 B2 47 21 02 00 E5 CD .......<..G!....
01D6B0: EC 3C 21 01 00 E5 21 E8 97 01 02 00 CD 2D 05 CD .<!...!......-..
01D6C0: 1C 13 CB 45 CA 7F 48 21 03 00 E5 21 E8 97 01 02 ...E..H!...!....
01D6D0: 00 CD 2D 05 CD 1C 13 CB 45 CA F7 47 2A 4B 8F 11 ..-.....E..G*K..
01D6E0: 7E 00 19 E5 2A 4B 8F 11 26 00 19 E5 21 10 00 2B ~...*K..&...!..+
01D6F0: E5 CD 5C 41 C3 7C 48 2A 4B 8F 11 7E 00 19 6E 26 ..\A.|H*K..~..n&
01D700: 00 E5 21 01 00 D1 CD 4E 06 7D 32 20 97 21 20 97 ..!....N.}2 .! .
01D710: E5 CD 15 3D 2A 20 97 26 00 CB 45 CA 5A 48 2A 4B ...=* .&..E.ZH*K
01D720: 8F 11 7E 00 19 E5 21 01 00 EB E1 73 21 0E 92 CD ..~...!....s!...
01D730: 0A 05 CD 52 16 21 00 00 CD 71 19 21 20 00 CD F2 ...R.!...q.! ...
01D740: 18 CD 62 1F 2A 4B 8F 11 26 00 19 E5 21 10 00 2B ..b.*K..&...!..+
01D750: E5 CD F8 3F CD E4 3C C3 7C 48 2A 4B 8F 11 7E 00 ...?..<.|H*K..~.
01D760: 19 E5 21 00 00 EB E1 73 2A 4B 8F 11 26 00 19 E5 ..!....s*K..&...
01D770: CD 1D 05 00 06 0F CD D1 05 CD E4 3C C3 86 48 21 ...........<..H!
01D780: 02 00 E5 CD EC 3C 21 04 00 E5 21 E8 97 01 02 00 .....<!...!.....
01D790: CD 2D 05 CD 1C 13 CB 45 CA DE 49 CD C4 3C 2A 4B .-.....E..I..<*K
01D7A0: 8F 11 80 00 19 E5 21 06 00 2B E5 CD F8 3F 2A 4B ......!..+...?*K
01D7B0: 8F 11 80 00 19 CD 0A 05 CD 1D 05 00 CD 5C 06 CB .............\..
01D7C0: 45 CA 28 49 21 07 00 E5 CD EC 3C 2A 4B 8F 11 86 E.(I!.....<*K...
01D7D0: 00 19 E5 CD 1D 05 00 06 05 CD D1 05 2A 4B 8F 11 ............*K..
01D7E0: 8C 00 19 E5 CD 1D 05 00 06 05 CD D1 05 2A 4B 8F .............*K.
01D7F0: 11 4A 00 19 E5 21 00 00 EB E1 73 2A 4B 8F 11 49 .J...!....s*K..I
01D800: CD 0A 05 06 14 21 A8 91 CD B2 05 21 A8 91 CD 0A .....!.....!....
01D810: 05 CD 52 16 21 00 00 CD 71 19 CD 62 1F 2A 30 8F ..R.!...q..b.*0.
01D820: E5 2A 3A 8F 2B D1 CD AF 06 CB 45 CA 53 51 CD 52 .*:.+.....E.SQ.R
01D830: 16 CD 1D 05 00 21 15 00 E5 21 A8 91 CD 0A 05 CD .....!...!......
01D840: 6D 08 D1 EB B7 ED 52 E5 21 01 00 D1 19 CD 71 19 m.....R.!.....q.
01D850: CD 62 1F 2A 30 8F 23 D1 1B C3 24 50 CD 52 16 CD .b.*0.#...$P.R..
01D860: 90 19 CD 62 1F 2A 32 8F 23 D1 1B C3 0F 50 CD A6 ...b.*2.#....P..
01D870: 4D 7D EE 01 6F CB 45 CA AC 4F 2A 46 8F 26 00 C9 M}..o.E..O*F.&..
01D880: FD E1 E1 22 E6 97 01 02 00 21 E8 97 CD E2 05 06 ...".....!......
01D890: 50 21 EA 97 CD B2 05 06 50 21 3B 98 CD B2 05 FD P!......P!;.....
01D8A0: E5 21 01 00 7D 32 8C 98 21 2A 97 E5 21 3B 98 CD .!..}2..!*..!;..
01D8B0: 0A 05 CD 3D 13 21 2A 97 11 95 00 CD 15 14 CD 35 ...=.!*........5
01D8C0: 1F E5 21 00 00 D1 CD 61 06 CB 45 CA DA 51 21 2A ..!....a..E..Q!*
01D8D0: 97 11 95 00 CD 14 14 CD 62 1F CD 12 45 21 01 00 ........b...E!..
01D8E0: 7D 32 DF 97 21 00 00 7D 32 DE 97 21 2A 97 CD 55 }2..!..}2..!*..U
01D8F0: 1B E5 21 00 00 D1 CD 4E 06 7D 32 DC 97 21 FF 7F ..!....N.}2..!..
01D900: 22 DA 97 2A DC 97 26 00 CB 45 CA 13 52 CD E4 3C "..*..&..E..R..<
01D910: C3 1D 52 21 01 93 E5 CD B0 3C CD 5E 4D CD A3 4D ..R!.....<.^M.£M
01D920: 7D EE 01 6F CB 45 CA 33 52 21 00 00 7D 32 8C 98 }..o.E.3R!..}2..
01D930: C3 86 56 21 00 00 7D 32 22 97 2A DC 97 26 00 CB ..V!..}2".*..&..
01D940: 45 CA 54 52 21 00 00 22 25 97 21 02 00 E5 CD EC E.TR!.."%.!.....
01D950: 3C C3 08 53 CD 52 16 CD 90 19 CD 62 1F CD C4 3C <..S.R.....b...<
01D960: 21 25 97 E5 21 01 00 E5 21 2A 97 CD 55 1B E5 21 !%..!...!*..U..!
01D970: 02 00 D1 19 E5 21 FF FF E5 CD 1B 3E 2A DE 97 26 .....!.....>*..&
01D980: 00 CB 45 CA 90 52 21 00 00 7D 32 8C 98 C3 86 56 ..E..R!..}2....V
01D990: 2A 25 97 2B 22 25 97 2A 25 97 E5 21 2A 97 CD 55 *%.+"%.*%..!*..U
01D9A0: 1B D1 CD 4E 06 7D 32 DC 97 2A 25 97 E5 21 2A 97 ...N.}2..*%..!*.
01D9B0: CD 55 1B 23 D1 CD 4E 06 CB 45 CA 05 53 CD C4 3C .U.#..N..E..S..<
01D9C0: 21 25 97 E5 21 01 00 E5 21 2A 97 CD 55 1B E5 21 !%..!...!*..U..!
01D9D0: FF FF E5 CD 1B 3E 2A DE 97 26 00 CB 45 CA EA 52 .....>*..&..E..R
01D9E0: 21 00 00 7D 32 8C 98 C3 86 56 2A 25 97 2B 22 DA !..}2....V*%.+".
01D9F0: 97 21 01 00 7D 32 DD 97 21 00 00 7D 32 21 97 C3 .!..}2..!..}2!..
01DA00: 00 19 E5 21 00 00 EB E1 73 2A 4B 8F 11 92 00 19 ...!....s*K.....
01DA10: E5 21 01 00 EB E1 73 2A 4B 8F 11 46 00 19 E5 21 .!....s*K..F...!
01DA20: 01 00 EB E1 73 C3 DB 49 CD C4 3C 2A 4B 8F 11 86 ....s..I..<*K...
01DA30: 00 19 E5 21 06 00 2B E5 CD F8 3F CD C4 3C 2A 4B ...!..+...?..<*K
01DA40: 8F 11 8C 00 19 E5 21 06 00 2B E5 CD F8 3F 2A 4B ......!..+...?*K
01DA50: 8F 11 92 00 19 E5 CD 15 3D CD C4 3C 2A 4B 8F 11 ........=..<*K..
01DA60: 4A 00 19 E5 21 00 00 E5 21 FF 00 E5 21 00 00 E5 J...!...!...!...
01DA70: CD 64 3F CD C4 3C 2A 4B 8F 11 49 00 19 E5 21 00 .d?..<*K..I...!.
01DA80: 00 E5 21 FF 00 E5 21 00 00 E5 CD 64 3F 2A 4B 8F ..!...!....d?*K.
01DA90: 11 46 00 19 E5 CD 15 3D 2A 4B 8F 11 46 00 19 6E .F.....=*K..F..n
01DAA0: 26 00 7D EE 01 6F CB 45 CA C8 49 CD C4 3C 2A 4B &.}..o.E..I..<*K
01DAB0: 8F 11 93 00 19 E5 21 02 00 E5 21 03 00 E5 21 00 ......!...!...!.
01DAC0: 00 E5 CD 1B 3E C3 DB 49 2A 4B 8F 11 93 00 19 E5 ....>..I*K......
01DAD0: 21 01 00 EB E1 73 23 72 CD E4 3C C3 E5 49 21 08 !....s#r..<..I!.
01DAE0: 00 E5 CD EC 3C 21 05 00 E5 21 E8 97 01 02 00 CD ....<!...!......
01DAF0: 2D 05 CD 1C 13 CB 45 CA 95 4A CD C4 3C 2A 4B 8F -.....E..J..<*K.
01DB00: 11 4D 00 19 E5 21 06 00 2B E5 CD F8 3F 2A 4B 8F .M...!..+...?*K.
01DB10: 11 4D 00 19 CD 0A 05 CD 1D 05 00 CD 6F 06 CB 45 .M..........o..E
01DB20: CA 7A 4A 2A 4B 8F 11 53 00 19 CD 0A 05 CD 1D 05 .zJ*K..S........
01DB30: 00 CD 5C 06 7D 32 27 97 21 27 97 E5 CD 15 3D 2A ..\.}2'.!'....=*
01DB40: 27 97 26 00 7D EE 01 6F CB 45 CA 63 4A CD C4 3C '.&.}..o.E.cJ..<
01DB50: 2A 4B 8F 11 53 00 19 E5 21 06 00 2B E5 CD F8 3F *K..S...!..+...?
01DB60: C3 77 4A 2A 4B 8F 11 53 00 19 E5 CD 1D 05 00 06 .wJ*K..S........
01DB70: 05 CD D1 05 CD E4 3C C3 92 4A 2A 4B 8F 11 53 00 ......<..J*K..S.
01DB80: 19 E5 CD 1D 05 00 06 05 CD D1 05 21 02 00 E5 CD ...........!....
01DB90: EC 3C C3 9C 4A 21 03 00 E5 CD EC 3C 21 06 00 E5 .<..J!.....<!...
01DBA0: 21 E8 97 01 02 00 CD 2D 05 CD 1C 13 CB 45 CA 07 !......-.....E..
01DBB0: 4B CD C4 3C 2A 4B 8F 11 75 00 19 E5 21 06 00 2B K..<*K..u...!..+
01DBC0: E5 CD F8 3F 2A 4B 8F 11 75 00 19 CD 0A 05 CD 1D ...?*K..u.......
01DBD0: 05 00 CD 6F 06 CB 45 CA F0 4A CD C4 3C 2A 4B 8F ...o..E..J..<*K.
01DBE0: 11 6F 00 19 E5 21 06 00 2B E5 CD F8 3F C3 04 4B .o...!..+...?..K
01DBF0: 2A 4B 8F 11 6F 00 19 E5 CD 1D 05 00 06 05 CD D1 *K..o...........
01DC00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01DC10: 19 00 01 00 02 09 52 E5 19 00 41 02 00 00 00 02 ......R...A.....
01DC20: 19 00 46 02 00 00 00 02 19 00 42 02 00 00 00 02 ..F.......B.....
01DC30: 19 00 47 02 00 00 00 02 19 00 43 02 00 00 00 02 ..G.......C.....
01DC40: 19 00 48 02 00 00 00 02 19 00 44 02 00 00 00 02 ..H.......D.....
01DC50: 19 00 49 02 00 00 00 02 19 00 45 02 00 00 00 02 ..I.......E.....
01DC60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DC70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DC80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DC90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DCA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DCB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DCC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DCD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DCE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DCF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DD00: 7D 54 C3 08 53 CD E4 3C 21 00 00 7D 32 DF 97 2A }T..S..<!..}2..*
01DD10: DC 97 26 00 CB 45 CA 26 53 21 8A 96 E5 CD CB 44 ..&..E.&S!.....D
01DD20: CD E4 3C C3 49 53 21 2A 97 E5 2A 25 97 CD CD 1A ..<.IS!*..*%....
01DD30: CD 62 1F 21 2A 97 CD 38 16 21 8A 96 CD B3 19 CD .b.!*..8.!......
01DD40: 62 1F 21 22 97 E5 CD 15 3D 2A 22 97 26 00 E5 2A b.!"....=*".&..*
01DD50: DC 97 26 00 D1 7D B3 6F CB 45 CA 7C 53 CD 0A 46 ..&..}.o.E.|S..F
01DD60: 7D 32 DD 97 21 00 00 7D 32 22 97 21 21 97 E5 CD }2..!..}2".!!...
01DD70: 15 3D 21 8A 96 E5 CD 85 43 C3 91 53 21 01 00 7D .=!.....C..S!..}
01DD80: 32 21 97 21 00 00 7D 32 DD 97 21 1B 00 E5 CD EC 2!.!..}2..!.....
01DD90: 3C 21 01 00 7D 32 22 97 2A 21 97 26 00 CB 45 CA <!..}2".*!.&..E.
01DDA0: 61 54 21 09 00 E5 21 E8 97 01 02 00 CD 2D 05 CD aT!...!......-..
01DDB0: 1C 13 E5 21 0B 00 E5 21 E8 97 01 02 00 CD 2D 05 ...!...!......-.
01DDC0: CD 1C 13 D1 7D B3 6F CB 45 CA 5A 54 2A E6 97 22 ....}.o.E.ZT*.."
01DDD0: E0 97 CD 52 16 CD 90 19 CD 62 1F CD 52 16 CD 90 ...R.....b..R...
01DDE0: 19 CD 62 1F CD C4 3C CD 52 16 CD 90 19 CD 62 1F ..b...<.R.....b.
01DDF0: CD 52 16 CD 90 19 CD 62 1F 21 09 00 E5 21 E8 97 .R.....b.!...!..
01DE00: 01 02 00 CD 2D 05 CD 1C 13 CB 45 CA 2B 54 CD C4 ....-.....E.+T..
01DE10: 3C 2A E0 97 11 01 00 19 E5 21 01 00 E5 21 14 00 <*.......!...!..
01DE20: E5 21 04 00 E5 CD 64 3F C3 2E 54 CD E4 3C 21 0B .!....d?..T..<!.
01DE30: 00 E5 21 E8 97 01 02 00 CD 2D 05 CD 1C 13 CB 45 ..!......-.....E
01DE40: CA 54 54 CD C4 3C 2A E0 97 11 05 00 19 E5 CD 15 .TT..<*.........
01DE50: 3D C3 57 54 CD E4 3C C3 61 54 21 03 00 E5 CD EC =.WT..<.aT!.....
01DE60: 3C 21 2A 97 E5 2A 25 97 CD CD 1A CD 62 1F 21 2A <!*..*%.....b.!*
01DE70: 97 CD 5B 16 21 8A 96 CD D2 19 CD 62 1F 2A DD 97 ..[.!......b.*..
01DE80: 26 00 CB 45 CA 98 54 21 2A 97 E5 21 B0 92 CD 0A &..E..T!*..!....
01DE90: 05 2A DA 97 E5 CD A5 38 2A E6 97 11 30 00 19 22 .*.....8*...0.."
01DEA0: E0 97 2A E0 97 11 18 00 19 22 E2 97 21 8A 96 22 ..*......"..!.."
01DEB0: E4 97 2A E4 97 CD 0A 05 06 14 2A E0 97 CD B2 05 ..*.......*.....
01DEC0: 2A E0 97 11 15 00 19 E5 2A E4 97 11 7B 00 19 6E *.......*...{..n
01DED0: 26 00 EB E1 73 2A E0 97 11 16 00 19 E5 2A E4 97 &...s*.......*..
01DEE0: 11 7C 00 19 6E 26 00 EB E1 73 2A E4 97 11 16 00 .|..n&...s*.....
01DEF0: 19 CD 0A 05 06 0F 2A E2 97 CD B2 05 2A E2 97 11 ......*.....*...
01DF00: C3 C9 1F CD AB 43 6F 70 79 72 69 67 68 74 20 28 .....Copyright (
01DF10: 43 29 20 31 39 38 34 20 42 4F 52 4C 41 4E 44 20 C) 1984 BORLAND
01DF20: 49 6E 63 00 04 00 82 41 00 00 00 00 00 00 00 00 Inc....A........
01DF30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DF40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01DF50: 00 00 00 0A 56 69 73 75 61 6C 20 32 30 30 39 31 ....Visual 20091
01DF60: 32 2F 39 32 30 2F 39 32 50 18 00 00 00 49 6E 69 2/920/92P....Ini
01DF70: 74 00 00 00 00 00 00 00 00 00 00 00 00 45 78 69 t............Exi
01DF80: 74 00 00 00 00 00 00 00 00 00 00 04 1B 59 00 00 t............Y..
01DF90: 2C 30 30 30 29 00 00 00 00 00 00 01 20 20 04 03 ,000)....... ..
01DFA0: 00 00 02 1B 76 00 00 00 00 00 48 6F 6D 65 02 1B ....v.....Home..
01DFB0: 4C 6E 73 00 02 1B 4D 65 6C 00 00 00 02 1B 78 4F Lns...Mel.....xO
01DFC0: 4C 00 02 1B 33 69 67 68 02 1B 34 6F 77 00 00 00 L...3igh..4ow...
01DFD0: 7E B7 37 C8 23 F5 E5 7E CD 00 02 E1 F1 3D C8 18 ~.7.#..~.....=..
01DFE0: F3 CD 25 02 0D 0A 00 C9 C5 D5 E5 DD E5 FD E5 F5 ..%.............
01DFF0: 6F 26 00 E5 CD A6 00 F1 FD E1 DD E1 E1 D1 C1 C9 o&..............
01E000: 6F E5 CD A6 00 C9 FE 80 DC 90 02 D4 A9 02 E6 7F o...............
01E010: 18 EE C5 D5 E5 DD E5 FD E5 CD A3 00 7D 18 D9 E5 ..........£.}...
01E020: 21 06 02 18 04 E5 21 00 02 22 38 02 E1 E3 F5 C5 !.....!.."8.....
01E030: D5 7E 23 B7 28 07 E5 CD 00 02 E1 18 F4 D1 C1 F1 .~#.(...........
01E040: E3 C9 7D B4 C8 3A 24 01 87 87 87 E3 E3 E3 E3 C5 ..}..:$.........
01E050: 01 D2 04 C1 3D 20 F4 2B 18 E8 CD D0 01 D8 2A CE ....= .+......*.
01E060: 01 18 DF F5 C5 D5 E5 21 A8 01 CD 5A 02 21 A2 01 .......!...Z.!..
01E070: CD D0 01 2A BA 01 D4 42 02 E1 D1 C1 F1 C9 F5 C5 ...*...B........
01E080: D5 E5 21 B4 01 18 E9 F5 C5 D5 E5 21 AE 01 18 E0 ..!........!....
01E090: F5 3A BC 02 B7 28 10 C5 D5 E5 3D 32 BC 02 21 C8 .:...(....=2..!.
01E0A0: 01 CD 5A 02 E1 D1 C1 F1 C9 F5 3A BC 02 B7 20 F7 ..Z.......:... .
01E0B0: C5 D5 E5 3C 32 BC 02 21 C2 01 18 E5 01 F5 C5 D5 ...<2..!........
01E0C0: E5 21 BC 01 18 DB F5 C5 D5 E5 E5 11 F0 00 21 8B .!............!.
01E0D0: 01 01 10 00 ED B0 D1 3A 9E 01 4F 3A 9C 01 82 D5 .......:..O:....
01E0E0: CD 00 03 D1 3A 9F 01 4F 3A 9D 01 83 CD 00 03 21 ....:..O:......!
01E0F0: F0 00 CD D0 01 2A A0 01 CD 42 02 E1 D1 C1 F1 C9 .....*...B......
01E100: 10 00 19 E5 2A E4 97 11 26 00 19 CD 0A 05 06 0F ....*...&.......
01E110: CD D1 05 2A E2 97 11 20 00 19 E5 2A E4 97 11 36 ...*... ...*...6
01E120: 00 19 CD 0A 05 06 0F CD D1 05 2A E2 97 11 30 00 ..........*...0.
01E130: 19 E5 2A E4 97 11 46 00 19 6E 26 00 EB E1 73 2A ..*...F..n&...s*
01E140: E2 97 11 31 00 19 E5 2A E4 97 11 49 00 19 6E 26 ...1...*...I..n&
01E150: 00 EB E1 73 2A E2 97 11 32 00 19 E5 2A E4 97 11 ...s*...2...*...
01E160: 4A 00 19 6E 26 00 EB E1 73 2A E2 97 11 33 00 19 J..n&...s*...3..
01E170: E5 2A E4 97 11 47 00 19 6E 26 00 EB E1 73 2A E2 .*...G..n&...s*.
01E180: 97 11 34 00 19 E5 2A E4 97 11 48 00 19 6E 26 00 ..4...*...H..n&.
01E190: EB E1 73 2A E2 97 11 35 00 19 E5 2A E4 97 11 4B ..s*...5...*...K
01E1A0: 00 19 5E 23 56 EB EB E1 73 23 72 2A E2 97 11 37 ..^#V...s#r*...7
01E1B0: 00 19 E5 2A E4 97 11 4D 00 19 CD 0A 05 06 05 CD ...*...M........
01E1C0: D1 05 2A E2 97 11 3D 00 19 E5 2A E4 97 11 53 00 ..*...=...*...S.
01E1D0: 19 CD 0A 05 06 05 CD D1 05 2A E2 97 11 43 00 19 .........*...C..
01E1E0: E5 2A E4 97 11 6F 00 19 CD 0A 05 06 05 CD D1 05 .*...o..........
01E1F0: 2A E2 97 11 49 00 19 E5 2A E4 97 11 75 00 19 CD *...I...*...u...
01E200: 0A 05 06 05 CD D1 05 2A E2 97 11 4F 00 19 E5 2A .......*...O...*
01E210: E4 97 11 59 00 19 5E 23 56 EB EB E1 73 23 72 2A ...Y..^#V...s#r*
01E220: E2 97 11 51 00 19 E5 2A E4 97 11 69 00 19 CD 0A ...Q...*...i....
01E230: 05 06 05 CD D1 05 2A E2 97 11 57 00 19 E5 2A E4 ......*...W...*.
01E240: 97 11 5B 00 19 CD 0A 05 06 05 CD D1 05 2A E2 97 ..[..........*..
01E250: 11 5D 00 19 E5 2A E4 97 11 61 00 19 CD 0A 05 06 .]...*...a......
01E260: 05 CD D1 05 2A E2 97 11 63 00 19 E5 2A E4 97 11 ....*...c...*...
01E270: 67 00 19 5E 23 56 EB EB E1 73 23 72 2A 21 97 26 g..^#V...s#r*!.&
01E280: 00 CB 45 CA DA 51 21 2A 97 CD 2D 15 CD 62 1F 2A ..E..Q!*..-..b.*
01E290: 8C 98 26 00 C9 21 1F 8B E5 21 CF 8B E5 21 B0 00 ..&..!...!...!..
01E2A0: CD 09 1F C9 FD E1 E1 22 CC 88 FD E5 CD 95 56 21 ......."......V!
01E2B0: CF 8B E5 2A CC 88 E5 21 1F 89 E5 CD 48 31 21 1F ...*...!....H1!.
01E2C0: 89 CD 0A 05 CD 52 16 21 00 00 CD 71 19 CD 62 1F .....R.!...q..b.
01E2D0: C9 21 CF 8B E5 21 1F 89 E5 CD 17 32 21 1F 89 CD .!...!.....2!...
01E2E0: 0A 05 CD 52 16 21 00 00 CD 71 19 CD 62 1F C9 FD ...R.!...q..b...
01E2F0: E1 E1 22 CA 88 FD E5 2A CA 88 E5 CD A4 56 CD 52 .."....*.....V.R
01E300: 21 F0 00 06 00 09 EB 21 9B 01 34 35 28 02 12 C9 !......!..45(...
01E310: 1B 1B 21 2E 03 06 03 2B 0E 2F 0C 96 30 FC 86 F5 ..!....+./..0...
01E320: 79 FE 30 28 01 12 13 F1 10 ED C9 01 0A 64 21 6B y.0(.........d!k
01E330: 01 C3 5A 02 21 7B 01 C3 5A 02 11 03 00 CD 88 03 ..Z.!{..Z.......
01E340: E6 01 18 06 11 06 00 CD 88 03 6F 26 00 C9 11 12 ..........o&....
01E350: 00 18 F4 11 0C 00 18 08 11 0F 00 18 03 11 09 00 ................
01E360: E1 C1 E5 3A E1 00 B7 28 1F 79 FE 0D 20 1A D5 C5 ...:...(.y.. ...
01E370: CD A0 00 7C B5 28 0F CD 12 02 FE 13 20 08 CD 12 ...|.(...... ...
01E380: 02 FE 03 CA C5 1F C1 D1 2A 01 00 19 E9 22 DB 00 ........*...."..
01E390: D5 78 32 E1 00 79 B7 28 0B 3E C3 32 38 00 21 3F .x2..y.(.>.28.!?
01E3A0: 1F 22 39 00 21 C9 03 11 A0 00 01 18 00 ED B0 21 ."9.!..........!
01E3B0: E1 03 11 B8 00 01 12 00 ED B0 E1 01 03 00 ED B0 ................
01E3C0: 3E 7F 32 DA 00 AF C3 20 16 C3 3A 03 C3 44 03 C3 >.2.... ..:..D..
01E3D0: 5D 03 C3 53 03 C3 58 03 C3 4E 03 C3 5D 03 C3 44 ]..S..X..N..]..D
01E3E0: 03 03 00 00 03 01 00 01 02 00 02 03 00 03 04 00 ................
01E3F0: 03 05 00 0E FF 18 0C 0E 00 ED 5B DB 00 13 1A FE ..........[.....
01E400: 20 28 FA 21 65 00 06 03 CD 7D 04 1A CD 84 04 FE (.!e....}......
01E410: 41 38 12 FE 51 30 0E 47 13 1A FE 3A 20 06 78 D6 A8..Q0.G...: .x.
01E420: 40 13 18 02 1B AF 21 5C 00 77 23 0C 0D 28 0C 1A @.....!\.w#..(..
01E430: FE 1A 20 07 06 0B CD 79 04 18 10 06 08 CD 56 04 .. ....y......V.
01E440: 1A FE 2E 20 06 13 06 03 CD 56 04 21 68 00 06 18 ... .....V.!h...
01E450: 36 00 23 10 FB C9 1A 0C 0D 28 04 FE 2A 28 19 FE 6.#......(..*(..
01E460: 2E 28 1A FE 21 38 16 FE 7D 28 12 FE 2A 28 0E CD .(..!8..}(..*(..
01E470: 84 04 77 23 13 10 DF C9 13 3E 3F 18 02 3E 20 77 ..w#.....>?..> w
01E480: 23 10 FC C9 FE 61 D8 FE 7B D0 D6 20 C9 7C CD 92 #....a..{.. .|..
01E490: 04 7D F5 1F 1F 1F 1F CD 9B 04 F1 E6 0F C6 90 27 .}.............'
01E4A0: CE 40 27 C3 E8 01 AF 37 CB 7C C0 7C B7 7D C8 3E .@'....7.|.|.}.>
01E4B0: FF C9 22 CD 00 ED 43 DF 00 22 ED 00 06 04 36 00 .."...C.."....6.
01E4C0: 23 10 FB EB D1 F9 01 00 FC 09 22 CF 00 EB 22 D5 #........."...".
01E4D0: 00 CD 90 02 CD A9 02 E9 E5 2A CF 00 B7 ED 42 22 .........*....B"
01E4E0: CF 00 ED 5B CD 00 B7 ED 52 19 EB E1 DA 35 1D ED ...[....R....5..
01E4F0: B0 C9 2A CF 00 ED B0 22 CF 00 D9 C9 5E 23 56 23 ..*...."....^#V#
01E500: 16 CD 90 19 CD 62 1F C9 21 01 00 7D 32 C9 88 21 .....b..!..}2..!
01E510: CD 00 65 2E 01 E5 21 AB 00 65 2E 01 E5 CD 07 08 ..e...!..e......
01E520: CD 1D 05 04 43 6F 70 79 CD 07 08 06 50 21 36 8D ....Copy....P!6.
01E530: CD B2 05 21 7F 8C E5 21 05 20 CD 0A 05 CD 3D 13 ...!...!. ....=.
01E540: 21 7F 8C CD 7A 14 CD 35 1F E5 21 00 00 D1 CD 61 !...z..5..!....a
01E550: 06 CB 45 CA 7C 57 CD 1D 05 05 46 69 6C 65 20 21 ..E.|W....File !
01E560: 05 20 CD 0A 05 CD 07 08 CD 1D 05 0A 20 6E 6F 74 . .......... not
01E570: 20 66 6F 75 6E 64 CD 07 08 CD B3 20 21 7F 8C E5 found..... !...
01E580: 21 36 8D CD 0A 05 21 34 8D E5 21 32 8D E5 CD 6A !6....!4..!2...j
01E590: 32 7D EE 01 6F CB 45 CA D6 57 CD 1D 05 13 59 6F 2}..o.E..W....Yo
01E5A0: 75 20 63 61 6E 6E 6F 74 20 69 6E 73 74 61 6C 6C u cannot install
01E5B0: 20 21 05 20 CD 0A 05 CD 07 08 CD 1D 05 12 20 77 !. .......... w
01E5C0: 69 74 68 20 74 68 69 73 20 70 72 6F 67 72 61 6D ith this program
01E5D0: CD 07 08 CD B3 20 21 1F 8B E5 21 E7 1F CD 0A 05 ..... !...!.....
01E5E0: CD 3C 13 CD 62 1F 21 1F 8B CD CF 13 CD 35 1F E5 .<..b.!......5..
01E5F0: 21 00 00 D1 CD 61 06 CB 45 CA 2A 58 CD 1D 05 0D !....a..E.*X....
01E600: 4D 65 73 73 61 67 65 20 66 69 6C 65 20 21 E7 1F Message file !..
01E610: CD 0A 05 CD 07 08 CD 1D 05 0A 20 6E 6F 74 20 66 .......... not f
01E620: 6F 75 6E 64 CD 07 08 CD B3 20 2A 32 8D E5 21 20 ound..... *2..!
01E630: 00 D1 19 22 32 8D 2A 34 8D E5 2A 32 8D E5 21 80 ..."2.*4..*2..!.
01E640: 00 D1 CD DE 06 D1 19 22 34 8D 2A 32 8D E5 21 80 ......."4.*2..!.
01E650: 00 D1 CD 0F 07 22 32 8D 21 7F 8C E5 CD FE 2D 2A ....."2.!.....-*
01E660: C9 88 26 00 C9 C3 FB 58 FD E1 E1 22 C5 88 E1 22 ..&....X..."..."
01E670: C7 88 FD E5 21 01 00 22 C3 88 2A C3 88 E5 2A C7 ....!.."..*...*.
01E680: 88 CD 0A 05 CD 6D 08 D1 CD 87 06 CB 45 CA FA 58 .....m......E..X
01E690: 2A C7 88 E5 2A C3 88 D1 19 6E 26 00 E5 21 13 00 *...*....n&..!..
01E6A0: D1 CD 4E 06 CB 45 CA F0 58 2A C7 88 E5 2A C3 88 ..N..E..X*...*..
01E6B0: E5 21 01 00 CD BD 08 2A C5 88 E5 21 00 00 D1 19 .!.....*...!....
01E6C0: E5 2A C5 88 E5 21 00 00 D1 19 6E 26 00 23 EB E1 .*...!....n&.#..
01E6D0: 73 2A C5 88 E5 2A C5 88 CD 0A 05 CD 6D 08 D1 19 s*...*......m...
01E6E0: E5 2A C7 88 E5 2A C3 88 D1 19 6E 26 00 EB E1 73 .*...*....n&...s
01E6F0: 2A C3 88 23 22 C3 88 C3 7A 58 C9 21 01 00 E5 21 *..#"...zX.!...!
01E700: D5 5E 23 56 23 4E 23 46 E1 C9 DD E1 EB 1A 4F 06 .^#V#N#F......O.
01E710: 00 2F 6F 26 FF 39 F9 EB 03 ED B0 DD E9 D1 1A 4F ./o&.9.........O
01E720: 06 00 2F 6F 26 FF 39 F9 EB 03 ED B0 E9 DD E1 EB ../o&.9.........
01E730: 21 E0 FF 39 F9 EB C5 04 05 28 05 AF 12 13 10 FC !..9.....(......
01E740: ED B0 C1 3E 20 90 91 28 06 47 AF 12 13 10 FC DD ...> ..(.G......
01E750: E9 DD E1 21 E0 FF 39 F9 06 20 AF 77 23 10 FC DD ...!..9.. .w#...
01E760: E9 DD E1 45 CD 8A 05 B6 77 DD E9 DD E1 D1 7D 93 ...E....w.....}.
01E770: 38 F7 3C 4F 43 CD 8A 05 5F 41 AF B3 CB 23 30 06 8.<OC..._A...#0.
01E780: B6 77 23 AF 1E 01 10 F3 18 DD 78 E6 F8 0F 0F 0F .w#.......x.....
01E790: C6 02 6F 26 00 39 78 E6 07 3C 47 AF 37 17 10 FD ..o&.9x..<G.7...
01E7A0: C9 E5 D9 EB E3 73 23 72 23 D1 73 23 72 23 71 23 .....s#r#.s#r#q#
01E7B0: 70 C9 DD E1 78 EB 21 00 00 44 39 4E E5 09 23 E3 p...x.!..D9N..#.
01E7C0: B9 38 01 79 12 13 23 B7 28 03 4F ED B0 E1 F9 DD .8.y..#.(.O.....
01E7D0: E9 DD E1 78 21 00 00 44 39 4E E5 09 23 5E 23 56 ...x!..D9N..#^#V
01E7E0: 18 DC DD E1 EB 68 26 00 44 39 ED B0 21 20 00 39 .....h&.D9..! .9
01E7F0: F9 DD E9 DD E1 21 20 00 39 5E 23 56 68 26 00 44 .....! .9^#Vh&.D
01E800: 39 ED B0 21 22 00 18 E7 DD E1 EB 78 2F 6F 26 FF 9..!"......x/o&.
01E810: 39 F9 70 23 48 06 00 EB ED B0 DD E9 B7 ED 52 19 9.p#H.........R.
01E820: D8 3E 90 C3 75 1F B7 ED 52 B7 ED 42 30 03 09 19 .>..u...R..B0...
01E830: C9 3E 91 18 EE B7 ED 52 EB 13 EA 40 06 F0 18 01 .>.....R...@....
01E840: F8 11 00 00 C9 D5 EB B7 ED 52 EB E1 18 EB B7 ED .........R......
01E850: 52 21 01 00 C8 2B C9 CD A8 0B 18 F5 CD 7A 09 18 R!...+.......z..
01E860: F0 B7 ED 52 21 01 00 C0 2B C9 CD A8 0B 18 F5 CD ...R!...+.......
01E870: 7A 09 18 F0 CD 3C 07 21 01 00 D0 2B C9 CD A8 0B z....<.!...+....
01E880: 18 F5 CD 7A 09 18 F0 CD 3C 07 21 01 00 C8 D8 2B ...z....<.!....+
01E890: C9 CD A8 0B 18 F4 CD 7A 09 18 EF CD 3C 07 21 00 .......z....<.!.
01E8A0: 00 C8 D8 23 C9 CD A8 0B 18 F4 CD 7A 09 18 EF CD ...#.......z....
01E8B0: 3C 07 21 01 00 D8 2B C9 CD A8 0B 18 F5 CD 7A 09 <.!...+.......z.
01E8C0: 18 F0 54 5D 4B 42 EB 21 00 00 7A B7 3E 10 20 03 ..T]KB.!..z.>. .
01E8D0: 53 3E 08 29 EB 29 EB 30 01 09 3D 20 F6 C9 7C AA S>.).).0..= ..|.
01E8E0: F5 CD 4A 07 EB CD 4A 07 EB 44 4D AF 67 6F 3E 11 ..J...J..DM.go>.
01E8F0: ED 6A ED 42 30 02 09 37 3F CB 13 CB 12 3D 20 F0 .j.B0..7?....= .
01E900: 1E 00 D1 CD 35 06 7A B3 CA 21 59 D5 22 C1 88 CD ....5.z..!Y."...
01E910: 52 16 CD 90 19 CD 62 1F 2A C1 88 23 D1 1B C3 06 R.....b.*..#....
01E920: 59 CD 1D 05 00 06 50 21 CE 88 CD B2 05 21 01 00 Y.....P!.....!..
01E930: E5 21 06 00 D1 CD 35 06 7A B3 CA 82 59 D5 22 C1 .!....5.z...Y.".
01E940: 88 CD 52 16 CD 90 19 CD 62 1F CD 95 56 21 CF 8B ..R.....b...V!..
01E950: E5 2A C1 88 E5 21 1F 8A E5 CD 48 31 21 1F 8A E5 .*...!....H1!...
01E960: 21 CE 88 E5 CD 68 58 21 1F 8A CD 0A 05 CD 52 16 !....hX!......R.
01E970: 21 00 00 CD 71 19 CD 62 1F 2A C1 88 23 D1 1B C3 !...q..b.*..#...
01E980: 38 59 CD 52 16 21 20 00 CD F2 18 CD 62 1F C9 21 8Y.R.! .....b..!
01E990: BE 00 CD 38 16 21 BE 88 CD DB 17 CD 62 1F 2A BE ...8.!......b.*.
01E9A0: 88 26 00 CD 28 1F 7D 32 BE 88 2A BE 88 26 00 E5 .&..(.}2..*..&..
01E9B0: 21 20 00 D1 CD AF 06 CB 45 CA CB 59 2A BE 88 26 ! ......E..Y*..&
01E9C0: 00 E5 21 40 00 D1 19 7D 32 BE 88 2A BE 88 26 00 ..!@...}2..*..&.
01E9D0: 65 2E 01 E5 21 CE 88 CD 0A 05 CD 7C 08 E5 21 00 e...!......|..!.
01E9E0: 00 D1 CD 61 06 CB 45 CA 8F 59 CD 52 16 CD 90 19 ...a..E..Y.R....
01E9F0: CD 62 1F 2A BE 88 26 00 65 2E 01 E5 21 CE 88 CD .b.*..&.e...!...
01EA00: 0A 05 CD 7C 08 22 BF 88 2A BF 88 C9 21 7F 8C E5 ...|."..*...!...
01EA10: 21 87 8D E5 2A 34 8D E5 2A 32 8D E5 21 AD 00 E5 !...*4..*2..!...
01EA20: CD 9E 2F 21 F6 1F CD 0A 05 21 E7 1F CD 0A 05 CD ../!.....!......
01EA30: 51 05 21 00 00 CD 61 05 21 01 00 CD 61 05 21 04 Q.!...a.!...a.!.
01EA40: 00 CD 61 05 21 05 00 CD 61 05 21 06 00 CD 61 05 ..a.!...a.!...a.
01EA50: 21 07 00 CD 61 05 21 08 00 CD 61 05 21 09 00 CD !...a.!...a.!...
01EA60: 61 05 21 0A 00 CD 61 05 21 87 8D E5 CD 8E 3A CB a.!...a.!.....:.
01EA70: 45 CA 8B 5A 21 7F 8C E5 21 87 8D E5 2A 34 8D E5 E..Z!...!...*4..
01EA80: 2A 32 8D E5 21 AD 00 E5 CD 65 30 C9 21 80 00 E5 *2..!....e0.!...
01EA90: CD A3 21 21 50 00 22 7E A0 21 80 00 CD 0A 05 21 .£!!P."~.!.....!
01EAA0: 7E A0 E5 21 BC 88 CD 9E 1E 2A BC 88 E5 21 00 00 ~..!.....*...!..
01EAB0: D1 CD 61 06 E5 2A 7E A0 E5 21 00 00 D1 CD 4E 06 ..a..*~..!....N.
01EAC0: D1 7D B3 6F CB 45 CA CF 5A 21 50 00 22 7E A0 C9 .}.o.E..Z!P."~..
01EAD0: CD 8C 5A CD 08 57 CB 45 CA 2D 5B CD 95 56 21 CF ..Z..W.E.-[..V!.
01EAE0: 8B E5 21 0D 00 E5 21 5D 8E E5 CD 48 31 21 CF 8B ..!...!]...H1!..
01EAF0: E5 21 65 00 E5 21 34 8E E5 CD 48 31 CD 65 58 CD .!e..!4...H1.eX.
01EB00: EB F1 F0 18 48 E5 CD 5C 07 CB 3C CB 1D D1 EB CD ....H..\..<.....
01EB10: DE 06 EB CB 7A C8 18 35 CD 2B 07 C8 29 10 FD C9 ....z..5.+..)...
01EB20: CD 2B 07 C8 CB 3C CB 1D 10 FA C9 EB 7A B7 20 08 .+...<......z. .
01EB30: 7B FE 10 30 03 47 B7 C9 AF 67 6F C9 EB 7C AA 7C {..0.G...go..|.|
01EB40: FA 48 07 BA C0 7D BB C9 17 C9 CB 7C C8 7C 2F 67 .H...}.....|.|/g
01EB50: 7D 2F 6F 23 C9 7D E6 01 6F 26 00 C9 ED 4B D3 00 }/o#.}..o&...K..
01EB60: ED 5B D1 00 C5 D5 78 41 4A 53 1E 00 1F CB 18 CB .[....xAJS......
01EB70: 19 CB 1A CB 1B E1 19 EB E1 ED 4A 44 4D 21 E9 62 ..........JDM!.b
01EB80: 19 22 D1 00 EB 21 19 36 ED 4A 22 D3 00 44 4D C9 ."...!.6.J"..DM.
01EB90: 06 00 11 10 27 CD AC 07 11 E8 03 CD AC 07 11 64 ....'..........d
01EBA0: 00 CD AC 07 1E 0A CD AC 07 7D 18 0D AF 3C ED 52 .........}...<.R
01EBB0: 30 FB 19 04 3D 20 02 05 C8 C6 30 DD 77 00 DD 23 0...= ....0.w..#
01EBC0: C9 DD 7E 00 D6 24 4F 21 00 00 20 02 DD 23 DD 7E ..~..$O!.. ..#.~
01EBD0: 00 CD 84 04 D6 30 38 29 FE 0A 38 0E 0C 0D 20 21 .....08)..8... !
01EBE0: D6 07 FE 0A 38 1B FE 10 30 17 54 5D 29 D8 29 D8 ....8...0.T]).).
01EBF0: 0C 0D 20 02 54 5D 19 D8 29 D8 5F 16 00 19 D8 18 .. .T]..)._.....
01EC00: CB 79 B7 C8 7C 87 C9 DD E1 E1 E5 7D 26 00 23 39 .y..|......}&.#9
01EC10: 4E 81 38 1C 77 EB 21 00 00 44 ED 42 39 F9 EB E5 N.8.w.!..D.B9...
01EC20: 03 ED B0 EB E1 2B 1B 4F 03 ED B8 EB 23 F9 DD E9 .....+.O....#...
01EC30: 3E 10 C3 77 1F DD E1 CD A6 04 57 E1 CD A7 09 5F >..w......W...._
01EC40: E1 E5 7D 93 38 1A 14 15 28 16 BA 38 16 4A 06 00 ..}.8...(..8.J..
01EC50: 60 39 7B 82 54 5D 3D 6F 60 39 79 ED B8 EB 18 09 `9{.T]=o`9y.....
01EC60: AF 18 03 3C 6B 2D 26 00 39 77 F9 DD E9 DD E1 E1 ...<k-&.9w......
01EC70: E5 7D 26 00 23 39 F9 6F 26 00 DD E9 DD E1 21 00 .}&.#9.o&.....!.
01EC80: 00 54 39 5E 4B 23 E5 19 5E 43 23 E5 19 E5 FD E1 .T9^K#..^C#.....
01EC90: D1 E1 79 90 38 10 3C 4F C5 D5 E5 1A BE 28 0C E1 ..y.8.<O.....(..
01ECA0: D1 C1 23 0D 20 F2 21 00 00 18 0E 23 13 10 EC D1 ..#. .!....#....
01ECB0: E1 C1 21 00 00 39 EB ED 52 FD F9 DD E9 DD E1 CD ..!..9..R.......
01ECC0: A6 04 4F E1 CD A7 09 5F E1 7E 93 38 1B 0C 0D 28 ..O...._.~.8...(
01ECD0: 17 91 38 12 F5 7E 91 77 06 00 50 19 54 5D 09 F1 ..8..~.w..P.T]..
01ECE0: 3C 4F ED B0 18 02 1D 73 DD E9 DD E1 CD A7 09 4F <O.....s.......O
01ECF0: D1 ED 53 E6 00 21 00 00 39 1A F5 86 38 03 B8 38 ..S..!..9...8..8
01ED00: 8F 59 11 01 00 B7 ED 52 C2 11 5B CD 0C 5A C3 25 .Y.....R..[..Z.%
01ED10: 5B 19 11 02 00 B7 ED 52 C2 25 5B 21 7F 8C E5 CD [......R.%[!....
01ED20: 4D 2F C3 2D 5B 21 00 00 CB 45 CA FC 5A C3 C5 1F M/.-[!...E..Z...
01ED30: D1 CD 61 06 E5 2A 7E A0 E5 21 00 00 D1 CD 4E 06 ..a..*~..!....N.
01ED40: D1 7D B3 6F CB 45 CA 73 74 21 50 00 22 7E A0 C9 .}.o.E.st!P."~..
01ED50: CD 8C 5A CD 08 57 CB 45 CA 73 74 CD 95 56 21 CF ..Z..W.E.st..V!.
01ED60: 8B E5 21 0D 00 E5 21 5D 8E E5 CD 48 31 21 CF 8B ..!...!]...H1!..
01ED70: E5 21 65 00 E5 21 34 8E E5 CD 48 31 CD 65 58 CD .!e..!4...H1.eX.
01ED80: 38 59 CD 52 16 21 20 00 CD F2 18 CD 62 1F C9 21 8Y.R.! .....b..!
01ED90: BE 00 CD 38 16 21 BE 88 CD DB 17 CD 62 1F 2A BE ...8.!......b.*.
01EDA0: 88 26 00 CD 28 1F 7D 32 BE 88 2A BE 88 26 00 E5 .&..(.}2..*..&..
01EDB0: 21 20 00 D1 CD AF 06 CB 45 CA CB 59 2A BE 88 26 ! ......E..Y*..&
01EDC0: 00 E5 21 40 00 D1 19 7D 32 BE 88 2A BE 88 26 00 ..!@...}2..*..&.
01EDD0: 65 2E 01 E5 21 CE 88 CD 0A 05 CD 7C 08 E5 21 00 e...!......|..!.
01EDE0: 00 D1 CD 61 06 CB 45 CA 8F 59 CD 52 16 CD 90 19 ...a..E..Y.R....
01EDF0: CD 62 1F 2A BE 88 26 00 65 2E 01 E5 21 CE 88 CD .b.*..&.e...!...
01EE00: 0A 05 CD 7C 08 22 BF 88 2A BF 88 C9 21 7F 8C E5 ...|."..*...!...
01EE10: 21 87 8D E5 2A 34 8D E5 2A 32 8D E5 21 AD 00 E5 !...*4..*2..!...
01EE20: CD 9E 2F 21 F6 1F CD 0A 05 21 E7 1F CD 0A 05 CD ../!.....!......
01EE30: 51 05 21 00 00 CD 61 05 21 01 00 CD 61 05 21 04 Q.!...a.!...a.!.
01EE40: 00 CD 61 05 21 05 00 CD 61 05 21 06 00 CD 61 05 ..a.!...a.!...a.
01EE50: 21 07 00 CD 61 05 21 08 00 CD 61 05 21 09 00 CD !...a.!...a.!...
01EE60: 61 05 21 0A 00 CD 61 05 21 87 8D E5 CD 8E 3A CB a.!...a.!.....:.
01EE70: 45 CA 8B 5A 21 7F 8C E5 21 87 8D E5 2A 34 8D E5 E..Z!...!...*4..
01EE80: 2A 32 8D E5 21 AD 00 E5 CD 65 30 C9 21 80 00 E5 *2..!....e0.!...
01EE90: CD A3 21 21 50 00 22 7E A0 21 80 00 CD 0A 05 21 .£!!P."~.!.....!
01EEA0: 7E A0 E5 21 BC 88 CD 9E 1E 2A BC 88 E5 21 00 00 ~..!.....*...!..
01EEB0: D1 CD 61 06 E5 2A 7E A0 E5 21 00 00 D1 CD 4E 06 ..a..*~..!....N.
01EEC0: D1 7D B3 6F CB 45 CA CF 5A 21 50 00 22 7E A0 C9 .}.o.E..Z!P."~..
01EED0: CD 8C 5A CD 08 57 CB 45 CA 2D 5B CD 95 56 21 CF ..Z..W.E.-[..V!.
01EEE0: 8B E5 21 0D 00 E5 21 5D 8E E5 CD 48 31 21 CF 8B ..!...!]...H1!..
01EEF0: E5 21 65 00 E5 21 34 8E E5 CD 48 31 CD 65 58 CD .!e..!4...H1.eX.
01EF00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01EF10: 1A 00 01 00 02 09 52 E5 1A 00 41 02 00 00 00 02 ......R...A.....
01EF20: 1A 00 46 02 00 00 00 02 1A 00 42 02 00 00 00 02 ..F.......B.....
01EF30: 1A 00 47 02 00 00 00 02 1A 00 43 02 00 00 00 02 ..G.......C.....
01EF40: 1A 00 48 02 00 00 00 02 1A 00 44 02 00 00 00 02 ..H.......D.....
01EF50: 1A 00 49 02 00 00 00 02 1A 00 45 02 00 00 00 02 ..I.......E.....
01EF60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EF70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EF80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EF90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EFA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EFB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EFC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EFD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EFE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01EFF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01F000: 01 78 12 F1 57 5E 91 38 2F 3C 6F 7A 83 38 04 B8 .x..W^.8/<oz.8..
01F010: 7D 38 08 78 93 38 26 91 38 23 3C B7 28 1F C5 D5 }8.x.8&.8#<.(...
01F020: 2A E6 00 5F 1D 16 00 42 19 09 D1 D5 E5 50 19 EB *.._...B.....P..
01F030: E1 4F ED B8 D1 C1 18 05 7A 3C 28 19 4F 78 91 3C .O......z<(.Ox.<
01F040: BB 38 01 7B B7 28 0E 2A E6 00 06 00 09 EB 21 01 .8.{.(.*......!.
01F050: 00 39 4F ED B0 21 00 00 54 39 5E 13 19 F9 DD E9 .9O..!..T9^.....
01F060: DD E1 E1 2D C2 30 08 6C 26 00 DD E9 21 02 00 54 ...-.0.l&...!..T
01F070: 39 5E 13 19 7E 36 01 23 77 C9 21 04 00 54 39 5E 9^..~6.#w.!..T9^
01F080: 4B 23 E5 19 5E 43 23 E5 19 E5 FD E1 D1 E1 AF B8 K#..^C#.........
01F090: 28 04 B9 20 08 78 B9 E1 D1 FD F9 D5 E9 1A BE 20 (.. .x.........
01F0A0: F6 23 13 05 0D 18 E7 7C B7 20 03 7D B7 C0 3E 11 .#.....|. .}..>.
01F0B0: C3 77 1F CD D6 09 D0 3E 01 C3 75 1F CD 4A 0A 18 .w.....>..u..J..
01F0C0: F5 CD 75 0F CD 60 0A 18 ED D9 7D B7 D9 3E 02 28 ..u..`....}..>.(
01F0D0: E8 CD BE 0A 18 E0 D9 CB 78 D9 C2 51 0A D9 7D B7 ........x..Q..}.
01F0E0: D9 C8 D9 C5 D5 E5 D9 7D B7 20 05 D9 CB B8 18 54 .......}. .....T
01F0F0: C5 CB F8 AF 08 D9 CB F8 7D D9 95 28 13 30 06 ED ........}..(.0..
01F100: 44 08 3D 08 D9 CD 43 0B 2C 3D 20 F9 08 28 01 D9 D.=...C.,= ..(..
01F110: F1 E6 80 20 0F CD 5B 0B 30 25 CD 44 0B B7 2C 20 ... ..[.0%.D..,
01F120: 1E 37 18 20 CD 8F 0B 3F F5 28 10 38 01 D9 CD 75 .7. ...?.(.8...u
01F130: 0B CB 78 20 09 CD 4F 0B 2D 20 F6 CD 3B 0B F1 38 ..x ..O.- ..;..8
01F140: 02 CB B8 B7 D9 E1 D1 C1 D9 C9 D9 CB 78 D9 C2 DD ............x...
01F150: 09 CD 58 0A CD DD 09 D8 2C 2D C8 78 EE 80 47 C9 ..X.....,-.x..G.
01F160: D9 7D B7 D9 CA 3B 0B 7D B7 C8 D9 85 D9 CD 16 0B .}...;.}........
01F170: C5 D5 E5 DD 39 CD 3B 0B D9 2E 05 D9 3E 08 DD 23 ....9.;.....>..#
01F180: DD 6E 00 08 CB 1D 30 03 CD 5B 0B CD 44 0B 08 3D .n....0..[..D..=
01F190: 20 F1 D9 2D D9 20 E5 DD 6E FB CB 78 20 09 08 CD ..-. ..n..x ...
01F1A0: 50 0B 2C 2D 28 01 2D F1 F1 F1 B7 08 F1 D9 C1 E1 P.,-(.-.........
01F1B0: D9 DD E1 CB B8 B0 47 2C 2D CC 3B 0B 08 C9 7D B7 ......G,-.;...}.
01F1C0: C8 D9 95 D9 3F CD 16 0B E5 E5 E5 DD 39 D9 2E 05 ....?.......9...
01F1D0: D9 3E 08 08 CD 8F 0B 38 03 CD 75 0B 3F CB 15 08 .>.....8..u.?...
01F1E0: 3D 20 0C DD 75 05 DD 2B D9 2D D9 28 0E 3E 08 CD = ..u..+.-.(.>..
01F1F0: 4F 0B 30 DF 08 CD 75 0B B7 18 E1 CD 4F 0B 38 04 O.0...u.....O.8.
01F200: CD 0C 13 1A A6 77 23 13 10 F9 18 E3 FD E1 DD E1 .....w#.........
01F210: 21 00 00 39 EB 21 20 00 45 39 FD E9 DD E1 21 21 !..9.! .E9....!!
01F220: 00 39 7E B7 28 03 AF 18 06 2B 46 CD 8A 05 A6 21 .9~.(....+F....!
01F230: 22 00 39 F9 21 00 00 28 01 23 DD E9 3E AF 32 E6 ".9.!..(.#..>.2.
01F240: 00 FD E1 2A DB 00 06 10 CD B2 05 AF 12 E1 22 E2 ...*..........".
01F250: 00 FD E5 7C B7 3E 22 CA 20 16 3A E6 00 B7 28 0D ...|.>". .:...(.
01F260: CD 86 13 20 08 2A E2 00 36 00 23 77 C9 CD F7 03 ... .*..6.#w....
01F270: 2A E2 00 36 00 23 36 06 11 0B 00 19 EB 21 5C 00 *..6.#6......!\.
01F280: 01 24 00 ED B0 C9 06 06 21 B6 13 C5 E5 06 03 ED .$......!.......
01F290: 5B DB 00 13 1A FE 20 28 FA 1A CD 84 04 96 28 0A [..... (......(.
01F2A0: E1 C1 11 04 00 19 10 E3 B7 C9 23 13 10 EB C1 C1 ..........#.....
01F2B0: 1A FE 3A C0 7E C9 43 4F 4E 00 54 52 4D 01 4B 42 ..:.~.CON.TRM.KB
01F2C0: 44 02 4C 53 54 03 41 55 58 04 55 53 52 05 3E AF D.LST.AUX.USR.>.
01F2D0: 32 E6 00 CD EE 14 CD 24 16 2A E2 00 23 7E FE 06 2......$.*..#~..
01F2E0: 20 1D CD B6 14 CD 24 16 2A E2 00 3A E6 00 B7 3E .....$.*..:...>
01F2F0: 06 20 02 3E 05 77 23 23 23 36 00 C0 C3 D6 16 06 . .>.w###6......
01F300: 03 FE 02 20 02 06 01 FE 03 20 02 06 02 23 36 00 ... ..... ...#6.
01F310: 2B 2B 70 C9 3E AF 32 E6 00 ED 53 E4 00 CD 2D 15 ++p.>.2...S...-.
01F320: CD 24 16 CD B6 14 3A D9 00 B7 C0 2A E2 00 36 07 .$....:....*..6.
01F330: 23 23 23 77 11 05 00 19 77 23 77 11 24 00 19 77 ###w....w#w.$..w
01F340: 23 77 11 D6 FF 19 3A E6 00 B7 20 19 E5 01 04 00 #w....:... .....
01F350: CD F4 19 E1 23 23 4E 23 46 2A E4 00 B7 ED 42 C8 ....##N#F*....B.
01F360: 3E 90 C3 20 16 E5 AF 77 23 77 23 ED 5B E4 00 73 >.. ...w#w#.[..s
01F370: 23 72 E1 01 04 00 C3 F3 19 3E AF 32 E6 00 CD 53 #r.......>.2...S
01F380: 15 CD 24 16 CD B6 14 CD 24 16 2A E2 00 36 07 E5 ..$.....$.*..6..
01F390: 11 0C 00 19 EB 0E 23 CD 05 00 E1 11 2D 00 19 AF ......#.....-...
01F3A0: 4E 77 23 46 77 11 D6 FF 19 71 23 70 23 36 80 23 Nw#Fw....q#p#6.#
01F3B0: 77 23 77 23 77 C9 CD DF 14 2A E2 00 11 0C 00 19 w#w#w....*......
01F3C0: EB 3A E6 00 B7 01 0F 01 28 0A D5 0E 13 CD 05 00 .:......(.......
01F3D0: D1 01 16 F1 C5 CD 05 00 C1 3C C0 78 C3 20 16 2A .........<.x. .*
01F3E0: E2 00 11 18 00 19 06 18 36 00 23 10 FB C9 22 E2 ........6.#...".
01F3F0: 00 23 7E 2B FE 06 20 32 CB 4E 28 14 3E 1A CD 92 .#~+.. 2.N(.>...
01F400: CD 8F 0B 3F E1 D1 C1 CB 78 20 05 CD 50 0B 18 9A ...?....x ..P...
01F410: 2C 20 97 37 18 95 38 06 C6 80 38 06 18 1B C6 80 , .7..8...8.....
01F420: 38 17 6F DD E3 D9 E5 C5 78 CB F8 D9 A8 E6 80 F5 8.o.....x.......
01F430: CB F8 DD E5 DD 21 00 00 C9 E1 D8 AF 6F 47 4F 57 .....!......oGOW
01F440: 5F 67 C9 B7 CB 18 CB 19 CB 1A CB 1B CB 1C C9 B7 _g..............
01F450: CB 14 CB 13 CB 12 CB 11 CB 10 C9 7C D9 84 D9 67 ...........|...g
01F460: 7B D9 8B D9 5F 7A D9 8A D9 57 79 D9 89 D9 4F 78 {..._z...Wy...Ox
01F470: D9 88 D9 47 C9 7C D9 94 D9 67 7B D9 9B D9 5F 7A ...G.|...g{..._z
01F480: D9 9A D9 57 79 D9 99 D9 4F 78 D9 98 D9 47 C9 78 ...Wy...Ox...G.x
01F490: D9 B8 D9 C0 79 D9 B9 D9 C0 7A D9 BA D9 C0 7B D9 ....y....z....{.
01F4A0: BB D9 C0 7C D9 BC D9 C9 D9 78 D9 A8 F2 B2 0B 78 ...|.....x.....x
01F4B0: 17 C9 CB 78 28 06 CD BC 0B C8 3F C9 7D D9 BD D9 ...x(.....?.}...
01F4C0: C0 B7 C8 C3 8F 0B 7D D6 81 DA 3B 0B 3C FE 28 D0 ......}...;.<.(.
01F4D0: D9 C5 D5 E5 08 CD 3B 0B 08 37 CD 44 0B 3D 20 F9 ......;..7.D.= .
01F4E0: D9 7C D9 A4 D9 67 7B D9 A3 D9 5F 7A D9 A2 D9 57 .|...g{.£._z...W
01F4F0: 79 D9 A1 D9 4F 78 D9 A0 D9 47 C3 44 0A D9 C5 D5 y...Ox...G.D....
01F500: E5 D9 CD 75 0F D9 CD C6 0B D9 CD 4A 0A 18 EB 7D ...u.......J...}
01F510: B7 C8 CB 78 3E 03 C2 75 1F CD 75 0F 7D C6 80 CB ...x>..u..u.}...
01F520: 2F C6 80 6F D6 14 F5 D9 C5 D5 E5 CD BE 0A CD D6 /..o............
01F530: 09 2D C5 D5 E5 CD 4A 0A 7D E1 D1 C1 D9 E1 D1 C1 .-....J.}.......
01F540: E3 BC E3 30 E3 F1 D9 C9 D9 CD 57 0F 2D CD 4A 0A ...0......W.-.J.
01F550: D9 CD 57 0F 2C D9 7D FE 6C D8 C5 CB B8 CD A8 0B ..W.,.}.l.......
01F560: C1 38 09 CD BE 0A CD FD 0B CD 60 0A CB 78 28 03 .8........`..x(.
01F570: CD D6 09 D9 2D D9 CD A8 0B F5 38 03 CD 4A 0A D9 ....-.....8..J..
01F580: 2D D9 CD A8 0B 38 05 D9 2C CD 4A 0A 7D FE 6C 38 -....8..,.J.}.l8
01F590: 3B D9 01 AA 2A 11 AA AA 21 7F AA CD 60 0A DD E5 ;...*...!...`...
01F5A0: DD 21 D0 0C 3E 05 CD FD 0E DD E1 CD 75 0F CD 60 .!..>.......u..`
01F5B0: 0A CD 60 0A C5 D5 E5 D9 CD 75 0F 2D 2D D9 2D CD ..`......u.--.-.
01F5C0: D6 09 D9 E1 D1 C1 D9 CD 4A 0A 2C 2C F1 2C 2D C8 ........J.,,.,-.
01F5D0: D8 78 EE 80 47 C9 67 AA 3F 2B 32 D7 6E B6 2A 1D .x..G.g.?+2.n.*.
01F5E0: EF 38 74 0D D0 00 0D D0 7A 88 88 88 88 08 7E AB .8t.....z.....~.
01F5F0: AA AA AA AA 2C 2D 3E 04 CA 75 1F CB 78 C2 75 1F ....,->..u..x.u.
01F600: 18 3A D9 00 B7 20 0C 2A E2 00 CB 5E 20 EE 18 03 .:... .*...^ ...
01F610: CB 46 C8 2A E2 00 E5 11 0C 00 19 EB 0E 10 CD 05 .F.*............
01F620: 00 E1 3C 20 05 3E FF 32 D9 00 36 00 C9 22 E2 00 ..< .>.2..6.."..
01F630: 7E E6 03 C8 CD 9F 1A 2A E2 00 11 2D 00 19 AF 77 ~......*...-...w
01F640: 23 77 11 D5 FF 19 77 23 01 04 00 CD F3 19 CD 9F #w....w#........
01F650: 1A 18 C0 22 E2 00 7E E6 03 C8 18 B7 CD 17 16 C0 ..."..~.........
01F660: 11 0C 00 19 EB 0E 13 CD 05 00 3C C0 18 40 FD E1 ..........<..@..
01F670: 2A DB 00 06 10 CD B2 05 AF 12 E1 FD E5 CD 17 16 *...............
01F680: C0 E5 CD F7 03 E1 E5 11 1C 00 19 EB 21 5C 00 01 ............!\..
01F690: 0C 00 ED B0 E1 11 0C 00 19 E5 EB 0E 17 CD 05 00 ................
01F6A0: D1 3C CA AE 15 21 5C 00 01 24 00 ED B0 C9 3E 01 .<...!\..$....>.
01F6B0: C3 20 16 3E AF 32 E6 00 CD 17 16 C0 2A DF 00 7C . .>.2......*..|
01F6C0: B5 3E 21 20 EB 2A E2 00 11 0C 00 19 11 5C 00 01 .>! .*.......\..
01F6D0: 24 00 ED B0 11 5C 00 0E 0F CD 05 00 3C 28 CF 21 $....\......<(.!
01F6E0: FD 15 11 80 00 01 1A 00 ED B0 11 00 01 3A E6 00 .............:..
01F6F0: B7 20 04 ED 5B 01 01 31 00 01 C3 81 00 FF D5 0E . ..[..1........
01F700: 1A CD 05 00 11 5C 00 0E 14 CD 05 00 D1 21 80 00 .....\.......!..
01F710: 19 EB B7 28 E9 18 66 22 E2 00 CD C2 16 C8 3E 20 ...(..f"......>
01F720: 32 D9 00 C9 3A D9 00 B7 C8 F1 C9 DD E1 DD E5 E5 2...:...........
01F730: 21 CA 00 CD 3C 16 E1 C9 DD E1 DD E5 22 E2 00 CB !...<......."...
01F740: 46 28 0B 23 7E FE 00 C0 23 36 00 C3 65 16 3E 02 F(.#~...#6..e.>.
01F750: 18 CE E5 21 CA 00 CD 5B 16 E1 C9 22 E2 00 CB 4E ...!...[..."...N
01F760: C0 3E 03 18 EB 21 DA 00 7E FE 80 38 02 3E 7F 4F .>...!..~..8.>.O
01F770: 36 7F 2A DB 00 22 DD 00 16 00 CD 12 02 77 FE 0D 6.*..".......w..
01F780: 28 3D 1E 01 FE 08 28 26 FE 7F 28 22 1D FE 18 28 (=....(&..("...(
01F790: 1D FE 03 20 09 3A E1 00 B7 28 DF C3 4E 1F FE 20 ... .:...(..N..
01F7A0: 38 D8 79 BA 28 D4 7E 14 23 CD E8 01 18 CC 15 FA 8.y.(.~.#.......
01F7B0: 78 16 2B CD 25 02 08 20 08 00 1D 28 BD 18 EF 36 x.+.%.. ...(...6
01F7C0: 1A C9 E5 2A E2 00 23 7E FE 06 E1 C9 CD C2 16 C8 ...*..#~........
01F7D0: CD 5B 17 FE 1A C8 C5 D5 E5 2A E2 00 23 7E B7 20 .[.......*..#~.
01F7E0: 0E 2A DD 00 7E FE 1A 28 68 23 22 DD 00 18 62 3D .*..~..(h#"...b=
01F7F0: 20 15 CD 12 02 F5 FE 20 38 05 CD E8 01 18 05 FE ...... 8.......
01F800: D9 CD 61 0F D9 7D 2E 81 95 F5 CD BE 0A D9 CD 4F ..a..}.........O
01F810: 0F D9 CD 4A 0A C5 D5 E5 D9 2C CD D6 09 D9 E1 D1 ...J.....,......
01F820: C1 CD BE 0A DD E5 DD 21 55 0D 3E 06 CD FD 0E DD .......!U.>.....
01F830: E1 2C D9 CD 6B 0F 2D D9 CD D6 09 F1 C5 D5 E5 6F .,..k.-........o
01F840: 26 00 30 01 25 CD D1 0F D9 2C CD 60 0A D9 E1 D1 &.0.%....,.`....
01F850: C1 CD D6 09 7D FE 67 DA 3B 0B C9 7D 8A 9D D8 89 ....}.g.;..}....
01F860: 1D 7D E9 A2 8B 2E 3A 7D 8E E3 38 8E 63 7E 49 92 .}....:}..8.c~I.
01F870: 24 49 12 7E CD CC CC CC 4C 7F AB AA AA AA 2A D9 $I.~....L.....*.
01F880: CD 6B 0F D9 B7 CB 78 F5 CB B8 CD BE 0A 7D FE 88 .k....x......}..
01F890: 30 47 C5 D5 E5 2C CD 99 0F E5 CB 3C CB 1D 7D E1 0G...,.....<..}.
01F8A0: F5 CD D1 0F 2C 2D 28 01 2D D9 F1 E1 D1 C1 F5 CD ....,-(.-.......
01F8B0: 4A 0A DD E5 DD 21 D9 0D 3E 08 CD 12 0F DD E1 F1 J....!..>.......
01F8C0: 30 0A F5 D9 CD 61 0F D9 CD 60 0A F1 85 6F 38 09 0....a...`...o8.
01F8D0: F1 C8 D9 CD 4F 0F C3 BE 0A E1 3E 01 C3 75 1F 6D ....O.....>..u.m
01F8E0: 2E 1D 11 60 31 70 46 2C FE E5 7F 74 36 7C 89 84 ...`1pF,...t6|..
01F8F0: 21 77 53 3C FF C3 2E 7A D2 7D 5B 95 1D 7C 25 B8 !wS<...z.}[..|%.
01F900: 46 58 63 7E 16 FC EF FD 75 80 D2 F7 17 72 31 7D FXc~....u....r1}
01F910: B7 C8 DD E5 D9 CD 4F 0F D9 AF CB 78 28 03 3C CB ......O....x(.<.
01F920: B8 F5 CD A8 0B 38 08 D9 CD BE 0A F1 CB FF F5 D9 .....8..........
01F930: 01 CF 06 11 8E E9 21 7E 4A D9 CD A8 0B 30 05 CD ......!~J....0..
01F940: F7 0E 18 4F DD 21 97 0E 3E 02 08 D9 11 12 00 DD ...O.!..>.......
01F950: 19 CD 3C 0F D9 CD A8 0B 38 0B 08 3D 20 EC D9 11 ..<.....8..= ...
01F960: 0C 00 DD 19 D9 D9 CD 37 0F CB F8 CD D6 09 C5 D5 .......7........
01F970: E5 CD 3C 0F CD 60 0A D9 CD 4F 0F CD D6 09 D9 E1 ..<..`...O......
01F980: D1 C1 CD BE 0A DD E5 CD F7 0E DD E1 D9 CD 37 0F ..............7.
01F990: CD D6 09 F1 17 30 0A F5 D9 CD 57 0F 2D CD 4A 0A .....0....W.-.J.
01F9A0: F1 DD E1 CB 4F C8 CB F8 C9 7F E7 CF CC 13 54 7F ....O.........T.
01F9B0: F6 F4 A2 30 09 7F 6A C1 91 0A 06 80 B5 9E 8A 6F ...0..j........o
01F9C0: 44 80 82 2C 3A CD 13 80 6A C1 91 0A 06 81 00 00 D..,:...j.......
01F9D0: 00 00 00 80 21 A2 DA 0F 49 7D E8 A2 8B 2E BA 7D ....!...I}.....}
01F9E0: 8E E3 38 8E 63 7E 49 92 24 49 92 7E CD CC CC CC ..8.c~I.$I.~....
01F9F0: 4C 7F AB AA AA AA AA DD 21 D3 0E 3E 05 C5 D5 E5 L.......!..>....
01FA00: 0D CC E1 01 F1 18 4A 3D 20 05 CD 12 02 18 42 3D ......J= .....B=
01FA10: 3D 20 06 CD AF 00 7D 18 38 3D 20 06 CD B5 00 7D = ....}.8= ....}
01FA20: 18 2F 0E 14 CD AD 1A 20 21 2A E2 00 23 23 23 E5 ./..... !*..###.
01FA30: 7E C6 2D 5F 16 00 19 7E E1 FE 1A 28 14 34 F2 51 ~.-_...~...(.4.Q
01FA40: 17 36 00 2A E2 00 CB D6 18 07 3E 99 32 D9 00 3E .6.*......>.2..>
01FA50: 1A 2A E2 00 23 23 77 E1 D1 C1 C9 3A D9 00 B7 3E .*..##w....:...>
01FA60: 1A C0 E5 2A E2 00 23 23 7E E1 C9 E5 2A E2 00 23 ...*..##~...*..#
01FA70: 7E FE FF 28 45 CD CC 16 CD 5B 17 FE 20 28 0C FE ~..(E....[.. (..
01FA80: 09 28 08 FE 0D 28 04 FE 0A 20 05 CD D6 16 18 E8 .(...(... ......
01FA90: 21 5D 00 06 1E CD 5B 17 FE 20 28 16 FE 09 28 12 !]....[.. (...(.
01FAA0: FE 0D 28 14 FE 1A 28 10 77 23 05 28 05 CD D6 16 ..(...(.w#.(....
01FAB0: 18 E3 CD C2 16 CC D6 16 36 00 E1 C9 DD 21 5D 00 ........6....!].
01FAC0: DD 7E 00 B7 C8 06 00 FE 2D C0 04 DD 23 C9 38 05 .~......-...#.8.
01FAD0: DD 7E 00 B7 C8 3E 10 37 C3 20 16 EB CD C2 16 20 .~...>.7. .....
01FAE0: 07 CD 5B 17 12 C3 D6 16 CD D6 16 12 C9 3E AF 4F ..[..........>.O
01FAF0: C5 CD 6B 17 C1 CD BC 17 C8 C5 E5 CD C1 07 D1 C1 ..k.............
01FB00: CD CE 17 D8 05 CC 4D 07 EB 73 0C 0D 20 02 23 72 ......M..s.. .#r
01FB10: EB C9 CD 6B 17 CD BC 17 C8 C5 E5 CD 70 11 D9 E1 ...k........p...
01FB20: C1 CD CE 17 D8 05 D9 CC 58 0A D9 C3 A1 05 E5 CD ........X.......
01FB30: CC 16 CD 5B 17 FE 0A 20 05 CD D6 16 18 F4 0E 00 ...[... ........
01FB40: CD 5B 17 FE 0D 28 15 FE 1A 28 11 0C 23 77 05 28 .[...(...(..#w.(
01FB50: 05 CD D6 16 18 EA CD C2 16 CC D6 16 E1 71 C9 2A .............q.*
01FB60: E2 00 23 7E FE 00 CA E1 01 CD 5B 17 FE 0D 28 08 ..#~......[...(.
01FB70: FE 1A C8 CD D6 16 18 F1 CD C2 16 20 09 CD D6 16 ........... ....
01FB80: FE 0A C0 C3 D6 16 2A E2 00 23 23 7E FE 1A C8 36 ......*..##~...6
01FB90: 00 C9 C5 D5 E5 CD 9C 18 E1 D1 C1 C9 4F CD 24 16 ............O.$.
01FBA0: 2A E2 00 23 7E FE 06 28 1B 30 38 E1 06 00 C5 E5 *..#~..(.08.....
01FBB0: B7 CA A6 00 3D CA A6 00 3D 3D CA A9 00 3D CA AC ....=...==...=..
01FBC0: 00 C3 B2 00 2B CB DE 23 23 23 E5 7E C6 2D 5F 16 ....+..###.~.-_.
01FBD0: 00 19 71 E1 34 F0 36 00 0E 15 CD A1 1A C8 3E F0 ..q.4.6.......>.
01FBE0: C3 20 16 2A E6 00 3A E8 00 BE C8 34 5E 16 00 19 . .*..:....4^...
01FBF0: 71 C9 7D C3 92 18 C1 D1 C5 DD 2A DB 00 CB 7C 28 q.}.......*...|(
01FC00: F5 CD 75 0F CD 60 0A F1 CD 12 0F D9 E1 D1 C1 C3 ..u..`..........
01FC10: 60 0A F5 D9 CD 37 0F 18 10 F5 D9 C5 D5 E5 CD 37 `....7.........7
01FC20: 0F CD D6 09 D9 E1 D1 C1 D9 CD 60 0A F1 3D 20 E9 ..........`..= .
01FC30: D9 CD 4F 0F C3 D6 09 11 06 00 DD 19 DD 6E 00 DD ..O..........n..
01FC40: 66 01 DD 5E 02 DD 56 03 DD 4E 04 DD 46 05 C9 21 f..^..V..N..F..!
01FC50: 81 00 44 4C 54 5C C9 01 0F 49 11 A2 DA 21 82 21 ..DLT\...I...!.!
01FC60: C9 01 04 35 11 33 F3 21 81 FA C9 01 72 31 11 F7 ...5.3.!....r1..
01FC70: 17 21 80 D2 C9 C5 D5 E5 D9 E1 D1 C1 C9 CD 5C 07 .!............\.
01FC80: 21 80 00 3E 20 CB 78 20 0D CB 23 CB 12 CB 11 CB !..> .x ..#.....
01FC90: 10 2D 3D 20 F0 6F CB B8 C9 CB 78 D9 CD 4F 0F 28 .-= .o....x..O.(
01FCA0: 02 CB F8 2D CD D6 09 B7 CB 7D 28 1C CB 78 08 CB ...-.....}(..x..
01FCB0: F8 3E 8F BD 38 16 28 06 CD 43 0B 2C 18 F3 CD 43 .>..8.(..C.,...C
01FCC0: 0B 08 60 69 C8 C3 4D 07 21 00 00 C9 3E 92 C3 75 ..`i..M.!...>..u
01FCD0: 1F 7C B5 CA 3B 0B CB 7C 08 CD 4A 07 3E 90 CB 7C .|..;..|..J.>..|
01FCE0: 20 06 29 3D CB 7C 28 FA 44 4D 11 00 00 62 6F 08 .)=.|(.DM...bo.
01FCF0: C0 CB B8 C9 CD A6 04 EB 1E 00 38 04 FE 19 38 18 ..........8...8.
01FD00: 1D CD A6 04 D9 CB 78 D9 16 07 28 01 14 92 30 01 ......x...(...0.
01FD10: AF FE 09 38 02 3E 09 3C 57 D5 D9 FD 21 5D 00 DD ...8.>.<W...!]..
01FD20: E5 CD B8 10 DD E1 D1 4F 7A 3C CB 7B 20 10 81 F2 .......Oz<.{ ...
01FD30: 38 10 FD 36 00 00 18 0B FE 0C 38 02 3E 0B D5 CD 8..6......8.>...
01FD40: 4D 11 D1 CB 78 28 05 3E 2D CD B2 10 CB 7B 28 03 M...x(.>-....{(.
01FD50: 61 0E 00 CB 79 28 05 CD B0 10 18 07 CD A6 10 0D a...y(..........
01FD60: F2 5C 10 7A B7 28 17 3E 2E CD B2 10 0C 28 06 CD .\.z.(.>.....(..
01FD70: B0 10 15 20 F7 15 FA 7E 10 CD A6 10 18 F7 CB 7B ... ...~.......{
01FD80: C8 3E 45 CD B2 10 3E 2B CB 7C 28 06 7C ED 44 67 .>E...>+.|(.|.Dg
01FD90: 3E 2D CD B2 10 7C 06 2F 04 D6 0A 30 FB C6 3A DD >-...|./...0..:.
01FDA0: 70 00 DD 23 18 0C FD 7E 00 FD 23 B7 20 04 FD 2B p..#...~..#. ..+
01FDB0: 3E 30 DD 77 00 DD 23 C9 FD E5 2C 2D 20 0E 06 0C >0.w..#...,- ...
01FDC0: FD 36 00 30 FD 23 10 F8 AF C3 4A 11 C5 CB B8 7D .6.0.#....J....}
01FDD0: D9 D6 80 6F 9F 67 11 4D 00 CD C4 06 11 05 00 19 ...o.g.M........
01FDE0: 7C FE D9 20 01 3C FD 77 00 ED 44 CD 0D 12 7D FE |.. .<.w..D...}.
01FDF0: 81 30 06 CD 80 12 FD 35 00 CB F8 3E 84 95 2E 00 .0.....5...>....
01FE00: 06 CD 4D 07 EB 18 0E EB CB 7C 28 09 CD 4D 07 DD ..M......|(..M..
01FE10: 36 00 2D DD 23 D5 CD 90 07 E1 CD A6 04 ED 5B DB 6.-.#.........[.
01FE20: 00 DD E5 E1 B7 ED 52 EB 93 38 0A 28 08 47 3E 20 ......R..8.(.G>
01FE30: CD 92 18 10 F9 43 04 05 C8 7E CD 92 18 23 18 F7 .....C...~...#..
01FE40: C1 D1 D9 E1 D1 C1 D9 C5 DD 2A DB 00 D5 CD F4 0F .........*......
01FE50: 18 C7 C1 D1 C5 CD A6 04 CB 43 21 68 19 1E 04 20 .........C!h...
01FE60: C7 21 6C 19 1E 05 18 C0 54 52 55 45 46 41 4C 53 .!l.....TRUEFALS
01FE70: 45 CD A6 04 21 02 00 39 5E 23 CD 28 19 D1 F9 D5 E...!..9^#.(....
01FE80: C9 E1 7E 23 B7 28 08 47 7E CD 92 18 23 10 F9 E9 ..~#.(.G~...#...
01FE90: 3E 0D CD 92 18 3E 0A C3 92 18 06 0D 11 06 1A 22 >....>........."
01FEA0: E2 00 CB 46 21 00 00 C8 CD 5B 17 B8 28 03 FE 1A ...F!....[..(...
01FEB0: C0 23 C9 E5 CD 52 1B EB B7 ED 52 E1 30 0F CD F4 .#...R....R.0...
01FEC0: 19 2A E2 00 11 08 00 19 34 C0 23 34 C9 3E 99 C3 .*......4.#4.>..
01FED0: 20 16 E5 CD 52 1B B7 ED 52 20 0E 2A E2 00 11 04 ...R...R .*....
01FEE0: 00 19 34 20 04 23 34 28 06 E1 CD F3 19 18 D2 3E ..4 .#4(.......>
01FEF0: F2 18 DC 3E AF 32 E7 00 CD 24 16 EB 2A E2 00 CB ...>.2...$..*...
01FF00: 56 28 2F CB 96 3A E7 00 B7 28 0F 23 7E 2B B7 20 V(/..:...(.#~+.
01FF10: 09 78 B7 20 1D 79 B7 FA 32 1A C5 D5 0E 21 CD B5 .x. .y..2....!..
01FF20: 1A D1 C1 28 0D 3D 28 04 FE 03 20 58 3A E7 00 B7 ...(.=(... X:...
01FF30: 28 52 2A E2 00 3A E7 00 B7 28 02 CB DE 23 23 23 (R*..:...(...###
01FF40: 7E C6 2D D5 5F 16 00 19 D1 D6 2D CD 8C 1A ED A0 ~.-._.....-.....
01FF50: E2 58 1A 3C F2 4E 1A 3D 3C CD 8C 1A 2A E2 00 23 .X.<.N.=<...*..#
01FF60: 23 23 E6 7F 77 20 16 C5 D5 E5 CD 9F 1A E1 D1 C1 ##..w ..........
01FF70: 20 15 D5 11 2A 00 19 D1 34 20 02 23 34 78 B1 C2 ...*...4 .#4x..
01FF80: FC 19 EB C9 3E 99 01 3E F0 C3 20 16 F5 3A E7 00 ....>..>.. ..:..
01FF90: B7 28 01 EB F1 C9 22 E2 00 CD 9F 1A C8 18 E8 0E .(....".........
01FFA0: 22 2A E2 00 CB D6 CB 5E C8 CB 9E 18 08 2A E2 00 "*.....^.....*..
01FFB0: CB 56 C8 CB 96 E5 C5 11 30 00 19 EB 0E 1A CD 05 .V......0.......
01FFC0: 00 C1 E1 11 0C 00 19 EB CD 05 00 B7 C9 C1 D1 ED ................
01FFD0: 53 E2 00 C5 E5 CD 52 1B D1 B7 ED 52 38 41 2A E2 S.....R....R8A*.
01FFE0: 00 01 06 00 09 4E 23 46 23 73 23 72 CD 24 1B 01 .....N#F#s#r.$..
01FFF0: 04 00 09 30 01 13 7D E6 7F 29 EB ED 6A EB 53 5C ...0..}..)..j.S\
020000: 28 08 CD 43 0B CB 1D 3D 20 F8 FD 7E 00 F5 3E 0C (..C...= ..~..>.
020010: 08 78 1F 1F 1F 1F E6 0F C6 30 FD 77 00 FD 23 78 .x.......0.w..#x
020020: E6 0F 47 C5 D5 E5 CB 25 CD 50 0B CB 25 CD 50 0B ..G....%.P..%.P.
020030: EB E3 19 D1 E3 ED 5A EB E1 E3 ED 4A 44 4D E1 CB ......Z....JDM..
020040: 25 CD 50 0B 08 3D 20 C8 F1 C1 FD E1 C9 FD E5 E1 %.P..= .........
020050: 5F 16 00 19 7E 36 00 FE 35 D8 1D FA 69 11 2B 7E _...~6..5...i.+~
020060: 3C 77 FE 3A D8 36 00 18 F1 36 31 23 36 00 0C C9 <w.:.6...61#6...
020070: D9 01 00 00 D9 CD 3B 0B DD 7E 00 CD 84 04 FE 2E ......;..~......
020080: 20 0C D9 CB 70 37 C0 CB F0 D9 DD 23 18 EA FE 45 ...p7.....#...E
020090: 28 21 CD 06 12 30 54 08 CD 80 12 D8 08 D9 C5 6F (!...0T........o
0200A0: 26 00 CD D1 0F CD B3 09 D9 C1 D8 CB 70 28 01 0D &...........p(..
0200B0: D9 18 D7 CD EB 11 D8 D9 CB E0 DD 23 DD 7E 00 FE ...........#.~..
0200C0: 2B 28 06 FE 2D 20 04 CB E8 DD 23 CD 03 12 3F D8 +(..- ....#...?.
0200D0: 4F DD 23 CD 03 12 30 0A DD 23 57 79 87 87 81 87 O.#...0..#Wy....
0200E0: 82 4F CB 68 28 04 79 ED 44 4F D9 D9 79 C6 80 FE .O.h(.y.DO..y...
0200F0: 5A D8 FE A6 3F D8 C5 DD E5 79 CD 0D 12 DD E1 D9 Z...?....y......
020100: C1 D9 C9 DD 7E 00 D6 30 3F D0 FE 0A C9 F5 B7 F2 ....~..0?.......
020110: 14 12 ED 44 F5 CB 3F CB 3F 3C 21 FA FF 11 06 00 ...D..?.?<!.....
020120: 19 3D 20 FC EB DD 21 44 12 DD 19 CD 3C 0F F1 E6 .= ...!D....<...
020130: 03 28 08 F5 CD 80 12 F1 3D 20 F8 F1 B7 F2 60 0A .(......= ....`.
020140: D9 C3 BE 0A 81 00 00 00 00 00 8E 00 00 00 40 1C ..............@.
020150: 9B 00 00 20 BC 3E A8 00 10 A5 D4 68 B6 04 BF C9 ... .>.....h....
020160: 1B 0E C3 AC C5 EB 78 2D D0 CD CE 1B C2 53 DE F9 ......x-.....S..
020170: 78 39 3F 01 EB 2B A8 AD C5 1D F8 C9 7B CE 97 40 x9?..+......{..@
020180: 7D B7 C8 CB F8 C5 D5 7C CD 43 0B CD 43 0B 84 67 }......|.C..C..g
020190: E3 ED 5A EB E1 E3 ED 4A 44 4D E1 30 06 CD 44 0B ..Z....JDM.0..D.
0201A0: 2C 37 C8 7D C6 03 6F CB B8 C9 0E 01 18 02 0E 00 ,7.}..o.........
0201B0: CD 0C 13 1A BE 20 08 23 13 10 F8 79 EE 01 4F 21 ..... .#...y..O!
0201C0: 40 00 39 F9 69 26 00 DD E9 0E 01 18 02 0E 00 CD @.9.i&..........
0201D0: 0C 13 0D 20 01 EB 0E 00 1A B6 BE 20 E2 23 13 10 ... ....... .#..
0201E0: F7 0E 01 18 DA CD 0C 13 1A B6 77 23 13 10 F9 EB ..........w#....
0201F0: F9 DD E9 CD 0C 13 1A 2F A6 77 23 13 10 F8 18 EF ......./.w#.....
020200: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
020210: 1B 00 01 00 02 09 52 E5 1B 00 41 02 00 00 00 02 ......R...A.....
020220: 1B 00 46 02 00 00 00 02 1B 00 42 02 00 00 00 02 ..F.......B.....
020230: 1B 00 47 02 00 00 00 02 1B 00 43 02 00 00 00 02 ..G.......C.....
020240: 1B 00 48 02 00 00 00 02 1B 00 44 02 00 00 00 02 ..H.......D.....
020250: 1B 00 49 02 00 00 00 02 1B 00 45 02 00 00 00 02 ..I.......E.....
020260: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020270: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020280: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020290: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0202A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0202B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0202C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0202D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0202E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0202F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020300: 2A E2 00 23 23 23 77 01 2A 00 09 4E 23 46 EB B7 *..###w.*..N#F..
020310: ED 42 09 C8 D5 E5 CD 9F 1A D1 E1 72 2B 73 C9 3E .B.........r+s.>
020320: 91 C3 20 16 D5 D9 E1 D9 21 00 00 54 5D 3E 10 29 .. .....!..T]>.)
020330: EB ED 6A EB D9 29 D9 30 04 09 30 01 13 3D 20 EF ..j..).0..0..= .
020340: C9 CD 55 1B B7 ED 52 21 00 00 C0 23 C9 CD 55 1B ..U...R!...#..U.
020350: EB C9 2A E2 00 11 04 00 19 5E 23 56 23 D5 4E 23 ..*......^#V#.N#
020360: 46 23 5E 23 56 E1 C9 3E 22 18 02 3E 21 32 E7 00 F#^#V..>"..>!2..
020370: 44 4D DD E1 D1 E1 DD E5 22 E2 00 7E E6 03 CA F3 DM......"..~....
020380: 1B 78 B1 28 4C C5 D5 0E 1A CD 05 00 2A E2 00 11 .x.(L.......*...
020390: 0C 00 19 EB 3A E7 00 4F CD 05 00 D1 C1 B7 28 10 ....:..O......(.
0203A0: 6F 3A E7 00 FE 22 20 43 7D 3D 28 04 FE 03 20 3F o:..." C}=(... ?
0203B0: C5 D5 2A E2 00 11 2D 00 19 4E 23 46 03 70 2B 71 ..*...-..N#F.p+q
0203C0: 11 DB FF 19 71 23 70 D1 C1 21 80 00 19 EB 0B 18 ....q#p..!......
0203D0: B0 2A E2 00 11 09 00 19 46 2B 4E 2B 2B 2B 56 2B .*......F+N+++V+
0203E0: 5E EB B7 ED 42 D0 EB 71 23 70 C9 3E 99 18 06 3E ^...B..q#p.>...>
0203F0: F0 18 02 3E 04 C3 20 16 C1 D1 ED 53 E2 00 C5 E5 ...>.. ....S....
020400: CD 52 1B D1 B7 ED 52 DA 1F 1B 2A E2 00 01 08 00 .R....R...*.....
020410: 09 73 23 72 01 24 00 09 73 23 72 C9 22 E4 00 ED .s#r.$..s#r."...
020420: 53 E6 00 19 EB E1 22 E2 00 01 21 00 09 4E 23 46 S....."...!..N#F
020430: EB B7 ED 42 28 5E 78 B1 20 1A 2A E2 00 01 0C 00 ...B(^x. .*.....
020440: 09 06 18 36 00 23 10 FB ED 5B E2 00 0E 0F CD 05 ...6.#...[......
020450: 00 3C 28 48 2A E2 00 01 21 00 09 ED 4B E4 00 71 .<(H*...!...K..q
020460: 23 70 23 23 EB ED 4B E6 00 C5 D5 0E 1A CD 05 00 #p##..K.........
020470: ED 5B E2 00 0E 21 CD 05 00 B7 20 20 2A E2 00 01 .[...!.... *...
020480: 21 00 09 34 20 02 23 34 D1 21 80 00 19 EB C1 0B !..4 .#4.!......
020490: 78 B1 20 D5 2A E2 00 01 24 00 09 E9 DD 2A E2 00 x. .*...$....*..
0204A0: 3E F0 C3 77 1F 22 F2 00 EB E1 E3 22 F4 00 13 13 >..w."....."....
0204B0: 13 7B E6 FC 5F 21 ED 00 22 EB 00 DD 2A ED 00 DD .{.._!.."...*...
0204C0: 6E 02 DD 66 03 7D B4 28 48 ED 52 30 0F DD 6E 00 n..f.}.(H.R0..n.
0204D0: DD 66 01 E5 DD 22 EB 00 DD E1 18 E3 20 0A DD 5E .f..."...... ..^
0204E0: 00 DD 56 01 DD E5 18 1B 4D 44 DD 6E 00 DD 66 01 ..V.....MD.n..f.
0204F0: DD E5 DD 19 DD 75 00 DD 74 01 DD 71 02 DD 70 03 .....u..t..q..p.
020500: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
020510: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
020520: 2D CD 90 19 CD 62 1F CD 52 16 CD 81 19 17 20 20 -....b..R.....
020530: 20 20 20 20 20 20 20 20 20 54 75 72 62 6F 20 50 Turbo P
020540: 61 73 63 61 6C CD 90 19 CD 62 1F CD 52 16 CD 81 ascal....b..R...
020550: 19 20 20 20 49 6E 73 74 61 6C 6C 61 74 69 6F 6E . Installation
020560: 20 50 72 6F 67 72 61 6D 20 47 65 6E 65 72 61 74 Program Generat
020570: 6F 72 CD 90 19 CD 62 1F CD 52 16 CD 90 19 CD 62 or....b..R.....b
020580: 1F CD 52 16 CD 81 19 17 20 20 20 20 20 20 20 20 ..R.....
020590: 20 20 56 65 72 73 69 6F 6E 20 32 2E 30 30 41 CD Version 2.00A.
0205A0: 90 19 CD 62 1F CD 52 16 CD 81 19 22 43 6F 70 79 ...b..R...."Copy
0205B0: 72 69 67 68 74 20 28 43 29 20 31 39 38 34 20 62 right (C) 1984 b
0205C0: 79 20 42 6F 72 6C 61 6E 64 20 49 6E 63 2E CD 90 y Borland Inc...
0205D0: 19 CD 62 1F CD 52 16 CD 81 19 22 2D 2D 2D 2D 2D ..b..R...."-----
0205E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0205F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D CD 90 19 -------------...
020600: CD 62 1F CD 52 16 CD 90 19 CD 62 1F CD 52 16 CD .b..R.....b..R..
020610: 90 19 CD 62 1F 21 FF 9C E5 CD 1D 05 09 47 49 4E ...b.!.......GIN
020620: 53 54 2E 43 4F 44 CD 3D 13 21 FF 9C CD 7A 14 CD ST.COD.=.!...z..
020630: 35 1F E5 21 00 00 D1 CD 61 06 CB 45 CA 5E 26 CD 5..!....a..E.^&.
020640: 1D 05 18 46 69 6C 65 20 47 49 4E 53 54 2E 43 4F ...File GINST.CO
020650: 44 20 6E 6F 74 20 66 6F 75 6E 64 CD 5C 20 21 40 D not found.\ !@
020660: 9F E5 CD 1D 05 09 47 49 4E 53 54 2E 4D 53 47 CD ......GINST.MSG.
020670: 3C 13 CD 62 1F 21 40 9F CD CF 13 CD 35 1F E5 21 <..b.!@.....5..!
020680: 00 00 D1 CD 61 06 CB 45 CA B2 26 CD 1D 05 20 4D ....a..E..&... M
020690: 65 73 73 61 67 65 20 66 69 6C 65 20 47 49 4E 53 essage file GINS
0206A0: 54 2E 4D 53 47 20 6E 6F 74 20 66 6F 75 6E 64 CD T.MSG not found.
0206B0: 5C 20 21 E0 9D E5 CD 1D 05 09 47 49 4E 53 54 2E \ !.......GINST.
0206C0: 44 54 41 CD 3D 13 21 E0 9D 11 95 00 CD 15 14 CD DTA.=.!.........
0206D0: 35 1F E5 21 00 00 D1 CD 61 06 7D 32 DF 9D CD 52 5..!....a.}2...R
0206E0: 16 CD 90 19 CD 62 1F CD 52 16 CD 81 19 22 45 6E .....b..R...."En
0206F0: 74 65 72 20 6E 61 6D 65 20 6F 66 20 70 72 6F 67 ter name of prog
020700: DD E5 D1 2A EB 00 73 23 72 D1 2A F4 00 73 23 72 ...*..s#r.*..s#r
020710: C9 DD E5 E1 19 22 CD 00 2A F2 00 01 04 00 09 DD ....."..*.......
020720: E5 C1 09 DA 35 1D ED 4B CF 00 ED 42 01 00 00 21 ....5..K...B...!
020730: 00 00 DA F0 1C 3E FF C3 75 1F EB E1 E3 7E 23 66 .....>..u....~#f
020740: 6F 13 13 13 7B E6 FC 5F EB 22 F2 00 2A ED 00 E5 o...{.._."..*...
020750: DD E1 B7 ED 52 30 52 DD 6E 00 DD 66 01 E5 B7 ED ....R0R.n..f....
020760: 52 30 04 DD E1 18 F0 E1 D5 FD E1 ED 4B F2 00 FD R0..........K...
020770: 71 02 FD 70 03 FD 75 00 FD 74 01 DD 73 00 DD 72 q..p..u..t..s..r
020780: 01 DD E5 E1 DD 4E 02 DD 46 03 CD C4 1D 28 09 DD .....N..F....(..
020790: 5E 00 DD 56 01 D5 DD E1 DD E5 E1 DD 4E 02 DD 46 ^..V........N..F
0207A0: 03 DD 5E 00 DD 56 01 18 1B 2A ED 00 ED 53 ED 00 ..^..V...*...S..
0207B0: D5 DD E1 DD 75 00 DD 74 01 ED 4B F2 00 DD 71 02 ....u..t..K...q.
0207C0: DD 70 03 EB 09 B7 ED 52 C0 D5 FD E1 2A CD 00 B7 .p.....R....*...
0207D0: ED 52 28 1B FD 7E 00 DD 77 00 FD 7E 01 DD 77 01 .R(..~..w..~..w.
0207E0: FD 6E 02 FD 66 03 09 DD 75 02 DD 74 03 AF C9 DD .n..f...u..t....
0207F0: E5 E1 22 CD 00 06 04 36 00 23 10 FB C9 CD 0B 1E .."....6.#......
020800: 2A F6 00 C9 CD 0B 1E 2A F8 00 C9 21 00 00 22 F6 *......*...!..".
020810: 00 22 F8 00 DD 2A ED 00 DD 4E 02 DD 46 03 79 B0 ."...*...N..F.y.
020820: 28 1E 2A F6 00 09 22 F6 00 2A F8 00 B7 ED 42 30 (.*..."..*....B0
020830: 04 ED 43 F8 00 DD 6E 00 DD 66 01 E5 DD E1 18 D8 ..C...n..f......
020840: 2A CF 00 01 FB FF 09 ED 5B CD 00 B7 ED 52 D8 EB *.......[....R..
020850: 2A F6 00 19 22 F6 00 2A F8 00 B7 ED 52 D0 ED 53 *..."..*....R..S
020860: F8 00 C9 ED 5B CD 00 73 23 72 C9 5E 23 56 ED 53 ....[..s#r.^#V.S
020870: CD 00 C9 3E AF 4F 22 E6 00 AF 77 32 D9 00 78 32 ...>.O"...w2..x2
020880: E8 00 21 EA 1E 22 E2 00 E1 22 E4 00 E1 0C 0D 20 ..!.."...".....
020890: 05 CD F6 18 18 03 CD 40 19 2A E4 00 E9 3E AF 32 .......@.*...>.2
0208A0: EA 00 22 E6 00 21 EA 1E 22 E2 00 E1 22 E4 00 E1 .."..!.."..."...
0208B0: 22 E8 00 21 5C 00 06 1E CD B2 05 AF 12 2A E8 00 "..!\........*..
0208C0: 3A EA 00 B7 20 05 CD EE 17 18 03 CD 12 18 21 D9 :... .........!.
0208D0: 00 7E 36 00 B7 67 6F 28 08 DD E5 E1 11 5C 00 ED .~6..go(.....\..
0208E0: 52 EB 2A E6 00 73 23 72 18 AF 03 FF 00 ED 5F 32 R.*..s#r......_2
0208F0: D4 00 C9 EB DD E1 C1 E1 78 B1 28 0B 73 0B 78 B1 ........x.(.s.x.
020900: 72 61 6D 20 74 6F 20 69 6E 73 74 61 6C 6C 3A 20 ram to install:
020910: CD 62 1F 21 05 20 CD 2B 16 06 0E CD 2E 18 CD 5F .b.!. .+......._
020920: 18 CD 62 1F 21 05 20 E5 CD F1 20 21 05 20 E5 CD ..b.!. ... !. ..
020930: A9 20 21 05 20 CD 0A 05 CD 1D 05 00 CD 5C 06 CB . !. ........\..
020940: 45 CA 47 27 CD C5 1F 21 2E 00 65 2E 01 E5 21 05 E.G'...!..e...!.
020950: 20 CD 0A 05 CD 7C 08 E5 21 00 00 D1 CD 4E 06 CB ....|..!....N..
020960: 45 CA 85 27 21 05 20 CD 0A 05 21 2E 00 65 2E 01 E..'!. ...!..e..
020970: E5 CD 07 08 21 14 20 CD 0A 05 CD 07 08 06 0E 21 ....!. ........!
020980: 05 20 CD B2 05 CD 52 16 CD 90 19 CD 62 1F CD 52 . ....R.....b..R
020990: 16 CD 81 19 29 45 6E 74 65 72 20 66 69 72 73 74 ....)Enter first
0209A0: 20 6E 61 6D 65 20 66 6F 72 20 69 6E 73 74 61 6C name for instal
0209B0: 6C 61 74 69 6F 6E 20 66 69 6C 65 73 3A 20 CD 62 lation files: .b
0209C0: 1F 21 E7 1F CD 2B 16 06 0E CD 2E 18 CD 5F 18 CD .!...+......._..
0209D0: 62 1F 21 E7 1F E5 CD F1 20 21 E7 1F E5 CD A9 20 b.!..... !.....
0209E0: 21 2E 00 65 2E 01 E5 21 E7 1F CD 0A 05 CD 7C 08 !..e...!......|.
0209F0: E5 21 00 00 D1 CD 4E 06 E5 21 E7 1F CD 0A 05 CD .!....N..!......
020A00: 6D 08 E5 CD 51 05 21 01 00 E5 21 08 00 CD 6B 05 m...Q.!...!...k.
020A10: CD 1C 13 D1 7D A3 6F 7D 32 8A 8A 2A 8A 8A 26 00 ....}£o}2..*..&.
020A20: 7D EE 01 6F CB 45 CA 45 28 CD 52 16 CD 81 19 12 }..o.E.E(.R.....
020A30: 45 72 72 6F 72 20 69 6E 20 66 69 6C 65 20 6E 61 Error in file na
020A40: 6D 65 CD 62 1F 2A 8A 8A 26 00 CB 45 CA 85 27 21 me.b.*..&..E..'!
020A50: E7 1F CD 0A 05 21 2E 00 65 2E 01 E5 CD 07 08 21 .....!..e......!
020A60: 14 20 CD 0A 05 CD 07 08 06 14 21 37 9C CD B2 05 . ........!7....
020A70: 21 E7 1F CD 0A 05 CD 1D 05 04 2E 44 54 41 CD 07 !..........DTA..
020A80: 08 06 0E 21 F6 1F CD B2 05 21 E7 1F CD 0A 05 CD ...!.....!......
020A90: 1D 05 04 2E 4D 53 47 CD 07 08 06 0E 21 E7 1F CD ....MSG.....!...
020AA0: B2 05 CD 52 16 CD 90 19 CD 62 1F CD 52 16 CD 90 ...R.....b..R...
020AB0: 19 CD 62 1F 21 4C 9C E5 21 37 9C CD 0A 05 CD 3D ..b.!L..!7.....=
020AC0: 13 21 2F 9D E5 21 F6 1F CD 0A 05 CD 3D 13 21 90 .!/..!......=.!.
020AD0: 9E E5 21 E7 1F CD 0A 05 CD 3C 13 CD 62 1F CD 52 ..!......<..b..R
020AE0: 16 CD 81 19 09 43 72 65 61 74 69 6E 67 20 21 37 .....Creating !7
020AF0: 9C CD 0A 05 21 00 00 CD 71 19 CD 62 1F 21 4C 9C ....!...q..b.!L.
020B00: 28 05 54 5D 13 ED B0 DD E9 44 4D DD E1 D1 E1 B7 (.T].....DM.....
020B10: ED 52 19 30 F0 0B 09 EB 09 EB 03 ED B8 DD E9 D1 .R.0............
020B20: C1 D5 2D 61 25 C3 C6 02 7D CD 84 04 6F C9 2A 01 ..-a%...}...o.*.
020B30: 00 19 19 19 E9 21 D9 00 7E 36 00 6F 26 00 C9 CD .....!..~6.o&...
020B40: A0 00 7C B5 C8 CD A3 00 7D FE 03 C0 DD E1 CD 25 ..|...£.}......%
020B50: 02 5E 43 0D 0A 55 73 65 72 20 62 72 65 61 6B 00 .^C..User break.
020B60: 18 31 3A D9 00 B7 C8 DD E1 F5 CD 25 02 0D 0A 49 .1:........%...I
020B70: 2F 4F 00 18 10 DD E1 CD 25 02 0D 0A 52 75 6E 2D /O......%...Run-
020B80: 74 69 6D 65 00 CD 25 02 20 65 72 72 6F 72 20 00 time..%. error .
020B90: CD 92 04 CD 25 02 2C 20 50 43 3D 00 DD E5 E1 ED ....%., PC=.....
020BA0: 5B D5 00 B7 ED 52 11 15 00 19 22 D7 00 CD 8D 04 [....R....".....
020BB0: CD 25 02 0D 0A 50 72 6F 67 72 61 6D 20 61 62 6F .%...Program abo
020BC0: 72 74 65 64 00 2A DF 00 E9 31 00 01 21 80 A0 11 rted.*...1..!...
020BD0: B8 00 01 00 00 CD 8D 03 21 10 2B 11 8A 8A 01 00 ........!.+.....
020BE0: 00 CD B2 04 C3 EF 24 00 00 00 00 00 00 00 00 00 ......$.........
020BF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020C00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020C10: 00 00 00 00 03 43 4F 4D CD FD 1D 22 7E A0 2A 7E .....COM..."~.*~
020C20: A0 C9 CD 04 1E 22 7C A0 2A 7C A0 C9 21 82 00 11 ....."|.*|..!...
020C30: 00 00 01 00 00 C5 D5 E5 CD 22 20 E5 21 01 00 D1 ........." .!...
020C40: CD 20 07 CD D1 0F D9 E1 D1 C1 CD C4 09 D9 21 76 . ............!v
020C50: A0 CD A1 05 21 76 A0 CD FC 04 C9 C9 FD E1 06 50 ....!v.........P
020C60: 21 25 A0 CD B2 05 FD E5 CD 35 1F E5 21 00 00 D1 !%.......5..!...
020C70: CD 4E 06 CB 45 CA 78 20 CD 52 16 CD 90 19 CD 52 .N..E.x .R.....R
020C80: 16 CD 81 19 11 2A 2A 2A 20 46 41 54 41 4C 20 45 .....*** FATAL E
020C90: 52 52 4F 52 3A 20 21 25 A0 CD 0A 05 21 00 00 CD RROR: !%....!...
020CA0: 71 19 CD 90 19 CD C5 1F C9 FD E1 E1 22 23 A0 FD q..........."#..
020CB0: E5 21 01 00 E5 2A 23 A0 CD 0A 05 CD 6D 08 D1 CD .!...*#.....m...
020CC0: 35 06 7A B3 CA F0 20 D5 22 21 A0 2A 23 A0 E5 2A 5.z... ."!.*#..*
020CD0: 21 A0 D1 19 E5 2A 23 A0 E5 2A 21 A0 D1 19 6E 26 !....*#..*!...n&
020CE0: 00 CD 28 1F EB E1 73 2A 21 A0 23 D1 1B C3 C2 20 ..(...s*!.#....
020CF0: C9 FD E1 E1 22 1F A0 FD E5 2A 1F A0 CD 0A 05 CD ...."....*......
020D00: CD 79 14 CD 62 1F 21 4C 9C CD 55 1B E5 21 FF 9C .y..b.!L..U..!..
020D10: CD 55 1B D1 CD AF 06 CB 45 CA 7E 29 21 4C 9C CD .U......E.~)!L..
020D20: 55 1B 22 8B 8A 21 FF 9C E5 2A 8B 8A CD F8 1B CD U."..!...*......
020D30: 62 1F 21 4C 9C E5 2A 8B 8A CD F8 1B CD 62 1F 21 b.!L..*......b.!
020D40: FF 9C CD 55 1B E5 2A 8B 8A D1 EB B7 ED 52 E5 21 ...U..*......R.!
020D50: 20 00 E5 CD 76 21 22 8B 8A 21 FF 9C E5 21 8D 8A ...v!"..!...!..
020D60: E5 2A 8B 8A CD 6B 1B CD 62 1F 21 4C 9C E5 21 8D .*...k..b.!L..!.
020D70: 8A E5 2A 8B 8A CD 67 1B CD 62 1F C3 06 29 21 4C ..*...g..b...)!L
020D80: 9C E5 CD A5 21 21 E7 1F E5 21 00 01 D1 EB B7 ED ....!!...!......
020D90: 52 22 8B 8A 21 4C 9C E5 21 E7 1F E5 2A 8B 8A E5 R"..!L..!...*...
020DA0: 21 80 00 D1 CD DE 06 E5 2A 8B 8A E5 21 80 00 D1 !.......*...!...
020DB0: CD 0F 07 E5 21 03 00 E5 21 0F 00 D1 CD C4 06 E5 ....!...!.......
020DC0: CD 0C 24 21 4C 9C E5 CD F4 22 2A DF 9D 26 00 7D ..$!L...."*..&.}
020DD0: EE 01 6F CB 45 CA 45 2A CD 52 16 CD 90 19 CD 62 ..o.E.E*.R.....b
020DE0: 1F CD 52 16 CD 81 19 09 43 72 65 61 74 69 6E 67 ..R.....Creating
020DF0: 20 21 F6 1F CD 0A 05 21 00 00 CD 71 19 CD 62 1F !.....!...q..b.
020E00: 21 2F 9D 11 95 00 CD 14 14 CD 62 1F 21 E0 9D CD !/........b.!...
020E10: 41 1B 7D EE 01 6F CB 45 CA 3C 2A 21 E0 9D CD 38 A.}..o.E.<*!...8
020E20: 16 21 A2 9B CD B3 19 CD 62 1F 21 2F 9D CD 5B 16 .!......b.!/..[.
020E30: 21 A2 9B CD D2 19 CD 62 1F C3 0C 2A 21 2F 9D CD !......b...*!/..
020E40: 2D 15 CD 62 1F CD 52 16 CD 90 19 CD 62 1F CD 52 -..b..R.....b..R
020E50: 16 CD 81 19 09 43 72 65 61 74 69 6E 67 20 21 E7 .....Creating !.
020E60: 1F CD 0A 05 21 00 00 CD 71 19 CD 62 1F 21 90 9E ....!...q..b.!..
020E70: CD CE 13 CD 62 1F 21 40 9F CD 9D 19 7D EE 01 6F ....b.!@....}..o
020E80: CB 45 CA B4 2A 21 40 9F CD 38 16 21 8D 9A 06 FF .E..*!@..8.!....
020E90: CD 2E 18 CD 5F 18 CD 62 1F 21 90 9E CD 5B 16 21 ...._..b.!...[.!
020EA0: 8D 9A CD 0A 05 21 00 00 CD 71 19 CD 90 19 CD 62 .....!...q.....b
020EB0: 1F C3 76 2A 21 90 9E CD EE 14 CD 62 1F CD 52 16 ..v*!......b..R.
020EC0: CD 90 19 CD 62 1F CD 52 16 CD 90 19 CD 62 1F CD ....b..R.....b..
020ED0: 52 16 CD 81 19 19 49 6E 73 74 61 6C 6C 61 74 69 R.....Installati
020EE0: 6F 6E 20 70 72 6F 67 72 61 6D 20 66 6F 72 20 21 on program for !
020EF0: 05 20 CD 0A 05 21 00 00 CD 71 19 CD 81 19 08 20 . ...!...q.....
020F00: 6D 08 E5 21 00 00 D1 CD 9B 06 E5 2A 1F A0 E5 21 m..!.......*...!
020F10: 01 00 D1 19 6E 26 00 E5 21 20 00 D1 CD 4E 06 D1 ....n&..! ...N..
020F20: 7D A3 6F CB 45 CA 39 21 2A 1F A0 E5 21 01 00 E5 }£o.E.9!*...!...
020F30: 21 01 00 CD BD 08 C3 F9 20 2A 1F A0 E5 2A 1F A0 !....... *...*..
020F40: CD 0A 05 CD 6D 08 D1 19 6E 26 00 E5 21 20 00 D1 ....m...n&..! ..
020F50: CD 4E 06 CB 45 CA 75 21 2A 1F A0 E5 21 00 00 D1 .N..E.u!*...!...
020F60: 19 E5 2A 1F A0 E5 21 00 00 D1 19 6E 26 00 2B EB ..*...!....n&.+.
020F70: E1 73 C3 39 21 C9 FD E1 E1 22 19 A0 E1 22 1B A0 .s.9!...."..."..
020F80: FD E5 2A 1B A0 E5 2A 19 A0 D1 CD AF 06 CB 45 CA ..*...*.......E.
020F90: 9B 21 2A 1B A0 22 1D A0 C3 A1 21 2A 19 A0 22 1D .!*.."....!*..".
020FA0: A0 2A 1D A0 C9 FD E1 E1 22 17 A0 FD E5 2A 17 A0 .*......"....*..
020FB0: 22 15 A0 2A 15 A0 11 30 00 19 E5 21 FF FF EB E1 "..*...0...!....
020FC0: 73 23 72 2A 15 A0 11 32 00 19 E5 21 00 00 EB E1 s#r*...2...!....
020FD0: 73 C9 FD E1 E1 7D 32 10 A0 E1 22 11 A0 E1 22 13 s....}2..."...".
020FE0: A0 FD E5 2A 13 A0 22 0E A0 2A 11 A0 E5 2A 0E A0 ...*.."..*...*..
020FF0: 11 30 00 19 5E 23 56 EB D1 CD 61 06 CB 45 CA F3 .0..^#V...a..E..
021000: 22 2A 0E A0 11 32 00 19 6E 26 00 CB 45 CA 48 22 "*...2..n&..E.H"
021010: 2A 0E A0 E5 2A 0E A0 11 30 00 19 5E 23 56 EB CD *...*...0..^#V..
021020: F8 1B CD 62 1F 2A 0E A0 E5 2A 0E A0 11 33 00 19 ...b.*...*...3..
021030: E5 21 01 00 CD 67 1B CD 62 1F 2A 0E A0 11 32 00 .!...g..b.*...2.
021040: 19 E5 21 00 00 EB E1 73 2A 11 A0 E5 2A 0E A0 CD ..!....s*...*...
021050: 55 1B E5 21 01 00 D1 EB B7 ED 52 D1 CD 9B 06 CB U..!......R.....
021060: 45 CA C1 22 2A 10 A0 26 00 CB 45 CA 87 22 CD 1D E.."*..&..E.."..
021070: 05 0F 53 65 65 6B 20 72 65 61 64 20 65 72 72 6F ..Seek read erro
021080: 72 CD 5C 20 C3 B1 22 2A 11 A0 E5 2A 0E A0 CD 55 r.\ .."*...*...U
021090: 1B D1 CD 9B 06 CB 45 CA B1 22 CD 1D 05 10 53 65 ......E.."....Se
0210A0: 65 6B 20 77 72 69 74 65 20 65 72 72 6F 72 CD 5C ek write error.\
0210B0: 20 2A 0E A0 E5 2A 11 A0 CD F8 1B CD 62 1F C3 E3 *...*......b...
0210C0: 22 2A 0E A0 E5 2A 11 A0 CD F8 1B CD 62 1F 2A 0E "*...*......b.*.
0210D0: A0 E5 2A 0E A0 11 33 00 19 E5 21 01 00 CD 6B 1B ..*...3...!...k.
0210E0: CD 62 1F 2A 0E A0 11 30 00 19 E5 2A 11 A0 EB E1 .b.*...0...*....
0210F0: 73 23 72 C9 FD E1 E1 22 0C A0 FD E5 2A 0C A0 22 s#r...."....*.."
021100: 63 72 65 61 74 65 64 CD 90 19 CD 62 1F C3 C5 1F created....b....
021110: CD 2E 18 CD 5F 18 CD 62 1F 21 90 9E CD 5B 16 21 ...._..b.!...[.!
021120: 8D 9A CD 0A 05 21 00 00 CD 71 19 CD 90 19 CD 62 .....!...q.....b
021130: 1F C3 76 2A 21 90 9E CD EE 14 CD 62 1F CD 52 16 ..v*!......b..R.
021140: CD 90 19 CD 62 1F CD 52 16 CD 90 19 CD 62 1F CD ....b..R.....b..
021150: 52 16 CD 81 19 19 49 6E 73 74 61 6C 6C 61 74 69 R.....Installati
021160: 6F 6E 20 70 72 6F 67 72 61 6D 20 66 6F 72 20 21 on program for !
021170: 05 20 CD 0A 05 21 00 00 CD 71 19 CD 81 19 08 20 . ...!...q.....
021180: 9C E5 CD A5 21 21 E7 1F E5 21 00 01 D1 EB B7 ED ....!!...!......
021190: 52 22 8B 8A 21 4C 9C E5 21 E7 1F E5 2A 8B 8A E5 R"..!L..!...*...
0211A0: 21 80 00 D1 CD DE 06 E5 2A 8B 8A E5 21 80 00 D1 !.......*...!...
0211B0: CD 0F 07 E5 21 03 00 E5 21 0F 00 D1 CD C4 06 E5 ....!...!.......
0211C0: CD 0C 24 21 4C 9C E5 CD F4 22 2A DF 9D 26 00 7D ..$!L...."*..&.}
0211D0: EE 01 6F CB 45 CA 45 2A CD 52 16 CD 90 19 CD 62 ..o.E.E*.R.....b
0211E0: 1F CD 52 16 CD 81 19 09 43 72 65 61 74 69 6E 67 ..R.....Creating
0211F0: 20 21 F6 1F CD 0A 05 21 00 00 CD 71 19 CD 62 1F !.....!...q..b.
021200: 21 2F 9D 11 95 00 CD 14 14 CD 62 1F 21 E0 9D CD !/........b.!...
021210: 41 1B 7D EE 01 6F CB 45 CA 3C 2A 21 E0 9D CD 38 A.}..o.E.<*!...8
021220: 16 21 A2 9B CD B3 19 CD 62 1F 21 2F 9D CD 5B 16 .!......b.!/..[.
021230: 21 A2 9B CD D2 19 CD 62 1F C3 0C 2A 21 2F 9D CD !......b...*!/..
021240: 2D 15 CD 62 1F CD 52 16 CD 90 19 CD 62 1F CD 52 -..b..R.....b..R
021250: 16 CD 81 19 09 43 72 65 61 74 69 6E 67 20 21 E7 .....Creating !.
021260: 1F CD 0A 05 21 00 00 CD 71 19 CD 62 1F 21 90 9E ....!...q..b.!..
021270: CD CE 13 CD 62 1F 21 40 9F CD 9D 19 7D EE 01 6F ....b.!@....}..o
021280: CB 45 CA B4 2A 21 40 9F CD 38 16 21 8D 9A 06 FF .E..*!@..8.!....
021290: CD 2E 18 CD 5F 18 CD 62 1F 21 90 9E CD 5B 16 21 ...._..b.!...[.!
0212A0: 8D 9A CD 0A 05 21 00 00 CD 71 19 CD 90 19 CD 62 .....!...q.....b
0212B0: 1F C3 76 2A 21 90 9E CD EE 14 CD 62 1F CD 52 16 ..v*!......b..R.
0212C0: CD 90 19 CD 62 1F CD 52 16 CD 90 19 CD 62 1F CD ....b..R.....b..
0212D0: 52 16 CD 81 19 19 49 6E 73 74 61 6C 6C 61 74 69 R.....Installati
0212E0: 6F 6E 20 70 72 6F 67 72 61 6D 20 66 6F 72 20 21 on program for !
0212F0: 05 20 CD 0A 05 21 00 00 CD 71 19 CD 81 19 08 20 . ...!...q.....
021300: 0A A0 2A 0A A0 11 32 00 19 6E 26 00 CB 45 CA 3B ..*...2..n&..E.;
021310: 23 2A 0A A0 E5 2A 0A A0 11 30 00 19 5E 23 56 EB #*...*...0..^#V.
021320: CD F8 1B CD 62 1F 2A 0A A0 E5 2A 0A A0 11 33 00 ....b.*...*...3.
021330: 19 E5 21 01 00 CD 67 1B CD 62 1F 2A 0A A0 CD 53 ..!...g..b.*...S
021340: 15 CD 62 1F C9 FD E1 E1 22 01 A0 E1 7D 32 03 A0 ..b....."...}2..
021350: E1 22 04 A0 E1 22 06 A0 E1 22 08 A0 FD E5 2A 08 ."..."..."....*.
021360: A0 E5 2A 04 A0 E5 21 01 00 E5 CD D2 21 21 80 00 ..*...!.....!!..
021370: E5 2A 03 A0 26 00 D1 EB B7 ED 52 22 FD 9F 2A 08 .*..&.....R"..*.
021380: A0 22 FF 9F 2A FF 9F 11 33 00 19 E5 2A 03 A0 26 ."..*...3...*..&
021390: 00 D1 19 E5 2A 06 A0 E5 2A FD 9F E5 2A 01 A0 E5 ....*...*...*...
0213A0: CD 76 21 CD 09 1F 2A FD 9F E5 2A 01 A0 D1 CD AF .v!...*...*.....
0213B0: 06 CB 45 CA 0B 24 2A 08 A0 E5 2A FF 9F 11 30 00 ..E..$*...*...0.
0213C0: 19 5E 23 56 EB E5 21 01 00 D1 19 E5 21 01 00 E5 .^#V..!.....!...
0213D0: CD D2 21 2A FF 9F 11 33 00 19 E5 2A 06 A0 E5 2A ..!*...3...*...*
0213E0: FD 9F D1 19 E5 21 80 00 E5 2A 01 A0 E5 2A FD 9F .....!...*...*..
0213F0: D1 EB B7 ED 52 E5 CD 76 21 CD 09 1F 2A FD 9F E5 ....R..v!...*...
021400: 21 80 00 D1 19 22 FD 9F C3 A6 23 C9 FD E1 E1 22 !...."....#...."
021410: F4 9F E1 7D 32 F6 9F E1 22 F7 9F E1 22 F9 9F E1 ...}2..."..."...
021420: 22 FB 9F FD E5 2A FB 9F E5 2A F7 9F E5 21 00 00 "....*...*...!..
021430: E5 CD D2 21 21 80 00 E5 2A F6 9F 26 00 D1 EB B7 ...!!...*..&....
021440: ED 52 E5 2A F4 9F E5 CD 76 21 22 F0 9F 2A FB 9F .R.*....v!"..*..
021450: 22 F2 9F 2A F9 9F E5 2A F2 9F 11 33 00 19 E5 2A "..*...*...3...*
021460: F6 9F 26 00 D1 19 E5 2A F0 9F CD 09 1F 2A F2 9F ..&....*.....*..
021470: 11 32 00 19 E5 21 01 00 EB E1 73 2A F0 9F E5 2A .2...!....s*...*
021480: F4 9F D1 CD AF 06 CB 45 CA EE 24 2A FB 9F E5 2A .......E..$*...*
021490: F2 9F 11 30 00 19 5E 23 56 EB E5 21 01 00 D1 19 ...0..^#V..!....
0214A0: E5 21 00 00 E5 CD D2 21 2A F9 9F E5 2A F0 9F D1 .!.....!*...*...
0214B0: 19 E5 2A F2 9F 11 33 00 19 E5 21 80 00 E5 2A F4 ..*...3...!...*.
0214C0: 9F E5 2A F0 9F D1 EB B7 ED 52 E5 CD 76 21 CD 09 ..*......R..v!..
0214D0: 1F 2A F2 9F 11 32 00 19 E5 21 01 00 EB E1 73 2A .*...2...!....s*
0214E0: F0 9F E5 21 80 00 D1 19 22 F0 9F C3 7B 24 C9 CD ...!...."...{$..
0214F0: 52 16 CD 90 19 CD 62 1F CD 52 16 CD 81 19 22 2D R.....b..R...."-
021500: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
021510: 1C 00 01 00 02 09 52 E5 1C 00 41 02 00 00 00 02 ......R...A.....
021520: 1C 00 46 02 00 00 00 02 1C 00 42 02 00 00 00 02 ..F.......B.....
021530: 1C 00 47 02 00 00 00 02 1C 00 43 02 00 00 00 02 ..G.......C.....
021540: 1C 00 48 02 00 00 00 02 1C 00 44 02 00 00 00 02 ..H.......D.....
021550: 1C 00 49 02 00 00 00 02 1C 00 45 02 00 00 00 02 ..I.......E.....
021560: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021570: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021580: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021590: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0215A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0215B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0215C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0215D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0215E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0215F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021600: 1E 00 95 00 0D 41 44 44 53 20 32 30 2F 32 35 2F .....ADDS 20/25/
021610: 33 30 00 00 00 00 00 00 00 04 03 1B 30 50 00 00 30..........0P..
021620: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021630: 00 00 00 00 00 00 00 00 00 00 04 1B 59 00 00 00 ............Y...
021640: 00 00 00 00 00 00 00 00 00 00 01 03 04 20 20 00 ............. .
021650: 00 01 0C 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021660: 00 00 00 00 00 00 00 00 00 00 00 00 00 02 1B 4B ...............K
021670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 50 ...............P
021680: 18 01 00 00 02 1B 59 00 00 00 00 00 00 00 00 00 ......Y.........
021690: 00 00 00 00 00 00 01 01 00 0A 41 44 44 53 20 34 ..........ADDS 4
0216A0: 30 2F 36 30 00 00 00 00 00 00 00 00 00 00 04 03 0/60............
0216B0: 1B 30 50 00 00 00 00 00 00 00 00 00 00 00 00 00 .0P.............
0216C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 ................
0216D0: 1B 59 00 00 00 00 00 00 00 00 00 00 00 00 00 01 .Y..............
0216E0: 03 04 20 20 00 00 01 0C 00 00 00 00 00 00 00 00 .. ............
0216F0: 00 00 00 00 01 0E 00 00 00 00 01 0F 00 00 00 00 ................
021700: 00 00 02 1B 4B 00 00 00 02 1B 4D 00 00 00 02 1B ....K.....M.....
021710: 6C 00 00 00 50 18 01 00 00 02 1B 59 00 00 00 00 l...P......Y....
021720: 00 00 00 00 00 00 00 00 00 00 00 01 01 00 11 41 ...............A
021730: 44 44 53 20 56 69 65 77 70 6F 69 6E 74 2D 31 41 DDS Viewpoint-1A
021740: 00 00 00 04 03 1B 30 41 00 00 00 00 00 00 00 00 ......0A........
021750: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021760: 00 00 00 00 04 1B 59 00 00 00 00 00 00 00 00 00 ......Y.........
021770: 00 00 00 00 01 04 03 20 20 00 00 01 0C 00 00 00 ....... .......
021780: 00 00 00 00 00 00 00 00 00 01 0F 00 00 00 00 01 ................
021790: 0E 00 00 00 00 00 00 02 1B 4B 00 00 00 00 00 00 .........K......
0217A0: 00 00 00 00 00 00 00 00 00 50 18 01 00 00 02 1B .........P......
0217B0: 59 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 Y...............
0217C0: 00 01 00 06 41 44 4D 20 33 41 00 00 00 00 00 00 ....ADM 3A......
0217D0: 00 00 00 00 00 00 00 00 04 00 00 00 00 00 00 00 ................
0217E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0217F0: 00 00 00 00 00 00 00 00 00 04 1B 3D 00 00 00 00 ...........=....
021800: 1B 60 00 00 00 00 00 00 00 00 00 00 00 00 00 02 .`..............
021810: 1B 61 00 00 00 00 00 00 00 00 00 00 00 00 00 04 .a..............
021820: 1B 3D 00 00 00 00 00 00 00 00 00 00 00 00 00 01 .=..............
021830: 04 03 20 20 00 00 01 1A 00 00 00 00 02 1B 48 00 .. ..........H.
021840: 00 00 00 00 03 1B 55 24 00 00 03 1B 55 20 00 00 ......U$....U ..
021850: 00 00 02 1B 4B 00 00 00 02 1B 4C 00 00 00 02 1B ....K.....L.....
021860: 4D 00 00 00 50 18 01 01 00 02 1B 3D 00 00 00 00 M...P......=....
021870: 00 00 00 00 00 00 00 00 00 00 00 00 01 00 04 51 ...............Q
021880: 75 6D 65 00 00 00 00 00 00 00 00 00 00 00 00 00 ume.............
021890: 00 00 00 04 00 00 00 00 00 00 00 00 00 00 00 00 ................
0218A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0218B0: 00 00 00 00 04 1B 3D 00 00 00 00 00 00 00 00 00 ......=.........
0218C0: 00 00 00 00 01 04 03 20 20 00 00 01 1A 00 00 00 ....... .......
0218D0: 00 00 00 00 00 00 00 00 00 02 1B 29 00 00 00 02 ...........)....
0218E0: 1B 28 00 00 00 00 00 02 1B 54 00 00 00 02 1B 45 .(.......T.....E
0218F0: 00 00 00 02 1B 52 00 00 00 50 18 00 00 00 02 1B .....R...P......
021900: 3D 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 =...............
021910: 00 01 00 0C 52 43 2D 38 35 35 20 28 49 54 54 29 ....RC-855 (ITT)
021920: 00 00 00 00 00 00 00 00 04 00 00 00 00 00 00 00 ................
021930: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021940: 00 00 00 00 00 00 00 00 00 03 06 00 00 00 00 00 ................
021950: 00 00 00 00 00 00 00 00 00 01 03 02 20 20 00 00 ............ ..
021960: 01 0C 00 00 00 00 00 00 00 00 00 00 00 00 01 84 ................
021970: 00 00 00 00 01 80 00 00 00 00 00 00 01 1E 00 00 ................
021980: 00 00 01 01 00 00 00 00 01 02 00 00 00 00 50 19 ..............P.
021990: 00 00 00 01 06 00 00 00 00 00 00 00 00 00 00 00 ................
0219A0: 00 00 00 00 00 00 01 00 14 53 6F 72 6F 63 20 31 .........Soroc 1
0219B0: 32 30 2F 41 70 70 6C 65 20 43 50 2F 4D 04 00 00 20/Apple CP/M...
0219C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0219D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 1B ................
0219E0: 3D 00 00 00 00 00 00 00 00 00 00 00 00 00 01 04 =...............
0219F0: 03 20 20 00 00 02 1B 2A 00 00 00 00 00 00 00 00 . ....*........
021A00: 00 00 00 00 00 00 00 00 00 01 04 03 20 20 00 00 ............ ..
021A10: 01 1A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021A20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021A30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 50 18 ..............P.
021A40: 00 00 00 02 1B 3D 00 00 00 00 00 00 00 00 00 00 .....=..........
021A50: 00 00 00 00 00 00 01 00 09 41 6D 70 65 78 20 44 .........Ampex D
021A60: 38 30 00 00 00 00 00 00 00 00 00 00 00 04 00 00 80..............
021A70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021A80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 1B ................
021A90: 3D 00 00 00 00 00 00 00 00 00 00 00 00 00 01 03 =...............
021AA0: 04 20 20 00 00 01 1A 00 00 00 00 00 00 00 00 00 . .............
021AB0: 00 00 00 02 1B 29 00 00 00 02 1B 28 00 00 00 00 .....).....(....
021AC0: 00 02 1B 54 00 00 00 02 1B 45 00 00 00 02 1B 52 ...T.....E.....R
021AD0: 00 00 00 28 18 00 00 00 02 1B 3D 00 00 00 00 00 ...(......=.....
021AE0: 00 00 00 00 00 00 00 00 00 00 01 01 00 04 41 4E ..............AN
021AF0: 53 49 00 00 00 00 00 00 00 00 00 00 00 00 00 00 SI..............
021B00: 00 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021B10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021B20: 00 00 00 08 1B 5B 30 30 3B 30 30 48 00 00 00 00 .....[00;00H....
021B30: 00 00 00 00 07 04 00 00 00 00 04 1B 5B 32 4A 00 ............[2J.
021B40: 03 1B 5B 66 3B 31 00 00 04 1B 5B 37 6D 00 04 1B ..[f;1....[7m...
021B50: 5B 30 6D 00 00 00 03 1B 5B 4B 00 00 04 1B 5B 31 [0m.....[K....[1
021B60: 4C 00 04 1B 5B 31 4D 00 50 18 00 00 00 02 1B 5B L...[1M.P......[
021B70: 00 00 00 01 3B 00 00 00 00 01 48 00 00 00 00 00 ....;.....H.....
021B80: 02 00 12 44 45 43 20 52 61 69 6E 62 6F 77 2C 20 ...DEC Rainbow,
021B90: 38 20 62 69 74 00 00 04 00 00 00 00 00 00 00 00 8 bit...........
021BA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021BB0: 00 00 00 00 00 00 00 00 08 1B 5B 30 30 3B 30 30 ..........[00;00
021BC0: 48 00 00 00 00 00 00 00 00 07 04 01 01 00 00 04 H...............
021BD0: 1B 5B 32 4A 00 03 1B 5B 66 00 00 00 00 04 1B 5B .[2J...[f......[
021BE0: 37 6D 00 04 1B 5B 30 6D 00 00 00 03 1B 5B 4B 00 7m...[0m.....[K.
021BF0: 00 04 1B 5B 31 4C 00 04 1B 5B 31 6D 00 50 18 00 ...[1L...[1m.P..
021C00: 00 00 00 02 1B 29 00 00 00 02 1B 28 00 00 00 00 .....).....(....
021C10: 00 02 1B 54 00 00 00 00 00 00 00 00 00 00 00 00 ...T............
021C20: 00 00 00 50 18 00 00 00 02 1B 3D 00 00 00 00 00 ...P......=.....
021C30: 00 00 00 00 00 00 00 00 00 00 00 01 00 10 53 6F ..............So
021C40: 72 6F 63 20 6E 65 77 20 6D 6F 64 65 6C 73 00 00 roc new models..
021C50: 00 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021C60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021C70: 00 00 00 04 1B 3D 00 00 00 00 00 00 00 00 00 00 .....=..........
021C80: 00 00 00 01 04 03 20 20 00 00 01 1A 2A 00 00 00 ...... ....*...
021C90: 00 00 00 00 00 00 00 00 02 1B 29 00 00 00 02 1B ..........).....
021CA0: 28 00 00 00 00 00 02 1B 54 00 00 00 02 1B 45 00 (.......T.....E.
021CB0: 00 00 02 1B 52 00 00 00 50 18 00 00 00 02 1B 3D ....R...P......=
021CC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021CD0: 01 00 07 53 53 4D 2D 55 42 33 00 00 00 00 00 00 ...SSM-UB3......
021CE0: 00 00 00 00 00 00 00 04 00 00 00 00 00 00 00 00 ................
021CF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021D00: 00 00 00 00 00 00 00 00 06 1B 30 30 3B 30 30 00 ..........00;00.
021D10: 00 00 00 00 00 00 00 00 00 03 06 00 00 00 00 03 ................
021D20: 1B 32 4A 00 00 04 1B 31 3B 31 00 00 00 03 1B 37 .2J....1;1.....7
021D30: 55 00 00 03 1B 30 55 00 00 00 00 02 1B 4B 00 00 U....0U......K..
021D40: 00 02 1B 4C 00 00 00 02 1B 4D 00 00 00 50 18 00 ...L.....M...P..
021D50: 00 00 01 1B 00 00 00 00 01 3B 00 00 00 00 00 00 .........;......
021D60: 00 00 00 00 01 02 00 11 54 61 6E 64 62 65 72 67 ........Tandberg
021D70: 20 54 44 56 20 32 32 31 35 00 00 00 04 00 00 00 TDV 2215.......
021D80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021D90: 00 00 00 00 00 00 00 00 00 00 00 00 00 03 10 00 ................
021DA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 01 03 02 ................
021DB0: 00 00 00 00 01 19 00 00 00 00 00 00 00 00 00 00 ................
021DC0: 00 00 04 1B 5B 30 6D 00 04 1B 5B 32 6D 00 00 00 ....[0m...[2m...
021DD0: 04 1B 5B 30 4B 00 03 1B 5B 4C 00 00 03 1B 5B 4D ..[0K...[L....[M
021DE0: 00 00 50 19 00 00 00 01 10 00 00 00 00 00 00 00 ..P.............
021DF0: 00 00 00 00 00 00 00 00 00 00 01 00 11 54 65 6C .............Tel
021E00: 00 00 02 1B 5B 00 00 00 01 3B 00 00 00 00 01 48 ....[....;.....H
021E10: 00 00 00 00 00 02 00 0E 48 61 7A 65 6C 74 69 6E ........Hazeltin
021E20: 65 20 31 35 30 30 00 00 00 00 00 00 04 00 00 00 e 1500..........
021E30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021E40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021E50: 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 ................
021E60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021E70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021E80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021E90: 00 00 50 18 00 00 00 00 00 00 00 00 00 00 00 00 ..P.............
021EA0: 00 00 00 00 00 00 00 00 00 01 00 00 10 48 61 7A .............Haz
021EB0: 65 6C 74 69 6E 65 20 45 73 70 72 69 74 00 00 00 eltine Esprit...
021EC0: 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021ED0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021EE0: 00 00 04 1B 11 00 00 00 00 00 00 00 00 00 00 00 ................
021EF0: 00 00 01 04 03 20 20 00 00 02 1B 1C 00 00 00 02 ..... .........
021F00: 1B 12 00 00 00 00 00 02 1B 1F 00 00 00 02 1B 19 ................
021F10: 00 00 00 00 00 02 1B 0F 00 00 00 02 1B 1A 00 00 ................
021F20: 00 02 1B 13 01 00 00 50 18 00 00 00 02 1B 11 00 .......P........
021F30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 ................
021F40: 00 10 49 42 4D 2D 50 43 20 43 43 50 2F 4D 20 62 ..IBM-PC CCP/M b
021F50: 2F 77 00 00 00 00 04 00 00 00 00 00 00 00 00 00 /w..............
021F60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
021F70: 00 00 00 00 00 00 00 04 1B 59 00 00 00 00 00 00 .........Y......
021F80: 00 00 00 00 00 00 00 01 04 03 20 20 00 00 02 1B .......... ....
021F90: 45 00 00 00 00 00 00 00 00 00 00 00 02 1B 72 00 E.............r.
021FA0: 00 00 02 1B 75 00 00 00 00 00 02 1B 4B 00 00 00 ....u.......K...
021FB0: 02 1B 4C 00 00 00 02 1B 4D 00 00 00 50 18 00 00 ..L.....M...P...
021FC0: 00 02 1B 59 00 00 00 00 00 00 00 00 00 00 00 00 ...Y............
021FD0: 00 00 00 00 01 00 12 49 42 4D 2D 50 43 20 43 43 .......IBM-PC CC
021FE0: 50 2F 4D 20 63 6F 6C 6F 72 00 00 04 05 1B 78 1B P/M color.....x.
021FF0: 63 00 1B 63 00 00 00 00 00 00 00 00 00 00 00 00 c..c............
022000: 65 72 61 79 20 73 65 72 69 65 73 20 31 30 00 00 eray series 10..
022010: 00 04 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022030: 00 00 04 1B 59 00 00 00 00 00 00 00 00 00 00 00 ....Y...........
022040: 00 00 01 04 03 20 20 00 00 01 0C 00 00 00 00 00 ..... .........
022050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022060: 00 00 00 00 00 02 1B 4B 00 00 00 02 1B 4C 00 00 .......K.....L..
022070: 00 02 1B 4D 00 00 00 50 18 00 00 00 02 1B 59 00 ...M...P......Y.
022080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 ................
022090: 00 0C 54 65 6C 65 74 65 78 20 33 30 30 30 00 00 ..Teletex 3000..
0220A0: 00 00 00 00 00 00 04 00 00 00 00 00 00 00 00 00 ................
0220B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0220C0: 00 00 00 00 00 00 00 04 1B 3D 00 00 00 00 00 00 .........=......
0220D0: 00 00 00 00 00 00 00 01 04 03 20 20 00 00 01 1A .......... ....
0220E0: 00 00 00 00 00 00 00 00 00 00 00 00 02 1B 29 00 ..............).
0220F0: 00 00 02 1B 28 00 00 00 00 00 02 1B 54 2D 08 00 ....(.......T-..
022100: 02 1B 45 00 00 00 02 1B 52 00 00 00 50 18 00 00 ..E.....R...P...
022110: 00 02 1B 3D 00 00 00 00 00 00 00 00 00 00 00 00 ...=............
022120: 00 00 00 00 01 00 14 54 65 6C 65 76 69 64 65 6F .......Televideo
022130: 20 39 31 32 2F 39 32 30 2F 39 32 04 00 00 00 00 912/920/92.....
022140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022150: 00 00 00 00 00 00 00 00 00 00 00 00 04 1B 3D 00 ..............=.
022160: 00 00 00 00 00 00 00 00 00 00 00 00 01 04 03 20 ...............
022170: 20 00 00 01 1A 00 00 00 00 00 00 00 00 00 00 00 ...............
022180: 00 02 1B 29 00 00 00 02 1B 28 00 00 00 00 00 02 ...).....(......
022190: 1B 54 00 00 00 02 1B 45 00 00 00 02 1B 52 00 00 .T.....E.....R..
0221A0: 00 50 18 00 00 00 02 1B 3D 00 00 00 00 00 00 00 .P......=.......
0221B0: 00 00 00 00 00 00 00 00 00 01 00 0A 56 69 73 75 ............Visu
0221C0: 61 6C 20 32 30 30 00 00 00 00 00 00 00 00 00 00 al 200..........
0221D0: 04 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0221E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0221F0: 00 04 1B 59 00 00 00 00 00 00 00 00 00 00 00 00 ...Y............
022200: 00 00 00 00 00 00 00 00 00 00 00 00 04 1B 59 00 ..............Y.
022210: 00 00 00 00 00 00 00 00 00 00 00 00 01 04 03 20 ...............
022220: 20 00 00 02 1B 45 00 00 00 00 00 00 00 00 00 00 ....E..........
022230: 00 03 1B 62 0E 00 00 03 1B 62 07 00 00 00 00 02 ...b.....b......
022240: 1B 4B 00 00 00 02 1B 4C 00 00 00 02 1B 4D 00 00 .K.....L.....M..
022250: 00 50 18 01 00 00 02 1B 59 00 00 00 00 00 00 00 .P......Y.......
022260: 00 00 00 00 00 00 00 00 00 01 00 06 4B 61 79 70 ............Kayp
022270: 72 6F 20 31 30 2C 20 34 20 61 6E 64 20 31 30 00 ro 10, 4 and 10.
022280: 04 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022290: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0222A0: 00 04 1B 3D 00 00 00 00 00 00 00 00 00 00 00 00 ...=............
0222B0: 00 01 04 03 20 20 00 00 01 1A 08 2F 2D 00 00 1E .... ...../-...
0222C0: 00 00 00 00 00 00 03 1B 43 31 00 00 03 1B 42 31 ........C1....B1
0222D0: 00 00 00 00 01 18 00 00 00 00 02 1B 45 00 00 00 ............E...
0222E0: 02 1B 52 00 00 00 50 18 00 00 00 02 1B 3D 00 00 ..R...P......=..
0222F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 ................
022300: 13 4C 65 61 72 2D 53 69 65 67 6C 65 72 20 41 44 .Lear-Siegler AD
022310: 4D 2D 32 30 00 04 00 00 00 00 00 00 00 00 00 00 M-20............
022320: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022330: 00 00 00 00 00 00 04 1B 3D 00 00 00 00 00 00 00 ........=.......
022340: 00 00 00 00 00 00 01 03 04 20 20 00 00 01 1A 00 ......... .....
022350: 00 00 00 00 00 00 00 00 00 00 00 02 1B 29 00 00 .............)..
022360: 00 02 1B 28 00 00 00 00 00 02 1B 54 00 00 00 02 ...(.......T....
022370: 1B 45 00 00 00 02 1B 52 00 00 00 50 18 00 00 00 .E.....R...P....
022380: 02 1B 3D 00 00 00 00 00 00 00 00 00 00 00 00 00 ..=.............
022390: 00 00 01 01 00 13 4C 65 61 72 2D 53 69 65 67 6C ......Lear-Siegl
0223A0: 65 72 20 41 44 4D 2D 33 31 00 04 00 00 00 00 00 er ADM-31.......
0223B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0223C0: 00 00 00 00 00 00 00 00 00 00 00 04 1B 3D 00 00 .............=..
0223D0: 00 00 00 00 00 00 00 00 00 00 00 01 04 03 20 20 ..............
0223E0: 00 00 01 1A 00 00 00 00 00 00 00 00 00 00 00 00 ................
0223F0: 02 1B 29 00 00 00 02 1B 28 00 00 00 00 00 02 1B ..).....(.......
022400: 00 01 04 03 20 20 00 00 02 1B 76 00 00 00 00 00 .... ....v.....
022410: 00 00 00 00 00 00 02 1B 33 00 00 00 02 1B 34 00 ........3.....4.
022420: 00 00 00 00 02 1B 78 00 00 00 02 1B 4C 00 00 00 ......x.....L...
022430: 02 1B 4D 00 00 00 50 18 00 00 00 02 1B 59 00 00 ..M...P......Y..
022440: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 ................
022450: 13 57 79 73 65 20 57 59 2D 31 30 30 2F 32 30 30 .Wyse WY-100/200
022460: 2F 33 30 30 00 04 00 00 00 00 00 00 00 00 00 00 /300............
022470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022480: 00 00 00 00 00 00 04 1B 3D 00 00 00 00 00 00 00 ........=.......
022490: 00 00 00 00 00 00 01 04 03 20 20 00 00 01 1A 00 ......... .....
0224A0: 00 00 00 00 00 00 00 00 00 00 00 02 1B 28 00 00 .............(..
0224B0: 00 02 1B 29 00 00 00 00 00 02 1B 54 00 00 00 02 ...).......T....
0224C0: 1B 45 00 00 00 02 1B 52 00 00 00 50 18 00 00 00 .E.....R...P....
0224D0: 02 1B 3D 00 00 00 00 00 00 00 00 00 00 00 00 00 ..=.............
0224E0: 00 00 00 01 00 06 5A 65 6E 69 74 68 00 00 00 00 ......Zenith....
0224F0: 00 00 00 00 00 00 00 00 00 00 04 00 30 30 04 43 ............00.C
022500: 75 72 5B 00 01 2C 00 00 00 00 01 00 00 00 00 00 ur[..,..........
022510: 01 03 00 0D 4D 6F 72 72 6F 77 20 04 1B 59 00 00 ....Morrow ..Y..
022520: 30 00 00 00 00 00 00 00 04 00 00 01 04 03 20 20 0.............
022530: 00 00 02 1B 45 02 1B 28 00 00 00 00 00 02 00 00 ....E..(........
022540: 02 1B 71 02 1B 45 02 1B 70 02 1B 12 00 00 02 1B ..q..E..p.......
022550: 4B 01 00 00 02 1B 4C 00 00 00 02 1B 4D 00 00 00 K.....L.....M...
022560: 50 18 00 00 00 02 1B 59 00 0E 4F 00 72 6F 6E 61 P......Y..O.rona
022570: 20 00 74 74 61 63 68 00 01 00 04 00 30 30 04 43 .ttach.....00.C
022580: 00 02 1B 29 00 00 00 02 1B 28 00 00 00 00 00 02 ...).....(......
022590: 1B 54 00 00 00 02 1B 45 00 00 00 02 1B 52 00 00 .T.....E.....R..
0225A0: 00 50 18 00 00 00 02 1B 3D 00 00 00 00 00 00 00 .P......=.......
0225B0: 00 00 00 00 00 00 00 00 00 01 00 0A 56 69 73 75 ............Visu
0225C0: 61 6C 20 32 30 30 00 00 00 00 00 00 00 00 00 00 al 200..........
0225D0: 04 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0225E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0225F0: 00 04 1B 59 00 00 00 00 00 00 00 00 00 00 00 00 ...Y............
022600: 54 00 00 00 02 1B 45 00 00 00 02 1B 52 00 00 00 T.....E.....R...
022610: 50 18 00 00 00 02 1B 3D 00 00 00 00 00 00 00 00 P......=........
022620: 00 00 00 00 00 00 00 00 01 00 07 4C 69 62 65 72 ...........Liber
022630: 74 79 00 00 00 00 00 00 00 00 00 00 00 00 00 04 ty..............
022640: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022650: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022660: 04 1B 3D 00 00 00 00 00 00 00 00 00 00 00 00 00 ..=.............
022670: 01 04 03 20 20 00 00 01 1A 00 00 00 00 00 00 00 ... ...........
022680: 00 00 00 00 00 02 1B 29 00 00 00 02 1B 28 00 00 .......).....(..
022690: 00 00 00 02 1B 54 00 00 00 02 1B 45 00 00 00 02 .....T.....E....
0226A0: 1B 52 00 00 00 50 18 00 00 00 02 1B 3D 00 00 00 .R...P......=...
0226B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 0D ................
0226C0: 4D 6F 72 72 6F 77 20 4D 44 54 2D 32 30 00 00 00 Morrow MDT-20...
0226D0: 00 00 00 00 04 00 00 00 00 00 00 00 00 00 00 00 ................
0226E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0226F0: 00 00 00 00 00 04 1B 3D 00 00 00 00 00 00 00 00 .......=........
022700: 00 00 00 00 00 01 03 04 20 20 00 00 01 1A 00 00 ........ ......
022710: 00 00 00 00 00 00 00 00 00 00 02 1B 29 00 00 00 ............)...
022720: 02 1B 28 00 00 00 00 00 02 1B 54 00 00 00 02 1B ..(.......T.....
022730: 45 00 00 00 02 1B 12 00 00 00 50 18 01 00 00 02 E.........P.....
022740: 1B 3D 00 00 00 00 00 00 00 00 00 00 00 00 00 00 .=..............
022750: 00 01 01 00 09 4F 73 62 6F 72 6E 65 20 31 00 00 .....Osborne 1..
022760: 00 00 00 00 00 00 00 00 00 04 00 00 00 00 00 00 ................
022770: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022780: 00 00 00 00 00 00 00 00 00 00 04 1B 3D 00 00 00 ............=...
022790: 00 00 00 00 00 00 00 00 00 00 01 03 04 20 20 00 ............. .
0227A0: 00 01 1A 00 00 00 00 00 00 00 00 00 00 00 00 02 ................
0227B0: 1B 28 00 00 00 02 1B 29 00 00 00 00 00 02 1B 54 .(.....).......T
0227C0: 00 00 00 02 1B 51 00 00 00 02 1B 52 00 00 00 50 .....Q.....R...P
0227D0: 18 00 00 00 02 1B 3D 00 00 00 00 00 00 00 00 00 ......=.........
0227E0: 00 00 00 00 00 00 01 01 00 0E 4F 74 72 6F 6E 61 ..........Otrona
0227F0: 20 41 74 74 61 63 68 65 00 00 00 00 00 00 04 02 Attache........
022800: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
022810: 1D 00 01 00 02 09 52 E5 1D 00 41 02 00 00 00 02 ......R...A.....
022820: 1D 00 46 02 00 00 00 02 1D 00 42 02 00 00 00 02 ..F.......B.....
022830: 1D 00 47 02 00 00 00 02 1D 00 43 02 00 00 00 02 ..G.......C.....
022840: 1D 00 48 02 00 00 00 02 1D 00 44 02 00 00 00 02 ..H.......D.....
022850: 1D 00 49 02 00 00 00 02 1D 00 45 02 00 00 00 02 ..I.......E.....
022860: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022870: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022880: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022890: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0228A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0228B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0228C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0228D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0228E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0228F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0229A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0229B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0229C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0229D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0229E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0229F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022A00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022A10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022A20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022A30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022A40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022A50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022A60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022A70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022A80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022A90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022AA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022AB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022AC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022AD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022AE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022AF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022B00: 0D 0A 32 30 34 20 43 6F 6C 6F 72 20 64 69 73 70 ..204 Color disp
022B10: 6C 61 79 20 38 30 78 32 35 0D 0A 32 30 35 20 43 lay 80x25..205 C
022B20: 6F 6C 6F 72 20 64 69 73 70 6C 61 79 20 34 30 78 olor display 40x
022B30: 32 35 0D 0A 32 30 36 20 62 2F 77 20 20 20 64 69 25..206 b/w di
022B40: 73 70 6C 61 79 20 38 30 78 32 35 0D 0A 32 30 37 splay 80x25..207
022B50: 20 62 2F 77 20 20 20 64 69 73 70 6C 61 79 20 34 b/w display 4
022B60: 30 78 32 35 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 0x25............
022B70: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
022B80: 30 2D 32 35 35 20 6D 73 29 3A 20 20 20 20 20 20 0-255 ms):
022B90: 20 20 20 20 20 0D 0A 20 44 65 6C 61 79 20 61 66 .. Delay af
022BA0: 74 65 72 20 45 52 41 53 45 20 54 4F 20 45 4E 44 ter ERASE TO END
022BB0: 20 4F 46 20 4C 49 4E 45 20 61 6E 64 20 48 49 47 OF LINE and HIG
022BC0: 48 4C 49 47 48 54 20 28 30 2D 32 35 35 20 6D 73 HLIGHT (0-255 ms
022BD0: 29 3A 20 0D 0A 20 49 73 20 74 68 69 73 20 64 65 ): .. Is this de
022BE0: 66 69 6E 69 74 69 6F 6E 20 63 6F 72 72 65 63 74 finition correct
022BF0: 3F 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ?..
022C00: 20 20 20 20 20 20 20 20 48 61 72 64 77 61 72 65 Hardware
022C10: 20 64 65 70 65 6E 64 65 6E 74 20 69 6E 66 6F 72 dependent infor
022C20: 6D 61 74 69 6F 6E 0D 0A 20 4F 70 65 72 61 74 69 mation.. Operati
022C30: 6E 67 20 66 72 65 71 75 65 6E 63 79 20 6F 66 20 ng frequency of
022C40: 79 6F 75 72 20 6D 69 63 72 6F 70 72 6F 63 65 73 your microproces
022C50: 73 6F 72 20 69 6E 20 4D 48 7A 20 28 66 6F 72 20 sor in MHz (for
022C60: 64 65 6C 61 79 73 29 3A 0D 0A 31 30 31 20 4E 6F delays):..101 No
022C70: 74 68 69 6E 67 0D 0A 32 30 30 20 43 68 6F 6F 73 thing..200 Choos
022C80: 65 20 6F 6E 65 20 6F 66 20 74 68 65 20 66 6F 6C e one of the fol
022C90: 6C 6F 77 69 6E 67 20 64 69 73 70 6C 61 79 73 3A lowing displays:
022CA0: 0D 0A 32 30 31 20 57 68 69 63 68 20 64 69 73 70 ..201 Which disp
022CB0: 6C 61 79 3F 20 28 45 6E 74 65 72 20 6E 6F 2E 20 lay? (Enter no.
022CC0: 6F 72 20 51 20 74 6F 20 65 78 69 74 29 3A 0D 0A or Q to exit):..
022CD0: 32 30 32 20 44 65 66 61 75 6C 74 20 64 69 73 70 202 Default disp
022CE0: 6C 61 79 20 6D 6F 64 65 0D 0A 32 30 33 20 4D 6F lay mode..203 Mo
022CF0: 6E 6F 63 68 72 6F 6D 65 20 64 69 73 70 6C 61 79 nochrome display
022D00: 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1
022D10: 20 20 20 20 20 54 75 72 62 6F 20 50 61 73 63 61 Turbo Pasca
022D20: 6C 20 67 65 6E 65 72 61 6C 20 69 6E 73 74 61 6C l general instal
022D30: 6C 61 74 69 6F 6E 20 53 79 73 74 65 6D 0D 0A 32 lation System..2
022D40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022D50: 20 20 43 68 6F 6F 73 65 20 69 6E 73 74 61 6C 6C Choose install
022D60: 61 74 69 6F 6E 20 69 74 65 6D 20 66 72 6F 6D 20 ation item from
022D70: 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 3A 0D 0A the following:..
022D80: 33 0D 0A 34 20 20 20 20 20 20 20 20 20 20 20 20 3..4
022D90: 20 20 20 20 20 20 20 20 20 20 20 20 20 13 53 63 .Sc
022DA0: 72 65 65 6E 20 69 6E 73 74 61 6C 6C 61 74 69 6F reen installatio
022DB0: 6E 20 20 20 7C 20 20 20 13 51 75 69 74 0D 0A 35 n | .Quit..5
022DC0: 0D 0A 36 20 20 20 20 20 20 20 20 20 20 20 20 20 ..6
022DD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
022DE0: 20 20 20 20 45 6E 74 65 72 20 53 20 6F 72 20 51 Enter S or Q
022DF0: 3A 0D 0A 31 33 20 20 2D 3E 0D 0A 31 30 31 20 4E :..13 ->..101 N
022E00: 6F 74 68 69 6E 67 0D 0A 20 5E 51 3A 20 51 75 69 othing.. ^Q: Qui
022E10: 74 2C 20 5E 52 3A 20 4C 61 73 74 20 70 61 67 65 t, ^R: Last page
022E20: 2C 20 5E 43 3A 20 4E 65 78 74 20 70 61 67 65 2C , ^C: Next page,
022E30: 20 3C 52 45 54 55 52 4E 3E 3A 20 53 65 6C 65 63 <RETURN>: Selec
022E40: 74 20 74 65 72 6D 69 6E 61 6C 3A 0D 0A 20 57 61 t terminal:.. Wa
022E50: 69 74 20 53 6F 72 74 69 6E 67 20 44 65 66 69 6E it Sorting Defin
022E60: 69 74 69 6F 6E 73 0D 0A 20 43 68 61 6E 67 65 20 itions.. Change
022E70: 74 6F 3A 0D 0A 20 28 59 2F 4E 29 3F 20 0D 0A 20 to:.. (Y/N)? ..
022E80: 79 0D 0A 20 6E 0D 0A 20 54 65 78 74 20 66 69 6C y.. n.. Text fil
022E90: 65 20 6E 61 6D 65 3A 0D 0A 20 43 6F 6D 6D 61 6E e name:.. Comman
022EA0: 64 3A 0D 0A 20 4E 75 6D 65 72 69 63 20 65 6E 74 d:.. Numeric ent
022EB0: 72 79 20 65 78 70 65 63 74 65 64 0D 0A 20 4C 65 ry expected.. Le
022EC0: 67 61 6C 20 72 61 6E 67 65 20 69 73 20 0D 0A 20 gal range is ..
022ED0: 2C 20 70 6C 65 61 73 65 20 72 65 2D 65 6E 74 65 , please re-ente
022EE0: 72 3A 20 0D 0A 20 43 68 6F 6F 73 65 20 6F 6E 65 r: .. Choose one
022EF0: 20 6F 66 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E of the followin
022F00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022F10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022F20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022F30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022F40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022F50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022F60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022F70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022F80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022F90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022FA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022FB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022FC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022FD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022FE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
022FF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0230A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0230B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0230C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0230D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0230E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0230F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
023100: 67 20 74 65 72 6D 69 6E 61 6C 73 3A 0D 0A 20 4E g terminals:.. N
023110: 6F 6E 65 20 6F 66 20 74 68 65 20 61 62 6F 76 65 one of the above
023120: 20 20 20 28 20 4D 61 78 2E 20 32 30 20 43 68 61 ( Max. 20 Cha
023130: 72 61 63 74 65 72 73 20 29 0D 0A 20 44 65 6C 65 racters ).. Dele
023140: 74 65 20 61 20 64 65 66 69 6E 69 74 69 6F 6E 20 te a definition
023150: 28 20 4D 61 78 2E 20 32 30 20 43 68 61 72 61 63 ( Max. 20 Charac
023160: 74 65 72 73 20 29 0D 0A 20 57 68 69 63 68 20 74 ters ).. Which t
023170: 65 72 6D 69 6E 61 6C 3F 20 28 45 6E 74 65 72 20 erminal? (Enter
023180: 6E 6F 2E 20 6F 72 20 5E 51 20 74 6F 20 65 78 69 no. or ^Q to exi
023190: 74 29 3A 20 0D 0A 20 44 65 6C 65 74 65 20 74 65 t): .. Delete te
0231A0: 72 6D 69 6E 61 6C 3F 20 28 45 6E 74 65 72 20 6E rminal? (Enter n
0231B0: 6F 2E 20 6F 72 20 5E 51 20 74 6F 20 65 78 69 74 o. or ^Q to exit
0231C0: 29 3A 0D 0A 20 44 6F 20 79 6F 75 20 77 61 6E 74 ):.. Do you want
0231D0: 20 74 6F 20 6D 6F 64 69 66 79 20 74 68 69 73 20 to modify this
0231E0: 64 65 66 69 6E 69 74 69 6F 6E 20 62 65 66 6F 72 definition befor
0231F0: 65 20 69 6E 73 74 61 6C 6C 61 74 69 6F 6E 3F 20 e installation?
023200: 0D 0A 20 54 65 72 6D 69 6E 61 6C 20 74 79 70 65 .. Terminal type
023210: 3A 0D 0A 20 53 65 6E 64 20 61 6E 20 69 6E 69 74 :.. Send an init
023220: 69 61 6C 69 7A 61 74 69 6F 6E 20 73 74 72 69 6E ialization strin
023230: 67 20 74 6F 20 74 68 65 20 74 65 72 6D 69 6E 61 g to the termina
023240: 6C 3F 0D 0A 20 49 6E 69 74 69 61 6C 69 7A 61 69 l?.. Initializai
023250: 6F 6E 20 64 65 66 69 6E 65 64 20 61 73 20 61 20 on defined as a
023260: 63 6F 6D 6D 61 6E 64 20 73 74 72 69 6E 67 3F 20 command string?
023270: 28 4E 6F 20 3D 20 61 20 66 69 6C 65 29 0D 0A 20 (No = a file)..
023280: 53 65 6E 64 20 61 20 72 65 73 65 74 20 73 74 72 Send a reset str
023290: 69 6E 67 20 74 6F 20 74 68 65 20 74 65 72 6D 69 ing to the termi
0232A0: 6E 61 6C 0D 0A 20 52 65 73 65 74 20 64 65 66 69 nal.. Reset defi
0232B0: 6E 65 64 20 61 73 20 61 20 63 6F 6D 6D 61 6E 64 ned as a command
0232C0: 3F 20 28 4E 6F 20 3D 20 61 20 66 69 6C 65 29 0D ? (No = a file).
0232D0: 0A 20 43 55 52 53 4F 52 20 4C 45 41 44 2D 49 4E . CURSOR LEAD-IN
0232E0: 20 63 6F 6D 6D 61 6E 64 3A 20 0D 0A 20 43 55 52 command: .. CUR
0232F0: 53 4F 52 20 50 4F 53 49 54 49 4F 4E 49 4E 47 20 SOR POSITIONING
023300: 2E 2E 20 4C 65 73 20 66 69 63 68 69 65 72 73 20 .. Les fichiers
023310: 49 4E 53 54 41 4C 4C 3F 2E 44 4F 43 20 63 6F 6E INSTALL?.DOC con
023320: 74 69 65 6E 6E 65 6E 74 20 6C 65 73 20 69 6E 66 tiennent les inf
023330: 6F 72 6D 61 74 69 6F 6E 73 20 61 20 74 72 61 6E ormations a tran
023340: 73 6D 65 74 74 72 65 0D 0A 2E 2E 20 61 75 78 20 smettre.... aux
023350: 75 74 69 6C 69 73 61 74 65 75 72 73 20 64 65 20 utilisateurs de
023360: 76 6F 73 20 70 72 6F 67 72 61 6D 6D 65 73 20 54 vos programmes T
023370: 55 52 42 4F 20 50 61 73 63 61 6C 20 73 69 20 76 URBO Pascal si v
023380: 6F 75 73 20 63 72 65 65 7A 20 75 6E 0D 0A 2E 2E ous creez un....
023390: 20 6D 6F 64 75 6C 65 20 64 27 69 6E 73 74 61 6C module d'instal
0233A0: 6C 61 74 69 6F 6E 20 61 76 65 63 20 47 49 4E 53 lation avec GINS
0233B0: 54 2E 0D 0A 2E 2E 0D 0A 2E 2E 20 4E 6F 74 65 7A T......... Notez
0233C0: 20 63 65 70 65 6E 64 61 6E 74 20 71 75 65 20 6C cependant que l
0233D0: 65 73 20 70 72 6F 67 72 61 6D 6D 65 73 20 63 6F es programmes co
0233E0: 6D 70 69 6C 65 73 20 73 75 72 20 43 50 43 20 34 mpiles sur CPC 4
0233F0: 36 34 2F 36 36 34 20 73 65 72 6F 6E 74 0D 0A 2E 64/664 seront...
023400: 2E 20 64 65 6A 61 20 69 6E 73 74 61 6C 6C 65 73 . deja installes
023410: 20 70 6F 75 72 20 63 65 73 20 6D 61 63 68 69 6E pour ces machin
023420: 65 73 2E 0D 0A 2E 2E 0D 0A 2E 2E 0D 0A 2E 70 6C es............pl
023430: 36 36 0D 0A 2E 2E 20 43 68 61 6E 67 65 72 20 50 66.... Changer P
023440: 52 4F 47 52 41 4D 4E 41 4D 45 20 70 6F 75 72 20 ROGRAMNAME pour
023450: 76 6F 74 72 65 20 70 72 6F 70 72 65 20 70 72 6F votre propre pro
023460: 67 72 61 6D 6D 65 20 65 74 20 49 4E 53 54 41 4C gramme et INSTAL
023470: 4E 41 4D 45 0D 0A 2E 2E 20 70 6F 75 72 20 6C 65 NAME.... pour le
023480: 20 6E 6F 6D 20 64 65 20 76 6F 74 72 65 20 70 72 nom de votre pr
023490: 6F 67 72 61 6D 6D 65 20 64 27 69 6E 73 74 61 6C ogramme d'instal
0234A0: 6C 61 74 69 6F 6E 20 64 61 6E 73 20 63 65 20 71 lation dans ce q
0234B0: 75 69 20 73 75 69 74 2E 0D 0A 2E 2E 0D 0A 49 4E ui suit.......IN
0234C0: 53 54 41 4C 4C 41 54 49 4F 4E 20 44 55 20 54 45 STALLATION DU TE
0234D0: 52 4D 49 4E 41 4C 0D 0A 0D 0A 41 76 61 6E 74 20 RMINAL....Avant
0234E0: 64 65 20 70 6F 75 76 6F 69 72 20 75 74 69 6C 69 de pouvoir utili
0234F0: 73 65 72 20 50 52 4F 47 52 41 4D 4E 41 4D 45 2C ser PROGRAMNAME,
023500: 43 4F 4D 4D 41 4E 44 20 74 6F 20 73 65 6E 64 20 COMMAND to send
023510: 62 65 74 77 65 65 6E 20 6C 69 6E 65 20 61 6E 64 between line and
023520: 20 63 6F 6C 75 6D 6E 3A 20 20 20 0D 0A 20 43 55 column: .. CU
023530: 52 53 4F 52 20 50 4F 53 49 54 49 4F 4E 49 4E 47 RSOR POSITIONING
023540: 20 43 4F 4D 4D 41 4E 44 20 74 6F 20 73 65 6E 64 COMMAND to send
023550: 20 61 66 74 65 72 20 62 6F 74 68 20 6C 69 6E 65 after both line
023560: 20 61 6E 64 20 63 6F 6C 75 6D 6E 3A 0D 0A 20 43 and column:.. C
023570: 6F 6C 75 6D 6E 20 66 69 72 73 74 0D 0A 20 4F 46 olumn first.. OF
023580: 46 53 45 54 20 74 6F 20 61 64 64 20 74 6F 20 4C FSET to add to L
023590: 49 4E 45 3A 20 20 0D 0A 20 4F 46 46 53 45 54 20 INE: .. OFFSET
0235A0: 74 6F 20 61 64 64 20 74 6F 20 43 4F 4C 55 4D 4E to add to COLUMN
0235B0: 3A 0D 0A 20 42 69 6E 61 72 79 20 61 64 64 72 65 :.. Binary addre
0235C0: 73 73 0D 0A 20 4E 75 6D 62 65 72 20 6F 66 20 41 ss.. Number of A
0235D0: 53 43 49 49 20 64 69 67 69 74 73 20 28 32 20 6F SCII digits (2 o
0235E0: 72 20 33 29 3A 20 0D 0A 20 43 4C 45 41 52 20 53 r 3): .. CLEAR S
0235F0: 43 52 45 45 4E 20 63 6F 6D 6D 61 6E 64 3A 20 0D CREEN command: .
023600: 0A 20 44 6F 65 73 20 43 4C 45 41 52 20 53 43 52 . Does CLEAR SCR
023610: 45 45 4E 20 61 6C 73 6F 20 48 4F 4D 45 20 63 75 EEN also HOME cu
023620: 72 73 6F 72 0D 0A 20 48 4F 4D 45 20 63 6F 6D 6D rsor.. HOME comm
023630: 61 6E 64 3A 20 0D 0A 20 44 45 4C 45 54 45 20 4C and: .. DELETE L
023640: 49 4E 45 20 63 6F 6D 6D 61 6E 64 3A 20 0D 0A 20 INE command: ..
023650: 49 4E 53 45 52 54 20 4C 49 4E 45 20 63 6F 6D 6D INSERT LINE comm
023660: 61 6E 64 3A 20 0D 0A 20 45 52 41 53 45 20 54 4F and: .. ERASE TO
023670: 20 45 4E 44 20 4F 46 20 4C 49 4E 45 20 63 6F 6D END OF LINE com
023680: 6D 61 6E 64 3A 0D 0A 20 53 54 41 52 54 20 48 49 mand:.. START HI
023690: 47 48 4C 49 47 48 54 49 4E 47 20 63 6F 6D 6D 61 GHLIGHTING comma
0236A0: 6E 64 3A 20 20 0D 0A 20 45 4E 44 20 48 49 47 48 nd: .. END HIGH
0236B0: 4C 49 47 48 54 49 4E 47 20 63 6F 6D 6D 61 6E 64 LIGHTING command
0236C0: 3A 20 20 20 20 0D 0A 20 4E 75 6D 62 65 72 20 6F : .. Number o
0236D0: 66 20 72 6F 77 73 20 28 6C 69 6E 65 73 29 20 6F f rows (lines) o
0236E0: 6E 20 79 6F 75 72 20 73 63 72 65 65 6E 3A 20 0D n your screen: .
0236F0: 0A 20 4E 75 6D 62 65 72 20 6F 66 20 63 6F 6C 75 . Number of colu
023700: 20 69 6C 20 64 6F 69 74 20 65 74 72 65 20 69 6E il doit etre in
023710: 73 74 61 6C 6C 65 20 70 6F 75 72 0D 0A 76 6F 74 stalle pour..vot
023720: 72 65 20 74 65 72 6D 69 6E 61 6C 2E 20 43 65 74 re terminal. Cet
023730: 74 65 20 69 6E 73 74 61 6C 6C 61 74 69 6F 6E 20 te installation
023740: 73 65 20 66 61 69 74 20 66 61 63 69 6C 65 6D 65 se fait facileme
023750: 6E 74 20 70 61 72 20 6C 65 20 70 72 6F 67 72 61 nt par le progra
023760: 6D 6D 65 0D 0A 49 4E 53 54 41 4C 4E 41 4D 45 20 mme..INSTALNAME
023770: 64 65 63 72 69 74 20 63 69 2D 64 65 73 73 6F 75 decrit ci-dessou
023780: 73 2E 0D 0A 0D 0A 41 70 72 65 73 20 61 76 6F 69 s.....Apres avoi
023790: 72 20 66 61 69 74 20 75 6E 65 20 63 6F 70 69 65 r fait une copie
0237A0: 20 64 65 20 73 61 75 76 65 67 61 72 64 65 2C 20 de sauvegarde,
0237B0: 72 61 6E 67 65 72 20 6C 61 20 64 69 73 71 75 65 ranger la disque
0237C0: 74 74 65 20 64 65 0D 0A 64 69 73 74 72 69 62 75 tte de..distribu
0237D0: 74 69 6F 6E 20 64 61 6E 73 20 75 6E 20 65 6E 64 tion dans un end
0237E0: 72 6F 69 74 20 73 75 72 20 65 74 20 74 72 61 76 roit sur et trav
0237F0: 61 69 6C 6C 65 72 20 75 6E 69 71 75 65 6D 65 6E ailler uniquemen
023800: 74 20 61 76 65 63 20 6C 61 0D 0A 63 6F 70 69 65 t avec la..copie
023810: 2E 0D 0A 0D 0A 4D 61 69 6E 74 65 6E 61 6E 74 20 .....Maintenant
023820: 6C 61 6E 63 65 7A 20 6C 27 69 6E 73 74 61 6C 6C lancez l'install
023830: 61 74 69 6F 6E 20 65 6E 20 74 61 70 61 6E 74 20 ation en tapant
023840: 49 4E 53 54 41 4C 4E 41 4D 45 20 61 20 76 6F 74 INSTALNAME a vot
023850: 72 65 0D 0A 74 65 72 6D 69 6E 61 6C 2E 20 43 68 re..terminal. Ch
023860: 6F 69 73 69 73 73 65 7A 20 04 53 04 20 70 6F 75 oisissez .S. pou
023870: 72 20 69 6E 73 74 61 6C 6C 65 72 20 6C 27 65 63 r installer l'ec
023880: 72 61 6E 2E 20 45 6E 20 66 6F 6E 63 74 69 6F 6E ran. En fonction
023890: 0D 0A 64 65 20 6C 61 20 76 65 72 73 69 6F 6E 20 ..de la version
0238A0: 64 65 20 50 52 4F 47 52 41 4D 4E 41 4D 45 20 64 de PROGRAMNAME d
0238B0: 6F 6E 74 20 76 6F 75 73 20 64 69 73 70 6F 73 65 ont vous dispose
0238C0: 7A 2C 20 6C 27 69 6E 73 74 61 6C 6C 61 74 69 6F z, l'installatio
0238D0: 6E 0D 0A 73 27 65 66 66 65 63 74 75 65 20 64 65 n..s'effectue de
0238E0: 20 6C 27 75 6E 65 20 64 65 73 20 64 65 75 78 20 l'une des deux
0238F0: 66 61 63 6F 6E 73 20 73 75 69 76 61 6E 74 65 73 facons suivantes
023900: 6D 6E 73 20 6F 6E 20 79 6F 75 72 20 73 63 72 65 mns on your scre
023910: 65 6E 3A 20 20 20 20 20 20 0D 0A 20 44 65 6C 61 en: .. Dela
023920: 79 20 61 66 74 65 72 20 43 55 52 53 4F 52 20 41 y after CURSOR A
023930: 44 44 52 45 53 53 20 28 30 2D 32 35 35 20 6D 73 DDRESS (0-255 ms
023940: 29 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ):
023950: 20 20 20 20 20 20 20 0D 0A 20 44 65 6C 61 79 20 .. Delay
023960: 61 66 74 65 72 20 43 4C 45 41 52 2C 20 44 45 4C after CLEAR, DEL
023970: 45 54 45 20 61 6E 64 20 49 4E 53 45 52 54 20 28 ETE and INSERT (
023980: 30 2D 32 35 35 20 6D 73 29 3A 20 20 20 20 20 20 0-255 ms):
023990: 20 20 20 20 20 0D 0A 20 44 65 6C 61 79 20 61 66 .. Delay af
0239A0: 74 65 72 20 45 52 41 53 45 20 54 4F 20 45 4E 44 ter ERASE TO END
0239B0: 20 4F 46 20 4C 49 4E 45 20 61 6E 64 20 48 49 47 OF LINE and HIG
0239C0: 48 4C 49 47 48 54 20 28 30 2D 32 35 35 20 6D 73 HLIGHT (0-255 ms
0239D0: 29 3A 20 0D 0A 20 49 73 20 74 68 69 73 20 64 65 ): .. Is this de
0239E0: 66 69 6E 69 74 69 6F 6E 20 63 6F 72 72 65 63 74 finition correct
0239F0: 3F 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ?..
023A00: 20 20 20 20 20 20 20 20 48 61 72 64 77 61 72 65 Hardware
023A10: 20 64 65 70 65 6E 64 65 6E 74 20 69 6E 66 6F 72 dependent infor
023A20: 6D 61 74 69 6F 6E 0D 0A 20 4F 70 65 72 61 74 69 mation.. Operati
023A30: 6E 67 20 66 72 65 71 75 65 6E 63 79 20 6F 66 20 ng frequency of
023A40: 79 6F 75 72 20 6D 69 63 72 6F 70 72 6F 63 65 73 your microproces
023A50: 73 6F 72 20 69 6E 20 4D 48 7A 20 28 66 6F 72 20 sor in MHz (for
023A60: 64 65 6C 61 79 73 29 3A 0D 0A 31 30 31 20 4E 6F delays):..101 No
023A70: 74 68 69 6E 67 0D 0A 32 30 30 20 43 68 6F 6F 73 thing..200 Choos
023A80: 65 20 6F 6E 65 20 6F 66 20 74 68 65 20 66 6F 6C e one of the fol
023A90: 6C 6F 77 69 6E 67 20 64 69 73 70 6C 61 79 73 3A lowing displays:
023AA0: 0D 0A 32 30 31 20 57 68 69 63 68 20 64 69 73 70 ..201 Which disp
023AB0: 6C 61 79 3F 20 28 45 6E 74 65 72 20 6E 6F 2E 20 lay? (Enter no.
023AC0: 6F 72 20 51 20 74 6F 20 65 78 69 74 29 3A 0D 0A or Q to exit):..
023AD0: 32 30 32 20 44 65 66 61 75 6C 74 20 64 69 73 70 202 Default disp
023AE0: 6C 61 79 20 6D 6F 64 65 0D 0A 32 30 33 20 4D 6F lay mode..203 Mo
023AF0: 6E 6F 63 68 72 6F 6D 65 20 64 69 73 70 6C 61 79 nochrome display
023B00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
023B10: 1E 00 01 00 02 09 52 E5 1E 00 41 02 00 00 00 02 ......R...A.....
023B20: 1E 00 46 02 00 00 00 02 1E 00 42 02 00 00 00 02 ..F.......B.....
023B30: 1E 00 47 02 00 00 00 02 1E 00 43 02 00 00 00 02 ..G.......C.....
023B40: 1E 00 48 02 00 00 00 02 1E 00 44 02 00 00 00 02 ..H.......D.....
023B50: 1E 00 49 02 00 00 00 02 1E 00 45 02 00 00 00 02 ..I.......E.....
023B60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023B70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023B80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023B90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023BA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023BB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023BC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023BD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023BE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023BF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023C00: 3A 0D 0A 0D 0A 0D 0A 43 68 6F 69 78 20 64 65 20 :......Choix de
023C10: 6C 27 65 63 72 61 6E 20 73 75 72 20 49 42 4D 20 l'ecran sur IBM
023C20: 50 43 0D 0A 10 2D 10 0D 0A 53 69 20 76 6F 75 73 PC...-...Si vous
023C30: 20 75 74 69 6C 69 73 65 7A 20 50 52 4F 47 52 41 utilisez PROGRA
023C40: 4D 4E 41 4D 45 20 73 61 6E 73 20 69 6E 73 74 61 MNAME sans insta
023C50: 6C 6C 61 74 69 6F 6E 2C 20 6C 65 20 6D 6F 64 65 llation, le mode
023C60: 20 70 61 72 20 64 65 66 61 75 74 0D 0A 73 65 72 par defaut..ser
023C70: 61 20 63 68 6F 69 73 69 2E 20 56 6F 75 73 20 70 a choisi. Vous p
023C80: 6F 75 76 65 7A 20 63 68 61 6E 67 65 72 20 63 65 ouvez changer ce
023C90: 20 63 68 6F 69 78 20 65 6E 20 63 68 6F 69 73 69 choix en choisi
023CA0: 73 73 61 6E 74 20 75 6E 20 61 75 74 72 65 0D 0A ssant un autre..
023CB0: 65 63 72 61 6E 20 64 61 6E 73 20 6C 65 20 6D 65 ecran dans le me
023CC0: 6E 75 20 73 75 69 76 61 6E 74 3A 0D 0A 0D 0A 2D nu suivant:....-
023CD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
023CE0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
023CF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
023D00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
023D10: 2D 0D 0A 20 20 20 43 68 6F 6F 73 65 20 6F 6E 65 -.. Choose one
023D20: 20 6F 66 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E of the followin
023D30: 67 20 64 69 73 70 6C 61 79 73 3A 0D 0A 0D 0A 20 g displays:....
023D40: 20 20 20 20 30 29 20 44 65 66 61 75 6C 74 20 64 0) Default d
023D50: 69 73 70 6C 61 79 20 6D 6F 64 65 0D 0A 20 20 20 isplay mode..
023D60: 20 20 31 29 20 4D 6F 6E 6F 63 68 72 6F 6D 65 20 1) Monochrome
023D70: 64 69 73 70 6C 61 79 0D 0A 20 20 20 20 20 32 29 display.. 2)
023D80: 20 43 6F 6C 6F 72 20 64 69 73 70 6C 61 79 20 38 Color display 8
023D90: 30 78 32 35 0D 0A 20 20 20 20 20 33 29 20 43 6F 0x25.. 3) Co
023DA0: 6C 6F 72 20 64 69 73 70 6C 61 79 20 34 30 78 32 lor display 40x2
023DB0: 35 0D 0A 20 20 20 20 20 34 29 20 62 2F 77 20 20 5.. 4) b/w
023DC0: 20 64 69 73 70 6C 61 79 20 38 30 78 32 35 0D 0A display 80x25..
023DD0: 20 20 20 20 20 35 29 20 62 2F 77 20 20 20 64 69 5) b/w di
023DE0: 73 70 6C 61 79 20 34 30 78 32 35 0D 0A 0D 0A 20 splay 40x25....
023DF0: 20 20 57 68 69 63 68 20 64 69 73 70 6C 61 79 20 Which display
023E00: 72 61 6E 20 6E 27 65 73 74 20 70 61 73 20 64 61 ran n'est pas da
023E10: 6E 73 20 6C 65 20 6D 65 6E 75 2C 20 76 6F 75 73 ns le menu, vous
023E20: 20 64 65 76 65 7A 20 64 65 66 69 6E 69 72 20 6C devez definir l
023E30: 65 73 20 76 61 6C 65 75 72 73 0D 0A 76 6F 75 73 es valeurs..vous
023E40: 2D 6D 65 6D 65 73 2E 20 43 65 6C 6C 65 73 2D 63 -memes. Celles-c
023E50: 69 20 73 6F 6E 74 20 74 72 6F 75 76 65 65 73 20 i sont trouvees
023E60: 64 61 6E 73 20 6C 65 20 6D 61 6E 75 65 6C 20 61 dans le manuel a
023E70: 63 63 6F 6D 70 61 67 6E 61 6E 74 0D 0A 76 6F 74 ccompagnant..vot
023E80: 72 65 20 74 65 72 6D 69 6E 61 6C 2E 0D 0A 0D 0A re terminal.....
023E90: 45 6E 74 72 65 7A 20 6C 65 20 6E 75 6D 65 72 6F Entrez le numero
023EA0: 20 63 6F 72 72 65 73 70 6F 6E 64 61 6E 74 20 61 correspondant a
023EB0: 20 22 4E 6F 6E 65 20 6F 66 20 74 68 65 20 41 62 "None of the Ab
023EC0: 6F 76 65 22 20 65 74 20 76 6F 75 73 20 73 65 72 ove" et vous ser
023ED0: 65 7A 0D 0A 67 75 69 64 65 20 61 20 74 72 61 76 ez..guide a trav
023EE0: 65 72 73 20 6C 61 20 70 72 6F 63 65 64 75 72 65 ers la procedure
023EF0: 20 64 27 69 6E 73 74 61 6C 6C 61 74 69 6F 6E 2E d'installation.
023F00: 0D 0A 0D 0A 44 61 6E 73 20 63 65 20 71 75 69 20 ....Dans ce qui
023F10: 73 75 69 74 2C 20 63 68 61 71 75 65 20 63 6F 6D suit, chaque com
023F20: 6D 61 6E 64 65 20 65 73 74 20 64 65 63 72 69 74 mande est decrit
023F30: 65 20 65 6E 20 64 65 74 61 69 6C 2E 20 49 6C 20 e en detail. Il
023F40: 73 65 20 70 65 75 74 0D 0A 71 75 65 20 76 6F 74 se peut..que vot
023F50: 72 65 20 74 65 72 6D 69 6E 61 6C 20 6E 27 61 69 re terminal n'ai
023F60: 74 20 70 61 73 20 74 6F 75 74 65 73 20 6C 65 73 t pas toutes les
023F70: 20 63 6F 6D 6D 61 6E 64 65 73 20 64 65 63 72 69 commandes decri
023F80: 74 65 73 2E 20 44 61 6E 73 20 63 65 0D 0A 63 61 tes. Dans ce..ca
023F90: 73 2C 20 74 61 70 65 72 20 73 69 6D 70 6C 65 6D s, taper simplem
023FA0: 65 6E 74 20 52 45 54 55 52 4E 20 61 20 6C 61 20 ent RETURN a la
023FB0: 71 75 65 73 74 69 6F 6E 20 70 6F 73 65 65 2E 20 question posee.
023FC0: 53 69 20 6C 65 73 20 63 6F 6D 6D 61 6E 64 65 73 Si les commandes
023FD0: 0D 0A 13 44 65 6C 65 74 65 20 4C 69 6E 65 2C 20 ...Delete Line,
023FE0: 49 6E 73 65 72 74 20 4C 69 6E 65 13 20 6F 75 20 Insert Line. ou
023FF0: 13 45 72 61 73 65 20 74 6F 20 65 6E 64 20 6F 66 .Erase to end of
024000: 28 65 6E 74 65 72 20 6E 6F 2E 20 6F 72 20 5E 58 (enter no. or ^X
024010: 20 74 6F 20 65 78 69 74 29 20 19 21 19 0D 0A 2D to exit) .!...-
024020: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024030: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024040: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024050: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024060: 2D 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 -..
024070: 20 20 20 20 49 42 4D 20 50 43 20 53 63 72 65 65 IBM PC Scree
024080: 6E 20 49 6E 73 74 61 6C 6C 61 74 69 6F 6E 20 4D n Installation M
024090: 65 6E 75 0D 0A 0D 0A 43 68 61 71 75 65 20 66 6F enu....Chaque fo
0240A0: 69 73 20 71 75 65 20 50 52 4F 47 52 41 4D 4E 41 is que PROGRAMNA
0240B0: 4D 45 20 65 73 74 20 6C 61 6E 63 65 2C 20 6C 65 ME est lance, le
0240C0: 20 6D 6F 64 65 20 63 68 6F 69 73 69 20 73 65 72 mode choisi ser
0240D0: 61 20 75 74 69 6C 69 73 65 0D 0A 65 74 20 76 6F a utilise..et vo
0240E0: 75 73 20 72 65 74 6F 75 72 6E 65 72 65 7A 20 61 us retournerez a
0240F0: 75 20 6D 6F 64 65 20 70 61 72 20 64 65 66 61 75 u mode par defau
024100: 74 20 61 20 6C 61 20 73 6F 72 74 69 65 2E 0D 0A t a la sortie...
024110: 0D 0A 2E 70 61 0D 0A 49 6E 73 74 61 6C 6C 61 74 ...pa..Installat
024120: 69 6F 6E 20 70 6F 75 72 20 6D 61 63 68 69 6E 65 ion pour machine
024130: 20 61 75 74 72 65 20 71 75 65 20 49 42 4D 20 50 autre que IBM P
024140: 43 0D 0A 0D 0A 55 6E 20 6D 65 6E 75 20 70 72 65 C....Un menu pre
024150: 73 65 6E 74 61 6E 74 20 6C 65 73 20 74 65 72 6D sentant les term
024160: 69 6E 61 75 78 20 6C 65 73 20 70 6C 75 73 20 63 inaux les plus c
024170: 6F 75 72 61 6E 74 73 20 73 65 72 61 20 61 66 66 ourants sera aff
024180: 69 63 68 65 2C 0D 0A 64 61 6E 73 20 6C 65 71 75 iche,..dans lequ
024190: 65 6C 20 76 6F 75 73 20 70 6F 75 72 72 65 7A 20 el vous pourrez
0241A0: 65 6E 20 63 68 6F 69 73 69 72 20 75 6E 20 65 6E en choisir un en
0241B0: 20 74 61 70 61 6E 74 20 73 6F 6E 20 6E 75 6D 65 tapant son nume
0241C0: 72 6F 3A 0D 0A 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D ro:....---------
0241D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0241E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0241F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024200: 20 6C 69 6E 65 13 20 6E 65 20 73 6F 6E 74 20 70 line. ne sont p
024210: 61 73 0D 0A 69 6E 73 74 61 6C 6C 65 65 73 2C 20 as..installees,
024220: 65 6C 6C 65 73 20 73 65 6F 6E 74 20 73 69 6D 75 elles seont simu
024230: 6C 65 65 73 20 70 61 72 20 6C 6F 67 69 63 69 65 lees par logicie
024240: 6C 2C 20 72 61 6C 65 6E 74 69 73 73 61 6E 74 0D l, ralentissant.
024250: 0A 6C 27 65 64 69 74 69 6F 6E 20 64 65 73 20 70 .l'edition des p
024260: 72 6F 67 72 61 6D 6D 65 73 2E 0D 0A 0D 0A 4C 65 rogrammes.....Le
024270: 73 20 63 6F 6D 6D 61 6E 64 65 73 20 70 65 75 76 s commandes peuv
024280: 65 6E 74 20 65 74 72 65 20 65 6E 74 72 65 65 73 ent etre entrees
024290: 20 65 6E 20 74 61 70 61 6E 74 20 73 69 6D 70 6C en tapant simpl
0242A0: 65 6D 65 6E 74 20 6C 65 73 20 74 6F 75 63 68 65 ement les touche
0242B0: 73 0D 0A 61 70 70 72 6F 70 72 69 65 65 73 20 6F s..appropriees o
0242C0: 75 20 65 6E 20 65 6E 74 72 61 6E 74 20 6C 61 20 u en entrant la
0242D0: 76 61 6C 65 75 72 20 41 53 43 49 49 20 64 65 63 valeur ASCII dec
0242E0: 69 6D 61 6C 65 20 6F 75 20 68 65 78 61 64 65 63 imale ou hexadec
0242F0: 69 6D 61 6C 65 0D 0A 64 65 20 6C 61 20 63 6F 6D imale..de la com
024300: 6D 61 6E 64 65 2E 20 53 69 20 75 6E 65 20 63 6F mande. Si une co
024310: 6D 6D 61 6E 64 65 20 6E 65 63 65 73 73 69 74 65 mmande necessite
024320: 20 64 65 75 78 20 63 61 72 61 63 74 65 72 65 73 deux caracteres
024330: 20 27 45 53 43 41 50 45 27 20 65 74 0D 0A 27 3D 'ESCAPE' et..'=
024340: 27 20 70 61 72 20 65 78 65 6D 70 6C 65 2C 20 76 ' par exemple, v
024350: 6F 75 73 20 70 6F 75 76 65 7A 3A 0D 0A 0D 0A 73 ous pouvez:....s
024360: 6F 69 74 20 20 20 74 61 70 65 72 20 65 6E 20 70 oit taper en p
024370: 72 65 6D 69 65 72 20 6C 61 20 74 6F 75 63 68 65 remier la touche
024380: 20 04 45 53 43 41 50 45 04 20 70 75 69 73 20 6C .ESCAPE. puis l
024390: 61 20 74 6F 75 63 68 65 20 04 3D 04 2E 20 4C 27 a touche .=.. L'
0243A0: 65 6E 74 72 65 65 0D 0A 20 20 20 20 20 20 20 73 entree.. s
0243B0: 65 72 61 20 72 65 6E 76 6F 79 65 65 20 73 6F 75 era renvoyee sou
0243C0: 73 20 6C 61 20 66 6F 72 6D 65 20 3C 45 53 43 3E s la forme <ESC>
0243D0: 20 3D 0D 0A 73 6F 69 74 20 20 20 65 6E 74 72 65 =..soit entre
0243E0: 72 20 6C 65 73 20 76 61 6C 65 75 72 73 20 41 53 r les valeurs AS
0243F0: 43 49 49 20 64 65 63 69 6D 61 6C 65 73 20 6F 75 CII decimales ou
024400: 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A 20 20 20 43 68 ---------.. Ch
024410: 6F 6F 73 65 20 6F 6E 65 20 6F 66 20 74 68 65 20 oose one of the
024420: 66 6F 6C 6C 6F 77 69 6E 67 20 74 65 72 6D 69 6E following termin
024430: 61 6C 73 3A 0D 0A 0D 0A 20 20 20 20 20 31 29 20 als:.... 1)
024440: 41 44 44 53 20 32 30 2F 32 35 2F 33 30 20 20 20 ADDS 20/25/30
024450: 20 20 20 20 20 20 20 31 35 29 20 4C 65 61 72 2D 15) Lear-
024460: 53 69 65 67 6C 65 72 20 41 44 4D 2D 33 31 0D 0A Siegler ADM-31..
024470: 20 20 20 20 20 32 29 20 41 44 44 53 20 34 30 2F 2) ADDS 40/
024480: 36 30 20 20 20 20 20 20 20 20 20 20 20 20 20 31 60 1
024490: 36 29 20 4C 69 62 65 72 74 79 0D 0A 20 20 20 20 6) Liberty..
0244A0: 20 33 29 20 41 44 44 53 20 56 69 65 77 70 6F 69 3) ADDS Viewpoi
0244B0: 6E 74 2D 31 41 20 20 20 20 20 20 31 37 29 20 4D nt-1A 17) M
0244C0: 6F 72 72 6F 77 20 4D 44 54 2D 32 30 0D 0A 20 20 orrow MDT-20..
0244D0: 20 20 20 34 29 20 41 44 4D 20 33 41 20 20 20 20 4) ADM 3A
0244E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 38 29 18)
0244F0: 20 4F 74 72 6F 6E 61 20 41 74 74 61 63 68 65 0D Otrona Attache.
024500: 0A 20 20 20 20 20 35 29 20 41 6D 70 65 78 20 44 . 5) Ampex D
024510: 38 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 80
024520: 31 39 29 20 51 75 6D 65 0D 0A 20 20 20 20 20 36 19) Qume.. 6
024530: 29 20 41 4E 53 49 20 20 20 20 20 20 20 20 20 20 ) ANSI
024540: 20 20 20 20 20 20 20 20 20 32 30 29 20 53 6F 72 20) Sor
024550: 6F 63 20 49 51 2D 31 32 30 0D 0A 20 20 20 20 20 oc IQ-120..
024560: 37 29 20 41 70 70 6C 65 2F 67 72 61 70 68 69 63 7) Apple/graphic
024570: 73 20 20 20 20 20 20 20 20 20 32 31 29 20 53 6F s 21) So
024580: 72 6F 63 20 6E 65 77 20 6D 6F 64 65 6C 73 0D 0A roc new models..
024590: 20 20 20 20 20 38 29 20 48 61 7A 65 6C 74 69 6E 8) Hazeltin
0245A0: 65 20 31 35 30 30 20 20 20 20 20 20 20 20 20 32 e 1500 2
0245B0: 32 29 20 54 65 6C 65 74 65 78 74 20 33 30 30 30 2) Teletext 3000
0245C0: 0D 0A 20 20 20 20 20 39 29 20 48 61 7A 65 6C 74 .. 9) Hazelt
0245D0: 69 6E 65 20 45 73 70 72 69 74 20 20 20 20 20 20 ine Esprit
0245E0: 20 32 33 29 20 54 65 6C 65 76 69 64 65 6F 20 39 23) Televideo 9
0245F0: 31 32 2F 39 32 30 2F 39 32 35 0D 0A 20 20 20 20 12/920/925..
024600: 20 68 65 78 61 20 73 65 70 61 72 65 65 73 20 70 hexa separees p
024610: 61 72 20 64 65 73 0D 0A 20 20 20 20 20 20 20 65 ar des.. e
024620: 73 70 61 63 65 73 2E 20 4C 65 73 20 76 61 6C 65 spaces. Les vale
024630: 75 72 73 20 68 65 78 61 20 73 6F 6E 74 20 70 72 urs hexa sont pr
024640: 65 63 65 64 65 65 73 20 70 61 72 20 6C 65 20 73 ecedees par le s
024650: 69 67 6E 65 20 24 2E 0D 0A 20 20 20 20 20 20 20 igne $...
024660: 56 6F 75 73 20 70 6F 75 76 65 7A 20 65 6E 74 72 Vous pouvez entr
024670: 65 72 20 32 37 20 36 31 20 6F 75 20 24 31 42 20 er 27 61 ou $1B
024680: 36 31 20 6F 75 20 24 31 42 20 24 33 44 3B 20 63 61 ou $1B $3D; c
024690: 65 73 20 74 72 6F 69 73 20 65 6E 74 72 65 65 73 es trois entrees
0246A0: 0D 0A 20 20 20 20 20 20 20 73 6F 6E 74 20 65 71 .. sont eq
0246B0: 75 69 76 61 6C 65 6E 74 65 73 2E 0D 0A 0D 0A 4C uivalentes.....L
0246C0: 65 73 20 64 65 75 78 20 6D 65 74 68 6F 64 65 73 es deux methodes
0246D0: 20 6E 65 20 70 65 75 76 65 6E 74 20 70 61 73 20 ne peuvent pas
0246E0: 65 74 72 65 20 6D 65 6C 61 6E 67 65 65 73 2E 20 etre melangees.
0246F0: 53 69 20 76 6F 75 73 20 61 76 65 7A 20 63 6F 6D Si vous avez com
024700: 6D 65 6E 63 65 20 70 61 72 0D 0A 65 6E 74 72 65 mence par..entre
024710: 72 20 64 65 73 20 63 61 72 61 63 74 65 72 65 73 r des caracteres
024720: 20 6E 6F 6E 20 6E 75 6D 65 72 69 71 75 65 73 2C non numeriques,
024730: 20 6C 65 20 72 65 73 74 65 20 64 65 20 6C 61 20 le reste de la
024740: 63 6F 6D 6D 61 6E 64 65 20 64 6F 69 74 20 65 74 commande doit et
024750: 72 65 0D 0A 64 65 66 69 6E 69 20 64 65 20 6C 61 re..defini de la
024760: 20 6D 65 6D 65 20 66 61 63 6F 6E 20 65 74 20 76 meme facon et v
024770: 69 63 65 2D 76 65 72 73 61 2E 0D 0A 0D 0A 55 6E ice-versa.....Un
024780: 20 74 69 72 65 74 20 65 6E 74 72 65 20 65 6E 20 tiret entre en
024790: 74 6F 75 74 20 70 72 65 6D 69 65 72 20 6C 69 65 tout premier lie
0247A0: 75 20 73 75 70 70 72 69 6D 65 20 6C 61 20 63 6F u supprime la co
0247B0: 6D 6D 61 6E 64 65 20 65 74 20 72 65 6E 76 6F 69 mmande et renvoi
0247C0: 65 0D 0A 04 4E 6F 74 68 69 6E 67 04 20 65 6E 20 e...Nothing. en
0247D0: 65 63 68 6F 2E 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A echo............
0247E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0247F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
024800: 31 30 29 20 49 42 4D 20 50 43 20 43 43 50 2F 4D 10) IBM PC CCP/M
024810: 20 62 2F 77 20 20 20 20 20 20 20 32 34 29 20 56 b/w 24) V
024820: 69 73 75 61 6C 20 32 30 30 0D 0A 20 20 20 20 31 isual 200.. 1
024830: 31 29 20 49 42 4D 20 50 43 20 43 43 50 2F 4D 20 1) IBM PC CCP/M
024840: 63 6F 6C 6F 72 20 20 20 20 20 32 35 29 20 57 79 color 25) Wy
024850: 73 65 20 57 59 2D 31 30 30 2F 32 30 30 2F 33 30 se WY-100/200/30
024860: 30 0D 0A 20 20 20 20 31 32 29 20 4B 61 79 70 72 0.. 12) Kaypr
024870: 6F 20 31 30 20 20 20 20 20 20 20 20 20 20 20 20 o 10
024880: 20 20 32 36 29 20 5A 65 6E 69 74 68 0D 0A 20 20 26) Zenith..
024890: 20 20 31 33 29 20 4B 61 79 70 72 6F 20 49 49 20 13) Kaypro II
0248A0: 61 6E 64 20 34 20 20 20 20 20 20 20 20 32 37 29 and 4 27)
0248B0: 20 4E 6F 6E 65 20 6F 66 20 74 68 65 20 61 62 6F None of the abo
0248C0: 76 65 0D 0A 20 20 20 20 31 34 29 20 4C 65 61 72 ve.. 14) Lear
0248D0: 2D 53 69 65 67 6C 65 72 20 41 44 4D 2D 32 30 20 -Siegler ADM-20
0248E0: 20 20 20 32 38 29 20 44 65 6C 65 74 65 20 61 20 28) Delete a
0248F0: 64 65 66 69 6E 69 74 69 6F 6E 0D 0A 0D 0A 20 20 definition....
024900: 20 57 68 69 63 68 20 74 65 72 6D 69 6E 61 6C 3F Which terminal?
024910: 20 28 45 6E 74 65 72 20 6E 6F 2E 20 6F 72 20 5E (Enter no. or ^
024920: 58 20 74 6F 20 65 78 69 74 29 3A 0D 0A 2D 2D 2D X to exit):..---
024930: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024940: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024950: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024960: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D ---------------.
024970: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
024980: 20 20 20 20 20 54 65 72 6D 69 6E 61 6C 20 49 6E Terminal In
024990: 73 74 61 6C 6C 61 74 69 6F 6E 20 4D 65 6E 75 0D stallation Menu.
0249A0: 0A 0D 0A 53 69 20 76 6F 74 72 65 20 74 65 72 6D ...Si votre term
0249B0: 69 6E 61 6C 20 61 70 70 61 72 61 69 74 20 64 61 inal apparait da
0249C0: 6E 73 20 6C 61 20 6C 69 73 74 65 2C 20 65 6E 74 ns la liste, ent
0249D0: 72 65 7A 20 6C 65 20 6E 75 6D 65 72 6F 20 63 6F rez le numero co
0249E0: 72 72 65 73 2D 0D 0A 70 6F 6E 64 61 6E 74 20 65 rres-..pondant e
0249F0: 74 20 6C 27 69 6E 73 74 61 6C 6C 61 74 69 6F 6E t l'installation
024A00: 0D 0A 04 54 65 72 6D 69 6E 61 6C 20 74 79 70 65 ...Terminal type
024A10: 3A 04 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D :...------------
024A20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024A30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024A40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024A50: 2D 2D 2D 2D 2D 2D 0D 0A 45 6E 74 72 65 7A 20 6C ------..Entrez l
024A60: 65 20 6E 6F 6D 20 64 75 20 74 65 72 6D 69 6E 61 e nom du termina
024A70: 6C 20 71 75 65 20 76 6F 75 73 20 69 6E 73 74 61 l que vous insta
024A80: 6C 6C 65 7A 2E 20 41 20 6C 61 20 66 69 6E 20 64 llez. A la fin d
024A90: 65 20 6C 27 69 6E 73 74 61 6C 2D 0D 0A 6C 61 74 e l'instal-..lat
024AA0: 69 6F 6E 2C 20 6C 65 73 20 69 6E 66 6F 72 6D 61 ion, les informa
024AB0: 74 69 6F 6E 73 20 73 65 72 6F 6E 74 20 73 74 6F tions seront sto
024AC0: 63 6B 65 65 73 20 65 74 20 6C 65 20 6E 6F 6D 20 ckees et le nom
024AD0: 64 75 20 74 65 72 6D 69 6E 61 6C 0D 0A 61 70 70 du terminal..app
024AE0: 61 69 72 61 69 74 72 61 20 64 61 6E 73 20 6C 61 airaitra dans la
024AF0: 20 6C 69 73 74 65 20 64 65 73 20 74 65 72 6D 69 liste des termi
024B00: 6E 61 75 78 2E 20 53 69 20 70 6C 75 73 20 74 61 naux. Si plus ta
024B10: 72 64 20 76 6F 75 73 20 64 65 73 69 72 65 7A 0D rd vous desirez.
024B20: 0A 72 65 69 6E 73 74 61 6C 6C 65 72 20 50 52 4F .reinstaller PRO
024B30: 47 52 41 4D 4E 41 4D 45 20 70 6F 75 72 20 63 65 GRAMNAME pour ce
024B40: 20 74 65 72 6D 69 6E 61 6C 2C 20 69 6C 20 76 6F terminal, il vo
024B50: 75 73 20 73 75 66 66 69 72 61 20 64 65 0D 0A 73 us suffira de..s
024B60: 65 6C 65 63 74 69 6F 6E 6E 65 72 20 73 6F 6E 20 electionner son
024B70: 6E 6F 6D 20 64 61 6E 73 20 6C 61 20 6C 69 73 74 nom dans la list
024B80: 65 2E 0D 0A 0D 0A 04 53 65 6E 64 20 61 6E 20 69 e......Send an i
024B90: 6E 69 74 69 61 6C 69 7A 61 74 69 6F 6E 20 73 74 nitialization st
024BA0: 72 69 6E 67 20 74 6F 20 74 68 65 20 74 65 72 6D ring to the term
024BB0: 69 6E 61 6C 3F 04 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D inal?...--------
024BC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024BD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024BE0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024BF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A 53 69 20 76 ----------..Si v
024C00: 20 65 73 74 20 74 65 72 6D 69 6E 65 65 2E 20 41 est terminee. A
024C10: 76 61 6E 74 20 71 75 65 20 63 65 6C 6C 65 2D 63 vant que celle-c
024C20: 69 20 6E 65 20 73 6F 69 74 0D 0A 72 65 65 6C 6C i ne soit..reell
024C30: 65 6D 65 6E 74 20 65 66 66 65 63 74 75 65 65 2C ement effectuee,
024C40: 20 6C 65 20 6D 65 73 73 61 67 65 20 73 75 69 76 le message suiv
024C50: 61 6E 74 20 61 70 70 61 72 61 69 74 3A 0D 0A 0D ant apparait:...
024C60: 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D .---------------
024C70: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024C80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024C90: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024CA0: 2D 2D 2D 0D 0A 20 20 20 44 6F 20 79 6F 75 20 77 ---.. Do you w
024CB0: 61 6E 74 20 74 6F 20 6D 6F 64 69 66 79 20 74 68 ant to modify th
024CC0: 65 20 64 65 66 69 6E 69 74 69 6F 6E 20 62 65 66 e definition bef
024CD0: 6F 72 65 20 69 6E 73 74 61 6C 6C 61 74 69 6F 6E ore installation
024CE0: 3F 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ?..-------------
024CF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024D00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024D10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
024D20: 2D 2D 2D 2D 2D 0D 0A 0D 0A 43 65 63 69 20 76 6F -----....Ceci vo
024D30: 75 73 20 70 65 72 6D 65 74 20 64 65 20 6D 6F 64 us permet de mod
024D40: 69 66 69 65 72 20 75 6E 65 20 6F 75 20 70 6C 75 ifier une ou plu
024D50: 73 69 65 75 72 73 20 76 61 6C 65 75 72 73 2E 20 sieurs valeurs.
024D60: 53 69 20 76 6F 75 73 20 6E 65 20 76 6F 75 2D 0D Si vous ne vou-.
024D70: 0A 6C 65 7A 20 72 69 65 6E 20 6D 6F 64 69 66 69 .lez rien modifi
024D80: 65 72 2C 20 74 61 70 65 72 20 73 69 6D 70 6C 65 er, taper simple
024D90: 6D 65 6E 74 20 04 4E 04 20 65 74 20 6C 27 69 6E ment .N. et l'in
024DA0: 73 74 61 6C 6C 61 74 69 6F 6E 20 73 27 61 63 68 stallation s'ach
024DB0: 65 76 65 0D 0A 65 6E 20 76 6F 75 73 20 64 65 6D eve..en vous dem
024DC0: 61 6E 64 61 6E 74 20 6C 61 20 66 72 65 71 75 65 andant la freque
024DD0: 6E 63 65 20 64 65 20 76 6F 74 72 65 20 43 50 55 nce de votre CPU
024DE0: 28 76 6F 69 72 20 70 6C 75 73 20 6C 6F 69 6E 29 (voir plus loin)
024DF0: 2E 0D 0A 0D 0A 53 69 20 76 6F 74 72 65 20 65 63 .....Si votre ec
024E00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
024E10: 1F 00 01 00 02 09 52 E5 1F 00 41 02 00 00 00 02 ......R...A.....
024E20: 1F 00 46 02 00 00 00 02 1F 00 42 02 00 00 00 02 ..F.......B.....
024E30: 1F 00 47 02 00 00 00 02 1F 00 43 02 00 00 00 02 ..G.......C.....
024E40: 1F 00 48 02 00 00 00 02 1F 00 44 02 00 00 00 02 ..H.......D.....
024E50: 1F 00 49 02 00 00 00 02 1F 00 45 02 00 00 00 02 ..I.......E.....
024E60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024E70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024E80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024E90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024EA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024EB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024EC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024ED0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024EE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024EF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
024F00: 6F 75 73 20 64 65 73 69 72 65 7A 20 69 6E 69 74 ous desirez init
024F10: 69 61 6C 69 73 65 72 20 76 6F 74 72 65 20 74 65 ialiser votre te
024F20: 72 6D 69 6E 61 6C 20 6C 6F 72 73 71 75 65 20 50 rminal lorsque P
024F30: 52 4F 47 52 41 4D 4E 41 4D 45 0D 0A 64 65 6D 61 ROGRAMNAME..dema
024F40: 72 72 65 28 70 6F 75 72 20 65 6E 76 6F 79 65 72 rre(pour envoyer
024F50: 20 64 65 73 20 63 6F 6D 6D 61 6E 64 65 73 20 61 des commandes a
024F60: 75 78 20 74 6F 75 63 68 65 73 20 64 65 20 66 6F ux touches de fo
024F70: 6E 63 74 69 6F 6E 20 70 72 6F 67 72 61 6D 2D 0D nction program-.
024F80: 0A 6D 61 62 6C 65 73 29 2C 20 74 61 70 65 7A 20 .mables), tapez
024F90: 59 2E 20 53 69 6E 6F 6E 20 74 61 70 65 7A 20 3C Y. Sinon tapez <
024FA0: 52 45 54 55 52 4E 3E 2E 0D 0A 0D 0A 53 69 20 76 RETURN>.....Si v
024FB0: 6F 75 73 20 72 65 70 6F 6E 64 65 7A 20 59 20 28 ous repondez Y (
024FC0: 6F 75 69 29 2C 20 76 6F 75 73 20 61 76 65 7A 20 oui), vous avez
024FD0: 6C 65 20 63 68 6F 69 78 20 65 6E 74 72 65 20 64 le choix entre d
024FE0: 65 75 78 20 6D 65 74 68 6F 64 65 73 0D 0A 70 6F eux methodes..po
024FF0: 75 72 20 65 6E 74 72 65 72 20 6C 65 73 20 63 6F ur entrer les co
025000: 6D 6D 61 6E 64 65 73 3A 20 65 6E 20 6C 65 73 20 mmandes: en les
025010: 74 61 70 61 6E 74 20 64 69 72 65 63 74 65 6D 65 tapant directeme
025020: 6E 74 20 6F 75 20 65 6E 20 6E 6F 6D 6D 61 6E 74 nt ou en nommant
025030: 0D 0A 75 6E 20 66 69 63 68 69 65 72 20 6C 65 73 ..un fichier les
025040: 20 63 6F 6E 74 65 6E 61 6E 74 2E 20 4C 61 20 64 contenant. La d
025050: 65 75 78 69 65 6D 65 20 6D 65 74 68 6F 64 65 20 euxieme methode
025060: 65 73 74 20 70 72 65 66 65 72 61 62 6C 65 20 73 est preferable s
025070: 69 20 6C 61 0D 0A 63 68 61 69 6E 65 20 64 27 69 i la..chaine d'i
025080: 6E 69 74 69 61 6C 69 73 61 74 69 6F 6E 20 61 20 nitialisation a
025090: 65 6E 76 6F 79 65 72 20 65 73 74 20 61 73 73 65 envoyer est asse
0250A0: 7A 20 6C 6F 6E 67 75 65 2E 0D 0A 0D 0A 04 53 65 z longue......Se
0250B0: 6E 64 20 61 20 72 65 73 65 74 20 73 74 72 69 6E nd a reset strin
0250C0: 67 20 74 6F 20 74 68 65 20 74 65 72 6D 69 6E 61 g to the termina
0250D0: 6C 3F 04 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D l?...-----------
0250E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0250F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025100: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025110: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025120: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D ---------------.
025130: 0A 20 20 20 20 20 20 20 20 20 20 45 6E 74 72 65 . Entre
025140: 7A 20 6C 61 20 76 61 6C 65 75 72 20 61 70 70 72 z la valeur appr
025150: 6F 70 72 69 65 65 20 61 20 76 6F 74 72 65 20 74 opriee a votre t
025160: 65 72 6D 69 6E 61 6C 2E 0D 0A 0D 0A 04 43 4C 45 erminal......CLE
025170: 41 52 20 53 43 52 45 45 4E 20 63 6F 6D 6D 61 6E AR SCREEN comman
025180: 64 3A 04 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D d:...-----------
025190: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0251A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0251B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0251C0: 2D 2D 2D 2D 2D 2D 2D 0D 0A 45 6E 74 72 65 7A 20 -------..Entrez
0251D0: 6C 61 20 63 6F 6D 6D 61 6E 64 65 20 71 75 69 20 la commande qui
0251E0: 65 66 66 61 63 65 20 6C 65 20 63 6F 6E 74 65 6E efface le conten
0251F0: 75 20 64 65 20 6C 27 65 63 72 61 6E 20 74 6F 75 u de l'ecran tou
025200: 74 20 65 6E 74 69 65 72 2C 0D 0A 63 61 72 61 63 t entier,..carac
025210: 74 65 72 65 73 20 65 74 20 66 6F 6E 64 20 65 76 teres et fond ev
025220: 65 6E 74 75 65 6C 6C 65 6D 65 6E 74 2E 0D 0A 0D entuellement....
025230: 0A 04 44 6F 65 73 20 43 4C 45 41 52 20 53 43 52 ..Does CLEAR SCR
025240: 45 45 4E 20 61 6C 73 6F 20 48 4F 4D 45 20 63 75 EEN also HOME cu
025250: 72 73 6F 72 3F 04 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D rsor?...--------
025260: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025270: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025280: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025290: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A 4C 61 20 63 ----------..La c
0252A0: 6F 6D 6D 61 6E 64 65 20 64 27 65 66 66 61 63 65 ommande d'efface
0252B0: 6D 65 6E 74 20 70 6C 61 63 65 2D 74 2D 65 6C 6C ment place-t-ell
0252C0: 65 20 6C 65 20 63 75 72 73 65 75 72 20 65 6E 20 e le curseur en
0252D0: 68 61 75 74 20 64 65 20 6C 27 65 63 72 61 6E 20 haut de l'ecran
0252E0: 3F 0D 0A 43 27 65 73 74 20 6C 65 20 63 61 73 20 ?..C'est le cas
0252F0: 65 6E 20 67 65 6E 65 72 61 6C 2E 20 53 69 6E 6F en general. Sino
025300: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025310: 2D 2D 2D 2D 2D 2D 2D 0D 0A 4D 61 69 6E 74 65 6E -------..Mainten
025320: 61 6E 74 2C 20 76 6F 75 73 20 70 6F 75 76 65 7A ant, vous pouvez
025330: 20 64 65 66 69 6E 69 72 20 75 6E 65 20 63 68 61 definir une cha
025340: 69 6E 65 20 61 20 65 6E 76 6F 79 65 72 20 61 75 ine a envoyer au
025350: 20 74 65 72 6D 69 6E 61 6C 0D 0A 6C 6F 72 73 71 terminal..lorsq
025360: 75 65 20 76 6F 75 73 20 71 75 69 74 74 65 7A 20 ue vous quittez
025370: 50 52 4F 47 52 41 4D 4E 41 4D 45 2E 20 4C 61 20 PROGRAMNAME. La
025380: 64 65 73 63 72 69 70 74 69 6F 6E 20 64 65 20 6C description de l
025390: 61 20 63 6F 6D 6D 61 6E 64 65 0D 0A 70 72 65 63 a commande..prec
0253A0: 65 64 65 6E 74 65 20 73 27 61 70 70 6C 69 71 75 edente s'appliqu
0253B0: 65 20 69 63 69 2E 0D 0A 0D 0A 04 43 55 52 53 4F e ici......CURSO
0253C0: 52 20 4C 45 41 44 2D 49 4E 20 63 6F 6D 6D 61 6E R LEAD-IN comman
0253D0: 64 3A 04 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D d:...-----------
0253E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0253F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025400: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025410: 2D 2D 2D 2D 2D 2D 2D 0D 0A 43 65 74 74 65 20 63 -------..Cette c
025420: 6F 6D 6D 61 6E 64 65 20 65 73 74 20 75 6E 65 20 ommande est une
025430: 73 65 71 75 65 6E 63 65 20 73 70 65 63 69 61 6C sequence special
025440: 65 20 64 65 20 63 61 72 61 63 74 65 72 65 73 20 e de caracteres
025450: 69 6E 64 69 71 75 61 6E 74 0D 0A 61 75 20 74 65 indiquant..au te
025460: 72 6D 69 6E 61 6C 20 71 75 65 20 6C 65 73 20 63 rminal que les c
025470: 61 72 61 63 74 65 72 65 73 20 73 75 69 76 61 6E aracteres suivan
025480: 74 20 72 65 70 72 65 73 65 6E 74 65 6E 74 20 75 t representent u
025490: 6E 65 20 61 64 72 65 73 73 65 0D 0A 64 65 20 6C ne adresse..de l
0254A0: 27 65 63 72 61 6E 20 6F 75 20 64 65 76 72 61 20 'ecran ou devra
0254B0: 63 65 20 70 6C 61 63 65 72 20 6C 65 20 63 75 72 ce placer le cur
0254C0: 73 65 75 72 2E 20 53 69 20 76 6F 75 73 20 64 65 seur. Si vous de
0254D0: 66 69 6E 69 73 73 65 7A 20 63 65 74 74 65 0D 0A finissez cette..
0254E0: 63 6F 6D 6D 61 6E 64 65 2C 20 6C 65 73 20 71 75 commande, les qu
0254F0: 65 73 74 69 6F 6E 73 20 73 75 70 70 6C 65 6D 65 estions suppleme
025500: 6E 2C 20 65 6E 74 72 65 7A 20 4E 20 65 74 20 64 n, entrez N et d
025510: 65 66 69 6E 69 73 73 65 7A 20 6C 61 20 63 6F 6D efinissez la com
025520: 6D 61 6E 64 65 0D 0A 48 4F 4D 45 2E 0D 0A 0D 0A mande..HOME.....
025530: 04 44 45 4C 45 54 45 20 4C 49 4E 45 20 63 6F 6D .DELETE LINE com
025540: 6D 61 6E 64 3A 04 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D mand:...--------
025550: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025560: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025570: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025580: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A 45 6E 74 72 ----------..Entr
025590: 65 7A 20 6C 61 20 63 6F 6D 61 6E 64 65 20 71 75 ez la comande qu
0255A0: 69 20 65 66 66 61 63 65 20 6C 61 20 6C 69 67 6E i efface la lign
0255B0: 65 20 6F 75 20 73 65 20 74 72 6F 75 76 65 20 6C e ou se trouve l
0255C0: 65 20 63 75 72 73 65 75 72 2E 0D 0A 0D 0A 04 49 e curseur......I
0255D0: 4E 53 45 52 54 20 4C 49 4E 45 20 63 6F 6D 6D 61 NSERT LINE comma
0255E0: 6E 64 3A 04 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D nd:...----------
0255F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025600: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025610: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025620: 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A 45 6E 74 72 65 7A --------..Entrez
025630: 20 6C 61 20 63 6F 6D 6D 61 6E 64 65 20 71 75 69 la commande qui
025640: 20 69 6E 73 65 72 65 20 75 6E 65 20 6C 69 67 6E insere une lign
025650: 65 20 6F 75 20 73 65 20 74 72 6F 75 76 65 20 6C e ou se trouve l
025660: 65 20 63 75 72 73 65 75 72 2E 0D 0A 0D 0A 04 45 e curseur......E
025670: 52 41 53 45 20 54 4F 20 45 4E 44 20 4F 46 20 4C RASE TO END OF L
025680: 49 4E 45 20 63 6F 6D 6D 61 6E 64 3A 04 0D 0A 2D INE command:...-
025690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0256A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0256B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0256C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0256D0: 2D 0D 0A 45 6E 74 72 65 7A 20 6C 61 20 63 6F 6D -..Entrez la com
0256E0: 6D 61 6E 64 65 20 71 75 69 20 65 66 66 61 63 65 mande qui efface
0256F0: 20 64 65 70 75 69 73 20 6C 61 20 70 6F 73 69 74 depuis la posit
025700: 6E 74 61 69 72 65 73 20 73 75 69 76 61 6E 74 65 ntaires suivante
025710: 73 20 61 70 70 61 72 61 69 74 72 6F 6E 74 3A 0D s apparaitront:.
025720: 0A 0D 0A 20 20 20 20 20 20 20 04 43 55 52 53 4F ... .CURSO
025730: 52 20 50 4F 53 49 54 49 4F 4E 49 4E 47 20 43 4F R POSITIONING CO
025740: 4D 4D 41 4E 44 20 74 6F 20 73 65 6E 64 20 62 65 MMAND to send be
025750: 74 77 65 65 6E 20 6C 69 6E 65 20 61 6E 64 20 63 tween line and c
025760: 6F 6C 75 6D 6E 3A 04 0D 0A 20 20 20 20 20 20 20 olumn:...
025770: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025780: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025790: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0257A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A 20 20 20 -----------..
0257B0: 20 20 20 20 43 65 72 74 61 69 6E 73 20 74 65 72 Certains ter
0257C0: 6D 69 6E 61 75 78 20 6E 65 63 65 73 73 69 74 65 minaux necessite
0257D0: 6E 74 20 75 6E 65 20 63 6F 6D 6D 61 6E 64 65 20 nt une commande
0257E0: 65 6E 74 72 65 20 6C 65 73 20 6E 6F 6D 62 72 65 entre les nombre
0257F0: 73 0D 0A 20 20 20 20 20 20 20 64 65 66 69 6E 69 s.. defini
025800: 73 73 61 6E 74 20 6C 65 73 20 61 64 72 65 73 73 ssant les adress
025810: 65 73 20 64 65 20 6C 69 67 6E 65 20 65 74 20 64 es de ligne et d
025820: 65 20 63 6F 6C 6F 6E 6E 65 2E 0D 0A 0D 0A 20 20 e colonne.....
025830: 20 20 20 20 20 04 43 55 52 53 4F 52 20 50 4F 53 .CURSOR POS
025840: 49 54 49 4F 4E 49 4E 47 20 43 4F 4D 4D 41 4E 44 ITIONING COMMAND
025850: 20 74 6F 20 73 65 6E 64 20 61 66 74 65 72 20 6C to send after l
025860: 69 6E 65 20 61 6E 64 20 63 6F 6C 75 6D 6E 3A 04 ine and column:.
025870: 0D 0A 20 20 20 20 20 20 20 2D 2D 2D 2D 2D 2D 2D .. -------
025880: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025890: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0258A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0258B0: 2D 2D 2D 2D 0D 0A 20 20 20 20 20 20 20 43 65 72 ----.. Cer
0258C0: 74 61 69 6E 73 20 74 65 72 6D 69 6E 61 75 78 20 tains terminaux
0258D0: 6E 65 63 65 73 73 69 74 65 6E 74 20 75 6E 65 20 necessitent une
0258E0: 63 6F 6D 6D 61 6E 64 65 20 61 70 72 65 73 20 6C commande apres l
0258F0: 65 73 20 6E 6F 6D 62 72 65 73 0D 0A 20 20 20 20 es nombres..
025900: 69 6F 6E 20 64 75 20 63 75 72 73 65 75 72 0D 0A ion du curseur..
025910: 6A 75 73 71 75 27 61 20 6C 61 20 66 69 6E 20 64 jusqu'a la fin d
025920: 65 20 6C 61 20 6C 69 67 6E 65 2E 0D 0A 0D 0A 04 e la ligne......
025930: 53 54 41 52 54 20 4F 46 20 27 4C 4F 57 20 56 49 START OF 'LOW VI
025940: 44 45 4F 27 20 63 6F 6D 6D 61 6E 64 3A 04 0D 0A DEO' command:...
025950: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025960: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025970: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025980: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025990: 2D 2D 0D 0A 53 69 20 76 6F 74 72 65 20 74 65 72 --..Si votre ter
0259A0: 6D 69 6E 61 6C 20 73 75 70 70 6F 72 74 65 20 64 minal supporte d
0259B0: 69 66 66 65 72 65 6E 74 65 73 20 69 6E 74 65 6E ifferentes inten
0259C0: 73 69 74 65 73 20 76 69 64 65 6F 2C 20 64 65 66 sites video, def
0259D0: 69 6E 69 73 73 65 7A 0D 0A 69 63 69 20 6C 61 20 inissez..ici la
0259E0: 63 6F 6D 6D 61 6E 64 65 20 71 75 69 20 69 6E 69 commande qui ini
0259F0: 74 69 61 6C 69 73 65 20 6C 61 20 62 61 73 73 65 tialise la basse
025A00: 20 69 6E 74 65 6E 73 69 74 65 2E 20 53 69 20 63 intensite. Si c
025A10: 65 74 74 65 20 63 6F 6D 6D 61 6E 64 65 0D 0A 65 ette commande..e
025A20: 73 74 20 64 65 66 69 6E 69 65 2C 20 6C 61 20 71 st definie, la q
025A30: 75 65 73 74 69 6F 6E 20 73 75 69 76 61 6E 74 65 uestion suivante
025A40: 20 61 70 70 61 72 61 69 74 3A 0D 0A 0D 0A 20 20 apparait:....
025A50: 20 20 20 20 20 04 53 54 41 52 54 20 4F 46 20 27 .START OF '
025A60: 4E 4F 52 4D 41 4C 20 56 49 44 45 4F 27 20 63 6F NORMAL VIDEO' co
025A70: 6D 6D 61 6E 64 3A 04 0D 0A 20 20 20 20 20 20 20 mmand:...
025A80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025A90: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025AA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025AB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A 20 20 ------------..
025AC0: 20 20 20 20 20 44 65 66 69 6E 69 73 73 65 7A 20 Definissez
025AD0: 6C 61 20 63 6F 6D 6D 61 6E 64 65 20 71 75 69 20 la commande qui
025AE0: 72 65 6D 65 74 20 6C 27 65 63 72 61 6E 20 65 6E remet l'ecran en
025AF0: 20 76 69 64 65 6F 20 6E 6F 72 6D 61 6C 65 2E 0D video normale..
025B00: 20 20 20 64 65 66 69 6E 69 73 73 61 6E 74 20 6C definissant l
025B10: 65 73 20 61 64 72 65 73 73 65 73 20 64 65 20 6C es adresses de l
025B20: 69 67 6E 65 20 65 74 20 64 65 20 63 6F 6C 6F 6E igne et de colon
025B30: 6E 65 2E 0D 0A 0D 0A 20 20 20 20 20 20 20 04 43 ne..... .C
025B40: 6F 6C 75 6D 6E 20 66 69 72 73 74 3F 04 0D 0A 20 olumn first?...
025B50: 20 20 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------
025B60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025B70: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025B80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025B90: 2D 0D 0A 20 20 20 20 20 20 20 4C 61 20 70 6C 75 -.. La plu
025BA0: 70 61 72 74 20 64 65 73 20 74 65 72 6D 69 6E 61 part des termina
025BB0: 75 78 20 6F 6E 74 20 6C 65 20 66 6F 72 6D 61 74 ux ont le format
025BC0: 3A 20 4C 69 67 6E 65 20 65 6E 20 70 72 65 6D 69 : Ligne en premi
025BD0: 65 72 2C 20 70 75 69 73 0D 0A 20 20 20 20 20 20 er, puis..
025BE0: 20 63 6F 6C 6F 6E 6E 65 2E 0D 0A 20 20 20 20 20 colonne...
025BF0: 20 20 53 69 20 63 27 65 73 74 20 6C 65 20 63 61 Si c'est le ca
025C00: 73 20 70 6F 75 72 20 76 6F 74 72 65 20 74 65 72 s pour votre ter
025C10: 6D 69 6E 61 6C 2C 20 74 61 70 65 7A 20 4E 2C 20 minal, tapez N,
025C20: 73 69 6E 6F 6E 20 74 61 70 65 7A 20 59 2E 0D 0A sinon tapez Y...
025C30: 0D 0A 20 20 20 20 20 20 20 04 4F 46 46 53 45 54 .. .OFFSET
025C40: 20 74 6F 20 61 64 64 20 74 6F 20 4C 49 4E 45 04 to add to LINE.
025C50: 0D 0A 20 20 20 20 20 20 20 2D 2D 2D 2D 2D 2D 2D .. -------
025C60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025C70: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025C80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025C90: 2D 2D 2D 2D 0D 0A 20 20 20 20 20 20 20 45 6E 74 ----.. Ent
025CA0: 72 65 7A 20 6C 65 20 6E 6F 6D 62 72 65 20 61 20 rez le nombre a
025CB0: 61 6A 6F 75 74 65 72 20 61 20 6C 27 61 64 72 65 ajouter a l'adre
025CC0: 73 73 65 20 64 65 20 6C 61 20 6C 69 67 6E 65 2E sse de la ligne.
025CD0: 0D 0A 0D 0A 20 20 20 20 20 20 20 04 4F 46 46 53 .... .OFFS
025CE0: 45 54 20 74 6F 20 61 64 64 20 74 6F 20 43 4F 4C ET to add to COL
025CF0: 55 4D 4E 04 0D 0A 20 20 20 20 20 20 20 2D 2D 2D UMN... ---
025D00: 0A 0D 0A 04 4E 75 6D 62 65 72 20 6F 66 20 72 6F ....Number of ro
025D10: 77 73 20 28 6C 69 6E 65 73 29 20 6F 6E 20 79 6F ws (lines) on yo
025D20: 75 72 20 73 63 72 65 65 6E 3A 04 0D 0A 2D 2D 2D ur screen:...---
025D30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025D40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025D50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025D60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D ---------------.
025D70: 0A 45 6E 74 72 65 7A 20 6C 65 20 6E 6F 6D 62 72 .Entrez le nombr
025D80: 65 20 64 65 20 6C 69 67 6E 65 73 20 64 65 20 76 e de lignes de v
025D90: 6F 74 72 65 20 65 63 72 61 6E 2E 0D 0A 0D 0A 04 otre ecran......
025DA0: 4E 75 6D 62 65 72 20 6F 66 20 63 6F 6C 75 6D 6E Number of column
025DB0: 73 20 6F 6E 20 79 6F 75 72 20 73 63 72 65 65 6E s on your screen
025DC0: 3A 04 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D :...------------
025DD0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025DE0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025DF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025E00: 2D 2D 2D 2D 2D 2D 0D 0A 45 6E 74 72 65 7A 20 6C ------..Entrez l
025E10: 65 20 6E 6F 6D 62 72 65 20 64 65 20 63 6F 6C 6F e nombre de colo
025E20: 6E 6E 65 73 20 64 65 20 76 6F 74 72 65 20 65 63 nnes de votre ec
025E30: 72 61 6E 0D 0A 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D ran....---------
025E40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025E50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025E60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025E70: 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A 04 44 65 6C 61 ---------...Dela
025E80: 79 20 61 66 74 65 72 20 43 55 52 53 4F 52 20 41 y after CURSOR A
025E90: 44 44 52 45 53 53 20 28 30 2D 32 35 35 20 6D 73 DDRESS (0-255 ms
025EA0: 29 3A 04 0D 0A 04 44 65 6C 61 79 20 61 66 74 65 ):....Delay afte
025EB0: 72 20 43 4C 45 41 52 2C 20 44 45 4C 45 54 45 2C r CLEAR, DELETE,
025EC0: 20 61 6E 64 20 49 4E 53 45 52 54 20 28 30 2D 32 and INSERT (0-2
025ED0: 35 35 20 6D 73 29 3A 04 0D 0A 04 44 65 6C 61 79 55 ms):....Delay
025EE0: 20 61 66 74 65 72 20 45 52 41 53 45 20 54 4F 20 after ERASE TO
025EF0: 45 4E 44 20 4F 46 20 4C 49 4E 45 20 61 6E 64 20 END OF LINE and
025F00: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025F10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025F20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025F30: 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A 20 20 20 20 20 20 --------..
025F40: 20 45 6E 74 72 65 7A 20 6C 65 20 6E 6F 6D 62 72 Entrez le nombr
025F50: 65 20 61 20 61 6A 6F 75 74 65 72 20 61 20 6C 27 e a ajouter a l'
025F60: 61 64 72 65 73 73 65 20 64 65 20 6C 61 20 63 6F adresse de la co
025F70: 6C 6F 6E 6E 65 2E 0D 0A 0D 0A 20 20 20 20 20 20 lonne.....
025F80: 20 04 42 69 6E 61 72 79 20 61 64 64 72 65 73 73 .Binary address
025F90: 3F 04 0D 0A 20 20 20 20 20 20 20 2D 2D 2D 2D 2D ?... -----
025FA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025FB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025FC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
025FD0: 2D 2D 2D 2D 2D 2D 0D 0A 20 20 20 20 20 20 20 4C ------.. L
025FE0: 61 20 70 6C 75 70 61 72 74 20 64 65 73 20 74 65 a plupart des te
025FF0: 72 6D 69 6E 61 75 78 20 61 74 74 65 6E 64 65 6E rminaux attenden
026000: 74 20 6C 27 61 64 72 65 73 73 65 20 64 75 20 63 t l'adresse du c
026010: 75 72 73 65 75 72 20 73 6F 75 73 0D 0A 20 20 20 urseur sous..
026020: 20 20 20 20 66 6F 72 6D 65 20 62 69 6E 61 69 72 forme binair
026030: 65 2E 20 53 69 20 63 27 65 73 74 20 6C 65 20 63 e. Si c'est le c
026040: 61 73 20 64 65 20 76 6F 74 72 65 20 74 65 72 6D as de votre term
026050: 69 6E 61 6C 2C 20 74 61 70 65 7A 20 59 2E 0D 0A inal, tapez Y...
026060: 20 20 20 20 20 20 20 53 69 20 69 6C 20 61 74 74 Si il att
026070: 65 6E 64 20 64 65 73 20 63 61 72 61 63 74 65 72 end des caracter
026080: 65 73 20 41 53 43 49 49 2C 20 74 61 70 65 7A 20 es ASCII, tapez
026090: 4E 2E 20 44 61 6E 73 20 63 65 20 63 61 73 2C 20 N. Dans ce cas,
0260A0: 6C 61 0D 0A 20 20 20 20 20 20 20 71 75 65 73 74 la.. quest
0260B0: 69 6F 6E 20 73 75 69 76 61 6E 74 65 20 61 70 70 ion suivante app
0260C0: 61 72 61 69 74 3A 0D 0A 0D 0A 20 20 20 20 20 20 arait:....
0260D0: 20 20 20 20 04 32 20 6F 72 20 33 20 41 53 43 49 .2 or 3 ASCI
0260E0: 49 20 64 69 67 69 74 73 3F 04 0D 0A 20 20 20 20 I digits?...
0260F0: 20 20 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------
026100: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
026110: 20 00 01 00 02 09 52 E5 20 00 41 02 00 00 00 02 .....R. .A.....
026120: 20 00 46 02 00 00 00 02 20 00 42 02 00 00 00 02 .F..... .B.....
026130: 20 00 47 02 00 00 00 02 20 00 43 02 00 00 00 02 .G..... .C.....
026140: 20 00 48 02 00 00 00 02 20 00 44 02 00 00 00 02 .H..... .D.....
026150: 20 00 49 02 00 00 00 02 20 00 45 02 00 00 00 02 .I..... .E.....
026160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
026170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
026180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
026190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0261A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0261B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0261C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0261D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0261E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0261F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
026200: 48 49 47 48 4C 49 47 48 54 20 4F 6E 2F 4F 66 66 HIGHLIGHT On/Off
026210: 20 28 30 2D 32 35 35 20 6D 73 29 3A 04 0D 0A 2D (0-255 ms):...-
026220: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
026230: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
026240: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
026250: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
026260: 2D 0D 0A 45 6E 74 72 65 7A 20 6C 65 73 20 64 65 -..Entrez les de
026270: 6C 61 69 73 20 65 6E 20 6D 69 6C 6C 69 73 65 63 lais en millisec
026280: 6F 6E 64 65 73 20 72 65 71 75 69 73 20 61 70 72 ondes requis apr
026290: 65 73 20 6C 65 73 20 66 6F 6E 63 74 69 6F 6E 73 es les fonctions
0262A0: 0D 0A 73 70 65 63 69 66 69 65 65 73 2E 20 3C 52 ..specifiees. <R
0262B0: 45 54 55 52 4E 3E 20 73 69 67 6E 69 66 69 65 20 ETURN> signifie
0262C0: 30 20 28 70 61 73 20 64 65 20 64 65 6C 61 69 73 0 (pas de delais
0262D0: 29 2E 0D 0A 73 70 65 63 69 1E 66 69 65 64 2E 20 )...speci.fied.
0262E0: 52 45 54 55 52 4E 20 6D 65 61 6E 73 20 30 20 28 RETURN means 0 (
0262F0: 6E 6F 20 64 65 6C 61 79 29 2E 0D 0A 0D 0A 04 49 no delay)......I
026300: 73 20 74 68 69 73 20 64 65 66 69 6E 69 74 69 6F s this definitio
026310: 6E 20 63 6F 72 72 65 63 74 3F 04 0D 0A 2D 2D 2D n correct?...---
026320: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
026330: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
026340: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
026350: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D ---------------.
026360: 0A 53 69 20 76 6F 75 73 20 61 76 65 7A 20 63 6F .Si vous avez co
026370: 6D 6D 69 73 20 64 65 73 20 65 72 72 65 75 72 73 mmis des erreurs
026380: 2C 20 74 61 70 65 72 20 4E 2E 20 56 6F 75 73 20 , taper N. Vous
026390: 72 65 74 6F 75 72 6E 65 72 65 7A 20 61 6C 6F 72 retournerez alor
0263A0: 73 20 61 75 0D 0A 6D 65 6E 75 20 64 65 20 73 65 s au..menu de se
0263B0: 6C 65 63 74 69 6F 6E 20 64 75 20 74 65 72 6D 69 lection du termi
0263C0: 6E 61 6C 2E 20 4C 65 73 20 64 6F 6E 6E 65 65 73 nal. Les donnees
0263D0: 20 71 75 65 20 76 6F 75 73 20 76 65 6E 65 7A 20 que vous venez
0263E0: 64 65 20 72 65 6E 74 72 65 72 0D 0A 73 65 72 6F de rentrer..sero
0263F0: 6E 74 20 69 6E 63 6C 75 73 65 73 20 64 61 6E 73 nt incluses dans
026400: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026410: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026420: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026430: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026440: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026450: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026460: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026470: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026480: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026490: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0264A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0264B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0264C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0264D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0264E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0264F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026500: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026510: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026520: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026530: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026540: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026550: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026560: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026570: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026580: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026590: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0265A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0265B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0265C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0265D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0265E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0265F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026600: 20 6C 65 20 66 69 63 68 69 65 72 20 64 65 73 20 le fichier des
026610: 64 6F 6E 6E 65 65 73 20 64 27 69 6E 73 74 61 6C donnees d'instal
026620: 6C 61 74 69 6F 6E 20 65 74 20 61 70 70 61 2D 0D lation et appa-.
026630: 0A 72 61 69 74 72 6F 6E 74 20 64 61 6E 73 20 6C .raitront dans l
026640: 65 20 6D 65 6E 75 3B 20 6D 61 69 73 20 6C 27 69 e menu; mais l'i
026650: 6E 73 74 61 6C 6C 61 74 69 6F 6E 20 6E 27 65 73 nstallation n'es
026660: 74 20 70 61 73 20 65 6E 63 6F 72 65 20 66 61 69 t pas encore fai
026670: 74 65 2E 0D 0A 0D 0A 53 69 20 76 6F 75 73 20 74 te.....Si vous t
026680: 61 70 65 7A 20 59 2C 20 6C 61 20 71 75 65 73 74 apez Y, la quest
026690: 69 6F 6E 20 73 75 69 76 61 6E 74 65 20 61 70 70 ion suivante app
0266A0: 61 72 61 69 74 72 61 3A 0D 0A 0D 0A 2D 2D 2D 2D araitra:....----
0266B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0266C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0266D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0266E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A --------------..
0266F0: 04 4F 70 65 72 61 74 69 6E 67 20 66 72 65 71 75 .Operating frequ
026700: 65 6E 63 79 20 6F 66 20 79 6F 75 72 20 6D 69 63 ency of your mic
026710: 72 6F 70 72 6F 63 65 73 73 6F 72 20 69 6E 20 4D roprocessor in M
026720: 48 7A 20 28 66 6F 72 20 64 65 6C 61 79 73 29 3A Hz (for delays):
026730: 04 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ...-------------
026740: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
026750: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
026760: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
026770: 2D 2D 2D 2D 2D 0D 0A 4C 65 73 20 64 65 6C 61 69 -----..Les delai
026780: 73 20 73 70 65 63 69 66 69 65 73 20 70 6C 75 73 s specifies plus
026790: 20 68 61 75 74 20 64 65 70 65 6E 64 65 6E 74 20 haut dependent
0267A0: 64 65 20 63 65 74 74 65 20 76 61 6C 65 75 72 20 de cette valeur
0267B0: 71 75 65 20 76 6F 75 73 0D 0A 64 65 76 65 7A 20 que vous..devez
0267C0: 65 6E 74 72 65 72 2E 0D 0A 0D 0A 4C 27 69 6E 73 entrer.....L'ins
0267D0: 74 61 6C 6C 61 74 69 6F 6E 20 65 73 74 20 6D 61 tallation est ma
0267E0: 69 6E 74 65 6E 61 6E 74 20 74 65 72 6D 69 6E 65 intenant termine
0267F0: 65 3B 20 6C 65 73 20 64 6F 6E 6E 65 65 73 20 73 e; les donnees s
026800: 0D 0A 7B 24 41 2B 2C 52 2D 2C 57 30 2C 49 2D 7D ..{$A+,R-,W0,I-}
026810: 0D 0A 0D 0A 50 72 6F 63 65 64 75 72 65 20 49 6E ....Procedure In
026820: 70 3B 20 20 46 6F 72 77 61 72 64 3B 0D 0A 50 72 p; Forward;..Pr
026830: 6F 63 65 64 75 72 65 20 4F 75 74 50 3B 20 20 46 ocedure OutP; F
026840: 6F 72 57 61 72 64 3B 0D 0A 46 75 6E 63 74 69 6F orWard;..Functio
026850: 6E 20 20 4C 65 73 73 28 56 61 72 20 58 2C 59 29 n Less(Var X,Y)
026860: 3A 42 6F 6F 6C 65 61 6E 3B 20 46 6F 72 77 61 72 :Boolean; Forwar
026870: 64 3B 0D 0A 0D 0A 54 79 70 65 0D 0A 20 20 20 53 d;....Type.. S
026880: 6F 72 74 50 6F 69 6E 74 65 72 20 3D 20 5E 42 79 ortPointer = ^By
026890: 74 65 3B 0D 0A 0D 0A 56 61 72 0D 0A 20 20 20 53 te;....Var.. S
0268A0: 6F 72 74 52 65 63 6F 72 64 20 3A 20 52 65 63 6F ortRecord : Reco
0268B0: 72 64 20 20 7B 20 47 6C 6F 62 61 6C 20 76 61 72 rd { Global var
0268C0: 69 61 62 6C 65 73 20 75 73 65 64 20 62 79 20 61 iables used by a
0268D0: 6C 6C 20 72 6F 75 74 69 6E 65 73 20 7D 0D 0A 20 ll routines }..
0268E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0268F0: 20 20 7B 20 76 61 72 69 61 62 6C 65 73 20 63 6F { variables co
026900: 6E 63 65 72 6E 69 6E 67 20 70 61 67 69 6E 67 20 ncerning paging
026910: 7D 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 }..
026920: 20 20 20 20 20 20 4E 20 20 20 20 20 20 20 20 20 N
026930: 20 20 3A 20 49 6E 74 65 67 65 72 3B 20 7B 20 6E : Integer; { n
026940: 6F 20 6F 66 20 72 65 63 6F 72 64 73 20 74 6F 20 o of records to
026950: 62 65 20 73 6F 72 74 65 64 20 20 20 20 20 20 7D be sorted }
026960: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
026970: 20 20 20 20 20 42 20 20 20 20 20 20 20 20 20 20 B
026980: 20 3A 20 49 6E 74 65 67 65 72 3B 20 7B 20 6E 6F : Integer; { no
026990: 20 6F 66 20 72 65 63 6F 72 64 73 20 70 72 20 70 of records pr p
0269A0: 61 67 65 20 20 20 20 20 20 20 20 20 20 20 7D 0D age }.
0269B0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0269C0: 20 20 20 20 50 61 67 65 73 20 20 20 20 20 20 20 Pages
0269D0: 3A 20 30 2E 2E 31 30 3B 20 20 20 7B 20 4E 6F 20 : 0..10; { No
0269E0: 6F 66 20 70 61 67 65 73 20 69 6E 20 6D 65 6D 6F of pages in memo
0269F0: 72 79 20 20 20 20 20 20 20 20 20 20 20 7D 0D 0A ry }..
026A00: 6F 6E 74 20 65 63 72 69 74 65 73 0D 0A 64 61 6E ont ecrites..dan
026A10: 73 20 50 52 4F 47 52 41 4D 4E 41 4D 45 20 65 74 s PROGRAMNAME et
026A20: 20 76 6F 75 73 20 72 65 74 6F 75 72 6E 65 7A 20 vous retournez
026A30: 61 75 20 6D 65 6E 75 20 65 78 74 65 72 69 65 75 au menu exterieu
026A40: 72 2E 20 4C 65 73 20 64 6F 6E 6E 65 65 73 0D 0A r. Les donnees..
026A50: 73 6F 6E 74 20 65 67 61 6C 65 6D 65 6E 74 20 73 sont egalement s
026A60: 61 75 76 65 67 61 72 64 65 65 73 20 64 61 6E 73 auvegardees dans
026A70: 20 6C 65 20 66 69 63 68 69 65 72 20 64 27 69 6E le fichier d'in
026A80: 73 74 61 6C 6C 61 74 69 6F 6E 20 65 74 0D 0A 61 stallation et..a
026A90: 70 70 61 72 61 69 74 72 6F 6E 74 20 73 75 72 20 pparaitront sur
026AA0: 6C 65 20 6D 65 6E 75 20 64 65 20 73 65 6C 65 63 le menu de selec
026AB0: 74 69 6F 6E 20 70 6F 75 72 20 6C 65 20 70 72 6F tion pour le pro
026AC0: 63 68 61 69 6E 20 61 70 70 65 6C 20 64 65 0D 0A chain appel de..
026AD0: 49 4E 53 54 41 4C 4C 4E 41 4D 45 2E 0D 0A 1A 1A INSTALLNAME.....
026AE0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
026AF0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
026B00: 65 6E 63 79 20 6F 66 20 79 6F 75 72 20 6D 69 63 ency of your mic
026B10: 72 6F 70 72 6F 63 65 73 73 6F 72 20 69 6E 20 4D roprocessor in M
026B20: 48 7A 20 28 66 6F 72 20 64 65 6C 61 79 73 29 3A Hz (for delays):
026B30: 04 0D 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ...-------------
026B40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
026B50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
026B60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
026B70: 2D 2D 2D 2D 2D 0D 0A 4C 65 73 20 64 65 6C 61 69 -----..Les delai
026B80: 73 20 73 70 65 63 69 66 69 65 73 20 70 6C 75 73 s specifies plus
026B90: 20 68 61 75 74 20 64 65 70 65 6E 64 65 6E 74 20 haut dependent
026BA0: 64 65 20 63 65 74 74 65 20 76 61 6C 65 75 72 20 de cette valeur
026BB0: 71 75 65 20 76 6F 75 73 0D 0A 64 65 76 65 7A 20 que vous..devez
026BC0: 65 6E 74 72 65 72 2E 0D 0A 0D 0A 4C 27 69 6E 73 entrer.....L'ins
026BD0: 74 61 6C 6C 61 74 69 6F 6E 20 65 73 74 20 6D 61 tallation est ma
026BE0: 69 6E 74 65 6E 61 6E 74 20 74 65 72 6D 69 6E 65 intenant termine
026BF0: 65 3B 20 6C 65 73 20 64 6F 6E 6E 65 65 73 20 73 e; les donnees s
026C00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
026C10: 20 20 20 53 65 63 50 72 50 61 67 65 2C 20 20 20 SecPrPage,
026C20: 20 20 20 20 20 20 20 20 20 20 7B 20 6E 6F 20 6F { no o
026C30: 66 20 73 65 63 74 6F 72 73 20 70 72 20 70 61 67 f sectors pr pag
026C40: 65 20 20 20 20 20 20 20 20 20 20 20 7D 0D 0A 20 e }..
026C50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
026C60: 20 20 4E 44 69 76 42 2C 0D 0A 20 20 20 20 20 20 NDivB,..
026C70: 20 20 20 20 20 20 20 20 20 20 20 20 20 4E 4D 6F NMo
026C80: 64 42 20 20 20 20 20 20 20 3A 20 49 6E 74 65 67 dB : Integ
026C90: 65 72 3B 20 7B 20 3D 20 4D 20 44 69 76 20 42 2C er; { = M Div B,
026CA0: 20 4E 20 4D 6F 64 20 42 20 72 65 73 70 65 63 74 N Mod B respect
026CB0: 69 76 65 6C 79 20 7D 0D 0A 20 20 20 0D 0A 20 20 ively }.. ..
026CC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
026CD0: 20 42 75 66 20 20 20 20 20 20 20 20 20 3A 20 41 Buf : A
026CE0: 72 72 61 79 5B 30 2E 2E 31 30 5D 20 4F 66 20 53 rray[0..10] Of S
026CF0: 6F 72 74 50 6F 69 6E 74 65 72 3B 20 0D 0A 20 20 ortPointer; ..
026D00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
026D10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
026D20: 20 20 20 20 20 20 20 20 7B 20 41 64 64 72 65 73 { Addres
026D30: 73 65 73 20 6F 66 20 62 75 66 66 65 72 73 20 20 ses of buffers
026D40: 20 20 20 20 20 20 20 20 20 20 7D 0D 0A 20 20 20 }..
026D50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
026D60: 50 61 67 65 20 20 20 20 20 20 20 20 3A 20 41 72 Page : Ar
026D70: 72 61 79 5B 30 2E 2E 31 30 5D 20 4F 66 20 49 6E ray[0..10] Of In
026D80: 74 65 67 65 72 3B 20 0D 0A 20 20 20 20 20 20 20 teger; ..
026D90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
026DA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
026DB0: 20 20 20 7B 20 4E 6F 73 20 6F 66 20 70 61 67 65 { Nos of page
026DC0: 73 20 69 6E 20 77 6F 72 6B 61 72 65 61 20 20 20 s in workarea
026DD0: 20 20 20 20 20 7D 0D 0A 20 20 20 20 20 20 20 20 }..
026DE0: 20 20 20 20 20 20 20 20 20 20 20 57 20 20 20 20 W
026DF0: 20 20 20 20 20 20 20 3A 20 41 72 72 61 79 5B 30 : Array[0
026E00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026E90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026EA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026EB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026EC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026ED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026EE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026EF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026F90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026FA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026FB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026FC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026FD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026FE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
026FF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
027000: 2E 2E 31 30 5D 20 4F 66 20 42 6F 6F 6C 65 61 6E ..10] Of Boolean
027010: 3B 20 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 ; ..
027020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
027030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7B 20 {
027040: 64 69 72 74 79 2D 62 69 74 73 20 3A 20 69 73 20 dirty-bits : is
027050: 70 61 67 65 20 63 68 61 6E 67 65 64 20 3F 20 20 page changed ?
027060: 7D 0D 0A 20 20 20 0D 0A 20 20 20 20 20 20 20 20 }.. ..
027070: 20 20 20 20 20 20 20 20 20 20 20 55 64 69 78 20 Udix
027080: 20 20 20 20 20 20 20 3A 20 49 6E 74 65 67 65 72 : Integer
027090: 3B 20 7B 20 55 64 69 78 20 70 6F 69 6E 74 73 20 ; { Udix points
0270A0: 74 6F 20 74 68 65 20 6E 65 78 74 20 72 65 63 6F to the next reco
0270B0: 72 64 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 rd..
0270C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0270D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0270E0: 20 74 6F 20 62 65 20 72 65 74 75 72 6E 65 64 20 to be returned
0270F0: 7D 0D 0A 20 20 20 0D 0A 20 20 20 20 20 20 20 20 }.. ..
027100: 20 20 20 20 20 20 20 20 20 20 20 46 20 20 20 20 F
027110: 20 20 20 20 20 20 20 3A 20 46 69 6C 65 3B 20 20 : File;
027120: 20 20 7B 20 46 69 6C 65 20 75 73 65 64 20 66 6F { File used fo
027130: 72 20 65 78 74 65 72 6E 61 6C 20 73 6F 72 74 69 r external sorti
027140: 6E 67 20 20 7D 0D 0A 20 20 20 20 20 20 20 20 20 ng }..
027150: 20 20 20 20 20 20 20 20 20 20 0D 0A 20 20 20 20 ..
027160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 F
027170: 69 6C 65 43 72 65 61 74 65 64 20 3A 20 42 6F 6F ileCreated : Boo
027180: 6C 65 61 6E 3B 20 7B 20 49 73 20 65 78 74 65 72 lean; { Is exter
027190: 6E 61 6C 20 66 69 6C 65 20 75 73 65 64 20 20 20 nal file used
0271A0: 20 20 20 20 20 20 20 20 7D 0D 0A 20 20 20 0D 0A }.. ..
0271B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0271C0: 20 20 20 45 72 72 6F 72 20 20 20 20 20 3A 20 49 Error : I
0271D0: 6E 74 65 67 65 72 3B 20 7B 20 48 61 73 20 61 6E nteger; { Has an
0271E0: 20 69 2F 6F 20 65 72 72 6F 72 20 6F 63 63 75 72 i/o error occur
0271F0: 72 65 64 20 20 20 20 20 20 20 7D 0D 0A 0D 0A 20 red }....
027200: 0D 0A 41 54 54 45 4E 54 49 4F 4E 0D 0A 0D 0A 50 ..ATTENTION....P
027210: 6F 75 72 20 72 65 6D 65 64 69 65 72 20 61 20 6C our remedier a l
027220: 61 20 6C 69 6D 69 74 61 74 69 6F 6E 20 6D 65 6D a limitation mem
027230: 6F 69 72 65 20 64 75 20 43 50 43 20 34 36 34 2F oire du CPC 464/
027240: 36 36 34 2C 0D 0A 63 65 72 74 61 69 6E 73 20 66 664,..certains f
027250: 69 63 68 69 65 72 73 20 6F 6E 74 20 65 74 65 20 ichiers ont ete
027260: 73 65 70 61 72 65 73 20 65 6E 20 64 65 75 78 2E separes en deux.
027270: 0D 0A 0D 0A 4C 65 73 20 34 20 66 69 63 68 69 65 ....Les 4 fichie
027280: 72 73 20 73 75 69 76 61 6E 74 73 20 6F 6E 74 20 rs suivants ont
027290: 65 74 65 20 72 65 6E 6F 6D 6D 65 73 3A 0D 0A 0D ete renommes:...
0272A0: 0A 41 43 43 45 53 53 2E 42 4F 58 20 20 65 73 74 .ACCESS.BOX est
0272B0: 20 72 65 6D 70 6C 61 63 65 20 70 61 72 20 41 43 remplace par AC
0272C0: 43 45 53 53 31 2E 42 4F 58 20 20 65 74 20 41 43 CESS1.BOX et AC
0272D0: 43 45 53 53 32 2E 42 4F 58 0D 0A 0D 0A 42 54 52 CESS2.BOX....BTR
0272E0: 45 45 2E 49 4E 43 20 20 20 65 73 74 20 72 65 6D EE.INC est rem
0272F0: 70 6C 61 63 65 20 70 61 72 20 42 54 52 45 45 31 place par BTREE1
027300: 2E 49 4E 43 20 20 20 65 74 20 42 54 52 45 45 32 .INC et BTREE2
027310: 2E 49 4E 43 0D 0A 0D 0A 49 4E 53 54 41 4C 4C 2E .INC....INSTALL.
027320: 44 4F 43 20 65 73 74 20 72 65 6D 70 6C 61 63 65 DOC est remplace
027330: 20 70 61 72 20 49 4E 53 54 41 4C 4C 31 2E 44 4F par INSTALL1.DO
027340: 43 20 65 74 20 49 4E 53 54 41 4C 4C 32 2E 44 4F C et INSTALL2.DO
027350: 43 0D 0A 0D 0A 53 4F 52 54 2E 42 4F 58 20 20 20 C....SORT.BOX
027360: 20 65 73 74 20 72 65 6D 70 6C 61 63 65 20 70 61 est remplace pa
027370: 72 20 53 4F 52 54 31 2E 42 4F 58 20 20 20 20 65 r SORT1.BOX e
027380: 74 20 53 4F 52 54 32 2E 42 4F 58 0D 0A 0D 0A 0D t SORT2.BOX.....
027390: 0A 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D .---------------
0273A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0273B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D ----------------
0273C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0A --------------..
0273D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0273E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0273F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
027400: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
027410: 21 00 01 00 02 09 52 E5 21 00 41 02 00 00 00 02 !.....R.!.A.....
027420: 21 00 46 02 00 00 00 02 21 00 42 02 00 00 00 02 !.F.....!.B.....
027430: 21 00 47 02 00 00 00 02 21 00 43 02 00 00 00 02 !.G.....!.C.....
027440: 21 00 48 02 00 00 00 02 21 00 44 02 00 00 00 02 !.H.....!.D.....
027450: 21 00 49 02 00 00 00 02 21 00 45 02 00 00 00 02 !.I.....!.E.....
027460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
027470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
027480: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
027490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0274A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0274B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0274C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0274D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0274E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0274F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
027500: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
027510: 20 20 49 74 65 6D 4C 74 68 20 20 20 20 20 3A 20 ItemLth :
027520: 49 6E 74 65 67 65 72 3B 20 7B 20 4C 65 6E 67 74 Integer; { Lengt
027530: 68 20 6F 66 20 72 65 63 6F 72 64 20 20 20 20 20 h of record
027540: 20 20 20 20 20 20 20 20 20 20 20 7D 0D 0A 20 20 }..
027550: 20 20 20 20 20 20 20 20 20 20 20 45 6E 64 3B 0D End;.
027560: 0A 0D 0A 0D 0A 0D 0A 20 20 20 50 72 6F 63 65 64 ....... Proced
027570: 75 72 65 20 53 6F 72 74 50 75 74 28 41 64 64 72 ure SortPut(Addr
027580: 3A 20 53 6F 72 74 50 6F 69 6E 74 65 72 3B 20 50 : SortPointer; P
027590: 61 67 65 4E 6F 3A 20 49 6E 74 65 67 65 72 29 3B ageNo: Integer);
0275A0: 0D 0A 20 20 20 20 20 20 7B 20 57 72 69 74 65 20 .. { Write
0275B0: 70 61 67 65 20 50 61 67 65 4E 6F 20 6F 6E 20 66 page PageNo on f
0275C0: 69 6C 65 2C 20 61 64 64 72 65 73 73 20 6F 66 20 ile, address of
0275D0: 70 61 67 65 20 69 6E 20 6D 65 6D 6F 72 79 20 69 page in memory i
0275E0: 73 20 41 64 64 72 20 7D 0D 0A 20 20 20 42 65 67 s Addr }.. Beg
0275F0: 69 6E 0D 0A 20 20 20 20 20 20 49 66 20 53 6F 72 in.. If Sor
027600: 74 52 65 63 6F 72 64 2E 45 72 72 6F 72 3D 30 20 tRecord.Error=0
027610: 54 68 65 6E 20 42 65 67 69 6E 20 20 7B 20 4E 6F Then Begin { No
027620: 20 69 2F 6F 20 65 72 72 6F 72 20 7D 0D 0A 20 20 i/o error }..
027630: 20 20 20 20 20 20 20 53 65 65 6B 28 53 6F 72 74 Seek(Sort
027640: 52 65 63 6F 72 64 2E 46 2C 20 50 61 67 65 4E 6F Record.F, PageNo
027650: 2A 53 6F 72 74 52 65 63 6F 72 64 2E 53 65 63 50 *SortRecord.SecP
027660: 72 50 61 67 65 29 3B 0D 0A 20 20 20 20 20 20 20 rPage);..
027670: 20 20 42 6C 6F 63 6B 57 72 69 74 65 28 53 6F 72 BlockWrite(Sor
027680: 74 52 65 63 6F 72 64 2E 46 2C 20 41 64 64 72 5E tRecord.F, Addr^
027690: 2C 20 53 6F 72 74 52 65 63 6F 72 64 2E 53 65 63 , SortRecord.Sec
0276A0: 50 72 50 61 67 65 29 3B 0D 0A 20 20 20 20 20 20 PrPage);..
0276B0: 20 20 20 49 66 20 49 4F 52 65 73 75 6C 74 3C 3E If IOResult<>
0276C0: 30 20 54 68 65 6E 20 53 6F 72 74 52 65 63 6F 72 0 Then SortRecor
0276D0: 64 2E 45 72 72 6F 72 3A 3D 31 30 20 20 7B 20 77 d.Error:=10 { w
0276E0: 72 69 74 65 20 65 72 72 6F 72 20 7D 0D 0A 20 20 rite error }..
0276F0: 20 20 20 20 45 6E 64 0D 0A 20 20 20 45 6E 64 3B End.. End;
027700: 20 20 20 20 56 69 63 74 69 6D 3A 3D 56 69 63 74 Victim:=Vict
027710: 69 6D 2B 31 3B 0D 0A 20 20 20 20 20 20 20 20 20 im+1;..
027720: 7B 20 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 67 { SortRecord.Pag
027730: 65 5B 56 69 63 74 69 6D 5D 20 6E 6F 74 20 69 6E e[Victim] not in
027740: 20 55 20 7D 0D 0A 20 20 20 20 20 20 20 20 20 49 U }.. I
027750: 66 20 53 6F 72 74 52 65 63 6F 72 64 2E 57 5B 56 f SortRecord.W[V
027760: 69 63 74 69 6D 5D 20 54 68 65 6E 20 20 20 20 20 ictim] Then
027770: 7B 20 44 69 72 74 79 20 62 69 74 20 73 65 74 20 { Dirty bit set
027780: 7D 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 53 }.. S
027790: 6F 72 74 50 75 74 28 53 6F 72 74 52 65 63 6F 72 ortPut(SortRecor
0277A0: 64 2E 42 75 66 5B 56 69 63 74 69 6D 5D 2C 53 6F d.Buf[Victim],So
0277B0: 72 74 52 65 63 6F 72 64 2E 50 61 67 65 5B 56 69 rtRecord.Page[Vi
0277C0: 63 74 69 6D 5D 29 3B 0D 0A 20 20 20 20 20 20 20 ctim]);..
0277D0: 20 20 53 6F 47 65 74 28 53 6F 72 74 52 65 63 6F SoGet(SortReco
0277E0: 72 64 2E 42 75 66 5B 56 69 63 74 69 6D 5D 2C 49 rd.Buf[Victim],I
0277F0: 78 50 61 67 65 29 3B 0D 0A 20 20 20 20 20 20 20 xPage);..
027800: 20 20 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 67 SortRecord.Pag
027810: 65 5B 56 69 63 74 69 6D 5D 3A 3D 20 49 78 50 61 e[Victim]:= IxPa
027820: 67 65 3B 0D 0A 20 20 20 20 20 20 20 20 20 53 6F ge;.. So
027830: 72 74 52 65 63 6F 72 64 2E 57 5B 56 69 63 74 69 rtRecord.W[Victi
027840: 6D 5D 3A 3D 20 46 61 6C 73 65 3B 0D 0A 20 20 20 m]:= False;..
027850: 20 20 20 45 6E 64 0D 0A 20 20 20 45 6E 64 3B 0D End.. End;.
027860: 0A 0D 0A 0D 0A 46 75 6E 63 74 69 6F 6E 20 54 75 .....Function Tu
027870: 72 62 6F 53 6F 72 74 28 49 74 65 6D 4C 74 68 20 rboSort(ItemLth
027880: 3A 20 49 6E 74 65 67 65 72 29 3A 49 6E 74 65 67 : Integer):Integ
027890: 65 72 3B 0D 0A 0D 0A 20 20 20 7B 20 46 75 6E 63 er;.... { Func
0278A0: 74 69 6F 6E 20 54 75 72 62 6F 53 6F 72 74 20 72 tion TurboSort r
0278B0: 65 74 75 72 6E 73 20 61 6E 20 69 6E 74 65 67 65 eturns an intege
0278C0: 72 20 73 70 65 63 69 66 79 69 6E 67 20 74 68 65 r specifying the
0278D0: 20 72 65 73 75 6C 74 20 6F 66 20 0D 0A 20 20 20 result of ..
0278E0: 20 20 74 68 65 20 73 6F 72 74 0D 0A 20 20 20 20 the sort..
0278F0: 20 54 75 72 62 6F 53 6F 72 74 3D 30 20 20 3A 20 TurboSort=0 :
027900: 0D 0A 0D 0A 0D 0A 20 20 20 50 72 6F 63 65 64 75 ...... Procedu
027910: 72 65 20 53 6F 72 74 46 65 74 63 68 41 64 64 72 re SortFetchAddr
027920: 28 20 49 78 3A 20 49 6E 74 65 67 65 72 3B 20 56 ( Ix: Integer; V
027930: 61 72 20 41 64 72 3A 20 53 6F 72 74 50 6F 69 6E ar Adr: SortPoin
027940: 74 65 72 29 3B 0D 0A 20 20 20 20 20 20 7B 20 46 ter);.. { F
027950: 69 6E 64 20 61 64 64 72 65 73 73 20 69 6E 20 6D ind address in m
027960: 65 6D 6F 72 79 20 66 6F 72 20 72 65 63 6F 72 64 emory for record
027970: 20 6E 6F 20 49 78 2E 20 49 74 20 69 73 20 61 73 no Ix. It is as
027980: 73 75 6D 65 64 0D 0A 20 20 20 20 20 20 20 20 74 sumed.. t
027990: 68 61 74 20 72 65 63 6F 72 64 20 49 78 20 69 73 hat record Ix is
0279A0: 20 69 6E 20 6D 65 6D 6F 72 79 20 7D 0D 0A 0D 0A in memory }....
0279B0: 20 20 20 20 20 20 56 61 72 20 49 78 50 61 67 65 Var IxPage
0279C0: 20 3A 20 49 6E 74 65 67 65 72 3B 0D 0A 20 20 20 : Integer;..
0279D0: 20 20 20 20 20 20 20 49 20 20 20 20 20 20 3A 20 I :
0279E0: 30 2E 2E 31 30 3B 0D 0A 0D 0A 20 20 20 42 65 67 0..10;.... Beg
0279F0: 69 6E 0D 0A 20 20 20 20 20 20 49 78 50 61 67 65 in.. IxPage
027A00: 3A 3D 20 49 78 20 44 69 76 20 53 6F 72 74 52 65 := Ix Div SortRe
027A10: 63 6F 72 64 2E 42 3B 0D 0A 20 20 20 20 20 20 49 cord.B;.. I
027A20: 3A 3D 20 30 3B 0D 0A 20 20 20 20 20 20 57 68 69 := 0;.. Whi
027A30: 6C 65 20 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 le SortRecord.Pa
027A40: 67 65 5B 69 5D 20 3C 3E 20 49 78 50 61 67 65 20 ge[i] <> IxPage
027A50: 44 6F 20 49 3A 3D 49 2B 31 3B 0D 0A 20 20 20 20 Do I:=I+1;..
027A60: 20 20 7B 20 49 78 50 61 67 65 20 3D 20 53 6F 72 { IxPage = Sor
027A70: 74 52 65 63 6F 72 64 2E 50 61 67 65 20 5B 49 5D tRecord.Page [I]
027A80: 20 7D 0D 0A 20 20 20 20 20 20 41 64 72 3A 3D 50 }.. Adr:=P
027A90: 74 72 28 4F 72 64 28 53 6F 72 74 52 65 63 6F 72 tr(Ord(SortRecor
027AA0: 64 2E 42 75 66 5B 49 5D 29 20 2B 0D 0A 20 20 20 d.Buf[I]) +..
027AB0: 20 20 20 20 20 20 20 20 28 49 78 20 4D 6F 64 20 (Ix Mod
027AC0: 53 6F 72 74 52 65 63 6F 72 64 2E 42 29 2A 20 53 SortRecord.B)* S
027AD0: 6F 72 74 52 65 63 6F 72 64 2E 49 74 65 6D 4C 74 ortRecord.ItemLt
027AE0: 68 29 3B 0D 0A 20 20 20 45 6E 64 3B 0D 0A 0D 0A h);.. End;....
027AF0: 0D 0A 20 20 20 50 72 6F 63 65 64 75 72 65 20 53 .. Procedure S
027B00: 53 6F 72 74 65 64 0D 0A 20 20 20 20 20 54 75 72 Sorted.. Tur
027B10: 62 6F 53 6F 72 74 3D 33 20 20 3A 20 57 6F 72 6B boSort=3 : Work
027B20: 61 72 65 61 20 74 6F 6F 20 73 6D 61 6C 6C 0D 0A area too small..
027B30: 20 20 20 20 20 54 75 72 62 6F 53 6F 72 74 3D 38 TurboSort=8
027B40: 20 20 3A 20 49 6C 6C 65 67 61 6C 20 69 74 65 6D : Illegal item
027B50: 6C 65 6E 67 74 68 0D 0A 20 20 20 20 20 54 75 72 length.. Tur
027B60: 62 6F 53 6F 72 74 3D 39 20 20 3A 20 4D 6F 72 65 boSort=9 : More
027B70: 20 74 68 61 6E 20 6D 61 78 69 6E 74 20 72 65 63 than maxint rec
027B80: 6F 72 64 73 0D 0A 20 20 20 20 20 54 75 72 62 6F ords.. Turbo
027B90: 53 6F 72 74 3D 31 30 20 3A 20 57 72 69 74 65 20 Sort=10 : Write
027BA0: 65 72 72 6F 72 20 64 75 72 69 6E 67 20 73 6F 72 error during sor
027BB0: 74 69 6E 67 20 28 20 64 69 73 6B 20 66 75 6C 6C ting ( disk full
027BC0: 20 29 0D 0A 20 20 20 20 20 54 75 72 62 6F 53 6F ).. TurboSo
027BD0: 72 74 3D 31 31 20 3A 20 52 65 61 64 20 65 72 72 rt=11 : Read err
027BE0: 6F 72 20 64 75 72 69 6E 67 20 73 6F 72 74 69 6E or during sortin
027BF0: 67 0D 0A 20 20 20 20 20 54 75 72 62 6F 53 6F 72 g.. TurboSor
027C00: 74 3D 31 32 20 3A 20 49 6D 70 6F 73 73 69 62 6C t=12 : Impossibl
027C10: 65 20 74 6F 20 63 72 65 61 74 65 20 6E 65 77 20 e to create new
027C20: 66 69 6C 65 20 28 20 64 69 72 65 63 74 6F 72 79 file ( directory
027C30: 20 66 75 6C 6C 20 29 20 7D 0D 0A 0D 0A 20 20 20 full ) }....
027C40: 4C 61 62 65 6C 20 39 39 3B 0D 0A 0D 0A 20 20 20 Label 99;....
027C50: 43 6F 6E 73 74 20 0D 0A 20 20 20 20 20 20 53 65 Const .. Se
027C60: 63 53 69 7A 65 20 3D 20 31 32 38 3B 0D 0A 0D 0A cSize = 128;....
027C70: 20 20 20 56 61 72 0D 0A 20 20 20 20 20 20 53 61 Var.. Sa
027C80: 76 65 5A 2C 0D 0A 20 20 20 20 20 20 53 77 6F 70 veZ,.. Swop
027C90: 50 6F 73 74 20 3A 20 53 6F 72 74 50 6F 69 6E 74 Post : SortPoint
027CA0: 65 72 3B 0D 0A 20 20 20 20 20 20 53 61 66 65 74 er;.. Safet
027CB0: 79 50 2C 0D 0A 20 20 20 20 20 20 57 6F 72 6B 41 yP,.. WorkA
027CC0: 72 65 61 20 3A 20 52 65 61 6C 3B 20 20 20 20 20 rea : Real;
027CD0: 20 20 20 20 20 20 20 7B 20 4E 6F 20 6F 66 20 62 { No of b
027CE0: 79 74 65 73 20 69 6E 74 65 72 6E 61 6C 20 6D 65 ytes internal me
027CF0: 6D 6F 72 79 20 20 20 20 7D 0D 0A 20 20 20 20 20 mory }..
027D00: 6F 72 74 46 65 74 63 68 50 61 67 65 28 20 49 78 ortFetchPage( Ix
027D10: 3A 20 49 6E 74 65 67 65 72 3B 20 55 31 2C 20 55 : Integer; U1, U
027D20: 32 3A 20 49 6E 74 65 67 65 72 29 3B 0D 0A 20 20 2: Integer);..
027D30: 20 20 20 20 7B 20 41 66 74 65 72 20 63 61 6C 6C { After call
027D40: 20 6F 66 20 53 6F 72 74 46 65 74 63 68 50 61 67 of SortFetchPag
027D50: 65 20 74 68 65 20 72 65 63 6F 72 64 20 49 78 20 e the record Ix
027D60: 69 73 20 69 6E 20 6D 65 6D 6F 72 79 2E 0D 0A 20 is in memory...
027D70: 20 20 20 20 20 20 20 49 66 20 72 65 63 6F 72 64 If record
027D80: 73 20 55 31 20 61 6E 64 20 55 32 20 61 72 65 20 s U1 and U2 are
027D90: 69 6E 20 6D 65 6D 6F 72 79 20 62 65 66 6F 72 65 in memory before
027DA0: 20 63 61 6C 6C 2C 20 74 68 65 6E 20 0D 0A 20 20 call, then ..
027DB0: 20 20 20 20 20 20 74 68 65 79 20 61 72 65 20 6E they are n
027DC0: 6F 74 20 6F 76 65 72 77 72 69 74 74 65 6E 20 73 ot overwritten s
027DD0: 69 6E 63 65 20 77 65 20 73 6F 6F 6E 20 77 69 6C ince we soon wil
027DE0: 6C 20 6E 65 65 64 20 74 68 65 6D 20 20 20 7D 0D l need them }.
027DF0: 0A 0D 0A 20 20 20 20 20 20 56 61 72 20 55 31 50 ... Var U1P
027E00: 61 67 65 2C 0D 0A 20 20 20 20 20 20 20 20 20 20 age,..
027E10: 55 32 50 61 67 65 2C 0D 0A 20 20 20 20 20 20 20 U2Page,..
027E20: 20 20 20 49 78 50 61 67 65 20 3A 20 49 6E 74 65 IxPage : Inte
027E30: 67 65 72 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 ger;..
027E40: 56 69 63 74 69 6D 20 3A 20 30 2E 2E 31 30 3B 20 Victim : 0..10;
027E50: 20 20 7B 20 54 68 65 20 63 68 6F 73 65 6E 20 70 { The chosen p
027E60: 61 67 65 20 74 6F 20 62 65 20 77 72 69 74 74 65 age to be writte
027E70: 6E 20 74 6F 20 66 69 6C 65 20 7D 0D 0A 0D 0A 20 n to file }....
027E80: 20 20 20 20 20 50 72 6F 63 65 64 75 72 65 20 53 Procedure S
027E90: 4F 67 65 74 28 41 64 64 72 3A 20 53 6F 72 74 50 Oget(Addr: SortP
027EA0: 6F 69 6E 74 65 72 3B 20 50 61 67 65 6E 6F 3A 20 ointer; Pageno:
027EB0: 49 6E 74 65 67 65 72 29 3B 0D 0A 20 20 20 20 20 Integer);..
027EC0: 20 20 20 20 7B 20 52 65 61 64 20 70 61 67 65 20 { Read page
027ED0: 50 61 67 65 4E 6F 20 69 6E 74 6F 20 6D 65 6D 6F PageNo into memo
027EE0: 72 79 20 61 74 20 61 64 64 72 65 73 73 20 41 64 ry at address Ad
027EF0: 64 72 20 7D 0D 0A 20 20 20 20 20 20 42 65 67 69 dr }.. Begi
027F00: 20 49 2C 0D 0A 20 20 20 20 20 20 50 61 67 65 53 I,.. PageS
027F10: 69 7A 65 20 3A 20 49 6E 74 65 67 65 72 3B 20 20 ize : Integer;
027F20: 20 20 20 20 20 20 20 7B 20 4E 6F 20 6F 66 20 62 { No of b
027F30: 79 74 65 73 20 70 72 20 70 61 67 65 20 20 20 20 ytes pr page
027F40: 20 20 20 20 20 20 20 20 7D 0D 0A 0D 0A 20 20 20 }....
027F50: 46 75 6E 63 74 69 6F 6E 20 43 6F 6E 76 65 72 74 Function Convert
027F60: 28 49 3A 49 6E 74 65 67 65 72 29 3A 52 65 61 6C (I:Integer):Real
027F70: 3B 0D 0A 20 20 20 20 20 20 7B 20 43 6F 6E 76 65 ;.. { Conve
027F80: 72 74 20 6E 65 67 61 74 69 76 65 20 69 6E 74 65 rt negative inte
027F90: 67 65 72 73 20 74 6F 20 70 6F 73 69 74 69 76 65 gers to positive
027FA0: 20 72 65 61 6C 73 20 7D 0D 0A 20 20 20 42 65 67 reals }.. Beg
027FB0: 69 6E 0D 0A 20 20 20 20 20 20 49 66 20 49 3C 30 in.. If I<0
027FC0: 2E 30 20 54 68 65 6E 20 20 20 7B 20 49 20 67 72 .0 Then { I gr
027FD0: 65 61 74 65 72 20 74 68 61 6E 20 4D 61 78 49 6E eater than MaxIn
027FE0: 74 20 7D 0D 0A 20 20 20 20 20 20 20 20 20 43 6F t }.. Co
027FF0: 6E 76 65 72 74 3A 3D 49 2B 36 35 35 33 36 2E 30 nvert:=I+65536.0
028000: 0D 0A 20 20 20 20 20 20 45 6C 73 65 0D 0A 20 20 .. Else..
028010: 20 20 20 20 20 20 20 43 6F 6E 76 65 72 74 3A 3D Convert:=
028020: 49 0D 0A 20 20 20 45 6E 64 3B 0D 0A 0D 0A 20 20 I.. End;....
028030: 20 46 75 6E 63 74 69 6F 6E 20 53 6F 72 74 41 76 Function SortAv
028040: 61 69 6C 3A 52 65 61 6C 3B 0D 0A 20 20 20 20 20 ail:Real;..
028050: 20 7B 20 52 65 64 65 66 69 6E 65 20 4D 61 78 41 { Redefine MaxA
028060: 76 61 69 6C 20 74 6F 20 72 65 74 75 72 6E 20 72 vail to return r
028070: 65 61 6C 20 72 65 73 75 6C 74 20 7D 0D 0A 20 20 eal result }..
028080: 20 20 20 20 56 61 72 20 49 20 3A 20 52 65 61 6C Var I : Real
028090: 3B 0D 0A 20 20 20 42 65 67 69 6E 0D 0A 20 20 20 ;.. Begin..
0280A0: 20 20 20 49 3A 3D 43 6F 6E 76 65 72 74 28 4D 61 I:=Convert(Ma
0280B0: 78 41 76 61 69 6C 29 3B 0D 0A 20 20 20 20 20 20 xAvail);..
0280C0: 53 6F 72 74 41 76 61 69 6C 3A 3D 49 0D 0A 20 20 SortAvail:=I..
0280D0: 20 45 6E 64 3B 0D 0A 0D 0A 0D 0A 20 20 20 50 72 End;...... Pr
0280E0: 6F 63 65 64 75 72 65 20 51 75 69 63 6B 53 6F 72 ocedure QuickSor
0280F0: 74 3B 0D 0A 20 20 20 20 20 20 7B 20 4E 6F 6E 2D t;.. { Non-
028100: 6E 0D 0A 20 20 20 20 20 20 20 20 20 49 66 20 53 n.. If S
028110: 6F 72 74 52 65 63 6F 72 64 2E 45 72 72 6F 72 3D ortRecord.Error=
028120: 30 20 54 68 65 6E 20 42 65 67 69 6E 0D 0A 20 20 0 Then Begin..
028130: 20 20 20 20 20 20 20 20 20 20 53 65 65 6B 28 53 Seek(S
028140: 6F 72 74 52 65 63 6F 72 64 2E 46 2C 20 50 61 67 ortRecord.F, Pag
028150: 65 6E 6F 2A 53 6F 72 74 52 65 63 6F 72 64 2E 53 eno*SortRecord.S
028160: 65 63 50 72 50 61 67 65 29 3B 0D 0A 20 20 20 20 ecPrPage);..
028170: 20 20 20 20 20 20 20 20 42 6C 6F 63 6B 52 65 61 BlockRea
028180: 64 28 53 6F 72 74 52 65 63 6F 72 64 2E 46 2C 20 d(SortRecord.F,
028190: 41 64 64 72 5E 2C 20 53 6F 72 74 52 65 63 6F 72 Addr^, SortRecor
0281A0: 64 2E 53 65 63 50 72 50 61 67 65 29 3B 0D 0A 20 d.SecPrPage);..
0281B0: 20 20 20 20 20 20 20 20 20 20 20 49 66 20 49 4F If IO
0281C0: 52 65 73 75 6C 74 3C 3E 30 20 54 68 65 6E 20 53 Result<>0 Then S
0281D0: 6F 72 74 52 65 63 6F 72 64 2E 45 72 72 6F 72 3A ortRecord.Error:
0281E0: 3D 31 31 20 20 7B 20 72 65 61 64 20 65 72 72 6F =11 { read erro
0281F0: 72 20 7D 0D 0A 20 20 20 20 20 20 20 20 20 45 6E r }.. En
028200: 64 3B 0D 0A 20 20 20 20 20 20 45 6E 64 3B 0D 0A d;.. End;..
028210: 0D 0A 20 20 20 20 20 20 46 75 6E 63 74 69 6F 6E .. Function
028220: 20 49 6E 4D 65 6D 28 20 49 78 3A 20 49 6E 74 65 InMem( Ix: Inte
028230: 67 65 72 29 3A 20 42 6F 6F 6C 65 61 6E 3B 0D 0A ger): Boolean;..
028240: 20 20 20 20 20 20 20 20 20 7B 20 49 6E 4D 65 6D { InMem
028250: 20 72 65 74 75 72 6E 73 20 74 72 75 65 20 69 66 returns true if
028260: 20 72 65 63 6F 72 64 20 69 78 20 69 73 20 69 6E record ix is in
028270: 20 6D 65 6D 6F 72 79 20 7D 0D 0A 20 20 20 20 20 memory }..
028280: 20 20 20 20 56 61 72 20 49 2C 49 78 50 61 67 65 Var I,IxPage
028290: 20 3A 20 49 6E 74 65 67 65 72 3B 0D 0A 20 20 20 : Integer;..
0282A0: 20 20 20 20 20 20 20 20 20 20 46 6C 61 67 20 20 Flag
0282B0: 20 20 20 3A 20 42 6F 6F 6C 65 61 6E 3B 0D 0A 20 : Boolean;..
0282C0: 20 20 20 20 20 42 65 67 69 6E 0D 0A 20 20 20 20 Begin..
0282D0: 20 20 20 20 20 49 78 50 61 67 65 3A 3D 20 49 78 IxPage:= Ix
0282E0: 20 44 69 76 20 53 6F 72 74 52 65 63 6F 72 64 2E Div SortRecord.
0282F0: 42 3B 0D 0A 20 20 20 20 20 20 20 20 20 46 6C 61 B;.. Fla
028300: 72 65 63 75 72 73 69 76 65 20 76 65 72 73 69 6F recursive versio
028310: 6E 20 6F 66 20 71 75 69 63 6B 73 6F 72 74 20 61 n of quicksort a
028320: 6C 67 6F 72 69 74 68 6D 20 61 73 20 67 69 76 65 lgorithm as give
028330: 6E 0D 0A 20 20 20 20 20 20 20 20 69 6E 20 4E 69 n.. in Ni
028340: 63 6B 6C 61 75 73 20 57 69 72 74 68 20 3A 20 41 cklaus Wirth : A
028350: 6C 67 6F 72 69 74 68 6D 73 20 2B 20 44 61 74 61 lgorithms + Data
028360: 20 53 74 72 75 63 74 75 72 65 73 20 3D 20 50 72 Structures = Pr
028370: 6F 67 72 61 6D 73 20 7D 0D 0A 0D 0A 20 20 20 20 ograms }....
028380: 20 20 4C 61 62 65 6C 20 30 3B 0D 0A 0D 0A 20 20 Label 0;....
028390: 20 20 20 20 50 72 6F 63 65 64 75 72 65 20 45 78 Procedure Ex
0283A0: 63 68 61 6E 67 65 28 49 2C 4A 3A 20 49 6E 74 65 change(I,J: Inte
0283B0: 67 65 72 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 ger);..
0283C0: 7B 20 43 68 61 6E 67 65 20 72 65 63 6F 72 64 73 { Change records
0283D0: 20 49 20 61 6E 64 20 4A 20 7D 0D 0A 20 20 20 20 I and J }..
0283E0: 20 20 20 20 20 56 61 72 0D 0A 20 20 20 20 20 20 Var..
0283F0: 20 20 20 20 20 20 50 2C 52 2C 53 20 20 20 3A 20 P,R,S :
028400: 49 6E 74 65 67 65 72 3B 0D 0A 20 20 20 20 20 20 Integer;..
028410: 20 20 20 20 20 20 4B 2C 4C 20 20 20 20 20 3A 20 K,L :
028420: 30 2E 2E 31 30 3B 0D 0A 20 20 20 20 20 20 20 20 0..10;..
028430: 20 20 20 20 49 41 64 64 72 2C 0D 0A 20 20 20 20 IAddr,..
028440: 20 20 20 20 20 20 20 20 4A 41 64 64 72 20 20 20 JAddr
028450: 3A 20 53 6F 72 74 50 6F 69 6E 74 65 72 3B 0D 0A : SortPointer;..
028460: 20 20 20 0D 0A 20 20 20 20 20 20 42 65 67 69 6E .. Begin
028470: 0D 0A 20 20 20 20 20 20 20 20 20 50 3A 3D 20 49 .. P:= I
028480: 20 44 69 76 20 53 6F 72 74 52 65 63 6F 72 64 2E Div SortRecord.
028490: 42 3B 0D 0A 20 20 20 20 20 20 20 20 20 4B 3A 3D B;.. K:=
0284A0: 30 3B 0D 0A 20 20 20 20 20 20 20 20 20 57 68 69 0;.. Whi
0284B0: 6C 65 20 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 le SortRecord.Pa
0284C0: 67 65 5B 6B 5D 3C 3E 50 20 44 6F 20 4B 3A 3D 4B ge[k]<>P Do K:=K
0284D0: 2B 31 3B 0D 0A 20 20 20 20 20 20 20 20 20 50 3A +1;.. P:
0284E0: 3D 20 4A 20 44 69 76 20 53 6F 72 74 52 65 63 6F = J Div SortReco
0284F0: 72 64 2E 42 3B 0D 0A 20 20 20 20 20 20 20 20 20 rd.B;..
028500: 67 3A 3D 46 61 6C 73 65 3B 0D 0A 20 20 20 20 20 g:=False;..
028510: 20 20 20 20 46 6F 72 20 49 3A 3D 30 20 54 6F 20 For I:=0 To
028520: 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 67 65 73 SortRecord.Pages
028530: 2D 31 20 44 6F 0D 0A 20 20 20 20 20 20 20 20 20 -1 Do..
028540: 20 20 20 49 66 20 49 78 70 61 67 65 3D 53 6F 72 If Ixpage=Sor
028550: 74 52 65 63 6F 72 64 2E 50 61 67 65 5B 49 5D 20 tRecord.Page[I]
028560: 54 68 65 6E 20 46 6C 61 67 3A 3D 54 72 75 65 3B Then Flag:=True;
028570: 0D 0A 20 20 20 20 20 20 20 20 20 49 6E 4D 65 6D .. InMem
028580: 3A 3D 46 6C 61 67 0D 0A 20 20 20 20 20 20 45 6E :=Flag.. En
028590: 64 3B 0D 0A 0D 0A 20 20 20 42 65 67 69 6E 20 20 d;.... Begin
0285A0: 20 7B 20 53 6F 72 74 46 65 74 63 68 50 61 67 65 { SortFetchPage
0285B0: 20 7D 0D 0A 20 20 20 20 20 20 49 66 20 28 4E 6F }.. If (No
0285C0: 74 20 49 6E 4D 65 6D 28 49 78 29 29 20 54 68 65 t InMem(Ix)) The
0285D0: 6E 20 42 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 n Begin..
0285E0: 20 20 7B 20 52 65 63 6F 72 64 20 49 78 20 6E 6F { Record Ix no
0285F0: 74 20 69 6E 20 6D 65 6D 6F 72 79 20 7D 0D 0A 20 t in memory }..
028600: 20 20 20 20 20 20 20 20 49 78 50 61 67 65 3A 3D IxPage:=
028610: 20 49 78 20 44 69 76 20 53 6F 72 74 52 65 63 6F Ix Div SortReco
028620: 72 64 2E 42 3B 0D 0A 20 20 20 20 20 20 20 20 20 rd.B;..
028630: 56 69 63 74 69 6D 3A 3D 30 3B 20 0D 0A 20 20 20 Victim:=0; ..
028640: 20 20 20 20 20 20 55 31 50 61 67 65 3A 3D 55 31 U1Page:=U1
028650: 20 44 69 76 20 53 6F 72 74 52 65 63 6F 72 64 2E Div SortRecord.
028660: 42 3B 20 0D 0A 20 20 20 20 20 20 20 20 20 55 32 B; .. U2
028670: 50 61 67 65 3A 3D 55 32 20 44 69 76 20 53 6F 72 Page:=U2 Div Sor
028680: 74 52 65 63 6F 72 64 2E 42 3B 0D 0A 20 20 20 20 tRecord.B;..
028690: 20 20 20 20 20 57 68 69 6C 65 20 28 28 53 6F 72 While ((Sor
0286A0: 74 52 65 63 6F 72 64 2E 50 61 67 65 5B 56 69 63 tRecord.Page[Vic
0286B0: 74 69 6D 5D 3D 55 31 50 61 67 65 29 20 4F 72 0D tim]=U1Page) Or.
0286C0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0286D0: 28 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 67 65 (SortRecord.Page
0286E0: 5B 56 69 63 74 69 6D 5D 3D 55 32 50 61 67 65 29 [Victim]=U2Page)
0286F0: 29 20 44 6F 20 20 0D 0A 20 20 20 20 20 20 20 20 ) Do ..
028700: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
028710: 22 00 01 00 02 09 52 E5 22 00 41 02 00 00 00 02 ".....R.".A.....
028720: 22 00 46 02 00 00 00 02 22 00 42 02 00 00 00 02 ".F.....".B.....
028730: 22 00 47 02 00 00 00 02 22 00 43 02 00 00 00 02 ".G.....".C.....
028740: 22 00 48 02 00 00 00 02 22 00 44 02 00 00 00 02 ".H.....".D.....
028750: 22 00 49 02 00 00 00 02 22 00 45 02 00 00 00 02 ".I.....".E.....
028760: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028770: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028780: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028790: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0287A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0287B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0287C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0287D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0287E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0287F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028800: 4C 3A 3D 30 3B 0D 0A 20 20 20 20 20 20 20 20 20 L:=0;..
028810: 57 68 69 6C 65 20 53 6F 72 74 52 65 63 6F 72 64 While SortRecord
028820: 2E 50 61 67 65 5B 4C 5D 3C 3E 50 20 44 6F 20 4C .Page[L]<>P Do L
028830: 3A 3D 4C 2B 31 3B 0D 0A 20 20 20 20 20 20 20 20 :=L+1;..
028840: 20 52 3A 3D 20 49 20 4D 6F 64 20 53 6F 72 74 52 R:= I Mod SortR
028850: 65 63 6F 72 64 2E 42 3B 20 0D 0A 20 20 20 20 20 ecord.B; ..
028860: 20 20 20 20 53 3A 3D 20 4A 20 4D 6F 64 20 53 6F S:= J Mod So
028870: 72 74 52 65 63 6F 72 64 2E 42 3B 0D 0A 20 20 20 rtRecord.B;..
028880: 20 20 20 20 20 20 49 41 64 64 72 3A 3D 20 50 74 IAddr:= Pt
028890: 72 28 4F 72 64 28 53 6F 72 74 52 65 63 6F 72 64 r(Ord(SortRecord
0288A0: 2E 42 75 66 5B 4B 5D 29 20 2B 20 52 2A 49 74 65 .Buf[K]) + R*Ite
0288B0: 6D 4C 74 68 29 3B 0D 0A 20 20 20 20 20 20 20 20 mLth);..
0288C0: 20 4A 41 64 64 72 3A 3D 20 50 74 72 28 4F 72 64 JAddr:= Ptr(Ord
0288D0: 28 53 6F 72 74 52 65 63 6F 72 64 2E 42 75 66 5B (SortRecord.Buf[
0288E0: 4C 5D 29 20 2B 20 53 2A 49 74 65 6D 4C 74 68 29 L]) + S*ItemLth)
0288F0: 3B 0D 0A 20 20 20 20 20 20 20 20 20 4D 6F 76 65 ;.. Move
028900: 28 49 41 64 64 72 5E 2C 53 77 6F 70 50 6F 73 74 (IAddr^,SwopPost
028910: 5E 2C 49 74 65 6D 4C 74 68 29 3B 0D 0A 20 20 20 ^,ItemLth);..
028920: 20 20 20 20 20 20 4D 6F 76 65 28 4A 41 64 64 72 Move(JAddr
028930: 5E 2C 49 41 64 64 72 5E 2C 49 74 65 6D 4C 74 68 ^,IAddr^,ItemLth
028940: 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 4D 6F 76 );.. Mov
028950: 65 28 53 77 6F 70 70 6F 73 74 5E 2C 4A 41 64 64 e(Swoppost^,JAdd
028960: 72 5E 2C 49 74 65 6D 4C 74 68 29 3B 0D 0A 20 20 r^,ItemLth);..
028970: 20 20 20 20 20 20 20 53 6F 72 74 52 65 63 6F 72 SortRecor
028980: 64 2E 57 5B 4B 5D 3A 3D 20 54 72 75 65 3B 0D 0A d.W[K]:= True;..
028990: 20 20 20 20 20 20 20 20 20 53 6F 72 74 52 65 63 SortRec
0289A0: 6F 72 64 2E 57 5B 4C 5D 3A 3D 20 54 72 75 65 3B ord.W[L]:= True;
0289B0: 0D 0A 20 20 20 20 20 20 45 6E 64 3B 0D 0A 20 20 .. End;..
0289C0: 20 0D 0A 20 20 20 20 20 20 43 6F 6E 73 74 20 0D .. Const .
0289D0: 0A 20 20 20 20 20 20 20 20 20 4D 61 78 53 74 61 . MaxSta
0289E0: 63 6B 20 3D 20 32 30 3B 20 7B 20 4C 6F 67 32 28 ck = 20; { Log2(
0289F0: 4E 29 20 3D 20 4D 61 78 53 74 61 63 6B 2C 20 69 N) = MaxStack, i
028A00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028A90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028AA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028AB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028AC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028AD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028AE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028AF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028B90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028BA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028BB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028BC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028BD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028BE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028BF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
028C00: 2E 20 65 2E 20 66 6F 72 20 4D 61 78 53 74 61 63 . e. for MaxStac
028C10: 6B 20 3D 20 32 30 0D 0A 20 20 20 20 20 20 20 20 k = 20..
028C20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
028C30: 20 20 20 69 74 20 69 73 20 70 6F 73 73 69 62 6C it is possibl
028C40: 65 20 74 6F 20 73 6F 72 74 20 31 20 6D 69 6C 6C e to sort 1 mill
028C50: 69 6F 6E 20 72 65 63 6F 72 64 73 20 20 20 20 7D ion records }
028C60: 0D 0A 20 20 20 20 20 20 56 61 72 20 0D 0A 20 20 .. Var ..
028C70: 20 20 20 20 20 20 20 7B 20 54 68 65 20 73 74 61 { The sta
028C80: 63 6B 73 20 7D 0D 0A 20 20 20 20 20 20 20 20 20 cks }..
028C90: 4C 53 74 61 63 6B 20 3A 20 41 72 72 61 79 5B 31 LStack : Array[1
028CA0: 2E 2E 4D 61 78 53 74 61 63 6B 5D 20 4F 66 20 49 ..MaxStack] Of I
028CB0: 6E 74 65 67 65 72 3B 20 7B 20 53 74 61 63 6B 20 nteger; { Stack
028CC0: 6F 66 20 6C 65 66 74 20 20 69 6E 64 65 78 20 7D of left index }
028CD0: 0D 0A 20 20 20 20 20 20 20 20 20 52 53 74 61 63 .. RStac
028CE0: 6B 20 3A 20 41 72 72 61 79 5B 31 2E 2E 4D 61 78 k : Array[1..Max
028CF0: 53 74 61 63 6B 5D 20 4F 66 20 49 6E 74 65 67 65 Stack] Of Intege
028D00: 72 3B 20 7B 20 53 74 61 63 6B 20 6F 66 20 72 69 r; { Stack of ri
028D10: 67 68 74 20 69 6E 64 65 78 20 7D 0D 0A 20 20 20 ght index }..
028D20: 20 20 20 20 20 20 53 70 20 20 20 20 20 3A 20 49 Sp : I
028D30: 6E 74 65 67 65 72 3B 20 20 20 20 20 20 20 20 20 nteger;
028D40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7B 20 {
028D50: 53 74 61 63 6B 20 53 6F 72 74 50 6F 69 6E 74 65 Stack SortPointe
028D60: 72 20 20 20 20 20 20 20 20 7D 0D 0A 0D 0A 20 20 r }....
028D70: 20 20 20 20 20 20 20 4D 2C 4C 2C 52 2C 49 2C 4A M,L,R,I,J
028D80: 20 20 20 20 20 20 20 20 20 3A 20 49 6E 74 65 67 : Integ
028D90: 65 72 3B 0D 0A 20 20 20 20 20 20 20 20 20 58 41 er;.. XA
028DA0: 64 64 72 2C 59 41 64 64 72 2C 5A 41 64 64 72 20 ddr,YAddr,ZAddr
028DB0: 3A 20 53 6F 72 74 50 6F 69 6E 74 65 72 3B 0D 0A : SortPointer;..
028DC0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
028DD0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
028DE0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
028DF0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
028E00: 0D 0A 20 20 20 42 65 67 69 6E 0D 0A 20 20 20 20 .. Begin..
028E10: 20 20 7B 20 54 68 65 20 71 75 69 63 6B 73 6F 72 { The quicksor
028E20: 74 20 61 6C 67 6F 72 69 74 68 6D 20 7D 0D 0A 20 t algorithm }..
028E30: 20 20 20 20 20 49 66 20 53 6F 72 74 52 65 63 6F If SortReco
028E40: 72 64 2E 4E 3E 30 20 54 68 65 6E 0D 0A 20 20 20 rd.N>0 Then..
028E50: 20 20 20 42 65 67 69 6E 0D 0A 20 20 20 20 20 20 Begin..
028E60: 20 20 20 4C 53 74 61 63 6B 5B 31 5D 3A 3D 30 3B LStack[1]:=0;
028E70: 0D 0A 20 20 20 20 20 20 20 20 20 52 53 74 61 63 .. RStac
028E80: 6B 5B 31 5D 3A 3D 53 6F 72 74 52 65 63 6F 72 64 k[1]:=SortRecord
028E90: 2E 4E 2D 31 3B 0D 0A 20 20 20 20 20 20 20 20 20 .N-1;..
028EA0: 53 70 3A 3D 31 0D 0A 20 20 20 20 20 20 45 6E 64 Sp:=1.. End
028EB0: 20 45 6C 73 65 20 53 70 3A 3D 30 3B 0D 0A 0D 0A Else Sp:=0;....
028EC0: 20 20 20 20 20 20 57 68 69 6C 65 20 53 70 3E 30 While Sp>0
028ED0: 20 64 6F 0D 0A 20 20 20 20 20 20 42 65 67 69 6E do.. Begin
028EE0: 0D 0A 20 20 20 20 20 20 20 20 20 7B 20 50 6F 70 .. { Pop
028EF0: 28 4C 2C 52 29 20 7D 0D 0A 20 20 20 20 20 20 20 (L,R) }..
028F00: 20 20 4C 3A 3D 4C 53 74 61 63 6B 5B 53 70 5D 3B L:=LStack[Sp];
028F10: 20 0D 0A 20 20 20 20 20 20 20 20 20 52 3A 3D 52 .. R:=R
028F20: 53 74 61 63 6B 5B 53 70 5D 3B 20 0D 0A 20 20 20 Stack[Sp]; ..
028F30: 20 20 20 20 20 20 53 70 3A 3D 53 70 2D 31 3B 0D Sp:=Sp-1;.
028F40: 0A 20 20 20 20 20 20 20 20 20 52 65 70 65 61 74 . Repeat
028F50: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 49 3A .. I:
028F60: 3D 4C 3B 20 4A 3A 3D 52 3B 0D 0A 20 20 20 20 20 =L; J:=R;..
028F70: 20 20 20 20 20 20 20 4D 3A 3D 28 49 2B 4A 29 20 M:=(I+J)
028F80: 44 69 76 20 32 3B 0D 0A 20 20 20 20 20 20 20 20 Div 2;..
028F90: 20 20 20 20 53 6F 72 74 46 65 74 63 68 50 61 67 SortFetchPag
028FA0: 65 28 4D 2C 49 2C 4A 29 3B 20 20 20 20 20 20 20 e(M,I,J);
028FB0: 7B 20 67 65 74 20 4D 2C 20 68 6F 6C 64 20 49 20 { get M, hold I
028FC0: 61 6E 64 20 4A 20 7D 0D 0A 20 20 20 20 20 20 20 and J }..
028FD0: 20 20 20 20 20 7B 20 72 65 63 6F 72 64 20 4D 20 { record M
028FE0: 69 6E 20 6D 65 6D 6F 72 79 7D 0D 0A 20 20 20 20 in memory}..
028FF0: 20 20 20 20 20 20 20 20 49 66 20 53 6F 72 74 52 If SortR
029000: 70 72 6F 67 72 61 6D 20 53 6F 72 74 45 78 61 6D program SortExam
029010: 70 6C 65 4F 6E 65 20 7B 43 75 73 74 6F 6D 65 72 pleOne {Customer
029020: 20 46 69 6C 65 7D 3B 0D 0A 0D 0A 74 79 70 65 0D File};....type.
029030: 0A 20 20 43 75 73 74 52 65 63 20 3D 20 72 65 63 . CustRec = rec
029040: 6F 72 64 0D 0A 20 20 20 20 20 20 20 20 20 20 20 ord..
029050: 20 20 20 4E 75 6D 62 65 72 3A 20 69 6E 74 65 67 Number: integ
029060: 65 72 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 er;..
029070: 20 20 20 4E 61 6D 65 3A 20 20 20 73 74 72 69 6E Name: strin
029080: 67 5B 33 30 5D 3B 0D 0A 20 20 20 20 20 20 20 20 g[30];..
029090: 20 20 20 20 20 20 41 64 64 72 3A 20 20 20 73 74 Addr: st
0290A0: 72 69 6E 67 5B 32 30 5D 3B 0D 0A 20 20 20 20 20 ring[20];..
0290B0: 20 20 20 20 20 20 20 20 20 43 69 74 79 3A 20 20 City:
0290C0: 20 73 74 72 69 6E 67 5B 31 32 5D 3B 0D 0A 20 20 string[12];..
0290D0: 20 20 20 20 20 20 20 20 20 20 20 20 53 74 61 74 Stat
0290E0: 65 3A 20 20 73 74 72 69 6E 67 5B 33 5D 3B 0D 0A e: string[3];..
0290F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5A 69 Zi
029100: 70 3A 20 20 20 20 73 74 72 69 6E 67 5B 35 5D 3B p: string[5];
029110: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 65 6E .. en
029120: 64 3B 0D 0A 0D 0A 76 61 72 0D 0A 20 20 43 75 73 d;....var.. Cus
029130: 74 46 69 6C 65 3A 20 66 69 6C 65 20 6F 66 20 43 tFile: file of C
029140: 75 73 74 52 65 63 3B 0D 0A 20 20 43 75 73 74 6F ustRec;.. Custo
029150: 6D 65 72 3A 20 43 75 73 74 52 65 63 3B 0D 0A 0D mer: CustRec;...
029160: 0A 28 2A 24 49 53 4F 52 54 31 2E 42 4F 58 2A 29 .(*$ISORT1.BOX*)
029170: 0D 0A 28 2A 24 49 53 4F 52 54 32 2E 42 4F 58 2A ..(*$ISORT2.BOX*
029180: 29 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 49 )....procedure I
029190: 6E 70 3B 20 7B 74 68 69 73 20 70 72 6F 63 65 64 np; {this proced
0291A0: 75 72 65 20 69 73 20 66 6F 72 77 61 72 64 20 64 ure is forward d
0291B0: 65 63 6C 61 72 65 64 20 69 6E 20 53 4F 52 54 2E eclared in SORT.
0291C0: 42 4F 58 7D 0D 0A 62 65 67 69 6E 0D 0A 20 20 72 BOX}..begin.. r
0291D0: 65 70 65 61 74 0D 0A 20 20 20 20 52 65 61 64 28 epeat.. Read(
0291E0: 43 75 73 74 46 69 6C 65 2C 43 75 73 74 6F 6D 65 CustFile,Custome
0291F0: 72 29 3B 0D 0A 20 20 20 20 53 6F 72 74 52 65 6C r);.. SortRel
029200: 65 63 6F 72 64 2E 45 72 72 6F 72 3C 3E 30 20 54 ecord.Error<>0 T
029210: 68 65 6E 20 47 6F 54 6F 20 30 3B 20 7B 20 45 6E hen GoTo 0; { En
029220: 64 20 70 72 6F 67 72 61 6D 20 7D 0D 0A 20 20 20 d program }..
029230: 20 20 20 20 20 20 20 20 20 53 6F 72 74 46 65 74 SortFet
029240: 63 68 41 64 64 72 28 4D 2C 5A 41 64 64 72 29 3B chAddr(M,ZAddr);
029250: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 4D 6F .. Mo
029260: 76 65 28 5A 41 64 64 72 5E 2C 53 61 76 65 5A 5E ve(ZAddr^,SaveZ^
029270: 2C 49 74 65 6D 4C 74 68 29 3B 0D 0A 20 20 20 20 ,ItemLth);..
029280: 20 20 20 20 20 20 20 20 52 65 70 65 61 74 0D 0A Repeat..
029290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 S
0292A0: 6F 72 74 46 65 74 63 68 50 61 67 65 28 49 2C 4A ortFetchPage(I,J
0292B0: 2C 4D 29 3B 20 20 20 20 7B 20 67 65 74 20 49 2C ,M); { get I,
0292C0: 20 68 6F 6C 64 20 4A 20 61 6E 64 20 4D 20 7D 0D hold J and M }.
0292D0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0292E0: 7B 20 49 20 61 6E 64 20 4D 20 69 6E 20 6D 65 6D { I and M in mem
0292F0: 6F 72 79 20 7D 0D 0A 20 20 20 20 20 20 20 20 20 ory }..
029300: 20 20 20 20 20 20 49 66 20 53 6F 72 74 52 65 63 If SortRec
029310: 6F 72 64 2E 45 72 72 6F 72 3C 3E 30 20 54 68 65 ord.Error<>0 The
029320: 6E 20 47 6F 54 6F 20 30 3B 20 7B 20 45 6E 64 20 n GoTo 0; { End
029330: 70 72 6F 67 72 61 6D 20 7D 0D 0A 20 20 20 20 20 program }..
029340: 20 20 20 20 20 20 20 20 20 20 53 6F 72 74 46 65 SortFe
029350: 74 63 68 41 64 64 72 28 49 2C 58 41 64 64 72 29 tchAddr(I,XAddr)
029360: 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ;..
029370: 20 20 57 68 69 6C 65 20 4C 65 73 73 28 58 41 64 While Less(XAd
029380: 64 72 5E 2C 53 61 76 65 5A 5E 29 20 64 6F 0D 0A dr^,SaveZ^) do..
029390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 B
0293A0: 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 egin..
0293B0: 20 20 20 20 20 20 20 20 49 3A 3D 49 2B 31 3B 0D I:=I+1;.
0293C0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0293D0: 20 20 20 53 6F 72 74 46 65 74 63 68 50 61 67 65 SortFetchPage
0293E0: 28 49 2C 4A 2C 4D 29 3B 0D 0A 20 20 20 20 20 20 (I,J,M);..
0293F0: 20 20 20 20 20 20 20 20 20 20 20 20 53 6F 72 74 Sort
029400: 65 61 73 65 28 43 75 73 74 6F 6D 65 72 29 3B 0D ease(Customer);.
029410: 0A 20 20 75 6E 74 69 6C 20 45 4F 46 28 43 75 73 . until EOF(Cus
029420: 74 46 49 6C 65 29 3B 0D 0A 65 6E 64 3B 0D 0A 0D tFIle);..end;...
029430: 0A 66 75 6E 63 74 69 6F 6E 20 4C 65 73 73 3B 20 .function Less;
029440: 7B 74 68 69 73 20 62 6F 6F 6C 65 61 6E 20 66 75 {this boolean fu
029450: 6E 63 74 69 6F 6E 20 68 61 73 20 74 77 6F 20 70 nction has two p
029460: 61 72 61 6D 65 74 65 72 73 2C 20 58 20 61 6E 64 arameters, X and
029470: 20 59 7D 0D 0A 20 20 20 20 20 20 20 20 20 20 20 Y}..
029480: 20 20 20 20 7B 61 6E 64 20 69 73 20 66 6F 72 77 {and is forw
029490: 61 72 64 20 64 65 63 6C 61 72 65 64 20 69 6E 20 ard declared in
0294A0: 53 4F 52 54 2E 42 4F 58 7D 0D 0A 76 61 72 0D 0A SORT.BOX}..var..
0294B0: 20 20 46 69 72 73 74 43 75 73 74 3A 20 20 43 75 FirstCust: Cu
0294C0: 73 74 52 65 63 20 61 62 73 6F 6C 75 74 65 20 58 stRec absolute X
0294D0: 3B 0D 0A 20 20 53 65 63 6F 6E 64 43 75 73 74 3A ;.. SecondCust:
0294E0: 20 43 75 73 74 52 65 63 20 61 62 73 6F 6C 75 74 CustRec absolut
0294F0: 65 20 59 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 4C e Y;..begin.. L
029500: 65 73 73 20 3A 3D 20 46 69 72 73 74 43 75 73 74 ess := FirstCust
029510: 2E 4E 75 6D 62 65 72 20 3C 20 53 65 63 6F 6E 64 .Number < Second
029520: 43 75 73 74 2E 4E 75 6D 62 65 72 3B 0D 0A 65 6E Cust.Number;..en
029530: 64 3B 0D 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 d;....procedure
029540: 4F 75 74 50 3B 0D 0A 76 61 72 0D 0A 20 20 49 3A OutP;..var.. I:
029550: 20 20 49 6E 74 65 67 65 72 3B 0D 0A 62 65 67 69 Integer;..begi
029560: 6E 0D 0A 20 20 72 65 70 65 61 74 0D 0A 20 20 20 n.. repeat..
029570: 20 53 6F 72 74 52 65 74 75 72 6E 28 43 75 73 74 SortReturn(Cust
029580: 6F 6D 65 72 29 3B 0D 0A 20 20 20 20 77 69 74 68 omer);.. with
029590: 20 43 75 73 74 6F 6D 65 72 20 64 6F 0D 0A 20 20 Customer do..
0295A0: 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 57 begin.. W
0295B0: 72 69 74 65 28 4E 75 6D 62 65 72 2C 20 27 20 27 rite(Number, ' '
0295C0: 2C 4E 61 6D 65 2C 27 20 27 29 3B 0D 0A 20 20 20 ,Name,' ');..
0295D0: 20 20 20 66 6F 72 20 49 20 3A 3D 20 4C 65 6E 67 for I := Leng
0295E0: 74 68 28 4E 61 6D 65 29 20 74 6F 20 33 30 20 64 th(Name) to 30 d
0295F0: 6F 20 57 72 69 74 65 28 27 20 27 29 3B 0D 0A 20 o Write(' ');..
029600: 46 65 74 63 68 41 64 64 72 28 49 2C 58 41 64 64 FetchAddr(I,XAdd
029610: 72 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 r);..
029620: 20 20 20 20 20 20 20 49 66 20 53 6F 72 74 52 65 If SortRe
029630: 63 6F 72 64 2E 45 72 72 6F 72 3C 3E 30 20 54 68 cord.Error<>0 Th
029640: 65 6E 20 47 6F 54 6F 20 30 3B 20 7B 20 45 6E 64 en GoTo 0; { End
029650: 20 70 72 6F 67 72 61 6D 20 7D 0D 0A 20 20 20 20 program }..
029660: 20 20 20 20 20 20 20 20 20 20 20 45 6E 64 3B 0D End;.
029670: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
029680: 7B 20 49 20 61 6E 64 20 4D 20 69 6E 20 6D 65 6D { I and M in mem
029690: 6F 72 79 20 7D 0D 0A 20 20 20 20 20 20 20 20 20 ory }..
0296A0: 20 20 20 20 20 20 53 6F 72 74 46 65 74 63 68 50 SortFetchP
0296B0: 61 67 65 28 4A 2C 49 2C 4D 29 3B 20 20 20 20 20 age(J,I,M);
0296C0: 7B 20 47 65 74 20 4A 2C 20 68 6F 6C 64 20 49 20 { Get J, hold I
0296D0: 61 6E 64 20 4D 20 7D 0D 0A 20 20 20 20 20 20 20 and M }..
0296E0: 20 20 20 20 20 20 20 20 7B 20 49 2C 20 4A 20 61 { I, J a
0296F0: 6E 64 20 4D 20 69 6E 20 6D 65 6D 6F 72 79 20 7D nd M in memory }
029700: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
029710: 20 49 66 20 53 6F 72 74 52 65 63 6F 72 64 2E 45 If SortRecord.E
029720: 72 72 6F 72 3C 3E 30 20 54 68 65 6E 20 47 6F 54 rror<>0 Then GoT
029730: 6F 20 30 3B 20 20 7B 20 45 6E 64 20 70 72 6F 67 o 0; { End prog
029740: 72 61 6D 20 7D 0D 0A 20 20 20 20 20 20 20 20 20 ram }..
029750: 20 20 20 20 20 20 53 6F 72 74 46 65 74 63 68 41 SortFetchA
029760: 64 64 72 28 4A 2C 59 41 64 64 72 29 3B 0D 0A 20 ddr(J,YAddr);..
029770: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 68 Wh
029780: 69 6C 65 20 4C 65 73 73 28 53 61 76 65 5A 5E 2C ile Less(SaveZ^,
029790: 59 41 64 64 72 5E 29 20 64 6F 0D 0A 20 20 20 20 YAddr^) do..
0297A0: 20 20 20 20 20 20 20 20 20 20 20 42 65 67 69 6E Begin
0297B0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
0297C0: 20 20 20 20 4A 3A 3D 4A 2D 31 3B 0D 0A 20 20 20 J:=J-1;..
0297D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 S
0297E0: 6F 72 74 46 65 74 63 68 50 61 67 65 28 4A 2C 49 ortFetchPage(J,I
0297F0: 2C 4D 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 ,M);..
029800: 20 20 20 20 20 57 72 69 74 65 28 41 64 64 72 29 Write(Addr)
029810: 3B 0D 0A 20 20 20 20 20 20 66 6F 72 20 49 20 3A ;.. for I :
029820: 3D 20 4C 65 6E 67 74 68 28 41 64 64 72 29 20 74 = Length(Addr) t
029830: 6F 20 32 30 20 64 6F 20 57 72 69 74 65 28 27 20 o 20 do Write('
029840: 27 29 3B 0D 0A 20 20 20 20 20 20 57 72 69 74 65 ');.. Write
029850: 28 43 69 74 79 29 3B 0D 0A 20 20 20 20 20 20 66 (City);.. f
029860: 6F 72 20 49 20 3A 3D 20 4C 65 6E 67 74 68 28 43 or I := Length(C
029870: 69 74 79 29 20 74 6F 20 31 32 20 64 6F 20 57 72 ity) to 12 do Wr
029880: 69 74 65 28 27 20 27 29 3B 0D 0A 20 20 20 20 20 ite(' ');..
029890: 20 57 72 69 74 65 4C 6E 28 53 74 61 74 65 2C 27 WriteLn(State,'
0298A0: 20 27 2C 5A 69 70 29 3B 0D 0A 20 20 20 20 65 6E ',Zip);.. en
0298B0: 64 3B 0D 0A 20 20 75 6E 74 69 6C 20 53 6F 72 74 d;.. until Sort
0298C0: 45 4F 53 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 62 65 EOS;..end;....be
0298D0: 67 69 6E 20 7B 70 72 6F 67 72 61 6D 20 53 6F 72 gin {program Sor
0298E0: 74 45 78 61 6D 70 6C 65 4F 6E 65 7D 0D 0A 20 20 tExampleOne}..
0298F0: 43 6C 72 53 63 72 3B 0D 0A 20 20 41 73 73 69 67 ClrScr;.. Assig
029900: 6E 28 43 75 73 74 46 69 6C 65 2C 27 43 55 53 54 n(CustFile,'CUST
029910: 4F 4D 45 52 2E 44 54 41 27 29 3B 0D 0A 20 20 52 OMER.DTA');.. R
029920: 65 73 65 74 28 43 75 73 74 66 69 6C 65 29 3B 0D eset(Custfile);.
029930: 0A 20 20 57 72 69 74 65 4C 6E 28 54 75 72 62 6F . WriteLn(Turbo
029940: 53 6F 72 74 28 53 69 7A 65 4F 66 28 43 75 73 74 Sort(SizeOf(Cust
029950: 52 65 63 29 29 29 3B 0D 0A 65 6E 64 2E 0D 0A 1A Rec)));..end....
029960: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
029970: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
029980: 6F 6D 65 72 29 3B 0D 0A 20 20 20 20 77 69 74 68 omer);.. with
029990: 20 43 75 73 74 6F 6D 65 72 20 64 6F 0D 0A 20 20 Customer do..
0299A0: 20 20 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 57 begin.. W
0299B0: 72 69 74 65 28 4E 75 6D 62 65 72 2C 20 27 20 27 rite(Number, ' '
0299C0: 2C 4E 61 6D 65 2C 27 20 27 29 3B 0D 0A 20 20 20 ,Name,' ');..
0299D0: 20 20 20 66 6F 72 20 49 20 3A 3D 20 4C 65 6E 67 for I := Leng
0299E0: 74 68 28 4E 61 6D 65 29 20 74 6F 20 33 30 20 64 th(Name) to 30 d
0299F0: 6F 20 57 72 69 74 65 28 27 20 27 29 3B 0D 0A 20 o Write(' ');..
029A00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
029A10: 23 00 01 00 02 09 52 E5 23 00 41 02 00 00 00 02 #.....R.#.A.....
029A20: 23 00 46 02 00 00 00 02 23 00 42 02 00 00 00 02 #.F.....#.B.....
029A30: 23 00 47 02 00 00 00 02 23 00 43 02 00 00 00 02 #.G.....#.C.....
029A40: 23 00 48 02 00 00 00 02 23 00 44 02 00 00 00 02 #.H.....#.D.....
029A50: 23 00 49 02 00 00 00 02 23 00 45 02 00 00 00 02 #.I.....#.E.....
029A60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029A70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029A80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029A90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029AA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029AB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029AC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029AD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029AE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029AF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029B00: 20 20 20 20 20 20 20 20 53 6F 72 74 46 65 74 63 SortFetc
029B10: 68 41 64 64 72 28 4A 2C 59 41 64 64 72 29 3B 0D hAddr(J,YAddr);.
029B20: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
029B30: 20 20 20 49 66 20 53 6F 72 74 52 65 63 6F 72 64 If SortRecord
029B40: 2E 45 72 72 6F 72 3C 3E 30 20 54 68 65 6E 20 47 .Error<>0 Then G
029B50: 6F 54 6F 20 30 3B 20 20 7B 20 45 6E 64 20 70 72 oTo 0; { End pr
029B60: 6F 67 72 61 6D 20 7D 0D 0A 20 20 20 20 20 20 20 ogram }..
029B70: 20 20 20 20 20 20 20 20 45 6E 64 3B 0D 0A 20 20 End;..
029B80: 20 20 20 20 20 20 20 20 20 20 20 20 20 7B 20 49 { I
029B90: 2C 20 4A 20 61 6E 64 20 4D 20 69 6E 20 6D 65 6D , J and M in mem
029BA0: 6F 72 79 20 7D 0D 0A 20 20 20 20 20 20 20 20 20 ory }..
029BB0: 20 20 20 20 20 20 49 66 20 49 3C 3D 4A 20 54 68 If I<=J Th
029BC0: 65 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 en..
029BD0: 20 20 20 42 65 67 69 6E 0D 0A 20 20 20 20 20 20 Begin..
029BE0: 20 20 20 20 20 20 20 20 20 20 20 20 49 66 20 49 If I
029BF0: 3C 3E 4A 20 54 68 65 6E 20 45 78 63 68 61 6E 67 <>J Then Exchang
029C00: 65 28 49 2C 4A 29 3B 0D 0A 20 20 20 20 20 20 20 e(I,J);..
029C10: 20 20 20 20 20 20 20 20 20 20 20 49 3A 3D 49 2B I:=I+
029C20: 31 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 1;..
029C30: 20 20 20 20 20 20 4A 3A 3D 4A 2D 31 3B 0D 0A 20 J:=J-1;..
029C40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 6E En
029C50: 64 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 d;..
029C60: 55 6E 74 69 6C 20 49 3E 4A 3B 0D 0A 20 20 20 20 Until I>J;..
029C70: 20 20 20 20 20 20 20 20 7B 20 50 75 73 68 20 6C { Push l
029C80: 6F 6E 67 65 73 74 20 69 6E 74 65 72 76 61 6C 20 ongest interval
029C90: 6F 6E 20 73 74 61 63 6B 20 7D 0D 0A 20 20 20 20 on stack }..
029CA0: 20 20 20 20 20 20 20 20 49 66 20 4A 2D 4C 20 3C If J-L <
029CB0: 20 52 2D 49 20 54 68 65 6E 0D 0A 20 20 20 20 20 R-I Then..
029CC0: 20 20 20 20 20 20 20 42 65 67 69 6E 0D 0A 20 20 Begin..
029CD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 49 66 20 If
029CE0: 49 3C 52 20 54 68 65 6E 0D 0A 20 20 20 20 20 20 I<R Then..
029CF0: 20 20 20 20 20 20 20 20 20 42 65 67 69 6E 0D 0A Begin..
029D00: 74 69 61 6C 69 7A 65 20 76 69 72 74 75 61 6C 20 tialize virtual
029D10: 73 79 73 74 65 6D 20 7D 0D 0A 20 20 20 20 20 20 system }..
029D20: 20 20 20 20 20 20 46 6F 72 20 49 3A 3D 30 20 54 For I:=0 T
029D30: 6F 20 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 67 o SortRecord.Pag
029D40: 65 73 2D 31 20 44 6F 0D 0A 20 20 20 20 20 20 20 es-1 Do..
029D50: 20 20 20 20 20 20 20 20 53 6F 72 74 52 65 63 6F SortReco
029D60: 72 64 2E 57 5B 49 5D 3A 3D 54 72 75 65 3B 20 0D rd.W[I]:=True; .
029D70: 0A 20 20 20 0D 0A 20 20 20 20 20 20 20 20 20 20 . ..
029D80: 20 20 49 66 20 53 6F 72 74 52 65 63 6F 72 64 2E If SortRecord.
029D90: 45 72 72 6F 72 3D 30 20 54 68 65 6E 20 51 75 69 Error=0 Then Qui
029DA0: 63 6B 73 6F 72 74 3B 0D 0A 20 20 20 0D 0A 20 20 cksort;.. ..
029DB0: 20 20 20 20 20 20 20 20 20 20 7B 20 45 6E 64 20 { End
029DC0: 73 6F 72 74 2C 20 72 65 74 75 72 6E 20 61 6C 6C sort, return all
029DD0: 20 72 65 63 6F 72 64 73 20 7D 0D 0A 20 20 20 20 records }..
029DE0: 20 20 20 20 20 20 20 20 53 6F 72 74 52 65 63 6F SortReco
029DF0: 72 64 2E 55 64 69 78 3A 3D 30 3B 0D 0A 20 20 20 rd.Udix:=0;..
029E00: 20 20 20 20 20 20 20 20 20 49 66 20 53 6F 72 74 If Sort
029E10: 52 65 63 6F 72 64 2E 45 72 72 6F 72 3D 30 20 54 Record.Error=0 T
029E20: 68 65 6E 20 4F 75 74 50 3B 20 7B 20 63 61 6C 6C hen OutP; { call
029E30: 20 75 73 65 72 20 64 65 66 69 6E 65 64 20 6F 75 user defined ou
029E40: 74 70 75 74 20 70 72 6F 63 65 64 75 72 65 20 7D tput procedure }
029E50: 0D 0A 20 20 20 20 20 20 20 20 20 45 6E 64 3B 0D .. End;.
029E60: 0A 0D 0A 20 20 20 20 20 20 20 20 20 49 66 20 53 ... If S
029E70: 6F 72 74 52 65 63 6F 72 64 2E 46 69 6C 65 43 72 ortRecord.FileCr
029E80: 65 61 74 65 64 20 54 68 65 6E 20 0D 0A 20 20 20 eated Then ..
029E90: 20 20 20 20 20 20 42 65 67 69 6E 0D 0A 20 20 20 Begin..
029EA0: 20 20 20 20 20 20 20 20 20 43 6C 6F 73 65 28 53 Close(S
029EB0: 6F 72 74 52 65 63 6F 72 64 2E 46 29 3B 0D 0A 20 ortRecord.F);..
029EC0: 20 20 20 20 20 20 20 20 20 20 20 45 72 61 73 65 Erase
029ED0: 28 53 6F 72 74 52 65 63 6F 72 64 2E 46 29 0D 0A (SortRecord.F)..
029EE0: 20 20 20 20 20 20 20 20 20 45 6E 64 3B 0D 0A 0D End;...
029EF0: 0A 20 20 20 20 20 20 20 20 20 7B 20 52 65 6C 65 . { Rele
029F00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
029F10: 20 20 7B 20 50 75 73 68 28 49 2C 52 29 20 7D 0D { Push(I,R) }.
029F20: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
029F30: 20 20 20 53 70 3A 3D 53 70 2B 31 3B 0D 0A 20 20 Sp:=Sp+1;..
029F40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
029F50: 4C 53 74 61 63 6B 5B 53 70 5D 3A 3D 49 3B 0D 0A LStack[Sp]:=I;..
029F60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
029F70: 20 20 52 53 74 61 63 6B 5B 53 70 5D 3A 3D 52 3B RStack[Sp]:=R;
029F80: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
029F90: 20 45 6E 64 3B 0D 0A 20 20 20 20 20 20 20 20 20 End;..
029FA0: 20 20 20 20 20 20 52 3A 3D 4A 0D 0A 20 20 20 20 R:=J..
029FB0: 20 20 20 20 20 20 20 20 45 6E 64 0D 0A 20 20 20 End..
029FC0: 20 20 20 20 20 20 20 20 20 45 6C 73 65 0D 0A 20 Else..
029FD0: 20 20 20 20 20 20 20 20 20 20 20 42 65 67 69 6E Begin
029FE0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
029FF0: 20 49 66 20 4C 3C 4A 20 54 68 65 6E 0D 0A 20 20 If L<J Then..
02A000: 20 20 20 20 20 20 20 20 20 20 20 20 20 42 65 67 Beg
02A010: 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 in..
02A020: 20 20 20 20 20 20 7B 20 50 75 73 68 28 4C 2C 4A { Push(L,J
02A030: 29 20 7D 0D 0A 20 20 20 20 20 20 20 20 20 20 20 ) }..
02A040: 20 20 20 20 20 20 20 53 70 3A 3D 53 70 2B 31 3B Sp:=Sp+1;
02A050: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
02A060: 20 20 20 20 4C 53 74 61 63 6B 5B 53 70 5D 3A 3D LStack[Sp]:=
02A070: 4C 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 L;..
02A080: 20 20 20 20 20 20 52 53 74 61 63 6B 5B 53 70 5D RStack[Sp]
02A090: 3A 3D 4A 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 :=J;..
02A0A0: 20 20 20 20 20 45 6E 64 3B 0D 0A 20 20 20 20 20 End;..
02A0B0: 20 20 20 20 20 20 20 20 20 20 4C 3A 3D 49 0D 0A L:=I..
02A0C0: 20 20 20 20 20 20 20 20 20 20 20 20 45 6E 64 3B End;
02A0D0: 0D 0A 0D 0A 20 20 20 20 20 20 20 20 20 20 55 6E .... Un
02A0E0: 74 69 6C 20 4C 3E 3D 52 0D 0A 20 20 20 20 20 20 til L>=R..
02A0F0: 20 45 6E 64 3B 0D 0A 20 20 20 20 20 20 20 30 3A End;.. 0:
02A100: 61 73 65 20 61 6C 6C 6F 63 61 74 65 64 20 6D 65 ase allocated me
02A110: 6D 6F 72 79 20 7D 0D 0A 20 20 20 20 20 20 20 20 mory }..
02A120: 20 46 6F 72 20 49 3A 3D 53 6F 72 74 52 65 63 6F For I:=SortReco
02A130: 72 64 2E 50 61 67 65 73 2D 31 20 44 6F 77 6E 54 rd.Pages-1 DownT
02A140: 6F 20 30 20 44 6F 0D 0A 20 20 20 20 20 20 20 20 o 0 Do..
02A150: 20 20 20 20 46 72 65 65 4D 65 6D 28 53 6F 72 74 FreeMem(Sort
02A160: 52 65 63 6F 72 64 2E 42 75 66 5B 49 5D 2C 50 61 Record.Buf[I],Pa
02A170: 67 65 53 69 7A 65 29 3B 0D 0A 20 20 20 20 20 20 geSize);..
02A180: 20 20 20 46 72 65 65 4D 65 6D 28 53 61 76 65 5A FreeMem(SaveZ
02A190: 2C 49 74 65 6D 4C 74 68 29 3B 0D 0A 20 20 20 20 ,ItemLth);..
02A1A0: 20 20 20 20 20 46 72 65 65 4D 65 6D 28 53 77 6F FreeMem(Swo
02A1B0: 70 50 6F 73 74 2C 49 74 65 6D 4C 74 68 29 3B 0D pPost,ItemLth);.
02A1C0: 0A 0D 0A 20 20 20 20 20 20 45 6E 64 20 45 6C 73 ... End Els
02A1D0: 65 20 53 6F 72 74 52 65 63 6F 72 64 2E 45 72 72 e SortRecord.Err
02A1E0: 6F 72 3A 3D 33 3B 20 7B 20 54 6F 6F 20 6C 69 74 or:=3; { Too lit
02A1F0: 74 6C 65 20 6D 65 6D 6F 72 79 20 20 7D 0D 0A 20 tle memory }..
02A200: 20 20 45 6E 64 20 45 6C 73 65 20 53 6F 72 74 52 End Else SortR
02A210: 65 63 6F 72 64 2E 45 72 72 6F 72 3A 3D 38 3B 20 ecord.Error:=8;
02A220: 20 20 20 7B 20 49 6C 6C 65 67 61 6C 20 69 74 65 { Illegal ite
02A230: 6D 6C 65 6E 67 74 68 20 7D 0D 0A 20 20 20 54 75 mlength }.. Tu
02A240: 72 62 6F 53 6F 72 74 3A 3D 53 6F 72 74 52 65 63 rboSort:=SortRec
02A250: 6F 72 64 2E 45 72 72 6F 72 3B 0D 0A 45 6E 64 3B ord.Error;..End;
02A260: 20 7B 20 54 75 72 62 6F 53 6F 72 74 20 7D 0D 0A { TurboSort }..
02A270: 0D 0A 0D 0A 7B 20 50 72 6F 63 65 64 75 72 65 73 ....{ Procedures
02A280: 20 75 73 65 64 20 62 79 20 75 73 65 72 20 72 6F used by user ro
02A290: 75 74 69 6E 65 73 20 7D 0D 0A 0D 0A 20 20 20 50 utines }.... P
02A2A0: 72 6F 63 65 64 75 72 65 20 53 6F 72 74 52 65 6C rocedure SortRel
02A2B0: 65 61 73 65 28 56 61 72 20 52 65 6C 65 61 73 65 ease(Var Release
02A2C0: 52 65 63 6F 72 64 29 3B 0D 0A 20 20 20 20 20 7B Record);.. {
02A2D0: 20 41 63 63 65 70 74 20 72 65 63 6F 72 64 20 66 Accept record f
02A2E0: 72 6F 6D 20 75 73 65 72 20 7D 0D 0A 20 20 20 20 rom user }..
02A2F0: 20 56 61 72 0D 0A 20 20 20 20 20 20 20 20 49 2C Var.. I,
02A300: 3B 0D 0A 20 20 20 20 45 6E 64 20 20 7B 20 51 75 ;.. End { Qu
02A310: 69 63 6B 53 6F 72 74 20 7D 3B 0D 0A 0D 0A 0D 0A ickSort };......
02A320: 0D 0A 42 65 67 69 6E 20 7B 20 54 75 72 62 6F 53 ..Begin { TurboS
02A330: 6F 72 74 20 7D 0D 0A 20 20 20 49 66 20 49 74 65 ort }.. If Ite
02A340: 6D 4C 74 68 3E 31 20 54 68 65 6E 20 42 65 67 69 mLth>1 Then Begi
02A350: 6E 0D 0A 20 20 20 20 20 20 53 6F 72 74 52 65 63 n.. SortRec
02A360: 6F 72 64 2E 49 74 65 6D 4C 74 68 20 3A 3D 20 49 ord.ItemLth := I
02A370: 74 65 6D 4C 74 68 3B 0D 0A 20 20 20 20 20 20 57 temLth;.. W
02A380: 6F 72 6B 41 72 65 61 3A 3D 53 6F 72 74 41 76 61 orkArea:=SortAva
02A390: 69 6C 2D 49 74 65 6D 4C 74 68 2D 49 74 65 6D 4C il-ItemLth-ItemL
02A3A0: 74 68 3B 0D 0A 0D 0A 20 20 20 20 20 20 7B 20 4E th;.... { N
02A3B0: 6F 20 6F 66 20 70 61 67 65 73 20 74 6F 20 62 65 o of pages to be
02A3C0: 20 6B 65 70 74 20 69 6E 20 6D 65 6D 6F 72 79 20 kept in memory
02A3D0: 7D 0D 0A 20 20 20 20 20 20 53 6F 72 74 52 65 63 }.. SortRec
02A3E0: 6F 72 64 2E 50 61 67 65 73 3A 3D 54 72 75 6E 63 ord.Pages:=Trunc
02A3F0: 28 57 6F 72 6B 41 72 65 61 2F 28 32 2E 30 2A 4D (WorkArea/(2.0*M
02A400: 61 78 49 6E 74 29 2B 31 2E 30 29 3B 20 0D 0A 20 axInt)+1.0); ..
02A410: 20 20 20 20 20 49 66 20 53 6F 72 74 52 65 63 6F If SortReco
02A420: 72 64 2E 50 61 67 65 73 3C 33 20 54 68 65 6E 20 rd.Pages<3 Then
02A430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
02A440: 20 20 7B 20 4D 75 73 74 20 62 65 20 61 74 20 6C { Must be at l
02A450: 65 61 73 74 20 33 20 7D 0D 0A 20 20 20 20 20 20 east 3 }..
02A460: 20 20 20 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 SortRecord.Pa
02A470: 67 65 73 3A 3D 33 3B 0D 0A 0D 0A 20 20 20 20 20 ges:=3;....
02A480: 20 53 6F 72 74 52 65 63 6F 72 64 2E 53 65 63 50 SortRecord.SecP
02A490: 72 50 61 67 65 3A 3D 54 72 75 6E 63 28 57 6F 72 rPage:=Trunc(Wor
02A4A0: 6B 41 72 65 61 20 2F 20 53 65 63 53 69 7A 65 29 kArea / SecSize)
02A4B0: 20 44 69 76 20 53 6F 72 74 52 65 63 6F 72 64 2E Div SortRecord.
02A4C0: 50 61 67 65 73 3B 0D 0A 20 20 20 20 20 20 49 66 Pages;.. If
02A4D0: 20 53 6F 72 74 52 65 63 6F 72 64 2E 53 65 63 50 SortRecord.SecP
02A4E0: 72 50 61 67 65 20 3E 20 32 30 20 54 68 65 6E 0D rPage > 20 Then.
02A4F0: 0A 20 20 20 20 20 20 20 20 20 53 6F 72 74 52 65 . SortRe
02A500: 42 75 66 4E 6F 20 3A 20 49 6E 74 65 67 65 72 3B BufNo : Integer;
02A510: 0D 0A 20 20 20 20 20 20 20 20 50 6F 69 6E 74 20 .. Point
02A520: 3A 20 53 6F 72 74 50 6F 69 6E 74 65 72 3B 0D 0A : SortPointer;..
02A530: 20 20 20 42 65 67 69 6E 0D 0A 20 20 20 20 20 20 Begin..
02A540: 49 66 20 53 6F 72 74 52 65 63 6F 72 64 2E 45 72 If SortRecord.Er
02A550: 72 6F 72 3D 30 20 54 68 65 6E 20 42 65 67 69 6E ror=0 Then Begin
02A560: 0D 0A 20 20 20 20 20 20 20 20 20 49 66 20 53 6F .. If So
02A570: 72 74 52 65 63 6F 72 64 2E 4E 3D 4D 61 78 49 6E rtRecord.N=MaxIn
02A580: 74 20 54 68 65 6E 20 20 7B 20 4F 6E 6C 79 20 70 t Then { Only p
02A590: 6F 73 73 69 62 6C 65 20 74 6F 20 73 6F 72 74 20 ossible to sort
02A5A0: 4D 61 78 49 6E 74 20 72 65 63 6F 72 64 73 20 7D MaxInt records }
02A5B0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 53 6F .. So
02A5C0: 72 74 52 65 63 6F 72 64 2E 45 72 72 6F 72 3A 3D rtRecord.Error:=
02A5D0: 39 3B 20 20 20 20 0D 0A 20 20 20 20 20 20 20 20 9; ..
02A5E0: 20 49 66 20 28 28 53 6F 72 74 52 65 63 6F 72 64 If ((SortRecord
02A5F0: 2E 4E 4D 6F 64 42 3D 30 29 20 61 6E 64 20 28 53 .NModB=0) and (S
02A600: 6F 72 74 52 65 63 6F 72 64 2E 4E 44 69 76 42 20 ortRecord.NDivB
02A610: 3E 3D 20 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 >= SortRecord.Pa
02A620: 67 65 73 29 29 20 54 68 65 6E 0D 0A 20 20 20 20 ges)) Then..
02A630: 20 20 20 20 20 42 65 67 69 6E 0D 0A 20 20 20 20 Begin..
02A640: 20 20 20 20 20 20 20 20 7B 20 57 72 69 74 65 20 { Write
02A650: 6F 75 74 20 6C 61 73 74 20 72 65 61 64 20 70 61 out last read pa
02A660: 67 65 20 7D 0D 0A 20 20 20 20 20 20 20 20 20 20 ge }..
02A670: 20 20 49 66 20 53 6F 72 74 52 65 63 6F 72 64 2E If SortRecord.
02A680: 4E 44 69 76 42 3D 53 6F 72 74 52 65 63 6F 72 64 NDivB=SortRecord
02A690: 2E 50 61 67 65 73 20 54 68 65 6E 20 42 65 67 69 .Pages Then Begi
02A6A0: 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 n..
02A6B0: 20 20 7B 20 63 72 65 61 74 65 20 75 73 65 72 20 { create user
02A6C0: 66 69 6C 65 20 7D 0D 0A 20 20 20 20 20 20 20 20 file }..
02A6D0: 20 20 20 20 20 20 20 41 73 73 69 67 6E 28 53 6F Assign(So
02A6E0: 72 74 52 65 63 6F 72 64 2E 46 2C 27 53 4F 57 52 rtRecord.F,'SOWR
02A6F0: 4B 2E 24 24 24 27 29 3B 0D 0A 20 20 20 20 20 20 K.$$$');..
02A700: 63 6F 72 64 2E 53 65 63 50 72 50 61 67 65 3A 3D cord.SecPrPage:=
02A710: 34 2A 28 53 6F 72 74 52 65 63 6F 72 64 2E 53 65 4*(SortRecord.Se
02A720: 63 50 72 50 61 67 65 20 64 69 76 20 34 29 3B 0D cPrPage div 4);.
02A730: 0A 0D 0A 20 20 20 20 20 20 50 61 67 65 53 69 7A ... PageSiz
02A740: 65 3A 3D 53 6F 72 74 52 65 63 6F 72 64 2E 53 65 e:=SortRecord.Se
02A750: 63 50 72 50 61 67 65 2A 53 65 63 53 69 7A 65 3B cPrPage*SecSize;
02A760: 20 7B 20 4D 61 79 20 62 65 20 6E 65 67 61 74 69 { May be negati
02A770: 76 65 20 6F 72 20 30 20 7D 0D 0A 20 20 20 20 20 ve or 0 }..
02A780: 20 49 66 20 28 50 61 67 65 53 69 7A 65 3D 30 29 If (PageSize=0)
02A790: 20 41 6E 64 20 28 53 6F 72 74 52 65 63 6F 72 64 And (SortRecord
02A7A0: 2E 53 65 63 50 72 50 61 67 65 3E 30 29 20 54 68 .SecPrPage>0) Th
02A7B0: 65 6E 0D 0A 20 20 20 20 20 20 20 20 20 53 61 66 en.. Saf
02A7C0: 65 74 79 50 3A 3D 36 35 35 33 36 2E 30 20 20 20 etyP:=65536.0
02A7D0: 20 7B 20 3D 20 32 2A 4D 61 78 49 6E 74 20 7D 0D { = 2*MaxInt }.
02A7E0: 0A 20 20 20 20 20 20 45 6C 73 65 0D 0A 20 20 20 . Else..
02A7F0: 20 20 20 20 20 20 53 61 66 65 74 79 50 3A 3D 43 SafetyP:=C
02A800: 6F 6E 76 65 72 74 28 50 61 67 65 53 69 7A 65 29 onvert(PageSize)
02A810: 3B 0D 0A 20 20 20 20 20 20 53 6F 72 74 52 65 63 ;.. SortRec
02A820: 6F 72 64 2E 42 3A 3D 20 54 72 75 6E 63 28 53 61 ord.B:= Trunc(Sa
02A830: 66 65 74 79 50 2F 49 74 65 6D 4C 74 68 29 3B 0D fetyP/ItemLth);.
02A840: 0A 0D 0A 20 20 20 20 20 20 49 66 20 53 6F 72 74 ... If Sort
02A850: 52 65 63 6F 72 64 2E 42 20 3E 20 30 20 54 68 65 Record.B > 0 The
02A860: 6E 20 42 65 67 69 6E 20 7B 20 45 6E 6F 75 67 68 n Begin { Enough
02A870: 20 6D 65 6D 6F 72 79 20 7D 0D 0A 0D 0A 20 20 20 memory }....
02A880: 20 20 20 20 20 20 47 65 74 4D 65 6D 28 53 77 6F GetMem(Swo
02A890: 70 50 6F 73 74 2C 49 74 65 6D 4C 74 68 29 3B 0D pPost,ItemLth);.
02A8A0: 0A 20 20 20 20 20 20 20 20 20 47 65 74 4D 65 6D . GetMem
02A8B0: 28 53 61 76 65 5A 2C 49 74 65 6D 4C 74 68 29 3B (SaveZ,ItemLth);
02A8C0: 0D 0A 20 20 20 20 20 20 20 20 20 46 6F 72 20 49 .. For I
02A8D0: 3A 3D 30 20 54 6F 20 53 6F 72 74 52 65 63 6F 72 :=0 To SortRecor
02A8E0: 64 2E 50 61 67 65 73 2D 31 20 44 6F 0D 0A 20 20 d.Pages-1 Do..
02A8F0: 20 20 20 20 20 20 20 20 20 20 47 65 74 4D 65 6D GetMem
02A900: 20 20 20 20 20 20 20 20 20 52 65 77 72 69 74 65 Rewrite
02A910: 28 53 6F 72 74 52 65 63 6F 72 64 2E 46 29 3B 0D (SortRecord.F);.
02A920: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
02A930: 49 66 20 49 4F 52 65 73 75 6C 74 3C 3E 30 20 54 If IOResult<>0 T
02A940: 68 65 6E 20 53 6F 72 74 52 65 63 6F 72 64 2E 45 hen SortRecord.E
02A950: 72 72 6F 72 3A 3D 31 32 0D 0A 20 20 20 20 20 20 rror:=12..
02A960: 20 20 20 20 20 20 20 20 20 45 6C 73 65 20 53 6F Else So
02A970: 72 74 52 65 63 6F 72 64 2E 46 69 6C 65 43 72 65 rtRecord.FileCre
02A980: 61 74 65 64 3A 3D 54 72 75 65 3B 0D 0A 20 20 20 ated:=True;..
02A990: 20 20 20 20 20 20 20 20 20 20 20 20 7B 20 46 69 { Fi
02A9A0: 6C 6C 20 70 61 67 65 20 30 20 74 6F 20 50 61 67 ll page 0 to Pag
02A9B0: 65 73 2D 32 20 7D 0D 0A 20 20 20 20 20 20 20 20 es-2 }..
02A9C0: 20 20 20 20 20 20 20 46 6F 72 20 49 3A 3D 30 20 For I:=0
02A9D0: 54 6F 20 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 To SortRecord.Pa
02A9E0: 67 65 73 2D 32 20 44 6F 0D 0A 20 20 20 20 20 20 ges-2 Do..
02A9F0: 20 20 20 20 20 20 20 20 20 20 20 20 53 6F 72 74 Sort
02AA00: 50 75 74 28 50 74 72 28 30 29 2C 20 49 29 3B 0D Put(Ptr(0), I);.
02AA10: 0A 20 20 20 20 20 20 20 20 20 20 20 20 45 6E 64 . End
02AA20: 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 7B ;.. {
02AA30: 20 57 72 69 74 65 20 75 73 65 72 20 72 65 63 6F Write user reco
02AA40: 72 64 20 69 6E 20 6C 61 73 74 20 70 61 67 65 20 rd in last page
02AA50: 7D 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 53 }.. S
02AA60: 6F 72 74 50 75 74 28 53 6F 72 74 52 65 63 6F 72 ortPut(SortRecor
02AA70: 64 2E 42 75 66 5B 53 6F 72 74 52 65 63 6F 72 64 d.Buf[SortRecord
02AA80: 2E 50 61 67 65 73 2D 31 5D 2C 0D 0A 20 20 20 20 .Pages-1],..
02AA90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
02AAA0: 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 67 65 5B SortRecord.Page[
02AAB0: 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 67 65 73 SortRecord.Pages
02AAC0: 2D 31 5D 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 -1]);..
02AAD0: 20 20 20 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 SortRecord.Pa
02AAE0: 67 65 5B 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 ge[SortRecord.Pa
02AAF0: 67 65 73 2D 31 5D 3A 3D 0D 0A 20 20 20 20 20 20 ges-1]:=..
02AB00: 28 53 6F 72 74 52 65 63 6F 72 64 2E 42 75 66 5B (SortRecord.Buf[
02AB10: 49 5D 2C 50 61 67 65 53 69 7A 65 29 3B 0D 0A 0D I],PageSize);...
02AB20: 0A 20 20 20 20 20 20 20 20 20 54 75 72 62 6F 53 . TurboS
02AB30: 6F 72 74 3A 3D 30 3B 0D 0A 0D 0A 20 20 20 20 20 ort:=0;....
02AB40: 20 20 20 20 53 6F 72 74 52 65 63 6F 72 64 2E 45 SortRecord.E
02AB50: 72 72 6F 72 3A 3D 30 3B 0D 0A 20 20 20 20 20 20 rror:=0;..
02AB60: 20 20 20 53 6F 72 74 52 65 63 6F 72 64 2E 46 69 SortRecord.Fi
02AB70: 6C 65 43 72 65 61 74 65 64 3A 3D 46 61 6C 73 65 leCreated:=False
02AB80: 3B 0D 0A 20 20 20 20 20 20 20 20 20 53 6F 72 74 ;.. Sort
02AB90: 52 65 63 6F 72 64 2E 4E 3A 3D 30 3B 0D 0A 20 20 Record.N:=0;..
02ABA0: 20 20 20 20 20 20 20 53 6F 72 74 52 65 63 6F 72 SortRecor
02ABB0: 64 2E 4E 4D 6F 64 42 3A 3D 30 3B 0D 0A 20 20 20 d.NModB:=0;..
02ABC0: 20 20 20 20 20 20 53 6F 72 74 52 65 63 6F 72 64 SortRecord
02ABD0: 2E 4E 44 69 76 42 3A 3D 30 3B 0D 0A 20 20 20 20 .NDivB:=0;..
02ABE0: 20 20 20 20 20 46 6F 72 20 49 3A 3D 30 20 54 6F For I:=0 To
02ABF0: 20 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 67 65 SortRecord.Page
02AC00: 73 2D 31 20 44 6F 0D 0A 20 20 20 20 20 20 20 20 s-1 Do..
02AC10: 20 20 20 20 53 6F 72 74 52 65 63 6F 72 64 2E 50 SortRecord.P
02AC20: 61 67 65 5B 49 5D 3A 3D 49 3B 0D 0A 20 20 20 0D age[I]:=I;.. .
02AC30: 0A 20 20 20 20 20 20 20 20 20 49 6E 70 3B 20 20 . Inp;
02AC40: 20 7B 20 63 61 6C 6C 20 75 73 65 72 20 64 65 66 { call user def
02AC50: 69 6E 65 64 20 69 6E 70 75 74 20 70 72 6F 63 65 ined input proce
02AC60: 64 75 72 65 20 7D 0D 0A 20 20 20 20 20 20 20 20 dure }..
02AC70: 20 7B 20 61 6C 6C 20 72 65 63 6F 72 64 73 20 61 { all records a
02AC80: 72 65 20 72 65 61 64 20 7D 0D 0A 20 20 20 20 0D re read }.. .
02AC90: 0A 20 20 20 20 20 20 20 20 20 49 66 20 53 6F 72 . If Sor
02ACA0: 74 52 65 63 6F 72 64 2E 45 72 72 6F 72 20 3D 20 tRecord.Error =
02ACB0: 30 20 54 68 65 6E 20 42 65 67 69 6E 0D 0A 20 20 0 Then Begin..
02ACC0: 20 20 20 20 20 20 20 20 20 20 7B 20 4E 6F 20 65 { No e
02ACD0: 72 72 6F 72 73 20 77 68 69 6C 65 20 72 65 61 64 rrors while read
02ACE0: 69 6E 67 20 72 65 63 6F 72 64 73 20 7D 0D 0A 20 ing records }..
02ACF0: 20 20 20 20 20 20 20 20 20 20 20 7B 20 49 6E 69 { Ini
02AD00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
02AD10: 24 00 01 00 02 09 52 E5 24 00 41 02 00 00 00 02 $.....R.$.A.....
02AD20: 24 00 46 02 00 00 00 02 24 00 42 02 00 00 00 02 $.F.....$.B.....
02AD30: 24 00 47 02 00 00 00 02 24 00 43 02 00 00 00 02 $.G.....$.C.....
02AD40: 24 00 48 02 00 00 00 02 24 00 44 02 00 00 00 02 $.H.....$.D.....
02AD50: 24 00 49 02 00 00 00 02 24 00 45 02 00 00 00 02 $.I.....$.E.....
02AD60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02AD70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02AD80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02AD90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02ADA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02ADB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02ADC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02ADD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02ADE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02ADF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02AE00: 20 20 20 20 20 20 20 20 20 20 53 6F 72 74 52 65 SortRe
02AE10: 63 6F 72 64 2E 50 61 67 65 5B 53 6F 72 74 52 65 cord.Page[SortRe
02AE20: 63 6F 72 64 2E 50 61 67 65 73 2D 31 5D 2B 31 3B cord.Pages-1]+1;
02AE30: 0D 0A 20 20 20 20 20 20 20 20 20 45 6E 64 3B 0D .. End;.
02AE40: 0A 0D 0A 20 20 20 20 20 20 20 20 20 49 66 20 53 ... If S
02AE50: 6F 72 74 52 65 63 6F 72 64 2E 4E 44 69 76 42 3E ortRecord.NDivB>
02AE60: 3D 53 6F 72 74 52 65 63 6F 72 64 2E 50 61 67 65 =SortRecord.Page
02AE70: 73 20 54 68 65 6E 0D 0A 20 20 20 20 20 20 20 20 s Then..
02AE80: 20 20 20 20 42 75 66 4E 6F 3A 3D 53 6F 72 74 52 BufNo:=SortR
02AE90: 65 63 6F 72 64 2E 50 61 67 65 73 2D 31 0D 0A 20 ecord.Pages-1..
02AEA0: 20 20 20 20 20 20 20 20 45 6C 73 65 20 0D 0A 20 Else ..
02AEB0: 20 20 20 20 20 20 20 20 20 20 20 42 75 66 4E 6F BufNo
02AEC0: 3A 3D 53 6F 72 74 52 65 63 6F 72 64 2E 4E 44 69 :=SortRecord.NDi
02AED0: 76 42 3B 0D 0A 20 20 20 20 20 20 20 20 20 50 6F vB;.. Po
02AEE0: 69 6E 74 3A 3D 20 50 74 72 28 4F 72 64 28 53 6F int:= Ptr(Ord(So
02AEF0: 72 74 52 65 63 6F 72 64 2E 42 75 66 5B 42 75 66 rtRecord.Buf[Buf
02AF00: 4E 6F 5D 29 20 2B 0D 0A 20 20 20 20 20 20 20 20 No]) +..
02AF10: 20 20 20 20 20 20 20 20 20 20 20 20 20 53 6F 72 Sor
02AF20: 74 52 65 63 6F 72 64 2E 4E 4D 6F 64 42 2A 53 6F tRecord.NModB*So
02AF30: 72 74 52 65 63 6F 72 64 2E 49 74 65 6D 4C 74 68 rtRecord.ItemLth
02AF40: 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 4D 6F 76 );.. Mov
02AF50: 65 28 52 65 6C 65 61 73 65 52 65 63 6F 72 64 2C e(ReleaseRecord,
02AF60: 50 6F 69 6E 74 5E 2C 53 6F 72 74 52 65 63 6F 72 Point^,SortRecor
02AF70: 64 2E 49 74 65 6D 4C 74 68 29 3B 0D 0A 0D 0A 20 d.ItemLth);....
02AF80: 20 20 20 20 20 20 20 20 53 6F 72 74 52 65 63 6F SortReco
02AF90: 72 64 2E 4E 3A 3D 20 53 6F 72 74 52 65 63 6F 72 rd.N:= SortRecor
02AFA0: 64 2E 4E 2B 31 3B 0D 0A 20 20 20 20 20 20 20 20 d.N+1;..
02AFB0: 20 53 6F 72 74 52 65 63 6F 72 64 2E 4E 4D 6F 64 SortRecord.NMod
02AFC0: 42 3A 3D 53 6F 72 74 52 65 63 6F 72 64 2E 4E 4D B:=SortRecord.NM
02AFD0: 6F 64 42 20 2B 20 31 3B 0D 0A 20 20 20 20 20 20 odB + 1;..
02AFE0: 20 20 20 49 66 20 53 6F 72 74 52 65 63 6F 72 64 If SortRecord
02AFF0: 2E 4E 4D 6F 64 42 3D 53 6F 72 74 52 65 63 6F 72 .NModB=SortRecor
02B000: 73 74 52 65 63 3B 0D 0A 20 20 43 75 73 74 6F 6D stRec;.. Custom
02B010: 65 72 3A 20 20 20 43 75 73 74 52 65 63 3B 0D 0A er: CustRec;..
02B020: 20 20 53 74 6F 63 6B 46 69 6C 65 3A 20 20 66 69 StockFile: fi
02B030: 6C 65 20 6F 66 20 49 74 65 6D 52 65 63 3B 0D 0A le of ItemRec;..
02B040: 20 20 49 74 65 6D 3A 20 20 20 20 20 20 20 49 74 Item: It
02B050: 65 6D 52 65 63 3B 0D 0A 20 20 43 68 6F 69 63 65 emRec;.. Choice
02B060: 3A 20 20 20 20 20 43 68 61 72 3B 0D 0A 0D 0A 28 : Char;....(
02B070: 2A 24 49 53 4F 52 54 31 2E 42 4F 58 2A 29 0D 0A *$ISORT1.BOX*)..
02B080: 28 2A 24 49 53 4F 52 54 32 2E 42 4F 58 2A 29 0D (*$ISORT2.BOX*).
02B090: 0A 0D 0A 70 72 6F 63 65 64 75 72 65 20 49 6E 70 ...procedure Inp
02B0A0: 3B 20 7B 74 68 69 73 20 70 72 6F 63 65 64 75 72 ; {this procedur
02B0B0: 65 20 69 73 20 66 6F 72 77 61 72 64 20 64 65 63 e is forward dec
02B0C0: 6C 61 72 65 64 20 69 6E 20 53 4F 52 54 2E 42 4F lared in SORT.BO
02B0D0: 58 7D 0D 0A 62 65 67 69 6E 0D 0A 20 20 63 61 73 X}..begin.. cas
02B0E0: 65 20 43 68 6F 69 63 65 20 6F 66 0D 0A 20 20 20 e Choice of..
02B0F0: 20 27 43 27 3A 20 62 65 67 69 6E 0D 0A 20 20 20 'C': begin..
02B100: 20 20 20 20 20 20 20 20 72 65 70 65 61 74 0D 0A repeat..
02B110: 20 20 20 20 20 20 20 20 20 20 20 20 20 52 65 61 Rea
02B120: 64 28 43 75 73 74 46 69 6C 65 2C 43 75 73 74 6F d(CustFile,Custo
02B130: 6D 65 72 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 mer);..
02B140: 20 20 20 20 53 6F 72 74 52 65 6C 65 61 73 65 28 SortRelease(
02B150: 43 75 73 74 6F 6D 65 72 29 3B 0D 0A 20 20 20 20 Customer);..
02B160: 20 20 20 20 20 20 20 75 6E 74 69 6C 20 45 4F 46 until EOF
02B170: 28 43 75 73 74 46 69 6C 65 29 3B 0D 0A 20 20 20 (CustFile);..
02B180: 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 end;..
02B190: 27 53 27 3A 20 62 65 67 69 6E 0D 0A 20 20 20 20 'S': begin..
02B1A0: 20 20 20 20 20 20 20 72 65 70 65 61 74 0D 0A 20 repeat..
02B1B0: 20 20 20 20 20 20 20 20 20 20 20 20 52 65 61 64 Read
02B1C0: 28 53 74 6F 63 6B 46 69 6C 65 2C 49 74 65 6D 29 (StockFile,Item)
02B1D0: 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 ;..
02B1E0: 53 6F 72 74 52 65 6C 65 61 73 65 28 49 74 65 6D SortRelease(Item
02B1F0: 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 75 );.. u
02B200: 64 2E 42 20 54 68 65 6E 20 42 65 67 69 6E 0D 0A d.B Then Begin..
02B210: 20 20 20 20 20 20 20 20 20 20 20 20 53 6F 72 74 Sort
02B220: 52 65 63 6F 72 64 2E 4E 4D 6F 64 42 3A 3D 30 3B Record.NModB:=0;
02B230: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 53 6F .. So
02B240: 72 74 52 65 63 6F 72 64 2E 4E 44 69 76 42 3A 3D rtRecord.NDivB:=
02B250: 53 6F 72 74 52 65 63 6F 72 64 2E 4E 44 69 76 42 SortRecord.NDivB
02B260: 2B 31 0D 0A 20 20 20 20 20 20 20 20 20 45 6E 64 +1.. End
02B270: 3B 0D 0A 20 20 20 20 20 20 45 6E 64 3B 0D 0A 20 ;.. End;..
02B280: 20 20 45 6E 64 20 20 20 7B 20 53 6F 72 74 52 65 End { SortRe
02B290: 6C 65 61 73 65 20 7D 3B 0D 0A 0D 0A 0D 0A 20 20 lease };......
02B2A0: 20 50 72 6F 63 65 64 75 72 65 20 53 6F 72 74 52 Procedure SortR
02B2B0: 65 74 75 72 6E 28 56 61 72 20 52 65 74 75 72 6E eturn(Var Return
02B2C0: 52 65 63 6F 72 64 29 3B 0D 0A 20 20 20 20 20 20 Record);..
02B2D0: 7B 20 52 65 74 75 72 6E 20 72 65 63 6F 72 64 20 { Return record
02B2E0: 74 6F 20 75 73 65 72 20 7D 0D 0A 20 20 20 20 20 to user }..
02B2F0: 20 56 61 72 20 41 75 78 41 64 64 72 20 3A 20 53 Var AuxAddr : S
02B300: 6F 72 74 50 6F 69 6E 74 65 72 3B 0D 0A 20 20 20 ortPointer;..
02B310: 42 65 67 69 6E 0D 0A 20 20 20 20 20 20 49 66 20 Begin.. If
02B320: 53 6F 72 74 52 65 63 6F 72 64 2E 45 72 72 6F 72 SortRecord.Error
02B330: 3D 30 20 54 68 65 6E 20 42 65 67 69 6E 0D 0A 20 =0 Then Begin..
02B340: 20 20 20 20 20 20 20 20 53 6F 72 74 46 65 74 63 SortFetc
02B350: 68 50 61 67 65 28 53 6F 72 74 52 65 63 6F 72 64 hPage(SortRecord
02B360: 2E 55 64 69 78 2C 53 6F 72 74 52 65 63 6F 72 64 .Udix,SortRecord
02B370: 2E 4E 2D 31 2C 2D 53 6F 72 74 52 65 63 6F 72 64 .N-1,-SortRecord
02B380: 2E 42 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 53 .B);.. S
02B390: 6F 72 74 46 65 74 63 68 41 64 64 72 28 53 6F 72 ortFetchAddr(Sor
02B3A0: 74 52 65 63 6F 72 64 2E 55 64 69 78 2C 41 75 78 tRecord.Udix,Aux
02B3B0: 41 64 64 72 29 3B 0D 0A 20 20 20 20 20 20 20 20 Addr);..
02B3C0: 20 4D 6F 76 65 28 41 75 78 41 64 64 72 5E 2C 52 Move(AuxAddr^,R
02B3D0: 65 74 75 72 6E 52 65 63 6F 72 64 2C 53 6F 72 74 eturnRecord,Sort
02B3E0: 52 65 63 6F 72 64 2E 49 74 65 6D 4C 74 68 29 3B Record.ItemLth);
02B3F0: 0D 0A 20 20 20 20 20 20 20 20 20 53 6F 72 74 52 .. SortR
02B400: 6E 74 69 6C 20 45 4F 46 28 53 74 6F 63 6B 46 69 ntil EOF(StockFi
02B410: 6C 65 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 65 le);.. e
02B420: 6E 64 3B 0D 0A 20 20 65 6E 64 3B 20 7B 63 61 73 nd;.. end; {cas
02B430: 65 7D 0D 0A 65 6E 64 3B 0D 0A 0D 0A 66 75 6E 63 e}..end;....func
02B440: 74 69 6F 6E 20 4C 65 73 73 3B 20 7B 74 68 69 73 tion Less; {this
02B450: 20 62 6F 6F 6C 65 61 6E 20 66 75 6E 63 74 69 6F boolean functio
02B460: 6E 20 68 61 73 20 74 77 6F 20 70 61 72 61 6D 65 n has two parame
02B470: 74 65 72 73 2C 20 58 20 61 6E 64 20 59 7D 0D 0A ters, X and Y}..
02B480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7B {
02B490: 61 6E 64 20 69 73 20 66 6F 72 77 61 72 64 20 64 and is forward d
02B4A0: 65 63 6C 61 72 65 64 20 69 6E 20 53 4F 52 54 2E eclared in SORT.
02B4B0: 42 4F 58 7D 0D 0A 76 61 72 0D 0A 20 20 46 69 72 BOX}..var.. Fir
02B4C0: 73 74 43 75 73 74 3A 20 20 43 75 73 74 52 65 63 stCust: CustRec
02B4D0: 20 61 62 73 6F 6C 75 74 65 20 58 3B 0D 0A 20 20 absolute X;..
02B4E0: 53 65 63 6F 6E 64 43 75 73 74 3A 20 43 75 73 74 SecondCust: Cust
02B4F0: 52 65 63 20 61 62 73 6F 6C 75 74 65 20 59 3B 0D Rec absolute Y;.
02B500: 0A 20 20 46 69 72 73 74 49 74 65 6D 3A 20 20 49 . FirstItem: I
02B510: 74 65 6D 52 65 63 20 61 62 73 6F 6C 75 74 65 20 temRec absolute
02B520: 58 3B 0D 0A 20 20 53 65 63 6F 6E 64 49 74 65 6D X;.. SecondItem
02B530: 3A 20 49 74 65 6D 52 65 63 20 61 62 73 6F 6C 75 : ItemRec absolu
02B540: 74 65 20 59 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 te Y;..begin..
02B550: 63 61 73 65 20 43 68 6F 69 63 65 20 6F 66 0D 0A case Choice of..
02B560: 20 20 20 20 27 43 27 3A 20 4C 65 73 73 20 3A 3D 'C': Less :=
02B570: 20 46 69 72 73 74 43 75 73 74 2E 4E 75 6D 62 65 FirstCust.Numbe
02B580: 72 20 3C 20 53 65 63 6F 6E 64 43 75 73 74 2E 4E r < SecondCust.N
02B590: 75 6D 62 65 72 3B 0D 0A 20 20 20 20 27 53 27 3A umber;.. 'S':
02B5A0: 20 4C 65 73 73 20 3A 3D 20 28 46 69 72 73 74 49 Less := (FirstI
02B5B0: 74 65 6D 2E 49 6E 53 74 6F 63 6B 20 3C 20 53 65 tem.InStock < Se
02B5C0: 63 6F 6E 64 49 74 65 6D 2E 49 6E 53 74 6F 63 6B condItem.InStock
02B5D0: 29 20 6F 72 0D 0A 20 20 20 20 20 20 20 20 20 20 ) or..
02B5E0: 20 20 20 20 20 20 28 28 46 69 72 73 74 49 74 65 ((FirstIte
02B5F0: 6D 2E 49 6E 53 74 6F 63 6B 20 3D 20 53 65 63 6F m.InStock = Seco
02B600: 65 63 6F 72 64 2E 55 64 69 78 3A 3D 20 53 6F 72 ecord.Udix:= Sor
02B610: 74 52 65 63 6F 72 64 2E 55 64 69 78 2B 31 0D 0A tRecord.Udix+1..
02B620: 20 20 20 20 20 20 45 6E 64 0D 0A 20 20 20 45 6E End.. En
02B630: 64 20 20 20 7B 20 53 6F 72 74 52 65 74 75 72 6E d { SortReturn
02B640: 20 7D 3B 0D 0A 0D 0A 0D 0A 20 20 20 46 75 6E 63 };...... Func
02B650: 74 69 6F 6E 20 53 6F 72 74 45 4F 53 3A 42 6F 6F tion SortEOS:Boo
02B660: 6C 65 61 6E 3B 0D 0A 20 20 20 20 20 20 7B 20 52 lean;.. { R
02B670: 65 74 75 72 6E 73 20 54 72 75 65 20 69 66 20 61 eturns True if a
02B680: 6C 6C 20 72 65 63 6F 72 64 73 20 61 72 65 20 72 ll records are r
02B690: 65 74 75 72 6E 65 64 20 7D 0D 0A 20 20 20 42 65 eturned }.. Be
02B6A0: 67 69 6E 0D 0A 20 20 20 20 20 20 53 6F 72 74 45 gin.. SortE
02B6B0: 4F 53 3A 3D 20 28 53 6F 72 74 52 65 63 6F 72 64 OS:= (SortRecord
02B6C0: 2E 55 64 69 78 20 3E 3D 20 53 6F 72 74 52 65 63 .Udix >= SortRec
02B6D0: 6F 72 64 2E 4E 29 20 4F 72 20 28 53 6F 72 74 52 ord.N) Or (SortR
02B6E0: 65 63 6F 72 64 2E 45 72 72 6F 72 3C 3E 30 29 3B ecord.Error<>0);
02B6F0: 0D 0A 20 20 20 45 6E 64 3B 0D 0A 0D 0A 0D 0A 0D .. End;.......
02B700: 0A 7B 24 49 2B 2C 57 32 7D 20 20 7B 20 44 65 66 .{$I+,W2} { Def
02B710: 61 75 6C 74 20 76 61 6C 75 65 73 20 7D 0D 0A 1A ault values }...
02B720: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02B730: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02B740: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02B750: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02B760: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02B770: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02B780: 2E 42 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 53 .B);.. S
02B790: 6F 72 74 46 65 74 63 68 41 64 64 72 28 53 6F 72 ortFetchAddr(Sor
02B7A0: 74 52 65 63 6F 72 64 2E 55 64 69 78 2C 41 75 78 tRecord.Udix,Aux
02B7B0: 41 64 64 72 29 3B 0D 0A 20 20 20 20 20 20 20 20 Addr);..
02B7C0: 20 4D 6F 76 65 28 41 75 78 41 64 64 72 5E 2C 52 Move(AuxAddr^,R
02B7D0: 65 74 75 72 6E 52 65 63 6F 72 64 2C 53 6F 72 74 eturnRecord,Sort
02B7E0: 52 65 63 6F 72 64 2E 49 74 65 6D 4C 74 68 29 3B Record.ItemLth);
02B7F0: 0D 0A 20 20 20 20 20 20 20 20 20 53 6F 72 74 52 .. SortR
02B800: 6E 64 49 74 65 6D 2E 49 6E 53 74 6F 63 6B 29 20 ndItem.InStock)
02B810: 61 6E 64 0D 0A 20 20 20 20 20 20 20 20 20 20 20 and..
02B820: 20 20 20 20 20 20 28 46 69 72 73 74 49 74 65 6D (FirstItem
02B830: 2E 50 72 69 63 65 20 3C 20 53 65 63 6F 6E 64 49 .Price < SecondI
02B840: 74 65 6D 2E 50 72 69 63 65 29 29 3B 0D 0A 20 20 tem.Price));..
02B850: 65 6E 64 3B 0D 0A 65 6E 64 3B 0D 0A 0D 0A 70 72 end;..end;....pr
02B860: 6F 63 65 64 75 72 65 20 4F 75 74 50 3B 0D 0A 76 ocedure OutP;..v
02B870: 61 72 0D 0A 20 20 49 3A 20 20 49 6E 74 65 67 65 ar.. I: Intege
02B880: 72 3B 0D 0A 62 65 67 69 6E 0D 0A 20 20 63 61 73 r;..begin.. cas
02B890: 65 20 43 68 6F 69 63 65 20 6F 66 0D 0A 20 20 20 e Choice of..
02B8A0: 20 27 43 27 3A 20 62 65 67 69 6E 0D 0A 20 20 20 'C': begin..
02B8B0: 20 20 20 20 20 20 20 20 72 65 70 65 61 74 0D 0A repeat..
02B8C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 53 6F 72 Sor
02B8D0: 74 52 65 74 75 72 6E 28 43 75 73 74 6F 6D 65 72 tReturn(Customer
02B8E0: 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 );..
02B8F0: 20 77 69 74 68 20 43 75 73 74 6F 6D 65 72 20 64 with Customer d
02B900: 6F 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 o..
02B910: 62 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 begin..
02B920: 20 20 20 20 20 20 57 72 69 74 65 28 4E 75 6D 62 Write(Numb
02B930: 65 72 2C 20 27 20 27 2C 4E 61 6D 65 2C 27 20 27 er, ' ',Name,' '
02B940: 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 );..
02B950: 20 20 20 66 6F 72 20 49 20 3A 3D 20 4C 65 6E 67 for I := Leng
02B960: 74 68 28 4E 61 6D 65 29 20 74 6F 20 33 30 20 64 th(Name) to 30 d
02B970: 6F 20 57 72 69 74 65 28 27 20 27 29 3B 0D 0A 20 o Write(' ');..
02B980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 72 Wr
02B990: 69 74 65 28 41 64 64 72 29 3B 0D 0A 20 20 20 20 ite(Addr);..
02B9A0: 20 20 20 20 20 20 20 20 20 20 20 66 6F 72 20 49 for I
02B9B0: 20 3A 3D 20 4C 65 6E 67 74 68 28 41 64 64 72 29 := Length(Addr)
02B9C0: 20 74 6F 20 32 30 20 64 6F 20 57 72 69 74 65 28 to 20 do Write(
02B9D0: 27 20 27 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 ' ');..
02B9E0: 20 20 20 20 20 20 57 72 69 74 65 28 43 69 74 79 Write(City
02B9F0: 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 );..
02BA00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BA90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BAA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BAB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BAC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BAD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BAE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BAF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BB90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BBA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BBB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BBC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BBD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BBE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BBF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02BC00: 20 20 20 66 6F 72 20 49 20 3A 3D 20 4C 65 6E 67 for I := Leng
02BC10: 74 68 28 43 69 74 79 29 20 74 6F 20 31 32 20 64 th(City) to 12 d
02BC20: 6F 20 57 72 69 74 65 28 27 20 27 29 3B 0D 0A 20 o Write(' ');..
02BC30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 72 Wr
02BC40: 69 74 65 4C 6E 28 53 74 61 74 65 2C 27 20 27 2C iteLn(State,' ',
02BC50: 5A 69 70 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 Zip);..
02BC60: 20 20 20 20 65 6E 64 3B 0D 0A 20 20 20 20 20 20 end;..
02BC70: 20 20 20 20 20 75 6E 74 69 6C 20 53 6F 72 74 45 until SortE
02BC80: 4F 53 3B 0D 0A 20 20 20 20 20 20 20 20 20 65 6E OS;.. en
02BC90: 64 3B 0D 0A 20 20 20 20 27 53 27 3A 20 62 65 67 d;.. 'S': beg
02BCA0: 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 20 72 in.. r
02BCB0: 65 70 65 61 74 0D 0A 20 20 20 20 20 20 20 20 20 epeat..
02BCC0: 20 20 20 20 53 6F 72 74 52 65 74 75 72 6E 28 49 SortReturn(I
02BCD0: 74 65 6D 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 tem);..
02BCE0: 20 20 20 20 77 69 74 68 20 49 74 65 6D 20 64 6F with Item do
02BCF0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 62 .. b
02BD00: 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 egin..
02BD10: 20 20 20 20 20 57 72 69 74 65 28 4E 75 6D 62 65 Write(Numbe
02BD20: 72 2C 20 27 20 27 2C 44 65 73 63 72 69 70 2C 27 r, ' ',Descrip,'
02BD30: 20 27 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 ');..
02BD40: 20 20 20 20 20 66 6F 72 20 49 20 3A 3D 20 4C 65 for I := Le
02BD50: 6E 67 74 68 28 44 65 73 63 72 69 70 29 20 74 6F ngth(Descrip) to
02BD60: 20 33 30 20 64 6F 20 57 72 69 74 65 28 27 20 27 30 do Write(' '
02BD70: 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 );..
02BD80: 20 20 20 57 72 69 74 65 4C 6E 28 49 6E 53 74 6F WriteLn(InSto
02BD90: 63 6B 3A 35 2C 50 72 69 63 65 3A 38 3A 32 29 3B ck:5,Price:8:2);
02BDA0: 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 65 .. e
02BDB0: 6E 64 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 nd;..
02BDC0: 75 6E 74 69 6C 20 53 6F 72 74 45 4F 53 3B 0D 0A until SortEOS;..
02BDD0: 20 20 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 end;..
02BDE0: 20 65 6E 64 3B 20 7B 63 61 73 65 7D 0D 0A 65 6E end; {case}..en
02BDF0: 64 3B 0D 0A 0D 0A 62 65 67 69 6E 20 7B 70 72 6F d;....begin {pro
02BE00: 70 72 6F 67 72 61 6D 20 53 6F 72 74 45 78 61 6D program SortExam
02BE10: 70 6C 65 54 77 6F 20 7B 20 43 75 73 74 6F 6D 65 pleTwo { Custome
02BE20: 72 20 46 69 6C 65 20 61 6E 64 20 53 74 6F 63 6B r File and Stock
02BE30: 20 46 69 6C 65 20 7D 3B 0D 0A 0D 0A 74 79 70 65 File };....type
02BE40: 0D 0A 20 20 43 75 73 74 52 65 63 20 3D 20 72 65 .. CustRec = re
02BE50: 63 6F 72 64 0D 0A 20 20 20 20 20 20 20 20 20 20 cord..
02BE60: 20 20 20 20 4E 75 6D 62 65 72 3A 20 69 6E 74 65 Number: inte
02BE70: 67 65 72 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 ger;..
02BE80: 20 20 20 20 4E 61 6D 65 3A 20 20 20 73 74 72 69 Name: stri
02BE90: 6E 67 5B 33 30 5D 3B 0D 0A 20 20 20 20 20 20 20 ng[30];..
02BEA0: 20 20 20 20 20 20 20 41 64 64 72 3A 20 20 20 73 Addr: s
02BEB0: 74 72 69 6E 67 5B 32 30 5D 3B 0D 0A 20 20 20 20 tring[20];..
02BEC0: 20 20 20 20 20 20 20 20 20 20 43 69 74 79 3A 20 City:
02BED0: 20 20 73 74 72 69 6E 67 5B 31 32 5D 3B 0D 0A 20 string[12];..
02BEE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 53 74 61 Sta
02BEF0: 74 65 3A 20 20 73 74 72 69 6E 67 5B 33 5D 3B 0D te: string[3];.
02BF00: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5A . Z
02BF10: 69 70 3A 20 20 20 20 73 74 72 69 6E 67 5B 35 5D ip: string[5]
02BF20: 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 20 20 65 ;.. e
02BF30: 6E 64 3B 0D 0A 0D 0A 20 20 49 74 65 6D 52 65 63 nd;.... ItemRec
02BF40: 20 3D 20 72 65 63 6F 72 64 0D 0A 20 20 20 20 20 = record..
02BF50: 20 20 20 20 20 20 20 20 20 4E 75 6D 62 65 72 3A Number:
02BF60: 20 20 69 6E 74 65 67 65 72 3B 0D 0A 20 20 20 20 integer;..
02BF70: 20 20 20 20 20 20 20 20 20 20 44 65 73 63 72 69 Descri
02BF80: 70 3A 20 73 74 72 69 6E 67 5B 33 30 5D 3B 0D 0A p: string[30];..
02BF90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 6E In
02BFA0: 53 74 6F 63 6B 3A 20 69 6E 74 65 67 65 72 3B 0D Stock: integer;.
02BFB0: 0A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 . P
02BFC0: 72 69 63 65 3A 20 20 20 72 65 61 6C 3B 0D 0A 20 rice: real;..
02BFD0: 20 20 20 20 20 20 20 20 20 20 20 65 6E 64 3B 0D end;.
02BFE0: 0A 0D 0A 76 61 72 0D 0A 20 20 43 75 73 74 46 69 ...var.. CustFi
02BFF0: 6C 65 3A 20 20 20 66 69 6C 65 20 6F 66 20 43 75 le: file of Cu
02C000: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
02C010: 25 00 01 00 02 09 52 E5 25 00 41 02 00 00 00 02 %.....R.%.A.....
02C020: 25 00 46 02 00 00 00 02 25 00 42 02 00 00 00 02 %.F.....%.B.....
02C030: 25 00 47 02 00 00 00 02 25 00 43 02 00 00 00 02 %.G.....%.C.....
02C040: 25 00 48 02 00 00 00 02 25 00 44 02 00 00 00 02 %.H.....%.D.....
02C050: 25 00 49 02 00 00 00 02 25 00 45 02 00 00 00 02 %.I.....%.E.....
02C060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C0A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C0B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C0C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C0D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C0E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C0F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02C100: 67 72 61 6D 20 53 6F 72 74 45 78 61 6D 70 6C 65 gram SortExample
02C110: 4F 6E 65 7D 0D 0A 20 20 43 6C 72 53 63 72 3B 0D One}.. ClrScr;.
02C120: 0A 20 20 57 72 69 74 65 28 27 53 6F 72 74 20 43 . Write('Sort C
02C130: 75 73 74 6F 6D 65 72 73 20 6F 72 20 53 74 6F 63 ustomers or Stoc
02C140: 6B 3F 20 28 65 6E 74 65 72 20 43 20 6F 72 20 53 k? (enter C or S
02C150: 29 3A 20 27 29 3B 0D 0A 20 20 72 65 70 65 61 74 ): ');.. repeat
02C160: 0D 0A 20 20 20 20 72 65 61 64 28 4B 62 64 2C 43 .. read(Kbd,C
02C170: 68 6F 69 63 65 29 3B 0D 0A 20 20 20 20 43 68 6F hoice);.. Cho
02C180: 69 63 65 20 3A 3D 20 55 70 43 61 73 65 28 43 68 ice := UpCase(Ch
02C190: 6F 69 63 65 29 3B 0D 0A 20 20 75 6E 74 69 6C 20 oice);.. until
02C1A0: 43 68 6F 69 63 65 20 69 6E 20 5B 27 43 27 2C 27 Choice in ['C','
02C1B0: 53 27 5D 3B 0D 0A 20 20 57 72 69 74 65 4C 6E 28 S'];.. WriteLn(
02C1C0: 43 68 6F 69 63 65 29 3B 0D 0A 20 20 63 61 73 65 Choice);.. case
02C1D0: 20 43 68 6F 69 63 65 20 6F 66 0D 0A 20 20 20 20 Choice of..
02C1E0: 27 43 27 3A 20 62 65 67 69 6E 0D 0A 20 20 20 20 'C': begin..
02C1F0: 20 20 20 20 20 20 20 41 73 73 69 67 6E 28 43 75 Assign(Cu
02C200: 73 74 46 69 6C 65 2C 27 43 55 53 54 4F 4D 45 52 stFile,'CUSTOMER
02C210: 2E 44 54 41 27 29 3B 0D 0A 20 20 20 20 20 20 20 .DTA');..
02C220: 20 20 20 20 52 65 73 65 74 28 43 75 73 74 46 69 Reset(CustFi
02C230: 6C 65 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 le);..
02C240: 20 57 72 69 74 65 4C 6E 28 54 75 72 62 6F 53 6F WriteLn(TurboSo
02C250: 72 74 28 53 69 7A 65 4F 66 28 43 75 73 74 52 65 rt(SizeOf(CustRe
02C260: 63 29 29 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 c)));..
02C270: 65 6E 64 3B 0D 0A 20 20 20 20 27 53 27 3A 20 62 end;.. 'S': b
02C280: 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 egin..
02C290: 20 41 73 73 69 67 6E 28 53 74 6F 63 6B 46 69 6C Assign(StockFil
02C2A0: 65 2C 27 53 54 4F 43 4B 2E 44 54 41 27 29 3B 0D e,'STOCK.DTA');.
02C2B0: 0A 20 20 20 20 20 20 20 20 20 20 20 52 65 73 65 . Rese
02C2C0: 74 28 53 74 6F 63 6B 46 69 6C 65 29 3B 0D 0A 20 t(StockFile);..
02C2D0: 20 20 20 20 20 20 20 20 20 20 57 72 69 74 65 4C WriteL
02C2E0: 6E 28 54 75 72 62 6F 53 6F 72 74 28 53 69 7A 65 n(TurboSort(Size
02C2F0: 4F 66 28 49 74 65 6D 52 65 63 29 29 29 3B 0D 0A Of(ItemRec)));..
02C300: CC CC CC 4C 20 1B 21 0A 53 6D 61 6C 6C 20 66 6F ...L .!.Small fo
02C310: 72 6B 20 77 68 65 65 6C 20 62 61 72 72 6F 77 65 rk wheel barrowe
02C320: 6C 52 4F 44 55 43 0F 00 86 1E 85 EB 51 14 FE 23 lRODUC......Q..#
02C330: 15 53 70 65 63 69 61 6C 20 67 61 72 64 65 6E 20 .Special garden
02C340: 74 72 6F 77 65 6C 6F 77 65 6C 52 4F 44 55 43 22 trowelowelRODUC"
02C350: 00 82 70 3D 0A D7 23 9B 22 19 45 78 74 72 61 20 ..p=..#.".Extra
02C360: 73 6D 61 6C 6C 20 67 61 72 64 65 6E 20 74 72 6F small garden tro
02C370: 77 65 6C 52 4F 44 55 43 30 00 84 14 AE 47 E1 62 welRODUC0....G.b
02C380: 59 0C 12 53 6D 61 6C 6C 20 77 68 65 65 6C 20 62 Y..Small wheel b
02C390: 61 72 72 6F 77 20 74 72 6F 77 65 6C 52 4F 44 55 arrow trowelRODU
02C3A0: 43 48 00 87 85 EB 51 B8 43 C3 21 12 45 78 74 72 CH....Q.C.!.Extr
02C3B0: 61 20 6C 61 72 67 65 20 73 68 6F 76 65 6C 20 74 a large shovel t
02C3C0: 72 6F 77 65 6C 52 4F 44 55 43 43 00 85 D7 A3 70 rowelRODUCC...£p
02C3D0: 3D 0E 0D 0E 11 48 69 67 68 20 73 70 65 65 64 20 =....High speed
02C3E0: 77 65 65 64 65 72 6C 20 74 72 6F 77 65 6C 52 4F weederl trowelRO
02C3F0: 44 55 43 28 00 87 66 66 66 E6 09 BB 1D 11 4D 65 DUC(..fff.....Me
02C400: 64 69 75 6D 20 73 69 7A 65 20 73 70 61 64 65 6C dium size spadel
02C410: 20 74 72 6F 77 65 6C 52 4F 44 55 43 08 00 82 14 trowelRODUC....
02C420: AE 47 E1 3A 5F 0F 11 45 78 74 72 61 20 73 6D 61 .G.:_..Extra sma
02C430: 6C 6C 20 73 70 61 64 65 6C 20 74 72 6F 77 65 6C ll spadel trowel
02C440: 52 4F 44 55 43 1B 00 84 AE 47 E1 7A 30 B3 1F 12 RODUC....G.z0...
02C450: 45 78 74 72 61 20 73 6D 61 6C 6C 20 77 65 65 64 Extra small weed
02C460: 65 72 20 74 72 6F 77 65 6C 52 4F 44 55 43 38 00 er trowelRODUC8.
02C470: 87 70 3D 0A D7 0B 5A 21 0F 53 74 61 6E 64 61 72 .p=...Z!.Standar
02C480: 64 20 73 68 6F 76 65 6C 64 65 72 20 74 72 6F 77 d shovelder trow
02C490: 65 6C 52 4F 44 55 43 28 00 86 7A 14 AE 47 19 D2 elRODUC(..z..G..
02C4A0: 26 12 45 78 74 72 61 20 6C 61 72 67 65 20 77 65 &.Extra large we
02C4B0: 65 64 65 72 20 74 72 6F 77 65 6C 52 4F 44 55 43 eder trowelRODUC
02C4C0: 12 00 86 70 3D 0A D7 12 B0 06 11 45 78 74 72 61 ...p=......Extra
02C4D0: 20 6C 61 72 67 65 20 73 70 61 64 65 72 20 74 72 large spader tr
02C4E0: 6F 77 65 6C 52 4F 44 55 43 57 00 87 14 AE 47 E1 owelRODUCW....G.
02C4F0: 00 F1 0D 0C 53 70 65 63 69 61 6C 20 72 61 6B 65 ....Special rake
02C500: 20 20 20 20 20 20 20 20 20 65 6E 64 3B 0D 0A 20 end;..
02C510: 20 65 6E 64 3B 20 7B 63 61 73 65 7D 0D 0A 65 6E end; {case}..en
02C520: 64 2E 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A d...............
02C530: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02C540: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02C550: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02C560: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02C570: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02C580: 69 63 65 20 3A 3D 20 55 70 43 61 73 65 28 43 68 ice := UpCase(Ch
02C590: 6F 69 63 65 29 3B 0D 0A 20 20 75 6E 74 69 6C 20 oice);.. until
02C5A0: 43 68 6F 69 63 65 20 69 6E 20 5B 27 43 27 2C 27 Choice in ['C','
02C5B0: 53 27 5D 3B 0D 0A 20 20 57 72 69 74 65 4C 6E 28 S'];.. WriteLn(
02C5C0: 43 68 6F 69 63 65 29 3B 0D 0A 20 20 63 61 73 65 Choice);.. case
02C5D0: 20 43 68 6F 69 63 65 20 6F 66 0D 0A 20 20 20 20 Choice of..
02C5E0: 27 43 27 3A 20 62 65 67 69 6E 0D 0A 20 20 20 20 'C': begin..
02C5F0: 20 20 20 20 20 20 20 41 73 73 69 67 6E 28 43 75 Assign(Cu
02C600: 73 74 46 69 6C 65 2C 27 43 55 53 54 4F 4D 45 52 stFile,'CUSTOMER
02C610: 2E 44 54 41 27 29 3B 0D 0A 20 20 20 20 20 20 20 .DTA');..
02C620: 20 20 20 20 52 65 73 65 74 28 43 75 73 74 46 69 Reset(CustFi
02C630: 6C 65 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 20 le);..
02C640: 20 57 72 69 74 65 4C 6E 28 54 75 72 62 6F 53 6F WriteLn(TurboSo
02C650: 72 74 28 53 69 7A 65 4F 66 28 43 75 73 74 52 65 rt(SizeOf(CustRe
02C660: 63 29 29 29 3B 0D 0A 20 20 20 20 20 20 20 20 20 c)));..
02C670: 65 6E 64 3B 0D 0A 20 20 20 20 27 53 27 3A 20 62 end;.. 'S': b
02C680: 65 67 69 6E 0D 0A 20 20 20 20 20 20 20 20 20 20 egin..
02C690: 20 41 73 73 69 67 6E 28 53 74 6F 63 6B 46 69 6C Assign(StockFil
02C6A0: 65 2C 27 53 54 4F 43 4B 2E 44 54 41 27 29 3B 0D e,'STOCK.DTA');.
02C6B0: 0A 20 20 20 20 20 20 20 20 20 20 20 52 65 73 65 . Rese
02C6C0: 74 28 53 74 6F 63 6B 46 69 6C 65 29 3B 0D 0A 20 t(StockFile);..
02C6D0: 20 20 20 20 20 20 20 20 20 20 57 72 69 74 65 4C WriteL
02C6E0: 6E 28 54 75 72 62 6F 53 6F 72 74 28 53 69 7A 65 n(TurboSort(Size
02C6F0: 4F 66 28 49 74 65 6D 52 65 63 29 29 29 3B 0D 0A Of(ItemRec)));..
02C700: 73 70 61 64 65 72 20 74 72 6F 77 65 6C 52 4F 44 spader trowelROD
02C710: 55 43 0F 00 83 C2 F5 28 5C 4F 4E 1A 16 4D 65 64 UC.....(\ON..Med
02C720: 69 75 6D 20 73 69 7A 65 20 6C 61 77 6E 20 6D 6F ium size lawn mo
02C730: 76 65 72 77 65 6C 52 4F 44 55 43 44 00 85 1E 85 verwelRODUCD....
02C740: EB 51 2C D6 1B 0C 53 70 65 63 69 61 6C 20 72 61 .Q,...Special ra
02C750: 6B 65 6C 61 77 6E 20 6D 6F 76 65 72 77 65 6C 52 kelawn moverwelR
02C760: 4F 44 55 43 11 00 87 47 E1 7A 94 0B 58 10 0E 4D ODUC...G.z..X..M
02C770: 69 6E 69 61 74 75 72 65 20 72 61 6B 65 77 6E 20 iniature rakewn
02C780: 6D 6F 76 65 72 77 65 6C 52 4F 44 55 43 38 00 84 moverwelRODUC8..
02C790: 28 5C 8F C2 7D EF 26 0C 53 6D 61 6C 6C 20 77 65 (\..}.&.Small we
02C7A0: 65 64 65 72 6B 65 77 6E 20 6D 6F 76 65 72 77 65 ederkewn moverwe
02C7B0: 6C 52 4F 44 55 43 5E 00 84 CC CC CC CC 2C 55 26 lRODUC^......,U&
02C7C0: 10 45 78 74 72 61 20 73 6D 61 6C 6C 20 72 61 6B .Extra small rak
02C7D0: 65 20 6D 6F 76 65 72 77 65 6C 52 4F 44 55 43 3A e moverwelRODUC:
02C7E0: 00 86 CC CC CC CC 49 B0 06 0A 53 6D 61 6C 6C 20 ......I...Small
02C7F0: 66 6F 72 6B 6C 20 72 61 6B 65 20 6D 6F 76 65 72 forkl rake mover
02C800: 77 65 6C 52 4F 44 55 43 19 00 85 85 EB 51 B8 6E welRODUC.....Q.n
02C810: 01 16 13 45 78 74 72 61 20 6C 61 72 67 65 20 74 ...Extra large t
02C820: 72 61 63 74 6F 72 76 65 72 77 65 6C 52 4F 44 55 ractorverwelRODU
02C830: 43 36 00 84 D7 A3 70 3D 12 9C 14 11 4D 69 6E 69 C6...£p=....Mini
02C840: 61 74 75 72 65 20 74 72 61 63 74 6F 72 6F 72 76 ature tractororv
02C850: 65 72 77 65 6C 52 4F 44 55 43 06 00 87 E1 7A 14 erwelRODUC....z.
02C860: AE 20 1C 13 18 4D 65 64 69 75 6D 20 73 69 7A 65 . ...Medium size
02C870: 20 77 68 65 65 6C 20 62 61 72 72 6F 77 6C 52 4F wheel barrowlRO
02C880: 44 55 43 04 00 86 5C 8F C2 F5 79 58 05 13 45 78 DUC...\...yX..Ex
02C890: 74 72 61 20 6C 61 72 67 65 20 74 72 61 63 74 6F tra large tracto
02C8A0: 72 61 72 72 6F 77 6C 52 4F 44 55 43 32 00 82 0A rarrowlRODUC2...
02C8B0: D7 A3 70 1D C7 21 19 45 78 74 72 61 20 73 6D 61 .£p..!.Extra sma
02C8C0: 6C 6C 20 67 61 72 64 65 6E 20 74 72 6F 77 65 6C ll garden trowel
02C8D0: 52 4F 44 55 43 5D 00 85 99 99 99 99 2D 34 1D 0F RODUC]......-4..
02C8E0: 48 69 67 68 20 73 70 65 65 64 20 72 61 6B 65 64 High speed raked
02C8F0: 65 6E 20 74 72 6F 77 65 6C 52 4F 44 55 43 2B 00 en trowelRODUC+.
02C900: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C910: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C920: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C930: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C940: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C950: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C960: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C970: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C980: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C990: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C9A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C9B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C9C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C9D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C9E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02C9F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CA90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CAA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CAB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CAC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CAD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CAE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CAF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02CB00: 86 CC CC CC CC 50 FB 13 15 53 70 65 63 69 61 6C .....P...Special
02CB10: 20 67 61 72 64 65 6E 20 74 72 6F 77 65 6C 6F 77 garden trowelow
02CB20: 65 6C 52 4F 44 55 43 2C 00 86 E1 7A 14 AE 74 9E elRODUC,...z..t.
02CB30: 0D 0D 53 70 65 63 69 61 6C 20 73 70 61 64 65 6E ..Special spaden
02CB40: 20 74 72 6F 77 65 6C 6F 77 65 6C 52 4F 44 55 43 trowelowelRODUC
02CB50: 43 00 83 C2 F5 28 5C 37 AA 09 17 4D 69 6E 69 61 C....(\7...Minia
02CB60: 74 75 72 65 20 67 61 72 64 65 6E 20 74 72 6F 77 ture garden trow
02CB70: 65 6C 65 6C 52 4F 44 55 43 09 00 84 1E 85 EB 51 elelRODUC......Q
02CB80: 44 B6 0A 10 45 78 74 72 61 20 6C 61 72 67 65 20 D...Extra large
02CB90: 66 6F 72 6B 20 74 72 6F 77 65 6C 65 6C 52 4F 44 fork trowelelROD
02CBA0: 55 43 3A 00 86 99 99 99 99 49 FB 17 0D 53 74 61 UC:......I...Sta
02CBB0: 6E 64 61 72 64 20 72 61 6B 65 6F 72 6B 20 74 72 ndard rakeork tr
02CBC0: 6F 77 65 6C 65 6C 52 4F 44 55 43 51 00 86 F5 28 owelelRODUCQ...(
02CBD0: 5C 8F 75 40 0D 12 53 6D 61 6C 6C 20 77 68 65 65 \.u@..Small whee
02CBE0: 6C 20 62 61 72 72 6F 77 72 6F 77 65 6C 65 6C 52 l barrowrowelelR
02CBF0: 4F 44 55 43 12 00 85 F5 28 5C 8F 0C FB 26 11 4D ODUC....(\...&.M
02CC00: 69 6E 69 61 74 75 72 65 20 74 72 61 63 74 6F 72 iniature tractor
02CC10: 77 72 6F 77 65 6C 65 6C 52 4F 44 55 43 06 00 85 wrowelelRODUC...
02CC20: 5C 8F C2 F5 62 9D 20 11 45 78 74 72 61 20 73 6D \...b. .Extra sm
02CC30: 61 6C 6C 20 73 70 61 64 65 77 72 6F 77 65 6C 65 all spadewrowele
02CC40: 6C 52 4F 44 55 43 21 00 86 A3 70 3D 0A 0B 1D 16 lRODUC!..£p=....
02CC50: 0F 48 69 67 68 20 73 70 65 65 64 20 66 6F 72 6B .High speed fork
02CC60: 64 65 77 72 6F 77 65 6C 65 6C 52 4F 44 55 43 42 dewrowelelRODUCB
02CC70: 00 86 C2 F5 28 5C 79 92 21 10 53 74 61 6E 64 61 ....(\y.!.Standa
02CC80: 72 64 20 74 72 61 63 74 6F 72 65 77 72 6F 77 65 rd tractorewrowe
02CC90: 6C 65 6C 52 4F 44 55 43 2A 00 84 33 33 33 33 4B lelRODUC*..3333K
02CCA0: 51 1B 0A 53 6D 61 6C 6C 20 72 61 6B 65 72 61 63 Q..Small rakerac
02CCB0: 74 6F 72 65 77 72 6F 77 65 6C 65 6C 52 4F 44 55 torewrowelelRODU
02CCC0: 43 40 00 87 AE 47 E1 FA 34 2D 14 11 48 69 67 68 C@...G..4-..High
02CCD0: 20 73 70 65 65 64 20 73 68 6F 76 65 6C 77 72 6F speed shovelwro
02CCE0: 77 65 6C 65 6C 52 4F 44 55 43 61 00 86 5C 8F C2 welelRODUCa..\..
02CCF0: F5 3A DB 1F 19 45 78 74 72 61 20 73 6D 61 6C 6C .:...Extra small
02CD00: 64 00 29 00 4A 18 18 45 78 74 72 61 20 6C 61 72 d.).J..Extra lar
02CD10: 67 65 20 77 68 65 65 6C 20 62 61 72 72 6F 77 54 ge wheel barrowT
02CD20: 52 4F 44 55 43 47 00 87 E1 7A 14 AE 0B 8D 09 13 RODUCG...z......
02CD30: 45 78 74 72 61 20 6C 61 72 67 65 20 74 72 61 63 Extra large trac
02CD40: 74 6F 72 61 72 72 6F 77 54 52 4F 44 55 43 12 00 torarrowTRODUC..
02CD50: 85 66 66 66 66 16 E7 10 0B 53 6D 61 6C 6C 20 73 .ffff....Small s
02CD60: 70 61 64 65 20 74 72 61 63 74 6F 72 61 72 72 6F pade tractorarro
02CD70: 77 54 52 4F 44 55 43 38 00 87 99 99 99 99 00 4D wTRODUC8.......M
02CD80: 22 0B 4C 61 72 67 65 20 73 70 61 64 65 20 74 72 ".Large spade tr
02CD90: 61 63 74 6F 72 61 72 72 6F 77 54 52 4F 44 55 43 actorarrowTRODUC
02CDA0: 50 00 87 14 AE 47 61 34 8B 0B 18 45 78 74 72 61 P....Ga4...Extra
02CDB0: 20 6C 61 72 67 65 20 77 68 65 65 6C 20 62 61 72 large wheel bar
02CDC0: 72 6F 77 54 52 4F 44 55 43 1F 00 87 D7 A3 70 3D rowTRODUC....£p=
02CDD0: 39 B2 0A 12 45 78 74 72 61 20 6C 61 72 67 65 20 9...Extra large
02CDE0: 77 65 65 64 65 72 62 61 72 72 6F 77 54 52 4F 44 weederbarrowTROD
02CDF0: 55 43 1C 00 83 99 99 99 99 11 E8 14 18 45 78 74 UC...........Ext
02CE00: 72 61 20 73 6D 61 6C 6C 20 77 68 65 65 6C 20 62 ra small wheel b
02CE10: 61 72 72 6F 77 54 52 4F 44 55 43 14 00 83 B8 1E arrowTRODUC.....
02CE20: 85 EB 11 D1 1E 16 45 78 74 72 61 20 6C 61 72 67 ......Extra larg
02CE30: 65 20 6C 61 77 6E 20 6D 6F 76 65 72 6F 77 54 52 e lawn moverowTR
02CE40: 4F 44 55 43 3B 00 86 B8 1E 85 EB 18 56 05 0C 4C ODUC;.......V..L
02CE50: 61 72 67 65 20 73 68 6F 76 65 6C 6C 61 77 6E 20 arge shovellawn
02CE60: 6D 6F 76 65 72 6F 77 54 52 4F 44 55 43 10 00 86 moverowTRODUC...
02CE70: 51 B8 1E 85 47 5E 1D 10 53 74 61 6E 64 61 72 64 Q...G^..Standard
02CE80: 20 74 72 61 63 74 6F 72 20 6D 6F 76 65 72 6F 77 tractor moverow
02CE90: 54 52 4F 44 55 43 18 00 83 A3 70 3D 0A 57 57 22 TRODUC...£p=.WW"
02CEA0: 16 45 78 74 72 61 20 6C 61 72 67 65 20 6C 61 77 .Extra large law
02CEB0: 6E 20 6D 6F 76 65 72 6F 77 54 52 4F 44 55 43 36 n moverowTRODUC6
02CEC0: 00 80 5C 8F C2 F5 68 D2 0C 0E 4D 69 6E 69 61 74 ..\...h...Miniat
02CED0: 75 72 65 20 72 61 6B 65 77 6E 20 6D 6F 76 65 72 ure rakewn mover
02CEE0: 6F 77 54 52 4F 44 55 43 43 00 84 D7 A3 70 3D 3A owTRODUCC...£p=:
02CEF0: CD 0D 19 45 78 74 72 61 20 73 6D 61 6C 6C 20 67 ...Extra small g
02CF00: 20 67 61 72 64 65 6E 20 74 72 6F 77 65 6C 52 4F garden trowelRO
02CF10: 44 55 43 1D 00 82 66 66 66 66 06 24 1F 0A 53 6D DUC...ffff.$..Sm
02CF20: 61 6C 6C 20 72 61 6B 65 6C 20 67 61 72 64 65 6E all rakel garden
02CF30: 20 74 72 6F 77 65 6C 52 4F 44 55 43 27 00 86 AE trowelRODUC'...
02CF40: 47 E1 7A 1C 54 19 18 45 78 74 72 61 20 6C 61 72 G.z.T..Extra lar
02CF50: 67 65 20 77 68 65 65 6C 20 62 61 72 72 6F 77 6C ge wheel barrowl
02CF60: 52 4F 44 55 43 33 00 87 85 EB 51 38 35 1C 21 16 RODUC3....Q85.!.
02CF70: 4D 69 6E 69 61 74 75 72 65 20 77 68 65 65 6C 20 Miniature wheel
02CF80: 62 61 72 72 6F 77 6F 77 6C 52 4F 44 55 43 36 00 barrowowlRODUC6.
02CF90: 86 F5 28 5C 8F 13 6A 12 0C 53 6D 61 6C 6C 20 73 ..(\..j..Small s
02CFA0: 68 6F 76 65 6C 65 65 6C 20 62 61 72 72 6F 77 6F hoveleel barrowo
02CFB0: 77 6C 52 4F 44 55 43 58 00 87 00 00 00 80 35 55 wlRODUCX......5U
02CFC0: 20 0C 4C 61 72 67 65 20 77 65 65 64 65 72 65 65 .Large weederee
02CFD0: 6C 20 62 61 72 72 6F 77 6F 77 6C 52 4F 44 55 43 l barrowowlRODUC
02CFE0: 50 00 85 E1 7A 14 AE 1D 45 0E 12 53 70 65 63 69 P...z...E..Speci
02CFF0: 61 6C 20 6C 61 77 6E 20 6D 6F 76 65 72 72 72 6F al lawn moverrro
02D000: 77 6F 77 6C 52 4F 44 55 43 53 00 83 0A D7 A3 70 wowlRODUCS....£p
02D010: 0D 83 18 10 53 6D 61 6C 6C 20 6C 61 77 6E 20 6D ....Small lawn m
02D020: 6F 76 65 72 65 72 72 72 6F 77 6F 77 6C 52 4F 44 overerrrowowlROD
02D030: 55 43 39 00 87 85 EB 51 B8 42 6B 07 12 48 69 67 UC9....Q.Bk..Hig
02D040: 68 20 73 70 65 65 64 20 74 72 61 63 74 6F 72 72 h speed tractorr
02D050: 72 6F 77 6F 77 6C 52 4F 44 55 43 3D 00 87 EB 51 rowowlRODUC=...Q
02D060: B8 1E 0B 95 25 19 45 78 74 72 61 20 73 6D 61 6C ....%.Extra smal
02D070: 6C 20 67 61 72 64 65 6E 20 74 72 6F 77 65 6C 52 l garden trowelR
02D080: 4F 44 55 43 47 00 87 D7 A3 70 BD 09 81 06 15 48 ODUCG...£p.....H
02D090: 69 67 68 20 73 70 65 65 64 20 6C 61 77 6E 20 6D igh speed lawn m
02D0A0: 6F 76 65 72 6F 77 65 6C 52 4F 44 55 43 48 00 81 overowelRODUCH..
02D0B0: 1E 85 EB 51 58 CE 1B 19 45 78 74 72 61 20 73 6D ...QX...Extra sm
02D0C0: 61 6C 6C 20 67 61 72 64 65 6E 20 74 72 6F 77 65 all garden trowe
02D0D0: 6C 52 4F 44 55 43 14 00 83 47 E1 7A 14 76 CF 24 lRODUC...G.z.v.$
02D0E0: 19 45 78 74 72 61 20 73 6D 61 6C 6C 20 67 61 72 .Extra small gar
02D0F0: 64 65 6E 20 74 72 6F 77 65 6C 52 4F 44 55 43 4E den trowelRODUCN
02D100: 61 72 64 65 6E 20 74 72 6F 77 65 6C 52 4F 44 55 arden trowelRODU
02D110: 43 1A 00 87 A3 70 3D 8A 24 19 21 11 4D 69 6E 69 C...£p=.$.!.Mini
02D120: 61 74 75 72 65 20 74 72 61 63 74 6F 72 6E 20 74 ature tractorn t
02D130: 72 6F 77 65 6C 52 4F 44 55 43 38 00 84 E1 7A 14 rowelRODUC8...z.
02D140: AE 0F 5B 09 16 53 74 61 6E 64 61 72 64 20 67 61 ..[..Standard ga
02D150: 72 64 65 6E 20 74 72 6F 77 65 6C 77 65 6C 52 4F rden trowelwelRO
02D160: 44 55 43 4C 00 84 47 E1 7A 14 06 00 06 13 45 78 DUCL..G.z.....Ex
02D170: 74 72 61 20 73 6D 61 6C 6C 20 74 72 61 63 74 6F tra small tracto
02D180: 72 77 65 6C 77 65 6C 52 4F 44 55 43 63 00 87 C2 rwelwelRODUCc...
02D190: F5 28 5C 40 87 08 16 45 78 74 72 61 20 73 6D 61 .(\@...Extra sma
02D1A0: 6C 6C 20 6C 61 77 6E 20 6D 6F 76 65 72 77 65 6C ll lawn moverwel
02D1B0: 52 4F 44 55 43 45 00 86 99 99 99 99 0D EF 17 12 RODUCE..........
02D1C0: 4D 65 64 69 75 6D 20 73 69 7A 65 20 73 68 6F 76 Medium size shov
02D1D0: 65 6C 6F 76 65 72 77 65 6C 52 4F 44 55 43 19 00 eloverwelRODUC..
02D1E0: 86 00 00 00 00 1C 34 0F 11 4D 69 6E 69 61 74 75 ......4..Miniatu
02D1F0: 72 65 20 74 72 61 63 74 6F 72 6C 6F 76 65 72 77 re tractorloverw
02D200: 65 6C 52 4F 44 55 43 60 00 86 33 33 33 33 76 8D elRODUC`..3333v.
02D210: 05 16 45 78 74 72 61 20 73 6D 61 6C 6C 20 6C 61 ..Extra small la
02D220: 77 6E 20 6D 6F 76 65 72 77 65 6C 52 4F 44 55 43 wn moverwelRODUC
02D230: 2D 00 86 00 00 00 00 29 A8 09 0B 4C 61 72 67 65 -......)...Large
02D240: 20 73 70 61 64 65 20 6C 61 77 6E 20 6D 6F 76 65 spade lawn move
02D250: 72 77 65 6C 52 4F 44 55 43 11 00 87 28 5C 8F 42 rwelRODUC...(\.B
02D260: 28 63 0E 11 45 78 74 72 61 20 73 6D 61 6C 6C 20 (c..Extra small
02D270: 73 70 61 64 65 6D 6F 76 65 72 77 65 6C 52 4F 44 spademoverwelROD
02D280: 55 43 2F 00 87 D7 A3 70 3D 3A 26 17 10 4D 69 6E UC/...£p=:&..Min
02D290: 69 61 74 75 72 65 20 77 65 65 64 65 72 65 6D 6F iature weederemo
02D2A0: 76 65 72 77 65 6C 52 4F 44 55 43 34 00 86 5C 8F verwelRODUC4..\.
02D2B0: C2 F5 49 AD 1D 12 45 78 74 72 61 20 73 6D 61 6C ..I...Extra smal
02D2C0: 6C 20 73 68 6F 76 65 6C 6F 76 65 72 77 65 6C 52 l shoveloverwelR
02D2D0: 4F 44 55 43 04 00 86 66 66 66 66 27 69 18 17 48 ODUC...ffff'i..H
02D2E0: 69 67 68 20 73 70 65 65 64 20 77 68 65 65 6C 20 igh speed wheel
02D2F0: 62 61 72 72 6F 77 65 6C 52 4F 44 55 43 26 00 87 barrowelRODUC&..
02D300: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
02D310: 26 00 01 00 02 09 52 E5 26 00 41 02 00 00 00 02 &.....R.&.A.....
02D320: 26 00 46 02 00 00 00 02 26 00 42 02 00 00 00 02 &.F.....&.B.....
02D330: 26 00 47 02 00 00 00 02 26 00 43 02 00 00 00 02 &.G.....&.C.....
02D340: 26 00 48 02 00 00 00 02 26 00 44 02 00 00 00 02 &.H.....&.D.....
02D350: 26 00 49 02 00 00 00 02 26 00 45 02 00 00 00 02 &.I.....&.E.....
02D360: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D370: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D380: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D390: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D3A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D3B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D3C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D3D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D3E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D3F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02D400: 00 85 70 3D 0A D7 71 07 25 13 53 6D 61 6C 6C 20 ..p=..q.%.Small
02D410: 67 61 72 64 65 6E 20 74 72 6F 77 65 6C 74 72 6F garden troweltro
02D420: 77 65 6C 52 4F 44 55 43 13 00 86 F5 28 5C 8F 06 welRODUC....(\..
02D430: 8B 07 12 45 78 74 72 61 20 6C 61 72 67 65 20 77 ...Extra large w
02D440: 65 65 64 65 72 6C 74 72 6F 77 65 6C 52 4F 44 55 eederltrowelRODU
02D450: 43 0A 00 87 85 EB 51 B8 0E B7 15 12 53 6D 61 6C C.....Q.....Smal
02D460: 6C 20 77 68 65 65 6C 20 62 61 72 72 6F 77 6C 74 l wheel barrowlt
02D470: 72 6F 77 65 6C 52 4F 44 55 43 00 00 85 B8 1E 85 rowelRODUC......
02D480: EB 15 BB 04 0D 53 6D 61 6C 6C 20 74 72 61 63 74 .....Small tract
02D490: 6F 72 61 72 72 6F 77 6C 74 72 6F 77 65 6C 52 4F orarrowltrowelRO
02D4A0: 44 55 43 11 00 87 33 33 33 B3 2C 32 0B 17 4D 69 DUC...333.,2..Mi
02D4B0: 6E 69 61 74 75 72 65 20 67 61 72 64 65 6E 20 74 niature garden t
02D4C0: 72 6F 77 65 6C 65 6C 52 4F 44 55 43 24 00 85 00 rowelelRODUC$...
02D4D0: 00 00 00 14 9C 0C 14 53 70 65 63 69 61 6C 20 77 .......Special w
02D4E0: 68 65 65 6C 20 62 61 72 72 6F 77 77 65 6C 65 6C heel barrowwelel
02D4F0: 52 4F 44 55 43 25 00 85 5C 8F C2 F5 08 1E 21 0C RODUC%..\.....!.
02D500: 4C 61 72 67 65 20 73 68 6F 76 65 6C 6C 20 62 61 Large shovell ba
02D510: 72 72 6F 77 77 65 6C 65 6C 52 4F 44 55 43 51 00 rrowwelelRODUCQ.
02D520: 86 28 5C 8F C2 3A 70 1A 10 4D 65 64 69 75 6D 20 .(\..:p..Medium
02D530: 73 69 7A 65 20 66 6F 72 6B 72 72 6F 77 77 65 6C size forkrrowwel
02D540: 65 6C 52 4F 44 55 43 28 00 85 14 AE 47 E1 5A 41 elRODUC(....G.ZA
02D550: 1A 13 53 74 61 6E 64 61 72 64 20 6C 61 77 6E 20 ..Standard lawn
02D560: 6D 6F 76 65 72 77 77 65 6C 65 6C 52 4F 44 55 43 moverwwelelRODUC
02D570: 01 00 84 00 00 00 00 04 A6 0C 0D 53 74 61 6E 64 ...........Stand
02D580: 61 72 64 20 66 6F 72 6B 20 6D 6F 76 65 72 77 77 ard fork moverww
02D590: 65 6C 65 6C 52 4F 44 55 43 2D 00 84 A3 70 3D 0A elelRODUC-..£p=.
02D5A0: 3F 28 16 13 45 78 74 72 61 20 6C 61 72 67 65 20 ?(..Extra large
02D5B0: 74 72 61 63 74 6F 72 77 77 65 6C 65 6C 52 4F 44 tractorwwelelROD
02D5C0: 55 43 1C 00 82 CC CC CC CC 4C 85 18 10 4D 65 64 UC.......L...Med
02D5D0: 69 75 6D 20 73 69 7A 65 20 66 6F 72 6B 74 6F 72 ium size forktor
02D5E0: 77 77 65 6C 65 6C 52 4F 44 55 43 4D 00 85 3D 0A wwelelRODUCM..=.
02D5F0: D7 A3 2C 3A 0A 14 53 70 65 63 69 61 6C 20 77 68 .£,:..Special wh
02D600: 52 45 53 54 4F 52 45 40 53 41 56 45 4D 45 4D 00 RESTORE@SAVEMEM.
02D610: 43 4F 4D 4D 41 4E 44 24 A0 43 4F 4E 43 48 41 52 COMMAND$.CONCHAR
02D620: 25 A2 43 4F 4E 53 54 41 54 25 A1 4C 50 52 49 4E %.CONSTAT%.LPRIN
02D630: 54 45 52 47 52 41 4E 44 4F 4D 49 5A 45 44 49 4E TERGRANDOMIZEDIN
02D640: 49 54 49 41 4C 49 5A 45 45 00 00 45 01 63 01 87 ITIALIZEE..E.c..
02D650: 01 FB 01 78 02 C0 02 F8 02 10 03 34 03 3E 03 00 ...x.......4.>..
02D660: 0F 0C 1D 19 0C 08 03 04 01 01 44 49 53 4B 20 45 ..........DISK E
02D670: 52 52 4F 52 20 24 42 41 53 58 52 45 46 30 36 3A RROR $BASXREF06:
02D680: 20 4E 4F 20 53 4F 55 52 43 45 20 46 49 4C 45 3A NO SOURCE FILE:
02D690: 20 24 2E 42 41 53 24 58 52 45 46 30 37 3A 20 49 $.BAS$XREF07: I
02D6A0: 4E 56 41 4C 49 44 20 50 41 47 45 20 4C 45 4E 47 NVALID PAGE LENG
02D6B0: 54 48 58 52 45 46 30 35 3A 20 49 4E 43 4C 55 44 THXREF05: INCLUD
02D6C0: 45 20 4E 45 53 54 49 4E 47 20 54 4F 20 44 45 45 E NESTING TO DEE
02D6D0: 50 20 4E 45 41 52 20 4C 49 4E 45 24 58 52 45 46 P NEAR LINE$XREF
02D6E0: 30 33 3A 20 4F 55 54 20 4F 46 20 4D 45 4D 4F 52 03: OUT OF MEMOR
02D6F0: 59 58 52 45 46 30 31 3A 20 4F 55 54 20 4F 46 20 YXREF01: OUT OF
02D700: 4D 45 4D 4F 52 59 24 58 52 45 46 30 34 3A 20 54 MEMORY$XREF04: T
02D710: 4F 20 4D 41 4E 59 20 46 55 4E 43 54 49 4F 4E 53 O MANY FUNCTIONS
02D720: 58 52 45 46 30 32 3A 20 4F 55 54 20 4F 46 20 4D XREF02: OUT OF M
02D730: 45 4D 4F 52 59 20 24 50 41 47 45 20 4E 4F 24 20 EMORY $PAGE NO$
02D740: 20 20 20 20 20 20 20 20 4E 41 4D 45 20 20 20 20 NAME
02D750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
02D760: 20 20 20 54 59 50 45 24 2E 42 41 53 50 41 52 41 TYPE$.BASPARA
02D770: 4D 45 54 45 52 20 24 20 46 55 4E 43 54 49 4F 4E METER $ FUNCTION
02D780: 20 24 20 20 47 4C 4F 42 41 4C 20 20 24 58 52 45 $ GLOBAL $XRE
02D790: 46 20 56 32 2E 30 38 0D 0A 24 24 24 24 24 24 24 F V2.08..$$$$$$$
02D7A0: 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 24 $$$$$$$$$$$$$$$$
02D7B0: 24 24 24 24 24 24 24 24 24 24 24 24 43 4F 50 59 $$$$$$$$$$$$COPY
02D7C0: 52 49 47 48 54 20 31 39 38 31 20 43 4F 4D 50 49 RIGHT 1981 COMPI
02D7D0: 4C 45 52 20 53 59 53 54 45 4D 53 20 49 4E 43 2E LER SYSTEMS INC.
02D7E0: 24 31 72 19 01 8D 04 CD 0A 06 01 BC 04 CD 0A 06 $1r.............
02D7F0: CD 93 0F CD F9 08 CD F5 06 CD BF 12 CD 14 14 CD ................
02D800: 65 65 6C 20 62 61 72 72 6F 77 77 65 6C 65 6C 52 eel barrowwelelR
02D810: 4F 44 55 43 0C 00 86 A3 70 3D 0A 20 3D 05 13 53 ODUC...£p=. =..S
02D820: 74 61 6E 64 61 72 64 20 6C 61 77 6E 20 6D 6F 76 tandard lawn mov
02D830: 65 72 77 77 65 6C 65 6C 52 4F 44 55 43 26 00 86 erwwelelRODUC&..
02D840: 7A 14 AE 47 0D 7E 24 15 53 70 65 63 69 61 6C 20 z..G.~$.Special
02D850: 67 61 72 64 65 6E 20 74 72 6F 77 65 6C 65 6C 65 garden trowelele
02D860: 6C 52 4F 44 55 43 43 00 85 D7 A3 70 3D 74 CB 12 lRODUCC...£p=t..
02D870: 0F 53 74 61 6E 64 61 72 64 20 77 65 65 64 65 72 .Standard weeder
02D880: 74 72 6F 77 65 6C 65 6C 65 6C 52 4F 44 55 43 3A trowelelelRODUC:
02D890: 00 87 B8 1E 85 EB 33 5B 0C 0F 4D 69 6E 69 61 74 ......3[..Miniat
02D8A0: 75 72 65 20 73 70 61 64 65 74 72 6F 77 65 6C 65 ure spadetrowele
02D8B0: 6C 65 6C 52 4F 44 55 43 60 00 86 D7 A3 70 3D 5C lelRODUC`...£p=\
02D8C0: 71 25 12 4D 65 64 69 75 6D 20 73 69 7A 65 20 73 q%.Medium size s
02D8D0: 68 6F 76 65 6C 77 65 6C 65 6C 65 6C 52 4F 44 55 hovelwelelelRODU
02D8E0: 43 30 00 87 85 EB 51 38 06 BF 22 10 45 78 74 72 C0....Q8..".Extr
02D8F0: 61 20 73 6D 61 6C 6C 20 66 6F 72 6B 65 6C 77 65 a small forkelwe
02D900: 6C 65 6C 65 6C 52 4F 44 55 43 3B 00 86 66 66 66 lelelRODUC;..fff
02D910: 66 48 D5 06 13 4D 65 64 69 75 6D 20 73 69 7A 65 fH...Medium size
02D920: 20 74 72 61 63 74 6F 72 65 6C 65 6C 65 6C 52 4F tractorelelelRO
02D930: 44 55 43 25 00 85 1E 85 EB 51 20 01 1E 18 45 78 DUC%.....Q ...Ex
02D940: 74 72 61 20 73 6D 61 6C 6C 20 77 68 65 65 6C 20 tra small wheel
02D950: 62 61 72 72 6F 77 6C 52 4F 44 55 43 09 00 86 70 barrowlRODUC...p
02D960: 3D 0A D7 3F 07 23 16 45 78 74 72 61 20 6C 61 72 =..?.#.Extra lar
02D970: 67 65 20 6C 61 77 6E 20 6D 6F 76 65 72 6F 77 6C ge lawn moverowl
02D980: 52 4F 44 55 43 5B 00 85 99 99 99 99 7F 69 0F 16 RODUC[.......i..
02D990: 45 78 74 72 61 20 6C 61 72 67 65 20 6C 61 77 6E Extra large lawn
02D9A0: 20 6D 6F 76 65 72 6F 77 6C 52 4F 44 55 43 28 00 moverowlRODUC(.
02D9B0: 87 EB 51 B8 9E 11 D6 1E 12 45 78 74 72 61 20 6C ..Q......Extra l
02D9C0: 61 72 67 65 20 73 68 6F 76 65 6C 6F 76 65 72 6F arge shovelovero
02D9D0: 77 6C 52 4F 44 55 43 20 00 86 28 5C 8F C2 5A 5A wlRODUC ..(\..ZZ
02D9E0: 26 10 45 78 74 72 61 20 6C 61 72 67 65 20 72 61 &.Extra large ra
02D9F0: 6B 65 65 6C 6F 76 65 72 6F 77 6C 52 4F 44 55 43 keeloverowlRODUC
02DA00: 69 16 CD 5E 07 CD DD 06 CD 0B 01 FB 76 21 8E 1B i..^........v!..
02DA10: 73 2B 70 2B 71 2B D1 C1 70 2B 71 D5 3A 8E 1B 3D s+p+q+..p+q.:..=
02DA20: 32 8E 1B FE FF CA 43 05 2A 8A 1B E5 2A 8C 1B C1 2.....C.*...*...
02DA30: 0A 77 2A 8A 1B 23 22 8A 1B 2A 8C 1B 23 22 8C 1B .w*..#"..*..#"..
02DA40: C3 1C 05 C9 21 92 1B 73 2B 71 2B D1 C1 70 2B 71 ....!..s+q+..p+q
02DA50: D5 3A 92 1B 3D 32 92 1B FE FF CA 6E 05 2A 8F 1B .:..=2.....n.*..
02DA60: 3A 91 1B 77 2A 8F 1B 23 22 8F 1B C3 51 05 C9 11 :..w*..#"...Q...
02DA70: DF 1A 0E 1A CD 03 01 11 63 1B 0E 15 CD 03 01 21 ........c......!
02DA80: 5F 1B 36 00 C9 21 93 1B 71 2A 5F 1B 26 00 01 DF _.6..!..q*_.&...
02DA90: 1A 09 3A 93 1B 77 3A 5F 1B 3C 32 5F 1B FE 80 DA ..:..w:_.<2_....
02DAA0: A5 05 CD 6F 05 C9 21 94 1B 71 2A 94 1B 26 00 EB ...o..!..q*..&..
02DAB0: 0E 05 CD 03 01 C9 21 95 1B 71 2A 95 1B 26 00 EB ......!..q*..&..
02DAC0: 0E 02 CD 03 01 C9 0E 0D CD B6 05 0E 0A CD B6 05 ................
02DAD0: C9 21 96 1B 71 3A 9D 19 1F D2 E3 05 2A 96 1B 4D .!..q:......*..M
02DAE0: CD A6 05 3A 9E 19 1F D2 F1 05 2A 96 1B 4D CD 85 ...:......*..M..
02DAF0: 05 3A 96 1B FE 0A C2 05 06 21 87 1B 34 21 9C 19 .:.......!..4!..
02DB00: 36 00 C3 09 06 21 9C 19 34 C9 21 98 1B 70 2B 71 6....!..4.!..p+q
02DB10: 2A 97 1B 7E FE 24 CA 2A 06 2A 97 1B 4E CD B6 05 *..~.$.*.*..N...
02DB20: 2A 97 1B 23 22 97 1B C3 10 06 C9 01 6A 03 CD 0A *..#".......j...
02DB30: 06 CD 0B 01 C9 01 76 03 C5 11 09 00 2A EA 19 19 ......v.....*...
02DB40: 44 4D 1E 03 CD 0D 05 21 DE 1A 36 00 01 20 00 2A DM.....!..6.. .*
02DB50: EA 19 09 36 00 01 0C 00 2A EA 19 09 36 00 11 80 ...6....*...6...
02DB60: 00 0E 1A CD 03 01 2A EA 19 EB 0E 0F CD 03 01 FE ......*.........
02DB70: FF C2 DC 06 CD C6 05 01 79 03 CD 0A 06 2A EA 19 ........y....*..
02DB80: 7E FE 00 CA 9C 06 2A EA 19 3E 40 B6 5F 16 00 0E ~.....*..>@._...
02DB90: 02 CD 03 01 11 3A 00 0E 02 CD 03 01 21 99 1B 36 .....:......!..6
02DBA0: 01 3E 08 21 99 1B BE DA D3 06 2A 99 1B 26 00 EB .>.!......*..&..
02DBB0: 2A EA 19 19 7E FE 20 CA CC 06 2A 99 1B 26 00 EB *...~. ...*..&..
02DBC0: 2A EA 19 19 5E 16 00 0E 02 CD 03 01 21 99 1B 34 *...^.......!..4
02DBD0: C2 A1 06 01 92 03 CD 0A 06 CD 0B 01 C9 3A 9E 19 .............:..
02DBE0: 1F D2 F4 06 0E 1A CD 85 05 CD 6F 05 11 63 1B 0E ..........o..c..
02DBF0: 10 CD 03 01 C9 3A 9E 19 1F D2 3B 07 11 DF 1A 0E .....:....;.....
02DC00: 3E 00 87 A3 70 3D 0A 3F 99 99 99 99 7F 69 0F 16 >..£p=.?.....i..
02DC10: 45 78 74 72 61 20 6C 61 72 67 65 20 6C 61 77 6E Extra large lawn
02DC20: 20 6D 6F 76 65 72 6F 77 6C 52 4F 44 55 43 28 00 moverowlRODUC(.
02DC30: 87 EB 51 B8 9E 11 D6 1E 12 45 78 74 72 61 20 6C ..Q......Extra l
02DC40: 61 72 67 65 20 73 68 6F 76 65 6C 6F 76 65 72 6F arge shovelovero
02DC50: 77 6C 52 4F 44 55 43 20 00 86 28 5C 8F C2 5A 5A wlRODUC ..(\..ZZ
02DC60: 26 10 45 78 74 72 61 20 6C 61 72 67 65 20 72 61 &.Extra large ra
02DC70: 6B 65 65 6C 6F 76 65 72 6F 77 6C 52 4F 44 55 43 keeloverowlRODUC
02DC80: 74 72 6F 77 65 6C 65 6C 65 6C 52 4F 44 55 43 3A trowelelelRODUC:
02DC90: 00 87 B8 1E 85 EB 33 5B 0C 0F 4D 69 6E 69 61 74 ......3[..Miniat
02DCA0: 75 72 65 20 73 70 61 64 65 74 72 6F 77 65 6C 65 ure spadetrowele
02DCB0: 6C 65 6C 52 4F 44 55 43 60 00 86 D7 A3 70 3D 5C lelRODUC`...£p=\
02DCC0: 71 25 12 4D 65 64 69 75 6D 20 73 69 7A 65 20 73 q%.Medium size s
02DCD0: 68 6F 76 65 6C 77 65 6C 65 6C 65 6C 52 4F 44 55 hovelwelelelRODU
02DCE0: 43 30 00 87 85 EB 51 38 06 BF 22 10 45 78 74 72 C0....Q8..".Extr
02DCF0: 61 20 73 6D 61 6C 6C 20 66 6F 72 6B 65 6C 77 65 a small forkelwe
02DD00: 6C 65 6C 65 6C 52 4F 44 55 43 3B 00 86 66 66 66 lelelRODUC;..fff
02DD10: 66 48 D5 06 13 4D 65 64 69 75 6D 20 73 69 7A 65 fH...Medium size
02DD20: 20 74 72 61 63 74 6F 72 65 6C 65 6C 65 6C 52 4F tractorelelelRO
02DD30: 44 55 43 25 00 85 1E 85 EB 51 20 01 1E 18 45 78 DUC%.....Q ...Ex
02DD40: 74 72 61 20 73 6D 61 6C 6C 20 77 68 65 65 6C 20 tra small wheel
02DD50: 62 61 72 72 6F 77 6C 52 4F 44 55 43 09 00 86 70 barrowlRODUC...p
02DD60: 3D 0A D7 3F 07 23 16 45 78 74 72 61 20 6C 61 72 =..?.#.Extra lar
02DD70: 67 65 20 6C 61 77 6E 20 6D 6F 76 65 72 6F 77 6C ge lawn moverowl
02DD80: 52 4F 44 55 43 5B 00 85 99 99 99 99 7F 69 0F 16 RODUC[.......i..
02DD90: 45 78 74 72 61 20 6C 61 72 67 65 20 6C 61 77 6E Extra large lawn
02DDA0: 20 6D 6F 76 65 72 6F 77 6C 52 4F 44 55 43 28 00 moverowlRODUC(.
02DDB0: 87 EB 51 B8 9E 11 D6 1E 12 45 78 74 72 61 20 6C ..Q......Extra l
02DDC0: 61 72 67 65 20 73 68 6F 76 65 6C 6F 76 65 72 6F arge shovelovero
02DDD0: 77 6C 52 4F 44 55 43 20 00 86 28 5C 8F C2 5A 5A wlRODUC ..(\..ZZ
02DDE0: 26 10 45 78 74 72 61 20 6C 61 72 67 65 20 72 61 &.Extra large ra
02DDF0: 6B 65 65 6C 6F 76 65 72 6F 77 6C 52 4F 44 55 43 keeloverowlRODUC
02DE00: 1A CD 03 01 2A EA 19 E5 1E 09 01 63 1B CD 0D 05 ....*......c....
02DE10: 3A 61 1B FE 00 CA 1E 07 3A 61 1B 32 63 1B 11 63 :a......:a.2c..c
02DE20: 1B 0E 13 CD 03 01 11 63 1B 0E 16 CD 03 01 FE FF .......c........
02DE30: C2 36 07 CD 2B 06 21 83 1B 36 00 C9 11 80 00 0E .6..+.!..6......
02DE40: 1A CD 03 01 2A EA 19 EB 0E 14 CD 03 01 32 9A 1B ....*........2..
02DE50: 4F 3E 01 B9 D2 5A 07 CD 2B 06 3A 9A 1B C9 0E 0D O>...Z..+.:.....
02DE60: CD D1 05 0E 0A CD D1 05 C9 11 0D 00 0E 02 CD 03 ................
02DE70: 01 11 0A 00 0E 02 CD 03 01 C9 21 9C 1B 70 2B 71 ..........!..p+q
02DE80: 21 9E 1B 36 00 2B 36 00 3E 03 21 9D 1B BE DA ED !..6.+6.>.!.....
02DE90: 07 21 9F 1B 36 30 2A 9D 1B 26 00 01 3D 01 29 09 .!..60*..&..=.).
02DEA0: 11 9B 1B CD 2E 19 DA C8 07 2A 9D 1B 26 00 01 3D .........*..&..=
02DEB0: 01 29 09 11 9B 1B CD 2E 19 EB 2B 73 23 72 21 9E .)........+s#r!.
02DEC0: 1B 36 01 23 34 C3 96 07 3A 9D 1B D6 03 9F 2F 21 .6.#4...:...../!
02DED0: 9E 1B B6 1F D2 E1 07 2A 9F 1B 4D CD D1 05 C3 E6 .......*..M.....
02DEE0: 07 0E 20 CD D1 05 21 9D 1B 34 C2 88 07 C9 3A 79 .. ...!..4....:y
02DEF0: 19 32 7A 19 CD 94 08 32 79 19 FE 1A C2 63 08 3E .2z....2y....c.>
02DF00: 00 21 DD 1A BE D2 57 08 21 DD 1A 35 11 22 00 2A .!....W.!..5.".*
02DF10: DD 1A 26 00 CD FE 18 01 10 1A 09 E5 2A EA 19 44 ..&.........*..D
02DF20: 4D 1E 21 CD 0D 05 11 22 00 2A DD 1A 26 00 CD FE M.!....".*..&...
02DF30: 18 01 10 1A 09 01 21 00 09 7E 32 0F 1A CD 3C 07 ......!..~2...<.
02DF40: FE 00 CA 47 08 FB 76 3A DD 1A FE 00 C2 54 08 21 ...G..v:.....T.!
02DF50: 89 1B 36 3A C3 60 08 21 DE 1A 36 01 3A 79 19 C9 ..6:.`.!..6.:y..
02DF60: C3 90 08 3A 79 19 FE 0D C2 77 08 21 60 1B 36 01 ...:y....w.!`.6.
02DF70: 2A 85 1B 23 22 85 1B 3A 79 19 FE 09 C2 84 08 21 *..#"..:y......!
02DF80: 79 19 36 20 3A 79 19 FE 0A CA 90 08 3A 79 19 C9 y.6 :y......:y..
02DF90: C3 EE 07 C9 3A 0F 1A 3C 32 0F 1A FE 80 DA B0 08 ....:..<2.......
02DFA0: 21 0F 1A 36 00 CD 3C 07 FE 01 C2 B0 08 3E 1A C9 !..6..<......>..
02DFB0: 2A 0F 1A 26 00 EB 2A 0D 1A 19 7E C9 CD EE 07 D6 *..&..*...~.....
02DFC0: 20 D6 01 9F F5 3A 79 19 D6 1A D6 01 9F C1 48 B1 ....:y.......H.
02DFD0: 1F D2 D7 08 C3 BC 08 C9 3A 79 19 FE 0D CA E9 08 ........:y......
02DFE0: CD EE 07 32 79 19 C3 D8 08 C9 3A 79 19 FE 5C C2 ...2y.....:y..\.
02DFF0: F8 08 CD D8 08 CD BC 08 C9 21 A0 1B 36 1E 21 A2 .........!..6.!.
02E000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E0A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E0B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E0C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E0D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E0E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E0F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E1A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E1B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E1C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E1D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E1E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E1F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
02E200: 1B 36 00 3A A2 1B 3C 32 A2 1B 4F 06 00 21 81 00 .6.:..<2..O..!..
02E210: 09 7E D6 24 C6 FF 9F 2A A2 1B 26 00 01 81 00 09 .~.$...*..&.....
02E220: F5 7E D6 27 C6 FF 9F C1 48 A1 21 80 00 F5 3A A2 .~.'....H.!...:.
02E230: 1B 96 9F C1 48 A1 1F D2 3D 09 C3 03 09 2A A2 1B ....H...=....*..
02E240: 26 00 01 81 00 09 7E FE 24 C2 66 0A 3A A2 1B 3C &.....~.$.f.:..<
02E250: 32 A2 1B 4F 06 00 21 81 00 09 7E 32 A1 1B D6 27 2..O..!...~2...'
02E260: C6 FF 9F 21 80 00 F5 3A A2 1B 96 9F C1 48 A1 1F ...!...:.....H..
02E270: D2 66 0A 3A A1 1B D6 41 32 A1 1B 4F 3E 07 B9 DA .f.:...A2..O>...
02E280: 63 0A 2A A1 1B 4D 06 00 21 53 0A 09 09 5E 23 56 c.*..M..!S...^#V
02E290: EB E9 21 9D 19 36 01 C3 63 0A 21 9E 19 36 00 C3 ..!..6..c.!..6..
02E2A0: 63 0A 21 9D 19 36 01 23 36 00 C3 63 0A 21 9F 19 c.!..6.#6..c.!..
02E2B0: 36 01 21 A2 19 36 50 21 E0 19 36 24 21 A0 1B 36 6.!..6P!..6$!..6
02E2C0: 14 C3 63 0A 21 A0 19 36 01 C3 63 0A 2A A2 1B 26 ..c.!..6..c.*..&
02E2D0: 00 01 82 00 09 7E FE 28 C2 DF 09 21 A2 1B 34 21 .....~.(...!..4!
02E2E0: 88 1B 36 00 3A A2 1B 3C 32 A2 1B 4F 06 00 21 81 ..6.:..<2..O..!.
02E2F0: 00 09 7E D6 30 32 A4 1B 4F 3E 09 B9 DA 19 0A 3A ..~.02..O>.....:
02E300: 88 1B 87 87 87 F5 3A 88 1B 87 C1 48 81 21 A4 1B ......:....H.!..
02E310: 86 E6 0F 32 88 1B C3 E4 09 3A 88 1B FE 05 D2 2D ...2.....:.....-
02E320: 0A CD C6 05 01 97 03 CD 0A 06 CD 0B 01 2A A2 1B .............*..
02E330: 26 00 01 82 00 09 7E FE 29 C2 40 0A 21 A2 1B 34 &.....~.).@.!..4
02E340: C3 63 0A 21 A1 19 36 00 C3 63 0A 21 A3 19 36 00 .c.!..6..c.!£.6.
02E350: C3 63 0A 92 09 9A 09 A2 09 AD 09 C4 09 CC 09 43 .c.............C
02E360: 0A 4B 0A C3 4C 09 21 A3 1B 36 00 2B 7E 21 80 00 .K..L.!£.6.+~!..
02E370: BE D2 C1 0A 3A A2 1B 3C 32 A2 1B 4F 06 00 21 81 ....:..<2..O..!.
02E380: 00 09 7E D6 27 C6 FF 9F F5 3A 80 00 21 A2 1B 96 ..~.'....:..!...
02E390: 9F 2F C1 48 A1 23 F5 7E 21 A0 1B 96 9F C1 48 A1 ./.H.#.~!.....H.
02E3A0: 1F D2 C1 0A 2A A2 1B 26 00 01 81 00 09 E5 2A A3 ....*..&......*£
02E3B0: 1B 26 00 01 CB 19 09 D1 1A 77 21 A3 1B 34 C3 74 .&.......w!£.4.t
02E3C0: 0A 3A 6C 00 32 61 1B CD 35 06 21 0F 1A 36 80 21 .:l.2a..5.!..6.!
02E3D0: 79 19 36 0A CD BC 08 C9 21 7B 19 36 00 21 78 19 y.6.....!{.6.!x.
02E3E0: 36 00 21 72 19 36 00 21 74 19 36 00 3A 79 19 FE 6.!r.6.!t.6.:y..
02E3F0: 22 C2 1F 0B 21 72 19 36 42 CD EE 07 FE 22 CA 0D "...!r.6B...."..
02E400: C3 E1 04 CD 05 00 32 0A 01 C9 00 C3 00 00 00 00 ......2.........
02E410: 43 4F 50 59 52 49 47 48 54 20 31 39 37 38 2C 31 COPYRIGHT 1978,1
02E420: 39 37 39 2C 31 39 38 31 20 43 4F 4D 50 49 4C 45 979,1981 COMPILE
02E430: 52 20 53 59 53 54 45 4D 53 20 49 4E 43 E8 03 64 R SYSTEMS INC..d
02E440: 00 0A 00 01 00 0D 18 23 0C 28 02 29 05 2A 04 2B .......#.(.).*.+
02E450: 03 2C 09 2D 07 2F 08 3A 0B 3B 06 3C 01 3D 0D 3E .,.-./.:.;.<.=.>
02E460: 0A 5E 0E 41 53 0F 45 51 0D 47 45 10 47 4F 11 47 .^.AS.EQ.GE.GO.G
02E470: 54 0A 49 46 12 4C 45 13 4C 54 01 4E 45 14 4F 4E T.IF.LE.LT.NE.ON
02E480: 15 4F 52 16 54 4F 17 41 42 53 81 41 4E 44 19 41 .OR.TO.ABS.AND.A
02E490: 53 43 82 41 54 4E 83 43 4F 53 84 44 45 46 1A 44 SC.ATN.COS.DEF.D
02E4A0: 49 4D 1B 45 4E 44 1C 45 58 50 85 46 4F 52 1D 46 IM.END.EXP.FOR.F
02E4B0: 52 45 86 49 4E 50 87 49 4E 54 88 4C 45 4E 89 4C RE.INP.INT.LEN.L
02E4C0: 45 54 1E 4C 4F 47 8A 4E 4F 54 1F 4F 55 54 20 50 ET.LOG.NOT.OUT P
02E4D0: 4F 53 8B 52 45 4D 62 52 4E 44 8C 53 47 4E 8D 53 OS.REMbRND.SGN.S
02E4E0: 49 4E 8E 53 51 52 8F 53 55 42 21 54 41 42 90 54 IN.SQR.SUB!TAB.T
02E4F0: 41 4E 91 56 41 4C 92 58 4F 52 22 42 55 46 46 28 AN.VAL.XOR"BUFF(
02E500: 43 41 4C 4C 23 43 48 52 24 93 44 41 54 41 63 45 CALL#CHR$.DATAcE
02E510: 4C 53 45 24 46 45 4E 44 25 46 49 4C 45 26 47 4F LSE$FEND%FILE&GO
02E520: 54 4F 27 49 4E 54 25 94 4C 49 4E 45 29 4D 49 44 TO'INT%.LINE)MID
02E530: 24 95 4E 45 58 54 2A 4F 50 45 4E 2B 50 45 45 4B $.NEXT*OPEN+PEEK
02E540: 96 50 4F 4B 45 2C 52 45 41 44 2D 52 45 43 4C 2E .POKE,READ-RECL.
02E550: 52 45 43 53 2F 53 41 44 44 97 53 49 5A 45 98 53 RECS/SADD.SIZE.S
02E560: 54 45 50 30 53 54 4F 50 31 53 54 52 24 99 54 48 TEP0STOP1STR$.TH
02E570: 45 4E 32 57 45 4E 44 33 43 48 41 49 4E 00 43 4C EN2WEND3CHAIN.CL
02E580: 4F 53 45 34 46 4C 4F 41 54 9A 47 4F 53 55 42 35 OSE4FLOAT.GOSUB5
02E590: 49 4E 50 55 54 36 4C 45 46 54 24 9B 4C 23 43 41 INPUT6LEFT$.L#CA
02E5A0: 4C 61 4D 41 54 43 48 9C 50 52 49 4E 54 37 55 53 LaMATCH.PRINT7US
02E5B0: 49 4E 47 38 57 48 49 4C 45 39 57 49 44 54 48 3A ING8WHILE9WIDTH:
02E5C0: 43 4F 4D 4D 4F 4E 00 43 52 45 41 54 45 3B 44 45 COMMON.CREATE;DE
02E5D0: 4C 45 54 45 3C 52 45 4D 41 52 4B 62 52 45 4E 41 LETE<REMARKbRENA
02E5E0: 4D 45 9D 52 45 54 55 52 4E 3D 52 49 47 48 54 24 ME.RETURN=RIGHT$
02E5F0: 9E 55 43 41 53 45 24 9F 43 4F 4E 53 4F 4C 45 3F .UCASE$.CONSOLE?
02E600: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
02E610: 27 00 01 00 02 09 52 E5 27 00 41 02 00 00 00 02 '.....R.'.A.....
02E620: 27 00 46 02 00 00 00 02 27 00 42 02 00 00 00 02 '.F.....'.B.....
02E630: 27 00 47 02 00 00 00 02 27 00 43 02 00 00 00 02 '.G.....'.C.....
02E640: 27 00 48 02 00 00 00 02 27 00 44 02 00 00 00 02 '.H.....'.D.....
02E650: 27 00 49 02 00 00 00 02 27 00 45 02 00 00 00 02 '.I.....'.E.....
02E660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E6A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E6B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E6C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E6D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E6E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E6F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E700: 0B 3A 79 19 FE 0D C2 0A 0B C9 C3 F9 0A CD BC 08 .:y.............
02E710: 3A 79 19 FE 22 CA 19 0B C9 C3 F9 0A C3 DA 0D CD :y.."...........
02E720: 17 0E F5 CD 37 0E C1 48 B1 1F D2 C6 0B 21 72 19 ....7..H.....!r.
02E730: 36 41 3A 79 19 FE 30 C2 43 0B CD EE 07 32 79 19 6A:y..0.C....2y.
02E740: C3 32 0B CD 7C 0E CD 37 0E 1F D2 53 0B CD 02 0E .2..|..7...S....
02E750: CD 7C 0E 3A 79 19 D6 48 D6 01 9F F5 3A 79 19 D6 .|.:y..H....:y..
02E760: 68 D6 01 9F C1 48 B1 1F D2 71 0B CD FB 0D C3 BF h....H...q......
02E770: 0B 3A 79 19 D6 20 D6 01 9F F5 3A 79 19 D6 2B D6 .:y.. ....:y..+.
02E780: 01 9F C1 48 B1 F5 3A 79 19 D6 2D D6 01 9F C1 48 ...H..:y..-....H
02E790: B1 F5 CD 0C 0E D6 45 D6 01 9F C1 48 A1 1F D2 BF ......E....H....
02E7A0: 0B CD FB 0D CD 02 0E CD 17 0E 1F D2 B4 0B CD FB ................
02E7B0: 0D C3 BF 0B 3A 79 19 FE 20 C2 BF 0B CD BC 08 CD ....:y.. .......
02E7C0: AB 0E C9 C3 DA 0D CD 54 0E 1F D2 83 0C CD 6A 0E .......T......j.
02E7D0: 1F D2 DA 0B CD 02 0E C3 CD 0B 3A 79 19 FE 24 C2 ..........:y..$.
02E7E0: E8 0B CD 02 0E C3 F3 0B 3A 79 19 FE 25 C2 F3 0B ........:y..%...
02E7F0: CD 02 0E CD B7 0E 1F DA 3E 0C 3A 7C 19 D6 46 D6 ........>.:|..F.
02E800: 01 9F F5 3A 7D 19 D6 4E D6 01 9F C1 48 A1 F5 3A ...:}..N....H..:
02E810: 7B 19 D6 01 C6 FF 9F C1 48 A1 1F D2 26 0C 21 72 {.......H...&.!r
02E820: 19 36 48 C3 2B 0C 21 72 19 36 46 21 7B 19 22 3A .6H.+.!r.6F!{.":
02E830: 1C 3A 78 19 32 3C 1C CD AB 0E C9 C3 80 0C 3A 72 .:x.2<........:r
02E840: 19 FE 62 C2 5D 0C 3A 79 19 FE 0D CA 5A 0C CD EE ..b.].:y....Z...
02E850: 07 32 79 19 CD EA 08 C3 46 0C C3 80 0C 3A 72 19 .2y.....F....:r.
02E860: FE 63 C2 7C 0C 3A 79 19 FE 0D CA 79 0C CD EA 08 .c.|.:y....y....
02E870: CD EE 07 32 79 19 C3 65 0C C3 80 0C CD AB 0E C9 ...2y..e........
02E880: C3 DA 0D 3A 79 19 D6 25 D6 01 9F F5 3A 7A 19 D6 ...:y..%....:z..
02E890: 0A D6 01 9F C1 48 A1 1F D2 B9 0D CD BC 08 CD 40 .....H.........@
02E8A0: 0E CD 02 0E 3A 7C 19 FE 49 C2 B3 0D 3A 79 19 FE ....:|..I...:y..
02E8B0: 20 CA BD 0C CD EE 07 32 79 19 C3 AC 0C CD BC 08 ......2y.......
02E8C0: 21 7B 19 36 00 3A 79 19 D6 20 C6 FF 9F F5 3A 79 !{.6.:y.. ....:y
02E8D0: 19 D6 2E C6 FF 9F C1 48 A1 F5 3A 79 19 D6 0D C6 .......H..:y....
02E8E0: FF 9F C1 48 A1 1F D2 F2 0C CD 40 0E CD 02 0E C3 ...H......@.....
02E8F0: C5 0C CD D8 08 01 20 00 2A EA 19 09 35 3A DD 1A ...... .*...5:..
02E900: 29 EB 2A 50 1C 19 5E 23 56 EB 22 5E 1C 2A 5A 1C ).*P..^#V."^.*Z.
02E910: 29 EB 2A 50 1C 19 E5 2A 5C 1C 29 EB 2A 50 1C 19 ).*P...*\.).*P..
02E920: E3 4E 23 46 E1 71 23 70 2A 5A 1C 29 EB 2A 50 1C .N#F.q#p*Z.).*P.
02E930: 19 E5 2A 5E 1C EB E1 73 23 72 21 59 1C 36 01 11 ..*^...s#r!Y.6..
02E940: 01 00 2A 5C 1C 19 22 5C 1C D2 C5 14 C3 B3 14 C3 ..*\.."\........
02E950: 8C 14 2A 50 1C 23 23 22 50 1C C9 21 63 1C 72 2B ..*P.##"P..!c.r+
02E960: 73 2B 70 2B 71 01 06 00 2A 60 1C 09 E5 2A 62 1C s+p+q...*`...*b.
02E970: 09 7E E1 BE D2 7A 15 3E 01 C9 01 06 00 2A 60 1C .~...z.>.....*`.
02E980: 09 E5 2A 62 1C 09 D1 1A BE D2 8F 15 3E 00 C9 01 ..*b........>...
02E990: 07 00 2A 60 1C 09 E5 2A 62 1C 09 7E E1 BE D2 A4 ..*`...*b..~....
02E9A0: 15 3E 01 C9 01 07 00 2A 60 1C 09 E5 2A 62 1C 09 .>.....*`...*b..
02E9B0: D1 1A BE D2 B9 15 3E 00 C9 2A 60 1C E5 2A 62 1C ......>..*`..*b.
02E9C0: C1 0A BE D2 D0 15 2A 62 1C 7E 32 66 1C C3 D7 15 ......*b.~2f....
02E9D0: 2A 60 1C 7E 32 66 1C 21 67 1C 36 00 CD 16 16 1F *`.~2f.!g.6.....
02E9E0: D2 F7 15 3A 67 1C 3C 32 67 1C 21 66 1C BE C2 F4 ...:g.<2g.!f....
02E9F0: 15 3E 00 C9 C3 DC 15 2A 67 1C 26 00 01 08 00 09 .>.....*g.&.....
02EA00: EB 2A 60 1C 19 E5 2A 67 1C 26 00 09 EB 2A 62 1C .*`...*g.&...*b.
02EA10: 19 7E E1 96 9F C9 2A 60 1C 3A 67 1C BE D2 35 16 .~....*`.:g...5.
02EA20: 2A 67 1C 26 00 01 08 00 09 EB 2A 60 1C 19 7E 32 *g.&......*`..~2
02EA30: 64 1C C3 3A 16 21 64 1C 36 20 2A 62 1C 3A 67 1C d..:.!d.6 *b.:g.
02EA40: BE D2 59 16 2A 67 1C 26 00 01 08 00 09 EB 2A 62 ..Y.*g.&......*b
02EA50: 1C 19 7E 32 65 1C C3 5E 16 21 65 1C 36 20 21 65 ..~2e..^.!e.6 !e
02EA60: 1C 3A 64 1C 96 D6 01 9F C9 21 68 1C 36 00 21 6C .:d......!h.6.!l
02EA70: 1C 36 FF 2A EA 19 7E FE 00 CA A4 16 2A EA 19 3E .6.*..~.....*..>
02EA80: 40 B6 F5 3A 6C 1C 3C 32 6C 1C 4F 06 00 21 BC 19 @..:l.<2l.O..!..
02EA90: 09 C1 48 71 3A 6C 1C 3C 32 6C 1C 4F 06 00 21 BC ..Hq:l.<2l.O..!.
02EAA0: 19 09 36 3A 21 6D 1C 36 01 3E 08 21 6D 1C BE DA ..6:!m.6.>.!m...
02EAB0: E5 16 2A 6D 1C 26 00 EB 2A EA 19 19 7E FE 20 CA ..*m.&..*...~. .
02EAC0: DE 16 2A 6D 1C 26 00 EB 2A EA 19 19 3A 6C 1C 3C ..*m.&..*...:l.<
02EAD0: 32 6C 1C 4F 06 00 E5 21 BC 19 09 C1 0A 77 21 6D 2l.O...!.....w!m
02EAE0: 1C 34 C2 A9 16 01 68 04 C5 2A 6C 1C 26 00 01 BD .4....h..*l.&...
02EAF0: 19 09 44 4D 1E 04 CD 0D 05 3A A1 19 1F D2 03 17 ..DM.....:......
02EB00: 3C 32 DD 1A FE 06 DA 1D 0D CD C6 05 01 B2 03 CD <2..............
02EB10: 0A 06 2A 85 1B 44 4D CD 7A 07 CD 0B 01 2A EA 19 ..*..DM.z....*..
02EB20: E5 3A DD 1A 3D 6F 26 00 11 22 00 CD FE 18 01 10 .:..=o&.."......
02EB30: 1A 09 44 4D 1E 21 CD 0D 05 3A DD 1A 3D 6F 26 00 ..DM.!...:..=o&.
02EB40: 11 22 00 CD FE 18 01 10 1A 09 01 21 00 09 3A 0F .".........!..:.
02EB50: 1A 77 2A EA 19 23 E5 1E 08 0E 20 CD 44 05 3A 7D .w*..#.... .D.:}
02EB60: 19 FE 3A C2 82 0D 3A 7C 19 E6 0F 2A EA 19 77 01 ..:...:|...*..w.
02EB70: 7E 19 C5 3A 7B 19 3D 3D 32 7B 19 5F 01 7C 19 CD ~..:{.==2{._.|..
02EB80: 0D 05 3E 08 21 7B 19 BE D2 90 0D 21 7B 19 36 08 ..>.!{.....!{.6.
02EB90: 01 7C 19 C5 2A EA 19 23 0B 0A 5F 44 4D CD 0D 05 .|..*..#.._DM...
02EBA0: 21 0F 1A 36 80 CD 35 06 21 79 19 36 0A CD BC 08 !..6..5.!y.6....
02EBB0: C3 B6 0D CD D8 08 C3 DA 0D 3A 79 19 FE 5C C2 C7 .........:y..\..
02EBC0: 0D CD EA 08 C3 DA 0D CD DE 0D CD B7 0E 1F DA D6 ................
02EBD0: 0D 21 72 19 36 00 CD BC 08 C9 C3 D8 0A C9 3A 7B .!r.6.........:{
02EBE0: 19 3C 32 7B 19 4F 06 00 21 7B 19 09 3A 79 19 77 .<2{.O..!{..:y.w
02EBF0: 3A 79 19 21 78 19 86 E6 3F 77 C9 CD DE 0D CD BC :y.!x...?w......
02EC00: 08 C9 CD DE 0D CD EE 07 32 79 19 C9 2A 7B 19 26 ........2y..*{.&
02EC10: 00 01 7B 19 09 7E C9 3A 79 19 D6 30 4F 3E 09 91 ..{..~.:y..0O>..
02EC20: 9F 2F C9 3A 79 19 D6 61 9F 2F F5 3E 7A 21 79 19 ./.:y..a./.>z!y.
02EC30: 96 9F 2F C1 48 A1 C9 3A 79 19 D6 2E D6 01 9F C9 ../.H..:y.......
02EC40: CD 23 0E 21 A3 19 A6 1F D2 53 0E 3A 79 19 E6 5F .#.!£....S.:y.._
02EC50: 32 79 19 C9 CD 40 0E 3A 79 19 D6 41 4F 3E 19 91 2y...@.:y..AO>..
02EC60: 9F 2F F5 CD 23 0E C1 48 B1 C9 CD 17 0E F5 CD 54 ./..#..H.......T
02EC70: 0E C1 48 B1 F5 CD 37 0E C1 48 B1 C9 CD 17 0E 1F ..H...7..H......
02EC80: D2 89 0E CD 02 0E C3 7C 0E CD 54 0E 1F D2 A6 0E .......|..T.....
02EC90: 3A 79 19 D6 41 4F 3E 05 B9 DA A2 0E CD 02 0E C3 :y..AO>.........
02ECA0: A3 0E C9 C3 A7 0E C9 C3 7C 0E C9 3A 79 19 FE 20 £.......|..:y..
02ECB0: C2 B6 0E CD BC 08 C9 3E 0A 21 7B 19 BE D2 C3 0E .......>.!{.....
02ECC0: 3E 00 C9 21 A5 1B 36 01 2A 7B 19 26 00 01 5F 03 >..!..6.*{.&.._.
02ECD0: 09 7E 32 A6 1B 3A A6 1B 21 A5 1B BE DA 90 0F 3A .~2..:..!......:
02ECE0: A6 1B 21 A5 1B 86 B7 1F 32 A7 1B 21 A8 1B 36 00 ..!.....2..!..6.
02ECF0: 2A 7B 19 26 00 01 49 03 29 09 3D F5 3A 7B 19 3C *{.&..I.).=.:{.<
02ED00: CD 9E 18 2A 50 1C 22 4E 1C 21 01 00 22 6A 1C 11 ...*P."N.!.."j..
02ED10: 52 1C 01 6A 1C CD 2C 19 DA 4C 18 2A 4E 1C 5E 23 R..j..,..L.*N.^#
02ED20: 56 EB 22 B6 1B 21 6D 1C 36 01 2A B6 1B 7E 21 6D V."..!m.6.*..~!m
02ED30: 1C BE DA 50 17 3A 6D 1C 3D 4F 06 00 21 08 00 09 ...P.:m.=O..!...
02ED40: EB 2A B6 1B 19 4E CD D1 05 21 6D 1C 34 C2 2A 17 .*...N...!m.4.*.
02ED50: 2A B6 1B 3E 21 96 4F CD 7E 18 CD 2C 11 FE 01 C2 *..>!.O.~..,....
02ED60: 6B 17 01 6C 04 CD 4D 18 C3 82 17 CD 2C 11 FE 00 k..l..M.....,...
02ED70: C2 7C 17 01 77 04 CD 4D 18 C3 82 17 01 82 04 CD .|..w..M........
02ED80: 4D 18 CD 40 12 22 B4 1B 21 69 1C 36 01 3A A0 19 M..@."..!i.6.:..
02ED90: 1F DA 20 18 3E 00 11 B4 1B CD 39 19 B5 CA 20 18 .. .>.....9... .
02EDA0: 21 6D 1C 36 01 2A B4 1B 7E 21 6D 1C BE DA 0F 18 !m.6.*..~!m.....
02EDB0: 3A 69 1C 1F DA C4 17 0E 2C CD D1 05 0E 20 CD D1 :i......,.... ..
02EDC0: 05 C3 C9 17 21 69 1C 36 00 3A A2 19 D6 06 21 9C ....!i.6.:....!.
02EDD0: 19 BE D2 F1 17 CD 5E 07 21 88 1B 3A 87 1B 96 9F ......^.!..:....
02EDE0: 2F 21 A1 19 A6 1F D2 EC 17 CD 9E 18 0E 2B CD 7E /!...........+.~
02EDF0: 18 3A 6D 1C 3D 4F 06 00 21 01 00 09 09 EB 2A B4 .:m.=O..!.....*.
02EE00: 1B 19 4E 23 46 CD 7A 07 21 6D 1C 34 C2 A5 17 01 ..N#F.z.!m.4....
02EE10: 15 00 2A B4 1B 09 5E 23 56 EB 22 B4 1B C3 94 17 ..*...^#V.".....
02EE20: CD 5E 07 21 88 1B 3A 87 1B 96 9F 2F 21 A1 19 A6 .^.!..:..../!...
02EE30: 1F D2 37 18 CD 9E 18 2A 4E 1C 23 23 22 4E 1C 11 ..7....*N.##"N..
02EE40: 01 00 2A 6A 1C 19 22 6A 1C D2 0F 17 C9 21 6F 1C ..*j.."j.....!o.
02EE50: 70 2B 71 21 70 1C 36 00 2A 70 1C 26 00 EB 2A 6E p+q!p.6.*p.&..*n
02EE60: 1C 19 7E FE 24 CA 7D 18 2A 70 1C 26 00 EB 2A 6E ..~.$.}.*p.&..*n
02EE70: 1C 19 4E CD D1 05 21 70 1C 34 C3 58 18 C9 21 71 ..N...!p.4.X..!q
02EE80: 1C 71 21 72 1C 36 01 3A 71 1C 21 72 1C BE DA 9D .q!r.6.:q.!r....
02EE90: 18 0E 20 CD D1 05 21 72 1C 34 C2 87 18 C9 0E 0C .. ...!r.4......
02EEA0: CD D1 05 01 A4 19 CD 4D 18 01 BC 19 CD 4D 18 0E .......M.....M..
02EEB0: 05 CD 7E 18 01 CB 19 CD 4D 18 3A 9F 19 1F DA C6 ..~.....M.:.....
02EEC0: 18 0E 2B CD 7E 18 01 37 04 CD 4D 18 3A 68 1C 3C ..+.~..7..M.:h.<
02EED0: 32 68 1C 4F 06 00 CD 7A 07 CD 5E 07 CD 5E 07 01 2h.O...z..^..^..
02EEE0: 3F 04 CD 4D 18 CD 5E 07 CD 5E 07 21 87 1B 36 04 ?..M..^..^.!..6.
02EEF0: C9 EB 5F 16 00 EB 1A 85 6F 13 1A 8C 67 C9 44 4D .._.....o...g.DM
02EF00: C1 48 5F 16 00 06 00 E5 CD 00 19 D1 CD F6 18 22 .H_............"
02EF10: A9 1B 2A A8 1B 26 00 EB 2A A9 1B 19 3A A8 1B 3C ..*..&..*...:..<
02EF20: 32 A8 1B 4F 06 00 E5 21 7B 19 09 C1 0A BE C2 61 2..O...!{......a
02EF30: 0F 21 7B 19 3A A8 1B BE C2 5E 0F 2A A8 1B 26 00 .!{.:....^.*..&.
02EF40: EB 2A A9 1B 19 7E 32 72 19 07 1F D2 5B 0F 3A 72 .*...~2r....[.:r
02EF50: 19 E6 7F 32 75 19 21 72 19 36 47 3E 01 C9 C3 12 ...2u.!r.6G>....
02EF60: 0F 2A A8 1B 26 00 01 7B 19 09 3A A8 1B 3D 4F 06 .*..&..{..:..=O.
02EF70: 00 E5 2A A9 1B 09 7E E1 BE D2 86 0F 3A A7 1B 3C ..*...~.....:..<
02EF80: 32 A5 1B C3 8D 0F 3A A7 1B 3D 32 A6 1B C3 D5 0E 2.....:..=2.....
02EF90: 3E 00 C9 01 B8 1B C5 3E 40 87 5F 0E 00 CD 44 05 >......>@._...D.
02EFA0: 21 73 1C 22 38 1C 2A 06 00 2B 2B 22 B2 1B C9 21 !s."8.*..++"...!
02EFB0: 3E 1C 36 00 23 36 00 2A B6 1B 7E 3D 21 3F 1C BE >.6.#6.*..~=!?..
02EFC0: DA DF 0F 2A 3F 1C 26 00 01 08 00 09 EB 2A B6 1B ...*?.&......*..
02EFD0: 19 3A 3E 1C 86 32 3E 1C 21 3F 1C 34 C2 B7 0F 3A .:>..2>.!?.4...:
02EFE0: 3E 1C E6 3F C9 2A B6 1B 5E 16 00 2A B6 1B 19 11 >..?.*..^..*....
02EFF0: 08 00 19 22 B6 1B C9 3E 0A 87 C6 03 11 B2 1B CD ..."...>........
02F000: 39 19 EB 2B 73 23 72 21 38 1C CD 47 19 D2 1F 10 9..+s#r!8..G....
02F010: CD C6 05 01 DC 03 CD 0A 06 CD 0B 01 C3 23 10 2A .............#.*
02F020: B2 1B C9 C9 21 41 1C 70 2B 71 3A 79 19 FE 0D C2 ....!A.p+q:y....
02F030: 39 10 2A 40 1C 2B 22 40 1C 01 15 00 2A B4 1B 09 9.*@.+"@....*...
02F040: 3E 00 CD 44 19 B5 CA 5A 10 01 15 00 2A B4 1B 09 >..D...Z....*...
02F050: 5E 23 56 EB 22 B4 1B C3 39 10 2A B4 1B 7E 3D 4F ^#V."...9.*..~=O
02F060: 06 00 E5 21 01 00 09 09 EB 2A B4 1B 19 11 40 1C ...!.....*....@.
02F070: CD 2E 19 B5 D6 01 9F C1 F5 0A D6 00 C6 FF 9F C1 ................
02F080: 48 A1 1F D2 87 10 C9 2A B4 1B 7E FE 0A C2 B9 10 H......*..~.....
02F090: CD F7 0F 01 15 00 E5 2A B4 1B 09 C1 71 23 70 01 .......*....q#p.
02F0A0: 15 00 2A B4 1B 09 5E 23 56 EB 22 B4 1B 36 00 2A ..*...^#V."..6.*
02F0B0: B4 1B 09 3E 00 77 23 36 00 2A B4 1B 4E 06 00 21 ...>.w#6.*..N..!
02F0C0: 01 00 09 09 EB 2A B4 1B 19 E5 2A 40 1C EB E1 73 .....*....*@...s
02F0D0: 23 72 2A B4 1B 34 C9 2A 3C 1C 26 00 01 B8 1B 29 #r*..4.*<.&....)
02F0E0: 09 5E 23 56 EB C9 21 42 1C 71 3A 42 1C 11 38 1C .^#V..!B.q:B..8.
02F0F0: CD F1 18 EB 21 B2 1B CD 47 19 DA 09 11 CD C6 05 ....!...G.......
02F100: 21 00 00 3E 10 29 EB 29 EB D2 0D 19 09 3D C2 05 !..>.).).....=..
02F110: 19 C9 5E 23 56 EB 7C B7 1F 67 7D 1F 6F 0D C2 16 ..^#V.|..g}.o...
02F120: 19 C9 5F 16 00 7B 95 6F 7A 9C 67 C9 69 60 4E 23 .._..{.oz.g.i`N#
02F130: 46 1A 91 6F 13 1A 98 67 C9 6F 26 00 1A 95 6F 13 F..o...g.o&...o.
02F140: 1A 9C 67 C9 5F 16 00 7B 96 5F 7A 23 9E 57 EB C9 ..g._..{._z#.W..
02F150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 ................
02F1A0: 00 01 84 01 43 42 41 53 49 43 20 58 52 45 46 20 ....CBASIC XREF
02F1B0: 4C 49 53 54 49 4E 47 20 4F 46 20 24 20 20 20 20 LISTING OF $
02F1C0: 20 20 20 20 20 20 20 20 20 20 24 20 20 20 20 20 $
02F1D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
02F1E0: 20 20 20 20 20 20 20 20 20 24 5C 00 00 20 20 20 $\..
02F1F0: 20 20 20 20 20 49 4E 54 00 00 00 00 00 00 00 00 INT........
02F200: 00 00 00 00 00 00 00 00 00 00 00 00 00 80 00 80 ................
02F210: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F220: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F230: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F240: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F250: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F260: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F270: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F280: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F290: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F2A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F2B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F2C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F2D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F2E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F2F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F300: 01 F1 03 CD 0A 06 CD 0B 01 C9 21 44 1C 70 2B 71 ..........!D.p+q
02F310: 01 04 00 2A B6 1B 09 E5 2A 43 1C EB E1 73 23 72 ...*....*C...s#r
02F320: 01 07 00 2A B6 1B 09 3E 80 B6 77 C9 01 07 00 2A ...*...>..w....*
02F330: B6 1B 09 3E 7F A6 C9 CD D7 10 22 B6 1B 3E 00 11 ...>......"..>..
02F340: B6 1B CD 39 19 B5 CA 71 11 2A B6 1B 7E 32 45 1C ...9...q.*..~2E.
02F350: E5 2A 3A 1C BE E1 C2 63 11 CD 74 11 1F D2 63 11 .*:....c..t...c.
02F360: 3E 01 C9 2A B6 1B 23 5E 23 56 EB 22 B6 1B C3 3D >..*..#^#V."...=
02F370: 11 3E 00 C9 3A 45 1C 3D 4F 06 00 21 08 00 09 EB .>..:E.=O..!....
02F380: 2A B6 1B 19 E5 2A 45 1C 26 00 EB 2A 3A 1C 19 C1 *....*E.&..*:...
02F390: 0A BE C2 A7 11 3A 45 1C 3D 32 45 1C FE 00 C2 A4 .....:E.=2E.....
02F3A0: 11 3E 01 C9 C3 74 11 3E 00 C9 2A 3A 1C 3E 08 86 .>...t.>..*:.>..
02F3B0: 32 46 1C 4F CD E6 10 2A 38 1C 22 B6 1B 2A 3A 1C 2F.O...*8."..*:.
02F3C0: 23 E5 01 08 00 2A B6 1B 09 E5 2A 3A 1C E5 2A B6 #....*....*:..*.
02F3D0: 1B D1 1A 77 5F C1 CD 0D 05 01 07 00 2A B6 1B 09 ...w_.......*...
02F3E0: 36 00 CD D7 10 E5 2A B6 1B 23 C1 71 23 70 2A 3C 6.....*..#.q#p*<
02F3F0: 1C 26 00 01 B8 1B 29 09 E5 2A B6 1B EB E1 73 23 .&....)..*....s#
02F400: 72 3A 46 1C 11 38 1C CD F1 18 EB 2B 73 23 72 C9 r:F..8.....+s#r.
02F410: 21 47 1C 71 01 06 00 2A B6 1B 09 3A 47 1C 77 C9 !G.q...*...:G.w.
02F420: 2A B6 1B 7E C9 21 48 1C 71 01 07 00 2A B6 1B 09 *..~.!H.q...*...
02F430: 3A 48 1C B6 77 C9 01 07 00 2A B6 1B 09 7E 07 C9 :H..w....*...~..
02F440: 01 04 00 2A B6 1B 09 5E 23 56 EB C9 21 49 1C 71 ...*...^#V..!I.q
02F450: 01 03 00 2A B6 1B 09 3A 49 1C 77 C9 01 03 00 2A ...*...:I.w....*
02F460: B6 1B 09 7E C9 CD 5C 12 32 4C 1C 21 4D 1C 36 01 ...~..\.2L.!M.6.
02F470: 3A 4C 1C 21 4D 1C BE DA BE 12 CD E5 0F CD AF 0F :L.!M...........
02F480: 87 6F 26 00 11 B8 1B 19 22 4A 1C 2A 4A 1C 11 B6 .o&....."J.*J...
02F490: 1B CD 2E 19 B5 CA A7 12 2A 4A 1C 4E 23 46 03 60 ........*J.N#F.`
02F4A0: 69 22 4A 1C C3 8B 12 2A B6 1B 23 E5 2A 4A 1C E3 i"J....*..#.*J..
02F4B0: 4E 23 46 E1 71 23 70 21 4D 1C 34 C2 70 12 C9 3A N#F.q#p!M.4.p..:
02F4C0: DE 1A 1F DA 13 14 CD D8 0A 3A 72 19 FE 46 C2 32 .........:r..F.2
02F4D0: 13 CD 37 11 2F 21 54 1C B6 1F D2 21 13 CD AA 11 ..7./!T....!....
02F4E0: CD F7 0F 22 B4 1B 44 4D CD 0A 11 2A B4 1B 36 00 ..."..DM...*..6.
02F4F0: 01 15 00 2A B4 1B 09 3E 00 77 23 36 00 3A 54 1C ...*...>.w#6.:T.
02F500: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F510: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F520: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F530: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F540: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F550: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F560: 00 00 FF 00 20 20 20 20 20 20 20 20 58 52 46 00 .... XRF.
02F570: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F580: 00 00 00 00 00 01 00 00 3B 3A 00 00 00 00 00 00 ........;:......
02F590: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F5A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F5B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F5C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F5D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F5E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F5F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F600: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F610: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F620: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F630: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F640: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F650: 00 00 00 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02F660: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02F670: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
02F680: 90 84 89 24 24 91 24 02 49 22 49 24 91 21 10 92 ...$$.$.I"I$.!..
02F690: 09 21 24 92 49 00 40 88 21 00 80 84 08 42 20 91 .!$.I.@.!....B .
02F6A0: 00 AA AA AA A4 92 42 00 12 04 81 08 22 02 44 92 ......B.....".D.
02F6B0: 00 80 24 08 00 21 04 44 04 11 09 24 49 04 10 00 ..$..!.D...$I...
02F6C0: 24 90 81 00 00 00 01 00 10 00 84 04 00 00 00 00 $...............
02F6D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F6E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F6F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F700: 1F D2 17 13 21 B1 1B 34 2A AB 1B 4D CD 10 12 0E ....!..4*..M....
02F710: 01 CD 25 12 C3 21 13 0E FF CD 10 12 0E 03 CD 25 ..%..!.........%
02F720: 12 CD 40 12 22 B4 1B 2A 85 1B 44 4D CD 24 10 C3 ..@."..*..DM.$..
02F730: 0A 14 3A 72 19 FE 48 C2 B2 13 3A 73 19 FE 1A C2 ..:r..H...:s....
02F740: 9A 13 2A AB 1B 23 22 AB 1B 3E FF CD 22 19 B5 C2 ..*..#"..>.."...
02F750: 5E 13 CD C6 05 01 07 04 CD 0A 06 CD 0B 01 CD AA ^...............
02F760: 11 CD F7 0F 22 B4 1B 44 4D CD 0A 11 2A B4 1B 36 ...."..DM...*..6
02F770: 00 01 15 00 2A B4 1B 09 3E 00 77 23 36 00 21 B1 ....*...>.w#6.!.
02F780: 1B 36 00 2A AB 1B 4D CD 10 12 0E 00 CD 25 12 21 .6.*..M......%.!
02F790: 54 1C 36 01 2A B6 1B 22 AF 1B CD 37 11 1F D2 AF T.6.*.."...7....
02F7A0: 13 CD 40 12 22 B4 1B 2A 85 1B 44 4D CD 24 10 C3 ..@."..*..DM.$..
02F7B0: 0A 14 3A 72 19 D6 0D D6 01 9F 21 54 1C A6 1F D2 ..:r......!T....
02F7C0: DC 13 21 AE 1B 36 01 2A AF 1B 22 B6 1B 2A B1 1B ..!..6.*.."..*..
02F7D0: 4D CD 4C 12 21 54 1C 36 00 C3 0A 14 3A 72 19 FE M.L.!T.6....:r..
02F7E0: 18 C2 0A 14 3A 54 1C 1F D2 F5 13 21 54 1C 36 00 ....:T.....!T.6.
02F7F0: 21 AD 1B 36 01 3A AE 1B 1F D2 0A 14 2A AF 1B 22 !..6.:......*.."
02F800: B6 1B CD 65 12 21 AE 1B 36 00 3A 72 19 32 73 19 ...e.!..6.:r.2s.
02F810: C3 BF 12 C9 CD 1B 14 CD 7E 14 C9 2A 38 1C 22 50 ........~..*8."P
02F820: 1C 22 4E 1C 21 00 00 22 52 1C 21 73 1C 22 B6 1B ."N.!.."R.!s."..
02F830: 01 38 1C 11 B6 1B CD 2C 19 D2 7D 14 2A 4E 1C E5 .8.....,..}.*N..
02F840: 2A B6 1B EB E1 73 23 72 CD E5 0F 2A 4E 1C 23 23 *....s#r...*N.##
02F850: 22 4E 1C E5 2A B2 1B 2B D1 CD 25 19 DA 73 14 CD "N..*..+..%..s..
02F860: C6 05 01 20 04 CD 0A 06 2A 52 1C 44 4D CD 7A 07 ... ....*R.DM.z.
02F870: CD 0B 01 2A 52 1C 23 22 52 1C C3 30 14 C9 2A 50 ...*R.#"R..0..*P
02F880: 1C 2B 2B 22 50 1C 2A 52 1C 22 55 1C 3E 01 21 55 .++"P.*R."U.>.!U
02F890: 1C CD 44 19 D2 52 15 0E 01 21 55 1C CD 12 19 EB ..D..R...!U.....
02F8A0: 2B 73 23 72 EB 11 52 1C CD 3C 19 22 57 1C 21 59 +s#r..R..<."W.!Y
02F8B0: 1C 36 01 3A 59 1C 1F D2 4F 15 21 59 1C 36 00 21 .6.:Y...O.!Y.6.!
02F8C0: 01 00 22 5C 1C 11 57 1C 01 5C 1C CD 2C 19 DA 4C .."\..W..\..,..L
02F8D0: 15 2A 55 1C EB 2A 5C 1C 19 22 5A 1C 2A 5C 1C 29 .*U..*\.."Z.*\.)
02F8E0: EB 2A 50 1C 19 E5 2A 5A 1C 29 EB 2A 50 1C 19 5E .*P...*Z.).*P..^
02F8F0: 23 56 E1 4E 23 46 CD 5B 15 1F D2 3F 15 2A 5C 1C #V.N#F.[...?.*\.
RESULT OF SEARCH :
PRO=169 CHEA=0 COD=55 MUSI=0 COP=23 GRA=41 WRIT=104 198=13 199=0 STARTER=0 KBI=0 CAAV=0 L.TOURNIER=0
EXTENDED CPC DSK File SAMdisk150708( RAFBGCHDIE!04 d(o&0#!*4(!!Fk Discette
read failure Press any key to restart!4 Cannot find ".EMS" file Press any key
to restart#Z 8! " ++( )8gJO.#EMS RAFBGCHDIE RAFBGCHDIEACCESS1 BOX0 !"#ACCESS2
BOX($%&'(ADDKEY BOX )*+,BTREE PAS -./0BTREE1 INC0123456BTREE2 INC8789C10CP
M3 EMS C10CPM3 EMSHCUSTOMERDTAABCDEDELKEY BOX8FGHIJKLGETKEY BOX0MNOPQRGINST
CODSTUVWXYZabGINST COD8cdefghiGINST COMXjklmnopqrstGINST DTA(uvwxyGINST
MSGzA86 2xA2AO!!r(rAr rg!+p+p## P+p+p!gi$P/x6T+r+s+q+r+sx)y12xH47.fwC(I7( R(Er
wZ.aBy'Jy-by3O"SZ2Xyy8zyyX/ 2Yyyy!.Zaiax7KZ*XX(x8x0zINSTALL1DOC(INSTALL2DOC8READ
ME SORT1 BOX8SORT1 PASSORT2 BOXSORT2 PAS STOCK DTA(£TYPE COMXRE
F COM8 xX(xxf0 YyX x7x yxyYyyh"6vogQK£ypAhE4# 2h-Mly*iKy 8*Dy(!ZDU!pZ!Z*D!"iF
##0##V*7cbY32U 02kU 0*joMU U U U 5 9"yxwvurqpolkJjifieldmNM£LKJIHEErDCBA10!r!lB
K!"n!"n!z6*y/2z2y!"G!# #((&j(k(b(8 08B0# hyAO*2!! rxr222r2h Ofy2x!6 #"!u2!"4*q#6
"Kx"*,&uZ*uD48Okb !4* !#"O$,uyZ7W2*2222/2!""&2(!6 2C!O *eo(%"*Miy,"-(.$z0%MZ2%L-
H$7,4%W-,*g&."$0!*0kz0b"*eo,$u"Zli,G*U&o,xDZ(Wl&,Plgg,$uZ!w28OG 2(( 2 8x/Gy/OOOz
W12 !I!6! !!!!!)!/!1!R!!/w!Aw!XYGw% !#Z 8 This program will not run in this en
vironment. Press any key £Z mEK£pc/BgrO!!"!H2PY!B!2 RAFBGCHDIE8,MNi(,O!,!Pq,
O WXOzg 0/(0O/O, zWgzWg+ 2oo&b W W Nwy##n&)))###£### 2!06#! /#foVVV onf"cn"2
I6fffffffffflffflbhxhbbhxhffffffffxflxlfbfffvfflfffZfffffffffffl88lfff2f0000000x
vfffffvf60x00xfffff8ffflxl8lfffffffffvv00006fffffffll8lfffL2pppv8ll8I6o2ng"2j"2!
"ox2a" zWxGz8/WxO*!!17 !!!!CmyO!$(A*R$(*RZ( &!,( !%. !7 C x( 6 V F# Z 0!667F
, Z 0r6 Vyz0/GVyVzV$$$''$$$$$' $$$$$$$$ '$$$$' '$$$$$$$$$$$$$$$$$$$$$$$$xvfff
8D8ff8DD8t44408l8DLTLRDb3ff3f3f0ff6000fff08l FIFf&I88ll888ffBfUQQQ Q .- y #7((
(#7#7 7m VyVV!x0xw#+r$ $ O##V###F##V VyV Wx08Q y*((*!/w ,!y2&T))!!VI x
VI£ x I*0ff000fff0ffffffffffffffffff0ff000fff0ffffffffffffffffffffffxffzf2Lfvnf
2Lff2Lfff000f02L0xv0f080ff0ffffxvfff8fffffff0xv0f080ff0ffffffffxvfff8ffffffflnxv
zf2Lfff2Lxv2Lff00$$ not ready writprotected seek failno msing addmark bad fmat
unknown CP/M Plus Amstrad Consumer Electronics plcv ., 61K TPA12s1 serial portK
M Pleasput f inton pany key not ready Driv drive track or theress , e isdata
- RetryIgn Cancelsect dc err*!/VCRT LPT SIO 2Cy*X!***l***** **2Y2Xy"##*
s1d#VX2KC2s1dK2!28"9!2"*2".! CYY(B0O!YZ!x ffBB88llBB$$ffllllll0 $ff$lssffffffff
008ll808lfffllllffpsff8lffffllllllllX0f8l8vv00000ff008ll88fffflbffffffffffff0000
0ff RAFBGCHDIEztwC*9"!"921d1Nj$#2###82#*7!""++"729C4w"*7#Vz!7c!c! Jw"*q769 !-*7
"7*7""! 2*i7#V+ (d!7K*7 *))7K7) O"!w OWGzO7VxGyOGxwq*7d*i7#V7w7w7"72d#29&22#!
)xBB+"o2777"9OG#Qozg# ""!2*%DM**+))H#+#77o77007*",!."*K6*.og"($Kt2(*f*(DQ"(QKQK
QQ"%Q9*7*7"7*7x"7xm*7#V*7 s#r*7*7s#r*77Y4Y*7*7#ng *7 s#r #Va9##7)0"7xx!"7"7"7X9C
*79*7"7979!79999*7"7x"78*9"g7*397Oi9H97Gi9a967G/O*77*7W7T88a9886*77X9)!77T-q9k-8
!77868wq9X9)6#7!!*$K*"x!*!$hKKK#w*NK*NK#V#N#F!xQGQx3bqo5p5"""*!yb!G*!NK2!,"**NK6
+OK2$#V#N#FxNp$pGjxjY#AQFQKKK ! 669BK! OS7X8#V!"778!8#V*7 8"7"7x8!7!*7X8*78Q972
7279"7!"X98#cdfg!"()*N!7r)!7N/!)z£*)3"!"X7*7w7w#7w*2*D(06/62#(//.66666w6/27#07w!
/6p6!76N654321$Nwy!"(9"f1f!2!#foCOPYRIGHT (C) 1982, DIGITAL RESEARCH 15128222dLz
N#V !O!!M8GW x(v* M!qOWG*!CX2izn&2y2!/og2N7 08G 7w6/B/p/!g-s.r--�S6)6/w-s.$-
&F#pN#!£7455Op#5-*6!#5p$*6 (#52(/0/0//./w*o#q55""5 6!$4X5#wO'7'g5w#w#6##)"5 *g5G
++!o#T! 6* *#K"G*xr--&x..+$ ,7,$$( !S0# w*) *) (AIFbh)))y2!2!CC *!I 0"!!8+w7
) /I/ !xog ( 6'i1d!""&"!&GS" g.""c!$*#"+'ww*)0! + 9 b # RAFBGCHDIEw" 474R!3H77
c!o#E4#V)3G##!4b44k44##N#F##V##foo$$22g-*w7"333+3*7#og7O*s#r#w!w/w//.H*e7)4g-04"
!k-*w7)3*c7)3-&&#k-*s7"73r2-,-,--//*e7W£*c7"e7£og"c72722(2#%$/*227/wB/p6+%027w!A
!P1 20/W*O2$R&*e7)37r7O **AO7*x*yp!7V+*Wy/27o)7B* 4!gOEK wK w279 7272*)F67/G7)7)
O*G7)OzW))7)*7)BKN") z)yG7!7)vq(vvM))!T!"777G7O7h)277r)yy/W!77l)'w##27(4(((7((((
&A!X27rK 7w++wv4#O(57v4-'&(!27X(-c*27Z T --&(&!32#20Y2s.Y2/Y2/Y2.7.(!A!s.27202$%
// -A!'41k--11Z T -1*o"!"!!#O#$"716%- 127$A!s.v10N10N1v1$%/W1+%0v1w !v1$%/r1/r1.
7r1.27+%A!20r!Z32!"!g-72T --&0227&0!7w (27*6#$&0!O0w71*!"*o+"v! (*!b7"#$" r#w#r#
L(J0 L(v %wb O#('w''''''#' # x'#'w'''''w wb "!!$!'x'w676#+w#w+'w2 K !'OFq-'y&l
'Np&#g5£7'$#( %$&%#H&&27x..#&)7&O#w!$#&b ++V * )#Os++r) u/G*g7!x0*o7y 7/G## 60K
F6##N6#/2p##q/#*w#2*p !*"v *w#) 6#////0!N#Fx/T### / / *4/# '/ 4/!7*/ /33G# P/v/
dv/6 y//2 !7)#w*"#.0.!7Fw../.7w !"227 ./*w%"!Gw#%*#$%&+ *9&2# &*w-&x..$H&"70&*7#
#2%%H&$E%## %7%60%w!"$%PY*7z%BKN"%y%N"%%p"y%!& 2 ($*7w#$*" (#$27$#% k%7( s.%*9&%
%s.%/%.%#G7$27x$# W$7$$$272G$"Grx$$7$27$$##$*$$*"2""!$.603!!i ."!6*e7)Q.!7Q-X.-.
k-*7#V!! .*o7s.q7w 2727-*27w#27wZ !""272*2727-27k-*w X!-/.!6X!*W#x#Ws+p+q7r#r#r
#- ,, -$2- ,!!q#p#w27wW*e7 3-!7s7!7x-Q-"*&,.,(.,A!rr##sr+(+c*N!OGG!Goy27k$"!$*7*
$i $ O$27W$W$$27$y$$x $$$$$N7r7/GyOOA +# #y27£7x#o&7WOE7#N/*"7y227##" R!X!"DM*w7
6#x #*o7w*7*w7s#r*i76#6"*7"7"!j *7!8#8# t#n#"v 8#*o7wn#TKK""*w7"w7""w7 £7"N" N#
Fy"*7h"#"*7#!6"*q7"G.,! wck,!,!x,!,#,#P,P,vqO-'&,'.,(!Vq##w7!7WM)++7+!TJ!7!7+x!7
+w4 +P*W*+P**!!#O#F s+Os#r(+y+*7!7W*y7#Vx7+27w!w#K+WK+*7"7J!T*77+"+ !S0X7*q(*!7
7*27+27*ODM%*r"7"727727*£77+ RAFBGCHDIE!"""*7*#" "&"27! 0"!+!!yWiDM*w7b"N"p"w"D
M*w7e! #V#27!9 !"7*y7!*7X8*!!"*g7*K!wb ##w#w!!r!#G#!*q7#!7!7 !7 $!6k-!"27*q7N1q
*7!*7!*y7#V7t!6 #Vozg*7*7g *u7*7 R!22 Z3w*q7ww7c7 *7#*i7s#r* 7!72+2*jx.#NzW!
2W!5xzm*#wO2!*(5WjM2x*(+w"(j!%"(-*$PW2xMs92*9x+qx2**&2+o#"&!+6MW2x*(+"(w2*2*(+w"
(G)e77O!*c77O 2 *g77o$*K 6wK w**i7#zi r+s7O7w47wr##rp# go*g7 #G 1*q77*w** * r
27"77O7G27!7w*zWw+ !z#*!**G!O27m#O&t2772gDM*70MD"7!*MD$7O!7N7 GO7 *£7n#fo27O"77
O*7"7+2 5*(o#"(M*(Uoj*(#"(!*6s!+6+xo2#w2.+.2-!%"(2*!"&!*42-G2+22*N#G22GH)+62,!-
,!+*(L#Bxz**(Or ! O(*(2**!#!""*(#wxH!)6"&! x!7s#r#p*k7N#F*m7#V#F*77Oy9*7+"*7yP
#9*7*7DM"7*k7s#r*m7s#r#pyox*k7w#w*m7w#w#w27'27*Oy*e7 0!77!72*7*"74#4#4)77 # w#
*J#V#"i7##"k7##"m7###"o7#"q7##"7!s7 )*s7!7)*7!£7667rrorFile Exists in Filename27
a."725757772272zWzW )75y 5 6y(O7yI e zz#! Gxwwz!wzxzzG/xy!4 n!6Gx P Pn6t6! 6t6
u)!*"r*r"!g!*fD! 6t!rO( CP/M Error On Disk I/OInvalid DriveRead/Only FileRea
d/Only DiskPassword EFunction File !,$"h!9"f!27t!HgoO**7A2/0!d61#d p#w#6 !
66 *#!)6.#) O(BDOS wM 2*7w#6#7 .,!45#Raip# l ss llsMAw#M.sM! !)3"!z£rs#V#N#FxN
o(#ry %z$rr6r9rMDo!6!h nt2 r62rz£*9x)**(+"(w++2+2+p!" RAFBGCHDIE33#3-3A3J3S3-Y
3uuJ3$uu33333*4P43456(6d66677'7AgXJv!)3*#V##Vw# ll!J#V#!"(COPYRIGHT (C) 1982, DI
GITAL RESEARCH 151282/(+170000111112 222233 654321"y2!"72727!4#.27!""9"2!7y3K!ob
$$!,#V* LOADER y!91""0!z * ""*og*%DS ! 6 *.pr x,!2 s 2 ! D ! .44 #4"l * 2 a7 7
w!Y #! *l "l " U #D T!6*%.w#w! 6 r 6 #w.6#6#t#6.wo*.s#r.rm. #V45+ w#w.f.5A "
l " l F# !(!(x.+"l ! !G8* #1A *l g #I*l *l 0qXx#N#F#4#V*.w*DM!&*.& ks#rr+6.""
1*D.45.F..#Vx.s#rz 6#N#fi%$g1vvp3g"TX3*jP#R#Lgbk#N#Fk$&Zcx#oo1!!"w*wWx#&*.s*" C
annot load Program$221282 COPYR '82 DRI AXQXX#k#*jT# wy#! 4 !*hywy/w*hw*hIE %
0 #*A !g 6* *A *l " 0q"l x0 xG#Gs&&% o$! #x #Enter User # $No File$ required$ER
ASE $ (Y/N) $ Press RETURN to Continue $ (User 0)$NON-SYSTEM FILE(S) EXIST$
$$$ SUBbHA$DH A!" $$2M X XXS1-!j 1".2.2 Xck*kb .$.w.6#w.6#w.61. .w.p T+.!
y.w2g !PROFILE.S!+2 !+d O! w+w+ w!5cp mN .+w.2 9 ! ## !7 ! x*l " !ZX! 6 zz 6
%2p 2r DIR TYPE ERASE RENAME DIRSYS USER u"Qpr AR N !M 545x 6 oG! 2M xff! 2 l
fR LL I* * AYl ! 6&%* "l 45wA IN SUBMIT COM!! 6 #"l !c O!r g. yv -Ti!B I!p#
VCOM SUB PRL y!c !" * %.2P#!g 4*l +"l 2 "Qx2Sl "Tx2V!q p .2* og$2.w#w#w#w. .w#ww
! #49w#$ A I! 6 ! #6m RAFBGCHDIE1CP/M Version 3.0COPYRIGHT 1982, DIGITAL RESE
ARCH151282654321 Press RETURN to Continue $ ERROR Not typed $Password $No Fi
le$ BDOS Bad Sector$ Invalid Drive$Currently Opened$Password Error$ERROR $Inva
lid or missing delimiter(s) $Try 'PAGE' or 'NO PAGE' $Requires CP/M 3.0$Enter fi
le $ $ERROR Invalid file name. $11u"*0*HJO/4(N2i!6 *&6!6!4*&i#V##foywOGLxAwO.O6
.ae#6g33yy#q#p#w!!#*6w333333.33,#w#6 O O 6.,/a3 FFiN#Fogo&ogz#Wa**&**& *&w2!6+6!
" !" "Ogl,v!6W ***#" *N*#"*O* H*#"!6 *P!6*#"**H$*A0*#"**HT*G*#"**H*E*#" **H/2
2!6!6O2(***********************************************************) (*
*) (* TURBO-access v
ersion 1.00 (CP/M-80) *) (*
*) (* ACCESS module *)
(* *) (*
Copyright (C) 1984 by *) (* BORLAN
D Int. *) (* . -v! q* &! p+q* ! s+p+q* w#6* * #" N#F
y! p+q* ! p+q* ! p+q* ! p+q* ! q* &-! p+q* ! q 2 ! 6 1! q 2 ! 6 1! r+s+q 2 ! 6
* #s#r 1m % %!% s+q+p+q% 2% *" $ w*" #"" p52& a& & & XXl c!' 6!' 62( *' &l( w(
6( ( *) (******************
*****************************************) (*$A+,I-,R-*) type TaStr14
string14 DataFile record case Integer of
0 (F file of Byte FirstFree,
NumberFree, Int1, Int2
Integer) 1 (Fil1 array1..4 of Byte
NewRec, $' ' 2' O!l6 ( /!' 42( !) q) R) c) t) ) !+ p+q** ** O%%!
, 6!, , .%*, &** 2- *- M%!, 4!. q. . 1!0 p+q*/ H*/ #"/ */ K!2 p+q!3 6#63 *1 s!
4 6!3 4*1 #"1 4 2!52 %!6!6l2!6"**2% RecL,
TaRec, Fil2 Integer TaDri
ve Byte TaName array1..8 of Char
TaType array1..3 of Char) end TaKeyStr string
MaxKeyLen TaItem record DataRef,PageRef Integer
Key TaKeyStr end TaPage record
ItemsOnPage 0..PageSize Xl2" %*M*! 6!6/H!6!*&2!652 *M%!4w26 6
6 o&"7 E"9 G" I" " "A "C .*7 DM -J 2X%X*9 E)* G)* I)* )*A )*C )! e .* - 26 * *H
*#" ! RAFBGCHDIE BckwPageRef Integer ItemArray arr
ay1..PageSize of TaItem end TaPagePtr TaPage TaSearchSte
p record PageRef,ItemArrIndex Integer
end TaPath array1..MaxHeight of TaSearchStep IndexFile re
cord DataF DataFile AllowDuplKeys Boolean
KeyL,RR,PP Integer Path TaPath
end IndexFilePd end procedure OpenFile(var DatF DataFile
FName TaStr14 RecLen Integer) begin
Assign(DatF.F,FName) Reset(DatF.F) IOstatus IOresult OK(IOstatus 0
) or (IOstatus $90) if OK then begin DatF.RecL RecLen GetRec(D
atF,0,TaRecBuf) Move(TaRecBuf,DatF.FirstFree,8) end end procedure Cl
oseFile(var DatF DataFile) begin Move(DatF.FirstFree,TaRecBuf,8) PutRec(
DatF,0,TaRecBuf) Closetr IndexFile TaStackRec record
Page TaPage IndexFPtr IndexFilePtr
PageRef Integer Updated Boolean end
TaStackRecPtr TaStackRec TaPageStack array1..PageStackSize of TaStackRec
TaPageMap array1..PageStackSize of Integer TaRecordBuffer
record case Integer of 0 (Page TaS
tackRec) (DatF.F) IOstatus IOresult TaIOcheck(DatF,0)
end procedure AddRec(var DatF DataFile var R Int
eger var Buffer ) begin if DatF.FirstFree - 1
then R DatF.NewRec else begin R DatF.FirstFree GetRec(Dat
F,R,TaRecBuf) Move(TaRecBuf,DatF.FirstFree,2) DatF.NumberFree DatF.Nu
mberFree - 1 end PutRec(DatF,R,Buffer) end procedure DeleteRec(var Dat
F DataFile 1 (R array1..MaxDataRecSize of Byte)
end var IOstatus Integer OK Boolean TaRecBuf Ta
RecordBuffer TaPageStk TaPageStack TaPgMap TaPageMap procedure TaIO
check(var DatF DataFile R Integer) begin if IOstatus 0 then with DatF do
begin Writeln Writeln('TURBO-access I/O error ',IOstatus) Writ
eln('file ',Chr(TaDrive + 64),'',TaName,'.',TaType,' record ',R) Writeln('P
rogram terminated') Halt end R Integer) begin Move(DatF.First
Free,TaRecBuf,2) PutRec(DatF,R,TaRecBuf) DatF.FirstFree R DatF.Number
Free DatF.NumberFree + 1 end function FileLen(var DatF DataFile) Integer
begin FileLen DatF.NewRec end function UsedRecs(var DatF DataFile) In
teger begin UsedRecs DatF.NewRec - DatF.NumberFree - 1 end DatF.NumberFr
ee - 1 end PutRec(DatF,R,Buffer) end procedure DeleteRec(var DatF Dat
aFile end procedure GetRec(var DatF DataFile
R Integer var Buffer ) var
B Byte absolute Buffer begin Seek(DatF.F,R) Read(DatF.F,B) IOstatus
IOresult TaIOcheck(DatF,R) end procedure PutRec(var DatF DataFile
R Integer var Buffer ) var
B Byte absolute Buffer begin Seek(DatF.F,R) Write(DatF.F,B) IOsta
tus IOresult TaIOcheck(DatF,R) end procedure MakeFile(var DatF Data
File FName TaStr14 RecLen Int
eger) begin Assign(DatF.F,FName) Rewrite(DatF.F) IOstatus IOresult
if IOstatus 3 then OK false else begin TaIOcheck(DatF,0)
DatF.RecL RecLen DatF.FirstFree -1 DatF.NumberFree 0 DatF.Int
1 0 DatF.Int2 0 Move(DatF.FirstFree,TaRecBuf,8) PutRec(DatF,0,T
aRecBuf) OK true en R A F B G C H D I E procedure InitIndex var
I Integer begin for I 1 to PageStackSize do begin TaPageStkI.Index
FPtr nil TaPageStkI.Updated false TaPgMapI I end end procedu
re TaPack(var Page TaPage KeyL Integer) var I Inte
ger P array0..MaxInt of Byte absolute Page begin if KeyL MaxKeyLen then
for I 1 to PageSize do Move(Page.ItemArrayI,P(I - 1) * (KeyL + 5)
+ 3,KeyL + 5) end procedure TaUnpac (PageRef R)
then begin I J Found true end if not Found then begin
I TaPgMap1 with TaPageStkI do begin if Updated then
begin TaPack(Page,IndexFPtr.KeyL) PutRec(IndexFPtr.DataF,Page
Ref,Page) end GetRec(IdxF.DataF,R,Page) TaUnpack(Page,IdxF
.KeyL) IndexFPtr Ptr(Addr(IdxF)) PageRef R Updated fal
se end end TaLast(I) Pgk(var Page TaPage
KeyL Integer) var I Integer P array0..MaxInt of Byte absolute Page
begin if KeyL MaxKeyLen then for I PageSize downto 1 do Move(P
(I - 1) * (KeyL + 5) + 3,Page.ItemArrayI,KeyL + 5) end procedure MakeIndex(v
ar IdxF IndexFile FName TaStr14
KeyLen, S Integer) var K Integer b
egin K (KeyLen + 5)*PageSize + 3 Ptr Ptr(Addr(TaPageStkI)) end proced
ure TaNewPage(var IdxF IndexFile var R Integer
var PgPtr TaPagePtr) var I Integer begin I TaPgMap1
with TaPageStkI do begin if Updated then begin TaPack(Page
,IndexFPtr.KeyL) PutRec(IndexFPtr.DataF,PageRef,Page) end AddR
ec(IdxF.DataF,R,Page) IndexFPtr Ptr(Addr(IdxF)) PageRef R Upd
ated false end TaLast(I) MakeFile(IdxF.DataF,FName,K) IdxF.AllowDupl
Keys S 0 IdxF.KeyL KeyLen IdxF.RR 0 IdxF.PP 0 end procedure
OpenIndex(var IdxF IndexFile FName TaStr14
KeyLen, S Integer) var K
Integer begin K (KeyLen + 5) * PageSize + 3 OpenFile(IdxF.DataF,FName,K
) IdxF.AllowDuplKeys S 0 IdxF.KeyL KeyLen IdxF.RR IdxF.DataF.Int1
IdxF.PP 0 end PgPtr Ptr(Addr(TaPageStkI)) end procedure TaUpdate
Page(PgPtr TaPagePtr) var P TaStackRecPtr absolute PgPtr begin P.Updat
ed true end procedure TaReturnPage(var PgPtr TaPagePtr) var P TaStack
RecPtr absolute PgPtr begin with P do begin DeleteRec(IndexFPtr.Data
F,PageRef) IndexFPtr nil Updated false end end procedure Ta
XKey(var K KeyL Integer) var Key TaKeySt
r absolute K begin procedure CloseIndex(var IdxF IndexFile) var I Integer
begin for I 1 to PageStackSize do with TaPageStkI do if Index
FPtr Ptr(Addr(IdxF)) then begin IndexFPtr nil if Upda
ted then begin TaPack(Page,IdxF.KeyL) PutRec(IdxF
.DataF,PageRef,Page) end end IdxF.DataF.Int1 IdxF.RR Clo
seFile(IdxF.DataF) end procedure TaLast(I Integer) var J,K Integer be
gin J 1 while ( if Ord(Key0) KeyL then Key0 Chr(KeyL) end funct
ion TaCompKeys(var K1, K2
DR1, DR2 Integer Dup
Boolean ) Integer var Key1 TaKeyStr absolute K1 Key2 TaKeyStr absolu
te K2 begin if Key1 Key2 then if Dup then TaCompKeys DR1 - DR
2 else TaCompKeys 0 else if Key1 Key2 then TaCompKeys 1
else TaCompKeys - TaPgMapJ I) and (J PageStackSize) do J J + 1
for K J to PageStackSize - 1 do TaPgMapK TaPgMapK + 1 TaPgMapPageS
tackSize I end procedure TaGetPage(var IdxF IndexFile
R Integer var PgPtr TaPagePtr) var I,J,K
Integer Found Boolean begin Found false for J 1 to PageStackSize do
if not Found then with TaPageStkJ do if (IndexFPtr Ptr(Ad
dr(IdxF))) and RAFBGCHDIE1 end procedure ClearKey(var IdxF IndexFile)
begin IdxF.PP 0 end DR1,
DR2 Integer Dup Boolean ) Integer var Key1
TaKeyStr absolute K1 Key2 TaKeyStr absolute K2 begin if Key1 Key2 the
n if Dup then TaCompKeys DR1 - DR2 else TaCompKeys 0 els
e if Key1 Key2 then TaCompKeys 1 else TaCompKeys - .ItemAr
rayI ItemArrayI + Order + 1 PagePtr2.ItemArrayR ProcItem1 fo
r I R + 1 to Order do PagePtr2.ItemArrayI ItemArrayI + Order
end ItemsOnPage Order PagePtr2.ItemsOnPage Order PageP
tr2.BckwPageRef ProcItem2.PageRef ProcItem2.PageRef PrPgRef2 Pr
ocItem1 ProcItem2 TaUpdatePage(PagePtr2) end end TaUpdatePag
e(PagePtr1) end begin if PrPgRef1 0 then begin(**********************
*************************************) (*
*) (* TURBO-access version 1.00
*) (* *) (*
ADDKEY module *) (*
*) (* Copyright (C) 1984
by *) (* BORLAND Int.
*) ( PassUp true with ProcItem1 do begin Key PKey
DataRef ProcDatRef PageRef 0 end end else begin
TaGetPage(IdxF,PrPgRef1,PagePtr1) with PagePtr1 do begin L
1 R ItemsOnPage repeat K (L + R) div 2 C Ta
CompKeys(PKey, ItemArrayK.Key,
ProcDatRef, ItemArrayK.DataRef,
IdxF.All* *) (*****
******************************************************) (*$A+,R-*) proced
ure AddKey(var IdxF IndexFile var ProcDatRef Integer
var ProcKey ) var PKey TaKeyStr absolu
te ProcKey PrPgRef1, PrPgRef2, C,I,K,L Integer PassUp Boolean
PagePtr1, PagePtr2 TaPagePtr ProcItem1, ProcItem2 TaItem (*$
A-*) procedure Search(PrPowDuplKeys ) if C 0 then R
K - 1 if C 0 then L K + 1 until R L if L -
R 1 then begin OK false PassUp false end
else begin if R 0 then Search(BckwPageRef) el
se Search(ItemArrayR.PageRef) if PassUp then Insert end
end end end begin with IdxF do begin TaXKey(PKey,KeyL)
OK true Search(RR)gRef1 Integer) var R Integer (*$A+*) proce
dure Insert begin TaGetPage(IdxF,PrPgRef1,PagePtr1) with PagePtr1 do b
egin if ItemsOnPage PageSize then begin ItemsOnPage ItemsOnPa
ge + 1 for I ItemsOnPage downto R + 2 do ItemArrayI ItemArray
I - 1 ItemArrayR + 1 ProcItem1 PassUp false end else
begin TaNewPage(IdxF,PrPgRef2,PagePtr2) if R Order then
begin if R O if PassUp then begin PrPgRef1 RR
TaNewPage(IdxF,RR,PagePtr1) with PagePtr1 do begin I
temsOnPage 1 BckwPageRef PrPgRef1 ItemArray1 ProcItem1
end TaUpdatePage(PagePtr1) end end end end e
nd end end begin with IdxF do begin TaXKey(PKey,KeyL) OK
true Search(RR)rder then ProcItem2 ProcItem1 else
begin ProcItem2 ItemArrayOrder for I Order down
to R + 2 do ItemArrayI ItemArrayI - 1 ItemArrayR + 1
ProcItem1 end for I 1 to Order do PagePtr2.ItemAr
rayI ItemArrayI + Order end else begin R R - Ord
er ProcItem2 ItemArrayOrder + 1 for I 1 to R - 1 do
PagePtr2 RAFBGCHDIEprogram DataBase (*$A+,C-,R-,V-*) (**************
**************************************************) (*
*) (* TURBO-access versio
n 1.00 *) (*
*) (* DATABASE example
*) (* *) (*
Copyright (C) 1984 by IndexFile, NameIndexF
ile IndexFile Ch Char (*$I BTREE1.INC*) (*$I BTREE2.INC*)
(* Main program *) begin ClrScr Writeln(ConstStr('-',79)) Write
ln('TURBO-Access Customer Database') Writeln(ConstStr('-',79)) GotoXY(1,22
) Writeln(ConstStr('-',79)) Writeln Write(ConstStr('-',79)) GotoXY(1,4)
InitIndex OpenFile(DatF,'CUST.DAT',CustRegSize) if OK then OpenIndex
(CodeIndexFile,'CUST.IXC',15,0) if OK then OpenIndex(NameIndexFi *) (*
BORLAND Int. *) (*
*) (**************************
**************************************) label Stop const (* data rec
ord Size definition *) CustRegSize 342 (* customer record Size *)
(* TURBO-access constants *) MaxDataRecSize CustRegSize (* max reco
rd Size *) MaxKeyLen 25 (* max key Size *) PageSize
16 le,'CUST.IXN',25,1) if not OK then begin Select('Data
files missing. Create new files (Y/N)', 'Y','N', Ch) if Ch 'Y' then b
egin MakeFile(DatF,'CUST.DAT',CustRegSize) MakeIndex(CodeIndexFile
,'CUST.IXC',15,0) MakeIndex(NameIndexFile,'CUST.IXN',25,1) end
else goto Stop end GotoXY(60,2) Write(UsedRecs(DatF)5,' Records in use')
repeat Select('Select U)pdate, L)ist, Q)uit', 'U','L','Q', Ch) case
Ch of 'U' Update (* page Size *) Order 8
(* half page Size *) PageStackSize 5 (* page buffer S
ize *) MaxHeight 5 (* max B-tree height *) var N
oOfRecs Integer (* include TURBO-access modules *) (*$I ACCESS1.BOX
*) (*$I ACCESS2.BOX*) (*$I GETKEY.BOX*) (*$I ADDKEY.BOX*) (*$I DELKEY.BOX*)
type Str5 string5 Str10 string10 Str15 string15 Str2
5 string25 Str80 string 'L' List end if Ch 'Q' then C
learFrame until UpCase(Ch) 'Q' CloseFile(DatF) CloseIndex(CodeIndexFil
e) CloseIndex(NameIndexFile) Stop ClrScr end. MakeIndex(NameIndex
File,'CUST.IXN',25,1) end else goto Stop end GotoXY(60,2) Write(
UsedRecs(DatF)5,' Records in use') repeat Select('Select U)pdate, L)ist
, Q)uit', 'U','L','Q', Ch) case Ch of 'U' Update 80 AnyStr
string255 (* character set type *) CharSet set of Char (* customer r
ecord definition *) CustRec record CustStatus Integer
(* CustStatus *) CustCode string15 (* customer code *
) EntryDate string8 (* entry date *) FirstN
ame string15 (* first name *) LastName string30 (* l
ast name *) Company string40 (* company *)(* UpcaseStr c
onverts a string to upper case *) function UpcaseStr(S Str80) Str80 var
P Integer begin for P 1 to Length(S) do SP Upcase(SP) UpcaseStr
S end (* ConstStr returns a string with N characters of value C *) fu
nction ConstStr(C Char N Integer) Str80 var S string80 begin if N 0
then N 0 S0 Chr(N) FillChar(S1,N,C) ConstStr S end (*
Beep sounds the terminal bell or beeper *) procedu Addr1
string40 (* Address 1 *) Addr2 string40 (* Addres
s 2 *) Phone string15 (* Phone number *)
PhoneExt string5 (* extension *) Remarks1 string40
(* remarks 1 *) Remarks2 string40 (* remarks 2 *)
Remarks3 string40 (* ramarks 3 *) end var (*
global variables *) DatF DataFile Code R A F B G C H D I Ere
Beep begin Write(G) end procedure InputStr(var S AnyStr
L,X,Y Integer Term CharSet
var TC Char ) const UnderScore '' var P Integer C
h Char begin GotoXY(X + 1,Y + 1) Write(S,ConstStr(UnderScore,L - Length(S))
) P 0 repeat GotoXY(X + P + 1,Y + 1) Read(Kbd,Ch) case Ch of
#32..#126 if P L then begin if Le
nddress 1 ') GotoXY(2,11) Write('Address 2 ') GotoXY(6,13) Write('Phone ')
GotoXY(29,13) Write('Extension ') GotoXY(2,15) Write('Remarks 1 ') Got
oXY(2,16) Write('Remarks 2 ') GotoXY(2,17) Write('Remarks 3 ') end (* C
learForm clears all fields in the entry form *) procedure ClearForm begin
GotoXY(13,5) Write('' 15) GotoXY(35,5) ClrEol GotoXY(13,7) Write('' 15)
GotoXY(40,7) ClrEol GotoXY(13,9) ClrEol GotoXY(13,10) ClrEol GotoXgth
(S) L then Delete(S,L,1) P P + 1
Insert(Ch,S,P) Write(Copy(S,P,L))
end else Beep S if P 0 then
P P - 1 else Beep D if P L
ength(S) then P P + 1 else Beep
A P 0 F P Length(S) G if P Length(SY(13
,11) ClrEol GotoXY(13,13) Write('' 15) GotoXY(40,13) ClrEol GotoXY(13,1
5) ClrEol GotoXY(13,16) ClrEol GotoXY(13,17) ClrEol end procedure In
putCust(var Cust CustRec) const Term CharSet E,I,M,X,Z var L Integ
er TC Char begin L 1 with Cust do repeat case L of 1
InputStr(CustCode,15,12,4,Term,TC) 2 InputStr(EntryDate,8,34,4,Term,TC)
3 InputStr(FirstName,15,12,6,Term,TC) 4 InputStr(La) then
begin Delete(S,P + 1,1)
Write(Copy(S,P + 1,L),UnderScore) end H,#127 if P
0 then begin Delete(S,P,1)
Write(H,Copy(S,P,L),UnderScore) P P - 1
end else Beep Y begin
Write(ConstStr(UnderScore,Length(S) - P)) Delete(S,P
+ 1,stName,30,39,6,Term,TC) 5 InputStr(Company,40,12,8,Term,TC) 6
InputStr(Addr1,30,12,9,Term,TC) 7 InputStr(Addr2,30,12,10,Term,TC)
8 InputStr(Phone,15,12,12,Term,TC) 9 InputStr(PhoneExt,5,39,12,Term
,TC) 10 InputStr(Remarks1,40,12,14,Term,TC) 11 InputStr(Remarks2
,40,12,15,Term,TC) 12 InputStr(Remarks3,40,12,16,Term,TC) end
if (TC I) or (TC M) or (TC X) then if L 12 then L 1
else L L) end else if not (Ch in Term) then Beep
end of case until Ch in Term P Length(S) GotoXY(X + P + 1,Y + 1)
Write('' L - P) TC Ch end procedure Select( Prompt Str80
Term CharSet var TC Char ) var
Ch Char begin GotoXY(1,23) Write(Prompt,' ' ) ClrEol repeat Read(K
bd,Ch) TC Upcase(Ch) if not (TC in Term) then Beep until TC
in T L + 1 else if TC E then if L 1 then L 1
2 else L L - 1 until (TC M) and (L 1) or (TC Z) end (* OutC
ust displays the customer data contained in Cust *) procedure OutCust(var Cus
t CustRec) begin with Cust do begin GotoXY(13,5) Write(CustCode,''
15 - Length(CustCode)) GotoXY(35,5) Write(EntryDate) ClrEol GotoXY(13
,7) Write(FirstName,'' 15 - Length(FirstName)) GotoXY(40,7) Write(LastName)
ClrEol erm Write(Ch) end (* ClearFrame clears the display frame, I.E. L
ines 3 to 20 *) procedure ClearFrame var I Integer begin for I 3 to
20 do begin GotoXY(1,I + 1) ClrEol end end (* OutForm displays
the entry form on the screen *) procedure OutForm begin GotoXY(7,5) Writ
e('Code ') GotoXY(29,5) Write('Date ') GotoXY(1,7) Write('First name ')
GotoXY(29,7) Write('Last name ') GotoXY(4,9) Write('Company ') GotoXY(2,1
0) Write('A RAFBGCHDIE GotoXY(13,9) Write(Company) ClrEol GotoXY(13,10
) Write(Addr1) ClrEol GotoXY(13,11) Write(Addr2) ClrEol GotoXY(13,13)
Write(Phone,'' 15 - Length(Phone)) GotoXY(40,13) Write(PhoneExt) ClrEol
GotoXY(13,15) Write(Remarks1) ClrEol GotoXY(13,16) Write(Remarks2) ClrEol
GotoXY(13,17) Write(Remarks3) ClrEol end end ntryDate) ClrEol
GotoXY(13,7) Write(FirstName,'' 15 - Length(FirstName)) GotoXY(40,7) Writ
e(LastName) ClrEol OutCust(Cust) end else
begin GotoXY(6,19) Write('ERROR Customer code not found'
) Beep end end until OK or (Ccode '') GotoXY(6,19) Cl
rEol if Ccode '' then begin L 1 FirstNm '' L
astNm '' repeat case L of 1 InputStr(FirstNm,15,12,
6,I,M,Z,TC) 2 InputStr(LastNm,30,39,6,I,M,Z,TC) end
if (TC I) or (TC M) then L 3 - L until (TC M) and (L 1
) or (TC Z) KeyN KeyFromName(LastNm,FirstNm) SearchKey(NameInde
xFile, D,KeyN) if not OK then PrevKey(NameIndexFile,D,KeyN)
repeat GetRec(DatF,D,Cust) OutCust(Cust) Select(
'Find N)ext, P)revious, Q)uit','N','P','Q',Ch) case Ch of '
N' repeat NextKey(NameIndexFile, D,KeyN) until OK 'P' repeat PrevKe
y(NameIndexFile, D,K function KeyFromName(LastNm Str15 FirstNm Str10) Str25
const Blanks ' ' begin KeyFromName UpcaseStr(LastNm) +
Copy(Blanks,1,15 - Length(LastNm)) + Upcase
Str(FirstNm) end (* Update is used to update the data base *) procedure
Update var Ch Char (* Add is used to add customers *) procedure Add
var DataF Integer Ccode string15 KeyN string25 Cust CustRec
begin with Cust do eyN) until OK end until Ch 'Q' en
d Select('Find E)dit, D)elete, Q)uit','E','D','Q',Ch) with Cust do
case Ch of 'E' begin PCode CustCode P
Nm KeyFromName(LastName,FirstName) repeat Input
Cust(Cust) if CustCode PCode then OK fals
e else begin Ccode CustCod
e FindKey(Codebegin FillChar(Cust,SizeOf(Cust),0)
repeat InputCust(Cust) Ccode CustCode FindKey(CodeIndexFil
e, DataF,Ccode) if OK then begin GotoXY(6,19) Wr
ite('ERROR Duplicate customer code') Beep end until not OK
AddRec(DatF,DataF,Cust) AddKey(CodeIndexFile, DataF,CustCode) Ke
yN KeyFromName(LastName,FirstName) AddKey(NameIndexFile, DataF,KeyN)
GotoXY(6,19) ClrEol end end (* FindIndexFile, I,Ccode)
if OK then Beep end until not OK
PutRec(DatF,D,Cust) if CustCode PCode then be
gin DeleteKey(CodeIndexFile, D,PCode) AddKey(C
odeIndexFile, D,CustCode) end KeyN KeyFromName(La
stName,FirstName) if KeyN PNm then begin
DeleteKey(NameIndexFile, D,PNm) Ad is used to find, ed
it and delete customers *) procedure Find var D,L,I Integer Ch,
TC Char Ccode, PCode, FirstNm string15 KeyN, PNm stri
ng25 LastNm string30 Cust CustRec begin if UsedRecs(DatF) 0 the
n begin Ccode '' repeat InputStr(Ccode,15,12,4,M,Z,TC)
if Ccode '' then begin FindKey(CodeIndexFile,D,Ccode)
if OK then begin GetRec(DatF,D,Cust) RAFBGCHDIEdKey(Nam
eIndexFile, D,KeyN) end end 'D' begin
DeleteKey(CodeIndexFile,D,CustCode) KeyN KeyFromName(La
stName,FirstName) DeleteKey(NameIndexFile,D,KeyN)
DeleteRec(DatF,D) end end end of UsedRecs(DatF) 0 .. else
Beep end begin(* Update*) OutForm repeat Select('Update A)dd, F)
ind, Q)uit','A','F','Q',Ch) case Ch of 'A' Add 'F' Find
L 3 end GotoXY(1,L + 1) Write(CustCode)
GotoXY(17,L + 1) Write(Name) GotoXY(53,L + 1) Write(Copy(Compa
ny,1,25)) L L + 1 end of with Cust do .. end of if
OK .. until not OK if CO 'S' then begin GotoXY(1,23) Write('Pres
s RETURN') ClrEol repeat Read(Kbd,Ch) until Ch M end Es
cape end end if Ch 'Q' then begin GotoXY(60,2) Write
(UsedRecs(DatF) 5) ClearForm end until Ch 'Q' end (* List i
s used to list customers *) procedure List label Escape var D,L,LD In
teger Ch,CO,CS Char Ccode string15 KeyN string25 Name
string35 Cust CustRec begin Select('Output device P)rinter, S)cree
n','P','S',CO) Select('Sort by C)ode, N)ame, U)nsorted','C','N','U',CS) G
otoXY(1,23) Write('Press Esc to abort') ClrEol ClearKey(CodeIndexFile) Cle
arKey(NameIndexFile) D 0 LD FileLen(DatF) - 1 L 3 repeat if
KeyPressed then begin Read(Kbd,Ch) if Ch #27 then g
oto Escape end case CS of 'C' NextKey(CodeIndexFile,D,Ccode)
'N' NextKey(NameIndexFile,D,KeyN) 'U' begin OK fa
lse while (D LD) and not OK do begin
D DdM"Lawn Moving Unlimitedonnsional275 West Avenueeeue-KadokaeckityIL9636
1$Micro Sales Corp.itedonnsional8538 Fifth Avenueue-AberdeenkityMO61638oMore or
Less Inc.itedonnsional 86 9th Avenueenueue-RuskinenkityMO34257cMore or Less Natl
. Co.nnsional458 First Avenueeue-GreevilleityNY64265.More or Less Internationalo
nal999 Seventh Avenuee-MarionlleityMO71823JInput/Output & Co.nationalonal82 Seco
nd Avenueuee-RuskinlleityMA64928Lawn Moving & Co..nationalonal21 East Aven + 1
GetRec(DatF,D,Cust) OK Cust.CustStatus 0
end end end if OK then with Cust do
begin if CS 'U' then GetRec(DatF,D,Cust) Nam
e LastName if FirstName '' then Name Name + ', ' + First
Name if CO 'P' then begin Write(Lst,CustCode,'' 16
- Length(CustCode)) Write(Lst,Name,'' 36 - Length(Name))
Wueueuee-AberdeeneityMA558252$Input/Output & Co.nationalonal5158 Second Streete-
AustineneityNY31418Lawn Moving Inc.o.nationalonal79 Fifth Streeteete-Wabasheneit
yCO33883$Lawn Moving Corporationnalonal946 South Avenueete-AberdeeneityWA647695
More or Less Internationalonal72 First Streeteete-RuskineneityMO98135T Input/Out
put Unlimitedonalonal157 First Streetete-AberdeeneityNY57176Jones & Jones Inc.it
edonalonal1369 Seventh Avenue-KadokaeneityCO24867 The Best Guys Coriteln(Lst,Cop
y(Company,1,25)) end else begin if L 21 t
hen begin GotoXY(1,23) Write('Press RETURN
to continue') Write(' or Esc to abort') ClrEol
repeat Read(Kbd,Ch) until (Ch M) or (Ch #2
7) if Ch #27 then goto Escape GotoXY(1
,23) Write('Press Esc to abort') ClrEol ClearFrame RA
FBGCHDIEmpanydonalonal99 Fifth Streetenue-BathkaeneityMA24939Micro Sales Corpora
tionnalonal31 Seventh Streetue-MarioneneityIL76312$Nuts & Bolts Companyionnalona
l2427 Fourth Streete-WallowaneityCA12364G The Best Guys and Sonsnnalonal82 East
Streetreete-Crystal CityCA87445Lawn Moving and Sonsnsnnalonal7838 West Streetete
-Wabashl CityMA61596EBorland Unlimitedonsnsnnalonal737 First Avenueete-HumboldtC
ityAR52241Lawn Moving Unlimitedsnnalonal4991 Eigth Avenuete-SheltontCityN First
Avenueee-AberdeenCityWA31161More or Less and Sons. Co.lnal85 10th Avenuenueee-Ma
rionenCityTX13426 Micro Sales Companyns. Co.lnal574 12th Streetueee-Greevilleity
WA41251(Full Speed Ahead Unlimitedlnal46 Sixth Streetueee-WallowaleityCT76717&Fu
ll Speed Ahead & Co.itedlnal69 Third Avenueueee-HumboldteityWA28233Lawn Moving C
orp.& Co.itedlnal8615 Seventh Avenue-New MeadowsyAR91611Borland CorporationCo.it
edlnal9365 10th Avenuenue-RuskinadowsyWA93853Jones & Y99639Full Speed Ahead Corp
orational4653 Fifth Avenuete-MarionntCityTX37683Nuts & Bolts Unlimitedrational23
4 Sixth Avenueete-MarionntCityMA41556$Full Speed Ahead Corp.rational9914 Sixth S
treette-Crystal CityCO32913#Nuts & Bolts Inc.Corp.rational12 Seventh Avenuete-Sh
elton CityAR68792&Nuts & Bolts Corporationtional547 Seventh Streete-Crystal City
AR64763Input/Output Natl. Co.ontional7315 Eigth Streette-Wabashl CityMA62152yLaw
n Moving CompanyCo.ontional9149 SixJones Internationalnal753 Eigth Avenuenue-Aus
tinadowsyTX14218#Nuts & Bolts Natl. Co.ionalnal779 North Avenuenue-EscondidowsyI
L23592'Full Speed Ahead & Co.ionalnal24 East Avenueuenue-SundanceowsyCT272227 Mi
cro Sales and Sonso.ionalnal64 South Streetenue-WabashceowsyAR455474$Micro Sales
Corp.onso.ionalnal381 Second Avenueue-MarionceowsyWA42178Full Speed Ahead Corp.
ionalnal762 10th Streetueue-SundanceowsyNY321548The Best Guys and Sonsionalnal98
14 First Avenueue-Bathanth Streette-Shelton CityCA47114n!Borland and SonsanyCo.o
ntional43 11th Streeteette-AberdeenCityWA17147 Borland Natl. Co.nyCo.ontional16
Fifth Streetette-WallowanCityCO44258w"The Best Guys Internationalnal13 Fifth Ave
nueette-WabashanCityCT69857Lawn Moving Unlimitedtionalnal7499 12th Avenuette-Rus
kinanCityCA54371Input/Output Natl. Co.ionalnal328 Seventh Avenuee-WallowanCityMA
74132!Jones & Jones and Sonsionalnal914 Seventh Avenuee-EscondidoityCO99884WLawn
Moving ceowsyCO14645!Micro Sales Corporationonalnal598 West Avenueueue-Kadokace
owsyNY14996J Full Speed Ahead Natl. Co.lnal15 Fifth Avenueueue-Fort PeckwsyWA136
26# More or Less Inc.Natl. Co.lnal436 Sixth Streeteue-GreevillewsyTX44955Jones &
Jones Internationalnal9923 12th Avenueeue-BathvillewsyMO76848!Lawn Moving Compa
nynationalnal99 South Avenueeeue-BathvillewsyTX39639Full Speed Ahead and Sonsaln
al9888 Third Avenueue-Fort PeckwsyCT96254RMicro Sales and Sons SonsalnalUnlimite
dsionalnal2598 South Streetee-MarionidoityAR72472Micro Sales Corporationonalnal9
428 Sixth Avenueee-SundanceoityMA68756Micro Sales & Co.rationonalnal1175 First A
venueee-MarionceoityCA63212Input/Output Inc.rationonalnal92 11th Avenuenueee-Gre
evilleityCT44333Borland and Sons.rationonalnal836 Sixth Avenueeee-RuskinlleityIL
73885Jones & Jones Corporationalnal671 East Streeteeee-New MeadowsyMO43575&Micro
Sales Corporationonalnal9761 Eigth Streetee-New Meadow9417 9th Streetueue-Wabas
heckwsyIL57436Jones & Jones Internationalnal67 Fourth Streeteue-AberdeenkwsyWA94
148The Best Guys Companytionalnal37 Sixth Avenueteue-New MeadowsyNY14643Nuts & B
olts Companyytionalnal44 South Streetteue-KadokaadowsyTX78277Micro Sales Inc.pan
yytionalnal526 10th Avenueteue-SheltondowsyTX93215 The Best Guys Inc.nyytionalna
l864 Fourth Avenueue-Fort PeckwsyTX82642Lawn Moving Corporationonalnal58 First A
venueueue-Bath PeckwsyCT14248 LawnsyIL28636The Best Guys Companyononalnal3514 Ei
gth Avenueee-BathMeadowsyMA48995Jones & Jones & Co.nyononalnal648 East Avenueuee
e-RuskinadowsyTX18213$The Best Guys Corp.nyononalnal8513 South Avenueee-Kadokaad
owsyNY99517nJones & Jones Internationalnal633 9th Streetnueee-HumboldtowsyCT7731
4KMicro Sales Companynationalnal6878 East Avenueeee-GreevillewsyCA36777Full Spee
d Ahead Natl. Co.lnal41 North Streeteeee-Crystal CityTX79761$Micro Sales Unlimit
ed. Co.lnal8963 RAFBGCHDIE Moving Internationalalnal45 Third Avenueueue-Aberdee
nkwsyCA81917q!Jones & Jones Inc.ationalalnal3344 11th Streeteue-SundancekwsyMA51
248The Best Guys Inc.ationalalnal98 11th Streeteteue-HumboldtkwsyMO61114!Micro S
ales & Co..ationalalnal61 12th Avenueeteue-Fort PeckwsyTX82574 Input/Output Corp
orationlalnal623 11th Streetteue-Crystal CityAR39851Nuts & Bolts and Sonsionlaln
al6891 First Streetue-Wallowa CityMA99232 Lawn Moving Internationalalnal88 North
Streetetue-Ne(***********************************************************) (*
*) (*
TURBO-access version 1.00 *) (*
*) (* DELKEY module
*) (* *) (*
Copyright (C) 1984 by *) (*
BORLAND Int. *) w MeadowsyMA31835&More or Less Unl
imitednalalnal836 Fifth Avenuetue-Crystal CityCT72712CJones & Jones & Co.tednala
lnal641 Eigth Streettue-GreevilleityMO19142Nuts & Bolts Internationallnal1388 Se
cond Streete-EscondidoityWA62575The Best Guys Unlimitednallnal2835 12th Avenueet
e-MarionidoityTX68891YInput/Output Corp.mitednallnal564 Second Streette-Greevill
eityCA37811Borland Internationalednallnal7338 12th Streettte-AustinlleityTX57327
7Full Speed Ahead Inc.ednall(*
*) (***********************************************************) (*
$A+,R-*) procedure DeleteKey(var IdxF IndexFile v
ar ProcDatRef Integer var ProcKey ) var P
Key TaKeyStr absolute ProcKey PageTooSmall Boolean PagPtr
TaPagePtr (*$A-*) procedure DelB(PrPgRef Integer) var C,I,K,L,R,
XPageRef Integer PagPtr TaPagePtrnal82 South Streetttte-EscondidoityIL
21617"More or Less Corp.nc.ednallnal49 Fifth Streetttte-BathndidoityAR53381%Borl
and Corporationc.ednallnal136 10th Avenuettte-BathndidoityWA35948Full Speed Ahea
d & Co.dnallnal2733 9th Streetttte-WallowadoityAR16385Full Speed Ahead & Co.dnal
lnal8266 Fifth Avenuete-GreevilleityNY48235#Full Speed Ahead Companyallnal8172 S
ixth Avenuete-Crystal CityIL21435Micro Sales Corp.Companyallnal511 South Avenuee
te-AberdeenCityCT25673& (*$A+*) procedure UnderFlow(PrPgRef,
PrPgRef2, R Integer) var I,K, LItem
, LPageRef Integer PagPtr, PagePtr2, L TaPagePtr begin
TaGetPage(IdxF,PrPgRef,PagPtr) TaGetPage(IdxF,PrPgRef2,PagePtr2) if R Pa
gPtr.ItemsOnPage then begin R R + 1 LPageRef PagPtr.ItemArrayR.P
ageRef TaGetPage(IdxF,LPageRef,L) K (L.ItemsOnPage - Order + 1) div
2 PagePtr2.ItemArrayOrdeMicro Sales Corp.Companyallnal299 Fifth Avenueete-M
arionenCityMO42279Jones & Jones Corp.mpanyallnal88 North Streeteete-SundanceCity
NY75883!Jones & Jones Corp.mpanyallnal4615 South Streette-WallowaeCityIL47225Jon
es & Jones Corporationllnal5694 Sixth Avenuete-MarionaeCityMA624883 Jones & Jone
s Internationalnal264 9th Streetnuete-WabashaeCityCA88384Nuts & Bolts Unlimitedi
onalnal194 Third Avenueete-SheltoneCityCO43354The Best Guys Internationalnal799
12th Streeteeter PagPtr.ItemArrayR PagePtr2.ItemArrayOrder.PageRef L.Bck
wPageRef if K 0 then begin for I 1 to K - 1 do Page
Ptr2.ItemArrayI + Order L.ItemArrayI PagPtr.ItemArrayR L.ItemArrayK
PagPtr.ItemArrayR.PageRef LPageRef L.BckwPageRef L.ItemArrayK.Page
Ref L.ItemsOnPage L.ItemsOnPage - K for I 1 to L.ItemsOnPage do
L.ItemArrayI L.ItemArrayI + K PagePtr2.Ite-AustinneCityIL6828
2onalnal194 Third Avenueete-SheltoneCityCO43354The Best Guys Internationalnal799
12th StreeteeteSundanceCityNY75883!Jones & Jones Corp.mpanyallnal4615 South Str
eette-WallowaeCityIL47225Jones & Jones Corporationllnal5694 Sixth Avenuete-Mario
naeCityMA624883 Jones & Jones Internationalnal264 9th Streetnuete-WabashaeCityCA
88384Nuts & Bolts Unlimitedionalnal194 Third Avenueete-SheltoneCityCO43354The Be
st Guys Internationalnal799 12th Streeteete RAFBGCHDIEmsOnPage Order - 1 + K
PageTooSmall false TaUpdatePage(L) end else begin
for I 1 to Order do PagePtr2.ItemArrayI + Order L.ItemArrayI
for I R to PagPtr.ItemsOnPage - 1 do PagPtr.ItemArrayI PagPt
r.ItemArrayI + 1 PagePtr2.ItemsOnPage PageSize PagPtr.ItemsOnPag
e PagPtr.ItemsOnPage - 1 TaReturnPage(L) PageTooSmall PagPtr.It
emsOnPage Order end TaUpdatePa PageTooSmall ItemsOnPage Order
TaUpdatePage(PagPtr) TaUpdatePage(PagePtr2) end end end b
egin if PrPgRef 0 then begin OK false PageTooSmall false
end else begin TaGetPage(IdxF,PrPgRef,PagPtr) with PagPtr do
begin L 1 R ItemsOnPage repeat K (L + R) div
2 C TaCompKeys(PKey, ItemArrayK.Key,
ProcDatRef, ge(PagePtr2) end else begin
if R 1 then LPageRef PagPtr.BckwPageRef else LPageRef PagPtr
.ItemArrayR - 1.PageRef TaGetPage(IdxF,LPageRef,L) LItem L.ItemsOnPa
ge + 1 K (LItem - Order) div 2 if K 0 then begin for I
Order - 1 downto 1 do PagePtr2.ItemArrayI + K PagePtr2.ItemArrayI
PagePtr2.ItemArrayK PagPtr.ItemArrayR PagePtr2.ItemArrayK.PageRef
PagePtr2.BckwPageRef ItemArrayK.DataRef,
IdxF.AllowDuplKeys ) if C 0 then R K - 1
if C 0 then L K + 1 until L R if R 0 then
XPageRef BckwPageRef else XPageRef ItemArrayR.PageRef if L - R
1 then begin ProcDatRef ItemArrayK.DataRef if XPageRef 0 then begi
n ItemsOnPage ItemsOnPage - 1 PageTooSmall ItemsOnPage Order
for I K to I LItem LItem - K for I K - 1 downto 1 do Pag
ePtr2.ItemArrayI L.ItemArrayI + LItem PagePtr2.BckwPageRef L.ItemArrayL
Item.PageRef PagPtr.ItemArrayR L.ItemArrayLItem PagPtr.ItemArra
yR.PageRef PrPgRef2 L.ItemsOnPage LItem - 1 PagePtr2.ItemsOnPag
e Order - 1 + K PageTooSmall false TaUpdatePage(PagePtr2)
end else begin L.ItemArrayLItem PagPtr.ItemArrayR temsOnPage
do ItemArrayI ItemArrayI + 1 TaUpdatePage(PagPtr) end
else begin DelA(XPageRef) if PageTooSmall then U
nderFlow(PrPgRef,XPageRef,R) end end else begin D
elB(XPageRef) if PageTooSmall then UnderFlow(PrPgRef,XPageR
ef,R) end end end end begin with IdxF do begin TaX
Key(PKey,KeyL) OK true DelB(RR) if PageTooSmall then
L.ItemArrayLItem.PageRef PagePtr2.BckwPageRef for I 1 to Order - 1 do
L.ItemArrayI + LItem PagePtr2.ItemArrayI L.ItemsOnPage PageS
ize PagPtr.ItemsOnPage PagPtr.ItemsOnPage - 1 TaReturnPage(Page
Ptr2) PageTooSmall PagPtr.ItemsOnPage Order end TaUpdatePage(
L) end TaUpdatePage(PagPtr) end (*$A-*) procedure DelA(PrPgRef2 I
nteger) var C, XPageRef Integer PagePtr2 TaPagePtr begin TaG
etPage(IdxF,RR,PagPtr) if PagPtr.ItemsOnPage 0 then begin
RR PagPtr.BckwPageRef TaReturnPage(PagPtr) end end e
nd end DelB(XPageRef) if PageTooSmall then Und
erFlow(PrPgRef,XPageRef,R) end end end end begin with IdxF
do begin TaXKey(PKey,KeyL) OK true DelB(RR) if PageTo
oSmall then begin TaGetPage(IdxF,PrPgRef2,PagePtr2) with PagePtr2 do
begin XPageRef ItemArrayItemsOnPage.PageRef if XPageRef 0 then
begin C ItemsOnPage DelA(XPageRef) if PageTooSmall the
n UnderFlow(PrPgRef2,XPageRef,C) end else begin TaGetPage(
IdxF,PrPgRef,PagPtr) ItemArrayItemsOnPage.PageRef PagPtr.ItemArrayK.Page
Ref PagPtr.ItemArrayK ItemArrayItemsOnPage ItemsOnPage ItemsOnP
age - 1 RAFBGCHDIE TaKeyStr absolute ProcKey R Integer Pag
Ptr TaPagePtr begin with IdxF do begin if PP 0 then R RR
else with PathPP do begin TaGetPage(IdxF,PageRef,Pag
Ptr) ItemArrIndex ItemArrIndex - 1 if ItemArrIndex 0 then
R PagPtr.BckwPageRef else R PagPtr.ItemArrayItemArrIndex.P
ageRef end while R 0 do begin TaGetPage(IdxF,R,PagPtr)
PP PP + 1 (*****************************************************
******) (* *) (*
TURBO-access version 1.00 *) (*
*) (* GETKEY module
*) (*
*) (* Copyright (C) 1984 by *) (*
BORLAND Int. *) (* with PathPP do
begin PageRef R ItemArrIndex PagPtr.ItemsOnPage end
with PagPtr do R ItemArrayItemsOnPage.PageRef end if
PP 0 then begin while (PP 1) and (PathPP.ItemArrIndex 0) do
begin PP PP - 1 TaGetPage(IdxF,PathPP.PageRef,PagPtr)
end if PathPP.ItemArrIndex 0 then with PagPtr.ItemArrayPath
PP.ItemArrIndex do begin PKey
*) (******************************************************
*****) (*$A+,R-,W3*) procedure NextKey(var IdxF IndexFile
var ProcDatRef Integer var ProcKey
) var PKey TaKeyStr absolute ProcKey R Integer PagPtr TaPage
Ptr begin with IdxF do begin if PP 0 then R RR else
with PathPP do begin TaGetPage(IdxF,PageRef,PagPtr) Key
ProcDatRef DataRef end else PP 0 end OK PP 0
end end procedure TaFindKey(var IdxF IndexFile
var ProcDatRef Integer var ProcKey ) var
PKey TaKeyStr absolute ProcKey PrPgRef, C,K,L,R Integer RKey
TaKeyStr PagPtr TaPagePtr begin with IdxF do begin TaXKey(PKey
,KeyL) OK false PP 0 PrPgRef RR wh R PagPtr.It
emArrayItemArrIndex.PageRef end while R 0 do begin PP PP
+ 1 with PathPP do begin PageRef R ItemArrInde
x 0 end TaGetPage(IdxF,R,PagPtr) R PagPtr.BckwPageRef
end if PP 0 then begin while (PP 1) and (PathP
P.ItemArrIndex PagPtr.ItemsOnPage) do begin PP PP - 1
TaGetPage(IdxF,PathPP.PageRef,PagPtr) end ile (PrPgRef 0) and not OK do
begin PP PP + 1 PathPP.PageRef PrPgRef TaGetPage(
IdxF,PrPgRef,PagPtr) with PagPtr do begin L 1
R ItemsOnPage repeat K (L + R) div 2 C TaCompK
eys(PKey, ItemArrayK.Key,
0, ItemArrayK.DataRef, All
owDuplKeys ) if C 0 then if PathPP.ItemArrInde
x PagPtr.ItemsOnPage then with PathPP do begin Ite
mArrIndex ItemArrIndex + 1 with PagPtr.ItemArrayItemArrIndex do
begin PKey Key ProcDatRef DataRef end
end else PP 0 end OK PP 0 end end procedure PrevKey(v
ar IdxF IndexFile var ProcDatRef Integer
var ProcKey ) var PKey RAFBGCHDIE R K - 1
if C 0 then L K + 1 until R L if L - R
1 then begin ProcDatRef ItemArrayK.DataRef R
K OK true end if R 0 then PrPgRef
BckwPageRef else PrPgRef ItemArrayR.PageRef end PathPP.I
temArrIndex R end if not OK and (PP 0) then begin while
(PP 1) and (PathPP.ItemArrIndex 0) do !!45(!.+/0y0( d!kZ!Zo&(y ( *"
x2y(28!"9!!2 DSXND (!eA8Q0G x!w# ( yV. V!h6# (*(.(!8(*(w# w#a ''7"C"6#""*B"R5*"#
V#PP PP - 1 if PathPP.ItemArrIndex 0 then PP 0 end e
nd end procedure FindKey(var IdxF IndexFile var Pr
ocDatRef Integer var ProcKey ) var PKey
TaKeyStr absolute ProcKey TempKey TaKeyStr begin TaFindKey(IdxF,ProcD
atRef,PKey) if not OK and IdxF.AllowDuplKeys then begin TempKey PKey
NextKey(IdxF,ProcDatRef,PKey) OK OK and (PKey TempKey) end end
#V#N#FO/o&9O/o&9!9( (G!9 w#Ew8OCA#0w#xo&9xG7s#r#s#r#q#px!D9N#8y#(Ox!D9N##Vh&D9
! 9! 9#Vh&D9!"x/o&9p#HRuRB0RRR!+zR!+z!+z!+z!#z!+zTKB!z S))0 JJDMgojB07 procedu
re SearchKey(var IdxF IndexFile var ProcDatRef Integer
var ProcKey) var PKey TaKeyStr absolute ProcKey begin
TaFindKey(IdxF,ProcDatRef,PKey) if not OK then NextKey(IdxF,ProcDatRe
f,PKey) end eys then begin TempKey PKey NextKey(IdxF,ProcDat
Ref,PKey) OK OK and (PKey TempKey) end end Hz5+)+z 0GgoH/g/o#o&KxAJS
JDM!b"!6J"DM'd R0 0w#$O! #08) 8 ! 80T)) T)y	N8w!DB9+O#wW8(8J9To9yk-&9w	o&
!T9K#C#y8O(# !#!9RO8 (8wPTOsOS!988xW8/oz88x8&8#(*BPOz(Ox8(*!9O!T9-0l&!T96#w!T9K
#C#( x # wuJ u ( xQ T(0DC, ( 0%D, 7 (8ux O- 8xX ,-xG9.#n0D - nx P,-(-G,-9.8u u
+-(O0uO8Copyright (C) 1984 BORLAND IncA Visual 200912/920/92PInitExitY,000) vHo
meLnsMelxOL3igh4ow7#% o&o£!!"8#($ +*!Z!*B!!(2!Z 2!!!OO!*B RAFBGCHDIEx P, 7888o
x!oGOWggzWyOxGgzWyOxGxyzxxx((7D g£zWyOxGD uJ xuu/o -J 0W-J W,l8 x(-8J -8,J l8*!
!u u---J ,,,-xGg+2n*8t z,-uxu * F* 26"*-w#ww#"*!!$ 2*! *$(! 1!(f" 2!"F(##6e!"
N!8O6*"w ((&("( (N 8y(#x+% (6*#*# *(h#"b 8a. OJ , !U ,k-o&0%, g.8cI$IL*kx 0G,,-
(-J ! 0 a o8O um.1pF,t6!wS.z%FXcur1Ox(8 !J0O!8 7 O 70 W-J OT0j oD,j !I.8cI$IL! J
B 8 / !*###-(4Q6*2*##w*##*#(E (( ( ! (( ((w#(6!-#87 OkMs #rkpX ((#w(q*# (
*##6O$*#(08+###-q46 *4q*(u 77 OnfVNF!DLTI!!53!r1!! x #- oxO(-(x8(C,CiM!uJ )
(DMbo88x(08W!Oz 868Mx(-(ay( z(.( E+(Dg-/ 0p## +0w#,- 60#JogM wD 05.M(M6-#R8 (G C
#*C!h !lTRUEFALSE!9#(#(G# "F!(#RR0*4#4 RR *4 #4(2$*V(/(#+ x y2!( ( X(R*(###--X
N*###w *4 #4x (""**V0SRR8A*N#F#s#r$0)jS(C x0w#xG%P%PZJDM%P 65i+w661#6. p7#E(!0T
o&p( #+(- #O#0 #WyOh(yDOyZy 0 D! !D( hx-Sx9+CCgZJDM0D,7o #yO!9i& #w#/w#*###
w*N#FBr+s !T)j)00 UR!#U*#V#N#F##V"!2DM"x(L*O(o" C( *-N#Fp+qq#p!*F+N+++V+Bq#p SRR
*s#r$s#r"S"!N#FB(x *6#(H*!Kq#p##K! *!4 #4!x *$*w""!"*nf(HR0nf" VMDnfutqpw#!9!
E9!!9(+F!"9!(#2*"" ( *6#w*6#6!$! (( #CONTRMKBDLSTAUXUSR2$*# $* w###6 #6++p2S-$
*6###ww#w$w#w ##N#F*B w#w#s#r2S$$*6#-Nw#Fwq#p#6#w#w#w*( x *6#"#+ 2N( RAFBGCHDIE
*s#r*s#r"*5KB!u#fo"*R0RnfR0KqputsrNF(VNFV*SutKqpR*R(wwnfut"6#**!""*NFy(*"*B0Cnf*
R*"*RSs#r#VSO"w2x2!"" *2"!"""!* !6go(R*s#r2x(sx"*q*u%E'*y!"y*y*w*#*y!q"'*w*y*#*
w!o"*u*o%E'*w!R"w*w*y*#*w!o"W'*y*wE'*y*waE'*y*w$*y!"y*w!R"w*y*wE&*w*R**yREX(*y*E
O(*!"!*+)*ys#r!*+)*s#r*w"(**wE(*!"!*+)*s#r!*+)*ws#r*y"**tE&&*!N*!t£oEh)*!NE#)!$$
$SOWRK.$$$!(TDMR0-a%o*!6o&£%C User break1% I/O% Run-time% error %, PCR"% Pro
gram aborted*1!!0Z COM"*"z*z!" ! !t!t"r
*r"p!*p m5z "n*p*n*p*nn&(s*n# P!5!NE RR*** FATAL ERROR ! !qyb!2!!+"!!+"!!)#V!!)#
V+"!!)!!)#V!s#r*!E)!")*"!*)#V**"****!"*!"**NE)!"*!"*k*!R*/o/g##*k!"****k!"k*k*t2
""""""!!("!)"!4*"!"!**!!!!!E +!!""**E%!*"+!*"*""**ET!*"Z!*"*"", *E!**!2!!2*&" *
m!* !n&! N£oE!* !!!* * mn&! NE'"* !* !n&+s!D*"6"8!*6*b!*8*gb"2"4!*2*b!*4*kb"/*
/*"-*-!!)#VN*-!!)#VNo*-!!)#VNo21*1&!!!!"*!EW+!*!"*!"**"*!E+!",!!)*!E+!"!!)*!E+*!
"!!)*!E+*!"!s*!E,*!"!u*!E',*!"*!aE,!",!"!2!"!"!"!!)!s#r!!)!s#r!!)!s#r* !!!s!!!s!
!!s&!"k* *&E,!b*!tE")"+*+*"'!2&!*&&)#V*'aEM#*&&!2&#!*&&)#V*+***)s#r" """$*$"oE$*
$*"!2*"*"* *"!*&)#V*N!*&)#V*NoE$*&!2#!*&n&EP$!*&)#V!*&)#V+"!*&)#V*"!*&)*s#r!*&!s
""**"!2!*&)#V*aE$*&!2$**"!2 !* &)-!u**!R"*!tED-!s**!R"*!tEt-!!)**!R"*!tE-!!)**!R
"*!tE-!!)**!R"** * * *&2*&"*"*0!s#r*2!s2""*"**0#VaEL/*2n&E.**0#Vb**3!gb*2!s**U!R
E/*&E.Seek read error /**UE /Seek writ#V*aE$%* &!2 $**"**"!*&)#V**"!* &)#V**"**
s*****s**!*&!s!* &!s""******* *&2*&*!EY&!!+)!s#r!!+)*!Rs#r!"&!"*!E(!*+)#V"!*+)#V
"*!R"*"y*"w*y*w!"**y*w#*!m"*m*u**y*w*#*y!q RAFBGCHDIEe error **b/**b**3!kb*0*s#
r"*"*2n&E/**0#Vb**3!gb*Sb"2"""**!+.!*&R"*"*3*&***!**Ed0**0#V!!+.*3**!**R!*!"/"2"
""**!+.!*&R*!"*"**3*&**2!s**EG1**0#V!!+AoEf9*M! !NE59R!b*8!$b*M!R*aEc9-8*b-oE9*M
! !NE9R!b-*!$bs9"P!"! R!q! b!", !!!8!8!g9!$!("!aERbR9*** WARNING Unable to sort
Terminal names - Press RETURNb+bRbQ"*!!s!8!b*&! aE*&Q! !kE+*&Rb*!*.***3!**R!*2!s
*!"0"""*oE2*8!.! m!E2! !! e.! ! e.+5!!*!N**N£oE2! ! e.! ! e.#!5*2X1""*oEi2*8*.*
! e.* #!5*2*#"*!NE2*#"!"***!9!k!9*n&25*5&""!"!28!"!"!8!!!n&!n&#s**!n&*&s*&!N*&!N
o* m!£oER!! !b*!*!n&+s*&!N*&£oE!2!8!bRb""! R!q*!!-*!!E !qb"""**t**£o2*&""""* E!*
s!*s* *!*!N*s"!*2!£!£ R!q! b!"!*5zs!!8 m5z63"6!8*6m2s*6#3!8 ! ET3!283!8!!!8!!8!n
&#s!8!8 mm2s*A*8&oE63*8&2*!*! mR!*s#r*!! mR!!*s#r*&24*4&! RBj4RBj4 RBj4RB4Ctrl-*
4&!e.!85 R4LF!85 R4CR!85R4ESC!85 R5SPACE"*#"! R!q! b*"&Er!(*n&n&R! ! !q! b!8!b*"
&*&! N£oE!(*n&n&2*&(2*&Q!(!n&a!(!n&aEr*&Rb*&!(!n&N*s""""!2x*"&El*#VR!! ! !q! b*x
&oEc!z*&Ec!z*!y!xV*y&*"&£oE!2x*y&E**s#r*#V**!E!2x**!85R'5DEL!85*4&e.!*4&!Ee5! (+
128)!! !5!5 8* m*tE5!2R!b5!2*&6! !!*!N*!t£o*!£o2*&*&e.!*&Rb!8!b! *&e.!*&Q! a! a!
m!No5ooE6*&Q! a! aE6!!!!n&+s5E7* *e.**&! aE7*&R! *x&oE2! R!q!E !qb*#V**!oE**!2x
l"p"r"t"v*vn&"l!l*t*r*p*l*vs"j!*j5z"fR!b*f#!*j5z"fR!b*f#"b"d*"&E!*d m5zS" R*d* n
&4!q! b* #*d m!ER (b!*d m5z" R*d* n&!! b* #R!) bR! ! !q! b!*b52! b!8!bn7R!b! m!
Ez7"R!! !b*+57!8!b5*&Q!$a!0!9kooE6*&! aE8R*&4!q! b* *&e.*5E7! 28!8!b7""*!2!8!b*&
(Q!-a!A!ZkEi8*&(28*&(Q!0!9k!$aE8587Rb*&9*+"*!NE8!"R!*b!$k !k !$ ! 2*b* RAFBGCHD
IE*"&£ooE(A! *dA*&!-NEA*d! R!qb""" *"&EA* n&!NEA!2A!2!*&oEA!* s*C*"&EA* n&!NEA!2
A!2!!2*"&EB*&* n&!a£oE6B!2B*&o* n&!N£oEB!2*&EsB!* sB!* s* n&!NEB*&EB*! R!q! b**C
*&EB*! R!q! b*"&*K!!!-E9K*Ki!+K!!-EK*K!+*K oEK*Ka!+K*KaK!! !-EK*K!!!d*K!!!dL!!!-
*K o£oEIL*KK!!'!LL!!-*KM o£o!!-*Ku o£ooEL*KY!!'!L*KY!s#r!!-*Ki o£o!! o£oEC* R!q!
! !q! b*+!Rb! o*"&ooEC! *"*"* EC*6D*Fn&EC!e.!XC000!*#V5!X*6* !X * !X * * m!X m"
V*V* m!X m"T*n&ED*G*Vs*H*TsD*G*Ts*H*Vs"R*R!!*R"P*P!s*P!-*K o£ooEEM*Kg!!'!XM*Kg!s
#r*M&!!5zM"GRb*G#iM! R!qbRbNM"*6*"6*6*4EM!"6M*6!EM*4"6M!2!2*4!ENRb!R R!qb!8!b*&Q
!a!a!a! aE)N*&RyN!MNRN!MNRN*&o2FN RNRb*&!2F!*!/!"*!*R!EO*s*PF!s!! b!5!aEuE6File
Containing messages for this program is not found !!e!H1!R!!!!!(!!!n&(s!!(!!!n&(
s!!!!!E!"K!£!2$*$&oEF!£ R!q! b*"&ExF*K R!q! ! !q! b!+!8!8 o2M!8 o*"&oEF!2$!8 oEF
!8 *KF!!-EG!!-#"!!!!! m!s!!!!! m!s!*U!"B*B!EzQ!"6*B+!*#"4*B+*4#"*+!#"*6*4aEO*6*+
"*"8O*B+"*B*6+*R"8*8+*#"8!*8+5znQ"2!*+5zQ"0*6+**0*8*2"%*%*ESQR*%#!) b*6*4a**%R!t
oEP!**%b!*8!b! !Q**%RRP! !QRQ!E#G*K*K!+AG*Kn&!N2 ! * &EG*K!s! R!q! b*K!+G*K!s*KG
!!!-EH!!-EG*K*K&!+AH*Kn&!N2 ! * &EZH*K!s! R!q! b*K&!+H*K!s*K&H!!!-EI*K!+*K E(I!*
K*K*KJ!s*KI !! R!qb*0*+ESQR!! mR!qb*0#$PRb*2#PMoEO*F&"!P!P!!2!*! !*5!aEQ!*bE!2!2
!*U!N2!"*&ERR!M£MoE3R!2V!2"*&ETR!"%!SRb!%!!*U!!*&ER!2V*%+"%*%!*UN2*%!*U#NES!%!!*
U!*&ER!2V*%+"!2!2!!s*K!s*KF!sI*K!+*K!+*K*KJ!!!d*KI!!!d*KF*KFn&oEI*K!!!I*K!s#rI!!
!-EJ*KM!+*KM oEzJ*KS 2'!'*'&oEcJ*KS!+wJ*KSJ*KS!J!!!-EK*Ku!+*Ku oEJ*Ko!+K*Ko RAF
BGCHDIETS!2*&E&S!DIS!**%b!*8!b!"*"&*&oES F2!2"!!!CS!2!!2!!2"*!&EaT!!-!!-oEZT*"Rb
RbRbRb!!-E+T*!!!d.T!!-ETT*WTaT!!**%b!*!b*&ET!*! *8*0"*"!"* ***n&s**n&s* **Copyri
ght (C) 1984 BORLAND IncA Visual 200912/920/92PInitExitY,000) vHomeLnsMelxOL3ig
h4ow7#% o&o£!!"8#($ +*!Z!*B!!(2!Z 2!!!OO!*B*& * *6 *0*Fn&s*1*In&s*2*Jn&s*3*Gn&s
*4*Hn&s*5*K#Vs#r*7*M **S *C*o *I*u *O*Y#Vs#r*Q*i *W* **a *c*g#Vs#r*!&EQ!*-b*&!!!
"V!*!H1! R!qb!!2! R!qb"*VR!!45(!.+/0y0( d!kZ!Zo&(y ( *"x2y(28!"9!!2 DSXND (!eA8
Q0G x!w# ( yV. V!h6# (*(.(!8(*(w# w#a ''7"C"6#""*B"R5*"#V#b!2!e.!e.CopyP!6!! !z
5!aEWFile ! not found !!6 !4!2j2oEWYou cannot install ! with this program !
! b!5!aE*X Message file ! not found *2! "2*4*2!"4*2!"2!-*&X""!"** mEX**n&!NEX*
*!*!*!n&#s** m**n&s*#"zX!!#V#N#FO/o&9O/o&9!9( (G!9 w#Ew8OCA#0w#xo&9xG7s#r#s#r#q#
px!D9N#8y#(Ox!D9N##Vh&D9! 9! 9#Vh&D9!"x/o&9p#HRuRB0RRR!+zR!+z!+z!+z!#z!+zTKB!z S
))0 JJDMgojB07 5z!Y"Rb*#YP!!!5zY"RbV!*!H1!!hX! R!qb*#8YR! b!8!b*&(2*&! EY*&!2*&e
.! !aEYRb*&e.! "*!!*4*2!/! ! Q!a!a!a!a!a!a!a!a! a!EZ!!*4*2!e0!£!!P"! !!*!a*!NoEZ
!P"ZWE-V!! !H1!!e!4H1eXHz5+)+z 0GgoH/g/o#o&KxAJSJDM!b"!6J"DM'd R0 0w#$O! #08) 8
! 80T)) T)y	N8w!DB9+O#wW8(8J9To9yk-&9w	o&!T9K#C#y8O(# !#!9RO8 (8wPTOsOS!
988YRZ%R%!M/-!EZa*!NoEst!P"ZWEstV!! !H1!!e!4H1eX8YR! b!8!b*&(2*&! EY*&!2*&e.! !a
EYRb*&e.! "*!!*4*2!/! ! Q!a!a!a!a!a!a!a!a! a!EZ!!*4*2!e0!£!!P"! !!*!a*!NoEZ!P"ZW
E-V!! !H1!!e!4H1eX RAFBGCHDIExW8/oz88x8&8#(*BPOz(Ox8(*!9O!T9-0l&!T96#w!T9K#C#(
x # wuJ u ( xQ T(0DC, ( 0%D, 7 (8ux O- 8xX ,-xG9.#n0D - nx P,-(-G,-9.8u u+-(O0
uO8w#!9! E9!!9(+F!"9!(#2*"" ( *6#w*6#6!$! (( #CONTRMKBDLSTAUXUSR2$*# $* w###6
#6++p2S-$*6###ww#w$w#w ##N#F*B w#w#s#r2S$$*6#-Nw#Fwq#p#6#w#w#w*( x *6#"#+ 2N(x P
, 7888ox!oGOWggzWyOxGgzWyOxGxyzxxx((7D g£zWyOxGD uJ xuu/o -J 0W-J W,l8 x(-8J -8
,J l8*! !u u---J ,,,-xGg+2n*8t z,-uxu * F* 26"*-w#ww#"*!!$ 2*! *$(! 1!(f" 2!"F
(##6e!"N!8O6*"w ((&("( (N 8y(#x+% (6*#*# *(h#"b 8a. OJ , !U ,k-o&0%, g.8cI$IL*k
x 0G,,-(-J ! 0 a o8O um.1pF,t6!wS.z%FXcur1Ox(8 !J0O!8 7 O 70 W-J OT0j oD,j !I.8c
I$IL! J B 8 / !*###-(4Q6*2*##w*##*#(E (( ( ! (( ((w#(6!-#87 OkMs #rkpX ((#
w(q*# ( *##6O$*#(08+###-q46 *4q*(u 77 OnfVNF!DLTI!!53!r1!! x #- oxO(-(x8(C,C
iM!uJ )(DMbo88x(08W!Oz 868Mx(-(ay( z(.( E+(Dg-/ 0p## +0w#,- 60#JogM wD 05.M(M6-#
R8 (G C#*C!h !lTRUEFALSE!9#(#(G# "F!(#RR0*4#4 RR *4 #4(2$*V(/(#+ x y2!( ( X(R*
(###--XN*###w *4 #4x (""**V0SRR8A*N#F#s#r$0)jS(C x0w#xG%P%PZJDM%P 65i+w661#6. p
7#E(!0To&p( #+(- #O#0 #WyOh(yDOyZy 0 D! !D( hx-Sx9+CCgZJDM0D,7o #yO!9i& #w#
/w# RAFBGCHDIE*###w*N#FBr+s !T)j)00 UR!#U*#V#N#F##V"!2DM"x(L*O(o" C( *-N#Fp+qq#
p!*F+N+++V+Bq#p SRR*s#r$s#r"S"!N#FB(x *6#(H*!Kq#p##K! *!4 #4!x *$*w""!"*nf(HR0n
f" VMDnfutqp---------------------------------bR Turbo PascalbR Inst
allation Program GeneratorbRbR Version 2.00AbR"Copyright (C) 1984 by Bo
rland Inc.bR"----------------------------------bRbRb!GINST.COD!z5!aE&File GINST.
COD not found !GINST.MSGb!5!aE& Message file GINST.MSG not found !GINST.DTA!5!a2
RbR"Enter name of prog*s#r*s#r"*5KB!u#fo"*R0RnfR0KqputsrNF(VNFV*SutKqpR*R(wwnfut
"6#**!""*NFy(*"*B0Cnf*R*"*RSs#r#VSO"w2x2!"" *2"!"""!* !6go(R*s#r2x(sxram to ins
tall b! +.b! ! ! EG'!.e.! !NE'! !.e.! ! RbR)Enter first name for installat
ion files b!+.b! ! !.e.! !N! mQ!!k£o2*&oEE(RError in file nameb*&E'! !.e.! !7!
.DTA!! .MSG!RbRb!L!7 !/! !! bRCreating !7 !qb!L(TDMR0-a%o*!6o&£%C User break1%
I/O% Run-time% error %, PCR"% Program aborted*1!!+$COM"*"*!" ! !v!vP!%5!NEx R
R*** FATAL ERROR !% !q"#!*# m5z "!*#*!*#*!n&(s*!# "* yb!LU!UE)!LU"!*b!L*b!U*R! v
!"!!*kb!L!*gb)!L!!!R"!L!*!*!!!$!L"*&oEE*RbRCreating ! !qb!/b!AoE*!8!b!/!b*!/-bRb
RCreating ! !qb!b!oE*!8!.b!! !qbv*!bRbRbRInstallation program for ! !q m!*!n&!
N£oE9!*!! ** mn&! NEu!*!*!n&+s9!""**E!*"!*"*"*"*0!s#r*2!s2""*"**0#VaE"*2n&EH"**0
#Vb**3!gb*2!s**U!RE"*&E"Seek read error "**UE"Seek write error **b"**b**3!kb*0*s
#r"*"createdb.b!! !qbv*!bRbRbRInstallation program for ! !q !!!R"!L!*!*!!!$!L"*
&oEE*RbRCreating ! !qb!/b!AoE*!8!b!/!b*!/-bRbRCreating ! !qb!b!oE*!8!.b!! !qbv*!
bRbRbRInstallation program for ! !q * 2n&E#* * 0#Vb* * 3!gb* Sb"2"""**!!!*&R"*
"*3*&***v!**E$**0#V!!!*3**!**Rv!*!"#"2"""**!!!*&R*v!"*"**3*&**2!s**E$**0#V!!!***
3!**Rv!*2!s*!"$RbR"- RAFBGCHDIE ADDS 20/25/300PY KPY ADDS 40/600PY KMlPYADDS
Viewpoint-1A0AY KPYADM 3Aa HU$U KLMPQume )(TERPRC-855 (ITT) PSoroc 120/Apple
CP/M * PAmpex D80 )(TER(ANSI0000H2Jf17m0mK1L1MPHDEC Rainbow, 8 bit0000H2Jf7m
0mK1L1mP)(TPSoroc new models *)(TERPSSM-UB300002J117U0UKLMPTandberg TDV 22150m2
m0KLMPTelHHazeltine 1500PHazeltine Esprit PIBM-PC CCP/M b/wY EruKLMPYIBM-PC CC
P/M colorxcceray series 10Y KLMPYTeletex 3000 )(T-ERPTelevideo 912/920/92 )(T
ERP Visual 200YY EbbKLMPYKaypro 10, 4 and 10 /-C1B1ERPLear-Siegler ADM-20 )(T
ERPLear-Siegler ADM-31 )( v34xLMPYWyse WY-100/200/300 ()TERPZenith00Cur, Morr
ow Y0 E(qEpKLMPYOrona ttach00C)(TERP Visual 200YTERPLiberty )(TERP Morrow MDT-
20 )(TEPOsborne 1 ()TQRPOtrona Attache RAFBGCHDIE 204 Color display 80x25 2
05 Color display 40x25 206 b/w display 80x25 207 b/w display 40x25 0-255
ms) Delay after ERASE TO END OF LINE and HIGHLIGHT (0-255 ms) Is
this definition correct Hardware dependent information
Operating frequency of your microprocessor in MHz (for delays) 101 Nothing 200
Choose one of the following displays 201 Which display (Enter no. or Q to exit
) 202 Default display mode 203 Monochrome display1 Turbo Pa
scal general installation System 2 Choose installation item fr
om the following 3 4 Screen installation Quit 5
6 Enter S or Q 13 - 101 Nothing Q Quit, R
Last page, C Next page, RETURN Select terminal Wait Sorting Definitions Chan
ge to (Y/N) y n Text file name Command Numeric entry expected Leg
al range is , please re-enter Choose one of the following terminals None
of the above ( Max. 20 Characters ) Delete a definition ( Max. 20 Character
s ) Which terminal (Enter no. or Q to exit) Delete terminal (Enter no. or Q
to exit) Do you want to modify this definition before installation Termina
l type Send an initialization string to the terminal Initializaion defined a
s a command string (No a file) Send a reset string to the terminal Reset de
fined as a command (No a file) CURSOR LEAD-IN command CURSOR POSITIONING .
. Les fichiers INSTALL.DOC contiennent les informations a transmettre .. aux ut
ilisateurs de vos programmes TURBO Pascal si vous creez un .. module d'installa
tion avec GINST. .. .. Notez cependant que les programmes compiles sur CPC 464
/664 seront .. deja installes pour ces machines. .. .. .pl66 .. Changer PRO
GRAMNAME pour votre propre programme et INSTALNAME .. pour le nom de votre prog
ramme d'installation dans ce qui suit. .. INSTALLATION DU TERMINAL Avant de
pouvoir utiliser PROGRAMNAME,COMMAND to send between line and column CURSO
R POSITIONING COMMAND to send after both line and column Column first OFFSET
to add to LINE OFFSET to add to COLUMN Binary address Number of ASCII d
igits (2 or 3) CLEAR SCREEN command Does CLEAR SCREEN also HOME cursor H
OME command DELETE LINE command INSERT LINE command ERASE TO END OF LIN
E command START HIGHLIGHTING command END HIGHLIGHTING command Number
of rows (lines) on your screen Number of colu il doit etre installe pour vo
tre terminal. Cette installation se fait facilement par le programme INSTALNAME
decrit ci-dessous. Apres avoir fait une copie de sauvegarde, ranger la disqu
ette de distribution dans un endroit sur et travailler uniquement avec la copi
e. Maintenant lancez l'installation en tapant INSTALNAME a votre terminal. C
hoisissez S pour installer l'ecran. En fonction de la version de PROGRAMNAME do
nt vous disposez, l'installation s'effectue de l'une des deux facons suivantesm
ns on your screen Delay after CURSOR ADDRESS (0-255 ms)
Delay after CLEAR, DELETE and INSERT (0-255 ms) Delay after
ERASE TO END OF LINE and HIGHLIGHT (0-255 ms) Is this definition correct
Hardware dependent information Operating frequency of your m
icroprocessor in MHz (for delays) 101 Nothing 200 Choose one of the following
displays 201 Which display (Enter no. or Q to exit) 202 Default display mode
203 Monochrome display RAFBGCHDIE Choix de l'ecran sur IBM PC - Si vous
utilisez PROGRAMNAME sans installation, le mode par defaut sera choisi. Vous po
uvez changer ce choix en choisissant un autre ecran dans le menu suivant ---
--------------------------------------------------------------- Choose one o
f the following displays 0) Default display mode 1) Monochrome dis
play 2) Color display 80x25 3) Color display 40x25 4) b/w di
splay 80x25 5) b/w display 40x25 Which display ran n'est pas dans
le menu, vous devez definir les valeurs vous-memes. Celles-ci sont trouvees dan
s le manuel accompagnant votre terminal. Entrez le numero correspondant a "N
one of the Above" et vous serez guide a travers la procedure d'installation.
Dans ce qui suit, chaque commande est decrite en detail. Il se peut que votre
terminal n'ait pas toutes les commandes decrites. Dans ce cas, taper simplement
RETURN a la question posee. Si les commandes Delete Line, Insert Line ou Erase
to end of(enter no. or X to exit) ! ------------------------------------------
------------------------ IBM PC Screen Installation Menu Ch
aque fois que PROGRAMNAME est lance, le mode choisi sera utilise et vous retour
nerez au mode par defaut a la sortie. .pa Installation pour machine autre qu
e IBM PC Un menu presentant les terminaux les plus courants sera affiche, da
ns lequel vous pourrez en choisir un en tapant son numero -------------------
-------------------------------------- line ne sont pas installees, elles seont
simulees par logiciel, ralentissant l'edition des programmes. Les commandes
peuvent etre entrees en tapant simplement les touches appropriees ou en entran
t la valeur ASCII decimale ou hexadecimale de la commande. Si une commande nece
ssite deux caracteres 'ESCAPE' et '' par exemple, vous pouvez soit taper e
n premier la touche ESCAPE puis la touche . L'entree sera renvoyee sous
la forme ESC soit entrer les valeurs ASCII decimales ou--------- Choose
one of the following terminals 1) ADDS 20/25/30 15) Lear-Siegle
r ADM-31 2) ADDS 40/60 16) Liberty 3) ADDS Viewpoint-1A
17) Morrow MDT-20 4) ADM 3A 18) Otrona Attache
5) Ampex D80 19) Qume 6) ANSI 20) Soroc IQ-
120 7) Apple/graphics 21) Soroc new models 8) Hazeltine 1500
22) Teletext 3000 9) Hazeltine Esprit 23) Televideo 912/920
/925 hexa separees par des espaces. Les valeurs hexa sont precedee
s par le signe $. Vous pouvez entrer 27 61 ou $1B 61 ou $1B $3D ces troi
s entrees sont equivalentes. Les deux methodes ne peuvent pas etre me
langees. Si vous avez commence par entrer des caracteres non numeriques, le res
te de la commande doit etre defini de la meme facon et vice-versa. Un tiret
entre en tout premier lieu supprime la commande et renvoie Nothing en echo. 10
) IBM PC CCP/M b/w 24) Visual 200 11) IBM PC CCP/M color 25) Wyse
WY-100/200/300 12) Kaypro 10 26) Zenith 13) Kaypro II an
d 4 27) None of the above 14) Lear-Siegler ADM-20 28) Delete a de
finition Which terminal (Enter no. or X to exit) ------------------------
------------------------------------------ Terminal Install
ation Menu Si votre terminal apparait dans la liste, entrez le numero corres-
pondant et l'installation Terminal type ------------------------------------
------------------------------ Entrez le nom du terminal que vous installez. A
la fin de l'instal- lation, les informations seront stockees et le nom du termi
nal appairaitra dans la liste des terminaux. Si plus tard vous desirez reinsta
ller PROGRAMNAME pour ce terminal, il vous suffira de selectionner son nom dans
la liste. Send an initialization string to the terminal -------------------
----------------------------------------------- Si v est terminee. Avant que ce
lle-ci ne soit reellement effectuee, le message suivant apparait -----------
------------------------------------------------------- Do you want to modif
y the definition before installation ------------------------------------------
------------------------ Ceci vous permet de modifier une ou plusieurs valeur
s. Si vous ne vou- lez rien modifier, taper simplement N et l'installation s'ac
heve en vous demandant la frequence de votre CPU(voir plus loin). Si votre e
c RAFBGCHDIEous desirez initialiser votre terminal lorsque PROGRAMNAME demarre
(pour envoyer des commandes aux touches de fonction program- mables), tapez Y.
Sinon tapez RETURN. Si vous repondez Y (oui), vous avez le choix entre deux m
ethodes pour entrer les commandes en les tapant directement ou en nommant un f
ichier les contenant. La deuxieme methode est preferable si la chaine d'initial
isation a envoyer est assez longue. Send a reset string to the terminal ----
--------------------------------------------------------------------------------
------ Entrez la valeur appropriee a votre terminal. CLEAR SCREEN
command ------------------------------------------------------------------ Ent
rez la commande qui efface le contenu de l'ecran tout entier, caracteres et fon
d eventuellement. Does CLEAR SCREEN also HOME cursor -----------------------
------------------------------------------- La commande d'effacement place-t-el
le le curseur en haut de l'ecran C'est le cas en general. Sino----------------
------- Maintenant, vous pouvez definir une chaine a envoyer au terminal lorsq
ue vous quittez PROGRAMNAME. La description de la commande precedente s'appliqu
e ici. CURSOR LEAD-IN command ----------------------------------------------
-------------------- Cette commande est une sequence speciale de caracteres ind
iquant au terminal que les caracteres suivant representent une adresse de l'ec
ran ou devra ce placer le curseur. Si vous definissez cette commande, les quest
ions supplemen, entrez N et definissez la commande HOME. DELETE LINE command
------------------------------------------------------------------ Entrez la
comande qui efface la ligne ou se trouve le curseur. INSERT LINE command ---
--------------------------------------------------------------- Entrez la comma
nde qui insere une ligne ou se trouve le curseur. ERASE TO END OF LINE comman
d ------------------------------------------------------------------ Entrez la
commande qui efface depuis la positntaires suivantes apparaitront CUR
SOR POSITIONING COMMAND to send between line and column ----------------
------------------------------------------- Certains terminaux necessite
nt une commande entre les nombres definissant les adresses de ligne et d
e colonne. CURSOR POSITIONING COMMAND to send after line and column
----------------------------------------------------------- Certai
ns terminaux necessitent une commande apres les nombres ion du curseur jus
qu'a la fin de la ligne. START OF 'LOW VIDEO' command ----------------------
-------------------------------------------- Si votre terminal supporte differe
ntes intensites video, definissez ici la commande qui initialise la basse inten
site. Si cette commande est definie, la question suivante apparait ST
ART OF 'NORMAL VIDEO' command ------------------------------------------
------------------ Definissez la commande qui remet l'ecran en video nor
male. definissant les adresses de ligne et de colonne. Column first
----------------------------------------------------------- La
plupart des terminaux ont le format Ligne en premier, puis colonne.
Si c'est le cas pour votre terminal, tapez N, sinon tapez Y. OFFSE
T to add to LINE -------------------------------------------------------
---- Entrez le nombre a ajouter a l'adresse de la ligne. OFFSE
T to add to COLUMN --- Number of rows (lines) on your screen --------
---------------------------------------------------------- Entrez le nombre de
lignes de votre ecran. Number of columns on your screen --------------------
---------------------------------------------- Entrez le nombre de colonnes de
votre ecran -----------------------------------------------------------------
- Delay after CURSOR ADDRESS (0-255 ms) Delay after CLEAR, DELETE, and INSERT
(0-255 ms) Delay after ERASE TO END OF LINE and -------------------------------
------------------------- Entrez le nombre a ajouter a l'adresse de la c
olonne. Binary address ---------------------------------------
-------------------- La plupart des terminaux attendent l'adresse du cur
seur sous forme binaire. Si c'est le cas de votre terminal, tapez Y.
Si il attend des caracteres ASCII, tapez N. Dans ce cas, la questio
n suivante apparait 2 or 3 ASCII digits ---------- R A
F B G C H D I EHIGHLIGHT On/Off (0-255 ms) -----------------------------------
------------------------------- Entrez les delais en millisecondes requis apres
les fonctions specifiees. RETURN signifie 0 (pas de delais). specified. RETUR
N means 0 (no delay). Is this definition correct ---------------------------
--------------------------------------- Si vous avez commis des erreurs, taper
N. Vous retournerez alors au menu de selection du terminal. Les donnees que vou
s venez de rentrer seront incluses dans le fichier des donnees d'installation e
t appa- raitront dans le menu mais l'installation n'est pas encore faite. Si
vous tapez Y, la question suivante apparaitra ------------------------------
------------------------------------ Operating frequency of your microprocessor
in MHz (for delays) ----------------------------------------------------------
-------- Les delais specifies plus haut dependent de cette valeur que vous dev
ez entrer. L'installation est maintenant terminee les donnees s $A+,R-,W0,I-
Procedure Inp Forward Procedure OutP ForWard Function Less(Var X,Y)Bool
ean Forward Type SortPointer Byte Var SortRecord Record Global
variables used by all routines variables concerning pagin
g N Integer no of records to be sorted
B Integer no of records pr page
Pages 0..10 No of pages in memory ont ecrites
dans PROGRAMNAME et vous retournez au menu exterieur. Les donnees sont egalem
ent sauvegardees dans le fichier d'installation et apparaitront sur le menu de
selection pour le prochain appel de INSTALLNAME. ency of your microprocessor i
n MHz (for delays) ------------------------------------------------------------
------ Les delais specifies plus haut dependent de cette valeur que vous devez
entrer. L'installation est maintenant terminee les donnees s
SecPrPage, no of sectors pr page
NDivB, NModB Integer M Div B, N Mod B respectively
Buf Array0..10 Of SortPointer
Addresses of buffers
Page Array0..10 Of Integer
Nos of pages in workarea W Array0..10
Of Boolean dirty-bits is page chan
ged Udix Integer Udix points to the next re
cord to be returned
F File File used for external sorting
FileCreated Boolean Is external file used
Error Integer Has an i/o error occurred
ATTENTION Pour remedier a la limitation memoire du CPC 464/664, certa
ins fichiers ont ete separes en deux. Les 4 fichiers suivants ont ete renomme
s ACCESS.BOX est remplace par ACCESS1.BOX et ACCESS2.BOX BTREE.INC est
remplace par BTREE1.INC et BTREE2.INC INSTALL.DOC est remplace par INSTALL
1.DOC et INSTALL2.DOC SORT.BOX est remplace par SORT1.BOX et SORT2.BOX
------------------------------------------------------------- !R!A!F!B!G
!C!H!D!I!E ItemLth Integer Length of record
End Procedure SortPut(Addr SortPointer PageNo Integer
) Write page PageNo on file, address of page in memory is Addr Begi
n If SortRecord.Error0 Then Begin No i/o error Seek(SortReco
rd.F, PageNo*SortRecord.SecPrPage) BlockWrite(SortRecord.F, Addr, Sort
Record.SecPrPage) If IOResult0 Then SortRecord.Error10 write error
End End VictimVictim+1 SortRecord.PageVictim not in U
If SortRecord.WVictim Then Dirty bit set SortPut(So
rtRecord.BufVictim,SortRecord.PageVictim) SoGet(SortRecord.BufVictim,I
xPage) SortRecord.PageVictim IxPage SortRecord.WVictim False
End End Function TurboSort(ItemLth Integer)Integer Func
tion TurboSort returns an integer specifying the result of the sort
TurboSort0 Procedure SortFetchAddr( Ix Integer Var Adr SortPointer)
Find address in memory for record no Ix. It is assumed that rec
ord Ix is in memory Var IxPage Integer I 0..10
Begin IxPage Ix Div SortRecord.B I 0 While SortRecord.Page
i IxPage Do II+1 IxPage SortRecord.Page I AdrPtr(Ord(SortRecor
d.BufI) + (Ix Mod SortRecord.B)* SortRecord.ItemLth) End
Procedure SSorted TurboSort3 Workarea too small TurboSort8 Ille
gal itemlength TurboSort9 More than maxint records TurboSort10 Wr
ite error during sorting ( disk full ) TurboSort11 Read error during sort
ing TurboSort12 Impossible to create new file ( directory full ) L
abel 99 Const SecSize 128 Var SaveZ, SwopPost
SortPointer SafetyP, WorkArea Real No of bytes inte
rnal memory ortFetchPage( Ix Integer U1, U2 Integer) After cal
l of SortFetchPage the record Ix is in memory. If records U1 and U2 are
in memory before call, then they are not overwritten since we soon wi
ll need them Var U1Page, U2Page, IxPage Integ
er Victim 0..10 The chosen page to be written to file P
rocedure SOget(Addr SortPointer Pageno Integer) Read page PageNo into
memory at address Addr Begi I, PageSize Integer No of
bytes pr page Function Convert(IInteger)Real Convert n
egative integers to positive reals Begin If I0.0 Then I greater t
han MaxInt ConvertI+65536.0 Else ConvertI End
Function SortAvailReal Redefine MaxAvail to return real result
Var I Real Begin IConvert(MaxAvail) SortAvailI End
Procedure QuickSort Non-n If SortRecord.Error0 Then Begin
Seek(SortRecord.F, Pageno*SortRecord.SecPrPage) Block
Read(SortRecord.F, Addr, SortRecord.SecPrPage) If IOResult0 Then So
rtRecord.Error11 read error End End Function InMem(
Ix Integer) Boolean InMem returns true if record ix is in memory
Var I,IxPage Integer Flag Boolean Begin
IxPage Ix Div SortRecord.B Flarecursive version of quicksort algo
rithm as given in Nicklaus Wirth Algorithms + Data Structures Program
s Label 0 Procedure Exchange(I,J Integer) Change r
ecords I and J Var P,R,S Integer K,L
0..10 IAddr, JAddr SortPointer Begin
P I Div SortRecord.B K0 While SortRecord.PagekP Do
KK+1 P J Div SortRecord.B gFalse For I0 To SortRe
cord.Pages-1 Do If IxpageSortRecord.PageI Then FlagTrue I
nMemFlag End Begin SortFetchPage If (Not InMem(Ix)) Then
Begin Record Ix not in memory IxPage Ix Div SortRecord.B
Victim0 U1PageU1 Div SortRecord.B U2PageU2 Div S
ortRecord.B While ((SortRecord.PageVictimU1Page) Or (S
ortRecord.PageVictimU2Page)) Do "R"A"F"B"G"C"H"D"I"EL0 Wh
ile SortRecord.PageLP Do LL+1 R I Mod SortRecord.B S J Mod
SortRecord.B IAddr Ptr(Ord(SortRecord.BufK) + R*ItemLth) JAd
dr Ptr(Ord(SortRecord.BufL) + S*ItemLth) Move(IAddr,SwopPost,ItemLth)
Move(JAddr,IAddr,ItemLth) Move(Swoppost,JAddr,ItemLth)
SortRecord.WK True SortRecord.WL True End Cons
t MaxStack 20 Log2(N) MaxStack, i. e. for MaxStack 20
it is possible to sort 1 million records Var
The stacks LStack Array1..MaxStack Of Integer Stack of left i
ndex RStack Array1..MaxStack Of Integer Stack of right index
Sp Integer Stack SortPointer
M,L,R,I,J Integer XAddr,YAddr,ZAddr SortPointer Begi
n The quicksort algorithm If SortRecord.N0 Then Begin
LStack10 RStack1SortRecord.N-1 Sp1 End Else Sp
0 While Sp0 do Begin Pop(L,R) LLStackSp
RRStackSp SpSp-1 Repeat IL JR
M(I+J) Div 2 SortFetchPage(M,I,J) get M, hold I and J
record M in memory If SortRprogram SortExampleOne Cu
stomer File type CustRec record Number integer
Name string30 Addr string20 City string1
2 State string3 Zip string5 end
var CustFile file of CustRec Customer CustRec (*$ISORT1.BOX*) (*$ISO
RT2.BOX*) procedure Inp this procedure is forward declared in SORT.BOX begin
repeat Read(CustFile,Customer) SortRelecord.Error0 Then GoTo 0 En
d program SortFetchAddr(M,ZAddr) Move(ZAddr,SaveZ,Ite
mLth) Repeat SortFetchPage(I,J,M) get I, hold J
and M I and M in memory If SortRecord.Error0
Then GoTo 0 End program SortFetchAddr(I,XAddr)
While Less(XAddr,SaveZ) do Begin II+1
SortFetchPage(I,J,M) Sortease(Customer) unti
l EOF(CustFIle) end function Less this boolean function has two parameters,
X and Y and is forward declared in SORT.BOX var FirstCust C
ustRec absolute X SecondCust CustRec absolute Y begin Less FirstCust.Num
ber SecondCust.Number end procedure OutP var I Integer begin repea
t SortReturn(Customer) with Customer do begin Write(Number
, ' ',Name,' ') for I Length(Name) to 30 do Write(' ') FetchAddr(I,XAd
dr) If SortRecord.Error0 Then GoTo 0 End program
End I and M in memory SortFetchPage(J,I,
M) Get J, hold I and M I, J and M in memory
If SortRecord.Error0 Then GoTo 0 End program SortFetchAdd
r(J,YAddr) While Less(SaveZ,YAddr) do Begin
JJ-1 SortFetchPage(J,I,M) Writ
e(Addr) for I Length(Addr) to 20 do Write(' ') Write(City)
for I Length(City) to 12 do Write(' ') WriteLn(State,' ',Zip) end
until SortEOS end begin program SortExampleOne ClrScr Assign(CustFi
le,'CUSTOMER.DTA') Reset(Custfile) WriteLn(TurboSort(SizeOf(CustRec))) en
d. omer) with Customer do begin Write(Number, ' ',Name,' ')
for I Length(Name) to 30 do Write(' ') #R#A#F#B#G#C#H#D#I#E Sor
tFetchAddr(J,YAddr) If SortRecord.Error0 Then GoTo 0 End pr
ogram End I, J and M in memory
If IJ Then Begin If IJ Then Exchange(I,J)
II+1 JJ-1 End
Until IJ Push longest interval on stack If J-L R-I
Then Begin If IR Then Begin tializ
e virtual system For I0 To SortRecord.Pages-1 Do S
ortRecord.WITrue If SortRecord.Error0 Then Quicksort
End sort, return all records SortRecord.Udix0
If SortRecord.Error0 Then OutP call user defined output procedure
End If SortRecord.FileCreated Then Begin C
lose(SortRecord.F) Erase(SortRecord.F) End R
ele Push(I,R) SpSp+1 LS
tackSpI RStackSpR End RJ
End Else Begin If LJ Then
Begin Push(L,J) SpSp+1
LStackSpL RStackSpJ End
LI End Until LR End 0ase all
ocated memory For ISortRecord.Pages-1 DownTo 0 Do FreeMe
m(SortRecord.BufI,PageSize) FreeMem(SaveZ,ItemLth) FreeMem(S
wopPost,ItemLth) End Else SortRecord.Error3 Too little memory En
d Else SortRecord.Error8 Illegal itemlength TurboSortSortRecord.Error
End TurboSort Procedures used by user routines Procedure SortRele
ase(Var ReleaseRecord) Accept record from user Var I,
End QuickSort Begin TurboSort If ItemLth1 Then Begin So
rtRecord.ItemLth ItemLth WorkAreaSortAvail-ItemLth-ItemLth No
of pages to be kept in memory SortRecord.PagesTrunc(WorkArea/(2.0*MaxInt
)+1.0) If SortRecord.Pages3 Then Must be at least 3
SortRecord.Pages3 SortRecord.SecPrPageTrunc(WorkArea / SecSiz
e) Div SortRecord.Pages If SortRecord.SecPrPage 20 Then SortRe
BufNo Integer Point SortPointer Begin If SortRecord.Error0
Then Begin If SortRecord.NMaxInt Then Only possible to sort MaxInt
records SortRecord.Error9 If ((SortRecord.NModB0) an
d (SortRecord.NDivB SortRecord.Pages)) Then Begin Write
out last read page If SortRecord.NDivBSortRecord.Pages Then Begin
create user file Assign(SortRecord.F,'SOWRK.$
$$') cord.SecPrPage4*(SortRecord.SecPrPage div 4) PageSizeSortRe
cord.SecPrPage*SecSize May be negative or 0 If (PageSize0) And (SortRec
ord.SecPrPage0) Then SafetyP65536.0 2*MaxInt Else
SafetyPConvert(PageSize) SortRecord.B Trunc(SafetyP/ItemLth)
If SortRecord.B 0 Then Begin Enough memory GetMem(SwopPost,ItemLt
h) GetMem(SaveZ,ItemLth) For I0 To SortRecord.Pages-1 Do
GetMem Rewrite(SortRecord.F) If IOResult0 Then
SortRecord.Error12 Else SortRecord.FileCreatedTrue
Fill page 0 to Pages-2 For I0 To SortRecord.Pages-2 Do
SortPut(Ptr(0), I) End Write user rec
ord in last page SortPut(SortRecord.BufSortRecord.Pages-1,
SortRecord.PageSortRecord.Pages-1) SortRecord.PageSor
tRecord.Pages-1 (SortRecord.BufI,PageSize) TurboSort0
SortRecord.Error0 SortRecord.FileCreatedFalse SortRecor
d.N0 SortRecord.NModB0 SortRecord.NDivB0 For I0 To
SortRecord.Pages-1 Do SortRecord.PageII Inp call
user defined input procedure all records are read
If SortRecord.Error 0 Then Begin No errors while reading records
Ini $R$A$F$B$G$C$H$D$I$E SortRecord.PageSortRecord.Page
s-1+1 End If SortRecord.NDivBSortRecord.Pages Then
BufNoSortRecord.Pages-1 Else BufNoSortRecord.NDivB
Point Ptr(Ord(SortRecord.BufBufNo) + SortRecord
.NModB*SortRecord.ItemLth) Move(ReleaseRecord,Point,SortRecord.ItemLth
) SortRecord.N SortRecord.N+1 SortRecord.NModBSortRecord.N
ModB + 1 If SortRecord.NModBSortRecorstRec Customer CustRec St
ockFile file of ItemRec Item ItemRec Choice Char (*$ISORT1.B
OX*) (*$ISORT2.BOX*) procedure Inp this procedure is forward declared in SOR
T.BOX begin case Choice of 'C' begin repeat R
ead(CustFile,Customer) SortRelease(Customer) until EOF
(CustFile) end 'S' begin repeat Read(St
ockFile,Item) SortRelease(Item) ud.B Then Begin
SortRecord.NModB0 SortRecord.NDivBSortRecord.NDivB+1
End End End SortRelease Procedure SortReturn(Var Retur
nRecord) Return record to user Var AuxAddr SortPointer Begi
n If SortRecord.Error0 Then Begin SortFetchPage(SortRecord.Udix
,SortRecord.N-1,-SortRecord.B) SortFetchAddr(SortRecord.Udix,AuxAddr)
Move(AuxAddr,ReturnRecord,SortRecord.ItemLth) SortRntil EOF(
StockFile) end end case end function Less this boolean function
has two parameters, X and Y and is forward declared in SORT.BOX
var FirstCust CustRec absolute X SecondCust CustRec absolute Y First
Item ItemRec absolute X SecondItem ItemRec absolute Y begin case Choice
of 'C' Less FirstCust.Number SecondCust.Number 'S' Less (FirstItem.
InStock SecondItem.InStock) or ((FirstItem.InStock Secoecord.
Udix SortRecord.Udix+1 End End SortReturn Function SortEO
SBoolean Returns True if all records are returned Begin Sort
EOS (SortRecord.Udix SortRecord.N) Or (SortRecord.Error0) End $I+,W2
Default values .B) SortFetchAddr(SortRecord.Udix,AuxAddr)
Move(AuxAddr,ReturnRecord,SortRecord.ItemLth) SortRndItem.InStock)
and (FirstItem.Price SecondItem.Price)) end end proced
ure OutP var I Integer begin case Choice of 'C' begin
repeat SortReturn(Customer) with Customer do
begin Write(Number, ' ',Name,' ') for I
Length(Name) to 30 do Write(' ') Write(Addr) for
I Length(Addr) to 20 do Write(' ') Write(City)
for I Length(City) to 12 do Write(' ') WriteLn(State,' ',Zip)
end until SortEOS end 'S' begin
repeat SortReturn(Item) with Item do
begin Write(Number, ' ',Descrip,' ') for I
Length(Descrip) to 30 do Write(' ') WriteLn(InStock5,Price82)
end until SortEOS end end case end begi
n proprogram SortExampleTwo Customer File and Stock File type CustRec r
ecord Number integer Name string30
Addr string20 City string12 State string3
Zip string5 end ItemRec record
Number integer Descrip string30 InStock integer
Price real end var CustFile file of Cu %
R%A%F%B%G%C%H%D%I%Egram SortExampleOne ClrScr Write('Sort Customers or Sto
ck (enter C or S) ') repeat read(Kbd,Choice) Choice UpCase(Choice)
until Choice in 'C','S' WriteLn(Choice) case Choice of 'C' begin
Assign(CustFile,'CUSTOMER.DTA') Reset(CustFile)
WriteLn(TurboSort(SizeOf(CustRec))) end 'S' begin
Assign(StockFile,'STOCK.DTA') Reset(StockFile) WriteLn(
TurboSort(SizeOf(ItemRec))) L ! Small fork wheel barrowelRODUCQ#Special garden
trowelowelRODUC"p #"Extra small garden trowelRODUC0GbYSmall wheel barrow trowelR
ODUCHQC!Extra large shovel trowelRODUCC£p High speed weederl trowelRODUC(fffMedi
um size spadel trowelRODUCGExtra small spadel trowelRODUCGz0Extra small weeder t
rowelRODUC8p Z!Standard shovelder trowelRODUC(zG&Extra large weeder trowelRODUCp
Extra large spader trowelRODUCWG Special rake end end case end. ic
e UpCase(Choice) until Choice in 'C','S' WriteLn(Choice) case Choice o
f 'C' begin Assign(CustFile,'CUSTOMER.DTA') Reset(C
ustFile) WriteLn(TurboSort(SizeOf(CustRec))) end 'S'
begin Assign(StockFile,'STOCK.DTA') Reset(StockFile)
WriteLn(TurboSort(SizeOf(ItemRec))) spader trowelRODUC(ONMedium size l
awn moverwelRODUCDQ,Special rakelawn moverwelRODUCGzXMiniature rakewn moverwelRO
DUC8(&Small weederkewn moverwelRODUC,U&Extra small rake moverwelRODUCI Small for
kl rake moverwelRODUCQnExtra large tractorverwelRODUC6£pMiniature tractororverwe
lRODUCz Medium size wheel barrowlRODUCyXExtra large tractorarrowlRODUC2 £p!Extra
small garden trowelRODUC-4High speed rakeden trowelRODUC+PSpecial garden trowel
owelRODUC,zt Special spaden trowelowelRODUCC(7Miniature garden trowelelRODUCQD
Extra large fork trowelelRODUCI Standard rakeork trowelelRODUCQ(u Small wheel ba
rrowrowelelRODUC(&Miniature tractorwrowelelRODUCb Extra small spadewrowelelRODUC
!£p High speed forkdewrowelelRODUCB(y!Standard tractorewrowelelRODUC*3333KQ Smal
l rakeractorewrowelelRODUCG4-High speed shovelwrowelelRODUCaExtra smalld)JExtra
large wheel barrowTRODUCGzExtra large tractorarrowTRODUCffffSmall spade tractora
rrowTRODUC8M"Large spade tractorarrowTRODUCPGa4Extra large wheel barrowTRODUC£p9
Extra large weederbarrowTRODUCExtra small wheel barrowTRODUCExtra large lawn mo
verowTRODUCVLarge shovellawn moverowTRODUCQGStandard tractor moverowTRODUC£p WW"
Extra large lawn moverowTRODUC6hMiniature rakewn moverowTRODUCC£p Extra small g
garden trowelRODUCffff$ Small rakel garden trowelRODUC'GzTExtra large wheel barr
owlRODUC3Q85!Miniature wheel barrowowlRODUC6(jSmall shoveleel barrowowlRODUCX5U
Large weedereel barrowowlRODUCPzESpecial lawn moverrrowowlRODUCS £p Small lawn m
overerrrowowlRODUC9QBkHigh speed tractorrrowowlRODUCQ%Extra small garden trowelR
ODUCG£pHigh speed lawn moverowelRODUCHQXExtra small garden trowelRODUCGzv$Extra
small garden trowelRODUCNarden trowelRODUC£p$!Miniature tractorn trowelRODUC8zSt
andard garden trowelwelRODUCLGzExtra small tractorwelwelRODUCc(Extra small lawn
moverwelRODUCE Medium size shoveloverwelRODUC4Miniature tractorloverwelRODUC3333
vExtra small lawn moverwelRODUC-)Large spade lawn moverwelRODUC(B(cExtra small s
pademoverwelRODUC/£p&Miniature weederemoverwelRODUC4IExtra small shoveloverwelRO
DUCffff'iHigh speed wheel barrowelRODUC& &R&A&F&B&G&C&H&D&I&Ep q%Small garden t
roweltrowelRODUC(Extra large weederltrowelRODUC QSmall wheel barrowltrowelRODUC
Small tractorarrowltrowelRODUC333,2Miniature garden trowelelRODUC$Special wheel
barrowwelelRODUC%!Large shovell barrowwelelRODUCQ(pMedium size forkrrowwelelRODU
C(GZAStandard lawn moverwwelelRODUC Standard fork moverwwelelRODUC-£p (Extra lar
ge tractorwwelelRODUCLMedium size forktorwwelelRODUCM £, Special whRESTORESAVEME
MCOMMAND$CONCHAR%CONSTAT%LPRINTERGRANDOMIZEDINITIALIZEEEcx4DISK ERROR $BASXREF06
NO SOURCE FILE $.BAS$XREF07 INVALID PAGE LENGTHXREF05 INCLUDE NESTING TO DEEP N
EAR LINE$XREF03 OUT OF MEMORYXREF01 OUT OF MEMORY$XREF04 TO MANY FUNCTIONSXREF02
OUT OF MEMORY $PAGE NO$ NAME TYPE$.BASPARAMETER $
FUNCTION $ GLOBAL $XREF V2.08 $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$COPYRIGHT 1
981 COMPILER SYSTEMS INC.$1r eel barrowwelelRODUC£p Standard lawn moverwwelelR
ODUC&zG $Special garden trowelelelRODUCC£ptStandard weedertrowelelelRODUC3Miniat
ure spadetrowelelelRODUC£pq%Medium size shovelwelelelRODUC0Q8"Extra small forkel
welelelRODUCffffHMedium size tractorelelelRODUC%Q Extra small wheel barrowlRODUC
p #Extra large lawn moverowlRODUCiExtra large lawn moverowlRODUC(QExtra large sh
oveloverowlRODUC (ZZ&Extra large rakeeloverowlRODUCiv!s+p+q+p+q2C** w*#"*#"!s+q+
p+q2n*w*#"Qc!6!q*&w2o!q*&!q*& !q*M*M !4!6!4!p+q*$**N*#"j v*DM !6 *6*6*y **!6!*&
* *&*!4 oc£p iExtra large lawn moverowlRODUC(QExtra large shoveloverowlRODUC (ZZ
&Extra large rakeeloverowlRODUCtrowelelelRODUC3Miniature spadetrowelelelRODUC£pq
%Medium size shovelwelelelRODUC0Q8"Extra small forkelwelelelRODUCffffHMedium siz
e tractorelelelRODUC%Q Extra small wheel barrowlRODUCp #Extra large lawn moverow
lRODUCiExtra large lawn moverowlRODUC(QExtra large shoveloverowlRODUC (ZZ&Extra
large rakeeloverowlRODUC*c aa2ccc6+!6*2OZ+ !p+q!6+6!!60*&).*&).+s#r!6#4/!*M !
4y2z2yc!W!5"*&*DM! "*&!2GvT!6!6yy w!6*#"y!y6 y y2!6*&* yHy 2yy!6!62O!$*&'H!H*&$
f 2O!2'!Hf A2Oc *M!S #V!6c !6c !6#6c !6!6P!6$!6c !6c *&(!4!62O!02O H!2- *&) !4c
!6c !£6c C K L!£6+! 2O!'!/H#!H *&*£&w!£4t l2a5!6!y6 !6!x6!r6!t6y"!r6B" 2 COPYRI
GHT 1978,1979,1981 COMPILER SYSTEMS INCd #()*+,-/ ASEQ GEGOGT IFLELTNEONORTOAB
SANDASCATNCOSDEFDIMENDEXPFORFREINPINTLENLETLOGNOTOUT POSREMbRNDSGNSINSQRSUB!TABT
ANVALXOR"BUFF(CALL#CHR$DATAcELSE$FEND%FILE&GOTO'INT%LINE)MID$NEXT*OPEN+PEEKPOKE,
READ-RECL.RECS/SADDSIZESTEP0STOP1STR$THEN2WEND3CHAINCLOSE4FLOATGOSUB5INPUT6LEFT$
L#CALaMATCHPRINT7USING8WHILE9WIDTHCOMMONCREATEDELETEREMARKbRENAMERETURNRIGHT$UCA
SE$CONSOLE 'R'A'F'B'G'C'H'D'I'Ey y" 7H!r6Ay0C2y27SyHyhHq y y+Hy-HEH y Tjy$
y%FNHH&!r6H+!r6F!"x2rby Z2yFrcy y2ye y%z H I y 2y!6y y.Hy H *5)*P#V"*Z)*P*)*PN#F
q#p*Z)*P*s#r!Y6*"*P##"P!cr+s+p+q**bz**b**b**b**b *b2f*2f!g6g2g!f*g&**g&*b*g5*g&*
2d!d6 *bgY*g&*b2e!e6 !ed!h6!l6**l2lO!Hql2lO!6!m6!m*m&* *m&*l2lO! w!m4h*l&DM 2 *
DMz*o&"DM! o&"!w*# D *w2 ! !6*# DM !65!y6 y !r6 2O!ywy!xw 2y*&y0O/ya/z!y/H
y.#!£Sy2yyAO/#HTH7HTyAO£y !!6*&2!!2!6*&I)*P"N!"jRj,L*N#V"!m6*!mPmO!*N!m4**!O,kl
M,wMM"!i6 9 !m6*!mi, !i6!!/!+mO!*N#Fz!m4*#V"!/!7*N##"N*j"j!op+q!p6*p&*n$*p&*nN!p
4X!qq!r6q!r !r4MMM+7Mh2hOzM!6ogDMH"*&*2O! a!*&*2rr2u!r6G*&O*22D!s"8*++"!6#6*!*&*
2!4**" 9+s#r!8G #*!Ap+qy 9*+"*DZ*#V"9*O!*. H* *q#p*#V"6*w#6*N!**s#r*4*&)#V!BqB8!
G!)) #Vgo ozgiN#Fogo&ogz#WCBASIC XREF LISTING OF $ $
$ INT !Dp+q**Cs#r*w*"9q*2E*ctc*##V"EO!**E&* E2Et*2FO*8"*#*
**w *6*#q#p*&)*s#rF8+s#r!Gq*Gw*!Hq*Hw**#V!Iq*Iw*2L!M6L!Mo&"J*J.*JN#Fi"J*#*JN#Fq#
p!M4p rF27/!T!"DM *6*w#6T XRF$$$I"I$!!$I!B B"D$!D$I$!4*M%!%"*DM$ rHs*#""
"DM *6*w#6!6*M%!T6*"7"*DM$ r !T!6*"*ML!T6 r T!T6!6 *"e!6r2s*8"P"N!"R!s"8,*N*s#r*
N##"N*+%s *RDMz*R#"R0*P++"P*R"U!UDR!U+s#rR"W!Y6YO!Y6!"W,L*U*"Z*)*P*Z)*P#VN#F*