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 43 50 44 52 65 61 64 20 76 33 2E 32 34 00 ..CPDRead v3.24.
000030: 29 01 00 00 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 00 00 02 09 4E E5 00 00 41 02 00 00 00 02 ......N...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: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000210: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000220: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000230: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000240: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000250: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000260: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000270: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000280: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000290: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0002A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0002B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0002C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0002D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0002E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0002F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000300: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000310: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000320: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000330: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000340: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000350: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000360: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000370: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000380: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000390: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0003A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0003B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0003C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0003D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0003E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0003F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
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 00 00 02 09 4E E5 01 00 41 02 00 00 00 02 ......N...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 00 00 02 09 4E E5 02 00 41 02 00 00 00 02 ......N...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 53 4D 46 49 4C 45 53 4C 42 52 00 00 00 51 .ASMFILESLBR...Q
002810: 02 03 04 05 06 07 08 09 0A 0B 52 00 00 00 00 00 ..........R.....
002820: 00 4D 4F 44 46 49 4C 45 53 4C 42 52 00 00 00 80 .MODFILESLBR....
002830: 0C 0D 0E 0F 10 11 12 13 14 15 16 17 18 19 1A 1B ................
002840: 00 4D 4F 44 46 49 4C 45 53 4C 42 52 01 00 00 80 .MODFILESLBR....
002850: 1C 1D 1E 1F 20 21 22 23 24 25 26 27 28 29 2A 53 .... !"#$%&'()*S
002860: 00 44 45 46 46 49 4C 45 53 4C 42 52 00 00 00 80 .DEFFILESLBR....
002870: 2B 2C 2D 2E 2F 30 31 32 33 34 35 36 37 38 39 3A +,-./0123456789:
002880: 00 44 45 46 46 49 4C 45 53 4C 42 52 01 00 00 80 .DEFFILESLBR....
002890: 3B 3C 3D 3E 3F 40 41 42 43 44 45 46 47 48 49 4A ;<=>?@ABCDEFGHIJ
0028A0: 00 44 45 46 46 49 4C 45 53 4C 42 52 02 00 00 29 .DEFFILESLBR...)
0028B0: 4B 4C 4D 4E 6C 6D 00 00 00 00 00 00 00 00 00 00 KLMNlm..........
0028C0: 00 4C 49 53 54 20 20 20 20 4D 4F 44 00 00 00 1E .LIST MOD....
0028D0: 50 51 5A 5B 00 00 00 00 00 00 00 00 00 00 00 00 PQZ[............
0028E0: 00 4D 4F 44 46 49 4C 45 53 4C 42 52 02 00 00 80 .MODFILESLBR....
0028F0: 54 55 56 57 58 59 5C 5D 5E 5F 60 61 62 63 64 65 TUVWXY\]^_`abcde
002900: 00 4D 4F 44 46 49 4C 45 53 4C 42 52 03 00 00 2E .MODFILESLBR....
002910: 66 67 68 69 6A 6B 00 00 00 00 00 00 00 00 00 00 fghijk..........
002920: 00 4D 4F 44 58 54 52 43 54 53 55 42 00 00 00 03 .MODXTRCTSUB....
002930: 6E 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 n...............
002940: 00 44 45 46 58 54 52 43 54 53 55 42 00 00 00 04 .DEFXTRCTSUB....
002950: 6F 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 o...............
002960: 00 41 53 4D 58 54 52 43 54 53 55 42 00 00 00 03 .ASMXTRCTSUB....
002970: 70 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 p...............
002980: 00 48 49 54 48 45 52 45 20 4D 4F 44 00 00 00 01 .HITHERE MOD....
002990: 4F 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 O...............
0029A0: 00 57 50 20 20 20 20 20 20 43 4F 4D 00 00 00 08 .WP COM....
0029B0: 95 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0029C0: 00 4D 44 20 20 20 20 20 20 43 4F 4D 00 00 00 80 .MD COM....
0029D0: 71 72 73 74 75 76 77 78 79 7A 7B 7C 7D 7E 7F 80 qrstuvwxyz{|}~..
0029E0: 00 4D 44 20 20 20 20 20 20 43 4F 4D 01 00 00 80 .MD COM....
0029F0: 81 82 83 84 85 86 87 88 89 8A 8B 8C 8D 8E 8F 90 ................
002A00: 6C 6F 63 61 74 65 73 20 69 74 73 65 6C 66 20 6A locates itself j
002A10: 75 73 74 20 62 65 6C 6F 77 20 42 44 4F 53 BF 3B ust below BDOS.;
002A20: B4 32 2F 20 6C 6F 61 64 73 20 A3 20 A4 20 00 66 .2/ loads £ . .f
002A30: 69 6C 65 00 A1 BF 3B B4 33 2F 20 72 65 6C 6F 61 ile...;.3/ reloa
002A40: 64 73 20 A3 20 00 73 74 61 63 6B 00 A0 20 70 6F ds £ .stack.. po
002A50: 69 6E 74 65 72 20 66 72 6F 6D 20 00 61 64 64 72 inter from .addr
002A60: 65 73 73 00 9F 20 36 BF 3B B4 34 2F 20 63 61 6C ess.. 6.;.4/ cal
002A70: 6C 73 20 A3 20 A6 BF 3B BF 3B B4 52 65 6D 61 72 ls £ ..;.;.Remar
002A80: 6B 20 2D 20 74 68 69 73 20 00 77 69 6C 6C 00 9E k - this .will..
002A90: 20 6E 6F 74 20 77 6F 72 6B 20 00 66 6F 72 00 9D not work .for..
002AA0: 20 70 72 6F 67 72 61 6D 73 20 00 77 68 69 63 68 programs .which
002AB0: 00 9C 20 65 78 69 74 20 77 69 74 68 BF 3B B5 20 .. exit with.;.
002AC0: 61 20 72 65 74 20 69 6E 73 74 72 75 63 74 69 6F a ret instructio
002AD0: 6E 2C 20 72 61 74 68 65 72 20 74 68 61 6E 20 61 n, rather than a
002AE0: 20 00 62 64 6F 73 00 9B 20 00 63 61 6C 6C 00 9A .bdos.. .call..
002AF0: 20 30 20 6F 72 BF 3B B5 20 61 20 4A 4D 50 20 30 0 or.;. a JMP 0
002B00: BF 3B B5 49 66 20 00 79 6F 75 00 99 20 00 6B 6E .;.If .you.. .kn
002B10: 6F 77 00 98 20 00 65 6E 6F 75 67 68 00 97 20 61 ow.. .enough.. a
002B20: 62 6F 75 74 20 00 43 50 00 96 2F 4D 20 A7 20 68 bout .CP../M . h
002B30: 61 76 65 20 63 6F 6D 70 72 65 68 65 6E 64 65 64 ave comprehended
002B40: 20 A3 20 61 62 6F 76 65 2C BF 3B B5 99 20 63 65 £ above,.;.. ce
002B50: 72 74 61 69 6E 6C 79 20 98 20 97 20 A7 20 63 72 rtainly . . . cr
002B60: 65 61 74 65 20 79 6F 75 72 20 6F 77 6E 20 76 65 eate your own ve
002B70: 72 73 69 6F 6E 20 00 6F 66 00 95 BF 3B B5 A3 20 rsion .of...;.£
002B80: A6 20 9C 20 9E C0 6C 61 62 65 6C C0 00 6C 64 00 . . ..label..ld.
002B90: 94 B4 00 64 65 00 93 2C 28 36 29 B5 3B 00 62 6F ...de..,(6).;.bo
002BA0: 74 74 6F 6D 00 92 20 95 20 96 2F 4D C0 00 64 65 ttom.. . ./M..de
002BB0: 63 00 91 B4 93 C0 00 70 6F 70 00 90 B4 00 68 6C c......pop....hl
002BC0: 00 8F B5 3B 74 68 72 6F 77 20 61 77 61 79 20 00 ...;throw away .
002BD0: 72 65 74 75 72 6E 00 8E 20 9F C0 90 B4 8F B5 3B return.. ......;
002BE0: 67 65 74 20 9F 20 95 20 00 66 63 62 00 8D C0 94 get . . .fcb....
002BF0: B4 00 62 63 00 8C 2C 33 36 C0 00 61 64 64 00 8B ..bc..,36..add..
002C00: 00 4D 44 20 20 20 20 20 20 43 4F 4D 02 00 00 10 .MD COM....
002C10: 91 92 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002C20: 00 53 44 20 20 20 20 20 20 43 4F 4D 00 00 00 07 .SD COM....
002C30: 96 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002C40: 00 57 44 20 20 20 20 20 20 43 4F 4D 00 00 00 04 .WD COM....
002C50: 97 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002C60: E5 4D 32 4F 56 4C 20 20 20 4F 56 52 00 00 00 80 .M2OVL OVR....
002C70: 93 94 98 99 9A 9B 9C 9D 9E 9F A0 A1 A2 A3 A4 A5 .............£..
002C80: E5 4D 32 4F 56 4C 20 20 20 4F 56 52 01 00 00 23 .M2OVL OVR...#
002C90: A6 A7 A8 A9 AA 00 00 00 00 00 00 00 00 00 00 00 ................
002CA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002CB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002CC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002CD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002CE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002CF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002D00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002D10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002D20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
002D30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
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: B4 8F 2C 8C C0 91 B4 8F C0 00 6C 64 64 72 00 8A ..,.......lddr..
002E10: B6 3B 6D 6F 76 65 20 8D C0 94 B4 68 2C 64 C0 94 .;move ....h,d..
002E20: B4 6C 2C 65 C0 00 69 6E 63 00 89 B4 8F C0 94 B4 .l,e..inc.......
002E30: 73 70 2C 8F B5 3B A5 20 A0 20 A7 20 92 20 95 20 sp,..;. . . . .
002E40: 8D C0 94 B4 28 00 70 61 74 63 68 00 88 31 2D 32 ....(.patch..1-2
002E50: 29 2C 8F B4 3B 88 20 61 64 64 72 65 73 73 65 73 ),..;. addresses
002E60: 20 95 20 8D C0 94 B4 28 88 32 2D 32 29 2C 8F C0 . ....(.2-2),..
002E70: 94 B4 8C 2C 00 65 6E 64 61 64 72 00 87 2D 00 73 ...,.endadr..-.s
002E80: 74 61 72 74 61 64 72 00 86 2B 32 30 B4 3B 28 32 tartadr..+20.;(2
002E90: 30 20 62 79 74 65 73 20 9D 20 A0 20 73 70 61 63 0 bytes . . spac
002EA0: 65 29 C0 94 B4 8F 2C 87 2B 31 39 C0 8A C0 00 65 e)....,.+19....e
002EB0: 78 00 85 B4 93 2C 8F C0 89 B4 8F C0 00 6A 70 00 x....,.......jp.
002EC0: 84 B4 28 8F 29 B5 3B 65 78 65 63 75 74 65 20 A3 ..(.).;execute £
002ED0: 20 A2 BF 86 3A 94 B4 93 2C 30 BF 88 31 3A B4 94 ...:...,0..1:..
002EE0: B4 63 2C 31 35 B5 3B 6F 70 65 6E 20 A1 C0 9A B4 .c,15.;open ....
002EF0: 35 B5 3B 9A 20 9B C0 94 B4 93 2C 31 30 30 68 C0 5.;. .....,100h.
002F00: 00 63 70 00 83 B4 32 35 35 C0 84 B4 7A 2C 30 BF .cp...255...z,0.
002F10: 00 6C 6F 6F 70 00 82 3A B4 00 70 75 73 68 00 81 .loop..:..push..
002F20: B4 93 C0 94 B4 63 2C 32 36 C0 9A B4 35 B5 3B A5 .....c,26...5.;.
002F30: 20 64 6D 61 20 9F C0 94 B4 93 2C 30 BF 88 32 3A dma .....,0..2:
002F40: B4 94 B4 63 2C 32 30 C0 9A B4 35 B5 3B 00 72 65 ...c,20...5.;.re
002F50: 61 64 00 80 20 6E 65 78 74 20 72 65 63 6F 72 64 ad.. next record
002F60: C0 90 B4 93 C0 94 B4 8F 2C 31 32 38 C0 8B B4 8F ........,128....
002F70: 2C 93 C0 85 B4 93 2C 8F C0 83 B4 30 C0 6A 72 B4 ,.....,....0.jr.
002F80: 7A 2C 82 B5 3B 6F 6E 20 80 20 6F 6B C0 94 B4 8F z,..;on . ok....
002F90: 2C 30 C0 81 B4 8F B5 3B A5 20 8E 20 9F BF 87 3A ,0.....;. . ...:
002FA0: B4 84 B4 31 30 30 68 B5 3B 9A 20 A6 C0 65 6E 64 ...100h.;. ..end
002FB0: BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
002FC0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
002FD0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
002FE0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
002FF0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
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: 3B BF 3B B4 49 6E 74 65 72 66 61 63 65 20 74 6F ;.;.Interface to
003210: 20 00 43 50 4D 00 93 BF 3B BF 3B B4 42 64 6F 73 .CPM...;.;.Bdos
003220: 20 61 6E 64 20 42 49 4F 53 20 63 61 6C 6C 73 BF and BIOS calls.
003230: 3B BF 3B B4 A4 B4 93 B5 3B 50 69 63 6B 20 75 70 ;.;.....;Pick up
003240: 20 64 65 66 69 6E 69 74 69 6F 6E 20 6D 6F 64 75 definition modu
003250: 6C 65 20 00 66 6F 72 00 92 20 6E 61 6D 65 20 6D le .for.. name m
003260: 61 70 70 69 6E 67 C0 00 6C 61 62 65 6C 00 91 BF apping..label...
003270: 42 44 4F 53 3A B4 00 70 6F 70 00 90 B4 00 68 6C BDOS:..pop....hl
003280: 00 8F B5 3B 00 72 65 74 75 72 6E 00 8E 20 00 61 ...;.return.. .a
003290: 64 64 72 65 73 73 00 8D C0 90 B4 00 64 65 00 8C ddress......de..
0032A0: C0 90 B4 00 62 63 00 8B C0 00 70 75 73 68 00 8A ....bc....push..
0032B0: B4 8F C0 8A B4 00 69 78 00 89 C0 00 63 61 6C 6C ......ix....call
0032C0: 00 88 B4 35 B5 3B 00 70 65 72 66 6F 72 6D 00 87 ...5.;.perform..
0032D0: 20 00 66 75 6E 63 74 69 6F 6E 00 86 C0 90 B4 89 .function......
0032E0: C0 90 B4 8F C0 90 B4 8C B5 3B 00 72 65 6D 6F 76 .........;.remov
0032F0: 65 00 85 20 00 61 6C 6C 6F 63 61 74 69 6F 6E 00 e.. .allocation.
003300: 84 20 92 20 8E 20 00 76 61 6C 75 65 00 83 20 00 . . . .value.. .
003310: 66 72 6F 6D 00 82 20 00 73 74 61 63 6B 00 81 C0 from.. .stack...
003320: 00 6C 64 00 80 B4 65 2C 61 C0 80 B4 64 2C 30 C0 .ld...e,a...d,0.
003330: 8A B4 8C B5 3B 8E 20 83 C0 6A 70 B4 28 8F 29 B5 ....;. ..jp.(.).
003340: 3B 8E C0 91 BF 42 44 4F 53 48 4C 3A B4 90 B4 8F ;....BDOSHL:....
003350: B5 3B 8E 20 8D C0 90 B4 8B C0 8A B4 8F C0 8A B4 .;. ............
003360: 89 C0 88 B4 35 B5 3B 87 20 86 C0 90 B4 89 C0 90 ....5.;. .......
003370: B4 8C C0 90 B4 8B B5 3B 85 20 84 20 92 20 8E 20 .......;. . . .
003380: 83 20 82 20 81 C0 8A B4 8F B5 3B 8E 20 48 4C 20 . . ......;. HL
003390: 83 C0 8A B4 8C C0 72 65 74 C0 65 6E 64 BF 00 00 ......ret.end...
0033A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0033B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0033C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0033D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0033E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0033F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
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: B4 00 6C 61 62 65 6C 00 91 BF 42 49 4F 53 3A B4 ..label...BIOS:.
003610: 00 6C 64 00 90 B4 00 69 79 00 8F 2C 00 62 69 6F .ld....iy..,.bio
003620: 73 00 8E 31 C0 00 6A 70 00 8D B4 00 64 69 72 65 s..1..jp....dire
003630: 63 74 00 8C B5 3B 64 6F 20 8C 20 63 61 6C 6C BF ct...;do . call.
003640: 8E 31 3A B4 00 70 6F 70 00 8B B4 00 69 78 00 8A .1:..pop....ix..
003650: C0 8B B4 00 68 6C 00 89 B5 3B 00 72 65 74 75 72 ....hl...;.retur
003660: 6E 00 88 20 00 61 64 64 72 65 73 73 00 87 C0 8B n.. .address....
003670: B4 00 64 65 00 86 B5 3B 72 65 6D 6F 76 65 20 88 ..de...;remove .
003680: 20 73 70 61 63 65 C0 90 B4 65 2C 61 C0 90 B4 64 space...e,a...d
003690: 2C 30 B4 C0 00 70 75 73 68 00 85 B4 86 C0 8D B4 ,0...push.......
0036A0: 28 89 29 C0 91 BF 42 49 4F 53 48 4C 3A B4 90 B4 (.)...BIOSHL:...
0036B0: 8F 2C 8E 32 C0 8D B4 8C BF 8E 32 3A B4 8B B4 8A .,.2......2:....
0036C0: C0 8B B4 00 62 63 00 84 C0 8B B4 86 C0 85 B4 89 ....bc..........
0036D0: C0 85 B4 84 C0 72 65 74 B5 BF 8C 3A B4 8B B4 89 .....ret...:....
0036E0: B5 3B 88 20 87 C0 8B B4 86 C0 8B B4 84 C0 65 78 .;. ..........ex
0036F0: B4 28 73 70 29 2C 89 B5 3B 72 65 70 6C 61 63 65 .(sp),..;replace
003700: 20 88 2C 20 67 65 74 20 00 63 6F 64 65 00 83 C0 ., get .code...
003710: 85 B4 86 C0 64 65 63 B4 89 C0 90 B4 64 2C 68 C0 ....dec.....d,h.
003720: 90 B4 65 2C 6C C0 00 61 64 64 00 82 B4 89 2C 89 ..e,l..add....,.
003730: C0 82 B4 89 2C 86 B5 3B 33 2A 28 83 2D 31 29 C0 ....,..;3*(.-1).
003740: 90 B4 86 2C 28 31 29 B5 3B 87 20 00 6F 66 00 81 ...,(1).;. .of..
003750: 20 73 65 63 6F 6E 64 20 65 6E 74 72 79 20 81 20 second entry .
003760: 00 6A 75 6D 70 00 80 20 74 61 62 6C 65 C0 82 B4 .jump.. table...
003770: 89 2C 86 B5 3B 87 20 81 20 80 C0 8B B4 86 C0 85 .,..;. . .......
003780: B4 8A C0 85 B4 8F B5 3B 88 20 87 C0 8D B4 28 89 .......;. ....(.
003790: 29 C0 65 6E 64 BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A ).end...........
0037A0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0037B0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0037C0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0037D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0037E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0037F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
003800: 00 20 20 20 20 20 20 20 20 20 20 20 00 00 03 00 . ....
003810: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003820: 00 43 48 41 49 4E 20 20 20 41 53 4D 03 00 09 00 .CHAIN ASM....
003830: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
003840: 00 43 50 4D 20 20 20 20 20 41 53 4D 0C 00 04 00 .CPM ASM....
003850: 00 00 00 00 01 C3 07 08 03 0E 3B 1A 00 00 00 00 ..........;.....
003860: 00 43 50 4D 42 49 4F 53 20 41 53 4D 10 00 04 00 .CPMBIOS ASM....
003870: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
003880: 00 46 41 53 54 4D 4F 56 45 41 53 4D 14 00 07 00 .FASTMOVEASM....
003890: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
0038A0: 00 49 4E 54 4C 4F 47 49 43 41 53 4D 1B 00 04 00 .INTLOGICASM....
0038B0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
0038C0: 00 50 4F 52 54 49 4F 20 20 41 53 4D 1F 00 04 00 .PORTIO ASM....
0038D0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
0038E0: 00 2D 52 45 41 44 4D 45 21 41 53 4D 23 00 06 00 .-README!ASM#...
0038F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003900: 00 45 58 43 48 41 4E 47 45 41 53 4D 29 00 05 00 .EXCHANGEASM)...
003910: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
003920: 00 4F 50 53 41 53 4D 20 20 44 41 54 2E 00 23 00 .OPSASM DAT..#.
003930: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003940: FF 20 20 20 20 20 20 20 20 20 20 20 50 00 23 00 . P.#.
003950: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003960: FF 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 . ....
003970: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
003980: 3B BF 3B B4 43 68 61 69 6E 20 00 74 6F 00 A7 20 ;.;.Chain .to..
003990: 61 6E 6F 74 68 65 72 20 00 70 72 6F 67 72 61 6D another .program
0039A0: 00 A6 BF 3B BF 3B B4 4C 6F 77 20 6D 65 6D 6F 72 ...;.;.Low memor
0039B0: 79 20 6D 75 73 74 20 62 65 20 00 73 65 74 00 A5 y must be .set..
0039C0: 20 75 70 20 61 73 20 00 72 65 71 75 69 72 65 64 up as .required
0039D0: 00 A4 20 62 79 20 00 74 68 65 00 A3 20 63 61 6C .. by .the.£ cal
0039E0: 6C 65 64 20 A6 BF 3B BF 3B B4 54 68 69 73 20 00 led ..;.;.This .
0039F0: 63 6F 64 65 00 A2 BF 3B BF 3B B4 31 2F 20 72 65 code...;.;.1/ re
003A00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
003A10: 03 00 00 00 02 09 4E E5 03 00 41 02 00 00 00 02 ......N...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: 3B BF 3B B4 66 61 73 74 20 64 61 74 61 20 00 6D ;.;.fast data .m
003B10: 6F 76 65 00 A3 20 00 61 6E 64 00 A2 20 00 73 77 ove.£ .and.. .sw
003B20: 61 70 00 A1 20 72 6F 75 74 69 6E 65 73 BF 3B BF ap.. routines.;.
003B30: 3B B4 75 73 65 64 20 00 62 79 00 A0 20 74 68 65 ;.used .by.. the
003B40: 20 65 64 69 74 6F 72 20 A2 20 A0 20 73 6F 72 74 editor . . sort
003B50: BF 3B C0 00 6C 61 62 65 6C 00 9F B6 3B 4D 6F 76 .;..label...;Mov
003B60: 65 75 70 28 61 2C 62 2C 00 6C 65 6E 00 9E 29 BF eup(a,b,.len..).
003B70: 3B BF 3B B7 A3 20 00 66 72 6F 6D 00 9D 20 61 20 ;.;.£ .from.. a
003B80: 00 74 6F 00 9C 20 62 BF 3B C0 00 70 6F 70 00 9B .to.. b.;..pop..
003B90: B4 00 69 79 00 9A B4 3B 00 72 65 74 75 72 6E 00 ..iy...;.return.
003BA0: 99 B4 00 61 64 64 72 65 73 73 00 98 C0 9B B4 00 ...address......
003BB0: 62 63 00 97 B4 3B 00 6C 65 6E 67 74 68 00 96 C0 bc...;.length...
003BC0: 9B B4 00 68 6C 00 95 B4 3B 00 64 65 73 74 69 6E ...hl...;.destin
003BD0: 61 74 69 6F 6E 00 94 C0 9B B4 00 64 65 00 93 B4 ation......de...
003BE0: 3B 00 73 6F 75 72 63 65 00 92 BD C0 00 70 75 73 ;.source.....pus
003BF0: 68 00 91 B4 9A C0 00 63 61 6C 6C 00 90 B4 00 63 h......call....c
003C00: 68 65 63 6B 7A 00 8F C0 00 72 65 74 00 8E B4 7A heckz....ret...z
003C10: C0 00 64 65 63 00 8D B4 97 C0 00 61 64 64 00 8C ..dec......add..
003C20: B4 95 2C 97 C0 65 78 B4 93 2C 95 C0 8C B4 95 2C ..,..ex..,.....,
003C30: 97 C0 00 69 6E 63 00 8B B4 97 C0 6C 64 64 72 C0 ...inc.....lddr.
003C40: 8E BF 3B C0 9F B6 3B 4D 6F 76 65 64 6E 28 61 2C ..;...;Movedn(a,
003C50: 62 2C 9E 29 BF 3B BF 3B B7 A3 20 9D 20 61 20 9C b,.).;.;.£ . a .
003C60: 20 62 BF 3B C0 9B B4 9A B4 3B 99 B4 98 C0 9B B4 b.;.....;......
003C70: 97 B4 3B 96 C0 9B B4 93 B4 3B 94 C0 9B B4 95 B4 ..;......;......
003C80: 3B 92 C0 91 B4 9A C0 90 B4 8F C0 8E B4 7A C0 6C ;............z.l
003C90: 64 69 72 C0 8E BF 3B BF 3B B4 C0 9F B6 3B A1 28 dir...;.;....;.(
003CA0: 61 2C 62 2C 9E 29 C0 9B B4 9A C0 9B B4 97 C0 9B a,b,.)..........
003CB0: B4 95 C0 9B B4 93 C0 91 B4 9A BF 00 6C 6F 6F 70 ............loop
003CC0: 00 8A 3A B4 8D B4 97 C0 62 69 74 B4 37 2C 62 C0 ..:.....bit.7,b.
003CD0: 8E B4 00 6E 7A 00 89 C0 00 6C 64 00 88 B4 61 2C ...nz....ld...a,
003CE0: 28 93 29 C0 91 B4 00 61 66 00 87 C0 88 B4 61 2C (.)....af.....a,
003CF0: 28 95 29 C0 88 B4 28 93 29 2C 61 C0 9B B4 87 C0 (.)...(.),a.....
003D00: 21 0D 00 ED 5B BB 9E CD 17 92 DA D8 79 DD E5 E1 !...[.......y...
003D10: 01 04 00 09 ED 5B BB 9E 19 5E 16 00 EB 11 20 00 .....[...^.... .
003D20: B7 ED 52 CA D8 79 21 00 00 E5 DD E5 E1 01 04 00 ..R..y!.........
003D30: 09 ED 5B BB 9E 19 5E 16 00 EB D1 B7 ED 52 CA D8 ..[...^......R..
003D40: 79 DD E5 E1 01 04 00 09 ED 5B BB 9E 19 5E 16 00 y........[...^..
003D50: EB 11 2E 00 B7 ED 52 CA D8 79 DD E5 E1 01 04 00 ......R..y......
003D60: 09 ED 5B BB 9E 19 5E 16 00 EB 11 3A 00 B7 ED 52 ..[...^....:...R
003D70: C2 57 79 2A BB 9E 11 01 00 CD 17 92 C2 57 79 21 .Wy*.........Wy!
003D80: 3B BF 3B B4 45 78 63 68 61 6E 67 65 20 00 70 72 ;.;.Exchange .pr
003D90: 6F 63 65 73 73 00 95 20 77 69 74 68 20 63 75 72 ocess.. with cur
003DA0: 72 65 6E 74 20 95 BF 3B C0 6C 61 62 65 6C C0 00 rent ..;.label..
003DB0: 70 75 73 68 00 94 B4 00 61 66 00 93 C0 94 B4 00 push....af......
003DC0: 62 63 00 92 C0 94 B4 00 64 65 00 91 C0 94 B4 00 bc......de......
003DD0: 69 78 00 90 B5 3B 73 61 76 65 20 00 63 61 6C 6C ix...;save .call
003DE0: 65 72 73 00 8F 20 90 20 6F 6E 20 8F 20 00 73 74 ers.. . on . .st
003DF0: 61 63 6B 00 8E C0 94 B4 00 69 79 00 8D B5 3B 61 ack......iy...;a
003E00: 6E 64 20 8D C0 94 B4 00 68 6C 00 8C C0 00 6C 64 nd .....hl....ld
003E10: 00 8B B4 8C 2C 30 C0 00 61 64 64 00 8A B4 8C 2C ....,0..add....,
003E20: 00 73 70 00 89 C0 65 78 B4 91 2C 8C C0 8B B4 8C .sp...ex..,.....
003E30: 2C 31 34 C0 8A B4 8C 2C 91 B5 3B 00 61 64 64 72 ,14....,..;.addr
003E40: 65 73 73 00 88 20 00 6F 66 00 87 20 00 65 78 63 ess.. .of.. .exc
003E50: 68 61 6E 67 65 00 86 20 70 61 63 6B 65 74 C0 8B hange.. packet..
003E60: B4 63 2C 28 8C 29 C0 00 69 6E 63 00 85 B4 8C C0 .c,(.)..inc.....
003E70: 8B B4 68 2C 28 8C 29 C0 8B B4 6C 2C 63 C0 8B B4 ..h,(.)...l,c...
003E80: 63 2C 28 8C 29 C0 8B B4 28 8C 29 2C 65 C0 85 B4 c,(.)...(.),e...
003E90: 8C C0 8B B4 62 2C 28 8C 29 C0 8B B4 28 8C 29 2C ....b,(.)...(.),
003EA0: 64 B5 3B 86 20 8E 20 70 6F 69 6E 74 65 72 73 C0 d.;. . pointers.
003EB0: 8B B4 68 2C 62 C0 8B B4 6C 2C 63 C0 8B B4 89 2C ..h,b...l,c....,
003EC0: 8C B5 3B 00 63 61 6C 6C 65 65 00 84 27 73 20 8E ..;.callee..'s .
003ED0: 20 00 6E 6F 77 00 83 20 69 6E 20 70 6C 61 63 65 .now.. in place
003EE0: BF 3B BF 3B B4 77 65 20 83 20 63 6F 72 72 65 63 .;.;.we . correc
003EF0: 74 20 74 68 65 20 8E 20 00 74 6F 00 82 20 67 65 t the . .to.. ge
003F00: 88 B4 28 95 29 2C 61 C0 8B B4 93 C0 8B B4 95 C0 ..(.),a.........
003F10: 00 6A 70 00 86 B4 8A BF 3B BF 3B B4 6C 6F 6F 6B .jp.....;.;.look
003F20: 75 70 BF 3B C0 9F C0 9B B4 9A B5 3B 99 20 98 C0 up.;.......;. ..
003F30: 9B B4 97 B5 3B 9E C0 9B B4 95 B5 3B 00 73 74 61 ....;......;.sta
003F40: 72 74 00 85 20 98 C0 9B B4 93 C0 90 B4 8F C0 86 rt.. ...........
003F50: B4 7A 2C 00 6C 6F 6F 6B 00 84 31 C0 88 B4 61 2C .z,.look..1...a,
003F60: 65 C0 9B B4 93 B5 3B 00 73 70 61 63 65 00 83 20 e.....;.space..
003F70: 00 66 6F 72 00 82 20 00 72 65 73 75 6C 74 00 81 .for.. .result..
003F80: C0 63 70 69 72 BF 84 31 3A B4 91 B4 95 C0 91 B4 .cpir..1:.......
003F90: 9A C0 8E BF 3B BF 3B B4 6C 6F 6F 6B 64 6F 77 6E ....;.;.lookdown
003FA0: BF 3B C0 9F C0 9B B4 9A B5 3B 99 20 98 C0 9B B4 .;.......;. ....
003FB0: 97 B5 3B 9E C0 9B B4 95 B5 3B 85 20 98 C0 9B B4 ..;......;. ....
003FC0: 93 C0 90 B4 8F C0 86 B4 7A 2C 84 32 C0 88 B4 61 ........z,.2...a
003FD0: 2C 65 C0 9B B4 93 B5 3B 83 20 82 20 81 C0 63 70 ,e.....;. . ..cp
003FE0: 64 72 BF 84 32 3A B4 91 B4 95 C0 91 B4 9A C0 8E dr..2:..........
003FF0: BF 3B BF 3B B4 63 68 65 63 6B 20 82 20 7A 65 72 .;.;.check . zer
004000: 6F BF 3B BF 8F 3A B4 78 6F 72 B4 61 C0 00 63 70 o.;..:.xor.a..cp
004010: 00 80 B4 62 C0 8E B4 89 C0 80 B4 63 C0 8E C0 65 ...b.......c...e
004020: 6E 64 BF C1 BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A nd..............
004030: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004040: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004050: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004060: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004070: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004080: 3B BF 3B B4 53 6F 6D 65 20 69 6E 74 65 67 65 72 ;.;.Some integer
004090: 20 6C 6F 67 69 63 20 72 6F 75 74 69 6E 65 73 BF logic routines.
0040A0: 3B C0 00 6C 61 62 65 6C 00 96 BF 49 41 4E 44 3A ;..label...IAND:
0040B0: B4 00 70 6F 70 00 95 B4 00 68 6C 00 94 B5 3B 00 ..pop....hl...;.
0040C0: 72 65 74 75 72 6E 00 93 20 00 61 64 64 72 65 73 return.. .addres
0040D0: 73 00 92 C0 95 B4 00 62 63 00 91 B5 3B 00 66 69 s......bc...;.fi
0040E0: 72 73 74 00 90 20 00 6F 70 65 72 61 6E 64 00 8F rst.. .operand..
0040F0: C0 95 B4 00 64 65 00 8E B5 3B 32 00 6E 64 00 8D ....de...;2.nd..
004100: 74 20 72 69 64 20 87 20 70 61 72 61 6D 65 74 65 t rid . paramete
004110: 72 20 66 6F 72 20 74 68 69 73 20 70 72 6F 63 65 r for this proce
004120: 64 75 72 65 BF 3B C0 8B B4 91 2C 31 32 C0 8A B4 dure.;....,12...
004130: 8C 2C 91 B5 3B 00 72 65 74 75 72 6E 00 81 20 88 .,..;.return.. .
004140: C0 00 70 6F 70 00 80 B4 91 B5 3B 8C 20 72 65 67 ..pop.....;. reg
004150: 69 73 74 65 72 20 76 61 6C 75 65 C0 8B B4 63 2C ister value...c,
004160: 28 8C 29 C0 8B B4 28 8C 29 2C 65 C0 85 B4 8C C0 (.)...(.),e.....
004170: 8B B4 62 2C 28 8C 29 C0 8B B4 28 8C 29 2C 64 C0 ..b,(.)...(.),d.
004180: 85 B4 8C C0 8B B4 28 8C 29 2C 63 C0 85 B4 8C C0 ......(.),c.....
004190: 8B B4 28 8C 29 2C 62 C0 80 B4 8D C0 80 B4 90 C0 ..(.),b.........
0041A0: 80 B4 91 C0 80 B4 92 C0 80 B4 93 C0 80 B4 8C C0 ................
0041B0: 72 65 74 B6 3B 81 20 82 20 84 C0 65 6E 64 BF C0 ret.;. . ..end..
0041C0: C1 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0041D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0041E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0041F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004200: 41 44 43 20 20 20 20 20 01 01 01 00 8E 00 00 41 ADC .......A
004210: 44 44 20 20 20 20 20 01 01 01 00 86 00 00 41 4E DD .......AN
004220: 44 20 20 20 20 20 01 01 01 00 A6 00 00 43 43 46 D .......CCF
004230: 20 20 20 20 20 01 01 00 00 3F 00 00 43 50 20 20 ....?..CP
004240: 20 20 20 20 01 01 01 00 BE 00 00 43 50 44 20 20 .......CPD
004250: 20 20 20 02 01 00 00 ED A9 00 43 50 44 52 20 20 .......CPDR
004260: 20 20 02 01 00 00 ED B9 00 43 50 49 20 20 20 20 .......CPI
004270: 20 02 01 00 00 ED A1 00 43 50 49 20 20 20 20 20 .......CPI
004280: 43 50 49 52 20 20 20 20 02 01 00 00 ED B1 00 43 CPIR .......C
004290: 50 4C 20 20 20 20 20 01 01 00 00 2F B1 00 44 41 PL ..../..DA
0042A0: 41 20 20 20 20 20 01 01 00 00 27 B1 00 44 45 43 A ....'..DEC
0042B0: 20 20 20 20 20 01 01 01 00 35 B1 00 44 45 43 20 ....5..DEC
0042C0: 20 20 20 20 02 01 02 00 DD 2B 00 44 45 43 20 20 .....+.DEC
0042D0: 20 20 20 02 01 03 00 FD 2B 00 44 49 20 20 20 20 .....+.DI
0042E0: 20 20 01 01 00 00 F3 2B 00 45 49 20 20 20 20 20 .....+.EI
0042F0: 20 01 01 00 00 FB 2B 00 45 49 20 20 20 20 20 20 .....+.EI
004300: 20 8F C0 00 6C 64 00 8C B4 61 2C 65 C0 00 61 6E ...ld...a,e..an
004310: 64 00 8B B4 63 C0 8C B4 65 2C 61 C0 8C B4 61 2C d...c...e,a...a,
004320: 64 C0 8B B4 62 C0 8C B4 64 2C 61 C0 95 B4 91 B5 d...b...d,a.....
004330: 3B 00 73 70 61 63 65 00 8A 20 00 66 6F 72 00 89 ;.space.. .for..
004340: 20 00 72 65 73 75 6C 74 00 88 C0 00 70 75 73 68 .result....push
004350: 00 87 B4 8E C0 00 6A 70 00 86 B4 28 94 29 B5 3B ......jp...(.).;
004360: 00 61 6C 6C 00 85 20 00 74 68 61 74 00 84 2C 20 .all.. .that..,
004370: 00 6A 75 73 74 00 83 20 89 20 00 61 6E 00 82 20 .just.. . .an..
004380: 8B 21 C0 96 BF 49 4F 52 3A B4 95 B4 94 B5 3B 93 .!...IOR:.....;.
004390: 20 92 C0 95 B4 91 B5 3B 90 20 8F C0 95 B4 8E B5 ......;. ......
0043A0: 3B 32 8D 20 8F C0 8C B4 61 2C 65 C0 00 6F 72 00 ;2. ....a,e..or.
0043B0: 81 B4 63 C0 8C B4 65 2C 61 C0 8C B4 61 2C 64 C0 ..c...e,a...a,d.
0043C0: 81 B4 62 C0 8C B4 64 2C 61 C0 95 B4 91 B5 3B 8A ..b...d,a.....;.
0043D0: 20 89 20 88 C0 87 B4 8E C0 86 B4 28 94 29 B5 3B . ........(.).;
0043E0: 85 20 84 2C 20 83 20 89 20 82 20 8B 21 C0 96 BF . ., . . . .!...
0043F0: 49 58 4F 52 3A B4 95 B4 94 B5 3B 93 20 92 C0 95 IXOR:.....;. ...
004400: B4 91 B5 3B 90 20 8F C0 95 B4 8E B5 3B 32 8D 20 ...;. ......;2.
004410: 8F C0 8C B4 61 2C 65 C0 00 78 6F 72 00 80 B4 63 ....a,e..xor...c
004420: C0 8C B4 65 2C 61 C0 8C B4 61 2C 64 C0 80 B4 62 ...e,a...a,d...b
004430: C0 8C B4 64 2C 61 C0 95 B4 91 B5 3B 8A 20 89 20 ...d,a.....;. .
004440: 88 C0 87 B4 8E C0 86 B4 28 94 29 B5 3B 85 20 84 ........(.).;. .
004450: 2C 20 83 20 89 20 82 20 8B 21 C0 65 6E 64 BF 00 , . . . .!.end..
004460: 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004470: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004480: 3B BF 3B B4 00 50 6F 72 74 69 6F 00 91 20 73 75 ;.;..Portio.. su
004490: 70 70 6F 72 74 20 72 6F 75 74 69 6E 65 73 20 2D pport routines -
0044A0: 20 73 65 65 20 91 2E 64 65 66 BF 3B BF 3B B4 B1 see ..def.;.;..
0044B0: 20 28 43 29 20 44 61 76 65 20 4D 6F 6F 72 65 20 (C) Dave Moore
0044C0: 53 65 70 74 20 31 39 38 36 BF 3B C0 00 6C 61 62 Sept 1986.;..lab
0044D0: 65 6C 00 90 B5 3B 00 69 6E 00 8F C0 00 70 6F 70 el...;.in....pop
0044E0: 00 8E B4 00 68 6C 00 8D B4 3B 00 72 65 74 75 72 ....hl...;.retur
0044F0: 6E 00 8C 20 00 61 64 64 72 65 73 73 00 8B C0 8E n.. .address....
004500: 45 58 20 20 20 20 20 20 01 01 04 05 E3 2B 00 45 EX .....+.E
004510: 58 20 20 20 20 20 20 02 01 04 02 DD E3 00 45 58 X .......EX
004520: 20 20 20 20 20 20 02 01 04 03 FD E3 00 45 58 20 .......EX
004530: 20 20 20 20 20 01 01 06 00 08 E3 00 45 58 20 20 .......EX
004540: 20 20 20 20 01 01 07 05 EB E3 00 45 58 58 20 20 .......EXX
004550: 20 20 20 01 01 00 00 D9 E3 00 48 41 4C 54 20 20 .......HALT
004560: 20 20 01 01 00 00 76 E3 00 49 4D 20 20 20 20 20 ....v..IM
004570: 20 02 01 08 00 ED 46 00 49 4D 20 20 20 20 20 20 .....F.IM
004580: 49 4D 20 20 20 20 20 20 02 01 09 00 ED 56 00 49 IM .....V.I
004590: 4D 20 20 20 20 20 20 02 01 0A 00 ED 5E 00 49 4E M .....^.IN
0045A0: 43 20 20 20 20 20 01 01 01 00 34 5E 00 49 4E 43 C ....4^.INC
0045B0: 20 20 20 20 20 02 01 02 00 DD 23 00 49 4E 43 20 .....#.INC
0045C0: 20 20 20 20 02 01 03 00 FD 23 00 49 4E 44 20 20 .....#.IND
0045D0: 20 20 20 02 01 00 00 ED AA 00 49 4E 44 52 20 20 .......INDR
0045E0: 20 20 02 01 00 00 ED BA 00 49 4E 49 20 20 20 20 .......INI
0045F0: 20 02 01 00 00 ED A2 00 49 4E 49 20 20 20 20 20 .......INI
004600: 49 4E 49 52 20 20 20 20 02 01 00 00 ED B2 00 4F INIR .......O
004610: 55 54 44 52 20 20 20 02 01 00 00 ED BB 00 4F 55 UTDR .......OU
004620: 54 49 52 20 20 20 02 01 00 00 ED B3 00 4F 54 44 TIR .......OTD
004630: 52 20 20 20 20 02 01 00 00 ED BB 00 4F 54 49 52 R .......OTIR
004640: 20 20 20 20 02 01 00 00 ED B3 00 4F 55 54 44 20 .......OUTD
004650: 20 20 20 02 01 00 00 ED AB 00 4F 55 54 49 20 20 .......OUTI
004660: 20 20 02 01 00 00 ED A3 00 4A 50 20 20 20 20 20 .....£.JP
004670: 20 01 01 01 00 E9 A3 00 4A 50 20 20 20 20 20 20 .....£.JP
004680: 4A 50 20 20 20 20 20 20 02 01 0B 00 DD E9 00 4A JP .......J
004690: 50 20 20 20 20 20 20 02 01 0C 00 FD E9 00 4C 44 P .......LD
0046A0: 20 20 20 20 20 20 01 01 0D 0E 02 E9 00 4C 44 20 .......LD
0046B0: 20 20 20 20 20 01 01 0F 0E 12 E9 00 4C 44 20 20 .......LD
0046C0: 20 20 20 20 01 01 0E 0D 0A E9 00 4C 44 20 20 20 .......LD
0046D0: 20 20 20 01 01 0E 0F 1A E9 00 4C 44 20 20 20 20 .......LD
0046E0: 20 20 02 01 0E 10 ED 57 00 4C 44 20 20 20 20 20 .....W.LD
0046F0: 20 02 01 0E 11 ED 5F 00 4C 44 20 20 20 20 20 20 ....._.LD
004700: B4 00 62 63 00 8A B4 3B 00 70 6F 72 74 00 89 20 ..bc...;.port..
004710: 6E 75 6D 62 65 72 C0 8E B4 00 64 65 00 88 B4 3B number....de...;
004720: 63 75 74 20 62 61 63 6B 20 72 65 73 75 6C 74 20 cut back result
004730: 61 72 65 61 C0 8F B4 65 2C 28 63 29 B4 3B 67 65 area...e,(c).;ge
004740: 74 20 00 62 79 74 65 00 87 C0 00 6C 64 00 86 B4 t .byte....ld...
004750: 64 2C 30 B4 3B 63 6C 65 61 72 20 68 69 67 68 20 d,0.;clear high
004760: 87 C0 70 75 73 68 B4 88 C0 00 6A 70 00 85 B4 28 ..push....jp...(
004770: 8D 29 C0 90 B5 3B 4F 75 74 C0 8E B4 8D B4 3B 8C .)...;Out.....;.
004780: 20 8B C0 8E B4 88 B4 3B 76 61 6C 75 65 20 74 6F ......;value to
004790: 20 00 6F 75 74 00 84 C0 8E B4 8A B4 3B 89 20 8B .out.......;. .
0047A0: C0 84 B4 28 63 29 2C 65 C0 85 B4 28 8D 29 C0 90 ...(c),e...(.)..
0047B0: B5 3B 44 69 73 61 62 6C 65 20 00 49 6E 74 65 72 .;Disable .Inter
0047C0: 72 75 70 74 73 00 83 C0 64 69 C0 00 72 65 74 00 rupts...di..ret.
0047D0: 82 C0 90 B5 3B 45 6E 61 62 6C 65 20 83 C0 65 69 ....;Enable ..ei
0047E0: C0 82 C0 90 B5 3B 00 73 65 74 00 81 20 6D 6F 64 .....;.set.. mod
0047F0: 65 32 20 00 62 61 73 65 00 80 C0 8E B4 8D B4 3B e2 .base.......;
004800: 8C 20 8B C0 8E B4 88 B4 3B 80 20 8B C0 86 B4 61 . ......;. ....a
004810: 2C 64 C0 86 B4 69 2C 61 B4 3B 81 20 69 6E 74 65 ,d...i,a.;. inte
004820: 72 72 75 70 74 73 20 8B C0 82 C0 65 6E 64 BF C3 rrupts ....end..
004830: 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004840: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004850: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004860: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004870: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004880: 46 54 4C 20 4D 6F 64 75 6C 61 2D 32 0D 0A 41 73 FTL Modula-2..As
004890: 73 65 6D 62 6C 65 72 20 55 70 64 61 74 65 20 4E sembler Update N
0048A0: 6F 74 65 3A 0D 0A 0D 0A 0D 0A 54 68 65 20 61 73 ote:......The as
0048B0: 73 65 6D 62 6C 65 72 20 22 4D 41 2E 43 4F 4D 22 sembler "MA.COM"
0048C0: 20 69 73 20 6E 6F 20 6C 6F 6E 67 65 72 20 73 75 is no longer su
0048D0: 70 70 6C 69 65 64 2E 20 20 49 6E 73 74 65 61 64 pplied. Instead
0048E0: 20 77 65 20 73 75 70 70 6C 79 20 22 41 53 4D 2E we supply "ASM.
0048F0: 43 4F 4D 22 2C 20 61 0D 0A 6D 75 63 68 20 73 75 COM", a..much su
004900: 4C 44 20 20 20 20 20 20 02 01 10 0E ED 47 00 4C LD .....G.L
004910: 44 20 20 20 20 20 20 02 01 11 0E ED 4F 00 4C 44 D .....O.LD
004920: 20 20 20 20 20 20 01 01 12 05 F9 4F 00 4C 44 20 .....O.LD
004930: 20 20 20 20 20 02 01 12 02 DD F9 00 4C 44 20 20 .......LD
004940: 20 20 20 20 02 01 12 03 FD F9 00 4C 44 44 20 20 .......LDD
004950: 20 20 20 02 01 00 00 ED A8 00 4C 44 44 52 20 20 .......LDDR
004960: 20 20 02 01 00 00 ED B8 00 4C 44 49 20 20 20 20 .......LDI
004970: 20 02 01 00 00 ED A0 00 4C 44 49 20 20 20 20 20 .......LDI
004980: 4C 44 49 52 20 20 20 20 02 01 00 00 ED B0 00 4E LDIR .......N
004990: 45 47 20 20 20 20 20 02 01 00 00 ED 44 00 4E 4F EG .....D.NO
0049A0: 50 20 20 20 20 20 01 01 00 00 00 44 00 4F 52 20 P .....D.OR
0049B0: 20 20 20 20 20 01 01 01 00 B6 44 00 4F 55 54 44 .....D.OUTD
0049C0: 20 20 20 20 02 01 00 00 ED AB 00 4F 55 54 44 52 .......OUTDR
0049D0: 20 20 20 02 01 00 00 ED BB 00 4F 55 54 49 20 20 .......OUTI
0049E0: 20 20 02 01 00 00 ED A3 00 4F 55 54 49 52 20 20 .....£.OUTIR
0049F0: 20 02 01 00 00 ED B3 00 4F 55 54 49 52 20 20 20 .......OUTIR
004A00: 50 4F 50 20 20 20 20 20 02 01 02 00 DD E1 00 50 POP .......P
004A10: 4F 50 20 20 20 20 20 02 01 03 00 FD E1 00 50 55 OP .......PU
004A20: 53 48 20 20 20 20 02 01 02 00 DD E5 00 50 55 53 SH .......PUS
004A30: 48 20 20 20 20 02 01 03 00 FD E5 00 52 45 54 20 H .......RET
004A40: 20 20 20 20 01 01 00 00 C9 E5 00 52 45 54 20 20 .......RET
004A50: 20 20 20 01 01 13 00 D8 E5 00 52 45 54 20 20 20 .......RET
004A60: 20 20 01 01 14 00 F8 E5 00 52 45 54 20 20 20 20 .......RET
004A70: 20 01 01 15 00 D0 E5 00 52 45 54 20 20 20 20 20 .......RET
004A80: 52 45 54 20 20 20 20 20 01 01 16 00 C0 E5 00 52 RET .......R
004A90: 45 54 20 20 20 20 20 01 01 17 00 F0 E5 00 52 45 ET .......RE
004AA0: 54 20 20 20 20 20 01 01 18 00 E8 E5 00 52 45 54 T .......RET
004AB0: 20 20 20 20 20 01 01 19 00 E0 E5 00 52 45 54 20 .......RET
004AC0: 20 20 20 20 01 01 1A 00 C8 E5 00 52 45 54 49 20 .......RETI
004AD0: 20 20 20 02 01 00 00 ED 4D 00 52 45 54 4E 20 20 .....M.RETN
004AE0: 20 20 02 01 00 00 ED 45 00 52 4C 20 20 20 20 20 .....E.RL
004AF0: 20 02 01 01 00 CB 16 00 52 4C 20 20 20 20 20 20 .......RL
004B00: 70 65 72 69 6F 72 20 61 73 73 65 6D 62 6C 65 72 perior assembler
004B10: 2E 20 20 59 6F 75 20 6D 61 79 20 72 65 6E 61 6D . You may renam
004B20: 65 20 22 41 53 4D 2E 43 4F 4D 22 20 74 6F 20 22 e "ASM.COM" to "
004B30: 4D 41 2E 43 4F 4D 22 20 69 66 20 79 6F 75 20 6C MA.COM" if you l
004B40: 69 6B 65 2E 0D 0A 54 6F 20 72 75 6E 20 2E 53 55 ike...To run .SU
004B50: 42 20 66 69 6C 65 73 20 77 68 69 63 68 20 63 61 B files which ca
004B60: 6C 6C 73 20 74 68 65 20 61 73 73 65 6D 62 6C 65 lls the assemble
004B70: 72 2C 20 79 6F 75 20 77 69 6C 6C 20 69 6E 64 65 r, you will inde
004B80: 65 64 20 77 61 6E 74 20 74 6F 2E 20 20 57 65 0D ed want to. We.
004B90: 0A 68 61 76 65 20 6E 6F 74 20 72 65 6E 61 6D 65 .have not rename
004BA0: 64 20 69 74 20 74 6F 20 6B 65 65 70 20 69 74 20 d it to keep it
004BB0: 73 65 70 61 72 61 74 65 2E 0D 0A 0D 0A 49 66 20 separate.....If
004BC0: 79 6F 75 20 77 6F 75 6C 64 20 6C 69 6B 65 20 6D you would like m
004BD0: 6F 72 65 20 69 6E 66 6F 72 6D 61 74 69 6F 6E 20 ore information
004BE0: 61 6E 64 20 65 78 61 6D 70 6C 65 73 20 6F 66 20 and examples of
004BF0: 61 73 73 65 6D 62 6C 79 20 6C 69 6E 6B 61 67 65 assembly linkage
004C00: 20 74 6F 0D 0A 4D 6F 64 75 6C 61 2D 32 2C 20 74 to..Modula-2, t
004C10: 68 65 20 41 73 73 65 6D 62 6C 65 72 20 54 6F 6F he Assembler Too
004C20: 6C 4B 69 74 20 69 73 20 61 76 61 69 6C 61 62 6C lKit is availabl
004C30: 65 2E 20 20 50 6C 65 61 73 65 20 63 6F 6E 74 61 e. Please conta
004C40: 63 74 20 57 6F 72 6B 6D 61 6E 20 26 0D 0A 41 73 ct Workman &..As
004C50: 73 6F 63 69 61 74 65 73 20 6F 72 20 79 6F 75 72 sociates or your
004C60: 20 64 65 61 6C 65 72 20 66 6F 72 20 64 65 74 61 dealer for deta
004C70: 69 6C 73 2E 0D 0A 0D 0A 09 09 09 48 61 70 70 79 ils........Happy
004C80: 20 41 73 73 65 6D 62 6C 69 6E 67 21 0D 0A 0D 0A Assembling!....
004C90: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004CA0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004CB0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004CC0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004CD0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004CE0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004CF0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
004D00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
004D10: 04 00 00 00 02 09 4E E5 04 00 41 02 00 00 00 02 ......N...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: 52 4C 41 20 20 20 20 20 01 01 00 00 17 16 00 52 RLA .......R
004E10: 4C 43 20 20 20 20 20 02 01 01 00 CB 06 00 52 4C LC .......RL
004E20: 43 41 20 20 20 20 01 01 00 00 07 06 00 52 4C 44 CA .......RLD
004E30: 20 20 20 20 20 02 01 00 00 ED 6F 00 52 52 20 20 .....o.RR
004E40: 20 20 20 20 02 01 01 00 CB 1E 00 52 52 41 20 20 .......RRA
004E50: 20 20 20 01 01 00 00 1F 1E 00 52 52 43 20 20 20 .......RRC
004E60: 20 20 02 01 01 00 CB 0E 00 52 52 43 41 20 20 20 .......RRCA
004E70: 20 01 01 00 00 0F 0E 00 52 52 43 41 20 20 20 20 .......RRCA
004E80: 52 52 44 20 20 20 20 20 02 01 00 00 ED 67 00 53 RRD .....g.S
004E90: 42 43 20 20 20 20 20 01 01 01 00 9E 67 00 53 43 BC .....g.SC
004EA0: 46 20 20 20 20 20 01 01 00 00 37 67 00 53 4C 41 F ....7g.SLA
004EB0: 20 20 20 20 20 02 01 01 00 CB 26 00 53 52 41 20 .....&.SRA
004EC0: 20 20 20 20 02 01 01 00 CB 2E 00 53 52 4C 20 20 .......SRL
004ED0: 20 20 20 02 01 01 00 CB 3E 00 53 55 42 20 20 20 .....>.SUB
004EE0: 20 20 01 01 01 00 96 3E 00 58 4F 52 20 20 20 20 .....>.XOR
004EF0: 20 01 01 01 00 AE 3E 00 58 4F 52 20 20 20 20 20 .....>.XOR
004F00: 43 41 4C 4C 20 20 20 20 01 03 1B 00 CD 3E 00 43 CALL .....>.C
004F10: 41 4C 4C 20 20 20 20 01 02 13 1B DC 3E 00 43 41 ALL .....>.CA
004F20: 4C 4C 20 20 20 20 01 02 14 1B FC 3E 00 43 41 4C LL .....>.CAL
004F30: 4C 20 20 20 20 01 02 1C 1B D4 3E 00 43 41 4C 4C L .....>.CALL
004F40: 20 20 20 20 01 02 16 1B C4 3E 00 43 41 4C 4C 20 .....>.CALL
004F50: 20 20 20 01 02 17 1B F4 3E 00 43 41 4C 4C 20 20 .....>.CALL
004F60: 20 20 01 02 18 1B EC 3E 00 43 41 4C 4C 20 20 20 .....>.CALL
004F70: 20 01 02 19 1B E4 3E 00 43 41 4C 4C 20 20 20 20 .....>.CALL
004F80: 43 41 4C 4C 20 20 20 20 01 02 1A 1B CC 3E 00 4A CALL .....>.J
004F90: 50 20 20 20 20 20 20 01 03 1B 00 C3 3E 00 4A 50 P .....>.JP
004FA0: 20 20 20 20 20 20 01 02 13 1B DA 3E 00 4A 50 20 .....>.JP
004FB0: 20 20 20 20 20 01 02 14 1B FA 3E 00 4A 50 20 20 .....>.JP
004FC0: 20 20 20 20 01 02 1C 1B D2 3E 00 4A 50 20 20 20 .....>.JP
004FD0: 20 20 20 01 02 16 1B C2 3E 00 4A 50 20 20 20 20 .....>.JP
004FE0: 20 20 01 02 17 1B F2 3E 00 4A 50 20 20 20 20 20 .....>.JP
004FF0: 20 01 02 18 1B EA 3E 00 4A 50 20 20 20 20 20 20 .....>.JP
005000: 53 55 42 20 20 20 20 20 01 01 0E 01 96 E3 C6 58 SUB .......X
005010: 4F 52 20 20 20 20 20 01 01 0E 01 AE E3 C6 53 42 OR .......SB
005020: 43 20 20 20 20 20 01 1B 0E 23 DE E3 C6 53 55 42 C ...#...SUB
005030: 20 20 20 20 20 02 1B 0E 21 DD 96 C6 53 55 42 20 ...!...SUB
005040: 20 20 20 20 02 1B 0E 22 FD 96 C6 53 55 42 20 20 ..."...SUB
005050: 20 20 20 01 1B 0E 23 D6 96 C6 58 4F 52 20 20 20 ...#...XOR
005060: 20 20 02 1B 0E 21 DD AE C6 58 4F 52 20 20 20 20 ...!...XOR
005070: 20 02 1B 0E 22 FD AE C6 58 4F 52 20 20 20 20 20 ..."...XOR
005080: 58 4F 52 20 20 20 20 20 01 1B 0E 23 EE AE C6 41 XOR ...#...A
005090: 44 43 20 20 20 20 20 01 1C 0E 1F 88 AE C6 41 44 DC .......AD
0050A0: 44 20 20 20 20 20 01 1C 0E 1F 80 AE C6 41 4E 44 D .......AND
0050B0: 20 20 20 20 20 01 1C 0E 1F A0 AE C6 43 50 20 20 .......CP
0050C0: 20 20 20 20 01 1C 0E 1F B8 AE C6 4F 52 20 20 20 .......OR
0050D0: 20 20 20 01 1C 0E 1F B0 AE C6 53 55 42 20 20 20 .......SUB
0050E0: 20 20 01 1C 0E 1F 90 AE C6 58 4F 52 20 20 20 20 .......XOR
0050F0: 20 01 1C 0E 1F A8 AE C6 58 4F 52 20 20 20 20 20 .......XOR
005100: 41 44 43 20 20 20 20 20 02 1B 0E 21 DD 8E C6 41 ADC ...!...A
005110: 44 43 20 20 20 20 20 02 1B 0E 22 FD 8E C6 41 44 DC ..."...AD
005120: 43 20 20 20 20 20 01 1B 0E 23 CE 8E C6 41 44 44 C ...#...ADD
005130: 20 20 20 20 20 02 1B 0E 21 DD 86 C6 41 44 44 20 ...!...ADD
005140: 20 20 20 20 02 1B 0E 22 FD 86 C6 41 44 44 20 20 ..."...ADD
005150: 20 20 20 01 1B 0E 23 C6 86 C6 41 4E 44 20 20 20 ...#...AND
005160: 20 20 02 1B 0E 21 DD A6 C6 41 4E 44 20 20 20 20 ...!...AND
005170: 20 02 1B 0E 22 FD A6 C6 41 4E 44 20 20 20 20 20 ..."...AND
005180: 41 4E 44 20 20 20 20 20 01 1B 0E 23 E6 A6 C6 43 AND ...#...C
005190: 50 20 20 20 20 20 20 02 1B 0E 21 DD BE C6 43 50 P ...!...CP
0051A0: 20 20 20 20 20 20 02 1B 0E 22 FD BE C6 43 50 20 ..."...CP
0051B0: 20 20 20 20 20 01 1B 0E 23 FE BE C6 53 42 43 20 ...#...SBC
0051C0: 20 20 20 20 01 01 0E 01 9E BE C6 53 42 43 20 20 .......SBC
0051D0: 20 20 20 02 1B 0E 21 DD 9E C6 53 42 43 20 20 20 ...!...SBC
0051E0: 20 20 02 1B 0E 22 FD 9E C6 53 42 43 20 20 20 20 ..."...SBC
0051F0: 20 01 1B 0E 23 DE 9E C6 53 42 43 20 20 20 20 20 ...#...SBC
005200: 4A 50 20 20 20 20 20 20 01 02 19 1B E2 3E 00 4A JP .....>.J
005210: 50 20 20 20 20 20 20 01 02 1A 1B CA 3E 00 4C 44 P .....>.LD
005220: 20 20 20 20 20 20 01 03 1D 0E 32 3E 00 4C 44 20 ....2>.LD
005230: 20 20 20 20 20 02 03 1D 1E ED 43 00 4C 44 20 20 .....C.LD
005240: 20 20 20 20 02 03 1D 07 ED 53 00 4C 44 20 20 20 .....S.LD
005250: 20 20 20 01 03 1D 05 22 53 00 4C 44 20 20 20 20 ...."S.LD
005260: 20 20 02 03 1D 02 DD 22 00 4C 44 20 20 20 20 20 .....".LD
005270: 20 02 03 1D 03 FD 22 00 4C 44 20 20 20 20 20 20 .....".LD
005280: 4C 44 20 20 20 20 20 20 02 03 1D 12 ED 73 00 4C LD .....s.L
005290: 44 20 20 20 20 20 20 01 02 0E 1D 3A 73 00 4C 44 D ....:s.LD
0052A0: 20 20 20 20 20 20 02 02 02 1D DD 2A 00 4C 44 20 .....*.LD
0052B0: 20 20 20 20 20 02 02 02 1B DD 21 00 4C 44 20 20 .....!.LD
0052C0: 20 20 20 20 02 02 03 1D FD 2A 00 4C 44 20 20 20 .....*.LD
0052D0: 20 20 20 02 02 03 1B FD 21 00 44 45 43 20 20 20 .....!.DEC
0052E0: 20 20 01 04 1F 00 05 21 00 49 4E 20 20 20 20 20 .....!.IN
0052F0: 20 02 04 1F 20 ED 40 00 49 4E 20 20 20 20 20 20 ... .@.IN
005300: 49 4E 43 20 20 20 20 20 01 04 1F 00 04 40 00 4C INC .....@.L
005310: 44 20 20 20 20 20 20 01 04 1F 01 46 40 00 41 44 D ....F@.AD
005320: 43 20 20 20 20 20 02 05 21 00 DD 8E 00 41 44 43 C ..!....ADC
005330: 20 20 20 20 20 02 05 22 00 FD 8E 00 41 44 43 20 .."....ADC
005340: 20 20 20 20 01 05 23 00 CE 8E 00 41 44 44 20 20 ..#....ADD
005350: 20 20 20 02 05 21 00 DD 86 00 41 44 44 20 20 20 ..!....ADD
005360: 20 20 02 05 22 00 FD 86 00 41 44 44 20 20 20 20 .."....ADD
005370: 20 01 05 23 00 C6 86 00 41 44 44 20 20 20 20 20 ..#....ADD
005380: 41 4E 44 20 20 20 20 20 02 05 21 00 DD A6 00 41 AND ..!....A
005390: 4E 44 20 20 20 20 20 02 05 22 00 FD A6 00 41 4E ND .."....AN
0053A0: 44 20 20 20 20 20 01 05 23 00 E6 A6 00 43 50 20 D ..#....CP
0053B0: 20 20 20 20 20 02 05 21 00 DD BE 00 43 50 20 20 ..!....CP
0053C0: 20 20 20 20 02 05 22 00 FD BE 00 43 50 20 20 20 .."....CP
0053D0: 20 20 20 01 05 23 00 FE BE 00 44 45 43 20 20 20 ..#....DEC
0053E0: 20 20 02 05 21 00 DD 35 00 44 45 43 20 20 20 20 ..!..5.DEC
0053F0: 20 02 05 22 00 FD 35 00 44 45 43 20 20 20 20 20 .."..5.DEC
005400: 00 20 20 20 20 20 20 20 20 20 20 20 00 00 06 00 . ....
005410: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005420: 00 42 55 49 4C 44 53 55 42 4D 4F 44 06 00 1E 00 .BUILDSUBMOD....
005430: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
005440: 00 43 4F 4D 4D 41 4E 44 20 4D 4F 44 24 00 07 00 .COMMAND MOD$...
005450: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
005460: 00 43 4F 4E 56 45 52 53 49 4D 4F 44 2B 00 06 00 .CONVERSIMOD+...
005470: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
005480: 00 44 45 42 55 47 20 20 20 4D 4F 44 31 00 1E 00 .DEBUG MOD1...
005490: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
0054A0: 00 46 49 4C 45 53 20 20 20 4D 4F 44 4F 00 1A 00 .FILES MODO...
0054B0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
0054C0: 00 47 45 54 46 49 4C 45 53 4D 4F 44 69 00 09 00 .GETFILESMODi...
0054D0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
0054E0: 00 49 4E 4F 55 54 20 20 20 4D 4F 44 72 00 20 00 .INOUT MODr. .
0054F0: 00 00 00 00 01 C3 07 09 08 13 27 00 00 00 00 00 ..........'.....
005500: 00 4C 49 53 54 20 20 20 20 4D 4F 44 92 00 12 00 .LIST MOD....
005510: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
005520: 00 4D 41 54 48 53 20 20 20 4D 4F 44 A4 00 2C 00 .MATHS MOD..,.
005530: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
005540: 00 50 52 45 43 45 44 45 4E 4D 4F 44 D0 00 1E 00 .PRECEDENMOD....
005550: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
005560: 00 50 52 4F 43 45 53 53 45 4D 4F 44 EE 00 25 00 .PROCESSEMOD..%.
005570: 00 00 00 00 01 C3 07 09 08 13 28 18 00 00 00 00 ..........(.....
005580: 00 51 55 49 43 4B 53 54 52 4D 4F 44 13 01 0D 00 .QUICKSTRMOD....
005590: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
0055A0: 00 52 45 41 4C 49 4E 4F 55 4D 4F 44 20 01 23 00 .REALINOUMOD .#.
0055B0: 00 00 00 00 01 C3 07 09 08 13 29 28 00 00 00 00 ..........)(....
0055C0: 00 53 45 54 55 50 43 41 4C 4D 4F 44 43 01 07 00 .SETUPCALMODC...
0055D0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
0055E0: 00 53 4D 41 4C 4C 49 4F 20 4D 4F 44 4A 01 09 00 .SMALLIO MODJ...
0055F0: 00 00 00 00 01 C3 07 09 0A 07 15 14 00 00 00 00 ................
005600: 49 4E 43 20 20 20 20 20 02 05 21 00 DD 34 00 49 INC ..!..4.I
005610: 4E 43 20 20 20 20 20 02 05 22 00 FD 34 00 4F 52 NC .."..4.OR
005620: 20 20 20 20 20 20 02 05 21 00 DD B6 00 4F 52 20 ..!....OR
005630: 20 20 20 20 20 02 05 22 00 FD B6 00 4F 52 20 20 .."....OR
005640: 20 20 20 20 01 05 23 00 F6 B6 00 4F 55 54 20 20 ..#....OUT
005650: 20 20 20 01 05 23 0E D3 B6 00 53 42 43 20 20 20 ..#....SBC
005660: 20 20 02 05 21 00 DD 9E 00 53 42 43 20 20 20 20 ..!....SBC
005670: 20 02 05 22 00 FD 9E 00 53 42 43 20 20 20 20 20 .."....SBC
005680: 53 42 43 20 20 20 20 20 01 05 23 00 DE 9E 00 53 SBC ..#....S
005690: 55 42 20 20 20 20 20 02 05 21 00 DD 96 00 53 55 UB ..!....SU
0056A0: 42 20 20 20 20 20 02 05 22 00 FD 96 00 53 55 42 B .."....SUB
0056B0: 20 20 20 20 20 01 05 23 00 D6 96 00 58 4F 52 20 ..#....XOR
0056C0: 20 20 20 20 02 05 21 00 DD AE 00 58 4F 52 20 20 ..!....XOR
0056D0: 20 20 20 02 05 22 00 FD AE 00 58 4F 52 20 20 20 .."....XOR
0056E0: 20 20 01 05 23 00 EE AE 00 4C 44 20 20 20 20 20 ..#....LD
0056F0: 20 02 07 21 23 DD 36 00 4C 44 20 20 20 20 20 20 ..!#.6.LD
005700: 4C 44 20 20 20 20 20 20 02 07 22 23 FD 36 00 4C LD .."#.6.L
005710: 44 20 20 20 20 20 20 02 08 21 1F DD 70 00 4C 44 D ..!..p.LD
005720: 20 20 20 20 20 20 02 08 22 1F FD 70 00 52 4C 20 .."..p.RL
005730: 20 20 20 20 20 03 09 21 00 DD CB 16 52 4C 20 20 ..!....RL
005740: 20 20 20 20 03 09 22 00 FD CB 16 52 4C 43 20 20 .."....RLC
005750: 20 20 20 03 09 21 00 DD CB 06 52 4C 43 20 20 20 ..!....RLC
005760: 20 20 03 09 22 00 FD CB 06 52 52 20 20 20 20 20 .."....RR
005770: 20 03 09 21 00 DD CB 1E 52 52 20 20 20 20 20 20 ..!....RR
005780: 52 52 20 20 20 20 20 20 03 09 22 00 FD CB 1E 52 RR .."....R
005790: 52 43 20 20 20 20 20 03 09 21 00 DD CB 0E 52 52 RC ..!....RR
0057A0: 43 20 20 20 20 20 03 09 22 00 FD CB 0E 53 4C 41 C .."....SLA
0057B0: 20 20 20 20 20 03 09 21 00 DD CB 26 53 4C 41 20 ..!...&SLA
0057C0: 20 20 20 20 03 09 22 00 FD CB 26 53 52 41 20 20 .."...&SRA
0057D0: 20 20 20 03 09 21 00 DD CB 2E 53 52 41 20 20 20 ..!....SRA
0057E0: 20 20 03 09 22 00 FD CB 2E 53 52 4C 20 20 20 20 .."....SRL
0057F0: 20 03 09 21 00 DD CB 3E 53 52 4C 20 20 20 20 20 ..!...>SRL
005800: 00 53 4F 4C 56 45 20 20 20 4D 4F 44 53 01 0E 00 .SOLVE MODS...
005810: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
005820: 00 53 4F 52 54 20 20 20 20 4D 4F 44 61 01 09 00 .SORT MODa...
005830: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
005840: 00 53 54 4F 52 41 47 45 20 4D 4F 44 6A 01 0D 00 .STORAGE MODj...
005850: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
005860: 00 53 54 52 45 41 4D 53 20 4D 4F 44 77 01 1C 00 .STREAMS MODw...
005870: 00 00 00 00 01 C3 07 09 08 13 2A 2E 00 00 00 00 ..........*.....
005880: 00 53 54 52 49 4E 47 53 20 4D 4F 44 93 01 10 00 .STRINGS MOD....
005890: 00 00 00 00 01 C3 07 09 0B 10 12 06 00 00 00 00 ................
0058A0: 00 54 45 52 4D 49 4E 41 4C 4D 4F 44 A3 01 0B 00 .TERMINALMOD£...
0058B0: 00 00 00 00 01 C3 07 09 08 13 25 26 00 00 00 00 ..........%&....
0058C0: FF 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 . ....
0058D0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
0058E0: FF 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 . ....
0058F0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
005900: 28 2A B4 4C 61 73 74 20 6D 6F 64 69 66 69 65 64 (*.Last modified
005910: 20 32 30 20 4D 61 72 63 68 20 38 36 20 2A 29 BF 20 March 86 *).
005920: A4 20 00 42 75 69 6C 64 53 75 62 00 01 13 3B BF . .BuildSub...;.
005930: BF 28 2A C1 47 65 6E 65 72 61 74 65 20 61 20 00 .(*.Generate a .
005940: 73 75 62 6D 69 74 00 01 12 20 00 66 69 6C 65 00 submit... .file.
005950: 01 11 20 00 66 6F 72 00 01 10 20 72 65 63 6F 6D .. .for... recom
005960: 70 69 6C 61 74 69 6F 6E 73 BF C1 53 79 73 74 65 pilations..Syste
005970: 6D 20 63 61 6C 6C 3A BF C2 01 13 20 3C 64 65 73 m call:.... <des
005980: 74 20 01 11 3E 20 00 6D 6F 64 75 6C 65 00 01 0F t ..> .module...
005990: 20 00 6E 61 6D 65 73 00 01 0E BF C1 00 50 61 72 .names......Par
0059A0: 61 6D 65 74 65 72 00 01 0D 20 31 B5 01 11 20 00 ameter... 1... .
0059B0: 74 6F 00 01 0C 20 72 65 63 65 69 76 65 20 01 12 to... receive ..
0059C0: 20 01 11 C1 01 0D 20 32 20 75 70 74 6F 20 31 30 ..... 2 upto 10
0059D0: B4 00 66 69 6C 65 73 00 01 0B 20 01 0C 20 00 72 ..files... .. .r
0059E0: 65 63 6F 6D 70 69 6C 65 00 01 0A C1 C1 6F 70 74 ecompile.....opt
0059F0: 69 6F 6E 61 6C 20 66 6C 61 67 20 5B 69 20 2D 20 ional flag [i -
005A00: 53 52 4C 20 20 20 20 20 03 09 22 00 FD CB 3E 42 SRL .."...>B
005A10: 49 54 20 20 20 20 20 02 0B 24 01 CB 46 3E 52 45 IT ..$..F>RE
005A20: 53 20 20 20 20 20 02 0B 24 01 CB 86 3E 52 53 54 S ..$...>RST
005A30: 20 20 20 20 20 01 0B 24 00 C7 86 3E 53 45 54 20 ..$...>SET
005A40: 20 20 20 20 02 0B 24 01 CB C6 3E 42 49 54 20 20 ..$...>BIT
005A50: 20 20 20 03 0C 24 21 DD CB 46 42 49 54 20 20 20 ..$!..FBIT
005A60: 20 20 03 0C 24 22 FD CB 46 52 45 53 20 20 20 20 ..$"..FRES
005A70: 20 03 0C 24 21 DD CB 86 52 45 53 20 20 20 20 20 ..$!...RES
005A80: 52 45 53 20 20 20 20 20 03 0C 24 22 FD CB 86 53 RES ..$"...S
005A90: 45 54 20 20 20 20 20 03 0C 24 21 DD CB C6 53 45 ET ..$!...SE
005AA0: 54 20 20 20 20 20 03 0C 24 22 FD CB C6 42 49 54 T ..$"...BIT
005AB0: 20 20 20 20 20 02 0D 24 1F CB 40 C6 52 45 53 20 ..$..@.RES
005AC0: 20 20 20 20 02 0D 24 1F CB 80 C6 53 45 54 20 20 ..$....SET
005AD0: 20 20 20 02 0D 24 1F CB C0 C6 41 44 43 20 20 20 ..$....ADC
005AE0: 20 20 02 0E 05 25 ED 4A C6 41 44 44 20 20 20 20 ...%.J.ADD
005AF0: 20 01 0E 05 25 09 4A C6 41 44 44 20 20 20 20 20 ...%.J.ADD
005B00: 44 45 43 20 20 20 20 20 01 06 25 00 0B 4A C6 49 DEC ..%..J.I
005B10: 4E 43 20 20 20 20 20 01 06 25 00 03 4A C6 50 4F NC ..%..J.PO
005B20: 50 20 20 20 20 20 01 18 26 00 C1 4A C6 50 55 53 P ..&..J.PUS
005B30: 48 20 20 20 20 01 18 26 00 C5 4A C6 53 42 43 20 H ..&..J.SBC
005B40: 20 20 20 20 02 0E 05 25 ED 42 C6 41 44 43 20 20 ...%.B.ADC
005B50: 20 20 20 01 0F 1F 00 88 42 C6 41 44 44 20 20 20 .....B.ADD
005B60: 20 20 01 0F 1F 00 80 42 C6 41 4E 44 20 20 20 20 .....B.AND
005B70: 20 01 0F 1F 00 A0 42 C6 41 4E 44 20 20 20 20 20 .....B.AND
005B80: 43 50 20 20 20 20 20 20 01 0F 1F 00 B8 42 C6 4C CP .....B.L
005B90: 44 20 20 20 20 20 20 01 0A 01 1F 70 42 C6 4F 52 D ....pB.OR
005BA0: 20 20 20 20 20 20 01 0F 1F 00 B0 42 C6 52 4C 20 .....B.RL
005BB0: 20 20 20 20 20 02 0F 1F 00 CB 10 C6 52 4C 43 20 .......RLC
005BC0: 20 20 20 20 02 0F 1F 00 CB 00 C6 52 52 20 20 20 .......RR
005BD0: 20 20 20 02 0F 1F 00 CB 18 C6 52 52 43 20 20 20 .......RRC
005BE0: 20 20 02 0F 1F 00 CB 08 C6 53 42 43 20 20 20 20 .......SBC
005BF0: 20 01 0F 1F 00 98 08 C6 53 42 43 20 20 20 20 20 .......SBC
005C00: 69 6E 63 6C 75 64 65 20 01 0E 20 00 67 69 76 65 include .. .give
005C10: 6E 00 01 09 20 00 69 6E 00 01 08 20 01 12 20 01 n... .in... .. .
005C20: 08 20 01 12 20 01 11 BF C1 65 2E 67 2E BF C2 01 . .. ....e.g....
005C30: 13 20 74 65 6D 70 2E 00 73 75 62 00 01 07 BA 73 . temp..sub....s
005C40: 74 6F 72 61 67 65 2E 6D 6F 64 BF C1 4E 6F 74 65 torage.mod..Note
005C50: 20 74 68 61 74 20 74 68 69 73 20 70 72 6F 67 72 that this progr
005C60: 61 6D 20 77 69 6C 6C 20 00 6E 6F 74 00 01 06 20 am will .not...
005C70: 68 61 6E 64 6C 65 20 00 6D 6F 64 75 6C 65 73 00 handle .modules.
005C80: 01 05 20 77 69 74 68 20 C1 63 79 63 6C 65 73 BF .. with .cycles.
005C90: BF 2A 29 BF BF BF 93 20 53 59 53 54 45 4D 20 A3 .*).... SYSTEM £
005CA0: 20 AB 2C 8F 2C 00 54 53 49 5A 45 00 01 04 2C 00 .,.,.TSIZE...,.
005CB0: 57 4F 52 44 00 01 03 3B BF 93 20 43 6F 6D 6D 61 WORD...;.. Comma
005CC0: 6E 64 20 A3 20 01 0D 2C 50 61 72 63 6C 61 73 73 nd £ ..,Parclass
005CD0: 2C 00 47 65 74 50 61 72 61 6D 73 00 01 02 3B BF ,.GetParams...;.
005CE0: 93 20 46 69 6C 65 73 20 A3 20 00 46 69 6C 65 4E . Files £ .FileN
005CF0: 61 6D 65 00 01 01 2C 00 46 49 4C 45 00 01 00 2C ame...,.FILE...,
005D00: 00 4C 6F 6F 6B 75 70 00 FF 2C 00 43 72 65 61 74 .Lookup..,.Creat
005D10: 65 00 FE 3B BF 93 20 53 74 72 65 61 6D 73 20 A3 e..;.. Streams £
005D20: 20 00 43 6F 6E 6E 65 63 74 00 FD 2C 00 44 69 73 .Connect..,.Dis
005D30: 63 6F 6E 6E 65 63 74 00 FC 2C 00 53 54 52 45 41 connect..,.STREA
005D40: 4D 00 FB 2C 00 69 6E 70 75 74 00 FA 2C 00 6F 75 M..,.input..,.ou
005D50: 74 70 75 74 00 F9 2C 00 57 72 69 74 65 43 68 61 tput..,.WriteCha
005D60: 72 00 F8 2C C1 52 65 61 64 43 68 61 72 2C 00 52 r..,.ReadChar,.R
005D70: 65 61 64 57 6F 72 64 00 F7 2C 00 52 65 61 64 52 eadWord..,.ReadR
005D80: 65 63 00 F6 2C 57 72 69 74 65 57 6F 72 64 2C 00 ec..,WriteWord,.
005D90: 57 72 69 74 65 52 65 63 00 F5 2C 45 4F 53 3B BF WriteRec..,EOS;.
005DA0: 93 20 47 65 74 46 69 6C 65 73 20 A3 20 47 65 74 . GetFiles £ Get
005DB0: 4E 61 6D 65 73 3B BF 93 20 AE 20 A3 20 B3 2C A9 Names;.. . £ .,.
005DC0: 2C 00 45 72 72 6F 72 45 78 69 74 00 F4 3B BF 93 ,.ErrorExit..;..
005DD0: 20 53 6F 72 74 20 A3 20 53 6F 72 74 52 65 63 6F Sort £ SortReco
005DE0: 72 64 73 3B BF 9D B4 46 46 3D 30 63 78 3B C0 54 rds;...FF=0cx;.T
005DF0: 41 42 3D 30 39 78 3B C0 4C 46 3D 30 00 61 78 00 AB=09x;.LF=0.ax.
005E00: 53 4C 41 20 20 20 20 20 02 0F 1F 00 CB 20 C6 53 SLA ..... .S
005E10: 52 41 20 20 20 20 20 02 0F 1F 00 CB 28 C6 53 52 RA .....(.SR
005E20: 4C 20 20 20 20 20 02 0F 1F 00 CB 38 C6 53 55 42 L .....8.SUB
005E30: 20 20 20 20 20 01 0F 1F 00 90 38 C6 58 4F 52 20 .....8.XOR
005E40: 20 20 20 20 01 0F 1F 00 A8 38 C6 4C 44 20 20 20 .....8.LD
005E50: 20 20 20 02 11 1F 21 DD 46 C6 4C 44 20 20 20 20 ...!.F.LD
005E60: 20 20 02 11 1F 22 FD 46 C6 4C 44 20 20 20 20 20 ...".F.LD
005E70: 20 01 11 1F 23 06 46 C6 4C 44 20 20 20 20 20 20 ...#.F.LD
005E80: 4C 44 20 20 20 20 20 20 01 12 1F 1F 40 46 C6 4C LD ....@F.L
005E90: 44 20 20 20 20 20 20 02 13 25 1D ED 4B C6 4C 44 D ..%..K.LD
005EA0: 20 20 20 20 20 20 01 13 25 1B 01 4B C6 4C 44 20 ..%..K.LD
005EB0: 20 20 20 20 20 01 02 05 1D 2A 4B C6 41 44 44 20 ....*K.ADD
005EC0: 20 20 20 20 02 14 02 27 DD 09 C6 41 44 44 20 20 ...'...ADD
005ED0: 20 20 20 02 15 03 28 FD 09 C6 4F 55 54 20 20 20 ...(...OUT
005EE0: 20 20 02 16 20 1F ED 41 C6 49 4E 20 20 20 20 20 .. ..A.IN
005EF0: 20 01 17 0E 23 DB 41 C6 49 4E 20 20 20 20 20 20 ...#.A.IN
005F00: 4A 52 20 20 20 20 20 20 01 1A 13 29 38 41 C6 4A JR ...)8A.J
005F10: 52 20 20 20 20 20 20 01 1A 1C 29 30 41 C6 4A 52 R ...)0A.JR
005F20: 20 20 20 20 20 20 01 1A 16 29 20 41 C6 4A 52 20 ...) A.JR
005F30: 20 20 20 20 20 01 1A 1A 29 28 41 C6 4A 52 20 20 ...)(A.JR
005F40: 20 20 20 20 01 19 29 00 18 41 C6 44 4A 4E 5A 20 ..)..A.DJNZ
005F50: 20 20 20 01 19 29 00 10 41 C6 4C 44 20 20 20 20 ..)..A.LD
005F60: 20 20 01 17 01 23 36 41 C6 52 45 54 20 20 20 20 ...#6A.RET
005F70: 20 01 01 1C 00 D0 41 C6 52 45 54 20 20 20 20 20 .....A.RET
005F80: 41 44 43 20 20 20 20 20 01 01 0E 01 8E 41 C6 41 ADC .....A.A
005F90: 44 44 20 20 20 20 20 01 01 0E 01 86 41 C6 41 4E DD .....A.AN
005FA0: 44 20 20 20 20 20 01 01 0E 01 A6 41 C6 43 50 20 D .....A.CP
005FB0: 20 20 20 20 20 01 01 0E 01 BE 41 C6 45 58 20 20 .....A.EX
005FC0: 20 20 20 20 01 01 05 04 E3 41 C6 45 58 20 20 20 .....A.EX
005FD0: 20 20 20 02 01 02 04 DD E3 C6 45 58 20 20 20 20 .......EX
005FE0: 20 20 02 01 03 04 FD E3 C6 4F 52 20 20 20 20 20 .......OR
005FF0: 20 01 01 0E 01 B6 E3 C6 4F 52 20 20 20 20 20 20 .......OR
006000: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
006010: 05 00 00 00 02 09 4E E5 05 00 41 02 00 00 00 02 ......N...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: F3 3B C0 43 52 3D 30 00 64 78 00 F2 3B C0 00 4D .;.CR=0.dx..;..M
006110: 61 78 49 6D 70 6F 72 74 73 00 F1 3D 32 30 3B B6 axImports..=20;.
006120: 28 2A 6D 61 78 20 69 6D 70 6F 72 74 73 20 61 6C (*max imports al
006130: 6C 6F 77 65 64 20 62 79 20 61 20 01 0F 2A 29 C0 lowed by a ..*).
006140: 00 4D 61 78 4D 6F 64 75 6C 65 73 00 F0 3D 31 30 .MaxModules..=10
006150: 30 3B BF 96 20 B4 50 46 69 6C 65 4E 61 6D 65 3D 0;.. .PFileName=
006160: A8 20 86 20 01 01 3B BF 8E B4 C0 00 72 65 70 6C . . ..;.....repl
006170: 79 00 EF 3A AA 3B C0 69 2C 6A 3A AA 3B C0 6B 3A y..:.;.i,j:.;.k:
006180: AD 3B C0 63 3A AD 3B C0 49 6E 73 3A FB 3B C0 49 .;.c:.;.Ins:.;.I
006190: 6E 66 3A 01 00 3B C0 63 68 3A 99 3B B6 28 2A 6C nf:..;.ch:.;.(*l
0061A0: 6F 6F 6B 20 61 68 65 61 64 20 63 68 61 72 61 63 ook ahead charac
0061B0: 74 65 72 20 01 10 20 FA 20 01 11 2A 29 C0 00 49 ter .. . ..*)..I
0061C0: 6E 63 6C 75 64 65 00 EE 3A AC 3B BF BF 96 B4 C0 nclude..:.;.....
0061D0: 00 49 64 65 6E 74 00 ED 3D 9B 5B 31 2E 2E 38 5D .Ident..=.[1..8]
0061E0: 20 84 20 99 3B C0 00 50 72 65 63 54 61 62 6C 65 . .;..PrecTable
0061F0: 00 EC 3D A5 C1 00 4E 61 6D 65 00 EB 3A ED 3B C1 ..=...Name..:.;.
006200: 00 44 65 66 4D 6F 64 75 6C 65 00 EA 3A AC 3B C1 .DefModule..:.;.
006210: 00 49 6D 70 6F 72 74 43 6F 75 6E 74 00 E9 3A 5B .ImportCount..:[
006220: 30 2E 2E F1 5D 3B C1 00 49 6D 70 6F 72 74 73 00 0...];..Imports.
006230: E8 3A 9B 5B 30 2E 2E F1 5D 20 84 20 AD 3B C1 89 .:.[0...] . .;..
006240: 3B BF 8E B4 00 50 72 65 63 00 E7 3A 9B 5B 31 2E ;....Prec..:.[1.
006250: 2E F0 5D 20 84 20 EC 3B B5 C0 00 50 72 65 63 43 ..] . .;...PrecC
006260: 6F 75 6E 74 00 E6 3A AD 3B C0 00 52 65 63 6F 6D ount..:.;..Recom
006270: 70 00 E5 2C 00 50 61 72 61 6D 4D 6F 64 00 E4 3A p..,.ParamMod..:
006280: 9B 5B 31 2E 2E F0 5D 20 84 20 AC 3B C0 43 75 72 .[1...] . .;.Cur
006290: 72 65 6E 74 4D 6F 64 75 6C 65 3A AD 3B B5 28 2A rentModule:.;.(*
0062A0: 4D 6F 64 75 6C 65 20 00 62 65 69 6E 67 00 E3 20 Module .being..
0062B0: 65 78 61 6D 69 6E 65 64 2A 29 C0 00 50 72 65 63 examined*)..Prec
0062C0: 46 00 E2 3A 01 00 3B C0 00 50 72 65 63 53 00 E1 F..:..;..PrecS..
0062D0: 3A FB 3B C0 49 64 3A ED 3B C0 00 53 75 62 46 00 :.;.Id:.;..SubF.
0062E0: E0 3A 01 00 3B C0 00 53 75 62 53 00 DF 3A FB 3B .:..;..SubS..:.;
0062F0: C0 00 42 61 73 65 4E 61 6D 65 00 DE 3A ED 3B C0 ..BaseName..:.;.
006300: 8D C0 BA 01 0F 20 C6 20 00 69 73 00 88 20 E3 20 ..... . .is.. .
006310: C4 2A 29 C0 8A 20 69 3A 3D 31 20 86 20 E6 20 81 .*).. i:=1 . . .
006320: C1 82 20 E5 5B 69 5D 20 87 20 E7 5B 69 5D 2E EA .. .[i] . .[i]..
006330: 20 95 C2 6A 3A 3D D4 28 E7 5B 69 5D 2E EB 2C A1 ..j:=.(.[i]..,.
006340: 29 3B C2 E5 5B 6A 5D 3A 3D 9A 3B C2 89 C1 89 3B );..[j]:=.;....;
006350: C0 89 20 BB 3B C0 BF AF 20 00 4F 75 74 70 75 74 .. .;... .Output
006360: 52 65 63 6F 6D 70 73 00 83 3B BF 8E B4 69 2C 6A Recomps..;...i,j
006370: 3A AD 3B C0 B7 3A AC 3B BF AF 20 00 54 72 79 54 :.;..:.;.. .TryT
006380: 6F 4F 75 74 70 75 74 00 80 3B BF BF 28 2A B4 D7 oOutput..;..(*..
006390: 20 D1 20 D2 20 88 20 61 20 8D 20 01 0F 20 6F 72 . . . a . .. or
0063A0: 20 CB 20 90 20 01 0F C0 C6 20 6E 65 65 64 20 01 . . .... need .
0063B0: 06 20 77 61 69 74 20 01 10 20 CD 20 8D 20 01 0F . wait .. . . ..
0063C0: 20 01 0C 20 C5 20 63 6F 6D 70 69 6C 65 64 2A 29 .. . compiled*)
0063D0: BF BF 8E B4 6A 3A AD 3B BF 9C C0 97 20 E7 5B 69 ....j:.;.... .[i
0063E0: 5D 20 81 C1 82 20 8C 20 EA 20 95 C2 6A 3A 3D D4 ] ... . . ..j:=.
0063F0: 28 EB 2C 9A 29 3B C2 82 20 E5 5B 6A 5D 20 95 20 (.,.);.. .[j] .
006400: C3 A7 20 89 3B C2 89 3B C1 B7 3A 3D A1 3B C1 D9 .. .;..;..:=.;..
006410: 28 69 29 3B C1 E5 5B 69 5D 3A 3D A1 3B C1 89 3B (i);..[i]:=.;..;
006420: 20 28 2A 97 2A 29 C0 89 20 80 3B C0 BF 9C C0 28 (*.*).. .;....(
006430: 2A 20 B4 A2 20 F9 20 63 6F 6D 70 69 6C 61 74 69 * .. . compilati
006440: 6F 6E 73 20 72 65 71 75 65 73 74 73 2A 29 BF C0 ons requests*)..
006450: A6 C1 B7 3A 3D 9A 3B C1 69 3A 3D 31 3B C1 94 C2 ...:=.;.i:=1;...
006460: 82 20 69 3E E6 20 95 20 92 20 89 3B C2 82 20 E5 . i>. . . .;.. .
006470: 5B 69 5D 20 87 20 8C 20 C8 28 69 29 20 95 C3 80 [i] . . .(i) ...
006480: 3B C3 89 3B C2 D5 28 69 29 3B C2 89 3B C1 9F 20 ;..;..(i);..;..
006490: B7 3B C0 89 20 83 3B C3 BF 9C C0 CC 3B C0 BB 3B .;.. .;.....;..;
0064A0: C0 83 3B B4 C0 FC 28 DF 2C 9A 29 3B C0 89 20 01 ..;...(.,.);.. .
0064B0: 13 2E BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0064C0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0064D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0064E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0064F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
006500: 00 45 78 74 65 6E 73 69 6F 6E 00 DD 3A ED 3B C0 .Extension..:.;.
006510: C0 00 43 6F 6D 70 69 6C 65 72 73 00 DC 3A 9B 20 ..Compilers..:.
006520: AC 20 84 20 ED 3D 5B 27 4D 32 BE 27 2C 27 4D 44 . . .=['M2.','MD
006530: BE 27 5D 3B C0 00 45 78 74 65 6E 73 69 6F 6E 73 .'];..Extensions
006540: 00 DB 3A 9B 20 AC 20 84 20 ED 3D 5B 27 2E 8B BC ..:. . . .=['...
006550: 27 2C 27 2E 00 44 45 46 00 DA BC 27 5D 3B BF C0 ','..DEF...'];..
006560: BF AF 20 00 50 75 74 4E 61 6D 65 00 D9 28 00 4D .. .PutName..(.M
006570: 6F 64 4E 6F 00 D8 3A AD 29 3B BF BF 28 2A B4 00 odNo..:.);..(*..
006580: 4F 75 74 70 75 74 00 D7 20 61 20 63 6F 6D 70 69 Output.. a compi
006590: 6C 61 74 69 6F 6E 20 6C 69 6E 65 20 01 10 20 74 lation line .. t
0065A0: 68 65 20 01 09 20 00 6E 61 6D 65 00 D6 2A 29 BF he .. .name..*).
0065B0: BF 8E B4 69 3A AD 3B C0 EF 3A AA 3B BF 9C C0 97 ...i:.;..:.;....
0065C0: 20 E7 5B D8 5D 20 81 C1 F5 28 DF 2C 8F 28 DC 5B .[.] ...(.,.(.[
0065D0: EA 5D 29 2C 33 2C EF 29 3B C1 69 3A 3D 31 3B C1 .]),3,.);.i:=1;.
0065E0: A0 20 28 69 3C 3D 98 28 EB 29 29 20 87 20 28 EB . (i<=.(.)) . (.
0065F0: 5B 69 5D 3C 3E 27 20 27 29 20 81 C2 F8 28 DF 2C [i]<>' ') ...(.,
006600: EB 5B 69 5D 29 3B C2 00 49 4E 43 00 D5 28 69 29 .[i]);..INC..(i)
006610: 3B C2 89 3B C1 F5 28 DF 2C 8F 28 DB 5B EA 5D 29 ;..;..(.,.(.[.])
006620: 2C 34 2C EF 29 3B C1 F8 28 DF 2C 30 F2 29 3B C1 ,4,.);..(.,0.);.
006630: F8 28 DF 2C 30 F3 29 3B C1 89 3B 20 28 2A 97 2A .(.,0.);..; (*.*
006640: 29 C0 89 20 D9 3B BF AF 20 00 46 69 6E 64 4D 6F ).. .;.. .FindMo
006650: 64 75 6C 65 00 D4 28 EB 3A ED 3B 00 49 73 44 45 dule..(.:.;.IsDE
006660: 46 00 D3 3A AC 29 3A AD 3B BF BF 28 2A B4 46 69 F..:.):.;..(*.Fi
006670: 6E 64 20 61 20 01 0F 2C 20 65 6E 74 65 72 20 00 nd a .., enter .
006680: 69 74 00 D2 20 00 69 66 00 D1 20 01 06 20 00 66 it.. .if.. .. .f
006690: 6F 75 6E 64 00 D0 2A 29 BF BF 8E B4 69 3A AD 3B ound..*)....i:.;
0066A0: BF 9C C0 82 20 E6 3E 3D 98 28 E7 29 20 95 C1 F4 .... .>=.(.) ...
0066B0: 28 27 20 E7 20 00 74 61 62 6C 65 00 CF 20 6F 76 (' . .table.. ov
0066C0: 65 72 66 6C 6F 77 27 29 3B C1 89 3B C0 E7 5B E6 erflow');..;..[.
0066D0: 2B 31 5D 2E EB 3A 3D EB 3B C0 E7 5B E6 2B 31 5D +1]..:=.;..[.+1]
0066E0: 2E EA 3A 3D D3 3B C0 69 3A 3D 31 3B C0 A0 20 28 ..:=.;.i:=1;.. (
0066F0: E7 5B 69 5D 2E EB 3C 3E EB 29 20 85 20 28 E7 5B .[i]..<>.) . (.[
006700: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
006710: 20 00 43 6F 6D 6D 61 6E 64 00 A2 3B BF BF BF 28 .Command..;...(
006720: 2A B4 A2 20 00 6C 69 6E 65 00 A1 20 70 72 6F 63 *.. .line.. proc
006730: 65 73 73 6F 72 2A 29 BF 93 20 53 74 6F 72 61 67 essor*).. Storag
006740: 65 20 A3 20 00 41 4C 4C 4F 43 41 54 45 00 9F 3B e £ .ALLOCATE..;
006750: BF 93 20 53 59 53 54 45 4D BA A3 20 AB 3B BF 8E .. SYSTEM.£ .;..
006760: B4 69 2C 6A 2C 6B 3A AA 3B BF AF 20 00 47 65 74 .i,j,k:.;.. .Get
006770: 50 61 72 61 6D 73 00 9E 28 8E 20 70 3A 9B 20 84 Params..(. p:. .
006780: 20 50 61 72 61 6D 65 74 65 72 3B 8E 20 00 63 6F Parameter;. .co
006790: 75 6E 74 00 9D 3A AA 29 3B BF AF 20 00 42 75 69 unt..:.);.. .Bui
0067A0: 6C 64 00 9A 28 00 6C 65 6E 00 96 3A AA 3B 00 63 ld..(.len..:.;.c
0067B0: 68 00 8F 3A 99 3B 63 3A 50 61 72 63 6C 61 73 73 h..:.;c:Parclass
0067C0: 29 3B BF 8E B4 00 61 64 00 8D 3A AB 3B BF 9C BF );....ad..:.;...
0067D0: C0 9F 28 8D 2C 96 2B 34 29 3B C0 70 5B 9D 5D 3A ..(.,.+4);.p[.]:
0067E0: 3D 8D 3B C0 97 20 70 5B 9D 5D 5E 20 81 C1 82 20 =.;.. p[.]^ ...
0067F0: 6A 3E 3D AA 28 00 43 6F 6D 6D 4C 65 6E 67 74 68 j>=.(.CommLength
006800: 00 8C 29 95 20 00 54 65 72 6D 69 6E 61 74 6F 72 ..). .Terminator
006810: 00 8B 3A 3D 30 00 64 78 00 88 C1 91 20 8B 3A 3D ..:=0.dx.... .:=
006820: 8F 20 89 3B C1 4C 65 6E 67 74 68 3A 3D 96 3B C1 . .;.Length:=.;.
006830: 43 6C 61 73 73 3A 3D 63 3B C1 8A 20 6B 3A 3D 30 Class:=c;.. k:=0
006840: 20 86 20 96 2D 31 20 81 C2 00 43 68 61 72 73 00 . .-1 ...Chars.
006850: 85 5B 6B 5D 3A 3D 00 43 6F 6D 6D 54 65 78 74 00 .[k]:=.CommText.
006860: 83 5B 69 2B 6B 5D 3B C2 89 3B C1 85 5B 96 5D 3A .[i+k];..;..[.]:
006870: 3D 30 78 3B C1 89 3B C0 9D 3A 3D 9D 2B 31 C0 89 =0x;..;..:=.+1..
006880: 20 9A 3B BF 28 2A B4 63 72 61 63 6B 20 74 68 65 .;.(*.crack the
006890: 20 63 6F 6D 6D 61 6E 64 20 A1 2A 29 BF 9C C0 69 command .*)...i
0068A0: 3A 3D 30 3B C0 9D 3A 3D 30 3B C0 94 C1 82 20 9D :=0;..:=0;.... .
0068B0: 3E 98 28 70 29 20 95 20 C2 92 20 C2 89 3B C1 A0 >.(p) . .. ..;..
0068C0: 20 28 69 3C AA 28 8C 29 29 20 87 20 28 83 5B 69 (i<.(.)) . (.[i
0068D0: 5D 3D 27 20 27 29 20 81 C2 00 49 4E 43 00 80 28 ]=' ') ...INC..(
0068E0: 69 29 C2 89 3B C1 82 20 69 3E 3D AA 28 8C 29 20 i)..;.. i>=.(.)
0068F0: 95 20 92 20 89 3B C1 90 20 83 5B 69 5D 20 84 C1 . . .;.. .[i] ..
006900: 69 5D 2E EA 3C 3E D3 29 20 81 20 D5 28 69 29 20 i]..<>.) . .(i)
006910: 89 3B C0 82 20 69 3E E6 20 95 C1 E6 3A 3D 69 3B .;.. i>. ...:=i;
006920: C1 97 20 E7 5B E6 5D 20 81 C2 EA 3A 3D D3 3B C2 .. .[.] ...:=.;.
006930: E9 3A 3D 30 3B C2 89 3B C1 89 3B 28 2A 82 20 69 .:=0;..;..;(*. i
006940: 2A 29 C0 A7 20 69 C0 89 20 D4 3B BF AF 20 00 53 *).. i.. .;.. .S
006950: 70 6C 69 74 55 70 4E 61 6D 65 00 CE 28 8E 20 EB plitUpName..(. .
006960: 3A 9B 20 84 20 99 29 3B BF BF 28 2A B4 73 70 6C :. . .);..(*.spl
006970: 69 74 20 75 70 20 61 20 D6 20 69 6E 74 6F 20 00 it up a . into .
006980: 69 74 73 00 CD 20 62 61 73 65 20 D6 20 61 6E 64 its.. base . and
006990: 20 CD 20 65 78 74 65 6E 73 69 6F 6E 2A 29 BF BF . extension*)..
0069A0: 8E B4 69 2C 6A 3A AD 3B BF 9C C0 DE 3A 3D 27 BE ..i,j:.;....:='.
0069B0: BA 27 3B C0 DD 3A 3D 27 BE BA 27 3B C0 69 3A 3D .';..:='..';.i:=
0069C0: 30 3B C0 A0 20 28 69 3C 98 28 EB 29 29 20 C1 87 0;.. (i<.(.)) ..
0069D0: 20 28 EB 5B 69 5D 3C 3E 27 2E 27 29 C1 87 20 28 (.[i]<>'.').. (
0069E0: EB 5B 69 5D 3C 3E 27 20 27 29 C1 87 20 28 EB 5B .[i]<>' ').. (.[
0069F0: 69 5D 3C 3E 30 63 29 20 81 20 C1 DE 5B 69 2B 31 i]<>0c) . ..[i+1
006A00: 5D 3A 3D EB 5B 69 5D 3B C1 D5 28 69 29 3B C1 89 ]:=.[i];..(i);..
006A10: 3B C0 82 20 28 EB 5B 69 5D 3C 3E 27 2E 27 29 20 ;.. (.[i]<>'.')
006A20: 95 20 A7 20 89 3B C0 6A 3A 3D 30 3B C0 D5 28 69 . . .;.j:=0;..(i
006A30: 29 3B C0 A0 20 28 69 3C 98 28 EB 29 29 20 C1 87 );.. (i<.(.)) ..
006A40: 20 28 EB 5B 69 5D 3C 3E 27 2E 27 29 C1 87 20 28 (.[i]<>'.').. (
006A50: EB 5B 69 5D 3C 3E 27 20 27 29 C1 87 20 28 EB 5B .[i]<>' ').. (.[
006A60: 69 5D 3C 3E 30 63 29 20 81 20 C1 DD 5B 6A 2B 31 i]<>0c) . ..[j+1
006A70: 5D 3A 3D EB 5B 69 5D 3B C1 D5 28 6A 29 3B C1 D5 ]:=.[i];..(j);..
006A80: 28 69 29 3B C1 89 3B C0 89 20 CE 3B BF AF 20 00 (i);..;.. .;.. .
006A90: 47 65 74 45 78 69 73 74 69 6E 67 54 61 62 6C 65 GetExistingTable
006AA0: 00 CC 3B BF 28 2A B4 4C 6F 61 64 20 00 61 6E 00 ..;.(*.Load .an.
006AB0: CB 20 65 78 69 73 74 69 6E 67 20 70 72 65 63 65 . existing prece
006AC0: 64 65 6E 63 65 20 CF C0 63 6C 65 61 72 20 CF 20 dence ..clear .
006AD0: D1 20 6E 6F 6E 65 20 D0 2A 29 BF 8E B4 77 3A 01 . none .*)...w:.
006AE0: 03 3B BF 9C C0 FF 28 E2 2C 27 00 50 52 45 43 45 .;....(.,'.PRECE
006AF0: 44 45 4E 00 CA 2E 00 44 41 54 00 C9 20 27 2C EF DEN....DAT.. ',.
006B00: 27 5B 27 2C 27 2F 27 3A 28 2A 4F 70 74 69 6F 6E '[','/':(*Option
006B10: 20 66 6F 75 6E 64 2A 29 C2 80 28 69 29 3B C2 9A found*)..(i);..
006B20: 28 AA 28 8C 29 2D 69 2C 30 88 2C 6F 70 74 69 6F (.(.)-i,0.,optio
006B30: 6E 29 3B C2 92 C2 7C C1 27 22 27 2C 22 27 22 3A n);...|.'"',"'":
006B40: 6A 3A 3D 69 2B 31 3B C2 A0 20 28 83 5B 69 5D 3C j:=i+1;.. (.[i]<
006B50: 3E 83 5B 6A 5D 29 20 C3 87 20 28 6A 3C AA 28 8C >.[j]) .. (j<.(.
006B60: 29 29 20 81 C3 80 28 6A 29 C3 89 3B C2 80 28 69 )) ...(j)..;..(i
006B70: 29 3B C2 9A 28 6A 2D 69 2C 83 5B 69 2D 31 5D 2C );..(j-i,.[i-1],
006B80: 73 74 72 69 6E 67 29 3B C2 80 28 6A 29 3B C2 7C string);..(j);.|
006B90: C1 91 B4 6A 3A 3D 69 2B 31 3B C2 A0 20 B5 28 83 ...j:=i+1;.. .(.
006BA0: 5B 6A 5D 3C 3E 27 20 27 29 20 C3 87 B4 28 83 5B [j]<>' ') ...(.[
006BB0: 6A 5D 3C 3E 27 2C 27 29 20 C3 87 B4 28 83 5B 6A j]<>',') ...(.[j
006BC0: 5D 3C 3E 27 5B 27 29 C3 87 B4 28 83 5B 6A 5D 3C ]<>'[')...(.[j]<
006BD0: 3E 27 2F 27 29 C3 87 20 B4 28 6A 3C AA 28 8C 29 >'/').. .(j<.(.)
006BE0: 29 20 81 C3 80 28 6A 29 C3 89 3B C2 9A 28 6A 2D ) ...(j)..;..(j-
006BF0: 69 2C 83 5B 6A 5D 2C 6E 61 6D 65 29 3B C2 89 3B i,.[j],name);..;
006C00: 28 2A 63 61 73 65 2A 29 C1 C1 69 3A 3D 6A 3B C1 (*case*)..i:=j;.
006C10: 82 20 83 5B 69 5D 3D 27 2C 27 20 95 20 80 28 69 . .[i]=',' . .(i
006C20: 29 20 89 3B C1 89 3B 20 28 2A 94 2A 29 C0 89 20 ) .;..; (*.*)..
006C30: 9E 3B C3 BF 89 20 A2 2E BF 00 00 1A 1A 1A 1A 1A .;... ..........
006C40: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
006C50: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
006C60: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
006C70: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
006C80: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
006C90: 20 00 43 6F 6E 76 65 72 73 69 6F 6E 73 00 A2 3B .Conversions..;
006CA0: BF 93 20 53 59 53 54 45 4D 20 A3 20 AB 2C 8F 3B .. SYSTEM £ .,.;
006CB0: BF 93 20 49 6E 74 4C 6F 67 69 63 20 A3 20 49 41 .. IntLogic £ IA
006CC0: 4E 44 3B BF 8E B4 00 63 68 61 72 73 00 A0 3A 9B ND;....chars..:.
006CD0: 5B 30 2E 2E 31 35 5D 20 84 20 99 3D 27 30 31 32 [0..15] . .='012
006CE0: 33 34 35 36 37 38 39 41 42 43 44 45 46 27 3B C0 3456789ABCDEF';.
006CF0: 69 2C 6C 3A AA 3B C0 74 2C 72 3A AD 3B C0 62 3A i,l:.;.t,r:.;.b:
006D00: 29 3B C0 82 20 EF 3C 3E 30 20 95 C1 F4 28 27 20 );.. .<>0 ...('
006D10: CA 2E C9 20 01 11 20 01 06 20 D0 27 29 3B C0 91 ... .. .. .');..
006D20: C1 FD 28 E1 2C E2 2C FA 29 3B C1 F7 28 E1 2C 77 ..(.,.,.);..(.,w
006D30: 29 3B C1 E6 3A 3D 77 3B C1 F6 28 E1 2C 8F 28 E7 );..:=w;..(.,.(.
006D40: 29 2C 01 04 28 EC 29 2A E6 2C EF 29 3B C1 FC 28 ),..(.)*.,.);..(
006D50: E1 2C 9A 29 3B B4 C1 89 C0 89 20 CC 3B BF AF 20 .,.);..... .;..
006D60: 00 44 65 70 65 6E 64 61 6E 74 00 C8 28 00 63 75 .Dependant..(.cu
006D70: 72 72 65 6E 74 00 C7 3A AD 29 3A AC 3B BF BF 28 rrent..:.):.;..(
006D80: 2A B4 63 68 65 63 6B 20 D1 20 C7 20 01 0F 20 75 *.check . . .. u
006D90: 73 65 73 20 61 20 01 0F 20 00 77 68 69 63 68 00 ses a .. .which.
006DA0: C6 20 6D 75 73 74 20 00 62 65 00 C5 20 C0 00 72 . must .be.. ..r
006DB0: 65 63 6F 6D 70 69 6C 65 64 00 C4 2A 29 BF 8E B4 ecompiled..*)...
006DC0: 6A 3A AD 3B BF 9C C0 8A 20 6A 3A 3D 30 20 86 20 j:.;.... j:=0 .
006DD0: E7 5B C7 5D 2E E9 2D 31 20 81 C1 82 20 E5 5B E7 .[.]..-1 ... .[.
006DE0: 5B C7 5D 2E E8 5B 6A 5D 5D 20 95 C2 A7 20 9A C2 [.]..[j]] ... ..
006DF0: 89 3B C1 89 3B 20 28 2A 8A 2A 29 C0 A7 20 A1 3B .;..; (*.*).. .;
006E00: C0 89 20 C8 3B BF AF 20 00 4D 61 72 6B 52 65 63 .. .;.. .MarkRec
006E10: 6F 6D 70 73 00 BB 3B BF 8E B4 00 50 61 72 61 6D omps..;....Param
006E20: 00 B9 3A 9B 20 5B 30 2E 2E 31 30 5D 20 84 20 01 ..:. [0..10] . .
006E30: 0D 3B C0 00 43 6F 75 6E 74 00 B8 3A AA 3B C0 EB .;..Count..:.;..
006E40: 3A 01 01 3B C0 69 3A AD 3B C0 00 43 6C 6F 73 65 :..;.i:.;..Close
006E50: 64 00 B7 3A AC 3B BF AF 20 00 47 65 74 4E 61 6D d..:.;.. .GetNam
006E60: 65 00 B2 28 8E 20 70 3A 01 0D 29 3B BF 8E B4 69 e..(. p:..);...i
006E70: 2C 6A 3A AD 3B BF 9C C0 EB 3A 3D 27 BE BE BA 27 ,j:.;....:='...'
006E80: 3B C0 6A 3A 3D 70 5E 2E 4C 65 6E 67 74 68 3B C0 ;.j:=p^.Length;.
006E90: 82 20 6A 3E 98 28 EB 29 20 95 20 6A 3A 3D 98 28 . j>.(.) . j:=.(
006EA0: EB 29 20 89 3B C0 8A 20 69 3A 3D 30 20 86 20 6A .) .;.. i:=0 . j
006EB0: 20 81 20 EB 5B 69 5D 3A 3D 70 5E 2E 00 43 68 61 . .[i]:=p^..Cha
006EC0: 72 73 00 B1 5B 69 5D 20 89 3B C0 89 20 B2 3B BF rs..[i] .;.. .;.
006ED0: 9C C0 01 02 28 B9 2C B8 29 3B C0 97 20 B9 5B B8 ....(.,.);.. .[.
006EE0: 2D 31 5D 5E 20 81 C1 82 20 43 6C 61 73 73 3D 6F -1]^ ... Class=o
006EF0: 70 74 69 6F 6E 20 95 C2 EE 3A 3D 43 41 50 28 B1 ption ...:=CAP(.
006F00: 52 45 41 4C 3B BF AF 20 00 43 61 72 64 54 6F 53 REAL;.. .CardToS
006F10: 74 72 69 6E 67 00 9E 28 63 2C 00 62 61 73 65 00 tring..(c,.base.
006F20: 9D 3A AD 3B 8E 20 54 3A 9B 20 84 20 99 3B 8E 20 .:.;. T:. . .;.
006F30: 00 75 73 65 64 00 97 3A AA 29 3B BF 9C C0 69 3A .used..:.);...i:
006F40: 3D 98 28 54 29 3B C0 A6 C1 74 3A 3D 63 20 88 20 =.(T);...t:=c .
006F50: 9D 3B C1 72 3A 3D 63 2D 9D 2A 74 3B C1 54 5B 69 .;.r:=c-.*t;.T[i
006F60: 5D 3A 3D A0 5B 72 5D 3B C1 63 3A 3D 74 3B C1 69 ]:=.[r];.c:=t;.i
006F70: 3A 3D 69 2D 31 3B C1 9F 20 28 63 3D 30 29 20 85 :=i-1;.. (c=0) .
006F80: 20 28 69 3C 30 29 3B C0 97 3A 3D 98 28 54 29 2D (i<0);..:=.(T)-
006F90: 69 3B C0 8A 20 69 3A 3D 69 20 86 20 30 20 80 20 i;.. i:=i . 0 .
006FA0: 2D 31 20 81 20 54 5B 69 5D 3A 3D 27 20 27 20 89 -1 . T[i]:=' ' .
006FB0: 3B C0 89 20 9E 3B C1 BF AF 20 00 49 6E 74 54 6F ;.. .;... .IntTo
006FC0: 53 74 72 69 6E 67 00 96 28 76 3A AA 3B 9D 3A AD String..(v:.;.:.
006FD0: 3B C2 8E 20 54 3A 9B 20 84 20 99 3B 8E 20 97 3A ;.. T:. . .;. .:
006FE0: AA 29 3B BF 8E 20 00 6E 65 67 00 94 3A AC 3B BF .);.. .neg..:.;.
006FF0: BF 9C C0 82 20 76 3C 30 20 95 20 C1 94 3A 3D 9A .... v<0 . ..:=.
007000: 3B C1 76 3A 3D 2D 76 C0 91 B4 94 3A 3D A1 C1 89 ;.v:=-v....:=...
007010: 3B C0 9E 28 AD 28 76 29 2C 9D 2C 54 2C 97 29 3B ;..(.(v),.,T,.);
007020: C0 82 20 94 20 95 20 C1 54 5B 98 28 54 29 2D 97 .. . . .T[.(T)-.
007030: 5D 3A 3D 27 2D 27 3B C1 97 3A 3D 97 2B 31 3B C1 ]:='-';..:=.+1;.
007040: 89 3B C0 89 20 96 3B BF AF 20 00 4D 61 6B 65 57 .;.. .;.. .MakeW
007050: 6F 72 64 00 92 28 00 48 69 67 68 00 90 2C 00 4C ord..(.High..,.L
007060: 6F 77 00 8D 3A 00 42 59 54 45 00 8C 29 3A 00 57 ow..:.BYTE..):.W
007070: 4F 52 44 00 8B 3B BF 8E B4 61 3A AB 3B BF 9C C0 ORD..;...a:.;...
007080: 61 3A 3D 8F 28 69 29 3B C0 61 5E 3A 3D 8D 3B C0 a:=.(i);.a^:=.;.
007090: 61 3A 3D AB 28 AD 28 61 29 2B 31 29 3B C0 61 5E a:=.(.(a)+1);.a^
0070A0: 3A 3D 90 3B C0 A7 20 69 C0 89 20 92 3B C0 BF AF :=.;.. i.. .;...
0070B0: 20 00 48 69 67 68 42 79 74 65 00 87 28 77 3A 8B .HighByte..(w:.
0070C0: 29 3A 8C 3B BF 8E B4 61 3A AB 3B BF 9C C0 61 3A ):.;...a:.;...a:
0070D0: 3D AB 28 AD 28 8F 28 77 29 29 2B 31 29 3B C0 A7 =.(.(.(w))+1);..
0070E0: 20 61 5E 3B C0 89 20 87 3B BF AF 20 00 4C 6F 77 a^;.. .;.. .Low
0070F0: 42 79 74 65 00 83 28 77 3A 8B 29 3A 8C 3B BF 8E Byte..(w:.):.;..
007100: 5B 30 5D 29 3D 27 49 27 C2 44 45 43 28 B8 29 3B [0])='I'.DEC(.);
007110: C1 91 C2 EE 3A 3D A1 C2 89 C1 89 3B 20 28 2A 97 ....:=.....; (*.
007120: 2A 29 C0 82 20 B8 3D 30 20 95 C1 F4 28 27 20 55 *).. .=0 ...(' U
007130: 73 61 67 65 3A 20 01 13 20 3C 01 07 20 01 11 3E sage: .. <.. ..>
007140: 20 3C 01 0B 20 01 0C 20 00 63 6F 6D 70 69 6C 65 <.. .. .compile
007150: 00 B0 3E 27 29 3B C1 89 3B BF C0 28 2A 6F 70 65 ..>');..;..(*ope
007160: 6E 20 01 07 20 01 11 2A 29 BF C0 B2 28 B9 5B 30 n .. ..*)...(.[0
007170: 5D 29 3B C0 FE 28 E0 2C EB 2C EF 29 3B C0 82 20 ]);..(.,.,.);..
007180: EF 3C 3E 30 20 95 C1 F4 28 27 20 64 69 73 63 20 .<>0 ...(' disc
007190: 66 75 6C 6C 27 29 3B C1 89 3B C0 FD 28 DF 2C E0 full');..;..(.,.
0071A0: 2C F9 29 3B BF C0 28 2A B4 00 6E 6F 77 00 A2 20 ,.);..(*..now..
0071B0: 00 73 65 74 00 9E 20 01 11 20 01 0E 2A 29 BF C0 .set.. .. ..*)..
0071C0: 8A 20 69 3A 3D 31 20 86 20 F0 20 81 20 C1 E5 5B . i:=1 . . . ..[
0071D0: 69 5D 3A 3D A1 3B C1 E4 5B 69 5D 3A 3D A1 3B C1 i]:=.;..[i]:=.;.
0071E0: 89 3B C0 82 20 B8 3E 30 20 95 C0 BC 8A 20 69 3A .;.. .>0 .... i:
0071F0: 3D 31 20 86 20 AD 28 B8 2D 31 29 20 81 C1 B2 28 =1 . .(.-1) ...(
007200: B9 5B 69 5D 29 3B C1 CE 28 EB 29 3B C1 6A 3A 3D .[i]);..(.);.j:=
007210: D4 28 DE 2C DD 3D 27 DA BD 27 29 3B C1 E5 5B 6A .(.,.='..');..[j
007220: 5D 3A 3D 9A 3B C1 E4 5B 6A 5D 3A 3D 8C 20 EE 3B ]:=.;..[j]:=. .;
007230: C1 89 3B C0 BC 89 3B BF C0 28 2A B4 4E 6F 77 20 ..;...;..(*.Now
007240: 63 6C 6F 73 65 20 01 0B 20 01 0C 20 B0 20 2A 29 close .. .. . *)
007250: BF C0 A6 C1 B7 3A 3D 9A 3B C1 8A 20 69 3A 3D 31 .....:=.;.. i:=1
007260: 20 86 20 E6 20 81 C2 82 20 8C 20 E5 5B 69 5D 20 . . ... . .[i]
007270: 95 C3 E5 5B 69 5D 3A 3D C8 28 69 29 3B C3 B7 3A ...[i]:=.(i);..:
007280: 3D 8C 20 E5 5B 69 5D 20 87 20 B7 3B C3 89 3B C2 =. .[i] . .;..;.
007290: 89 3B 20 28 2A 8A 2A 29 C1 9F 20 B7 3B C0 82 20 .; (*.*).. .;..
0072A0: 8C 20 EE 20 95 C1 8A 20 69 3A 3D 31 20 86 20 E6 . . ... i:=1 . .
0072B0: 20 81 C2 82 20 E4 5B 69 5D 20 95 20 E5 5B 69 5D ... .[i] . .[i]
0072C0: 3A 3D A1 20 89 3B C2 89 3B C1 89 3B BF C0 28 2A :=. .;..;..;..(*
0072D0: 9E 20 01 0A 20 01 10 20 00 69 6D 70 6C 65 6D 65 . .. .. .impleme
0072E0: 6E 74 61 74 69 6F 6E 00 90 20 01 05 20 01 10 20 ntation.. .. ..
0072F0: 61 6E 79 20 00 64 65 66 69 6E 69 74 69 6F 6E 00 any .definition.
007300: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
007310: 06 00 00 00 02 09 4E E5 06 00 41 02 00 00 00 02 ......N...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: B4 61 3A AB 3B BF 9C C0 61 3A 3D 8F 28 77 29 3B .a:.;...a:=.(w);
007410: C0 A7 20 61 5E 3B C0 89 20 83 3B BF 89 20 A2 2E .. a^;.. .;.. ..
007420: BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
007430: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
007440: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
007450: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
007460: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
007470: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
007480: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
007490: 20 00 44 45 42 55 47 00 01 18 3B BF BF 28 2A B4 .DEBUG...;..(*.
0074A0: 00 54 68 69 73 00 01 17 20 00 69 73 00 01 16 20 .This... .is...
0074B0: 61 20 00 64 65 62 75 67 00 01 15 20 00 6D 6F 64 a .debug... .mod
0074C0: 75 6C 65 00 01 14 BF C0 00 55 70 64 61 74 65 64 ule......Updated
0074D0: 00 01 13 20 4A 61 6E 20 32 36 20 38 35 20 00 74 ... Jan 26 85 .t
0074E0: 6F 00 01 12 20 00 61 64 64 00 01 11 20 00 63 6F o... .add... .co
0074F0: 6D 6D 61 6E 64 00 01 10 20 69 6E 74 65 72 66 61 mmand... interfa
007500: 63 65 C0 01 13 20 41 75 67 20 31 30 20 38 36 20 ce... Aug 10 86
007510: 01 12 20 01 11 20 00 62 6F 75 6E 64 73 00 01 0F .. .. .bounds...
007520: 20 65 72 72 6F 72 20 00 74 72 61 70 73 00 01 0E error .traps...
007530: 20 00 61 6E 64 00 01 0D 20 00 6F 76 65 72 66 6C .and... .overfl
007540: 6F 77 00 01 0C 20 01 0E 2C C0 00 61 6C 73 6F 00 ow... ..,..also.
007550: 01 0B 20 00 65 6E 64 00 01 0A 20 00 6F 66 00 01 .. .end... .of..
007560: 09 20 00 70 72 6F 63 65 64 75 72 65 00 01 08 20 . .procedure...
007570: 63 6F 64 65 BF C0 00 54 68 65 00 01 07 20 72 65 code...The... re
007580: 6C 65 61 73 65 64 20 76 65 72 73 69 6F 6E 20 00 leased version .
007590: 77 69 6C 6C 00 01 06 20 00 74 72 61 63 65 00 01 will... .trace..
0075A0: 05 20 01 08 20 00 63 61 6C 6C 73 00 01 04 20 01 . .. .calls... .
0075B0: 0D C0 00 6C 69 6E 65 00 01 03 20 00 6E 75 6D 62 ...line... .numb
0075C0: 65 72 73 00 01 02 2E BF C0 57 68 65 6E 20 61 20 ers......When a
0075D0: 01 14 20 01 16 20 63 6F 6D 70 69 6C 65 64 20 00 .. .. compiled .
0075E0: 77 69 74 68 00 01 01 20 00 74 68 65 00 01 00 20 with... .the...
0075F0: 01 05 20 00 66 6C 61 67 00 FF 20 00 6F 6E 00 FE .. .flag.. .on..
007600: EA 28 BD 29 3B C2 BC 90 20 B8 28 BD 29 20 84 C3 .(.);... .(.) ..
007610: 27 4C 27 3A DA 3A 3D 9A 3B C3 BC B3 28 27 B7 20 'L':.:=.;...('.
007620: 01 05 27 29 7C C3 27 50 27 3A D9 3A 3D 9A C3 BC ..')|.'P':.:=...
007630: B3 28 27 B6 20 01 05 27 29 7C C3 91 20 C3 B4 D9 .('. ..')|.. ...
007640: 3A 3D 9A 3B C3 B4 DA 3A 3D 9A 3B C3 B4 B3 28 27 :=.;...:=.;...('
007650: B2 27 29 3B C3 B4 89 3B 28 2A 90 2A 29 C3 A9 3B .');...;(*.*)..;
007660: C2 BC 7C C2 27 58 27 3A B3 28 27 20 43 6F 6E 74 ..|.'X':.(' Cont
007670: 69 6E 75 69 6E 67 27 29 3B C2 BC A9 3B 20 92 C2 inuing');...; ..
007680: 91 C3 B3 28 27 43 6F 6D 6D 61 6E 64 73 20 CD 3A ...('Commands .:
007690: 20 41 20 45 20 44 20 01 0D 20 58 27 29 3B A9 3B A E D .. X');.;
0076A0: C3 89 3B 28 2A 90 2A 29 C2 89 3B 28 2A 94 2A 29 ..;(*.*)..;(*.*)
0076B0: C1 89 3B 28 2A 82 20 BD 3D D0 2A 29 C0 89 3B 28 ..;(*. .=.*)..;(
0076C0: 2A D8 3D 30 2A 29 BF BC 89 20 C4 3B BF AF 20 00 *.=0*)... .;.. .
0076D0: 44 69 73 70 6C 61 79 4E 61 6D 65 00 B1 3B BF 9C DisplayName..;..
0076E0: C0 A0 20 D5 5E 3C 3E 30 78 20 81 C1 82 20 D9 20 .. .^<>0x ... .
0076F0: 95 20 ED 28 D5 5E 29 20 89 3B C1 D5 3A 3D DC 28 . .(.^) .;..:=.(
007700: AD 28 D5 29 2B 31 29 3B C1 89 3B C0 89 20 B1 3B .(.)+1);..;.. .;
007710: BF AF 20 00 54 72 61 63 65 42 61 63 6B 00 B0 3B .. .TraceBack..;
007720: BF 9C C0 A9 3B C0 D9 3A 3D 9A 3B C0 8A 20 D2 3A ....;..:=.;.. .:
007730: 3D D2 20 86 20 30 20 80 20 2D 31 20 81 C1 82 20 =. . 0 . -1 ...
007740: D2 3E 30 20 95 C2 D5 3A 3D D4 5B D2 5D 3B C2 B1 .>0 ...:=.[.];..
007750: 3B C2 89 3B C1 B3 28 27 20 6E 65 61 72 20 27 29 ;..;..(' near ')
007760: 3B C1 EE 28 D1 2C 34 29 3B C1 D1 3A 3D D3 5B D2 ;..(.,4);..:=.[.
007770: 5D 3B C1 A9 3B C1 89 3B C0 89 20 B0 3B BF AF 20 ];..;..;.. .;..
007780: 00 54 72 61 63 65 00 AB 3B BF BF 28 2A B4 01 17 .Trace..;..(*...
007790: 20 01 14 20 61 63 74 75 61 6C 6C 79 20 64 6F 65 .. actually doe
0077A0: 73 20 01 00 20 74 72 61 63 69 6E 67 2A 29 BF 8E s .. tracing*)..
0077B0: B4 69 3A AD 3B BF 9C C0 C4 3B BF C0 28 2A B4 70 .i:.;....;..(*.p
0077C0: 69 63 6B 20 00 75 70 00 AA 20 01 00 20 00 72 65 ick .up.. .. .re
0077D0: 74 75 72 6E 00 A7 20 00 61 64 64 72 65 73 73 00 turn.. .address.
0077E0: A2 20 CB 20 69 66 20 69 74 20 77 65 72 65 20 61 . . if it were a
0077F0: 20 C6 20 C1 01 17 20 72 65 71 75 69 72 65 64 20 . ... required
007800: 20 28 65 69 74 68 65 72 C0 00 62 79 00 FD 20 00 (either..by.. .
007810: 75 73 69 6E 67 00 FC 20 4D 32 20 6E 61 6D 65 2F using.. M2 name/
007820: 54 2C 20 00 6F 72 00 FB 20 00 65 6C 73 65 00 FA T, .or.. .else..
007830: 20 28 2A 24 74 2B 2A 29 2C 20 01 0D 20 6C 69 6E (*$t+*), .. lin
007840: 6B 65 64 20 01 01 20 01 00 20 C0 2F 54 20 FF 2C ked .. .. ./T .,
007850: 20 00 65 61 63 68 00 F9 20 01 08 20 FB 20 00 73 .each.. .. . .s
007860: 74 61 74 65 6D 65 6E 74 00 F8 20 01 16 20 70 72 tatement.. .. pr
007870: 65 63 65 64 65 64 20 FD 20 00 61 6E 00 F7 20 69 eceded . .an.. i
007880: 6E 74 20 36 C0 00 66 6F 6C 6C 6F 77 65 64 00 F6 nt 6..followed..
007890: 20 FD 20 73 65 76 65 72 61 6C 20 00 62 79 74 65 . several .byte
0078A0: 73 00 F5 20 00 69 6E 00 F4 20 01 00 20 66 6F 72 s.. .in.. .. for
0078B0: 6D 3A BF C0 74 6F 70 20 00 62 69 74 73 00 F3 BB m:..top .bits...
0078C0: B4 30 BA 3D BA 01 08 20 00 63 61 6C 6C 00 F2 C2 .0.=... .call...
0078D0: 31 31 BA 3D BA F8 20 00 6E 75 6D 62 65 72 00 F1 11.=.. .number..
0078E0: 20 28 01 03 20 F1 29 28 6D 61 78 20 01 16 20 33 (.. .)(max .. 3
0078F0: 66 66 66 3D 31 36 33 38 33 29 C2 31 30 30 20 3D fff=16383).100 =
007900: BA 01 0A 20 01 09 20 01 08 C2 31 30 31 30 20 3D ... .. ...1010 =
007910: 20 01 0C 20 00 74 72 61 70 00 F0 C2 31 30 31 31 .. .trap...1011
007920: 20 3D 20 01 0F 20 F0 BF C0 01 07 20 72 65 6D 61 = .. ..... rema
007930: 69 6E 69 6E 67 20 31 35 20 F3 20 01 09 20 61 20 ining 15 . .. a
007940: 77 6F 72 64 20 67 69 76 65 20 61 20 01 08 20 F1 word give a .. .
007950: 20 FB 20 61 20 F8 C0 28 01 03 29 20 F1 2E 20 BF . a ..(..) .. .
007960: C0 01 17 20 01 14 20 70 65 72 66 6F 72 6D 73 20 ... .. performs
007970: 74 77 6F 20 66 75 6E 63 74 69 6F 6E 73 3A BF C0 two functions:..
007980: 31 2F 20 4F 75 74 70 75 74 73 20 01 05 20 69 6E 1/ Outputs .. in
007990: 66 6F 72 6D 61 74 69 6F 6E BF C0 32 2F 20 41 6C formation..2/ Al
0079A0: 6C 6F 77 73 20 63 6F 6E 74 72 6F 6C 20 01 09 20 lows control ..
0079B0: 01 15 20 6F 75 74 70 75 74 BF C0 2A 29 BF 93 B4 .. output..*)...
0079C0: 53 59 53 54 45 4D 20 A3 20 8F 2C 00 42 59 54 45 SYSTEM £ .,.BYTE
0079D0: 00 EF 3B BF 93 B4 53 6D 61 6C 6C 49 4F 20 A3 20 ..;...SmallIO £
0079E0: 00 57 72 69 74 65 43 61 72 64 00 EE 3B BF 93 B4 .WriteCard..;...
0079F0: AE 20 A3 20 A9 2C B3 2C 00 57 72 69 74 65 00 ED . £ .,.,.Write..
007A00: 69 6E 74 65 72 6E 61 6C 20 6B 6E 6F 77 6C 65 64 internal knowled
007A10: 67 65 20 01 09 20 01 00 20 63 6F 6D 70 69 6C 65 ge .. .. compile
007A20: 72 27 73 20 6F 70 65 72 61 74 69 6F 6E BF C1 01 r's operation...
007A30: 07 20 73 74 61 63 6B 20 01 06 20 6C 6F 6F 6B 20 . stack .. look
007A40: 6C 69 6B 65 20 CC 3A BF C2 A7 20 A2 20 B4 28 32 like .:... . .(2
007A50: 20 F5 29 C2 6F 6C 64 20 69 78 20 00 76 61 6C 75 .).old ix .valu
007A60: 65 00 97 BB B4 28 32 20 F5 29 C2 69 B5 28 32 20 e....(2 .).i.(2
007A70: F5 29 C0 2A 29 BF C0 D7 3A 3D DB 28 AD 28 8F 28 .).*)...:=.(.(.(
007A80: 69 29 29 2B 34 29 3B C0 D6 3A 3D DB 28 D7 5E 29 i))+4);..:=.(.^)
007A90: 3B B5 28 2A A7 20 A2 20 97 2A 29 C0 D5 3A 3D DC ;.(*. . .*)..:=.
007AA0: 28 D6 29 3B C0 82 20 AD 28 E9 28 00 4F 52 44 00 (.);.. .(.(.ORD.
007AB0: 8D 28 D5 5E 29 2C 30 63 30 68 29 29 3D 30 63 30 .(.^),0c0h))=0c0
007AC0: 68 20 95 20 28 2A 49 74 73 20 61 20 01 03 20 F1 h . (*Its a .. .
007AD0: 2A 29 C1 D7 5E 3A 3D D7 5E 2B 32 3B B4 28 2A 01 *)..^:=.^+2;.(*.
007AE0: 11 20 32 20 01 12 20 A7 20 A2 2A 29 C1 D1 3A 3D . 2 .. . .*)..:=
007AF0: 32 35 36 2A E9 28 8D 28 D5 5E 29 2C 30 33 66 68 256*.(.(.^),03fh
007B00: 29 3B C1 D5 3A 3D DC 28 AD 28 D5 29 2B 31 29 3B );..:=.(.(.)+1);
007B10: C1 D1 3A 3D D1 2B 8D 28 D5 5E 29 3B C1 82 20 DA ..:=.+.(.^);.. .
007B20: 20 95 C2 B3 28 27 20 4C 69 6E 65 20 3A 20 27 29 ...(' Line : ')
007B30: 3B C2 EE 28 D1 2C 35 29 3B C2 A9 3B C2 89 3B C0 ;..(.,5);..;..;.
007B40: 9E 20 E9 28 8D 28 D5 5E 29 2C 38 30 68 29 3D 30 . .(.(.^),80h)=0
007B50: 20 95 20 28 2A 01 08 20 F2 20 2A 29 C1 82 20 D9 . (*.. . *).. .
007B60: 20 95 20 B3 28 27 20 50 72 6F 63 65 64 75 72 65 . .(' Procedure
007B70: 20 3A 20 27 29 20 89 3B C1 82 20 D2 3D 98 28 D4 : ') .;.. .=.(.
007B80: 29 20 95 C2 8A 20 D2 3A 3D 31 20 86 20 98 28 D4 ) ... .:=1 . .(.
007B90: 29 2D 31 20 81 C3 D4 5B D2 5D 3A 3D D4 5B D2 2B )-1 ...[.]:=.[.+
007BA0: 31 5D 3B C3 D3 5B D2 5D 3A 3D D3 5B D2 2B 31 5D 1];..[.]:=.[.+1]
007BB0: 3B C3 89 3B C2 B9 28 D2 29 3B C2 89 3B C1 49 4E ;..;..(.);..;.IN
007BC0: 43 28 D2 29 3B C1 D4 5B D2 5D 3A 3D D5 3B C1 D3 C(.);..[.]:=.;..
007BD0: 5B D2 5D 3A 3D D1 3B C1 B1 3B C1 82 20 D9 20 95 [.]:=.;..;.. . .
007BE0: 20 A9 20 89 3B C1 D7 5E 3A 3D AD 28 D5 29 2B 31 . .;..^:=.(.)+1
007BF0: 3B C0 9E 20 AD 28 E9 28 8D 28 D5 5E 29 2C 30 65 ;.. .(.(.(.^),0e
007C00: 2C 00 42 75 73 79 52 65 61 64 00 EC 2C C2 00 43 ,.BusyRead..,..C
007C10: 6C 65 61 72 43 68 61 72 42 75 66 66 65 72 00 EB learCharBuffer..
007C20: 2C 00 52 65 61 64 00 EA 3B BF 93 B4 49 6E 74 4C ,.Read..;...IntL
007C30: 6F 67 69 63 20 A3 20 00 49 41 4E 44 00 E9 3B BF ogic £ .IAND..;.
007C40: BF 9D B4 00 49 6E 74 4E 75 6D 62 65 72 00 E8 3D ....IntNumber..=
007C50: 36 3B B5 28 2A 00 4E 75 6D 62 65 72 00 E7 20 01 6;.(*.Number.. .
007C60: 09 20 00 69 6E 74 65 72 75 70 74 00 E6 20 00 75 . .interupt.. .u
007C70: 73 65 64 00 E5 20 28 65 67 20 52 53 54 20 36 29 sed.. (eg RST 6)
007C80: C3 BA 00 49 66 00 E4 20 6F 74 68 65 72 20 74 68 ...If.. other th
007C90: 61 6E 20 36 20 01 16 20 E5 2C 20 00 62 65 00 E3 an 6 .. ., .be..
007CA0: 20 73 75 72 65 20 01 12 20 75 73 65 20 2F 74 3A sure .. use /t:
007CB0: 6E C3 BA FE 20 01 00 20 6C 69 6E 6B 2A 29 C0 00 n... .. link*)..
007CC0: 46 72 65 71 43 6F 75 6E 74 00 E2 3D 31 30 30 3B FreqCount..=100;
007CD0: B5 28 2A E7 20 01 09 20 01 04 20 62 65 74 77 65 .(*. .. .. betwe
007CE0: 65 6E 20 74 65 73 74 73 20 00 66 6F 72 00 E1 20 en tests .for..
007CF0: C3 BA F7 20 00 61 74 74 65 6E 74 69 6F 6E 00 E0 ... .attention..
007D00: 20 00 63 68 61 72 61 63 74 65 72 00 DF 2E 20 01 .character... .
007D10: 07 20 E0 C3 BA DF 20 01 16 20 6E 6F 74 20 63 68 . .... .. not ch
007D20: 65 63 6B 65 64 20 F9 20 74 69 6D 65 20 72 6F 75 ecked . time rou
007D30: 6E 64 20 C3 BA 62 65 63 61 75 73 65 20 00 74 68 nd ..because .th
007D40: 61 74 00 DE 20 6D 61 6B 65 73 20 65 76 65 72 79 at.. makes every
007D50: 74 68 69 6E 67 20 72 75 6E 20 74 6F 6F 20 73 6C thing run too sl
007D60: 6F 77 2A 29 C0 00 4D 61 78 44 65 70 74 68 00 DD ow*)..MaxDepth..
007D70: 3D 32 30 3B B5 28 2A 4D 61 78 20 64 65 70 74 68 =20;.(*Max depth
007D80: 20 01 09 20 01 08 20 01 04 20 DE 20 63 61 6E 20 .. .. .. . can
007D90: E3 20 C3 BA 74 72 61 63 6B 65 64 2A 29 BF 96 B4 . ..tracked*)...
007DA0: 00 70 43 48 41 52 00 DC 3D A8 20 86 20 99 3B C0 .pCHAR..=. . .;.
007DB0: 00 70 43 41 52 44 49 4E 41 4C 00 DB 3D A8 20 86 .pCARDINAL..=. .
007DC0: 20 AD 3B BF 8E B4 00 4C 69 6E 65 54 72 61 63 65 .;....LineTrace
007DD0: 00 DA 3A AC 3D 9A 3B C0 00 50 72 6F 63 54 72 61 ..:.=.;..ProcTra
007DE0: 63 65 00 D9 3A AC 3D 9A 3B C0 00 43 6F 75 6E 74 ce..:.=.;..Count
007DF0: 44 6F 77 6E 00 D8 3A AD 3D E2 3B C0 00 70 52 65 Down..:.=.;..pRe
007E00: 30 68 29 29 3D 30 38 30 68 20 95 20 28 2A 01 0A 0h))=080h . (*..
007E10: 20 01 09 20 01 08 20 2A 29 C1 D7 5E 3A 3D AD 28 .. .. *)..^:=.(
007E20: D5 29 2B 31 3B C1 82 20 D9 20 95 20 C2 B3 28 27 .)+1;.. . . ..('
007E30: 65 78 69 74 20 3A 27 29 3B C2 82 20 D2 3E 30 20 exit :');.. .>0
007E40: 95 20 C3 D5 3A 3D D4 5B D2 5D 3B C3 B1 3B C3 89 . ..:=.[.];..;..
007E50: 3B C2 A9 3B C2 89 3B C1 82 20 D2 3E 30 20 95 20 ;..;..;.. .>0 .
007E60: B9 28 D2 29 20 89 3B C0 9E 20 AD 28 E9 28 8D 28 .(.) .;.. .(.(.(
007E70: D5 5E 29 2C 30 66 30 68 29 29 3D 30 61 30 68 20 .^),0f0h))=0a0h
007E80: 95 C1 B3 28 27 20 01 0C 20 27 29 3B C1 B0 3B C1 ...(' .. ');..;.
007E90: 00 48 41 4C 54 00 8C 3B C0 91 20 C1 B3 28 27 20 .HALT..;.. ..('
007EA0: 56 61 6C 75 65 20 6F 75 74 20 01 09 20 01 0F 27 Value out .. ..'
007EB0: 29 3B C1 B0 3B C1 8C 3B C0 C1 89 3B 28 2A 20 82 );..;..;...;(* .
007EC0: 20 54 72 61 63 69 6E 67 2A 29 C0 89 20 AB 3B BF Tracing*).. .;.
007ED0: 96 B4 00 4A 75 6D 70 00 8B 3D A5 C1 00 4F 70 63 ...Jump..=...Opc
007EE0: 6F 64 65 00 88 3A EF 3B C1 00 41 64 64 72 65 73 ode..:.;..Addres
007EF0: 73 00 87 3A AD 3B C1 89 3B BF 8E B4 00 49 6E 74 s..:.;..;....Int
007F00: 4A 75 6D 70 00 83 5B 38 2A E8 5D 3A 8B 3B BF 9C Jump..[8*.]:.;..
007F10: B5 28 2A 4D 61 69 6E 20 01 03 20 2D 20 73 65 74 .(*Main .. - set
007F20: 20 AA 20 01 00 20 E6 20 01 12 C1 6A 75 6D 70 20 . .. . ...jump
007F30: 01 12 20 01 05 2A 29 C0 83 2E 88 3A 3D 30 63 33 .. ..*)....:=0c3
007F40: 68 3B C0 83 2E 87 3A 3D AD 28 AB 29 3B C0 89 20 h;....:=.(.);..
007F50: 01 18 2E BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
007F60: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
007F70: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
007F80: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
007F90: 20 00 66 69 6C 65 73 00 F1 3B BF BF 28 2A B4 46 .files..;..(*.F
007FA0: 69 6C 65 20 73 79 73 74 65 6D 20 69 6D 70 6C 65 ile system imple
007FB0: 6D 65 6E 74 61 74 69 6F 6E 20 00 66 6F 72 00 F0 mentation .for..
007FC0: 20 43 50 2F 4D 20 38 30 BF C0 44 61 76 65 20 4D CP/M 80..Dave M
007FD0: 6F 6F 72 65 20 44 65 63 20 31 39 38 34 BF 2A 29 oore Dec 1984.*)
007FE0: BF 93 20 53 59 53 54 45 4D 20 A3 20 8F 2C 00 42 .. SYSTEM £ .,.B
007FF0: 59 54 45 00 EF 3B BF 93 20 43 50 4D 20 A3 20 00 YTE..;.. CPM £ .
008000: 74 00 D7 3A DB 3B C0 00 70 43 61 72 64 00 D6 3A t..:.;..pCard..:
008010: DB 3B C0 00 70 43 68 61 72 00 D5 3A DC 3B C0 6A .;..pChar..:.;.j
008020: 3A AD 3B C0 00 50 72 6F 63 53 74 61 63 6B 00 D4 :.;..ProcStack..
008030: 3A 9B 20 5B 31 2E 2E DD 5D 20 84 20 DC 3B C0 00 :. [1...] . .;..
008040: 50 72 6F 63 4C 69 6E 65 00 D3 3A 9B 20 5B 31 2E ProcLine..:. [1.
008050: 2E DD 5D 20 84 20 AD 3B C0 00 50 72 6F 63 54 6F ..] . .;..ProcTo
008060: 70 00 D2 3A AD 3D 30 3B C0 00 4C 61 73 74 4C 69 p..:.=0;..LastLi
008070: 6E 65 00 D1 3A AD 3B C0 00 41 74 74 65 6E 74 69 ne..:.;..Attenti
008080: 6F 6E 43 68 61 72 61 63 74 65 72 00 D0 3A 99 3D onCharacter..:.=
008090: 30 31 78 3B BF C0 28 2A 20 01 07 20 E0 20 DF 20 01x;..(* .. . .
0080A0: 01 16 20 74 79 70 65 73 20 01 12 20 00 67 65 74 .. types .. .get
0080B0: 00 CF 20 69 6E 74 6F 20 C0 BB 01 18 20 01 10 20 .. into .... ..
0080C0: 6D 6F 64 65 2E 20 01 17 20 6D 65 61 6E 73 20 DE mode. .. means .
0080D0: 20 01 15 20 01 16 C0 BB 70 65 72 66 6F 72 6D 69 .. ....performi
0080E0: 6E 67 20 01 04 20 01 12 20 01 00 20 EC 20 72 6F ng .. .. .. . ro
0080F0: 75 74 69 6E 65 20 F4 20 AE 2E BF C0 BB E4 20 00 utine . ...... .
008100: 79 6F 75 00 CE 20 00 61 72 65 00 CD 20 01 0B 20 you.. .are.. ..
008110: FC 20 EC 2C 20 00 74 68 69 73 00 CC 20 01 06 20 . ., .this.. ..
008120: 63 61 75 73 65 20 63 6F 6E 66 6C 69 63 74 73 C0 cause conflicts.
008130: BB 00 61 73 00 CB 20 00 44 65 62 75 67 00 CA 20 ..as.. .Debug..
008140: 01 06 20 CF 20 01 00 20 00 63 68 61 72 61 63 74 .. . .. .charact
008150: 65 72 73 00 C9 20 CE 20 77 61 6E 74 65 64 2E 20 ers.. . wanted.
008160: 54 6F 20 6F 76 65 72 63 6F 6D 65 20 CC 2C 20 C0 To overcome ., .
008170: BB CE 20 01 06 20 68 61 76 65 20 01 12 20 00 63 .. .. have .. .c
008180: 68 61 6E 67 65 00 C8 20 AE 20 73 6F 20 DE 20 C9 hange.. . so . .
008190: 20 72 65 6A 65 63 74 65 64 C0 BB FD 20 CA 20 01 rejected... . .
0081A0: 06 20 E3 20 72 65 74 75 72 6E 65 64 20 01 12 20 . . returned ..
0081B0: 61 6E 6F 74 68 65 72 20 63 61 6C 6C 65 72 2E 20 another caller.
0081C0: 2A 29 BF BF 28 2A B4 43 68 65 63 6B 20 E1 20 E0 *)..(*.Check . .
0081D0: 20 DF BF C0 E4 20 66 6F 75 6E 64 2C 20 74 68 65 .... found, the
0081E0: 6E 20 69 6E 74 65 72 70 72 65 74 20 00 63 6F 6D n interpret .com
0081F0: 6D 61 6E 64 73 00 C7 BF C0 45 61 63 68 20 01 10 mands....Each ..
008200: 42 44 4F 53 00 EE 2C 42 44 4F 53 48 4C 2C 00 6F BDOS..,BDOSHL,.o
008210: 70 6E 66 63 00 ED 2C 00 63 6C 73 66 63 00 EC 2C pnfc..,.clsfc..,
008220: 00 64 65 6C 66 63 00 EB 2C 00 6D 61 6B 66 63 00 .delfc..,.makfc.
008230: EA 2C 00 72 73 72 66 63 00 E9 2C 00 77 73 72 66 .,.rsrfc..,.wsrf
008240: 63 00 E8 2C 00 73 64 61 66 63 00 E7 2C 00 72 65 c..,.sdafc..,.re
008250: 6E 66 63 00 E6 2C C2 65 78 74 65 6E 3B BF 93 20 nfc..,.exten;..
008260: AE 20 A3 20 B3 2C A9 3B BF 96 B4 00 70 46 49 4C . £ .,.;....pFIL
008270: 45 00 E5 3D A8 20 86 20 00 46 49 4C 45 00 E4 3B E..=. . .FILE..;
008280: C0 00 44 65 76 69 63 65 73 00 E3 3D 8D 20 84 20 ..Devices..=. .
008290: 44 65 76 69 63 65 74 79 70 65 3B BF 8E B4 69 2C Devicetype;...i,
0082A0: 6A 3A AA 3B C0 00 42 79 74 65 73 54 72 61 6E 73 j:.;..BytesTrans
0082B0: 66 65 72 72 65 64 00 E2 3A AD 3B C0 72 65 73 70 ferred..:.;.resp
0082C0: 6F 6E 73 65 20 3A 20 AA 3B BF AF 20 00 43 6F 6E onse : .;.. .Con
0082D0: 76 65 72 74 46 69 6C 65 4E 61 6D 65 00 E1 28 8E vertFileName..(.
0082E0: 20 66 3A 66 63 62 3B 00 66 6E 00 E0 3A 9B 20 84 f:fcb;.fn..:. .
0082F0: 20 99 29 3B BF 9C C0 69 3A 3D 30 3B C0 6A 3A 3D .);...i:=0;.j:=
008300: 30 3B C0 97 20 66 20 81 C1 00 66 63 62 64 6E 00 0;.. f ...fcbdn.
008310: DF 3A 3D 30 3B C1 00 66 63 62 66 6E 00 DE 3A 3D .:=0;..fcbfn..:=
008320: 27 BE BA 27 3B C1 00 66 63 62 66 74 00 DD 3A 3D '..';..fcbft..:=
008330: 27 BB 27 3B BF C0 28 2A 45 78 74 72 61 63 74 20 '.';..(*Extract
008340: 62 61 73 65 6E 61 6D 65 20 87 20 70 6F 73 73 69 basename . possi
008350: 62 6C 79 20 64 65 76 69 63 65 2F 00 64 69 73 63 bly device/.disc
008360: 00 DC 20 69 6E 64 69 63 61 74 6F 72 2A 29 BF 20 .. indicator*).
008370: C1 A0 BE 20 28 69 3C 3D 98 28 E0 29 29 20 C2 87 ... (i<=.(.)) ..
008380: 20 28 E0 5B 69 5D 3C 3E 27 20 27 29 20 C2 87 20 (.[i]<>' ') ..
008390: 28 E0 5B 69 5D 3C 3E 00 43 48 52 00 DB 28 30 29 (.[i]<>.CHR..(0)
0083A0: 29 20 C2 87 20 28 E0 5B 69 5D 3C 3E 27 2E 27 29 ) .. (.[i]<>'.')
0083B0: 20 81 C2 82 20 28 E0 5B 69 5D 3D 27 3A 27 29 20 ... (.[i]=':')
0083C0: 87 20 28 69 3D 31 29 20 95 C3 DF 3A 3D 00 4F 52 . (i=1) ...:=.OR
0083D0: 44 00 DA 28 DE 5B 31 5D 29 2D 28 DA 28 27 41 27 D..(.[1])-(.('A'
0083E0: 29 2D 31 29 3B C3 DE 5B 31 5D 3A 3D 27 20 27 3B )-1);..[1]:=' ';
0083F0: C3 6A 3A 3D 30 C2 9E 20 E0 5B 69 5D 3D 27 2A 27 .j:=0.. .[i]='*'
008400: 20 01 16 20 6F 6E 65 20 DF 20 28 70 6F 73 73 69 .. one . (possi
008410: 62 6C 79 20 F6 20 FD 20 00 70 61 72 61 6D 65 74 bly . . .paramet
008420: 65 72 00 C6 C1 C9 29 BF C0 01 07 20 C7 20 CD 3A er....).... . .:
008430: BF C0 41 78 20 B4 C8 20 E0 20 DF 20 01 12 20 78 ..Ax .. . . .. x
008440: C0 44 78 B4 00 64 69 73 61 62 6C 65 00 C5 20 78 .Dx..disable.. x
008450: 20 01 05 20 28 78 3D 4C 20 E1 20 01 03 20 01 02 .. (x=L . .. ..
008460: 20 50 20 E1 20 70 72 6F 63 65 64 75 72 65 73 C3 P . procedures.
008470: BB 61 6E 79 74 68 69 6E 67 20 FA 20 01 16 20 62 .anything . .. b
008480: 6F 74 68 29 C0 45 78 B4 C5 20 78 20 01 05 C0 58 oth).Ex.. x ...X
008490: B4 43 6F 6E 74 69 6E 75 65 20 64 65 62 75 67 67 .Continue debugg
0084A0: 69 6E 67 C0 2A 29 BF AF 20 00 43 68 65 63 6B 46 ing.*).. .CheckF
0084B0: 6F 72 43 6F 6E 74 72 6F 6C 00 C4 3B BF 8E B4 00 orControl..;....
0084C0: 63 68 00 BD 3A 99 3B BF 9C BF BC 00 44 45 43 00 ch..:.;.....DEC.
0084D0: B9 28 D8 29 3B BF BC 82 20 28 D8 3D 30 29 20 85 .(.);... (.=0) .
0084E0: 20 DA 20 85 20 D9 20 95 C0 D8 3A 3D E2 3B C0 EC . . . ...:=.;..
0084F0: 28 BD 29 3B B4 BF BE BA 82 20 BD 3D D0 20 95 C1 (.);..... .=. ..
008500: EB 3B C1 B3 28 27 20 CA 20 43 6F 6D 6D 61 6E 64 .;..(' . Command
008510: 3A 27 29 3B C1 94 C2 EA 28 BD 29 3B C2 90 20 00 :');....(.);.. .
008520: 43 41 50 00 B8 28 BD 29 20 84 C2 27 41 27 3A B3 CAP..(.) ..'A':.
008530: 28 27 20 43 68 61 6E 67 65 20 E0 20 01 12 3A 27 (' Change . ..:'
008540: 29 3B C2 BC A6 C3 EC 28 BD 29 3B C3 9F 20 BD 3C );.....(.);.. .<
008550: 3E 30 78 3B C2 BC D0 3A 3D BD 3B C2 BC A9 3B C2 >0x;...:=.;...;.
008560: BC EB 7C C2 27 44 27 3A C2 BC B3 28 27 69 73 61 ..|.'D':...('isa
008570: 62 6C 65 20 3A 27 29 3B EA 28 BD 29 3B C2 BC 90 ble :');.(.);...
008580: 20 B8 28 BD 29 20 84 C3 27 4C 27 3A DA 3A 3D A1 .(.) ..'L':.:=.
008590: 3B C3 BC B3 28 27 00 69 6E 65 00 B7 20 01 05 27 ;...('.ine.. ..'
0085A0: 29 7C C3 27 50 27 3A D9 3A 3D A1 3B C3 BC B3 28 )|.'P':.:=.;...(
0085B0: 27 00 72 6F 63 00 B6 20 01 05 27 29 7C C3 91 20 '.roc.. ..')|..
0085C0: C3 B4 D9 3A 3D A1 3B C3 B4 DA 3A 3D A1 3B C3 B4 ...:=.;...:=.;..
0085D0: B3 28 27 00 42 6F 74 68 00 B2 27 29 C3 B4 89 3B .('.Both..')...;
0085E0: 28 2A 90 2A 29 C2 BC A9 3B C2 BC 7C C2 27 45 27 (*.*)...;..|.'E'
0085F0: 3A C2 BC B3 28 27 6E 61 62 6C 65 20 3A 27 29 3B :...('nable :');
008600: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
008610: 07 00 00 00 02 09 4E E5 07 00 41 02 00 00 00 02 ......N...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: 20 95 C3 8A 20 6A 3A 3D 6A 2B 31 20 86 20 98 28 ... j:=j+1 . .(
008710: DE 29 20 81 C3 B4 DE 5B 6A 5D 3A 3D 27 3F 27 3B .) ....[j]:='?';
008720: C3 B4 89 3B C2 9E 20 6A 3C 98 28 DE 29 20 95 20 ...;.. j<.(.) .
008730: C3 00 49 4E 43 00 D9 28 6A 29 3B C3 DE 5B 6A 5D ..INC..(j);..[j]
008740: 3A 3D 00 43 41 50 00 D8 28 E0 5B 69 5D 29 3B C3 :=.CAP..(.[i]);.
008750: 89 3B 20 28 2A E0 5B 69 5D 3D 27 3A 27 20 2A 29 .; (*.[i]=':' *)
008760: C2 69 3A 3D 69 2B 31 3B C2 89 3B 20 28 2A A0 2A .i:=i+1;..; (*.*
008770: 29 C0 C0 28 2A B4 6C 6F 6F 6B 20 F0 20 65 78 74 )..(*.look . ext
008780: 65 6E 73 69 6F 6E 2A 29 BF C1 82 20 E0 5B 69 5D ension*)... .[i]
008790: 3D 27 2E 27 20 95 C1 BC 69 3A 3D 69 2B 31 3B C1 ='.' ...i:=i+1;.
0087A0: BC 6A 3A 3D 30 3B C1 BC A0 BB 28 69 3C 3D 98 28 .j:=0;....(i<=.(
0087B0: E0 29 29 20 C2 87 20 28 E0 5B 69 5D 3C 3E 27 20 .)) .. (.[i]<>'
0087C0: 27 29 20 C2 87 20 28 E0 5B 69 5D 3C 3E DB 28 30 ') .. (.[i]<>.(0
0087D0: 29 29 20 81 C2 82 20 E0 5B 69 5D 3D 27 2A 27 20 )) ... .[i]='*'
0087E0: 95 C3 8A 20 6A 3A 3D 6A 2B 31 20 86 20 98 28 DD ... j:=j+1 . .(.
0087F0: 29 20 81 20 DD 5B 6A 5D 3A 3D 27 3F 27 20 89 3B ) . .[j]:='?' .;
008800: C2 9E 20 6A 3C 98 28 DD 29 20 95 C3 D9 28 6A 29 .. j<.(.) ...(j)
008810: 3B 20 C3 DD 5B 6A 5D 3A 3D D8 28 E0 5B 69 5D 29 ; ..[j]:=.(.[i])
008820: 3B C3 89 3B C2 69 3A 3D 69 2B 31 3B C2 89 3B 28 ;..;.i:=i+1;..;(
008830: 2A A0 2A 29 C1 BC 89 3B 28 2A E0 5B 69 5D 3D 27 *.*)...;(*.[i]='
008840: 2E 27 2A 29 C1 00 66 63 62 65 78 00 D7 3A 3D 30 .'*)..fcbex..:=0
008850: 3B C1 00 66 63 62 63 72 00 D6 3A 3D 30 3B C1 63 ;..fcbcr..:=0;.c
008860: 70 6D 72 65 73 3A 3D 30 3B C1 66 63 62 72 63 3A pmres:=0;.fcbrc:
008870: 3D 30 3B C1 00 66 63 62 72 6E 00 D5 2E 6C 6F 77 =0;..fcbrn...low
008880: 6F 72 64 65 72 3A 3D 30 3B C1 D5 2E 68 69 67 68 order:=0;...high
008890: 6F 72 64 65 72 3A 3D 30 3B C1 89 3B 20 28 2A 97 order:=0;..; (*.
0088A0: 2A 29 C0 89 20 E1 3B BF AF 20 00 63 6F 6E 76 65 *).. .;.. .conve
0088B0: 72 74 6E 61 6D 65 00 D4 28 8E 20 00 66 6C 00 D3 rtname..(. .fl..
0088C0: 3A E4 3B 8E 20 E0 3A 9B 20 84 20 99 29 3B BF 9C :.;. .:. . .);..
0088D0: C0 97 20 D3 20 81 C1 E1 28 66 2C E0 29 3B C1 D3 .. . ...(f,.);..
0088E0: 2E 00 65 6F 66 00 D2 3A 3D A1 3B C1 82 BC 66 2E ..eof..:=.;...f.
0088F0: DE 3D 27 43 4F 4E 3A BC 27 20 95 20 00 64 65 76 .='CON:.' . .dev
008900: 3A AA 29 3B BF 9C C0 28 2A C1 A2 20 9F 20 9D 20 :.);...(*.. . .
008910: 90 20 8C C0 2A 29 C0 B0 28 66 2C AC 29 3B C0 8B . ..*)..(f,.);..
008920: 28 66 2C A6 2C A5 2C CC 29 3B C0 89 20 80 3B BF (f,.,.,.);.. .;.
008930: 89 20 F1 2E BF BF 00 00 00 00 00 00 00 00 00 00 . ..............
008940: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008950: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008960: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008970: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008980: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
008990: 20 00 47 65 74 46 69 6C 65 73 00 B2 3B BF 93 20 .GetFiles..;..
0089A0: 43 50 4D 20 A3 20 00 42 44 4F 53 00 B1 2C 42 44 CPM £ .BDOS..,BD
0089B0: 4F 53 48 4C 2C 00 73 66 6F 66 63 00 B0 2C 00 73 OSHL,.sfofc..,.s
0089C0: 6E 6F 66 63 00 AE 2C 00 66 63 62 00 AD 2C 00 73 nofc..,.fcb..,.s
0089D0: 64 61 66 63 00 AB 3B BF 93 20 43 50 4D 42 49 4F dafc..;.. CPMBIO
0089E0: 53 20 A3 20 00 64 69 72 65 63 74 6F 72 79 00 A9 S £ .directory..
0089F0: 3B BF 93 20 53 59 53 54 45 4D 20 A3 20 8F 3B BF ;.. SYSTEM £ .;.
008A00: 93 20 46 69 6C 65 73 20 A3 20 00 43 6F 6E 76 65 . Files £ .Conve
008A10: 72 74 46 69 6C 65 4E 61 6D 65 00 A8 3B BF 28 2A rtFileName..;.(*
008A20: B4 47 65 74 20 61 20 6C 69 73 74 20 6F 66 20 00 .Get a list of .
008A30: 66 69 6C 65 00 A7 20 00 6E 61 6D 65 73 00 A6 20 file.. .names..
008A40: 6D 65 65 74 69 6E 67 20 61 20 77 69 6C 64 63 61 meeting a wildca
008A50: 72 64 20 64 65 73 63 72 69 70 74 69 6F 6E 2A 29 rd description*)
008A60: BF 8E B4 69 2C 6A 2C 6B 3A AA 3B C0 66 3A AD 3B ...i,j,k:.;.f:.;
008A70: C0 00 6E 61 6D 65 00 A5 3A 00 46 69 6C 65 4E 61 ..name..:.FileNa
008A80: 6D 65 00 A2 3B C0 00 44 65 76 43 68 61 72 00 9F me..;..DevChar..
008A90: 3A 99 3B C0 00 57 69 6C 64 43 61 72 64 00 9E 3A :.;..WildCard..:
008AA0: AC 3B BF AF 20 00 47 65 74 4E 61 6D 65 73 00 9D .;.. .GetNames..
008AB0: 28 00 50 61 74 74 65 72 6E 00 96 3A 9B 20 84 20 (.Pattern..:. .
008AC0: 99 3B 8E 20 A6 3A 9B 20 84 20 A2 3B C1 BA 8E 20 .;. .:. . .;...
008AD0: 00 43 6F 75 6E 74 00 94 3A AA 29 3B BF 8E B4 00 .Count..:.);....
008AE0: 64 6D 61 00 92 3A 9B 20 5B 30 2E 2E 33 5D 20 84 dma..:. [0..3] .
008AF0: 20 A9 3B BF BF AF 20 00 53 65 61 72 63 68 46 6F .;... .SearchFo
008B00: 74 79 70 65 00 D1 3A 3D 63 6F 6E C1 9E 20 66 2E type..:=con.. f.
008B10: DE 3D 27 52 44 52 3A BC 27 20 95 20 D1 3A 3D 00 .='RDR:.' . .:=.
008B20: 72 64 72 00 D0 C1 9E 20 66 2E DE 3D 27 50 55 4E rdr.... f..='PUN
008B30: 3A BC 27 20 95 20 D1 3A 3D 00 70 75 6E 00 CF C1 :.' . .:=.pun...
008B40: 9E 20 66 2E DE 3D 27 4C 53 54 3A BC 27 20 95 20 . f..='LST:.' .
008B50: D1 3A 3D 00 6C 73 74 00 CE C1 91 20 D1 3A 3D DC .:=.lst.... .:=.
008B60: 20 89 3B C1 89 3B 28 2A 97 20 66 2E 66 2A 29 C0 .;..;(*. f.f*).
008B70: 89 20 D4 3B C3 B5 BF AF 20 00 4C 6F 6F 6B 75 70 . .;.... .Lookup
008B80: 00 CD 28 8E 20 66 3A E4 3B E0 3A 9B 20 84 20 99 ..(. f:.;.:. . .
008B90: 3B 8E 20 00 72 65 70 6C 79 00 CC 3A AA 29 3B C2 ;. .reply..:.);.
008BA0: BF 9C C0 D4 28 66 2C E0 29 3B C0 CC 3A 3D 30 3B ....(f,.);..:=0;
008BB0: C0 82 20 66 2E D1 3D DC 20 95 C1 69 3A 3D EE 28 .. f..=. ..i:=.(
008BC0: ED 2C 8F 28 66 2E 66 29 29 3B C1 82 20 69 3D 32 .,.(f.f));.. i=2
008BD0: 35 35 20 95 20 C2 CC 3A 3D 2D 32 C2 89 3B C0 9E 55 . ..:=-2..;..
008BE0: 20 66 2E D1 20 83 20 E3 7B CE 2C CF 7D 20 95 20 f.. . .{.,.} .
008BF0: C1 CC 3A 3D 2D 31 C1 89 3B C0 89 20 CD 3B BF AF ..:=-1..;.. .;..
008C00: 20 00 43 72 65 61 74 65 00 CB 28 8E 20 66 3A E4 .Create..(. f:.
008C10: 3B E0 3A 9B 20 84 20 99 3B 8E 20 CC 3A AA 29 3B ;.:. . .;. .:.);
008C20: BF 9C C0 D4 28 66 2C E0 29 3B C0 CC 3A 3D 30 3B ....(f,.);..:=0;
008C30: C0 82 20 66 2E D1 3D DC 20 95 C1 69 3A 3D EE 28 .. f..=. ..i:=.(
008C40: EB 2C 8F 28 66 2E 66 29 29 3B C1 69 3A 3D EE 28 .,.(f.f));.i:=.(
008C50: EA 2C 8F 28 66 2E 66 29 29 3B C1 82 20 69 3D 32 .,.(f.f));.. i=2
008C60: 35 35 20 95 20 C2 CC 3A 3D 2D 32 C2 89 3B C0 9E 55 . ..:=-2..;..
008C70: 20 66 2E D1 3D D0 20 95 20 C1 CC 3A 3D 2D 31 C1 f..=. . ..:=-1.
008C80: 89 3B C0 89 20 CB 3B BF AF 20 00 44 65 6C 65 74 .;.. .;.. .Delet
008C90: 65 00 CA 28 8E 20 66 3A E4 3B E0 3A 9B 20 84 20 e..(. f:.;.:. .
008CA0: 99 3B 8E 20 CC 3A AA 29 3B BF 9C C0 D4 28 66 2C .;. .:.);....(f,
008CB0: E0 29 3B C0 69 3A 3D EE 28 EB 2C 8F 28 66 2E 66 .);.i:=.(.,.(f.f
008CC0: 29 29 3B C0 CC 3A 3D 2D 31 3B C0 82 20 66 2E D1 ));..:=-1;.. f..
008CD0: 3D DC 20 95 C1 82 20 69 3D 32 35 35 20 95 20 C2 =. ... i=255 . .
008CE0: CC 3A 3D 2D 32 C1 91 20 C2 CC 3A 3D 30 20 C2 89 .:=-2.. ..:=0 ..
008CF0: 3B C1 89 3B C0 89 20 CA 3B BF AF 20 00 43 6C 6F ;..;.. .;.. .Clo
008D00: 72 46 69 6C 65 4E 61 6D 65 73 00 90 3B BF 9C C0 rFileNames..;...
008D10: A8 28 66 2C A5 29 3B BF C0 82 20 66 2E 00 66 63 .(f,.);... f..fc
008D20: 62 64 6E 00 8D 3D 30 20 95 20 9F 3A 3D 27 20 27 bdn..=0 . .:=' '
008D30: C0 91 20 9F 3A 3D 43 48 52 28 00 4F 52 44 00 8C .. .:=CHR(.ORD..
008D40: 28 66 2E 8D 29 2B 28 8C 28 27 41 27 29 2D 31 29 (f..)+(.('A')-1)
008D50: 29 20 89 3B BF BF C0 28 2A B4 4E 6F 77 20 73 63 ) .;...(*.Now sc
008D60: 61 6E 20 66 6F 72 20 6D 61 74 63 68 69 6E 67 20 an for matching
008D70: A6 2A 29 BF C0 69 3A 3D B1 28 AB 2C 8F 28 92 29 .*)..i:=.(.,.(.)
008D80: 29 3B B4 28 2A 73 65 74 20 92 20 62 75 66 66 65 );.(*set . buffe
008D90: 72 20 61 64 64 72 65 73 73 2A 29 B4 C0 69 3A 3D r address*)..i:=
008DA0: B1 28 B0 2C 8F 28 66 29 29 3B B5 28 2A 73 74 61 .(.,.(f));.(*sta
008DB0: 72 74 20 73 65 61 72 63 68 2A 29 C0 94 3A 3D 30 rt search*)..:=0
008DC0: 3B C0 A0 20 69 3C 3E 32 35 35 20 81 C1 6A 3A 3D ;.. i<>255 ..j:=
008DD0: 30 3B C1 82 20 9F 3C 3E 27 20 27 20 95 C2 A5 5B 0;.. .<>' ' ...[
008DE0: 30 5D 3A 3D 9F 3B C2 A5 5B 31 5D 3A 3D 27 3A 27 0]:=.;..[1]:=':'
008DF0: 3B C2 6A 3A 3D 32 3B C2 89 3B C1 97 20 92 5B 69 ;.j:=2;..;.. .[i
008E00: 5D 20 81 C2 6B 3A 3D 31 3B C2 A0 20 28 6B 3C 3D ] ..k:=1;.. (k<=
008E10: 98 28 00 64 69 72 66 6E 00 8B 29 29 20 87 20 28 .(.dirfn..)) . (
008E20: 8B 5B 6B 5D 3C 3E 27 20 27 29 20 81 C3 A5 5B 6A .[k]<>' ') ...[j
008E30: 5D 3A 3D 8B 5B 6B 5D 3B C3 00 49 4E 43 00 88 28 ]:=.[k];..INC..(
008E40: 6A 29 3B C3 88 28 6B 29 3B C3 89 3B C2 A5 5B 6A j);..(k);..;..[j
008E50: 5D 3A 3D 27 2E 27 3B C2 6B 3A 3D 31 3B 88 28 6A ]:='.';.k:=1;.(j
008E60: 29 3B C2 A0 20 28 6B 3C 3D 98 28 00 64 69 72 66 );.. (k<=.(.dirf
008E70: 74 00 83 29 29 20 87 20 28 83 5B 6B 5D 3C 3E 27 t..)) . (.[k]<>'
008E80: 20 27 29 20 81 C3 A5 5B 6A 5D 3A 3D 83 5B 6B 5D ') ...[j]:=.[k]
008E90: 3B C3 88 28 6A 29 3B C3 88 28 6B 29 3B C3 89 3B ;..(j);..(k);..;
008EA0: C2 89 3B 20 28 2A 97 20 44 4D 41 2A 29 C1 8A 20 ..; (*. DMA*)..
008EB0: 6A 3A 3D 6A 20 86 20 98 28 A5 29 20 81 20 A5 5B j:=j . .(.) . .[
008EC0: 6A 5D 3A 3D 27 20 27 20 89 3B C1 A6 5B 94 5D 3A j]:=' ' .;..[.]:
008ED0: 3D A5 3B C1 88 28 94 29 3B C1 69 3A 3D B1 28 AE =.;..(.);.i:=.(.
008EE0: 2C 8F 28 66 29 29 3B B4 28 2A 67 6F 20 00 74 6F ,.(f));.(*go .to
008EF0: 00 80 20 6E 65 78 74 2A 29 C1 89 3B 20 28 2A A0 .. next*)..; (*.
008F00: 73 65 00 C9 28 8E 20 66 3A E4 29 3B BF 9C C0 69 se..(. f:.);...i
008F10: 3A 3D EE 28 EC 2C 8F 28 66 2E 66 29 29 3B C0 89 :=.(.,.(f.f));..
008F20: 20 C9 3B BF AF 20 00 52 65 6C 65 61 73 65 00 C8 .;.. .Release..
008F30: 28 8E 20 66 3A E4 29 3B BF 9C B4 C0 C9 28 66 29 (. f:.);.....(f)
008F40: 3B C0 69 3A 3D EE 28 EB 2C 8F 28 66 2E 66 29 29 ;.i:=.(.,.(f.f))
008F50: 3B C0 89 20 C8 3B BF AF 20 00 52 65 6E 61 6D 65 ;.. .;.. .Rename
008F60: 00 C7 28 8E 20 66 3A E4 3B 00 6E 65 77 00 C6 2C ..(. f:.;.new..,
008F70: 00 6F 6C 64 00 C5 3A 9B 20 84 20 99 3B 8E 20 CC .old..:. . .;. .
008F80: 3A AA 29 3B BF 8E B4 70 3A E5 3B BF 9C C0 D4 28 :.);...p:.;....(
008F90: 66 2C C6 29 3B C0 69 3A 3D EE 28 EB 2C 8F 28 66 f,.);.i:=.(.,.(f
008FA0: 2E 66 29 29 3B C0 70 3A 3D E5 28 AD 28 8F 28 66 .f));.p:=.(.(.(f
008FB0: 29 29 2B 31 36 29 3B BF C0 28 2A B4 4E 6F 74 65 ))+16);..(*.Note
008FC0: C1 2A 2A 2A 2A BF C1 4F 76 65 72 77 72 69 74 69 .****..Overwriti
008FD0: 6E 67 20 46 43 42 20 61 73 20 72 65 71 75 69 72 ng FCB as requir
008FE0: 65 64 20 62 79 20 00 72 65 6E 61 6D 65 00 C4 20 ed by .rename..
008FF0: 66 75 6E 63 74 69 6F 6E 2A 29 BF C0 70 5E 2E 66 function*)..p^.f
009000: 2E DE 3A 3D 66 2E 66 2E DE 3B C0 70 5E 2E 66 2E ..:=f.f..;.p^.f.
009010: DD 3A 3D 66 2E 66 2E DD 3B C0 D4 28 66 2C C5 29 .:=f.f..;..(f,.)
009020: 3B C0 69 3A 3D EE 28 E6 2C 8F 28 66 2E 66 29 29 ;.i:=.(.,.(f.f))
009030: 3B C0 82 20 69 3D 32 35 35 20 95 20 CC 3A 3D 2D ;.. i=255 . .:=-
009040: 32 C0 91 20 CC 3A 3D 30 20 89 3B C0 89 20 C7 3B 2.. .:=0 .;.. .;
009050: BF AF 20 00 4D 61 6B 65 42 41 4B 00 BD 28 8E 20 .. .MakeBAK..(.
009060: 66 3A E4 3B 8E 20 CC 3A AA 29 3B BF 8E B4 70 3A f:.;. .:.);...p:
009070: E5 3B BF 9C C0 70 3A 3D E5 28 AD 28 8F 28 66 29 .;...p:=.(.(.(f)
009080: 29 2B 31 36 29 3B C0 70 5E 2E 66 2E DE 3A 3D 66 )+16);.p^.f..:=f
009090: 2E 66 2E DE 3B C0 70 5E 2E 66 2E DD 3A 3D 27 00 .f..;.p^.f..:='.
0090A0: 42 41 4B 00 B9 27 3B C0 70 5E 2E 66 2E DF 3A 3D BAK..';.p^.f..:=
0090B0: 66 2E 66 2E DF 3B C0 69 3A 3D EE 28 EB 2C 8F 28 f.f..;.i:=.(.,.(
0090C0: 70 5E 2E 66 29 29 3B C0 69 3A 3D EE 28 E6 2C 8F p^.f));.i:=.(.,.
0090D0: 28 66 2E 66 29 29 3B C0 66 2E 66 2E D7 3A 3D 30 (f.f));.f.f..:=0
0090E0: 3B C0 66 2E 66 2E D6 3A 3D 30 3B C0 69 3A 3D EE ;.f.f..:=0;.i:=.
0090F0: 28 EA 2C 8F 28 66 2E 66 29 29 3B C0 82 20 69 3D (.,.(f.f));.. i=
009100: 20 69 3C 3E 32 35 35 2A 29 C0 C0 69 3A 3D B1 28 i<>255*)..i:=.(
009110: AB 2C 38 30 48 29 3B B5 28 2A 72 65 73 65 74 20 .,80H);.(*reset
009120: 80 20 64 65 66 61 75 6C 74 2A 29 C0 C0 89 20 90 . default*)... .
009130: 3B BF 9C BF C0 28 2A 20 43 6F 6E 76 65 72 74 20 ;....(* Convert
009140: 96 20 80 20 61 20 A7 20 A5 2A 29 C0 C0 6A 3A 3D . . a . .*)..j:=
009150: 98 28 96 29 3B C0 9E 3A 3D A1 3B C0 82 20 6A 3E .(.);..:=.;.. j>
009160: 98 28 A5 29 20 95 20 6A 3A 3D 98 28 A5 29 20 89 .(.) . j:=.(.) .
009170: 3B C0 8A 20 69 3A 3D 30 20 86 20 6A 20 81 20 C1 ;.. i:=0 . j . .
009180: A5 5B 69 5D 3A 3D 96 5B 69 5D 3B C1 82 20 28 A5 .[i]:=.[i];.. (.
009190: 5B 69 5D 3D 27 2A 27 29 20 85 20 28 A5 5B 69 5D [i]='*') . (.[i]
0091A0: 3D 27 3F 27 29 20 95 20 9E 3A 3D 9A 20 89 3B C1 ='?') . .:=. .;.
0091B0: 89 3B C0 8A 20 69 3A 3D 69 2B 31 20 86 20 98 28 .;.. i:=i+1 . .(
0091C0: A5 29 20 81 20 A5 5B 69 5D 3A 3D 27 20 27 20 89 .) . .[i]:=' ' .
0091D0: 3B BF C0 82 20 9E 20 95 20 90 C0 91 C1 94 3A 3D ;... . . .....:=
0091E0: 31 3B C1 A6 5B 30 5D 3A 3D A5 C1 89 3B C0 89 20 1;..[0]:=...;..
0091F0: 9D 3B BF 89 20 B2 2E BF 00 00 1A 1A 1A 1A 1A 1A .;.. ...........
009200: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
009210: 20 00 49 6E 4F 75 74 00 01 0C 3B BF BF 28 2A B5 .InOut...;..(*.
009220: 01 0C 20 00 61 73 00 01 0B 20 64 65 66 69 6E 65 .. .as... define
009230: 64 20 00 62 79 00 01 0A 20 4E 20 57 69 72 74 68 d .by... N Wirth
009240: 20 00 69 6E 00 01 09 20 27 50 72 6F 67 72 61 6D .in... 'Program
009250: 6D 69 6E 67 20 01 09 20 00 4D 6F 64 75 6C 61 00 ming .. .Modula.
009260: 01 08 2D 32 27 BF C1 B1 20 28 43 29 20 44 61 76 ..-2'... (C) Dav
009270: 65 20 4D 6F 6F 72 65 20 46 54 4C 20 01 08 2D 32 e Moore FTL ..-2
009280: 20 31 39 38 36 BF C1 4D 6F 64 69 66 69 63 61 74 1986..Modificat
009290: 69 6F 6E 73 C1 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ions.***********
0092A0: 2A 2A BF C1 33 20 4A 75 6E 65 20 31 39 38 36 B4 **..3 June 1986.
0092B0: 52 65 6D 6F 76 65 64 20 61 73 73 75 6D 70 74 69 Removed assumpti
0092C0: 6F 6E 20 74 68 61 74 20 6F 70 65 6E 20 61 72 72 on that open arr
0092D0: 61 79 20 00 70 61 72 61 6D 65 74 65 72 73 00 01 ay .parameters..
0092E0: 07 C3 63 6F 75 6C 64 20 00 6E 6F 74 00 01 06 20 ..could .not...
0092F0: 62 65 20 00 75 73 65 64 00 01 05 20 01 0B 20 61 be .used... .. a
009300: 32 35 35 20 95 20 C1 CC 3A 3D 2D 32 3B BF C1 28 255 . ..:=-2;..(
009310: 2A C4 20 00 74 68 65 00 B8 20 B9 20 00 66 69 6C *. .the.. . .fil
009320: 65 00 B7 20 62 61 63 6B 20 61 67 61 69 6E C1 20 e.. back again.
009330: 54 68 69 73 20 63 6F 75 6C 64 20 73 74 69 6C 6C This could still
009340: 20 62 65 20 69 6D 70 72 6F 76 65 64 20 75 70 6F be improved upo
009350: 6E 20 73 69 6E 63 65 20 77 69 74 68 20 00 74 68 n since with .th
009360: 69 73 00 B6 C1 20 00 63 6F 64 65 00 B2 2C 20 B8 is... .code.., .
009370: 20 C5 20 B9 20 B7 20 67 6F 65 73 20 61 77 61 79 . . . goes away
009380: C1 20 4F 66 20 63 6F 75 72 73 65 2C 20 6E 6F 77 . Of course, now
009390: 20 74 68 61 74 20 00 79 6F 75 00 B1 20 68 61 76 that .you.. hav
0093A0: 65 20 72 65 61 64 20 B6 20 B2 2C C1 BA B1 20 77 e read . .,... w
0093B0: 69 6C 6C 20 6B 6E 6F 77 20 61 20 73 6E 65 61 6B ill know a sneak
0093C0: 79 20 77 61 79 20 6F 66 20 67 65 74 74 69 6E 67 y way of getting
0093D0: 20 61 72 6F 75 6E 64 20 B8 20 C1 20 64 69 72 65 around . . dire
0093E0: 63 74 6F 72 79 20 66 75 6C 6C 20 6D 65 73 73 61 ctory full messa
0093F0: 67 65 20 69 6E 20 B8 20 65 64 69 74 6F 72 B4 C0 ge in . editor..
009400: 2A 29 BF C1 70 5E 2E 66 2E DD 3A 3D 66 2E 66 2E *)..p^.f..:=f.f.
009410: DD 3B C1 66 2E 66 2E DD 3A 3D 27 B9 27 3B C1 69 .;.f.f..:='.';.i
009420: 3A 3D EE 28 E6 2C 8F 28 66 2E 66 29 29 3B BF C0 :=.(.,.(f.f));..
009430: 91 20 CC 3A 3D 30 20 89 3B C0 89 20 BD 3B C0 BF . .:=0 .;.. .;..
009440: AF 20 00 53 65 74 42 6C 6F 63 6B 00 B0 28 8E 20 . .SetBlock..(.
009450: 66 3A E4 3B 00 62 6C 6B 6E 72 00 AC 3A AD 29 3B f:.;.blknr..:.);
009460: B4 BF 8E B4 69 3A AD 3B BF 9C C0 69 3A 3D AC 20 ....i:.;...i:=.
009470: 88 20 31 32 38 3B C0 82 20 66 2E 66 2E D7 3C 3E . 128;.. f.f..<>
009480: EF 28 69 29 20 95 C1 6A 3A 3D EE 28 EC 2C 8F 28 .(i) ..j:=.(.,.(
009490: 66 2E 66 29 29 3B C1 66 2E 66 2E D7 3A 3D EF 28 f.f));.f.f..:=.(
0094A0: 69 29 3B C1 6A 3A 3D EE 28 ED 2C 8F 28 66 2E 66 i);.j:=.(.,.(f.f
0094B0: 29 29 3B C1 82 20 6A 3D 32 35 35 20 95 20 C2 6A ));.. j=255 . .j
0094C0: 3A 3D EE 28 EA 2C 8F 28 66 2E 66 29 29 3B C2 89 :=.(.,.(f.f));..
0094D0: 3B C1 89 3B C0 66 2E 66 2E D6 3A 3D AC 2D 31 32 ;..;.f.f..:=.-12
0094E0: 38 2A 69 3B C0 89 20 B0 3B BF BF AF 20 00 53 65 8*i;.. .;... .Se
0094F0: 71 52 65 61 64 42 6C 6F 63 6B 00 A7 28 8E 20 66 qReadBlock..(. f
009500: 63 74 75 61 6C 20 01 07 20 01 0A C3 76 61 6C 75 ctual .. ...valu
009510: 65 2E 20 28 54 68 69 73 20 77 61 73 20 61 20 72 e. (This was a r
009520: 65 73 74 72 69 63 74 69 6F 6E 20 01 09 20 00 74 estriction .. .t
009530: 68 65 00 01 04 20 65 61 72 6C 79 C3 76 65 72 73 he... early.vers
009540: 69 6F 6E 73 20 28 70 72 65 2D 72 65 6C 65 61 73 ions (pre-releas
009550: 65 29 20 00 6F 66 00 01 03 20 01 04 20 63 6F 6D e) .of... .. com
009560: 70 69 6C 65 72 29 BF C3 49 6D 70 72 6F 76 65 64 piler)..Improved
009570: 20 68 61 6E 64 6C 69 6E 67 20 01 03 20 01 04 20 handling .. ..
009580: 00 76 61 72 69 61 62 6C 65 00 01 02 20 00 44 6F .variable... .Do
009590: 6E 65 00 01 01 20 01 09 C3 00 4F 70 65 6E 49 6E ne... ....OpenIn
0095A0: 70 75 74 00 01 00 20 00 61 6E 64 00 FF 20 4F 70 put... .and.. Op
0095B0: 65 6E 6F 75 74 70 75 74 20 2D 20 65 6E 74 72 79 enoutput - entry
0095C0: 69 6E 67 20 6E 6F 20 C3 00 6E 61 6D 65 00 FE 20 ing no ..name..
0095D0: 77 68 65 6E 20 70 72 6F 6D 70 74 65 64 20 66 6F when prompted fo
0095E0: 72 20 61 20 00 66 69 6C 65 00 FD 20 FE 20 6E 6F r a .file.. . no
0095F0: 77 C3 63 61 75 73 65 73 20 61 20 00 72 65 74 75 w.causes a .retu
009600: 72 6E 00 FC 20 77 69 74 68 20 01 01 3D A1 BF C1 rn.. with ..=...
009610: 31 30 20 4F 63 74 20 38 36 BF C1 00 53 6B 69 70 10 Oct 86...Skip
009620: 42 6C 61 6E 6B 73 00 FB 20 FF 20 00 6E 75 6D 65 Blanks.. . .nume
009630: 72 69 63 00 FA 20 00 69 6E 70 75 74 00 F9 20 00 ric.. .input.. .
009640: 72 6F 75 74 69 6E 65 73 00 F8 20 00 63 68 61 6E routines.. .chan
009650: 67 65 64 00 F7 20 00 74 6F 00 F6 20 75 73 65 C1 ged.. .to.. use.
009660: 00 52 65 61 64 00 F5 20 00 66 72 6F 6D 00 F4 20 .Read.. .from..
009670: 49 6E 6F 75 74 20 00 69 6E 73 74 65 61 64 00 F3 Inout .instead..
009680: 20 01 03 20 00 52 65 61 64 43 68 61 72 00 F2 20 .. .ReadChar..
009690: F4 20 00 53 74 72 65 61 6D 73 00 F1 20 64 69 72 . .Streams.. dir
0096A0: 65 63 74 6C 79 BF C1 00 52 65 61 64 53 74 72 69 ectly...ReadStri
0096B0: 6E 67 00 F0 20 F7 20 F6 20 FC 20 7A 65 72 6F 20 ng.. . . . zero
0096C0: 62 79 74 65 20 74 65 72 6D 69 6E 61 74 65 64 20 byte terminated
0096D0: 73 74 72 69 6E 67 20 C1 F3 20 01 03 20 62 6C 61 string .. .. bla
0096E0: 6E 6B 20 66 69 6C 6C 65 64 20 28 62 75 74 20 00 nk filled (but .
0096F0: 52 65 61 64 4C 69 6E 65 00 EF 20 6C 65 66 74 20 ReadLine.. left
009700: 3A E4 3B 00 62 75 66 66 65 72 00 A6 3A AB 3B 00 :.;.buffer..:.;.
009710: 62 79 74 65 63 6F 75 6E 74 00 A5 3A AD 3B C1 8E bytecount..:.;..
009720: 20 CC 3A AA 29 3B BF 9C C0 28 2A C1 00 53 65 74 .:.);...(*..Set
009730: 00 A2 20 00 62 6C 6F 63 6B 00 9F 20 00 6E 75 6D .. .block.. .num
009740: 62 65 72 00 9D 20 00 69 66 00 90 20 00 6E 65 65 ber.. .if.. .nee
009750: 64 65 64 00 8C C0 2A 29 BF C0 E2 3A 3D 31 32 37 ded...*)...:=127
009760: 3B BF C0 6A 3A 3D 30 3B C0 A0 20 28 E2 3C A5 29 ;..j:=0;.. (.<.)
009770: 20 87 20 28 6A 3D 30 29 20 81 C1 6A 3A 3D EE 28 . (j=0) ..j:=.(
009780: E7 2C A6 29 3B C1 6A 3A 3D EE 28 E9 2C 8F 28 66 .,.);.j:=.(.,.(f
009790: 2E 66 29 29 3B C1 82 20 6A 3D 30 20 95 20 E2 3A .f));.. j=0 . .:
0097A0: 3D E2 2B 31 32 38 20 89 3B C1 A6 3A 3D AB 28 AD =.+128 .;..:=.(.
0097B0: 28 A6 29 2B 31 32 38 29 3B C1 89 3B C0 82 20 6A (.)+128);..;.. j
0097C0: 3C 3E 30 20 95 20 66 2E D2 3A 3D 9A 20 89 3B C0 <>0 . f..:=. .;.
0097D0: CC 3A 3D E2 2D 31 32 37 3B C0 89 20 A7 3B BF AF .:=.-127;.. .;..
0097E0: 20 00 53 65 71 57 72 69 74 65 42 6C 6F 63 6B 00 .SeqWriteBlock.
0097F0: 8B 28 8E 20 66 3A E4 3B A6 3A AB 3B A5 3A AD 3B .(. f:.;.:.;.:.;
009800: C1 8E 20 CC 3A AA 29 3B BF 9C C0 28 2A C1 A2 20 .. .:.);...(*..
009810: 9F 20 9D 20 90 20 8C C0 2A 29 C0 E2 3A 3D 31 32 . . . ..*)..:=12
009820: 37 3B C0 94 C1 82 20 E2 3E 3D A5 20 95 20 92 20 7;.... .>=. . .
009830: 89 3B C1 6A 3A 3D EE 28 E7 2C A6 29 3B C1 6A 3A .;.j:=.(.,.);.j:
009840: 3D EE 28 E8 2C 8F 28 66 2E 66 29 29 3B C1 82 20 =.(.,.(f.f));..
009850: 6A 3C 3E 30 20 95 20 92 20 89 3B C1 E2 3A 3D E2 j<>0 . . .;..:=.
009860: 2B 31 32 38 3B C1 A6 3A 3D AB 28 AD 28 A6 29 2B +128;..:=.(.(.)+
009870: 31 32 38 29 3B C1 89 3B C0 CC 3A 3D E2 2D 31 32 128);..;..:=.-12
009880: 37 3B C0 89 20 8B 3B BF AF 20 00 52 65 61 64 42 7;.. .;.. .ReadB
009890: 6C 6F 63 6B 00 85 28 8E 20 66 3A E4 3B A6 3A AB lock..(. f:.;.:.
0098A0: 3B AC 2C A5 3A AD 3B C1 8E 20 CC 3A AA 29 3B BF ;.,.:.;.. .:.);.
0098B0: 9C C0 28 2A C1 A2 20 9F 20 9D 20 90 20 8C C0 2A ..(*.. . . . ..*
0098C0: 29 BF C0 B0 28 66 2C AC 29 3B C0 A7 28 66 2C A6 )...(f,.);..(f,.
0098D0: 2C A5 2C CC 29 3B C0 89 20 85 3B BF AF 20 00 57 ,.,.);.. .;.. .W
0098E0: 72 69 74 65 42 6C 6F 63 6B 00 80 28 8E 20 66 3A riteBlock..(. f:
0098F0: E4 3B A6 3A AB 3B AC 2C A5 3A AD 3B C1 8E 20 CC .;.:.;.,.:.;.. .
009900: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
009910: 08 00 00 00 02 09 4E E5 08 00 41 02 00 00 00 02 ......N...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: 01 0B 20 69 73 2E BF C1 48 61 6E 64 6C 69 6E 67 .. is...Handling
009A10: 20 01 03 20 01 02 20 27 01 01 27 20 01 0A 20 FA .. .. '..' .. .
009A20: 20 F9 20 F8 C1 69 6D 70 72 6F 76 65 64 BF 2A 29 . ..improved.*)
009A30: BF BF 93 20 46 69 6C 65 73 20 A3 20 00 46 49 4C ... Files £ .FIL
009A40: 45 00 EE 2C 00 43 72 65 61 74 65 00 ED 2C 00 4C E..,.Create..,.L
009A50: 6F 6F 6B 75 70 00 EC 2C 43 6C 6F 73 65 2C 00 46 ookup..,Close,.F
009A60: 69 6C 65 4E 61 6D 65 00 EB 3B BF 93 20 F1 20 A3 ileName..;.. . £
009A70: 20 44 69 72 65 63 74 69 6F 6E 2C F9 2C 00 6F 75 Direction,.,.ou
009A80: 74 70 75 74 00 EA 2C C2 00 43 6F 6E 6E 65 63 74 tput..,..Connect
009A90: 00 E9 2C 00 44 69 73 63 6F 6E 6E 65 63 74 00 E8 ..,.Disconnect..
009AA0: 2C F2 2C 00 42 75 66 66 65 72 41 68 65 61 64 00 ,.,.BufferAhead.
009AB0: E7 2C 00 57 72 69 74 65 43 68 61 72 00 E6 2C 00 .,.WriteChar..,.
009AC0: 45 4F 53 00 E5 3B BF 93 20 43 6F 6E 76 65 72 73 EOS..;.. Convers
009AD0: 69 6F 6E 73 20 A3 20 00 43 61 72 64 54 6F 53 74 ions £ .CardToSt
009AE0: 72 69 6E 67 00 E4 2C 00 49 6E 74 54 6F 53 74 72 ring..,.IntToStr
009AF0: 69 6E 67 00 E3 3B BF A3 20 AE 3B BF 9D B4 00 4D ing..;.£ .;....M
009B00: 61 78 44 65 70 74 68 00 E2 3D 33 3B BF 96 B4 00 axDepth..=3;....
009B10: 53 74 72 65 61 6D 41 72 72 61 79 00 E1 3D 9B 5B StreamArray..=.[
009B20: 31 2E 2E E2 5D 20 84 20 00 53 54 52 45 41 4D 00 1...] . .STREAM.
009B30: E0 3B BF 8E B4 00 49 6E 54 6F 70 00 DF 3A AA 3B .;....InTop..:.;
009B40: C0 00 49 6E 53 74 72 65 61 6D 73 00 DE 3A E1 3B ..InStreams..:.;
009B50: C0 00 4F 75 74 54 6F 70 00 DD 3A AA 3B C0 00 4F ..OutTop..:.;..O
009B60: 75 74 53 74 72 65 61 6D 73 00 DC 3A E1 3B C0 00 utStreams..:.;..
009B70: 43 6F 6E 73 46 69 6C 65 00 DB 3A EE 3B C0 00 49 ConsFile..:.;..I
009B80: 6E 46 69 6C 65 00 DA 2C 00 4F 75 74 46 69 6C 65 nFile..,.OutFile
009B90: 00 D9 3A 9B 5B 32 2E 2E E2 5D 20 84 20 EE 3B C0 ..:.[2...] . .;.
009BA0: 00 66 69 6C 65 6E 61 6D 65 00 D8 3A EB 3B C0 69 .filename..:.;.i
009BB0: 3A AA 3B C0 00 63 68 00 D7 3A 99 3B BF AF 20 00 :.;..ch..:.;.. .
009BC0: 47 65 74 46 69 6C 65 4E 61 6D 65 00 D6 28 00 64 GetFileName..(.d
009BD0: 65 66 65 78 74 00 D5 3A 9B 20 84 20 99 29 3B BF efext..:. . .);.
009BE0: 9C C0 AE 2E A9 3B C0 AE 2E B3 28 D5 29 3B C0 AE .....;....(.);..
009BF0: 2E 52 65 61 64 42 75 66 66 65 72 28 9A 29 3B C0 .ReadBuffer(.);.
009C00: 20 27 C0 91 20 D7 3A 3D 27 30 27 20 89 3B C0 8A '.. .:='0' .;..
009C10: 20 69 3A 3D 01 05 2B 31 20 86 20 AA 28 A8 29 20 i:=..+1 . .(.)
009C20: 81 20 B6 28 D7 29 20 89 3B C0 8A 20 69 3A 3D 36 . .(.) .;.. i:=6
009C30: 2D 01 05 20 86 20 35 20 81 20 B6 28 A2 5B 69 5D -.. . 5 . .(.[i]
009C40: 29 20 89 3B C0 89 20 B0 3B BF AF 20 00 57 72 69 ) .;.. .;.. .Wri
009C50: 74 65 43 61 72 64 00 97 28 63 3A AD 3B A8 3A AD teCard..(c:.;.:.
009C60: 29 3B BF 9C C0 B0 28 63 2C 31 30 2C A8 2C 9A 29 );....(c,10,.,.)
009C70: C0 89 20 97 3B BF AF 20 00 57 72 69 74 65 48 65 .. .;.. .WriteHe
009C80: 78 00 90 28 63 3A AD 3B A8 3A AD 29 3B BF 9C C0 x..(c:.;.:.);...
009C90: B0 28 63 2C 31 36 2C A8 2C A1 29 C0 89 20 90 3B .(c,16,.,.).. .;
009CA0: BF AF 20 00 57 72 69 74 65 4F 63 74 00 8F 28 63 .. .WriteOct..(c
009CB0: 3A AD 3B A8 3A AD 29 3B BF 9C C0 B0 28 63 2C 38 :.;.:.);....(c,8
009CC0: 2C A8 2C A1 29 C0 89 20 8F 3B BF AF 20 00 57 72 ,.,.).. .;.. .Wr
009CD0: 69 74 65 49 6E 74 00 8D 28 63 3A AA 3B A8 3A AD iteInt..(c:.;.:.
009CE0: 29 3B BF 8E B4 A2 3A 9B 5B 31 2E 2E 36 5D 20 84 );....:.[1..6] .
009CF0: 20 99 3B C0 01 05 3A AA 3B BF 9C B4 C0 E3 28 63 .;...:.;.....(c
009D00: 2C 31 30 2C A2 2C 01 05 29 3B C0 8A 20 69 3A 3D ,10,.,..);.. i:=
009D10: 01 05 2B 31 20 86 20 AA 28 A8 29 20 81 20 B6 28 ..+1 . .(.) . .(
009D20: 27 20 27 29 20 89 3B C0 8A 20 69 3A 3D 37 2D 01 ' ') .;.. i:=7-.
009D30: 05 20 86 20 36 20 81 20 B6 28 A2 5B 69 5D 29 20 . . 6 . .(.[i])
009D40: 89 3B C0 89 20 8D 3B BF AF 20 00 53 77 69 74 63 .;.. .;.. .Switc
009D50: 68 49 6E 53 74 72 65 61 6D 00 8B 28 70 3A E0 29 hInStream..(p:.)
009D60: 3B BF 9C B4 C0 82 20 DF 3D 98 28 DE 29 20 95 C1 ;..... .=.(.) ..
009D70: AE 2E D2 28 27 D1 20 D0 20 CF 20 01 09 20 01 0C ...('. . . .. ..
009D80: 27 29 3B C0 91 C1 DF 3A 3D DF 2B 31 3B C1 DE 5B ');....:=.+1;..[
009D90: DF 5D 3A 3D 70 3B C1 89 3B B5 C0 89 20 8B 3B BF .]:=p;..;... .;.
009DA0: AF 20 00 53 77 69 74 63 68 4F 75 74 53 74 72 65 . .SwitchOutStre
009DB0: 61 6D 00 88 28 70 3A E0 29 3B BF 9C B4 C0 82 20 am..(p:.);.....
009DC0: DD 3D 98 28 DC 29 20 95 C1 AE 2E D2 28 27 CC 20 .=.(.) .....('.
009DD0: D0 20 CF 20 01 09 20 01 0C 27 29 3B C0 91 C1 DD . . .. ..');....
009DE0: 3A 3D DD 2B 31 3B C1 DC 5B DD 5D 3A 3D 70 3B C1 :=.+1;..[.]:=p;.
009DF0: 89 3B C0 89 20 88 3B BF AF 20 00 50 6F 70 49 6E .;.. .;.. .PopIn
009E00: 69 3A 3D 30 3B C0 94 C1 AE 2E F5 28 D7 29 3B C1 i:=0;......(.);.
009E10: 82 20 D7 3D 30 00 64 78 00 D4 20 95 20 92 C1 91 . .=0.dx.. . ...
009E20: C2 82 20 69 3C 3D 98 28 D8 29 20 95 20 D8 5B 69 .. i<=.(.) . .[i
009E30: 5D 3A 3D 43 41 50 28 D7 29 20 89 3B C2 00 49 4E ]:=CAP(.) .;..IN
009E40: 43 00 D3 28 69 29 3B C2 89 3B C1 89 3B C0 8A 20 C..(i);..;..;..
009E50: 69 3A 3D 69 20 86 20 98 28 D8 29 20 81 20 D8 5B i:=i . .(.) . .[
009E60: 69 5D 3A 3D 27 20 27 20 89 3B C0 89 20 D6 3B BF i]:=' ' .;.. .;.
009E70: AF 20 01 00 28 D5 3A 9B 20 84 20 99 29 3B BF 9C . ..(.:. . .);..
009E80: BF BC 94 C0 82 20 DF 3D 98 28 DE 29 20 95 C1 AE ..... .=.(.) ...
009E90: 2E 00 45 72 72 6F 72 45 78 69 74 00 D2 28 27 00 ..ErrorExit..('.
009EA0: 49 6E 70 75 74 00 D1 20 00 53 74 61 63 6B 00 D0 Input.. .Stack..
009EB0: 20 00 6F 76 65 72 66 6C 6F 77 00 CF 20 01 09 20 .overflow.. ..
009EC0: 01 0C 27 29 3B C0 91 C1 D6 28 D5 29 3B C0 BE BA ..');....(.);...
009ED0: 82 20 D8 5B 31 5D 3D 27 20 27 20 95 C2 01 01 3A . .[1]=' ' ....:
009EE0: 3D A1 3B C2 A7 C2 89 3B C1 DF 3A 3D DF 2B 31 3B =.;....;..:=.+1;
009EF0: C1 EC 28 DA 5B DF 5D 2C D8 2C 69 29 3B C1 82 20 ..(.[.],.,i);..
009F00: 69 3D 30 20 95 20 92 C1 91 20 C2 AE 2E A9 3B C2 i=0 . ... ....;.
009F10: AE 2E B3 28 27 46 69 6C 65 20 01 06 20 66 6F 75 ...('File .. fou
009F20: 6E 64 3A 27 29 3B C2 AE 2E B3 28 D8 29 3B C2 00 nd:');....(.);..
009F30: 44 45 43 00 CE 28 DF 29 3B C2 89 3B C1 89 3B 20 DEC..(.);..;..;
009F40: 28 2A DF 3D 98 2A 29 C0 89 3B 20 28 2A 94 2A 29 (*.=.*)..; (*.*)
009F50: BF BC E9 28 DE 5B DF 5D 2C DA 5B DF 5D 2C F9 29 ...(.[.],.[.],.)
009F60: 3B BF BC 01 01 3A 3D 9A 3B BF BC 89 20 01 00 3B ;....:=.;... ..;
009F70: 20 BF AF 20 00 4F 70 65 6E 4F 75 74 70 75 74 00 .. .OpenOutput.
009F80: CD 28 D5 3A 9B 20 84 20 99 29 3B BF 9C BF BC 94 .(.:. . .);.....
009F90: C0 82 20 DD 3D 98 28 DC 29 20 95 C1 AE 2E D2 28 .. .=.(.) .....(
009FA0: 27 00 4F 75 74 70 75 74 00 CC 20 D0 20 CF 20 01 '.Output.. . . .
009FB0: 09 20 4F 75 74 4F 75 74 27 29 3B C0 91 C1 D6 28 . OutOut');....(
009FC0: D5 29 3B C1 82 20 D8 5B 31 5D 3D 27 20 27 20 95 .);.. .[1]=' ' .
009FD0: C2 01 01 3A 3D A1 3B C2 A7 C2 89 3B C1 DD 3A 3D ...:=.;....;..:=
009FE0: DD 2B 31 3B C1 ED 28 D9 5B DD 5D 2C D8 2C 69 29 .+1;..(.[.],.,i)
009FF0: 3B C1 82 20 69 3D 30 20 95 20 92 C1 91 20 C2 AE ;.. i=0 . ... ..
00A000: 53 74 72 65 61 6D 00 83 3B BF 9C C0 82 20 DF 3E Stream..;.... .>
00A010: 31 20 95 20 DF 3A 3D DF 2D 31 20 89 3B C0 89 20 1 . .:=.-1 .;..
00A020: 83 3B BF AF 20 00 50 6F 70 4F 75 74 53 74 72 65 .;.. .PopOutStre
00A030: 61 6D 00 80 3B BF 9C C0 82 20 DD 3E 31 20 95 20 am..;.... .>1 .
00A040: DD 3A 3D DD 2D 31 20 89 3B C0 89 20 80 3B BF 9C .:=.-1 .;.. .;..
00A050: B4 28 2A 4D 61 69 6E 6C 69 6E 65 2A 29 C0 C5 3A .(*Mainline*)..:
00A060: 3D 30 B2 3B C0 C7 3A 3D 30 D4 3B C0 C9 3A 3D A1 =0.;..:=0.;..:=.
00A070: 3B C0 ED 28 DB 2C 27 43 4F 4E 3A 27 2C DF 29 3B ;..(.,'CON:',.);
00A080: C0 DF 3A 3D 31 3B C0 E9 28 DE 5B 31 5D 2C DB 2C ..:=1;..(.[1],.,
00A090: F9 29 3B C0 DD 3A 3D 31 3B C0 E9 28 DC 5B 31 5D .);..:=1;..(.[1]
00A0A0: 2C DB 2C EA 29 3B C0 89 20 01 0C 2E BF BF 00 00 ,.,.);.. .......
00A0B0: 89 3B 28 2A A0 2A 29 C0 C4 3A 3D D7 3B C0 82 20 .;(*.*)..:=.;..
00A0C0: B7 20 95 20 78 3A 3D 2D 78 20 89 3B C0 89 20 B8 . . x:=-x .;.. .
00A0D0: 3B BF BF AF 20 00 57 72 69 74 65 00 B6 28 D7 3A ;... .Write..(.:
00A0E0: 99 29 3B BF 20 BF 9C C0 82 20 D7 3D C6 20 95 C1 .);. .... .=. ..
00A0F0: E6 28 DC 5B DD 5D 2C 30 D4 29 3B C1 D7 3A 3D 30 .(.[.],0.);..:=0
00A100: A4 20 00 4C 69 73 74 00 EE 3B BF BF 28 2A B4 EE . .List..;..(*..
00A110: 20 6F 6E 65 20 6F 66 20 6D 6F 72 65 20 00 66 69 one of more .fi
00A120: 6C 65 73 00 ED BF C0 44 61 76 65 20 4D 6F 6F 72 les....Dave Moor
00A130: 65 20 46 54 4C 20 4D 6F 64 75 6C 61 2D 32 C0 43 e FTL Modula-2.C
00A140: 2F 4F 20 57 6F 72 6B 6D 61 6E 20 00 61 6E 64 00 /O Workman .and.
00A150: EC 20 41 73 73 6F 63 69 61 74 65 73 C0 31 31 32 . Associates.112
00A160: 20 4D 61 72 69 6F 6E 20 44 72 69 76 65 C0 50 61 Marion Drive.Pa
00A170: 73 61 64 65 6E 61 20 43 61 6C 69 66 6F 72 6E 69 sadena Californi
00A180: 61 20 39 31 31 30 36 C0 28 50 68 29 20 28 38 31 a 91106.(Ph) (81
00A190: 38 29 20 37 39 36 20 34 34 30 31 BF C0 54 68 69 8) 796 4401..Thi
00A1A0: 73 20 00 69 73 00 EB 20 61 20 6D 6F 64 75 6C 65 s .is.. a module
00A1B0: 20 70 72 6F 76 69 64 65 64 20 00 77 69 74 68 00 provided .with.
00A1C0: EA 20 00 74 68 65 00 E9 20 73 79 73 74 65 6D 2E . .the.. system.
00A1D0: 20 59 6F 75 20 6D 61 79 20 68 61 63 6B 20 00 69 You may hack .i
00A1E0: 74 00 E8 C0 EC 20 75 73 65 20 E8 20 00 66 6F 72 t.... use . .for
00A1F0: 00 E7 20 77 68 61 74 65 76 65 72 20 70 75 72 70 .. whatever purp
00A200: 2E A9 3B C2 AE 2E B3 28 27 43 6F 75 6C 64 20 01 ..;....('Could .
00A210: 06 20 63 72 65 61 74 65 20 FD 27 29 3B C2 CE 28 . create .');..(
00A220: DD 29 3B C2 89 3B C1 89 3B 20 28 2A DD 3D 98 2A .);..;..; (*.=.*
00A230: 29 C0 89 3B 20 28 2A 94 2A 29 BF BC E9 28 DC 5B )..; (*.*)...(.[
00A240: DD 5D 2C D9 5B DD 5D 2C EA 29 3B BF BC 01 01 3A .],.[.],.);....:
00A250: 3D 9A 3B BF BC 89 20 CD 3B 20 BF AF 20 00 43 6C =.;... .; .. .Cl
00A260: 6F 73 65 49 6E 70 75 74 00 CB 3B BF 9C C0 82 20 oseInput..;....
00A270: DF 3E 31 20 95 20 DF 3A 3D DF 2D 31 3B 01 01 3A .>1 . .:=.-1;..:
00A280: 3D 9A 20 89 3B C0 89 20 CB 3B BF AF 20 00 43 6C =. .;.. .;.. .Cl
00A290: 6F 73 65 4F 75 74 70 75 74 00 CA 3B BF 9C C0 82 oseOutput..;....
00A2A0: 20 DD 3E 31 20 95 20 C1 01 01 3A 3D 9A 3B C1 E8 .>1 . ...:=.;..
00A2B0: 28 DC 5B DD 5D 2C 9A 29 3B C1 DD 3A 3D DD 2D 31 (.[.],.);..:=.-1
00A2C0: 20 C1 89 3B C0 89 20 CA 3B BF AF 20 F5 28 8E 20 ..;.. .;.. .(.
00A2D0: D7 3A 99 29 3B BF 20 BF 9C C0 01 01 3A 3D 9A 3B .:.);. .....:=.;
00A2E0: C0 82 20 00 41 6C 77 61 79 73 42 75 66 66 65 72 .. .AlwaysBuffer
00A2F0: 00 C9 20 95 20 E7 28 DE 5B DF 5D 2C A1 29 20 89 .. . .(.[.],.) .
00A300: 3B C0 94 C1 82 20 E5 28 DE 5B DF 5D 29 20 95 C2 ;.... .(.[.]) ..
00A310: D7 3A 3D 00 45 6F 73 43 48 00 C8 3B C2 01 01 3A .:=.EosCH..;...:
00A320: 3D A1 3B C2 92 C2 89 3B C1 F2 28 DE 5B DF 5D 2C =.;....;..(.[.],
00A330: D7 29 3B C1 82 20 D7 3D 00 65 6F 6C 63 68 00 C7 .);.. .=.eolch..
00A340: 20 95 20 C2 D7 3A 3D 00 45 4F 4C 00 C6 3B C2 92 . ..:=.EOL..;..
00A350: C1 9E 20 D7 3C 3E 00 69 67 6E 6F 72 65 63 68 00 .. .<>.ignorech.
00A360: C5 20 95 20 C2 92 20 C2 89 C1 89 20 28 2A 94 2A . . .. .... (*.*
00A370: 29 C0 89 20 F5 3B BF AF 20 FB 3B BF 9C C0 A6 B4 ).. .;.. .;.....
00A380: 28 2A 53 6B 69 70 20 6C 65 61 64 69 6E 67 20 73 (*Skip leading s
00A390: 70 61 63 65 73 2A 29 C1 F5 28 D7 29 3B C1 9F 20 paces*)..(.);..
00A3A0: 28 D7 3C 3E 27 20 27 29 20 87 20 28 D7 3C 3E 30 (.<>' ') . (.<>0
00A3B0: 39 78 29 3B C0 01 01 3A 3D D7 3C 3E C8 3B C0 89 9x);...:=.<>.;..
00A3C0: 20 FB 3B BF AF 20 F0 28 8E 20 73 3A 9B 20 84 20 .;.. .(. s:. .
00A3D0: 99 29 3B BF 9C C0 E7 28 DE 5B DF 5D 2C A1 29 3B .);....(.[.],.);
00A3E0: C0 FB 3B C0 82 20 8C 20 01 01 20 95 20 A7 20 89 ..;.. . .. . . .
00A3F0: 3B C0 69 3A 3D 30 3B C0 94 C1 82 20 69 3E 98 28 ;.i:=0;.... i>.(
00A400: 6F 73 65 73 20 00 79 6F 75 00 E6 20 77 69 73 68 oses .you.. wish
00A410: 2E 20 BF C0 43 61 6C 6C 20 EB 20 00 4C 49 53 54 . ..Call . .LIST
00A420: 00 E5 BB 3C 28 00 77 69 6C 64 00 E4 20 00 63 61 ...<(.wild.. .ca
00A430: 72 64 00 E3 29 20 00 66 69 6C 65 00 E2 20 00 6E rd..) .file.. .n
00A440: 61 6D 65 00 E1 3E 2C 2E 2E 2E 2E 20 28 00 6F 75 ame..>,.... (.ou
00A450: 74 70 75 74 00 E0 20 E2 20 E1 5B 6F 29 20 BF C0 tput.. . .[o) ..
00A460: 57 68 65 72 65 20 E9 20 E0 20 E2 20 E1 20 EB 20 Where . . . . .
00A470: 6F 70 74 69 6F 6E 61 6C 20 28 64 65 66 61 75 6C optional (defaul
00A480: 74 73 20 00 74 6F 00 DF 20 00 70 72 69 6E 74 65 ts .to.. .printe
00A490: 72 00 DE 20 64 65 76 69 63 65 29 BF C0 42 75 67 r.. device)..Bug
00A4A0: 73 3A BF C1 4F 76 65 72 77 72 69 74 65 73 20 E0 s:..Overwrites .
00A4B0: 20 E2 20 77 69 74 68 6F 75 74 20 63 68 65 63 6B . without check
00A4C0: 69 6E 67 20 00 69 66 00 DD 20 4F 4B BF BF 2A 29 ing .if.. OK..*)
00A4D0: BF A3 B4 44 65 62 75 67 3B BF 93 20 53 59 53 54 .£.Debug;.. SYST
00A4E0: 45 4D 20 A3 20 AB 2C 8F 2C 00 54 53 49 5A 45 00 EM £ .,.,.TSIZE.
00A4F0: DC 3B BF 93 20 43 6F 6D 6D 61 6E 64 20 A3 20 00 .;.. Command £ .
00A500: 50 61 72 61 6D 65 74 65 72 00 DB 2C 50 61 72 63 Parameter..,Parc
00A510: 6C 61 73 73 2C 00 47 65 74 50 61 72 61 6D 73 00 lass,.GetParams.
00A520: DA 3B BF 93 20 46 69 6C 65 73 20 A3 20 00 46 69 .;.. Files £ .Fi
00A530: 6C 65 4E 61 6D 65 00 D9 2C 00 46 49 4C 45 00 D8 leName..,.FILE..
00A540: 2C 00 4C 6F 6F 6B 75 70 00 D7 2C 00 43 72 65 61 ,.Lookup..,.Crea
00A550: 74 65 00 D6 3B BF 93 20 53 74 72 65 61 6D 73 20 te..;.. Streams
00A560: A3 20 00 43 6F 6E 6E 65 63 74 00 D5 2C 00 44 69 £ .Connect..,.Di
00A570: 73 63 6F 6E 6E 65 63 74 00 D4 2C 00 53 54 52 45 sconnect..,.STRE
00A580: 41 4D 00 D3 2C 00 69 6E 70 75 74 00 D2 2C E0 2C AM..,.input..,.,
00A590: 00 57 72 69 74 65 43 68 61 72 00 D1 2C C1 00 52 .WriteChar..,..R
00A5A0: 65 61 64 43 68 61 72 00 D0 2C 00 45 4F 53 00 CF eadChar..,.EOS..
00A5B0: 3B BF 93 20 47 65 74 46 69 6C 65 73 20 A3 20 00 ;.. GetFiles £ .
00A5C0: 47 65 74 4E 61 6D 65 73 00 CE 3B BF 93 20 AE 20 GetNames..;.. .
00A5D0: A3 20 B3 2C A9 3B BF 93 20 53 6F 72 74 20 A3 20 £ .,.;.. Sort £
00A5E0: 00 53 6F 72 74 52 65 63 6F 72 64 73 00 CD 3B BF .SortRecords..;.
00A5F0: 9D B4 00 46 46 00 CC 3D 30 63 78 3B C0 00 54 41 ...FF..=0cx;..TA
00A600: 73 29 20 95 20 92 20 89 3B C1 82 20 D7 3C 27 20 s) . . .;.. .<'
00A610: 27 20 95 20 92 20 89 3B C1 73 5B 69 5D 3A 3D D7 ' . . .;.s[i]:=.
00A620: 3B C1 69 3A 3D 69 2B 31 3B C1 F5 28 D7 29 3B C1 ;.i:=i+1;..(.);.
00A630: 89 20 28 2A 94 2A 29 3B C0 00 74 65 72 6D 43 48 . (*.*);..termCH
00A640: 00 C4 3A 3D D7 3B C0 82 20 69 3C 3D 98 28 73 29 ..:=.;.. i<=.(s)
00A650: 20 95 20 73 5B 69 5D 3A 3D 30 78 20 89 3B C0 89 . s[i]:=0x .;..
00A660: 20 F0 3B BF AF 20 00 53 6B 69 70 45 4F 4C 00 BD .;.. .SkipEOL..
00A670: 3B BF 9C C0 01 01 3A 3D A1 3B C0 94 C1 F5 28 D7 ;.....:=.;....(.
00A680: 29 3B C1 82 20 D7 3D C8 20 95 20 A7 20 89 3B C1 );.. .=. . . .;.
00A690: 82 20 D7 3D C6 20 95 20 92 20 89 3B C1 89 20 28 . .=. . . .;.. (
00A6A0: 2A 94 2A 29 3B C0 01 01 3A 3D 9A 3B C0 89 20 BD *.*);...:=.;.. .
00A6B0: 3B C0 BF AF 20 EF 28 8E 20 73 3A 9B 20 84 20 99 ;... .(. s:. . .
00A6C0: 29 3B BF 9C C0 E7 28 DE 5B DF 5D 2C 9A 29 3B C0 );....(.[.],.);.
00A6D0: 69 3A 3D 30 3B C0 94 C1 82 20 69 3E 98 28 73 29 i:=0;.... i>.(s)
00A6E0: 20 95 20 92 20 89 3B C1 F5 28 D7 29 3B C1 82 20 . . .;..(.);..
00A6F0: D7 3D C8 20 95 20 92 20 89 3B C1 82 20 D7 3D C6 .=. . . .;.. .=.
00A700: 20 95 20 92 20 89 3B C1 82 20 D7 3C 3E C5 20 95 . . .;.. .<>. .
00A710: C2 73 5B 69 5D 3A 3D D7 3B C2 D3 28 69 29 3B C2 .s[i]:=.;..(i);.
00A720: 89 3B C1 89 20 28 2A 94 2A 29 3B C0 C4 3A 3D D7 .;.. (*.*);..:=.
00A730: 3B C0 82 20 C4 3C 3E C6 20 95 20 BD 20 91 20 01 ;.. .<>. . . . .
00A740: 01 3A 3D 9A 20 89 3B C0 8A 20 69 3A 3D 69 20 86 .:=. .;.. i:=i .
00A750: 20 98 28 73 29 20 81 20 73 5B 69 5D 3A 3D 27 20 .(s) . s[i]:='
00A760: 27 20 89 3B C0 89 20 EF 3B BF AF 20 00 52 65 61 ' .;.. .;.. .Rea
00A770: 64 43 61 72 64 00 BB 28 8E 20 63 3A AD 29 3B BF dCard..(. c:.);.
00A780: 9C C0 63 3A 3D 30 3B C0 E7 28 DE 5B DF 5D 2C A1 ..c:=0;..(.[.],.
00A790: 29 3B C0 FB 3B C0 82 20 8C 20 01 01 20 95 20 A7 );..;.. . .. . .
00A7A0: 20 89 3B C0 01 01 3A 3D A1 3B C0 A0 20 28 D7 3E .;...:=.;.. (.>
00A7B0: 3D 27 30 27 29 20 87 20 28 D7 3C 3D 27 39 27 29 ='0') . (.<='9')
00A7C0: 20 81 C1 01 01 3A 3D 9A 3B C1 63 3A 3D 31 30 2A ....:=.;.c:=10*
00A7D0: 63 2B 28 00 4F 52 44 00 B9 28 D7 29 2D B9 28 27 c+(.ORD..(.)-.('
00A7E0: 30 27 29 29 3B C1 F5 28 D7 29 3B C1 89 3B 28 2A 0'));..(.);..;(*
00A7F0: A0 2A 29 C0 C4 3A 3D D7 3B C0 89 20 BB 3B BF AF .*)..:=.;.. .;..
00A800: 42 00 CB 3D 30 39 78 3B C0 00 4C 46 00 CA 3D 30 B..=09x;..LF..=0
00A810: 61 78 3B C0 00 43 52 00 C9 3D 30 64 78 3B BF BE ax;..CR..=0dx;..
00A820: BA 54 41 42 53 3D 32 30 78 3B 20 BF 96 20 B4 00 .TABS=20x; .. ..
00A830: 50 46 69 6C 65 4E 61 6D 65 00 C8 3D A8 20 86 20 PFileName..=. .
00A840: D9 3B BF 8E B4 EE 3A D3 3B C0 00 4C 69 73 74 46 .;....:.;..ListF
00A850: 00 C7 3A D8 3B C0 00 72 65 70 6C 79 00 C6 3A AA ..:.;..reply..:.
00A860: 3B C0 69 2C 6A 3A AA 3B C0 00 49 6E 73 00 C5 3A ;.i,j:.;..Ins..:
00A870: D3 3B C0 00 49 6E 66 00 C4 3A D8 3B C0 00 63 68 .;..Inf..:.;..ch
00A880: 00 BD 3A 99 3B BF C0 00 62 75 66 66 65 72 00 B9 ..:.;...buffer..
00A890: 3A 9B 5B 30 2E 2E 34 30 39 35 5D 20 84 20 99 3B :.[0..4095] . .;
00A8A0: C0 00 62 75 66 66 6C 65 6E 00 B8 3A AD 3B B4 BF ..bufflen..:.;..
00A8B0: 28 2A B4 49 20 B9 20 E9 20 63 68 61 72 61 63 74 (*.I . . charact
00A8C0: 65 72 73 20 00 6F 6E 00 B7 20 E0 20 73 69 6E 63 ers .on.. . sinc
00A8D0: 65 20 49 20 68 61 76 65 20 61 20 DE 20 77 68 69 e I have a . whi
00A8E0: 63 68 C0 73 74 6F 70 73 20 70 72 69 6E 74 69 6E ch.stops printin
00A8F0: 67 20 77 68 65 6E 65 76 65 72 20 61 6E 79 74 68 g whenever anyth
00A900: 69 6E 67 20 61 70 70 65 61 72 73 20 B7 20 E9 20 ing appears . .
00A910: 69 6E 74 65 72 66 61 63 65 2E 20 54 6F C0 67 65 interface. To.ge
00A920: 74 20 E8 20 DF 20 72 75 6E 20 00 61 74 00 B2 20 t . . run .at..
00A930: 73 70 65 65 64 2C 20 E6 20 6D 75 73 74 20 68 69 speed, . must hi
00A940: 74 20 E8 20 EA 20 61 20 B9 20 66 75 6C 6C 20 27 t . . a . full '
00A950: B2 C0 61 20 74 69 6D 65 27 2A 29 BF AF 20 00 46 ..a time'*).. .F
00A960: 6C 75 73 68 42 75 66 66 65 72 00 B1 3B BF 8E B4 lushBuffer..;...
00A970: 69 3A AD 3B BF 9C C0 82 20 B8 3E 30 20 95 20 C1 i:.;.... .>0 . .
00A980: 8A 20 69 3A 3D 30 20 86 20 B8 2D 31 20 81 20 D1 . i:=0 . .-1 . .
00A990: 28 EE 2C B9 5B 69 5D 29 20 89 3B C1 89 3B C0 B8 (.,.[i]) .;..;..
00A9A0: 3A 3D 30 3B C0 89 20 B1 3B BF AF 20 00 42 75 66 :=0;.. .;.. .Buf
00A9B0: 66 65 72 4F 75 74 00 B0 28 BD 3A 99 29 3B BF 9C ferOut..(.:.);..
00A9C0: C0 82 20 B8 3D 98 28 B9 29 20 95 20 B1 20 89 3B .. .=.(.) . . .;
00A9D0: C0 B9 5B B8 5D 3A 3D BD 3B C0 B8 3A 3D B8 2B 31 ..[.]:=.;..:=.+1
00A9E0: 3B C0 89 20 B0 3B BF BF AF 20 00 43 6F 6D 70 61 ;.. .;... .Compa
00A9F0: 72 00 A6 28 61 2C 62 3A AB 29 3A AC 3B BF 8E B4 r..(a,b:.):.;...
00AA00: 20 00 52 65 61 64 49 6E 74 00 B8 28 8E 20 78 3A .ReadInt..(. x:
00AA10: AA 29 3B BF 8E B4 00 6E 65 67 00 B7 3A AC 3B BF .);....neg..:.;.
00AA20: 9C C0 E7 28 DE 5B DF 5D 2C A1 29 3B C0 FB 3B C0 ...(.[.],.);..;.
00AA30: 82 20 8C 20 01 01 20 95 20 A7 20 89 3B C0 01 01 . . .. . . .;...
00AA40: 3A 3D A1 3B C0 B7 3A 3D 20 D7 3D 27 2D 27 3B C0 :=.;..:= .='-';.
00AA50: 82 20 28 D7 3D 27 2D 27 29 20 85 20 28 D7 3D 27 . (.='-') . (.='
00AA60: 2B 27 29 20 95 20 F5 28 D7 29 20 89 3B C0 78 3A +') . .(.) .;.x:
00AA70: 3D 30 3B C0 A0 20 28 D7 3E 3D 27 30 27 29 20 87 =0;.. (.>='0') .
00AA80: 20 28 D7 3C 3D 27 39 27 29 20 81 C1 01 01 3A 3D (.<='9') ....:=
00AA90: 9A 3B C1 78 3A 3D 31 30 2A 78 2B 28 B9 28 D7 29 .;.x:=10*x+(.(.)
00AAA0: 2D B9 28 27 30 27 29 29 3B C1 F5 28 D7 29 3B C1 -.('0'));..(.);.
00AAB0: 89 3B 28 2A A0 2A 29 C0 C4 3A 3D D7 3B C0 82 20 .;(*.*)..:=.;..
00AAC0: B7 20 95 20 78 3A 3D 2D 78 20 89 3B C0 89 20 B8 . . x:=-x .;.. .
00AAD0: 3B BF BF AF 20 00 57 72 69 74 65 00 B6 28 D7 3A ;... .Write..(.:
00AAE0: 99 29 3B BF 20 BF 9C C0 82 20 D7 3D C6 20 95 C1 .);. .... .=. ..
00AAF0: E6 28 DC 5B DD 5D 2C 30 D4 29 3B C1 D7 3A 3D 30 .(.[.],0.);..:=0
00AB00: 00 61 78 00 B2 3B C1 89 3B C0 E6 28 DC 5B DD 5D .ax..;..;..(.[.]
00AB10: 2C D7 29 3B C0 89 20 B6 3B BF AF 20 A9 3B BF 9C ,.);.. .;.. .;..
00AB20: C0 B6 28 30 D4 29 3B C0 B6 28 30 B2 29 3B C0 89 ..(0.);..(0.);..
00AB30: 20 A9 3B BF BF AF 20 B3 28 73 3A 9B 20 84 20 99 .;... .(s:. . .
00AB40: 29 3B BF 9C C0 69 3A 3D 30 3B C0 A0 20 28 69 3C );...i:=0;.. (i<
00AB50: 3D 98 28 73 29 29 20 87 20 28 73 5B 69 5D 3C 3E =.(s)) . (s[i]<>
00AB60: 30 78 29 20 81 C1 E6 28 DC 5B DD 5D 2C 73 5B 69 0x) ...(.[.],s[i
00AB70: 5D 29 3B C1 D3 28 69 29 3B C1 89 3B C0 89 20 B3 ]);..(i);..;.. .
00AB80: 3B BF AF 20 00 57 72 69 74 65 43 61 72 64 49 6E ;.. .WriteCardIn
00AB90: 47 69 76 65 6E 42 61 73 65 00 B0 28 63 2C 00 62 GivenBase..(c,.b
00ABA0: 61 73 65 00 AB 3A AD 3B 00 70 6C 61 63 65 73 00 ase..:.;.places.
00ABB0: A8 3A AD 3B C0 00 7A 65 72 6F 73 75 70 70 72 65 .:.;..zerosuppre
00ABC0: 73 73 00 A5 3A AC 29 3B BF 8E B4 00 74 65 78 74 ss..:.);....text
00ABD0: 00 A2 3A 9B 5B 31 2E 2E 35 5D 20 84 20 99 3B C0 ..:.[1..5] . .;.
00ABE0: 01 05 3A AA 3B BF 9C B4 C0 E4 28 63 2C AB 2C A2 ..:.;.....(c,.,.
00ABF0: 2C 01 05 29 3B C0 82 20 A5 20 95 20 D7 3A 3D 27 ,..);.. . . .:='
00AC00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00AC10: 09 00 00 00 02 09 4E E5 09 00 41 02 00 00 00 02 ......N...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: 70 2C 71 3A C8 3B BF 9C C0 70 3A 3D C8 28 61 29 p,q:.;...p:=.(a)
00AD10: 3B C0 71 3A 3D C8 28 62 29 3B C0 A7 20 70 5E 3E ;.q:=.(b);.. p^>
00AD20: 71 5E C0 89 20 A6 3B BF AF 20 00 55 73 61 67 65 q^.. .;.. .Usage
00AD30: 00 A5 3B BF 9C C0 B3 28 27 A5 20 EB 3A BB E5 20 ..;....('. .:..
00AD40: E2 2C E2 2C 2E 2E 2E 27 29 3B A9 3B C0 B3 28 27 .,.,...');.;..('
00AD50: BE 00 6F 72 00 A2 BC E5 20 E2 2C E2 2C 2E 2E 2E ..or.... .,.,...
00AD60: 2C E0 20 E2 5B 6F 27 29 3B A9 3B C0 B3 28 27 20 ,. .[o');.;..('
00AD70: 77 68 65 72 65 20 E2 20 EB 20 61 20 E2 20 DF 20 where . . a . .
00AD80: 00 6C 69 73 74 00 A1 20 A2 20 61 20 E4 20 E3 20 .list.. . a . .
00AD90: E7 20 ED 20 DF 20 A1 27 29 3B A9 3B C0 A9 3B C0 . . . .');.;..;.
00ADA0: B3 28 27 20 E7 20 65 78 61 6D 70 6C 65 3A BA E5 .(' . example:..
00ADB0: 20 2A 2E 44 45 46 27 29 3B A9 3B C0 00 48 41 4C *.DEF');.;..HAL
00ADC0: 54 00 9F C0 89 20 A5 3B BF AF 20 00 4C 69 73 74 T.... .;.. .List
00ADD0: 69 74 00 9E 3B BF BF 8E B4 00 50 61 72 61 6D 00 it..;.....Param.
00ADE0: 97 3A 9B 20 5B 30 2E 2E 31 30 5D 20 84 20 DB 3B .:. [0..10] . .;
00ADF0: C0 00 43 6F 75 6E 74 00 94 3A AA 3B C0 00 4E 61 ..Count..:.;..Na
00AE00: 6D 65 73 00 92 3A 9B 20 5B 30 2E 2E 31 30 30 5D mes..:. [0..100]
00AE10: 20 84 20 D9 3B C0 00 4E 61 6D 65 43 6F 75 6E 74 . .;..NameCount
00AE20: 00 90 20 3A 20 AA 3B C0 00 43 6F 75 6E 74 65 72 .. : .;..Counter
00AE30: 00 8D 20 3A 20 AA 3B C0 43 6E 74 65 72 20 3A 20 .. : .;.Cnter :
00AE40: AA 3B BF 9C BF C0 DA 28 97 2C 94 29 3B BF BE BA .;.....(.,.);...
00AE50: 8D 20 3A 3D 20 31 BF BE BA 82 20 94 3D 30 20 95 . := 1.... .=0 .
00AE60: 20 A5 20 89 3B C0 82 20 97 5B 94 2D 31 5D 5E 2E . .;.. .[.-1]^.
00AE70: 43 6C 61 73 73 3D 6F 70 74 69 6F 6E 20 95 C1 00 Class=option ...
00AE80: 44 45 43 00 8B 28 94 29 3B C1 82 20 94 3D 30 20 DEC..(.);.. .=0
00AE90: 95 20 A5 20 89 3B C1 CE 28 97 5B 94 2D 31 5D 5E . . .;..(.[.-1]^
00AEA0: 2E 00 43 68 61 72 73 00 88 2C 92 2C 90 29 3B C1 ..Chars..,.,.);.
00AEB0: D6 28 C7 2C 92 5B 30 5D 2C C6 29 3B C1 82 20 C6 .(.,.[0],.);.. .
00AEC0: 3C 3E 30 20 95 C2 B3 28 27 20 00 43 6F 75 6C 64 <>0 ...(' .Could
00AED0: 00 83 20 00 6E 6F 74 00 80 20 63 72 65 61 74 65 .. .not.. create
00AEE0: 20 A1 20 E2 27 29 3B C2 A9 3B C2 9F 3B C2 89 3B . .');..;..;..;
00AEF0: C1 8B 28 94 29 3B C1 82 20 94 3D 30 20 95 20 A5 ..(.);.. .=0 . .
00AF00: 3B C2 A9 3B C2 79 3A 3D 31 2E 30 65 31 35 30 C1 ;..;.y:=1.0e150.
00AF10: 91 20 B4 79 3A 3D 31 2E 30 2F DC 28 78 29 C2 89 . .y:=1.0/.(x)..
00AF20: 3B C0 91 20 79 3A 3D DC 28 78 29 20 89 3B C0 82 ;.. y:=.(x) .;..
00AF30: 20 E7 20 95 20 A7 20 2D 79 C0 91 20 A7 20 79 20 . . . -y.. . y
00AF40: 89 3B C0 89 20 DD 3B BF AF 20 00 4C 4E 00 D9 28 .;.. .;.. .LN..(
00AF50: 41 3A E9 29 3A E9 3B BF 8E B4 62 3A EA 3B C0 69 A:.):.;...b:.;.i
00AF60: 3A AA 3B BF BF 28 2A B4 E4 20 E3 20 32 37 30 35 :.;..(*.. . 2705
00AF70: BF C0 00 74 68 69 73 00 D8 20 00 69 73 00 D7 20 ...this.. .is..
00AF80: E1 20 61 20 70 6F 6F 72 20 63 68 6F 69 63 65 2C . a poor choice,
00AF90: 20 73 69 6E 63 65 20 00 74 68 65 00 D6 20 00 75 since .the.. .u
00AFA0: 73 65 00 D5 20 00 6F 66 00 D4 20 68 65 78 20 6E se.. .of.. hex n
00AFB0: 6F 72 6D 61 6C 69 73 61 74 69 6F 6E C0 00 6D 65 ormalisation..me
00AFC0: 61 6E 73 00 D3 20 00 74 68 61 74 00 D2 20 6A 75 ans.. .that.. ju
00AFD0: 73 74 20 73 74 61 6E 64 61 72 64 69 73 69 6E 67 st standardising
00AFE0: 20 D6 20 00 65 78 70 6F 6E 65 6E 74 00 D1 20 D7 . .exponent.. .
00AFF0: 20 00 6E 6F 74 00 D0 20 65 6E 6F 75 67 68 20 DA .not.. enough .
00B000: 20 65 6E 73 75 72 65 C0 D2 20 D6 20 00 76 61 6C ensure.. . .val
00B010: 75 65 00 CF 20 66 61 6C 6C 73 20 EB 20 D6 20 00 ue.. falls . . .
00B020: 72 61 6E 67 65 00 CE 20 5B 31 2F 00 53 51 52 54 range.. [1/.SQRT
00B030: 00 CD 28 32 29 2C CD 28 32 29 5D 2C 20 00 62 75 ..(2),.(2)], .bu
00B040: 74 00 CC 20 61 20 E3 C0 00 77 69 74 68 00 CB 20 t.. a ...with..
00B050: D6 20 64 65 73 69 72 65 64 20 CE 20 77 61 73 20 . desired . was
00B060: D0 20 61 76 61 69 6C 61 62 6C 65 BF C0 41 6C 73 . available..Als
00B070: 6F 2C 20 00 69 74 00 CA 20 73 68 6F 75 6C 64 20 o, .it.. should
00B080: 00 62 65 00 C9 20 70 6F 73 73 69 62 6C 65 20 DA .be.. possible .
00B090: 20 DE 20 61 20 6C 6F 67 20 64 65 72 69 76 61 74 . a log derivat
00B0A0: 69 6F 6E 20 28 62 61 73 65 20 32 29 20 77 69 74 ion (base 2) wit
00B0B0: 68 6F 75 74 20 61 6E 79 C0 66 6C 6F 61 74 69 6E hout any.floatin
00B0C0: 67 20 6F 70 65 72 61 74 69 6F 6E 73 20 00 61 74 g operations .at
00B0D0: 00 C8 20 61 6C 6C 20 28 65 78 63 65 70 74 20 C8 .. all (except .
00B0E0: 20 D6 20 65 6E 64 20 00 66 6F 72 00 C7 20 D6 20 . end .for.. .
00B0F0: D1 29 2C 20 00 75 73 69 6E 67 00 C6 C0 61 20 6E .), .using...a n
00B100: 20 89 3B C0 91 C1 D6 28 C7 2C 27 4C 53 54 3A 27 .;....(.,'LST:'
00B110: 2C C6 29 3B C1 89 3B C0 D5 28 EE 2C C7 2C E0 29 ,.);..;..(.,.,.)
00B120: 3B C0 8A 20 69 3A 3D 30 20 86 20 94 2D 31 20 81 ;.. i:=0 . .-1 .
00B130: C1 CE 28 97 5B 69 5D 5E 2E 88 2C 92 2C 90 29 3B ..(.[i]^..,.,.);
00B140: C1 82 20 90 3E 31 20 95 C2 CD 28 8F 28 92 29 2C .. .>1 ...(.(.),
00B150: AD 28 90 29 2C C3 DC 28 D9 29 2C A6 29 3B C2 89 .(.),..(.),.);..
00B160: 3B C1 8A 20 6A 3A 3D 30 20 86 20 90 2D 31 20 81 ;.. j:=0 . .-1 .
00B170: C2 D7 28 C4 2C 92 5B 6A 5D 2C C6 29 3B C2 82 20 ..(.,.[j],.);..
00B180: C6 3C 30 20 95 C3 B3 28 27 20 83 20 80 20 6F 70 .<0 ...(' . . op
00B190: 65 6E 20 27 29 3B C3 B3 28 92 5B 6A 5D 29 3B C3 en ');..(.[j]);.
00B1A0: A9 3B C2 91 C3 B3 28 27 20 4C 69 73 74 69 6E 67 .;....(' Listing
00B1B0: 3A 27 29 3B C3 B3 28 92 5B 6A 5D 29 3B C3 A9 3B :');..(.[j]);..;
00B1C0: C3 8D 20 3A 3D 20 31 3B C3 B0 28 CC 29 3B C3 D5 .. := 1;..(.);..
00B1D0: 28 C5 2C C4 2C D2 29 3B C3 A0 20 8C 20 CF 28 C5 (.,.,.);.. . .(.
00B1E0: 29 20 81 C3 B4 D0 28 C5 2C BD 29 3B C3 B4 82 20 ) ....(.,.);...
00B1F0: BD 3E 3D 38 30 78 20 95 C3 B5 BD 3A 3D 43 48 52 .>=80x ....:=CHR
00B200: 28 4F 52 44 28 BD 29 2D 38 30 68 29 3B C3 B5 89 (ORD(.)-80h);...
00B210: 3B C3 28 2A E0 20 63 68 61 72 61 63 74 65 72 20 ;.(*. character
00B220: DD 20 80 20 63 6F 6E 74 72 6F 6C 20 63 6F 64 65 . . control code
00B230: 2A 29 C3 B4 82 20 28 28 BD 3E 3D 27 20 27 29 20 *)... ((.>=' ')
00B240: 87 20 28 BD 3C 3D 27 7E 27 29 29 C3 B4 BA 85 20 . (.<='~'))....
00B250: 28 BD 3D CB 29 C3 B4 BA 85 20 28 BD 3D C9 29 C3 (.=.).... (.=.).
00B260: B4 BA 85 20 28 BD 3D CA 29 20 95 20 C3 B5 B0 28 ... (.=.) . ...(
00B270: BD 29 20 C3 B5 89 3B C3 B4 C3 B4 89 3B C3 D4 28 .) ...;.....;..(
00B280: C5 2C 9A 29 3B C3 89 3B C2 89 3B C1 89 3B C0 89 .,.);..;..;..;..
00B290: 20 9E 3B B6 BF 9C C0 B8 3A 3D 30 3B C0 9E 3B C0 .;.....:=0;..;.
00B2A0: B1 3B C0 D4 28 EE 2C 9A 29 3B C0 89 20 EE 2E BF .;..(.,.);.. ...
00B2B0: 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00B2C0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00B2D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00B2E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00B2F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00B300: 6F 6E 2D 72 65 73 74 6F 72 69 6E 67 20 64 69 76 on-restoring div
00B310: 69 64 65 20 6F 70 65 72 61 74 69 6F 6E 20 CB 20 ide operation .
00B320: D6 20 64 69 76 69 73 6F 72 20 72 65 70 6C 61 63 . divisor replac
00B330: 65 64 20 00 62 79 00 C5 20 61 20 74 61 62 6C 65 ed .by.. a table
00B340: 20 D4 C0 6C 6F 67 73 2A 29 BF 9C C0 82 20 41 3C ..logs*).... A<
00B350: 3D 30 2E 30 20 95 C1 B3 28 27 00 65 72 72 6F 72 =0.0 ...('.error
00B360: 00 C4 3A 20 D9 20 D4 20 00 76 65 00 BB 3C 3D 30 ..: . . .ve..<=0
00B370: 2E 30 20 27 29 3B C1 A9 3B C1 00 48 41 4C 54 00 .0 ');..;..HALT.
00B380: B9 3B C1 89 3B C0 62 2E 78 3A 3D 41 3B C0 E6 3A .;..;.b.x:=A;..:
00B390: 3D 00 4F 52 44 00 B8 28 62 2E E8 29 2D 38 30 68 =.ORD..(b..)-80h
00B3A0: 3B B4 28 2A E6 20 C5 20 70 6F 77 65 72 20 D4 20 ;.(*. . power .
00B3B0: 31 36 2A 29 C0 62 2E E8 3A 3D 38 30 68 3B B5 28 16*).b..:=80h;.(
00B3C0: 2A 62 20 00 6E 6F 77 00 B7 20 EB 20 5B 31 2F 33 *b .now.. . [1/3
00B3D0: 32 2E 2E 31 2F 32 5D 2A 29 C0 69 3A 3D 30 3B C0 2..1/2]*).i:=0;.
00B3E0: 7A 3A 3D 62 2E 78 3B C0 A0 20 7A 3C 28 31 2E 30 z:=b.x;.. z<(1.0
00B3F0: 2F 31 2E 34 31 34 32 31 33 35 36 32 33 29 20 81 /1.4142135623) .
00B400: 20 C1 49 4E 43 28 69 29 3B C1 7A 3A 3D 32 2E 30 .INC(i);.z:=2.0
00B410: 2A 7A 3B B4 28 2A DF 20 C9 20 69 6D 70 72 6F 76 *z;.(*. . improv
00B420: 65 64 20 2D 20 D5 20 73 68 69 66 74 73 20 65 74 ed - . shifts et
00B430: 63 2A 29 C1 89 3B C0 C0 7A 3A 3D 28 7A 2D 31 2E c*)..;..z:=(z-1.
00B440: 30 29 2F 28 7A 2B 31 2E 30 29 3B C0 79 3A 3D 7A 0)/(z+1.0);.y:=z
00B450: 2A 7A 3B C0 79 3A 3D 7A 2A 28 28 28 34 2E 32 31 *z;.y:=z*(((4.21
00B460: 30 38 37 33 37 31 32 31 37 39 37 39 37 31 34 35 0873712179797145
00B470: 65 2D 31 2A 79 2D 39 2E 36 33 37 36 39 30 39 33 e-1*y-9.63769093
00B480: 33 36 38 36 38 36 35 39 33 32 34 29 2A 79 C1 2B 36868659324)*y.+
00B490: 33 2E 30 39 35 37 32 39 32 38 32 31 35 33 37 36 3.09572928215376
00B4A0: 35 30 30 36 32 32 36 34 65 31 29 2A 79 C1 2D 32 50062264e1)*y.-2
00B4B0: 2E 34 30 31 33 39 31 37 39 35 35 39 32 31 30 35 .401391795592105
00B4C0: 30 39 38 36 38 34 38 34 65 31 29 2F C1 28 28 28 09868484e1)/.(((
00B4D0: 79 2D 38 2E 39 31 31 31 30 39 30 32 37 39 33 37 y-8.911109027937
00B4E0: 38 33 31 32 33 33 37 29 2A 79 C1 2B 31 2E 39 34 8312337)*y.+1.94
00B4F0: 38 30 39 36 36 30 37 30 30 38 38 39 37 33 30 35 8096607008897305
00B500: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
00B510: 20 00 4D 61 74 68 73 00 EF 3B BF 93 B4 AE 20 A3 .Maths..;.... £
00B520: 20 B3 2C A9 3B BF 93 B4 53 59 53 54 45 4D B4 20 .,.;...SYSTEM.
00B530: A3 20 00 42 59 54 45 00 EE 3B BF 28 2A B4 53 6F £ .BYTE..;.(*.So
00B540: 6D 65 20 6D 61 74 68 65 6D 61 74 69 63 61 6C 20 me mathematical
00B550: 66 75 6E 63 74 69 6F 6E 73 BF C0 4D 65 74 68 6F functions..Metho
00B560: 64 73 20 00 61 6E 64 00 ED 20 61 70 70 72 6F 78 ds .and.. approx
00B570: 69 6D 61 74 69 6F 6E 73 20 61 72 65 20 74 61 6B imations are tak
00B580: 65 6E 20 66 72 6F 6D 20 C0 00 48 41 52 54 00 EC en from ..HART..
00B590: 20 65 74 20 61 6C 2C 20 43 6F 6D 70 75 74 65 72 et al, Computer
00B5A0: 20 41 70 70 72 6F 78 69 6D 61 74 69 6F 6E 73 2C Approximations,
00B5B0: 20 C0 53 49 41 4D 20 53 65 72 69 65 73 20 00 69 .SIAM Series .i
00B5C0: 6E 00 EB 20 41 70 70 6C 69 65 64 20 4D 61 74 68 n.. Applied Math
00B5D0: 65 6D 61 74 69 63 73 2C C0 4A 6F 68 6E 20 57 69 ematics,.John Wi
00B5E0: 6C 65 79 20 ED 20 53 6F 6E 73 2C 20 4E 65 77 20 ley . Sons, New
00B5F0: 59 6F 72 6B 2A 29 BF 96 B4 00 52 65 61 6C 42 79 York*)....RealBy
00B600: 42 79 74 65 00 EA 3D A5 C1 90 20 3A AC 20 84 C1 Byte..=... :. ..
00B610: A1 3A 78 3A 00 52 45 41 4C 00 E9 7C C1 9A 3A 00 .:x:.REAL..|..:.
00B620: 65 78 70 00 E8 3A EE 3B C1 BD 6D 61 6E 74 69 73 exp..:.;..mantis
00B630: 73 61 3A 9B 5B 31 2E 2E 37 5D 20 84 20 EE C1 89 sa:.[1..7] . ...
00B640: 3B C0 BC 89 3B BF 8E B4 78 2C 79 2C 7A 3A E9 3B ;...;...x,y,z:.;
00B650: C0 00 43 68 61 6E 67 65 53 69 67 6E 00 E7 3A AC ..ChangeSign..:.
00B660: 3B C0 00 73 68 69 66 74 00 E6 3A AA 3B BF AF 20 ;..shift..:.;..
00B670: 00 53 49 4E 00 E5 28 41 3A E9 29 3A E9 3B BF 9C .SIN..(A:.):.;..
00B680: BF BF 28 2A B4 00 48 61 72 74 00 E4 20 00 66 75 ..(*..Hart.. .fu
00B690: 6E 63 74 69 6F 6E 00 E3 20 6E 6F 20 33 33 36 39 nction.. no 3369
00B6A0: 20 2A 29 C0 82 20 41 3C 30 2E 30 20 95 C1 E7 3A *).. A<0.0 ...:
00B6B0: 3D 9A 3B C1 78 3A 3D 2D 41 3B C0 91 C1 E7 3A 3D =.;.x:=-A;....:=
00B6C0: A1 3B C1 78 3A 3D 41 3B C1 89 3B C0 A0 20 78 3E .;.x:=A;..;.. x>
00B6D0: 28 32 2E 30 2A 00 50 49 00 E2 29 20 81 20 C1 78 (2.0*.PI..) . .x
00B6E0: 3A 3D 78 2D 32 2E 30 2A E2 3B 20 C1 89 3B B4 28 :=x-2.0*.; ..;.(
00B6F0: 2A 6D 75 6C 74 69 70 6C 65 73 20 00 70 72 6F 62 *multiples .prob
00B700: 31 36 32 33 65 31 29 2A 79 C1 2D 31 2E 32 30 30 1623e1)*y.-1.200
00B710: 36 39 35 38 39 37 37 39 36 30 35 32 35 34 37 31 6958977960525471
00B720: 37 35 32 35 65 31 29 3B C0 28 2A B4 B7 20 66 61 7525e1);.(*.. fa
00B730: 63 74 6F 72 20 E6 20 00 62 61 63 6B 00 B6 20 EB ctor . .back.. .
00B740: 20 C6 20 D6 20 66 61 63 74 20 D2 20 C1 00 6C 6E . . fact . ..ln
00B750: 00 B2 28 32 5E 6E 2A 78 29 3D B2 28 32 5E 6E 29 ..(2^n*x)=.(2^n)
00B760: 2B B2 28 78 29 3D 6E 2A B2 28 32 29 2B B2 28 78 +.(x)=n*.(2)+.(x
00B770: 29 20 2A 29 C0 A7 20 79 2B 28 E6 2A 34 2D 69 29 ) *).. y+(.*4-i)
00B780: 2A 30 2E 36 39 33 31 34 37 31 38 30 35 35 39 39 *0.6931471805599
00B790: 34 35 33 30 39 34 31 37 32 33 32 31 3B BF C0 89 453094172321;...
00B7A0: 20 D9 3B BF AF 20 00 45 58 50 00 B1 28 41 3A E9 .;.. .EXP..(A:.
00B7B0: 29 3A E9 3B BF BF 28 2A B4 E4 20 E3 20 31 38 30 ):.;..(*.. . 180
00B7C0: 31 2A 29 BF 8E B4 62 3A EA 3B BF 9C C0 82 20 41 1*)...b:.;.... A
00B7D0: 3C 30 2E 30 20 95 C1 C1 62 2E 78 3A 3D 2D 41 3B <0.0 ...b.x:=-A;
00B7E0: C1 82 20 62 2E 78 3E 33 37 30 2E 30 20 95 20 A7 .. b.x>370.0 . .
00B7F0: 20 30 2E 30 20 89 3B C1 E7 3A 3D 9A 3B C0 91 C1 0.0 .;..:=.;...
00B800: 62 2E 78 3A 3D 41 3B C1 82 20 41 3E 33 37 30 2E b.x:=A;.. A>370.
00B810: 30 20 95 C2 B3 28 27 20 CF 20 DB 20 00 6C 61 72 0 ...(' . . .lar
00B820: 67 65 00 B0 20 EB 20 B1 27 29 3B A9 3B C2 B9 3B ge.. . .');.;..;
00B830: C2 89 3B C1 E7 3A 3D A1 3B C1 89 3B C0 E6 3A 3D ..;..:=.;..;..:=
00B840: B8 28 62 2E E8 29 2D 37 00 66 68 00 AB 3B C0 82 .(b..)-7.fh..;..
00B850: 20 E6 3E 30 20 95 C1 62 2E E8 3A 3D 37 AB 3B B4 .>0 ..b..:=7.;.
00B860: 28 2A 62 2E 78 20 B7 20 EB 20 CE 20 5B 30 2C 31 (*b.x . . . [0,1
00B870: 2F 33 32 5D 2A 29 C0 91 C1 E6 3A 3D 30 C1 89 3B /32]*)....:=0..;
00B880: C0 79 3A 3D 62 2E 78 2A 62 2E 78 3B C0 7A 3A 3D .y:=b.x*b.x;.z:=
00B890: 32 2E 30 30 30 31 31 31 34 31 35 38 39 39 36 34 2.00011141589964
00B8A0: 35 36 38 39 33 35 34 65 31 2A 79 2B 38 2E 34 30 5689354e1*y+8.40
00B8B0: 30 36 36 38 35 32 35 33 36 34 38 33 32 33 39 34 0668525364832394
00B8C0: 30 36 37 30 33 33 65 32 3B BF C0 79 3A 3D 31 2E 067033e2;..y:=1.
00B8D0: 30 2B 28 32 2E 30 2A 62 2E 78 2A 7A 29 2F 28 C3 0+(2.0*b.x*z)/(.
00B8E0: 28 28 79 2B 31 2E 38 30 30 31 33 33 37 30 34 30 ((y+1.8001337040
00B8F0: 37 33 39 30 30 32 32 38 30 35 33 39 65 32 29 2A 739002280539e2)*
00B900: 61 62 6C 79 00 E1 20 72 61 72 65 2A 29 C0 82 20 ably.. rare*)..
00B910: 78 3E E2 20 95 C1 E7 3A 3D 8C 20 E7 3B C1 78 3A x>. ...:=. .;.x:
00B920: 3D 78 2D E2 3B C1 89 3B C0 82 20 78 3E 28 E2 2A =x-.;..;.. x>(.*
00B930: 30 2E 35 29 20 95 C1 78 3A 3D E2 2D 78 3B C1 89 0.5) ..x:=.-x;..
00B940: 3B C0 78 3A 3D 32 2E 30 2A 4F 6E 65 4F 6E 50 49 ;.x:=2.0*OneOnPI
00B950: 2A 78 3B C0 79 3A 3D 78 2A 78 3B C0 79 3A 3D 20 *x;.y:=x*x;.y:=
00B960: 78 2A 28 28 28 28 28 2D 32 2E 32 37 36 37 37 39 x*(((((-2.276779
00B970: 36 35 39 38 38 37 36 37 36 31 39 37 36 33 65 2D 65988767619763e-
00B980: 33 2A 79 C1 2B 32 2E 35 37 33 38 34 36 30 39 38 3*y.+2.573846098
00B990: 33 31 31 36 30 31 39 39 36 30 31 38 32 65 2D 31 3116019960182e-1
00B9A0: 29 2A 79 C1 2D 31 2E 32 33 39 34 35 38 33 30 35 )*y.-1.239458305
00B9B0: 33 31 38 37 38 32 36 32 36 39 39 38 34 37 65 31 31878262699847e1
00B9C0: 29 2A 79 C1 2B 32 2E 38 33 34 38 35 36 38 32 30 )*y.+2.834856820
00B9D0: 36 37 37 31 32 37 32 34 33 35 37 36 32 38 34 65 677127243576284e
00B9E0: 32 29 2A 79 C1 2D 32 2E 37 30 37 37 32 36 37 35 2)*y.-2.70772675
00B9F0: 33 33 38 34 37 33 32 37 36 38 37 39 31 31 32 39 3384732768791129
00BA00: 34 65 33 29 2A 79 C1 2B 37 2E 30 32 34 38 33 30 4e3)*y.+7.024830
00BA10: 32 35 36 37 34 37 39 37 37 38 39 37 34 33 38 35 2567479778974385
00BA20: 33 35 38 65 33 29 C0 BC 2F 28 28 79 C1 2B 31 2E 358e3)../((y.+1.
00BA30: 31 35 33 30 33 38 37 31 32 33 36 31 34 35 36 31 1530387123614561
00BA40: 31 39 33 39 37 32 34 32 65 32 29 2A 79 C1 2B 34 19397242e2)*y.+4
00BA50: 2E 34 37 32 31 34 35 38 33 38 39 37 31 37 39 35 .472145838971795
00BA60: 38 33 39 37 31 35 32 39 32 36 65 33 29 3B C0 82 8397152926e3);..
00BA70: 20 E7 20 95 20 A7 20 2D 79 C0 91 20 A7 20 79 20 . . . -y.. . y
00BA80: 89 3B C0 89 20 E5 3B BF C0 BF BF AF 20 00 43 4F .;.. .;..... .CO
00BA90: 53 00 E0 28 41 3A E9 29 3A E9 3B BF 9C C0 A7 20 S..(A:.):.;....
00BAA0: E5 28 41 2B E2 2F 32 2E 30 29 3B B4 28 2A 00 63 .(A+./2.0);.(*.c
00BAB0: 61 6E 00 DF 20 00 64 6F 00 DE 20 62 65 74 74 65 an.. .do.. bette
00BAC0: 72 20 2D 20 65 67 20 E4 20 33 38 34 33 2A 29 C0 r - eg . 3843*).
00BAD0: 89 20 E0 3B BF AF 20 00 54 41 4E 00 DD 28 41 3A . .;.. .TAN..(A:
00BAE0: E9 29 3A E9 3B BF AF 20 00 41 70 70 72 6F 78 00 .):.;.. .Approx.
00BAF0: DC 28 41 3A E9 29 3A E9 3B BF BF 9C C0 78 3A 3D .(A:.):.;....x:=
00BB00: 79 2B C3 BA 31 2E 36 38 30 31 33 33 37 30 35 30 y+..1.6801337050
00BB10: 37 32 39 36 36 34 38 34 31 34 34 36 38 31 37 65 729664841446817e
00BB20: 33 29 C2 BD 2D 62 2E 78 2A 7A 29 3B C0 8A 20 E6 3)..-b.x*z);.. .
00BB30: 3A 3D 34 2A E6 20 86 20 31 20 80 20 2D 31 20 81 :=4*. . 1 . -1 .
00BB40: C1 79 3A 3D 79 2A 79 3B C1 89 3B B4 C0 82 20 E7 .y:=y*y;..;... .
00BB50: 20 95 20 79 3A 3D 31 2E 30 2F 79 20 89 3B C0 A7 . y:=1.0/y .;..
00BB60: 20 79 3B C0 89 20 B1 3B BF AF 20 CD 28 41 3A E9 y;.. .;.. .(A:.
00BB70: 29 3A E9 3B BF 8E B4 62 3A EA 3B BF 9C C0 82 20 ):.;...b:.;....
00BB80: 41 3D 30 2E 30 20 95 20 A7 20 41 20 89 3B C0 82 A=0.0 . . A .;..
00BB90: 20 41 3C 30 2E 30 20 95 C1 B3 28 27 20 C4 20 2D A<0.0 ...(' . -
00BBA0: 20 CD 20 D4 20 2D BB 20 27 29 3B C1 A9 3B C1 B9 . . -. ');..;..
00BBB0: 3B C1 89 3B C0 62 2E 78 3A 3D 41 3B C0 E6 3A 3D ;..;.b.x:=A;..:=
00BBC0: B8 28 62 2E E8 29 2D 38 30 68 3B C0 62 2E E8 3A .(b..)-80h;.b..:
00BBD0: 3D 38 30 68 3B C0 82 20 4F 44 44 28 E6 29 20 95 =80h;.. ODD(.) .
00BBE0: C1 E6 3A 3D E6 2B 31 3B C1 62 2E E8 3A 3D 37 AB ..:=.+1;.b..:=7.
00BBF0: C1 89 3B C0 28 2A B4 62 2E 78 20 B7 20 EB 20 5B ..;.(*.b.x . . [
00BC00: 30 2E 2E 31 2F 32 5D 2A 29 C0 78 3A 3D 62 2E 78 0..1/2]*).x:=b.x
00BC10: 3B C0 79 3A 3D 28 28 28 28 32 2E 39 37 35 33 30 ;.y:=((((2.97530
00BC20: 33 39 31 2A 78 29 2B C1 32 2E 30 32 37 37 32 34 391*x)+.2.027724
00BC30: 36 33 29 2A 78 2B C1 31 2E 30 39 35 34 32 34 30 63)*x+.1.0954240
00BC40: 35 65 2D 31 29 2A 78 2B C1 33 2E 31 36 32 33 35 5e-1)*x+.3.16235
00BC50: 65 2D 34 29 2F C1 C1 28 28 28 78 2B 33 2E 34 36 e-4)/..(((x+3.46
00BC60: 33 39 39 35 35 36 29 2A 78 2B C2 36 2E 34 31 32 399556)*x+.6.412
00BC70: 32 35 33 36 37 65 2D 31 29 2A 78 2B C2 39 2E 34 25367e-1)*x+.9.4
00BC80: 30 38 39 30 39 65 2D 33 29 3B BF C0 28 2A D8 20 08909e-3);..(*.
00BC90: D7 20 6F 75 72 20 66 69 72 73 74 20 67 75 65 73 . our first gues
00BCA0: 73 20 C8 20 61 20 00 72 65 73 75 6C 74 00 A8 2A s . a .result..*
00BCB0: 29 BF C0 A6 C1 7A 3A 3D 30 2E 35 2A 28 78 2F 79 )....z:=0.5*(x/y
00BCC0: 2D 79 29 3B C1 79 3A 3D 79 2B 7A 3B C1 9F 20 00 -y);.y:=y+z;.. .
00BCD0: 41 42 53 00 A2 28 7A 29 3C 31 2E 30 65 2D 31 35 ABS..(z)<1.0e-15
00BCE0: 3B C0 28 2A B4 B7 20 61 64 64 20 73 69 7A 65 20 ;.(*.. add size
00BCF0: B6 20 EB 20 2A 29 BF C0 82 20 E6 3C 3E 30 20 95 . . *)... .<>0 .
00BD00: 34 2E 30 2F E2 2A 41 3B C0 79 3A 3D 78 2A 78 3B 4.0/.*A;.y:=x*x;
00BD10: C0 79 3A 3D 20 78 2A 28 28 28 28 33 2E 33 38 36 .y:= x*((((3.386
00BD20: 36 33 38 36 34 32 36 37 37 31 37 32 30 39 36 30 6386426771720960
00BD30: 37 36 33 36 39 65 2D 35 2A 79 2B C0 BE 33 2E 34 76369e-5*y+..3.4
00BD40: 32 32 35 35 34 33 38 37 32 34 31 30 30 33 34 33 2255438724100343
00BD50: 35 33 32 38 34 37 30 34 38 39 65 2D 32 29 2A 79 5328470489e-2)*y
00BD60: 2D C0 BE 31 2E 35 35 30 36 38 35 36 35 33 34 38 -..1.55068565348
00BD70: 33 32 36 36 33 37 36 39 34 31 37 30 35 37 32 38 3266376941705728
00BD80: 65 31 29 2A 79 2B C0 BE 31 2E 30 35 35 39 37 30 e1)*y+..1.055970
00BD90: 39 30 31 37 31 34 39 35 33 31 39 33 36 30 32 33 9017149531936023
00BDA0: 35 33 39 38 31 65 33 29 2A 79 2D C0 BE 31 2E 33 53981e3)*y-..1.3
00BDB0: 30 36 38 32 30 32 36 34 37 35 34 38 32 35 36 36 0682026475482566
00BDC0: 38 32 36 39 36 31 31 31 37 37 65 34 29 2F C1 28 8269611177e4)/.(
00BDD0: 28 28 79 2D 31 2E 35 35 35 30 33 33 31 36 34 30 ((y-1.5550331640
00BDE0: 33 31 37 30 39 39 36 36 39 30 30 31 32 34 35 37 3170996690012457
00BDF0: 34 65 32 29 2A 79 2B C0 BE BA 34 2E 37 36 35 37 4e2)*y+...4.7657
00BE00: 35 31 33 36 32 39 31 36 34 38 33 36 39 38 39 32 5136291648369892
00BE10: 36 36 35 35 35 38 31 65 33 29 2A 79 2D C0 BE BA 6655581e3)*y-...
00BE20: 31 2E 36 36 33 38 39 35 32 33 38 39 34 37 31 31 1.66389523894711
00BE30: 39 30 30 31 38 35 31 34 36 34 36 36 31 65 34 29 9001851464661e4)
00BE40: 3B C0 A7 20 79 3B C0 89 20 DC 3B BF 9C C0 28 2A ;.. y;.. .;...(*
00BE50: E4 20 E3 20 34 32 38 35 2A 29 C0 82 20 41 3C 30 . . 4285*).. A<0
00BE60: 2E 30 20 95 C1 78 3A 3D 2D 41 3B C1 E7 3A 3D 9A .0 ..x:=-A;..:=.
00BE70: C0 91 C1 78 3A 3D 41 3B C1 E7 3A 3D A1 C1 89 3B ...x:=A;..:=...;
00BE80: C0 A0 20 28 78 3E E2 29 20 81 20 78 3A 3D 78 2D .. (x>.) . x:=x-
00BE90: E2 20 89 3B C0 82 20 78 3E 28 E2 2F 32 2E 30 29 . .;.. x>(./2.0)
00BEA0: 20 95 C1 78 3A 3D E2 2D 78 3B C1 E7 3A 3D 8C 20 ..x:=.-x;..:=.
00BEB0: E7 3B C1 89 3B C0 82 20 78 3E 28 E2 2F 34 2E 30 .;..;.. x>(./4.0
00BEC0: 29 20 95 20 C1 78 3A 3D 28 E2 2F 32 2E 30 2D 78 ) . .x:=(./2.0-x
00BED0: 29 3B C1 82 20 78 3C 31 2E 30 65 2D 31 34 30 20 );.. x<1.0e-140
00BEE0: 95 20 C2 B3 28 27 DD 20 00 74 6F 6F 00 DB 20 63 . ..('. .too.. c
00BEF0: 6C 6F 73 65 20 00 74 6F 00 DA 20 E2 2F 32 27 29 lose .to.. ./2')
00BF00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00BF10: 0A 00 00 00 02 09 4E E5 0A 00 41 02 00 00 00 02 ......N...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: C1 62 2E 78 3A 3D 79 3B C1 62 2E E8 3A 3D E6 20 .b.x:=y;.b..:=.
00C010: 88 20 32 2B B8 28 62 2E E8 29 3B C1 A7 20 62 2E . 2+.(b..);.. b.
00C020: 78 C0 91 B4 C1 A7 20 79 3B C1 89 3B C0 89 20 CD x..... y;..;.. .
00C030: 3B BF BF 28 2A B4 00 54 68 69 73 00 9D 20 65 76 ;..(*..This.. ev
00C040: 61 6C 75 61 74 69 6F 6E 20 D4 20 00 41 52 43 54 aluation . .ARCT
00C050: 41 4E 00 99 20 66 6F 6C 6C 6F 77 73 20 D6 20 EC AN.. follows . .
00C060: 20 00 61 6C 67 6F 72 69 74 68 6D 00 98 20 35 30 .algorithm.. 50
00C070: 37 36 BF C0 52 65 61 64 20 61 6C 73 6F 20 D6 20 76..Read also .
00C080: 64 65 73 69 67 6E 20 D4 20 98 20 73 65 63 74 69 design . . secti
00C090: 6F 6E 20 00 6F 6E 00 97 20 70 61 67 65 20 31 32 on .on.. page 12
00C0A0: 35 BF C0 57 65 20 D5 20 73 3D 32 BF C0 58 30 3D 5..We . s=2..X0=
00C0B0: DD 28 30 29 C0 58 31 3D DD 28 E2 2F 38 29 C0 58 .(0).X1=.(./8).X
00C0C0: 32 3D DD 28 E2 2F 34 29 20 28 3D 31 2E 30 29 C0 2=.(./4) (=1.0).
00C0D0: 58 33 3D DD 28 E2 2F 32 2E 30 29 20 28 3D 00 69 X3=.(./2.0) (=.i
00C0E0: 6E 66 69 6E 69 74 79 00 94 29 C0 78 32 3D DD 28 nfinity..).x2=.(
00C0F0: E2 2F 34 29 C0 78 33 3D DD 28 E2 2F 32 2E 30 29 ./4).x3=.(./2.0)
00C100: 20 28 3D 94 29 20 2A 29 C1 BF AF 20 99 28 41 3A (=.) *)... .(A:
00C110: E9 29 3A E9 3B BF BF 28 2A B4 EC 20 46 75 6E 63 .):.;..(*.. Func
00C120: 74 69 6F 6E 20 41 52 43 54 4E 20 35 30 37 36 20 tion ARCTN 5076
00C130: 2A 29 BF 8E B4 E7 3A AC 3B BF AF 20 DC 28 78 3A *)....:.;.. .(x:
00C140: E9 29 3A E9 3B BF BF 28 2A 54 68 65 20 70 6F 6C .):.;..(*The pol
00C150: 79 6E 6F 6D 69 61 6C 20 61 70 70 72 6F 78 69 6D ynomial approxim
00C160: 61 74 69 6F 6E 20 DA 20 99 20 97 20 5B 30 2E 2E ation . . . [0..
00C170: E2 2F 38 5D 20 2A 29 BF 9C C0 79 3A 3D 78 2A 78 ./8] *)...y:=x*x
00C180: 3B C0 A7 20 78 2A 28 28 28 28 30 2E 31 35 38 39 ;.. x*((((0.1589
00C190: 37 34 30 32 38 38 34 38 32 33 30 37 30 34 38 2A 740288482307048*
00C1A0: 79 2B 36 2E 36 36 30 35 37 39 30 31 37 30 30 39 y+6.660579017009
00C1B0: 32 36 32 36 35 37 35 33 29 2A 79 C1 2B 34 30 2E 26265753)*y.+40.
00C1C0: 39 36 39 32 36 34 38 33 32 31 30 32 32 35 36 33 9692648321022563
00C1D0: 37 34 31 38 36 29 2A 79 2B 37 37 2E 34 37 37 36 74186)*y+77.4776
00C1E0: 38 37 37 31 39 32 30 34 32 30 38 36 31 36 34 38 8771920420861648
00C1F0: 31 29 2A 79 C1 2B 34 34 2E 35 34 31 33 34 30 30 1)*y.+44.5413400
00C200: 6F 6E 6E 65 63 74 00 F9 2C 00 53 54 52 45 41 4D onnect..,.STREAM
00C210: 00 F8 2C 00 69 6E 70 75 74 00 F7 2C 00 6F 75 74 ..,.input..,.out
00C220: 70 75 74 00 F6 2C 57 72 69 74 65 43 68 61 72 2C put..,WriteChar,
00C230: C1 00 52 65 61 64 43 68 61 72 00 F5 2C 00 52 65 ..ReadChar..,.Re
00C240: 61 64 57 6F 72 64 00 F4 2C 00 52 65 61 64 52 65 adWord..,.ReadRe
00C250: 63 00 F3 2C 00 57 72 69 74 65 57 6F 72 64 00 F2 c..,.WriteWord..
00C260: 2C 00 57 72 69 74 65 52 65 63 00 F1 2C 00 45 4F ,.WriteRec..,.EO
00C270: 53 00 F0 3B BF 93 20 47 65 74 46 69 6C 65 73 20 S..;.. GetFiles
00C280: A3 20 00 47 65 74 4E 61 6D 65 73 00 EF 3B BF 93 £ .GetNames..;..
00C290: 20 AE 20 A3 20 B3 2C A9 2C 00 45 72 72 6F 72 45 . £ .,.,.ErrorE
00C2A0: 78 69 74 00 EE 3B BF 93 20 53 6F 72 74 20 A3 20 xit..;.. Sort £
00C2B0: 00 53 6F 72 74 52 65 63 6F 72 64 73 00 ED 3B BF .SortRecords..;.
00C2C0: 9D B4 46 46 3D 30 63 78 3B C0 54 41 42 3D 30 39 ..FF=0cx;.TAB=09
00C2D0: 78 3B C0 4C 46 3D 30 61 78 3B C0 43 52 3D 30 64 x;.LF=0ax;.CR=0d
00C2E0: 78 3B C0 00 4D 61 78 49 6D 70 6F 72 74 73 00 EC x;..MaxImports..
00C2F0: 3D 32 30 3B B6 28 2A 6D 61 78 20 00 69 6D 70 6F =20;.(*max .impo
00C300: 72 74 73 00 EB 20 61 6C 6C 6F 77 65 64 20 62 79 rts.. allowed by
00C310: 20 61 20 00 6D 6F 64 75 6C 65 00 EA 2A 29 C0 00 a .module..*)..
00C320: 4D 61 78 4D 6F 64 75 6C 65 73 00 E9 3D 31 30 30 MaxModules..=100
00C330: 3B BF 96 20 B4 00 50 46 69 6C 65 4E 61 6D 65 00 ;.. ..PFileName.
00C340: E8 3D A8 20 86 20 FE 3B BF 8E B4 C0 00 72 65 70 .=. . .;.....rep
00C350: 6C 79 00 E7 3A AA 3B C0 69 2C 6A 3A AA 3B C0 6B ly..:.;.i,j:.;.k
00C360: 3A AD 3B C0 63 3A AD 3B C0 00 49 6E 73 00 E6 3A :.;.c:.;..Ins..:
00C370: F8 3B C0 00 49 6E 66 00 E5 3A FD 3B C0 00 63 68 .;..Inf..:.;..ch
00C380: 00 E4 3A 99 3B B6 28 2A 6C 6F 6F 6B 20 61 68 65 ..:.;.(*look ahe
00C390: 61 64 20 63 68 61 72 61 63 74 65 72 20 01 08 20 ad character ..
00C3A0: F7 20 01 0B 2A 29 BF BF 96 B4 C0 00 49 64 65 6E . ..*)......Iden
00C3B0: 74 00 E3 3D 9B 5B 31 2E 2E 38 5D 20 84 20 99 3B t..=.[1..8] . .;
00C3C0: C0 00 50 72 65 63 54 61 62 6C 65 00 E2 3D A5 C1 ..PrecTable..=..
00C3D0: 00 4E 61 6D 65 00 E1 3A E3 3B C1 00 44 65 66 4D .Name..:.;..DefM
00C3E0: 6F 64 75 6C 65 00 E0 3A AC 3B C1 00 49 6D 70 6F odule..:.;..Impo
00C3F0: 72 74 43 6F 75 6E 74 00 DF 3A 5B 30 2E 2E EC 5D rtCount..:[0...]
00C400: 35 39 32 39 30 36 38 30 33 31 39 37 35 31 31 29 592906803197511)
00C410: 2F C1 28 28 28 28 79 2B 31 35 2E 35 30 33 39 37 /.((((y+15.50397
00C420: 37 35 35 31 34 32 31 39 38 37 35 32 35 32 33 29 755142198752523)
00C430: 2A 79 2B 36 32 2E 38 33 35 39 33 30 35 31 31 30 *y+62.8359305110
00C440: 33 32 33 37 36 38 33 33 32 36 37 29 2A 79 C1 2B 32376833267)*y.+
00C450: 39 32 2E 33 32 34 38 30 31 30 37 32 33 30 30 39 92.3248010723009
00C460: 37 34 38 34 30 36 39 33 29 2A 79 2B 34 34 2E 35 74840693)*y+44.5
00C470: 34 31 33 34 30 30 35 39 32 39 30 36 38 30 34 34 4134005929068044
00C480: 34 35 39 39 35 29 BF BF 28 2A B4 41 6C 74 65 72 45995)..(*.Alter
00C490: 6E 61 74 69 76 65 20 CB 20 67 72 65 61 74 65 72 native . greater
00C4A0: 20 61 63 63 75 72 61 63 79 20 2D 20 CC 20 D0 20 accuracy - . .
00C4B0: 74 65 73 74 65 64 20 BF C0 A7 20 78 2A 28 28 28 tested ... x*(((
00C4C0: 28 28 28 30 2E 30 39 37 36 32 37 32 31 35 39 31 (((0.09762721591
00C4D0: 37 31 37 36 33 33 30 33 36 39 38 33 2A 79 2B C2 717633036983*y+.
00C4E0: 31 31 2E 33 32 32 31 35 39 34 31 31 36 37 36 34 11.3221594116764
00C4F0: 36 35 35 32 33 36 32 34 35 29 2A 79 2B C2 31 39 655236245)*y+.19
00C500: 32 2E 35 37 39 32 30 31 34 34 38 31 35 35 39 36 2.57920144815596
00C510: 31 33 34 37 34 32 38 36 29 2A 79 2B C2 31 31 31 13474286)*y+.111
00C520: 34 2E 31 32 39 30 37 32 38 34 35 35 31 38 33 35 4.12907284551835
00C530: 34 36 31 37 32 39 34 32 29 2A 79 2B C2 32 37 36 46172942)*y+.276
00C540: 31 2E 37 31 39 38 32 34 36 31 33 38 38 33 34 39 1.71982461388349
00C550: 35 39 30 35 33 37 38 34 29 2A 79 2B C2 33 30 33 59053784)*y+.303
00C560: 31 2E 30 37 34 35 39 35 36 31 31 35 30 38 33 30 1.07459561150830
00C570: 34 34 32 31 32 38 30 37 29 2A 79 2B C2 31 32 30 44212807)*y+.120
00C580: 39 2E 37 34 37 30 30 31 37 35 38 30 39 30 37 32 9.74700175809072
00C590: 31 37 32 34 30 37 31 35 29 2F C1 28 28 28 28 28 17240715)/.(((((
00C5A0: 28 79 2B 33 39 2E 39 31 37 38 38 34 32 34 38 36 (y+39.9178842486
00C5B0: 35 33 37 39 38 31 35 30 31 39 39 39 29 2A 79 2B 537981501999)*y+
00C5C0: C2 34 32 33 2E 30 37 31 36 34 36 34 38 30 39 30 .423.07164648090
00C5D0: 34 37 38 30 34 35 32 34 32 30 36 29 2A 79 2B C2 47804524206)*y+.
00C5E0: 31 38 32 31 2E 36 30 30 33 33 39 32 39 31 38 34 1821.60033929184
00C5F0: 36 34 39 34 31 35 30 39 32 32 35 29 2A 79 2B C2 64941509225)*y+.
00C600: 3B C1 00 49 6D 70 6F 72 74 73 00 DE 3A 9B 5B 30 ;..Imports..:.[0
00C610: 2E 2E EC 5D 20 84 20 AD 3B C1 89 3B C0 00 43 68 ...] . .;..;..Ch
00C620: 61 72 53 65 74 00 DD 3D 8D 20 84 20 99 3B BF 8E arSet..=. . .;..
00C630: B4 01 05 3A 9B 5B 31 2E 2E E9 5D 20 84 20 E2 3B ...:.[1...] . .;
00C640: B5 C0 00 50 72 65 63 43 6F 75 6E 74 00 DC 3A AD ...PrecCount..:.
00C650: 3B C0 00 43 75 72 72 65 6E 74 4D 6F 64 75 6C 65 ;..CurrentModule
00C660: 00 DB 3A AD 3B B5 28 2A 00 4D 6F 64 75 6C 65 00 ..:.;.(*.Module.
00C670: DA 20 62 65 69 6E 67 20 65 78 61 6D 69 6E 65 64 . being examined
00C680: 2A 29 C0 00 50 72 65 63 46 00 D9 3A FD 3B C0 00 *)..PrecF..:.;..
00C690: 50 72 65 63 53 00 D8 3A F8 3B C0 00 49 64 00 D7 PrecS..:.;..Id..
00C6A0: 3A E3 3B C0 00 53 74 6F 70 57 6F 72 64 73 00 D6 :.;..StopWords..
00C6B0: 3A 9B 5B 30 2E 2E 36 5D 20 84 20 E3 3D 5B C1 27 :.[0..6] . .=[.'
00C6C0: 9C BB 27 2C C1 27 96 BC 27 2C C1 27 9D BB 27 2C ..',.'..',.'..',
00C6D0: C1 27 8E BD 27 2C C1 27 50 52 4F 43 45 44 55 52 .'..',.'PROCEDUR
00C6E0: 27 2C C1 27 BE BA 27 5D 3B BF AF 20 00 44 69 73 ',.'..'];.. .Dis
00C6F0: 70 6C 61 79 52 65 73 75 6C 74 73 00 D5 3B BF 8E playResults..;..
00C700: B4 69 3A AD 3B BF 9C C0 8A 20 69 3A 3D 31 20 86 .i:.;.... i:=1 .
00C710: 20 DC 20 81 C1 97 20 01 05 5B 69 5D 20 81 C2 B3 . ... ..[i] ...
00C720: 28 E1 29 3B C2 B3 28 27 BA 27 29 3B C2 82 20 E0 (.);..('.');.. .
00C730: 20 95 C3 B3 28 27 2E 00 44 45 46 00 D4 20 27 29 ...('..DEF.. ')
00C740: C2 91 20 B3 28 27 2E 8B 20 27 29 20 89 3B C2 6B .. .('.. ') .;.k
00C750: 3A 3D 31 36 3B C2 8A 20 6A 3A 3D 30 20 86 20 DF :=16;.. j:=0 . .
00C760: 2D 31 20 81 C3 82 20 6B 3E 37 35 20 95 C3 B4 A9 -1 ... k>75 ....
00C770: 3B C3 B4 B3 28 27 BE BE BA 27 29 3B C3 B4 6B 3A ;...('...');..k:
00C780: 3D 31 30 C3 B4 89 3B C3 B3 28 01 05 5B DE 5B 6A =10...;..(..[.[j
00C790: 5D 5D 2E E1 29 3B C3 B3 28 27 BA 27 29 3B C3 6B ]]..);..('.');.k
00C7A0: 3A 3D 6B 2B 31 30 3B C3 89 3B 28 2A 8A 20 6A 2A :=k+10;..;(*. j*
00C7B0: 29 C2 89 3B 28 2A 97 2A 29 C1 A9 3B C1 89 20 28 )..;(*.*)..;.. (
00C7C0: 2A 8A 20 69 2A 29 C0 89 20 D5 3B 20 BF AF 20 00 *. i*).. .; .. .
00C7D0: 47 65 74 45 78 69 73 74 69 6E 67 54 61 62 6C 65 GetExistingTable
00C7E0: 00 D3 3B BF 28 2A B4 4C 6F 61 64 20 61 6E 20 65 ..;.(*.Load an e
00C7F0: 78 69 73 74 69 6E 67 20 01 0E 20 01 0D C0 63 6C xisting .. ...cl
00C800: 33 36 36 34 2E 35 34 34 39 35 36 33 32 38 33 37 3664.54495632837
00C810: 34 39 38 39 33 35 30 34 37 39 36 29 2A 79 2B C2 49893504796)*y+.
00C820: 33 34 33 34 2E 33 32 33 35 39 36 31 39 37 35 33 3434.32359619753
00C830: 35 31 37 31 36 35 34 37 30 36 39 29 2A 79 2B C2 51716547069)*y+.
00C840: 31 32 30 39 2E 37 34 37 30 30 31 37 35 38 30 39 1209.74700175809
00C850: 30 37 32 38 37 35 31 34 31 39 37 29 BF 2A 29 B5 07287514197).*).
00C860: C0 89 20 DC 3B BF 9C C0 82 20 41 3C 30 2E 30 20 .. .;.... A<0.0
00C870: 95 C1 E7 3A 3D 9A 3B C1 41 3A 3D 2D 41 3B C0 91 ...:=.;.A:=-A;..
00C880: C1 E7 3A 3D A1 3B C1 89 3B BF C0 28 2A B4 42 65 ..:=.;..;..(*.Be
00C890: 63 61 75 73 65 20 00 73 6D 61 6C 6C 00 92 20 00 cause .small.. .
00C8A0: 76 61 6C 75 65 73 00 8F 20 63 61 75 73 65 20 74 values.. cause t
00C8B0: 72 6F 75 62 6C 65 20 CB 20 D6 20 66 6F 6C 6C 6F rouble . . follo
00C8C0: 77 69 6E 67 C1 66 6F 72 6D 75 6C 61 65 2C 20 ED wing.formulae, .
00C8D0: 20 62 65 63 61 75 73 65 20 D6 20 73 6C 6F 70 65 because . slope
00C8E0: 20 D4 20 99 20 D7 20 31 20 C8 20 D6 20 C1 6F 72 . . . 1 . . .or
00C8F0: 69 67 69 6E 2C 20 C7 20 92 20 8F 20 D4 20 41 20 igin, . . . . A
00C900: 77 65 20 6C 65 74 20 99 28 41 29 3D 41 20 2A 29 we let .(A)=A *)
00C910: C0 C0 82 20 41 3E 31 2E 30 45 2D 37 30 20 95 20 ... A>1.0E-70 .
00C920: BF C1 28 2A B4 52 65 64 75 63 65 20 CE 20 DA 20 ..(*.Reduce . .
00C930: C9 20 EB 20 5B 30 2E 2E DD 28 E2 2F 38 29 5D 2A . . [0...(./8)]*
00C940: 29 C1 82 20 41 3D 31 2E 30 20 95 20 41 3A 3D E2 ).. A=1.0 . A:=.
00C950: 2F 34 2E 30 C1 9E 20 41 3E 31 2E 30 20 95 C2 41 /4.0.. A>1.0 ..A
00C960: 3A 3D E2 2F 32 2E 30 2D 99 28 31 2E 30 2F 41 29 :=./2.0-.(1.0/A)
00C970: C1 9E 20 41 3E 3D 30 2E 34 31 34 32 31 33 35 36 .. A>=0.41421356
00C980: 32 33 37 33 30 39 35 30 34 38 38 20 28 2A DD 28 23730950488 (*.(
00C990: E2 2F 38 29 2A 29 20 95 C2 41 3A 3D E2 2F 34 2E ./8)*) ..A:=./4.
00C9A0: 30 2D DC 28 32 2E 30 2F 28 31 2E 30 2B 41 29 2D 0-.(2.0/(1.0+A)-
00C9B0: 31 2E 30 29 C1 91 C2 41 3A 3D DC 28 41 29 3B C2 1.0)...A:=.(A);.
00C9C0: 89 3B C1 89 3B C0 82 20 E7 20 95 20 A7 20 2D 41 .;..;.. . . . -A
00C9D0: C0 91 20 A7 20 41 20 89 3B C0 89 20 99 3B BF AF .. . A .;.. .;..
00C9E0: 20 99 32 28 59 2C 58 3A E9 29 3A E9 3B BF 8E B4 .2(Y,X:.):.;...
00C9F0: 00 51 75 61 64 72 61 6E 74 00 8D 3A AD 3B 20 BF .Quadrant..:.; .
00CA00: 65 61 72 20 01 0D 20 00 69 66 00 D2 20 6E 6F 6E ear .. .if.. non
00CA10: 65 20 00 66 6F 75 6E 64 00 D1 2A 29 BF 8E B4 77 e .found..*)...w
00CA20: 3A 01 00 3B BF 9C C0 FC 28 D9 2C 27 00 50 52 45 :..;....(.,'.PRE
00CA30: 43 45 44 45 4E 00 D0 2E 00 44 41 54 00 CF 20 27 CEDEN....DAT.. '
00CA40: 2C E7 29 3B C0 82 20 E7 3C 3E 30 20 95 C1 DC 3A ,.);.. .<>0 ...:
00CA50: 3D 30 C0 91 C1 FA 28 D8 2C D9 2C F7 29 3B C1 F4 =0....(.,.,.);..
00CA60: 28 D8 2C 77 29 3B C1 DC 3A 3D 77 3B C1 F3 28 D8 (.,w);..:=w;..(.
00CA70: 2C 8F 28 01 05 29 2C 01 01 28 E2 29 2A DC 2C E7 ,.(..),..(.)*.,.
00CA80: 29 3B C1 F9 28 D8 2C 9A 29 3B B4 C1 89 C0 89 20 );..(.,.);.....
00CA90: D3 3B BF AF 20 00 57 72 69 74 65 54 61 62 6C 65 .;.. .WriteTable
00CAA0: 00 CE 3B BF 9C C0 FB 28 D9 2C 27 D0 2E CF 20 27 ..;....(.,'... '
00CAB0: 2C E7 29 3B C0 82 20 E7 3C 3E 30 20 95 C1 EE 28 ,.);.. .<>0 ...(
00CAC0: 27 20 F6 20 64 69 73 63 20 66 75 6C 6C 27 29 3B ' . disc full');
00CAD0: BF 20 B4 91 C1 FA 28 D8 2C D9 2C F6 29 3B C1 F2 . ....(.,.,.);..
00CAE0: 28 D8 2C DC 29 3B C1 F1 28 D8 2C 8F 28 01 05 29 (.,.);..(.,.(..)
00CAF0: 2C 01 01 28 E2 29 2A DC 2C E7 29 3B C1 F9 28 D8 ,..(.)*.,.);..(.
00CB00: 2C 9A 29 3B C1 89 C0 89 20 CE 3B BF AF 20 00 53 ,.);.... .;.. .S
00CB10: 74 6F 70 57 6F 72 64 00 CD 28 29 3A AC 3B BF 8E topWord..():.;..
00CB20: B4 69 3A AD 3B BF 9C C0 D6 5B 98 28 D6 29 5D 3A .i:.;....[.(.)]:
00CB30: 3D D7 3B C0 69 3A 3D 30 3B C0 A0 20 D6 5B 69 5D =.;.i:=0;.. .[i]
00CB40: 3C 3E D7 20 81 20 00 49 4E 43 00 CC 28 69 29 20 <>. . .INC..(i)
00CB50: 89 3B C0 A7 20 69 3C 3E 98 28 D6 29 C0 89 20 CD .;.. i<>.(.).. .
00CB60: 3B BF AF 20 00 53 6B 69 70 43 6F 6D 6D 65 6E 74 ;.. .SkipComment
00CB70: 00 CB 3B BF 9C C0 94 C1 82 20 F0 28 E6 29 20 95 ..;...... .(.) .
00CB80: 20 92 20 89 3B C1 F5 28 E6 2C E4 29 3B C1 82 20 . .;..(.,.);..
00CB90: E4 3D 27 2A 27 20 95 C2 F5 28 E6 2C E4 29 3B C2 .='*' ...(.,.);.
00CBA0: 82 20 E4 3D 27 29 27 20 95 20 92 20 89 3B C1 9E . .=')' . . .;..
00CBB0: 20 E4 3D 27 28 27 20 95 C2 F5 28 E6 2C E4 29 3B .='(' ...(.,.);
00CBC0: C2 82 20 E4 3D 27 2A 27 20 95 20 CB 20 89 3B C2 .. .='*' . . .;.
00CBD0: 89 3B 28 2A E4 3D 27 2A 27 2A 29 3B C1 89 3B C0 .;(*.='*'*);..;.
00CBE0: 89 20 CB 3B BF AF 20 00 47 65 74 49 64 00 CA 3B . .;.. .GetId..;
00CBF0: BF BF 28 2A B4 52 65 61 64 20 01 02 20 6E 65 78 ..(*.Read .. nex
00CC00: 9C C0 82 20 28 58 3E 3D 30 2E 30 29 20 95 C1 82 ... (X>=0.0) ...
00CC10: 20 59 3E 3D 30 2E 30 20 95 20 8D 3A 3D 31 C1 91 Y>=0.0 . .:=1..
00CC20: C2 59 3A 3D 2D 59 3B C2 8D 3A 3D 34 3B C2 89 C0 .Y:=-Y;..:=4;...
00CC30: 91 C1 58 3A 3D 2D 58 3B C1 82 20 59 3E 3D 30 2E ..X:=-X;.. Y>=0.
00CC40: 30 20 95 20 8D 3A 3D 32 C1 91 C2 59 3A 3D 2D 59 0 . .:=2...Y:=-Y
00CC50: 3B C2 8D 3A 3D 33 3B C2 89 3B C1 89 3B C0 28 2A ;..:=3;..;..;.(*
00CC60: B4 43 68 65 63 6B 20 69 66 20 D6 20 64 69 76 69 .Check if . divi
00CC70: 73 69 6F 6E 20 00 77 69 6C 6C 00 8B 20 6F 76 65 sion .will.. ove
00CC80: 72 66 6C 6F 77 BF C1 49 66 20 CA 20 8B 2C 20 73 rflow..If . ., s
00CC90: 65 74 20 A8 20 DA 20 C9 20 E2 2F 32 2E 30 20 BF et . . . ./2.0 .
00CCA0: C1 9D 20 D3 20 74 68 61 6E 20 99 32 28 30 2E 30 .. . than .2(0.0
00CCB0: 2C 30 2E 30 29 3D E2 2F 32 2E 30 2A 29 BF C0 82 ,0.0)=./2.0*)...
00CCC0: 20 58 3C 3D 31 2E 30 45 2D 31 35 30 2A 59 20 95 X<=1.0E-150*Y .
00CCD0: 20 78 3A 3D E2 2F 32 2E 30 C0 91 20 78 3A 3D 99 x:=./2.0.. x:=.
00CCE0: 28 59 2F 58 29 20 89 3B C0 90 20 8D 20 84 C1 31 (Y/X) .;.. . ..1
00CCF0: 3A A7 20 78 7C C1 32 3A A7 20 E2 2D 78 7C C1 33 :. x|.2:. .-x|.3
00CD00: 3A A7 20 E2 2B 78 7C C1 34 3A A7 20 32 2E 30 2A :. .+x|.4:. 2.0*
00CD10: E2 2D 78 C1 89 3B C0 89 20 99 32 3B BF AF 20 00 .-x..;.. .2;.. .
00CD20: 45 4E 54 49 45 52 00 87 28 78 3A E9 29 3A AA 3B ENTIER..(x:.):.;
00CD30: BF 8E B4 00 73 69 67 6E 00 85 3A AC 3B BF 9C C0 ....sign..:.;...
00CD40: 85 3A 3D 78 3C 30 2E 30 3B C0 78 3A 3D A2 28 78 .:=x<0.0;.x:=.(x
00CD50: 29 3B C0 82 20 78 3E 33 32 37 36 37 2E 30 2B B8 );.. x>32767.0+.
00CD60: 28 85 29 20 95 20 C1 B3 28 27 20 52 65 61 6C 20 (.) . ..(' Real
00CD70: DB 20 B0 20 EB 20 87 20 27 29 3B C1 A9 3B C1 B9 . . . . ');..;..
00CD80: 3B C1 89 3B C0 82 20 85 20 95 20 A7 20 2D 00 54 ;..;.. . . . -.T
00CD90: 52 55 4E 43 00 83 28 78 29 20 91 20 A7 20 83 28 RUNC..(x) . . .(
00CDA0: 78 29 20 89 3B C0 89 20 87 3B C0 BF 89 20 EF 2E x) .;.. .;... ..
00CDB0: BF 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CDC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CDD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CDE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CDF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CE00: 74 20 69 64 20 01 03 20 01 02 20 F7 20 01 0B BF t id .. .. . ...
00CE10: C0 4F 6E 6C 79 20 65 69 67 68 74 20 00 63 68 61 .Only eight .cha
00CE20: 72 61 63 74 65 72 73 00 C9 20 61 72 65 20 6B 65 racters.. are ke
00CE30: 70 74 2C 20 73 69 6E 63 65 20 74 68 61 74 20 00 pt, since that .
00CE40: 69 73 00 C8 20 01 02 20 6D 6F 73 74 C0 C9 20 00 is.. .. most.. .
00CE50: 69 6E 00 C7 20 61 20 01 0B 20 6E 61 6D 65 2C 20 in.. a .. name,
00CE60: 61 6E 64 20 75 70 70 65 72 20 63 61 73 65 20 C8 and upper case .
00CE70: 20 75 73 65 64 2A 29 BF 8E B4 69 3A AD 3B BF 9C used*)...i:.;..
00CE80: C0 69 3A 3D 30 3B C0 D7 3A 3D 27 BE BA 27 3B C0 .i:=0;..:='..';.
00CE90: A0 20 8C 20 28 E4 20 83 20 DD 7B 27 41 27 2E 2E . . (. . .{'A'..
00CEA0: 27 5A 27 2C 27 30 27 2E 2E 27 39 27 7D 29 20 87 'Z','0'..'9'}) .
00CEB0: 20 8C 20 F0 28 E6 29 20 81 20 C1 F5 28 E6 2C E4 . .(.) . ..(.,.
00CEC0: 29 3B C1 E4 3A 3D 00 43 41 50 00 C6 28 E4 29 3B );..:=.CAP..(.);
00CED0: C1 82 20 E4 3D 27 28 27 20 95 C2 F5 28 E6 2C E4 .. .='(' ...(.,.
00CEE0: 29 3B C2 82 20 E4 3D 27 2A 27 20 95 20 CB 20 89 );.. .='*' . . .
00CEF0: 3B C2 89 3B C1 89 3B C0 A0 20 28 E4 20 83 20 DD ;..;..;.. (. . .
00CF00: 7B 27 41 27 2E 2E 27 5A 27 2C 27 30 27 2E 2E 27 {'A'..'Z','0'..'
00CF10: 39 27 7D 29 20 87 20 8C 20 F0 28 E6 29 20 81 C1 9'}) . . .(.) ..
00CF20: CC 28 69 29 3B C1 82 20 69 3C 3D 98 28 D7 29 20 .(i);.. i<=.(.)
00CF30: 95 20 D7 5B 69 5D 3A 3D E4 20 89 3B C1 F5 28 E6 . .[i]:=. .;..(.
00CF40: 2C E4 29 3B C1 E4 3A 3D C6 28 E4 29 3B C1 89 3B ,.);..:=.(.);..;
00CF50: C0 89 20 CA 3B 20 B4 BF AF 20 00 53 6B 69 70 54 .. .; ... .SkipT
00CF60: 6F 53 65 6D 69 43 6F 6C 6F 6E 00 C5 3B BF 9C C0 oSemiColon..;...
00CF70: A0 20 28 E4 3C 3E 27 3B 27 29 20 87 20 8C 20 F0 . (.<>';') . . .
00CF80: 28 E6 29 20 81 C1 CA 3B C1 89 C0 89 20 C5 3B BF (.) ...;.... .;.
00CF90: AF 20 00 46 69 6E 64 4D 6F 64 75 6C 65 00 C4 28 . .FindModule..(
00CFA0: E1 3A E3 3B 00 49 73 44 45 46 00 B9 3A AC 29 3A .:.;.IsDEF..:.):
00CFB0: AD 3B BF BF 28 2A B4 46 69 6E 64 20 61 20 EA 2C .;..(*.Find a .,
00CFC0: 20 65 6E 74 65 72 20 69 74 20 D2 20 00 6E 6F 74 enter it . .not
00CFD0: 00 B8 20 D1 2A 29 BF BF 8E B4 69 3A AD 3B BF 9C .. .*)....i:.;..
00CFE0: C0 82 20 DC 3E 3D 98 28 01 05 29 20 95 C1 EE 28 .. .>=.(..) ...(
00CFF0: 27 20 01 05 20 01 0D 20 6F 76 65 72 66 6C 6F 77 ' .. .. overflow
00D000: 28 2A B4 4C 61 73 74 20 6D 6F 64 69 66 69 65 64 (*.Last modified
00D010: 20 32 30 20 6D 61 72 63 68 20 38 36 20 2A 29 BF 20 march 86 *).
00D020: A4 20 00 50 72 65 63 65 64 65 6E 63 65 00 01 0F . .Precedence...
00D030: 3B BF BF 28 2A C1 47 65 6E 65 72 61 74 65 20 61 ;..(*.Generate a
00D040: 20 00 70 72 65 63 65 64 65 6E 63 65 00 01 0E 20 .precedence...
00D050: 00 74 61 62 6C 65 00 01 0D 20 6F 66 20 6D 6F 64 .table... of mod
00D060: 75 6C 65 73 BF C1 53 79 73 74 65 6D 20 63 61 6C ules..System cal
00D070: 6C 3A BF C2 00 50 72 65 63 65 64 65 6E 00 01 0C l:...Preceden...
00D080: 20 3C 64 65 73 74 20 00 66 69 6C 65 00 01 0B 3E <dest .file...>
00D090: 20 3C 77 69 6C 64 20 63 61 72 64 73 3E 2E 2E 2E <wild cards>...
00D0A0: BF C1 00 50 61 72 61 6D 65 74 65 72 00 01 0A 20 ...Parameter...
00D0B0: 31 B5 01 0B 20 00 74 6F 00 01 09 20 72 65 63 65 1... .to... rece
00D0C0: 69 76 65 20 01 0E 20 01 0D C1 01 0A 20 32 20 75 ive .. ..... 2 u
00D0D0: 70 74 6F 20 31 30 B4 77 69 6C 64 63 61 72 64 73 pto 10.wildcards
00D0E0: 20 00 66 6F 72 00 01 08 20 00 66 69 6C 65 73 00 .for... .files.
00D0F0: 01 07 20 01 09 20 00 73 65 61 72 63 68 00 01 06 .. .. .search...
00D100: BF C1 65 2E 67 2E BF C2 01 0C 20 00 50 72 65 63 ..e.g..... .Prec
00D110: 00 01 05 2E 64 61 74 20 62 3A 2A 2E 6D 6F 64 20 ....dat b:*.mod
00D120: 62 3A 2A 2E 64 65 66 BF BF 2A 29 BF BF 28 2A B4 b:*.def..*)..(*.
00D130: 54 68 69 73 20 00 70 72 6F 67 72 61 6D 00 01 04 This .program...
00D140: 20 77 61 73 20 68 61 63 6B 65 64 20 00 66 72 6F was hacked .fro
00D150: 6D 00 01 03 20 00 74 68 65 00 01 02 20 4C 49 53 m... .the... LIS
00D160: 54 20 01 04 2A 29 BF BF 93 20 53 59 53 54 45 4D T ..*)... SYSTEM
00D170: 20 A3 20 AB 2C 8F 2C 00 54 53 49 5A 45 00 01 01 £ .,.,.TSIZE...
00D180: 2C 00 57 4F 52 44 00 01 00 3B BF 93 20 43 6F 6D ,.WORD...;.. Com
00D190: 6D 61 6E 64 20 A3 20 01 0A 2C 50 61 72 63 6C 61 mand £ ..,Parcla
00D1A0: 73 73 2C 00 47 65 74 50 61 72 61 6D 73 00 FF 3B ss,.GetParams..;
00D1B0: BF 93 20 46 69 6C 65 73 20 A3 20 00 46 69 6C 65 .. Files £ .File
00D1C0: 4E 61 6D 65 00 FE 2C 00 46 49 4C 45 00 FD 2C 00 Name..,.FILE..,.
00D1D0: 4C 6F 6F 6B 75 70 00 FC 2C 00 43 72 65 61 74 65 Lookup..,.Create
00D1E0: 00 FB 3B BF 93 20 53 74 72 65 61 6D 73 20 A3 20 ..;.. Streams £
00D1F0: 00 43 6F 6E 6E 65 63 74 00 FA 2C 00 44 69 73 63 .Connect..,.Disc
00D200: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00D210: 0B 00 00 00 02 09 4E E5 0B 00 41 02 00 00 00 02 ......N...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: 27 29 3B C1 89 3B C0 01 05 5B DC 2B 31 5D 2E E1 ');..;...[.+1]..
00D310: 3A 3D E1 3B C0 01 05 5B DC 2B 31 5D 2E E0 3A 3D :=.;...[.+1]..:=
00D320: B9 3B C0 69 3A 3D 31 3B C0 A0 20 28 01 05 5B 69 .;.i:=1;.. (..[i
00D330: 5D 2E E1 3C 3E E1 29 20 85 20 28 01 05 5B 69 5D ]..<>.) . (..[i]
00D340: 2E E0 3C 3E B9 29 20 81 20 CC 28 69 29 20 89 3B ..<>.) . .(i) .;
00D350: C0 82 20 69 3E DC 20 95 C1 DC 3A 3D 69 3B C1 97 .. i>. ...:=i;..
00D360: 20 01 05 5B DC 5D 20 81 C2 E0 3A 3D B9 3B C2 DF ..[.] ...:=.;..
00D370: 3A 3D 30 3B C2 89 3B C1 89 3B 28 2A 82 20 69 2A :=0;..;..;(*. i*
00D380: 29 C0 A7 20 69 C0 89 20 C4 3B BF AF 20 00 43 6F ).. i.. .;.. .Co
00D390: 6D 70 61 72 00 B7 28 61 2C 62 3A AB 29 3A AC 3B mpar..(a,b:.):.;
00D3A0: BF 8E B4 70 2C 71 3A E8 3B BF 9C C0 70 3A 3D E8 ...p,q:.;...p:=.
00D3B0: 28 61 29 3B C0 71 3A 3D E8 28 62 29 3B C0 A7 20 (a);.q:=.(b);..
00D3C0: 70 5E 3E 71 5E C0 89 20 B7 3B BF AF 20 00 53 63 p^>q^.. .;.. .Sc
00D3D0: 61 6E 4E 65 78 74 00 B2 3B BF 8E B4 69 2C 6A 3A anNext..;...i,j:
00D3E0: AD 3B BF 9C C0 CA 3B C0 69 3A 3D C4 28 D7 2C 9A .;....;.i:=.(.,.
00D3F0: 29 3B B4 28 2A 9A 20 62 65 63 61 75 73 65 20 D2 );.(*. because .
00D400: 20 77 65 20 6F 6E 6C 79 20 69 6D 70 6F 72 74 20 we only import
00D410: 01 03 20 64 65 66 73 2A 29 C0 97 20 01 05 5B DB .. defs*).. ..[.
00D420: 5D 20 81 C1 82 20 DF 3E 3D 98 28 DE 29 20 95 C2 ] ... .>=.(.) ..
00D430: B3 28 27 20 DA 20 27 29 3B C2 B3 28 E1 29 3B C2 .(' . ');..(.);.
00D440: B3 28 27 20 68 61 73 20 00 74 6F 6F 00 B1 20 00 .(' has .too.. .
00D450: 6D 61 6E 79 00 B0 20 EB 27 29 3B C2 A9 C1 91 C2 many.. .');.....
00D460: DE 5B DF 5D 3A 3D 69 3B C2 6A 3A 3D 30 3B C2 A0 .[.]:=i;.j:=0;..
00D470: 20 DE 5B 6A 5D 3C 3E 69 20 81 20 CC 28 6A 29 20 .[j]<>i . .(j)
00D480: 89 3B C2 82 20 6A 3D DF 20 95 20 CC 28 DF 29 C2 .;.. j=. . .(.).
00D490: 91 C3 B3 28 27 20 57 61 72 6E 69 6E 67 20 2D 20 ...(' Warning -
00D4A0: 27 29 3B C3 B3 28 E1 29 3B C3 B3 28 27 20 EB 20 ');..(.);..(' .
00D4B0: 27 29 3B C3 B3 28 D7 29 3B C3 B3 28 27 20 6D 6F ');..(.);..(' mo
00D4C0: 72 65 20 74 68 61 6E 20 6F 6E 63 65 27 29 3B C3 re than once');.
00D4D0: A9 3B C3 89 3B 20 28 2A D1 20 C7 20 01 0D 2A 29 .;..; (*. . ..*)
00D4E0: C2 89 3B 28 2A B8 20 B1 20 B0 2A 29 C1 89 3B 20 ..;(*. . .*)..;
00D4F0: 28 2A 97 2A 29 C0 89 20 B2 3B B5 BF AF 20 00 53 (*.*).. .;... .S
00D500: 00 20 20 20 20 20 20 20 20 20 20 20 00 00 07 00 . ....
00D510: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D520: 00 43 4F 4D 4D 41 4E 44 20 44 45 46 07 00 07 00 .COMMAND DEF....
00D530: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D540: 00 43 4F 4E 56 45 52 53 49 44 45 46 0E 00 05 00 .CONVERSIDEF....
00D550: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D560: 00 43 50 4D 20 20 20 20 20 44 45 46 13 00 0F 00 .CPM DEF....
00D570: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D580: 00 43 50 4D 42 49 4F 53 20 44 45 46 22 00 0D 00 .CPMBIOS DEF"...
00D590: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D5A0: 00 44 45 42 55 47 20 20 20 44 45 46 2F 00 04 00 .DEBUG DEF/...
00D5B0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D5C0: 00 45 58 43 48 41 4E 47 45 44 45 46 33 00 01 00 .EXCHANGEDEF3...
00D5D0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D5E0: 00 46 41 53 54 4D 4F 56 45 44 45 46 34 00 06 00 .FASTMOVEDEF4...
00D5F0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D600: 00 46 49 4C 45 53 20 20 20 44 45 46 3A 00 1C 00 .FILES DEF:...
00D610: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D620: 00 47 45 54 46 49 4C 45 53 44 45 46 56 00 05 00 .GETFILESDEFV...
00D630: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D640: 00 49 4E 4F 55 54 20 20 20 44 45 46 5B 00 1B 00 .INOUT DEF[...
00D650: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D660: 00 49 4E 54 4C 4F 47 49 43 44 45 46 76 00 01 00 .INTLOGICDEFv...
00D670: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D680: 00 4C 4F 41 44 45 52 20 20 44 45 46 77 00 03 00 .LOADER DEFw...
00D690: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D6A0: 00 4D 41 54 48 53 20 20 20 44 45 46 7A 00 09 00 .MATHS DEFz...
00D6B0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D6C0: 00 50 52 4F 43 45 53 53 45 44 45 46 83 00 16 00 .PROCESSEDEF....
00D6D0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D6E0: 00 51 55 49 43 4B 53 54 52 44 45 46 99 00 0C 00 .QUICKSTRDEF....
00D6F0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D700: 63 61 6E 46 69 6C 65 73 00 A2 3B BF 8E B4 00 50 canFiles..;....P
00D710: 61 72 61 6D 00 A1 3A 9B 20 5B 30 2E 2E 31 30 5D aram..:. [0..10]
00D720: 20 84 20 01 0A 3B C0 00 43 6F 75 6E 74 00 90 3A . ..;..Count..:
00D730: AA 3B C0 00 4E 61 6D 65 73 00 88 3A 9B 5B 30 2E .;..Names..:.[0.
00D740: 2E 31 30 30 5D 20 84 20 FE 3B C0 00 4E 61 6D 65 .100] . .;..Name
00D750: 43 6F 75 6E 74 00 80 3A AA 3B C0 6C 3A AA 3B BF Count..:.;.l:.;.
00D760: 9C C0 FF 28 A1 2C 90 29 3B C0 82 20 90 3D 30 20 ...(.,.);.. .=0
00D770: 95 C1 EE 28 27 20 55 73 61 67 65 3A 20 01 0C 20 ...(' Usage: ..
00D780: 3C 01 06 20 01 07 3E 27 29 3B C1 89 3B C0 8A 20 <.. ..>');..;..
00D790: 69 3A 3D 30 20 86 20 90 2D 31 20 81 C1 EF 28 A1 i:=0 . .-1 ...(.
00D7A0: 5B 69 5D 5E 2E 43 68 61 72 73 2C 88 2C 80 29 3B [i]^.Chars,.,.);
00D7B0: C1 82 20 80 3E 31 20 95 C2 ED 28 8F 28 88 29 2C .. .>1 ...(.(.),
00D7C0: AD 28 80 29 2C C3 01 01 28 FE 29 2C B7 29 3B C2 .(.),...(.),.);.
00D7D0: 89 3B C1 8A 20 6A 3A 3D 30 20 86 20 80 2D 31 20 .;.. j:=0 . .-1
00D7E0: 81 C2 FC 28 E5 2C 88 5B 6A 5D 2C E7 29 3B C2 82 ...(.,.[j],.);..
00D7F0: 20 E7 3C 30 20 95 C3 B3 28 27 20 43 6F 75 6C 64 .<0 ...(' Could
00D800: 20 B8 20 6F 70 65 6E 20 27 29 3B C3 B3 28 88 5B . open ');..(.[
00D810: 6A 5D 29 3B C3 A9 3B C2 91 C3 B3 28 27 20 53 63 j]);..;....(' Sc
00D820: 61 6E 6E 69 6E 67 3A 27 29 3B C3 B3 28 88 5B 6A anning:');..(.[j
00D830: 5D 29 3B C3 A9 3B C3 6B 3A 3D 30 3B C3 6C 3A 3D ]);..;.k:=0;.l:=
00D840: 31 3B C3 D7 3A 3D 27 BE BA 27 3B C3 82 20 88 5B 1;..:='..';.. .[
00D850: 6A 5D 5B 31 5D 3D 27 3A 27 20 95 20 6B 3A 3D 32 j][1]=':' . k:=2
00D860: 20 89 3B C3 A0 20 B5 28 88 5B 6A 5D 5B 6B 5D 3C .;.. .(.[j][k]<
00D870: 3E 27 2E 27 29 C3 B4 20 87 20 B4 28 88 5B 6A 5D >'.').. . .(.[j]
00D880: 5B 6B 5D 3C 3E 27 20 27 29 20 C3 B4 20 87 BC 28 [k]<>' ') .. ..(
00D890: 6B 3C 3D 98 28 D7 29 29 20 81 C3 B4 D7 5B 6C 5D k<=.(.)) ....[l]
00D8A0: 3A 3D 88 5B 6A 5D 5B 6B 5D 3B C3 B4 CC 28 6B 29 :=.[j][k];...(k)
00D8B0: 3B CC 28 6C 29 3B C3 B4 89 3B C3 DB 3A 3D C4 28 ;.(l);...;..:=.(
00D8C0: D7 2C E5 2E 66 2E 66 63 62 66 74 3D 27 D4 27 29 .,..f.fcbft='.')
00D8D0: 3B C3 01 05 5B DB 5D 2E DF 3A 3D 30 3B C3 FA 28 ;...[.]..:=0;..(
00D8E0: E6 2C E5 2C F7 29 3B C3 F5 28 E6 2C E4 29 3B C3 .,.,.);..(.,.);.
00D8F0: E4 3A 3D C6 28 E4 29 3B C3 94 C3 B4 82 20 F0 28 .:=.(.);..... .(
00D900: 00 52 45 41 4C 49 4E 4F 55 44 45 46 A5 00 15 00 .REALINOUDEF....
00D910: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D920: 00 53 45 54 55 50 43 41 4C 44 45 46 BA 00 04 00 .SETUPCALDEF....
00D930: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D940: 00 53 4D 41 4C 4C 49 4F 20 44 45 46 BE 00 0B 00 .SMALLIO DEF....
00D950: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D960: 00 53 4F 4C 56 45 20 20 20 44 45 46 C9 00 03 00 .SOLVE DEF....
00D970: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D980: 00 53 4F 52 54 20 20 20 20 44 45 46 CC 00 03 00 .SORT DEF....
00D990: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D9A0: 00 53 54 4F 52 41 47 45 20 44 45 46 CF 00 07 00 .STORAGE DEF....
00D9B0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D9C0: 00 53 54 52 45 41 4D 53 20 44 45 46 D6 00 14 00 .STREAMS DEF....
00D9D0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00D9E0: 00 53 54 52 49 4E 47 53 20 44 45 46 EA 00 0C 00 .STRINGS DEF....
00D9F0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00DA00: 00 54 45 52 4D 49 4E 41 4C 44 45 46 F6 00 0D 00 .TERMINALDEF....
00DA10: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00DA20: 00 50 4F 52 54 49 4F 20 20 44 45 46 03 01 04 00 .PORTIO DEF....
00DA30: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00DA40: 00 43 48 41 49 4E 20 20 20 44 45 46 07 01 02 00 .CHAIN DEF....
00DA50: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 ................
00DA60: 00 53 43 52 45 45 4E 49 4F 44 45 46 09 01 20 00 .SCREENIODEF.. .
00DA70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DA80: B2 20 A4 20 00 43 6F 6D 6D 61 6E 64 00 9D 3B BF . . .Command..;.
00DA90: BF 28 2A B4 9D 20 00 6C 69 6E 65 00 9C 20 70 72 .(*.. .line.. pr
00DAA0: 6F 63 65 73 73 6F 72 2A 29 BF 93 20 53 59 53 54 ocessor*).. SYST
00DAB0: 45 4D 20 A3 20 00 42 59 54 45 00 98 3B BF BF 96 EM £ .BYTE..;...
00DAC0: C0 00 50 61 72 63 6C 61 73 73 00 97 3D 28 00 6E ..Parclass..=(.n
00DAD0: 61 6D 65 00 95 2C 00 73 74 72 69 6E 67 00 94 2C ame..,.string..,
00DAE0: 00 6F 70 74 69 6F 6E 00 92 29 3B BF C0 28 2A B4 .option..);..(*.
00DAF0: 97 20 00 69 73 00 91 20 61 20 62 65 73 74 20 67 . .is.. a best g
00DB00: E6 29 20 95 20 92 20 89 3B C3 B4 CA 3B C3 B4 82 .) . . .;...;...
00DB10: 20 CD 28 29 20 95 20 92 20 89 3B C3 B4 82 20 D7 .() . . .;... .
00DB20: 3D 27 93 BC 27 20 95 C3 B5 B2 3B C3 B5 C5 3B C3 ='..' ....;...;.
00DB30: B4 9E 20 D7 3D 27 A3 BA 27 20 95 C3 B5 A6 20 C3 .. .='£.' .... .
00DB40: B6 B2 3B C3 B6 9F 20 F0 28 E6 29 20 C3 B6 BC 85 ..;... .(.) ....
00DB50: 20 28 E4 3D 27 3B 27 29 C3 B5 89 3B 28 2A 82 20 (.=';')...;(*.
00DB60: D7 3D 2A 29 C3 B4 89 3B 20 28 2A 94 2A 29 C3 F9 .=*)...; (*.*)..
00DB70: 28 E6 2C 9A 29 3B C3 89 3B 28 2A 82 20 E7 2A 29 (.,.);..;(*. .*)
00DB80: C2 89 3B 28 2A 8A 20 6A 2A 29 C1 89 3B 28 2A 8A ..;(*. j*)..;(*.
00DB90: 20 69 2A 29 C0 89 20 A2 3B B6 BF 9C C0 D3 3B C0 i*).. .;.....;.
00DBA0: A2 3B C0 CE 3B C0 D5 3B C0 89 20 01 0F 2E C0 BF .;..;..;.. .....
00DBB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DBC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DBD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DBE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DBF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DC00: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
00DC10: 20 00 50 72 6F 63 65 73 73 65 73 00 01 2C 3B BF .Processes..,;.
00DC20: BF 28 2A B4 01 2C 20 00 6D 6F 64 75 6C 65 00 01 .(*.., .module..
00DC30: 2B 20 00 61 73 00 01 2A 20 70 65 72 20 00 57 69 + .as..* per .Wi
00DC40: 72 74 68 00 01 29 BF C0 44 2E 20 4D 6F 6F 72 65 rth..)..D. Moore
00DC50: 20 34 20 4A 61 6E 20 38 34 BF BF 2A 29 BF 93 20 4 Jan 84..*)..
00DC60: 53 54 4F 52 41 47 45 20 A3 20 00 41 4C 4C 4F 43 STORAGE £ .ALLOC
00DC70: 41 54 45 00 01 28 2C 20 44 45 41 4C 4C 4F 43 41 ATE..(, DEALLOCA
00DC80: 54 45 3B 20 BF 93 20 AE 20 A3 20 B3 2C A9 3B BF TE; .. . £ .,.;.
00DC90: 93 20 00 45 78 63 68 61 6E 67 65 00 01 27 20 A3 . .Exchange..' £
00DCA0: 20 01 27 3B BF 93 B4 53 59 53 54 45 4D 20 A3 20 .';...SYSTEM £
00DCB0: 00 42 59 54 45 00 01 26 2C 8F 2C 00 57 4F 52 44 .BYTE..&,.,.WORD
00DCC0: 00 01 25 2C 00 54 53 49 5A 45 00 01 24 3B BF BF ..%,.TSIZE..$;..
00DCD0: 28 2A B4 01 27 20 00 69 73 00 01 23 20 00 61 6E (*..' .is..# .an
00DCE0: 00 01 22 20 61 73 73 65 6D 62 6C 79 20 6C 61 6E .." assembly lan
00DCF0: 67 75 61 67 65 20 01 2B 20 00 77 68 69 63 68 00 guage .+ .which.
00DD00: 75 65 73 73 20 73 74 79 6C 65 20 00 6F 66 00 8F uess style .of..
00DD10: 20 74 68 69 6E 67 3A C1 00 49 66 00 8D 20 00 74 thing:..If.. .t
00DD20: 68 65 00 8C 20 00 70 61 72 61 6D 65 74 65 72 00 he.. .parameter.
00DD30: 8B 20 91 20 00 69 6E 00 8A 20 71 75 6F 74 65 73 . . .in.. quotes
00DD40: 20 00 69 74 00 88 20 91 20 61 20 94 C1 8D 20 88 .it.. . a ... .
00DD50: 20 66 6F 6C 6C 6F 77 73 20 61 20 27 5B 27 20 00 follows a '[' .
00DD60: 6F 72 00 87 20 61 20 27 2F 27 20 88 20 91 20 61 or.. a '/' . . a
00DD70: 6E 20 92 C1 28 74 68 65 72 65 20 91 20 6F 6E 6C n ..(there . onl
00DD80: 79 20 65 76 65 72 20 6F 6E 65 20 92 20 8B 2E 20 y ever one . ..
00DD90: 49 74 20 91 C1 00 61 6C 77 61 79 73 00 85 20 6C It ...always.. l
00DDA0: 61 73 74 2C 20 61 6E 64 20 88 20 63 6F 6E 74 61 ast, and . conta
00DDB0: 69 6E 73 20 65 76 65 72 79 74 68 69 6E 67 20 66 ins everything f
00DDC0: 72 6F 6D 20 8C 20 2F 20 87 20 C1 5B 20 6F 6E 77 rom . / . .[ onw
00DDD0: 61 72 64 73 C1 45 76 65 72 79 74 68 69 6E 67 20 ards.Everything
00DDE0: 65 6C 73 65 20 91 20 61 20 95 20 28 6E 6F 20 76 else . a . (no v
00DDF0: 61 6C 69 64 69 74 79 20 63 68 65 63 6B 69 6E 67 alidity checking
00DE00: 20 70 65 72 66 6F 72 6D 65 64 2A 29 BF C0 00 54 performed*)...T
00DE10: 65 78 74 00 83 3D A5 C1 4C 65 6E 67 74 68 3A 98 ext..=..Length:.
00DE20: 3B B5 28 2A 00 72 65 74 75 72 6E 73 00 82 20 62 ;.(*.returns.. b
00DE30: 79 74 65 73 20 8A 20 8B 2A 29 C1 54 65 72 6D 69 ytes . .*).Termi
00DE40: 6E 61 74 6F 72 3A 99 3B B4 28 2A 82 20 6E 65 78 nator:.;.(*. nex
00DE50: 74 20 63 68 61 72 61 63 74 65 72 2C 20 87 C3 B4 t character, ...
00DE60: 64 65 6C 69 6D 69 74 65 72 20 66 6F 72 20 73 74 delimiter for st
00DE70: 72 69 6E 67 73 2A 29 B4 C1 43 6C 61 73 73 3A 97 rings*)..Class:.
00DE80: 3B B5 28 2A 63 6C 61 73 73 20 8F 20 8B 2A 29 C1 ;.(*class . .*).
00DE90: 90 20 3A AC 20 84 C1 BC A1 3A 46 69 6C 65 50 6F . :. ....:FilePo
00DEA0: 73 3A AD 3B 45 72 72 6F 72 4E 6F 3A AD 7C C1 BC s:.;ErrorNo:.|..
00DEB0: 9A 3A 43 68 61 72 73 3A 9B 5B 30 2E 2E 31 32 37 .:Chars:.[0..127
00DEC0: 5D 20 84 20 99 3B C1 BC 89 C3 B4 28 2A 8B 20 2D ] . .;.....(*. -
00DED0: 20 85 20 74 65 72 6D 69 6E 61 74 65 64 20 62 79 . terminated by
00DEE0: C3 B4 BA 61 20 7A 65 72 6F 20 00 62 79 74 65 00 ...a zero .byte.
00DEF0: 81 2C 20 62 75 74 20 74 68 61 74 20 81 20 91 20 ., but that . .
00DF00: 01 21 20 73 77 61 70 73 20 00 74 68 65 00 01 20 .! swaps .the..
00DF10: C0 50 43 2F 49 58 2F 53 50 20 76 61 6C 75 65 73 .PC/IX/SP values
00DF20: 20 00 66 72 6F 6D 00 01 1F 20 01 20 20 00 63 75 .from... . .cu
00DF30: 72 72 65 6E 74 00 01 1E 20 00 74 61 73 6B 00 01 rrent... .task..
00DF40: 1D 20 00 74 6F 00 01 1C 2F 01 1F 20 01 20 20 67 . .to.../.. . g
00DF50: 69 76 65 6E C0 00 57 41 49 54 45 52 00 01 1B 20 iven..WAITER...
00DF60: 72 65 63 6F 72 64 2A 29 BF 96 B4 00 53 49 47 4E record*)....SIGN
00DF70: 41 4C 00 01 1A 3D A8 20 86 20 01 1B 3B C0 01 1B AL...=. . ..;...
00DF80: 3D A5 C1 00 50 72 6F 63 00 01 19 3A 00 50 52 4F =...Proc...:.PRO
00DF90: 43 45 53 53 00 01 18 3B C1 00 4E 65 78 74 00 01 CESS...;..Next..
00DFA0: 17 3A 01 1A 3B C1 89 3B C0 00 50 50 52 4F 43 00 .:..;..;..PPROC.
00DFB0: 01 16 3D A8 20 86 20 00 50 52 4F 43 00 01 15 3B ..=. . .PROC...;
00DFC0: C0 00 49 6E 74 65 72 72 75 70 74 53 74 75 62 00 ..InterruptStub.
00DFD0: 01 14 3D A5 BA 28 2A 00 69 6E 74 65 72 72 75 70 ..=..(*.interrup
00DFE0: 74 00 01 13 20 00 73 74 75 62 00 01 12 20 01 1C t... .stub... ..
00DFF0: 20 6D 61 6B 65 20 00 65 78 63 68 61 6E 67 65 00 make .exchange.
00E000: 01 11 20 2A 29 C1 00 70 75 73 68 68 6C 00 01 10 .. *)..pushhl...
00E010: 3A 01 26 3B C1 00 6C 64 68 6C 00 01 0F 3A 01 26 :.&;..ldhl...:.&
00E020: 3B C1 00 70 72 6F 63 76 61 72 61 64 64 72 00 01 ;..procvaraddr..
00E030: 0E 3A 01 25 3B C1 00 65 78 68 6C 73 70 00 01 0D .:.%;..exhlsp...
00E040: 3A 01 26 3B C1 00 63 61 6C 6C 00 01 0C 3A 01 26 :.&;..call...:.&
00E050: 3B C1 00 65 78 63 68 61 6E 67 65 61 64 64 72 00 ;..exchangeaddr.
00E060: 01 0B 3A 01 25 3B C1 00 72 65 74 00 01 0A 3A 01 ..:.%;..ret...:.
00E070: 26 3B C1 89 3B BF BF 8E B4 00 53 75 73 70 65 6E &;..;.....Suspen
00E080: 64 65 64 00 01 09 3A 01 1A 3D 00 4E 49 4C 00 01 ded...:..=.NIL..
00E090: 08 3B C0 4E 65 77 74 61 73 6B 2C 00 54 68 69 73 .;.Newtask,.This
00E0A0: 74 61 73 6B 00 01 07 3A 01 1A 3B BF C1 28 2A 00 task...:..;..(*.
00E0B0: 6C 69 73 74 00 01 06 20 00 6F 66 00 01 05 20 00 list... .of... .
00E0C0: 70 72 6F 63 65 73 73 65 73 00 01 04 20 00 73 75 processes... .su
00E0D0: 73 70 65 6E 64 65 64 00 01 03 20 01 2A 20 01 20 spended... .* .
00E0E0: 20 72 65 73 75 6C 74 20 01 05 20 61 20 01 0C C1 result .. a ...
00E0F0: BA 01 1C 20 00 53 74 61 72 74 50 72 6F 63 65 73 ... .StartProces
00E100: 6E 6F 74 C3 B4 BA 69 6E 63 6C 75 64 65 64 20 8A not...included .
00E110: 20 8C 20 6C 65 6E 67 74 68 2A 29 C1 89 3B BF C0 . length*)..;..
00E120: 00 50 61 72 61 6D 65 74 65 72 00 80 3D A8 20 86 .Parameter..=. .
00E130: 20 83 3B BF AF 20 47 65 74 50 61 72 61 6D 73 28 .;.. GetParams(
00E140: 8E 20 70 3A 9B 20 84 20 80 3B 8E 20 63 6F 75 6E . p:. . .;. coun
00E150: 74 3A AA 29 3B BF 28 2A B4 63 72 61 63 6B 20 8C t:.);.(*.crack .
00E160: 20 63 6F 6D 6D 61 6E 64 20 9C 2A 29 BF 8E B4 43 command .*)...C
00E170: 6F 6D 6D 4C 65 6E 67 74 68 5B 38 30 68 5D 3A 98 ommLength[80h]:.
00E180: 3B C0 43 6F 6D 6D 54 65 78 74 5B 38 31 68 5D 3A ;.CommText[81h]:
00E190: 9B 5B 30 2E 2E 31 32 36 5D 20 84 20 99 3B 20 BF .[0..126] . .; .
00E1A0: 89 20 9D 2E BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A . ..............
00E1B0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E1C0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E1D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E1E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E1F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E200: B2 20 A4 20 00 43 6F 6E 76 65 72 73 69 6F 6E 73 . . .Conversions
00E210: 00 91 3B BF 93 20 53 59 53 54 45 4D 20 A3 20 00 ..;.. SYSTEM £ .
00E220: 57 4F 52 44 00 90 2C 00 42 59 54 45 00 8F 3B BF WORD..,.BYTE..;.
00E230: AF 20 43 61 72 64 54 6F 53 74 72 69 6E 67 28 63 . CardToString(c
00E240: 2C 00 62 61 73 65 00 8D 3A AD 3B 8E 20 54 3A 9B ,.base..:.;. T:.
00E250: 20 84 20 99 3B 8E 20 00 75 73 65 64 00 8C 3A AA . .;. .used..:.
00E260: 29 3B BF AF 20 49 6E 74 54 6F 53 74 72 69 6E 67 );.. IntToString
00E270: 28 63 3A AA 3B 8D 3A AD 3B C1 8E 20 54 3A 9B 20 (c:.;.:.;.. T:.
00E280: 84 20 99 3B 8E 20 8C 3A AA 29 3B BF BF 28 2A B4 . .;. .:.);..(*.
00E290: 43 6F 6E 76 65 72 74 20 61 20 43 61 72 64 69 6E Convert a Cardin
00E2A0: 61 6C 20 28 49 6E 74 65 67 65 72 29 20 00 74 6F al (Integer) .to
00E2B0: 00 8B 20 61 20 00 73 74 72 69 6E 67 00 8A BF C0 .. a .string....
00E2C0: 63 20 00 69 73 00 88 20 00 74 68 65 00 87 20 76 c .is.. .the.. v
00E2D0: 61 6C 75 65 2C 20 8D 20 88 20 87 20 8D 20 8B 20 alue, . . . . .
00E2E0: 75 73 65 BF C0 54 20 72 65 74 75 72 6E 73 20 87 use..T returns .
00E2F0: 20 8A 20 6C 65 66 74 20 6A 75 73 74 69 66 69 65 . left justifie
00E300: 73 00 01 02 2A 29 C0 00 57 6F 72 6B 53 70 61 63 s...*)..WorkSpac
00E310: 65 00 01 01 3A AB 3B C0 01 19 3A 01 16 3B BF AF e...:.;...:..;..
00E320: 20 00 52 65 73 74 61 72 74 00 01 00 3B BF BF 28 .Restart...;..(
00E330: 2A B4 01 00 20 00 61 66 74 65 72 00 FF 20 61 20 *... .after.. a
00E340: 00 70 72 6F 63 65 73 73 00 FE 20 00 66 61 6C 6C .process.. .fall
00E350: 73 00 FD 20 00 6F 75 74 00 FC 20 01 20 20 00 62 s.. .out.. . .b
00E360: 6F 74 74 6F 6D 00 FB 20 01 05 20 69 74 73 20 00 ottom.. .. its .
00E370: 70 72 6F 63 65 64 75 72 65 00 FA BF C0 00 54 68 procedure.....Th
00E380: 65 00 F9 20 00 72 65 74 75 72 6E 00 F8 20 00 61 e.. .return.. .a
00E390: 64 64 72 65 73 73 00 F7 20 01 23 20 01 20 20 00 ddress.. .# . .
00E3A0: 66 69 72 73 74 00 F6 20 65 6C 65 6D 65 6E 74 20 first.. element
00E3B0: 00 6F 6E 00 F5 20 01 20 20 01 03 20 01 06 2A 29 .on.. . .. ..*)
00E3C0: BF 9C C0 01 07 3A 3D 01 09 3B C0 01 09 3A 3D 01 .....:=..;...:=.
00E3D0: 09 5E 2E 01 17 3B C0 01 27 28 01 07 29 3B C0 89 .^...;..'(..);..
00E3E0: 20 01 00 3B BF AF 20 00 54 52 41 4E 53 46 45 52 ..;.. .TRANSFER
00E3F0: 00 F4 28 8E 20 00 73 6F 75 72 63 65 00 F3 2C 00 ..(. .source..,.
00E400: 64 65 73 74 69 6E 61 74 69 6F 6E 00 F2 3A 01 18 destination..:..
00E410: 29 3B BF 9C C0 28 2A 20 00 46 69 72 73 74 00 F1 );...(* .First..
00E420: 20 00 73 65 74 00 F0 20 00 70 6F 69 6E 74 65 72 .set.. .pointer
00E430: 73 00 EF 20 01 1C 20 00 63 6F 6E 74 72 6F 6C 00 s.. .. .control.
00E440: EE 20 00 62 6C 6F 63 6B 73 00 ED 20 00 66 6F 72 . .blocks.. .for
00E450: 00 EC 20 00 65 61 63 68 00 EB 20 FE 2A 29 BF BF .. .each.. .*)..
00E460: C0 28 2A 20 B4 F9 20 F2 20 FE 20 00 6D 75 73 74 .(* .. . . .must
00E470: 00 EA 20 00 62 65 00 E9 20 00 61 6C 72 65 61 64 .. .be.. .alread
00E480: 79 00 E8 20 F0 20 00 75 70 00 E7 20 00 62 79 00 y.. . .up.. .by.
00E490: E6 C1 00 4E 45 57 50 52 4F 43 45 53 53 00 E5 2A ...NEWPROCESS..*
00E4A0: 29 BF C0 28 2A B4 00 43 6F 70 79 00 E4 20 01 20 )..(*..Copy.. .
00E4B0: 20 F2 20 FE 20 00 64 65 73 63 72 69 70 74 6F 72 . . .descriptor
00E4C0: 00 E3 20 00 69 6E 74 6F 00 E2 C1 01 20 20 F3 20 .. .into.... .
00E4D0: FE 20 E3 2E 20 F9 20 01 27 C1 FA 20 00 77 69 6C . .. . .'.. .wil
00E4E0: 6C 00 E1 20 00 72 65 70 6C 61 63 65 00 E0 20 01 l.. .replace.. .
00E4F0: 20 20 F2 20 E3 C1 E6 20 01 20 20 F3 20 E3 20 00 . ... . . . .
00E500: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00E510: 0C 00 00 00 02 09 4E E5 0C 00 41 02 00 00 00 02 ......N...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: 64 BF C0 8C 20 67 69 76 65 73 20 6E 75 6D 62 65 d... gives numbe
00E610: 72 20 00 6F 66 00 86 20 73 69 67 20 64 69 67 69 r .of.. sig digi
00E620: 74 73 2A 29 BF AF 20 4D 61 6B 65 57 6F 72 64 28 ts*).. MakeWord(
00E630: 00 48 69 67 68 00 85 2C 00 4C 6F 77 00 83 3A 8F .High..,.Low..:.
00E640: 29 3A 90 3B BF BF 28 2A B4 43 6F 6D 62 69 6E 65 ):.;..(*.Combine
00E650: 20 74 77 6F 20 62 79 74 65 73 20 69 6E 74 6F 20 two bytes into
00E660: 61 20 00 77 6F 72 64 00 82 20 2A 29 BF AF 20 48 a .word.. *).. H
00E670: 69 67 68 42 79 74 65 28 77 3A 90 29 3A 8F 3B BF ighByte(w:.):.;.
00E680: AF 20 4C 6F 77 42 79 74 65 28 77 3A 90 29 3A 8F . LowByte(w:.):.
00E690: 3B BF BF 28 2A B4 52 65 74 75 72 6E 20 87 20 85 ;..(*.Return . .
00E6A0: 20 28 83 29 20 00 6F 72 64 65 72 00 81 20 00 62 (.) .order.. .b
00E6B0: 79 74 65 00 80 20 86 20 61 20 82 BF C0 4E 6F 74 yte.. . a ...Not
00E6C0: 65 20 74 68 61 74 2C 20 66 6F 6C 6C 6F 77 69 6E e that, followin
00E6D0: 67 20 87 20 75 73 75 61 6C 20 38 30 38 30 20 63 g . usual 8080 c
00E6E0: 6F 6E 76 65 6E 74 69 6F 6E 2C C0 87 20 66 69 72 onvention,.. fir
00E6F0: 73 74 20 80 20 88 20 87 20 6C 6F 77 20 81 20 80 st . . . low . .
00E700: 2A 29 BF 89 20 91 2E BF 00 00 1A 1A 1A 1A 1A 1A *).. ...........
00E710: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E720: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E730: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E740: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E750: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E760: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E770: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00E780: B2 20 A4 20 00 43 50 4D 00 B3 3B BF 28 2A B4 4F . . .CPM..;.(*.O
00E790: 70 63 6F 64 65 73 20 00 66 6F 72 00 B1 20 00 43 pcodes .for.. .C
00E7A0: 50 00 B0 2F 4D 20 42 64 6F 73 20 00 61 6E 64 00 P../M Bdos .and.
00E7B0: AE 20 42 69 6F 73 20 63 61 6C 6C 73 B4 BF C0 00 . Bios calls....
00E7C0: 4D 6E 65 6D 6F 6E 69 63 73 00 AD 20 74 61 6B 65 Mnemonics.. take
00E7D0: 6E 20 00 66 72 6F 6D 00 AC 20 53 79 73 74 65 6D n .from.. System
00E7E0: 20 50 72 6F 67 72 61 6D 6D 69 6E 67 20 75 6E 64 Programming und
00E7F0: 65 72 20 B0 2F 4D 38 30 C0 00 77 69 74 68 00 AB er ./M80..with..
00E800: 20 00 73 74 61 74 75 73 00 B7 20 B6 2A 29 C0 63 .status.. .*).c
00E810: 6F 6E 69 6E 3D 33 3B B4 28 2A B4 00 72 65 61 64 onin=3;.(*..read
00E820: 00 B3 20 00 63 68 61 72 61 63 74 65 72 00 B1 20 .. .character..
00E830: 00 66 72 6F 6D 00 B0 20 B8 B4 2A 29 C0 63 6F 6E .from.. ..*).con
00E840: 6F 75 74 3D 34 3B B4 28 2A B4 00 77 72 69 74 65 out=4;.(*..write
00E850: 00 AE 20 B1 20 00 74 6F 00 AD 20 B8 B4 2A 29 C0 .. . .to.. ..*).
00E860: 00 6C 69 73 74 00 AC 3D 35 3B B5 28 2A B4 AE 20 .list..=5;.(*..
00E870: B1 20 AD 20 AC B5 2A 29 C0 00 70 75 6E 63 68 00 . . ..*)..punch.
00E880: AB 3D 36 3B B4 28 2A B4 AE 20 B1 20 AD 20 AB B4 .=6;.(*.. . . ..
00E890: 2A 29 C0 00 72 65 61 64 65 72 00 A9 3D 37 3B B4 *)..reader..=7;.
00E8A0: 28 2A B4 B3 20 B0 20 A9 B5 2A 29 C0 00 68 6F 6D (*.. . ..*)..hom
00E8B0: 65 00 A7 3D 38 3B B5 28 2A B4 A7 20 63 75 72 72 e..=8;.(*.. curr
00E8C0: 65 6E 74 20 00 64 69 73 63 00 A6 B5 2A 29 C0 73 ent .disc...*).s
00E8D0: 65 6C 64 73 63 3D 39 3B B4 28 2A B4 73 65 6C 65 eldsc=9;.(*.sele
00E8E0: 63 74 20 A6 B6 2A 29 C0 73 65 74 74 72 6B 3D 31 ct ..*).settrk=1
00E8F0: 30 3B B4 28 2A B4 00 73 65 74 00 A2 20 00 74 72 0;.(*..set.. .tr
00E900: 61 63 6B 00 A1 B6 2A 29 C0 73 65 74 73 65 63 3D ack...*).setsec=
00E910: 31 31 3B B4 28 2A B4 A2 20 00 73 65 63 74 6F 72 11;.(*.. .sector
00E920: 00 A0 B6 2A 29 C0 73 65 74 64 6D 61 3D 31 32 3B ...*).setdma=12;
00E930: B4 28 2A B4 A2 20 64 6D 61 20 61 64 64 72 65 73 .(*.. dma addres
00E940: 73 B6 2A 29 C0 72 65 61 64 64 69 73 63 3D 31 33 s.*).readdisc=13
00E950: 3B B4 28 2A B4 B3 20 61 20 A0 B6 2A 29 C0 77 72 ;.(*.. a ..*).wr
00E960: 69 74 65 64 69 73 63 3D 31 34 3B B4 28 2A B4 AE itedisc=14;.(*..
00E970: 20 61 20 A0 B6 2A 29 C0 6C 69 73 74 73 74 3D 31 a ..*).listst=1
00E980: 35 3B B4 28 2A B4 72 65 74 75 72 6E 20 AC 20 B7 5;.(*.return . .
00E990: B5 2A 29 C0 73 65 63 74 72 6E 3D 31 36 3B B4 28 .*).sectrn=16;.(
00E9A0: 2A B4 74 72 61 6E 73 6C 61 74 65 20 A0 B5 2A 29 *.translate ..*)
00E9B0: BF 96 C0 00 69 6E 74 65 72 6C 61 63 65 00 9F 3D ....interlace..=
00E9C0: 9B 5B 31 2E 2E 32 36 5D 20 84 20 C6 3B C0 00 70 .[1..26] . .;..p
00E9D0: 69 6E 74 65 72 6C 61 63 65 00 9E 3D A8 20 86 20 interlace..=. .
00E9E0: 9F 3B BF C0 00 70 61 72 61 6D 65 74 65 72 73 00 .;...parameters.
00E9F0: 9C 3D A5 C1 73 70 74 3A AA 3B B4 28 2A B4 73 65 .=..spt:.;.(*.se
00EA00: 20 61 64 64 69 74 69 6F 6E 73 20 00 69 6E 00 A9 additions .in..
00EA10: 20 74 68 65 20 73 61 6D 65 20 73 74 79 6C 65 20 the same style
00EA20: B1 20 6F 6D 69 74 74 65 64 20 76 61 6C 75 65 73 . omitted values
00EA30: BF C0 42 79 20 4C 61 77 72 65 6E 63 65 20 45 20 ..By Lawrence E
00EA40: 00 48 75 67 68 65 73 00 A8 BF BF 2A 29 BF 93 20 .Hughes....*)..
00EA50: 53 59 53 54 45 4D 20 A3 20 00 42 59 54 45 00 A7 SYSTEM £ .BYTE..
00EA60: 2C 00 57 4F 52 44 00 A6 3B BF 9D BF C0 28 2A B4 ,.WORD..;....(*.
00EA70: 63 6F 6E 73 74 61 6E 74 73 20 B1 20 75 73 65 20 constants . use
00EA80: AB 20 00 42 44 4F 53 00 A2 20 AE 20 00 42 44 4F . .BDOS.. . .BDO
00EA90: 53 48 4C 00 A1 2A 29 BF C0 72 65 73 66 63 3D 30 SHL..*)..resfc=0
00EAA0: 3B 20 B4 28 2A B4 00 72 65 73 65 74 00 A0 20 28 ; .(*..reset.. (
00EAB0: 72 65 62 6F 6F 74 20 63 63 70 29 B5 2A 29 C0 72 reboot ccp).*).r
00EAC0: 63 63 66 63 3D 31 3B B4 28 2A B4 00 72 65 61 64 ccfc=1;.(*..read
00EAD0: 00 9F 20 00 63 6F 6E 73 6F 6C 65 00 9E 20 00 63 .. .console.. .c
00EAE0: 68 61 72 61 63 74 65 72 00 9C B5 2A 29 C0 77 63 haracter...*).wc
00EAF0: 63 66 63 3D 32 3B B4 28 2A B4 00 77 72 69 74 65 cfc=2;.(*..write
00EB00: 00 9A 20 9E 20 9C B5 2A 29 C0 72 72 64 66 63 3D .. . ..*).rrdfc=
00EB10: 33 3B B4 28 2A B4 9F 20 72 65 61 64 65 72 B6 2A 3;.(*.. reader.*
00EB20: 29 C0 77 70 75 66 63 3D 34 3B B4 28 2A B4 9A 20 ).wpufc=4;.(*..
00EB30: 70 75 6E 63 68 B6 2A 29 C0 77 6C 63 66 63 3D 35 punch.*).wlcfc=5
00EB40: 3B B4 28 2A B4 9A 20 6C 69 73 74 20 9C B5 2A 29 ;.(*.. list ..*)
00EB50: C0 64 69 6F 66 63 3D 36 3B B4 28 2A B4 64 69 72 .diofc=6;.(*.dir
00EB60: 65 63 74 20 69 6F B6 2A 29 C0 77 63 62 66 63 3D ect io.*).wcbfc=
00EB70: 39 3B B4 28 2A B4 9A 20 9E 20 00 62 75 66 66 65 9;.(*.. . .buffe
00EB80: 72 00 98 B5 2A 29 C0 72 63 62 66 63 3D 31 30 3B r...*).rcbfc=10;
00EB90: B4 28 2A B4 9F 20 9E 20 98 B5 2A 29 C0 72 63 73 .(*.. . ..*).rcs
00EBA0: 66 63 3D 31 31 3B B4 28 2A B4 9F 20 9E 20 73 74 fc=11;.(*.. . st
00EBB0: 61 74 75 73 B5 2A 29 C0 73 65 6C 66 63 3D 31 34 atus.*).selfc=14
00EBC0: 3B B4 28 2A B4 73 65 6C 65 63 74 20 00 64 69 73 ;.(*.select .dis
00EBD0: 63 00 97 20 00 64 72 69 76 65 00 95 B5 2A 29 C0 c.. .drive...*).
00EBE0: 6F 70 6E 66 63 3D 31 35 3B B4 28 2A B4 6F 70 65 opnfc=15;.(*.ope
00EBF0: 6E 20 00 66 69 6C 65 00 94 B6 2A 29 C0 63 6C 73 n .file...*).cls
00EC00: 63 74 6F 72 73 20 70 65 72 20 A1 B4 2A 29 C1 62 ctors per ..*).b
00EC10: 73 68 3A C6 3B B4 28 2A B4 00 62 6C 6F 63 6B 00 sh:.;.(*..block.
00EC20: 9A 20 73 68 69 66 74 20 66 61 63 74 6F 72 B4 2A . shift factor.*
00EC30: 29 C1 62 6C 6D 3A C6 3B B4 28 2A B4 9A 20 00 6D ).blm:.;.(*.. .m
00EC40: 61 73 6B 00 98 B5 2A 29 C1 65 78 6D 3A C6 3B B4 ask...*).exm:.;.
00EC50: 28 2A B4 00 65 78 74 65 6E 74 00 97 20 98 B5 2A (*..extent.. ..*
00EC60: 29 C1 64 73 6D 3A AA 3B B4 28 2A B4 00 6D 61 78 ).dsm:.;.(*..max
00EC70: 00 95 20 00 61 6C 6C 6F 63 61 74 69 6F 6E 00 94 .. .allocation..
00EC80: 20 67 72 6F 75 70 73 B4 2A 29 C1 64 72 6D 3A AA groups.*).drm:.
00EC90: 3B B4 28 2A B4 95 20 00 64 69 72 65 63 74 6F 72 ;.(*.. .director
00ECA0: 79 00 92 20 65 6E 74 72 69 65 73 B4 2A 29 C1 61 y.. entries.*).a
00ECB0: 6C 30 3A 9B 20 5B 30 2E 2E 31 5D 20 84 20 C6 3B l0:. [0..1] . .;
00ECC0: C3 28 2A B4 94 20 BC B4 2A 29 C1 63 6B 73 3A AA .(*.. ..*).cks:.
00ECD0: 3B B4 28 2A B4 00 63 68 65 63 6B 00 91 20 BC 20 ;.(*..check.. .
00ECE0: 73 69 7A 65 B4 2A 29 C1 6F 66 66 3A AA 3B B4 28 size.*).off:.;.(
00ECF0: 2A B4 00 73 79 73 74 65 6D 00 90 20 74 72 61 63 *..system.. trac
00ED00: 6B 73 B5 2A 29 C1 66 69 6C 6C 65 72 3A 9B 5B 30 ks.*).filler:.[0
00ED10: 2E 2E 32 5D 20 84 20 99 3B C1 89 3B C0 00 70 70 ..2] . .;..;..pp
00ED20: 61 72 61 6D 65 74 65 72 73 00 8F 3D A8 20 86 20 arameters..=. .
00ED30: 9C 3B C0 00 70 64 69 72 65 63 74 6F 72 79 00 8E .;..pdirectory..
00ED40: 3D A8 20 86 20 92 3B C0 92 3D A5 C1 64 69 72 75 =. . .;..=..diru
00ED50: 6E 3A C6 3B B4 28 2A 6F 72 20 30 45 35 68 20 69 n:.;.(*or 0E5h i
00ED60: 66 20 64 65 6C 65 74 65 64 2A 29 C1 64 69 72 66 f deleted*).dirf
00ED70: 6E 3A C4 3B B4 28 2A 00 66 69 6C 65 00 8D 20 6E n:.;.(*.file.. n
00ED80: 61 6D 65 2A 29 C1 64 69 72 66 74 3A C2 3B B4 28 ame*).dirft:.;.(
00ED90: 2A 8D 20 74 79 70 65 2A 29 C1 64 69 72 65 78 3A *. type*).direx:
00EDA0: C6 3B B4 28 2A 97 20 6E 75 6D 62 65 72 2A 29 C1 .;.(*. number*).
00EDB0: 64 69 72 72 65 73 3A AA 3B B4 28 2A 72 65 73 65 dirres:.;.(*rese
00EDC0: 72 76 65 64 20 BD 20 90 2A 29 C1 64 69 72 72 63 rved . .*).dirrc
00EDD0: 3A C6 3B B4 28 2A A5 20 63 6F 75 6E 74 20 BD 20 :.;.(*. count .
00EDE0: 97 2A 29 C1 64 69 72 64 6D 3A BE 3B B4 28 2A A6 .*).dirdm:.;.(*.
00EDF0: 20 6D 61 70 20 BD 20 97 2A 29 C1 89 3B C0 00 70 map . .*)..;..p
00EE00: 66 63 3D 31 36 3B B4 28 2A B4 63 6C 6F 73 65 20 fc=16;.(*.close
00EE10: 94 B6 2A 29 C0 73 66 6F 66 63 3D 31 37 3B B4 28 ..*).sfofc=17;.(
00EE20: 2A B4 00 73 65 61 72 63 68 00 92 20 B1 20 66 69 *..search.. . fi
00EE30: 72 73 74 20 6D 61 74 63 68 20 A9 20 64 69 72 B4 rst match . dir.
00EE40: 2A 29 C0 73 6E 6F 66 63 3D 31 38 3B B4 28 2A B4 *).snofc=18;.(*.
00EE50: 92 20 B1 20 6E 65 78 74 B6 2A 29 C0 64 65 6C 66 . . next.*).delf
00EE60: 63 3D 31 39 3B B4 28 2A B4 64 65 6C 65 74 65 20 c=19;.(*.delete
00EE70: 94 B6 2A 29 C0 72 73 72 66 63 3D 32 30 3B B4 28 ..*).rsrfc=20;.(
00EE80: 2A B4 00 73 65 71 75 65 6E 74 69 61 6C 00 91 20 *..sequential..
00EE90: 9F B6 2A 29 C0 77 73 72 66 63 3D 32 31 3B B4 28 ..*).wsrfc=21;.(
00EEA0: 2A B4 91 20 9A B5 2A 29 C0 6D 61 6B 66 63 3D 32 *.. ..*).makfc=2
00EEB0: 32 3B B4 28 2A B4 6D 61 6B 65 20 94 B6 2A 29 C0 2;.(*.make ..*).
00EEC0: 72 65 6E 66 63 3D 32 33 3B B4 28 2A B4 72 65 6E renfc=23;.(*.ren
00EED0: 61 6D 65 20 94 B6 2A 29 C0 73 64 61 66 63 3D 32 ame ..*).sdafc=2
00EEE0: 36 3B B4 28 2A B4 00 73 65 74 00 8F 20 94 20 98 6;.(*..set.. . .
00EEF0: 20 41 64 64 72 65 73 73 B5 2A 29 C0 67 61 76 66 Address.*).gavf
00EF00: 63 3D 32 37 3B B4 28 2A B4 00 67 65 74 00 8E 20 c=27;.(*..get..
00EF10: 61 6C 6C 6F 63 61 74 69 6F 6E 20 76 65 63 74 6F allocation vecto
00EF20: 72 20 61 64 64 72 65 73 73 B4 2A 29 C0 67 64 70 r address.*).gdp
00EF30: 66 63 3D 33 31 3B B4 28 2A B4 8E 20 97 20 70 61 fc=31;.(*.. . pa
00EF40: 72 61 6D 65 74 65 72 20 62 6C 6F 63 6B 20 61 64 rameter block ad
00EF50: 64 72 B4 2A 29 C0 67 75 63 66 63 3D 33 32 3B B4 dr.*).gucfc=32;.
00EF60: 28 2A B4 8E 2F 8F 20 75 73 65 72 20 00 6E 75 6D (*../. user .num
00EF70: 62 65 72 00 8D B5 2A 29 C0 72 72 72 66 63 3D 33 ber...*).rrrfc=3
00EF80: 33 3B B4 28 2A B4 9F 20 00 72 61 6E 64 6F 6D 00 3;.(*.. .random.
00EF90: 8C 20 A5 B5 2A 29 C0 77 72 72 66 63 3D 33 34 3B . ..*).wrrfc=34;
00EFA0: B4 28 2A B4 9A 20 8C 20 A5 B5 2A 29 C0 63 66 73 .(*.. . ..*).cfs
00EFB0: 66 63 3D 33 35 3B B4 28 2A B4 43 6F 6D 70 75 74 fc=35;.(*.Comput
00EFC0: 65 20 94 20 73 69 7A 65 B5 2A 29 C0 73 72 72 66 e . size.*).srrf
00EFD0: 63 3D 33 36 3B B4 28 2A B4 8F 20 8C 20 A5 20 70 c=36;.(*.. . . p
00EFE0: 6F 69 6E 74 65 72 B4 2A 29 C0 72 73 64 66 63 3D ointer.*).rsdfc=
00EFF0: 33 37 3B B4 28 2A B4 A0 20 95 B6 2A 29 C0 77 72 37;.(*.. ..*).wr
00F000: 61 6C 6C 6F 63 00 8C 3D A8 20 86 20 00 61 6C 6C alloc..=. . .all
00F010: 6F 63 00 8B 3B C0 8B 3D 9B 5B 30 2E 2E 31 30 5D oc..;..=.[0..10]
00F020: 20 84 20 C6 3B B4 C0 00 70 63 68 65 63 6B 00 8A . .;...pcheck..
00F030: 3D A8 20 86 20 91 3B C0 91 3D 9B 5B 30 2E 2E 31 =. . .;..=.[0..1
00F040: 30 5D 20 84 20 C6 3B C0 70 64 69 73 63 68 65 61 0] . .;.pdischea
00F050: 64 65 72 3D A8 20 86 20 00 64 69 73 63 68 65 61 der=. . .dischea
00F060: 64 65 72 00 88 3B C0 88 3D A5 C1 9F 3A 9E 3B C1 der..;..=...:.;.
00F070: 73 63 72 61 74 63 68 3A 9B 5B 30 2E 2E 32 5D 20 scratch:.[0..2]
00F080: 84 20 AA 3B C1 92 3A 8E 3B C1 9C 3A 8F 3B C1 91 . .;..:.;..:.;..
00F090: 3A 8A 3B C1 8B 3A 8C 3B C1 89 3B BF BF BF AF 20 :.;..:.;..;....
00F0A0: BB 28 00 63 6F 64 65 00 87 3A AA 3B 00 62 63 00 .(.code..:.;.bc.
00F0B0: 85 3A C5 3B 00 64 65 00 83 3A C5 29 3A AA 3B 20 .:.;.de..:.):.;
00F0C0: B4 28 2A 00 52 65 73 75 6C 74 00 82 20 00 69 73 .(*.Result.. .is
00F0D0: 00 81 20 41 20 00 76 61 6C 75 65 00 80 2A 29 BF .. A .value..*).
00F0E0: AF 20 BA 28 87 3A AA 3B 85 3A C5 3B 83 3A C5 29 . .(.:.;.:.;.:.)
00F0F0: 3A AA 3B B4 28 2A 82 20 81 20 48 4C 20 80 2A 29 :.;.(*. . HL .*)
00F100: BF 89 20 C7 2E BF BF 00 00 1A 1A 1A 1A 1A 1A 1A .. .............
00F110: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F120: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F130: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F140: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F150: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F160: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F170: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F180: B2 20 A4 20 00 44 45 42 55 47 00 8E 3B BF 28 2A . . .DEBUG..;.(*
00F190: B4 54 68 69 73 20 00 69 73 00 8D 20 00 74 68 65 .This .is.. .the
00F1A0: 00 8C 20 64 65 66 69 6E 69 74 69 6F 6E 20 00 6D .. definition .m
00F1B0: 6F 64 75 6C 65 00 8B 20 66 6F 72 20 00 64 65 62 odule.. for .deb
00F1C0: 75 67 00 8A BF C0 41 74 20 70 72 65 73 65 6E 74 ug....At present
00F1D0: 2C 20 00 69 74 00 88 20 64 6F 65 73 20 00 6E 6F , .it.. does .no
00F1E0: 74 00 87 20 63 6F 6E 74 61 69 6E 20 00 61 6E 79 t.. contain .any
00F1F0: 00 86 20 64 65 66 69 6E 69 74 69 6F 6E 73 2C C0 .. definitions,.
00F200: 7A 66 63 3D 34 30 3B B4 28 2A B4 9A 20 8C 20 AB zfc=40;.(*.. . .
00F210: 20 7A 65 72 6F 20 00 66 69 6C 6C 00 8B B4 2A 29 zero .fill...*)
00F220: BF BF 96 BF 28 2A C0 4C 61 79 6F 75 74 73 20 B1 ....(*.Layouts .
00F230: 20 76 61 72 69 6F 75 73 20 61 72 65 61 73 20 A9 various areas .
00F240: 20 42 49 4F 53 BF C0 B1 20 43 65 72 65 6E 6B 6F BIOS... Cerenko
00F250: 66 20 4D 6F 64 75 6C 61 20 49 49 BF C0 44 61 76 f Modula II..Dav
00F260: 65 20 4D 6F 6F 72 65 20 4F 63 74 20 38 34 BF C0 e Moore Oct 84..
00F270: AD 20 61 72 65 20 AC 20 A8 20 62 6F 6F 6B 20 28 . are . . book (
00F280: 6F 70 20 73 69 74 29 BF BF 2A 29 C0 00 61 6C 66 op sit)..*)..alf
00F290: 61 00 8A 3D 9B 5B 31 2E 2E 38 5D 20 84 20 99 3B a..=.[1..8] . .;
00F2A0: C0 00 65 78 74 65 6E 00 88 3D 9B 5B 31 2E 2E 33 ..exten..=.[1..3
00F2B0: 5D 20 84 20 99 3B C0 00 64 69 73 63 6D 61 70 00 ] . .;..discmap.
00F2C0: 87 3D A5 C1 90 20 3A AA 20 84 B4 28 2A 64 65 70 .=... :. ..(*dep
00F2D0: 65 6E 64 69 6E 67 20 6F 6E 20 8D 20 84 20 67 72 ending on . . gr
00F2E0: 6F 75 70 73 2A 29 C1 BC 38 3A 62 79 74 65 73 3A oups*)..8:bytes:
00F2F0: 9B 5B 30 2E 2E 31 35 5D 20 84 20 A7 7C C1 BC 31 .[0..15] . .|..1
00F300: 36 3A 77 6F 72 64 73 3A 9B 5B 30 2E 2E 37 5D 20 6:words:.[0..7]
00F310: 84 20 AA 3B C0 BA B4 BC 89 C1 89 3B C0 00 69 6E . .;.......;..in
00F320: 74 00 86 33 3D A5 C1 6C 6F 77 6F 72 64 65 72 3A t..3=..loworder:
00F330: A7 3B C1 68 69 67 68 6F 72 64 65 72 3A AA C1 89 .;.highorder:...
00F340: 3B BF C0 66 63 62 3D A5 C1 66 63 62 64 6E 3A A7 ;..fcb=..fcbdn:.
00F350: 3B B4 28 2A B4 95 20 8D B5 2A 29 C1 66 63 62 66 ;.(*.. ..*).fcbf
00F360: 6E 3A 8A 3B B4 28 2A B4 94 20 6E 61 6D 65 20 28 n:.;.(*.. name (
00F370: 62 6C 61 6E 6B 20 8B 29 B4 2A 29 C1 66 63 62 66 blank .).*).fcbf
00F380: 74 3A 88 3B B4 28 2A B4 94 20 65 78 74 65 6E 73 t:.;.(*.. extens
00F390: 69 6F 6E B5 2A 29 C1 66 63 62 65 78 3A A7 3B B4 ion.*).fcbex:.;.
00F3A0: 28 2A B4 00 65 78 74 65 6E 74 00 85 20 6F 70 65 (*..extent.. ope
00F3B0: 6E 65 64 B5 2A 29 C1 63 70 6D 72 65 73 3A AA 3B ned.*).cpmres:.;
00F3C0: B4 28 2A B4 72 65 73 65 72 76 65 64 20 62 79 20 .(*.reserved by
00F3D0: B0 2F 4D B4 2A 29 C1 66 63 62 72 63 3A A7 3B B4 ./M.*).fcbrc:.;.
00F3E0: 28 2A B4 A5 20 63 6F 75 6E 74 B5 2A 29 C1 66 63 (*.. count.*).fc
00F3F0: 62 64 6D 3A 87 3B B4 28 2A B4 97 20 6D 61 70 20 bdm:.;.(*.. map
00F400: 74 68 6F 75 67 68 20 00 79 6F 75 00 85 20 6D 61 though .you.. ma
00F410: 79 2C 20 6F 66 20 63 6F 75 72 73 65 20 61 64 64 y, of course add
00F420: 20 73 6F 6D 65 2E BF C0 8E 20 00 6D 75 73 74 00 some.... .must.
00F430: 84 20 00 62 65 00 83 20 69 6D 70 6F 72 74 65 64 . .be.. imported
00F440: 20 00 62 79 00 82 20 86 20 8B 20 77 68 69 63 68 .by.. . . which
00F450: 20 8D C0 63 6F 6D 70 69 6C 65 64 20 61 6E 64 20 ..compiled and
00F460: 6C 69 6E 6B 65 64 20 00 77 69 74 68 00 81 20 2F linked .with.. /
00F470: 54 20 28 6F 72 20 75 73 69 6E 67 20 8C 20 28 2A T (or using . (*
00F480: 24 74 2B 2A 29 20 66 6C 61 67 C0 73 6F 20 74 68 $t+*) flag.so th
00F490: 61 74 20 8C 20 6D 61 69 6E 20 70 72 6F 67 72 61 at . main progra
00F4A0: 6D 20 6C 69 6E 6B 61 67 65 20 63 6F 6D 65 73 20 m linkage comes
00F4B0: 6F 75 74 20 00 69 6E 00 80 20 8C C0 72 69 67 68 out .in.. ..righ
00F4C0: 74 20 6F 72 64 65 72 20 28 6F 62 76 69 6F 75 73 t order (obvious
00F4D0: 6C 79 2C 20 8E 20 84 20 83 20 69 6E 69 74 69 61 ly, . . . initia
00F4E0: 6C 69 73 65 64 20 C0 66 69 72 73 74 20 61 73 20 lised .first as
00F4F0: 88 20 73 65 74 73 20 75 70 20 8C 20 69 6E 74 65 . sets up . inte
00F500: 72 75 70 74 20 80 20 6C 6F 77 20 6D 65 6D 6F 72 rupt . low memor
00F510: 79 20 75 73 65 64 C0 82 20 8C 20 6F 74 68 65 72 y used.. . other
00F520: 20 6D 6F 64 75 6C 65 73 20 74 6F 20 63 61 6C 6C modules to call
00F530: 20 8E BF BF C0 4E 6F 2C 20 48 6F 72 74 65 6E 73 ....No, Hortens
00F540: 65 2C 20 85 20 84 20 87 20 63 6F 6D 70 69 6C 65 e, . . . compile
00F550: 20 74 68 69 73 20 8B 20 81 20 8A C0 6D 6F 64 65 this . . ..mode
00F560: 20 28 2F 54 29 20 73 65 6C 65 63 74 65 64 20 2A (/T) selected *
00F570: 29 BF 89 20 8E 2E BF 00 00 1A 1A 1A 1A 1A 1A 1A ).. ............
00F580: B2 20 A4 20 00 45 78 63 68 61 6E 67 65 00 80 3B . . .Exchange..;
00F590: BF 93 20 53 59 53 54 45 4D 20 A3 20 AB 3B BF AF .. SYSTEM £ .;..
00F5A0: 20 80 28 70 3A AB 29 3B BF BF 28 2A B4 80 20 70 .(p:.);..(*.. p
00F5B0: 6F 72 63 65 73 73 20 61 74 20 70 20 77 69 74 68 orcess at p with
00F5C0: 20 63 75 72 72 65 6E 74 20 6F 6E 65 2A 29 BF 89 current one*)..
00F5D0: 20 80 2E BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ...............
00F5E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F5F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F600: 84 20 85 B4 2A 29 C1 66 63 62 63 72 3A A7 3B B4 . ..*).fcbcr:.;.
00F610: 28 2A B4 63 75 72 72 65 6E 74 20 A5 B5 2A 29 C1 (*.current ..*).
00F620: 66 63 62 72 6E 3A 86 33 3B B4 28 2A B4 B0 2F 4D fcbrn:.3;.(*../M
00F630: 20 32 2E 32 20 A5 20 8D B4 2A 29 C1 89 3B BF BF 2.2 . ..*)..;..
00F640: AF 20 A2 28 00 63 6F 64 65 00 83 3A AA 3B 64 65 . .(.code..:.;de
00F650: 3A A6 29 3A A6 3B B5 28 2A 00 52 65 73 75 6C 74 :.):.;.(*.Result
00F660: 00 82 20 00 69 73 00 81 20 41 20 00 76 61 6C 75 .. .is.. A .valu
00F670: 65 00 80 2A 29 BF AF 20 A1 28 83 3A AA 29 3A A6 e..*).. .(.:.):.
00F680: 3B B6 28 2A 82 20 81 20 48 4C 20 80 2A 29 BF 89 ;.(*. . HL .*)..
00F690: 20 B3 2E BF BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A ...............
00F6A0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F6B0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F6C0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F6D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F6E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F6F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00F700: B2 20 A4 20 00 43 50 4D 42 49 4F 53 00 C7 3B BF . . .CPMBIOS..;.
00F710: 93 B4 53 59 53 54 45 4D 20 A3 20 00 42 59 54 45 ..SYSTEM £ .BYTE
00F720: 00 C6 2C 00 57 4F 52 44 00 C5 3B BF 93 B4 43 50 ..,.WORD..;...CP
00F730: 4D 20 A3 20 00 61 6C 66 61 00 C4 2C 00 65 78 74 M £ .alfa..,.ext
00F740: 65 6E 00 C2 2C 00 64 69 73 63 6D 61 70 00 BE 3B en..,.discmap..;
00F750: BF 9D C0 28 2A 6D 6E 65 6D 6F 6E 69 63 73 20 00 ...(*mnemonics .
00F760: 66 6F 72 00 BD 20 64 69 72 65 63 74 20 62 64 6F for.. direct bdo
00F770: 73 20 63 61 6C 6C 73 20 75 73 69 6E 67 20 74 68 s calls using th
00F780: 65 20 6A 75 6D 70 20 00 76 65 63 74 6F 72 00 BC e jump .vector..
00F790: C0 20 74 61 62 6C 65 20 28 75 73 65 20 00 42 49 . table (use .BI
00F7A0: 4F 53 00 BB 20 61 6E 64 20 00 42 49 4F 53 48 4C OS.. and .BIOSHL
00F7B0: 00 BA 29 C0 2A 29 C0 63 62 6F 6F 74 3D 30 3B B4 ..).*).cboot=0;.
00F7C0: 28 2A B4 63 6F 6C 64 20 00 62 6F 6F 74 00 B9 B6 (*.cold .boot...
00F7D0: 2A 29 C0 77 62 6F 6F 74 3D 31 3B B4 28 2A B4 77 *).wboot=1;.(*.w
00F7E0: 61 72 6D 20 B9 B6 2A 29 C0 63 6F 6E 73 74 61 3D arm ..*).consta=
00F7F0: 32 3B B4 28 2A B4 00 63 6F 6E 73 6F 6C 65 00 B8 2;.(*..console..
00F800: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
00F810: 0D 00 00 00 02 09 4E E5 0D 00 41 02 00 00 00 02 ......N...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: B2 20 A4 20 00 46 61 73 74 4D 6F 76 65 00 97 3B . . .FastMove..;
00F910: BF BF 28 2A B4 41 73 73 65 6D 62 6C 79 20 6C 61 ..(*.Assembly la
00F920: 6E 67 75 61 67 65 20 72 6F 75 74 69 6E 65 73 20 nguage routines
00F930: 00 74 6F 00 96 20 64 6F 20 66 61 73 74 20 00 6D .to.. do fast .m
00F940: 65 6D 6F 72 79 00 95 20 00 6D 6F 76 65 73 00 94 emory.. .moves..
00F950: 2F 65 78 63 68 61 6E 67 65 73 C0 75 73 69 6E 67 /exchanges.using
00F960: 20 4C 44 49 52 20 00 61 6E 64 00 92 20 4C 44 44 LDIR .and.. LDD
00F970: 52 20 BF C0 00 49 66 00 91 20 00 74 68 65 00 90 R ...If.. .the..
00F980: 20 94 20 61 72 65 20 6E 6F 6E 20 2D 6F 76 65 72 . are non -over
00F990: 6C 61 70 70 69 6E 67 2C 20 79 6F 75 20 63 61 6E lapping, you can
00F9A0: 20 00 75 73 65 00 8F 20 65 69 74 68 65 72 20 00 .use.. either .
00F9B0: 4D 6F 76 65 75 70 00 8E C0 00 6F 72 00 8D 20 00 Moveup....or.. .
00F9C0: 4D 6F 76 65 64 6F 77 6E 00 8C BF C0 91 20 74 68 Movedown..... th
00F9D0: 65 79 20 6F 76 65 72 6C 61 70 20 92 20 90 20 00 ey overlap . . .
00F9E0: 64 65 73 74 69 6E 61 74 69 6F 6E 00 8B 20 00 61 destination.. .a
00F9F0: 64 64 72 65 73 73 00 8A 20 00 69 73 00 88 20 6C ddress.. .is.. l
00FA00: 6F 77 65 72 20 74 68 61 6E 20 90 C0 00 73 6F 75 ower than ...sou
00FA10: 72 63 65 00 87 20 8A 2C 20 8F 20 8C 20 65 6C 73 rce.. ., . . els
00FA20: 65 20 8F 20 8E BF C0 91 20 90 20 6C 65 6E 67 74 e . .... . lengt
00FA30: 68 20 88 20 7A 65 72 6F 2C 20 6E 6F 74 68 69 6E h . zero, nothin
00FA40: 67 20 88 20 6D 6F 76 65 64 2A 29 BF BF 93 20 53 g . moved*)... S
00FA50: 59 53 54 45 4D 20 A3 20 AB 3B BF AF 20 8E 28 87 YSTEM £ .;.. .(.
00FA60: 2C 8B 3A AB 3B 00 6C 65 6E 00 86 3A AD 29 3B BF ,.:.;.len..:.);.
00FA70: BF AF 20 8C 28 87 2C 8B 3A AB 3B 86 3A AD 29 3B .. .(.,.:.;.:.);
00FA80: C0 BF AF 20 53 77 61 70 28 61 2C 62 3A AB 3B 86 ... Swap(a,b:.;.
00FA90: 3A AD 29 3B BF AF 20 53 65 61 72 63 68 75 70 28 :.);.. Searchup(
00FAA0: 00 63 68 00 85 3A 99 3B 00 73 74 61 72 74 00 84 .ch..:.;.start..
00FAB0: 3A AB 3B 86 3A AD 29 3A AD 3B BF AF 20 53 65 61 :.;.:.):.;.. Sea
00FAC0: 72 63 68 64 6F 77 6E 28 85 3A 99 3B 84 3A AB 3B rchdown(.:.;.:.;
00FAD0: 86 3A AD 29 3A AD 3B BF BF 28 2A B4 6C 6F 6F 6B .:.):.;..(*.look
00FAE0: 20 66 6F 72 20 61 20 00 63 68 61 72 61 63 74 65 for a .characte
00FAF0: 72 00 83 20 69 6E 20 95 C0 85 20 88 20 74 68 20 r.. in ... . th
00FB00: E4 2C 9F 3A AD 3B C1 8E 20 AE 3A AA 29 3B BF BF .,.:.;.. .:.);..
00FB10: 28 2A B4 52 65 61 64 28 57 72 69 74 65 29 20 61 (*.Read(Write) a
00FB20: 20 00 62 6C 6F 63 6B 00 9E 20 F6 20 28 EF 29 20 .block.. . (.)
00FB30: 61 20 C5 20 CE BF C0 66 BE BC 2D 20 D6 20 CE 20 a . ...f..- . .
00FB40: F6 20 FA 20 EF 20 C8 20 28 B3 20 63 68 65 63 6B . . . . (. check
00FB50: 20 F3 20 B0 C0 DF BD 2D 20 61 64 64 72 65 73 73 . ....- address
00FB60: 20 E5 20 DF 20 EF 20 C8 20 B9 C0 E4 BE 2D 20 9E . . . . ....- .
00FB70: 20 EF 20 C8 2E BA 42 6C 6F 63 6B 73 20 E7 20 31 . ...Blocks . 1
00FB80: 32 38 20 00 62 79 74 65 73 00 9D 20 65 61 63 68 28 .bytes.. each
00FB90: C1 BD 49 6E 20 65 61 72 6C 79 20 76 65 72 73 69 ..In early versi
00FBA0: 6F 6E 73 20 E5 20 FD 20 00 63 6F 6D 70 69 6C 65 ons . . .compile
00FBB0: 72 00 9C 2C 20 F8 20 70 61 72 61 6D 65 74 65 72 r.., . parameter
00FBC0: 20 00 77 61 73 00 9A 20 69 67 6E 6F 72 65 64 C1 .was.. ignored.
00FBD0: BD A8 20 ED 20 9A 20 7A 65 72 6F 2E 20 F7 20 E8 .. . . zero. . .
00FBE0: 20 F1 20 F0 20 72 65 70 6C 61 63 65 64 20 E6 20 . . replaced .
00FBF0: FD 20 00 72 6F 75 74 69 6E 65 73 00 98 C1 BD 00 . .routines.....
00FC00: 53 65 71 52 65 61 64 42 6C 6F 63 6B 00 97 20 D8 SeqReadBlock.. .
00FC10: 20 00 53 65 71 57 72 69 74 65 42 6C 6F 63 6B 00 .SeqWriteBlock.
00FC20: 95 C0 9F BA 2D 20 42 79 74 65 20 E2 20 EF 20 00 ....- Byte . . .
00FC30: 74 72 61 6E 73 66 65 72 00 94 20 28 FE 20 64 69 transfer.. (. di
00FC40: 66 66 65 72 65 6E 63 65 20 F6 20 FB 31 31 20 C1 fference . .11 .
00FC50: BD FA 20 64 65 66 69 6E 65 73 20 61 20 E0 20 E2 .. defines a . .
00FC60: 2E 20 F7 20 F3 20 61 20 00 63 61 73 65 00 92 20 . . . a .case..
00FC70: E5 20 FA 20 F3 20 6D 6F 72 65 20 C1 BD 70 6F 72 . . . more ..por
00FC80: 74 61 62 6C 65 2C 20 00 73 69 6E 63 65 00 91 20 table, .since..
00FC90: FD 20 FB 2D 31 31 20 9C 20 64 65 66 69 6E 65 64 . .-11 . defined
00FCA0: 20 53 49 5A 45 20 D8 20 54 53 49 5A 45 20 EF C1 SIZE . TSIZE ..
00FCB0: BD 00 62 65 00 90 20 FD 20 73 69 7A 65 20 F5 20 ..be.. . size .
00FCC0: 77 6F 72 64 73 2C 20 FA 20 77 6F 75 6C 64 20 90 words, . would .
00FCD0: 20 74 6F 74 61 6C 6C 79 20 73 69 6C 6C 79 20 01 totally silly .
00FCE0: 00 20 61 C1 BD E3 20 6F 72 69 65 6E 74 65 64 20 . a... oriented
00FCF0: F2 29 BF C2 2A 2A 20 63 61 72 65 66 75 6C 20 2A .)..** careful *
00FD00: 83 20 96 20 66 69 6E 64 C0 84 20 88 20 84 20 8A . . find.. . . .
00FD10: C0 86 20 88 20 6E 75 6D 62 65 72 20 00 6F 66 00 .. . number .of.
00FD20: 82 20 62 79 74 65 73 20 96 20 65 78 61 6D 69 6E . bytes . examin
00FD30: 65 20 28 00 69 66 00 81 20 30 20 36 34 6B 20 88 e (.if.. 0 64k .
00FD40: 20 73 65 61 72 63 68 65 64 29 C0 72 65 74 75 72 searched).retur
00FD50: 6E 73 20 8A 20 82 20 6D 61 74 63 68 65 64 20 00 ns . . matched .
00FD60: 62 79 74 65 00 80 2C 20 8D 20 8A 20 82 20 80 C0 byte.., . . . ..
00FD70: 6F 6E 65 20 70 61 73 74 20 65 6E 64 20 81 20 6E one past end . n
00FD80: 6F 6E 65 BF 2A 29 BF 89 20 97 2E BF 00 00 1A 1A one.*).. .......
00FD90: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00FDA0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00FDB0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00FDC0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00FDD0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00FDE0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00FDF0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
00FE00: B2 20 A4 20 00 46 69 6C 65 73 00 01 01 3B BA BF . . .Files...;..
00FE10: BF 28 2A B4 01 01 20 64 65 66 69 6E 69 74 69 6F .(*... definitio
00FE20: 6E 20 00 66 6F 72 00 01 00 20 00 43 50 00 FF 2F n .for... .CP../
00FE30: 4D BF C0 43 65 72 65 6E 6B 6F 66 20 4D 6F 64 75 M..Cerenkof Modu
00FE40: 6C 61 20 49 49 BF C0 00 4E 6F 74 65 00 FE 20 61 la II...Note.. a
00FE50: 6C 73 6F 20 00 74 68 65 00 FD 20 00 6D 6F 64 75 lso .the.. .modu
00FE60: 6C 65 00 FC 20 00 52 54 00 FB 31 31 01 01 20 00 le.. .RT..11.. .
00FE70: 77 68 69 63 68 00 FA 20 70 72 6F 76 69 64 65 73 which.. provides
00FE80: 20 FB 31 31 C0 63 6F 6D 70 61 74 69 62 69 6C 69 .11.compatibili
00FE90: 74 79 2E 20 54 68 61 74 20 FC 20 00 75 73 65 73 ty. That . .uses
00FEA0: 00 F9 20 00 74 68 69 73 00 F8 20 6F 6E 65 2A 29 .. .this.. one*)
00FEB0: BF BF 28 2A B4 43 61 75 74 69 6F 6E 20 C0 2A 2A ..(*.Caution .**
00FEC0: 2A 2A 2A 2A 2A BF C0 00 54 68 69 73 00 F7 20 FC *****...This.. .
00FED0: 20 64 69 66 66 65 72 73 20 00 66 72 6F 6D 00 F6 differs .from..
00FEE0: 20 FD 20 FB 31 31 20 FC 20 00 69 6E 00 F5 20 63 . .11 . .in.. c
00FEF0: 65 72 74 61 69 6E 20 77 61 79 73 BF C0 00 54 68 ertain ways...Th
00FF00: 2A BF C1 BD 9F 20 73 68 6F 75 6C 64 20 90 20 61 *.... should . a
00FF10: 20 00 6D 75 6C 74 69 70 6C 65 00 8F 20 E5 20 31 .multiple.. . 1
00FF20: 32 38 20 9D C1 BD 65 76 65 6E 20 A8 20 69 74 73 28 ...even . its
00FF30: 20 E1 2C 20 61 20 8F 20 E5 20 31 32 38 20 9D 20 ., a . . 128 .
00FF40: F3 20 61 6C 77 61 79 73 C1 BD 00 74 72 61 6E 73 . always...trans
00FF50: 66 65 72 72 65 64 00 8D 2E 20 C0 AE BE 2D 20 3E ferred... ...- >
00FF60: 3D 30 20 41 63 74 75 61 6C 20 00 6E 75 6D 62 65 =0 Actual .numbe
00FF70: 72 00 8C 20 E5 20 42 59 54 45 53 20 8D C1 BE 20 r.. . BYTES ...
00FF80: 30 20 72 65 70 72 65 73 65 6E 74 73 20 45 4F 46 0 represents EOF
00FF90: 2E 20 41 20 70 61 72 74 69 61 6C 20 94 20 00 77 . A partial . .w
00FFA0: 69 6C 6C 00 8B 20 A7 C2 6F 63 63 75 72 20 00 61 ill.. ..occur .a
00FFB0: 74 00 8A 20 00 65 6E 64 00 88 20 E5 20 CE 20 28 t.. .end.. . . (
00FFC0: 00 6E 65 76 65 72 00 87 20 88 20 E5 20 65 78 74 .never.. . . ext
00FFD0: 65 6E 74 29 C2 4F 6E 6C 79 20 6C 65 73 73 20 00 ent).Only less .
00FFE0: 74 68 61 6E 00 86 20 9D 20 EF 20 94 20 6F 6E 20 than.. . . . on
00FFF0: 77 72 69 74 65 73 20 A8 C2 C5 20 F3 20 A0 C0 52 writes ... . ..R
010000: 65 6D 61 72 6B 3A C1 AE 20 87 20 A9 20 68 61 72 emark:.. . . har
010010: 64 20 DD 20 91 20 F5 20 DA 20 92 C1 77 65 20 87 d . . . . ..we .
010020: 20 67 65 74 20 62 61 63 6B 20 F6 20 EC 2E C1 4F get back . ...O
010030: 6E 65 20 77 61 79 20 EF 20 6F 76 65 72 63 6F 6D ne way . overcom
010040: 65 20 DA 20 F3 20 EF 20 EE 20 FD 20 63 6F 6C 64 e . . . . . cold
010050: 20 62 6F 6F 74 C1 00 6A 75 6D 70 00 85 20 8A 20 boot..jump.. .
010060: 6C 6F 63 61 74 69 6F 6E 20 30 2E 20 EB 20 EA 20 location 0. . .
010070: 64 6F 20 F8 2C 20 EA 20 8B 20 E5 20 63 6F 75 72 do ., . . . cour
010080: 73 65 C1 00 68 61 76 65 00 83 20 EF 20 6D 6F 64 se..have.. . mod
010090: 69 66 79 20 F8 20 FC 20 61 70 70 72 6F 70 72 69 ify . . appropri
0100A0: 61 74 65 6C 6C 79 2E 20 41 6C 73 6F 20 FD C1 44 atelly. Also ..D
0100B0: 69 72 65 63 74 20 42 69 6F 73 20 63 61 6C 6C 20 irect Bios call
0100C0: 63 6F 64 65 20 F5 20 FD 20 EC 20 FC 20 8B 20 83 code . . . . . .
0100D0: 20 EF C1 90 20 61 6C 74 65 72 65 64 2C 20 00 61 ... altered, .a
0100E0: 73 00 82 20 ED 20 F9 20 F8 20 69 6E 73 74 72 75 s.. . . . instru
0100F0: 63 74 69 6F 6E 20 EF 20 70 69 63 6B 20 75 70 C1 ction . pick up.
010100: 65 00 F4 20 6F 72 69 67 69 6E 61 6C 20 01 01 20 e.. original ..
010110: FC 20 00 69 73 00 F3 20 76 65 72 79 20 00 6D 61 . .is.. very .ma
010120: 63 68 69 6E 65 00 F2 20 73 70 65 63 69 66 69 63 chine.. specific
010130: 2E 20 49 74 20 00 68 61 73 00 F1 C0 74 68 65 72 . It .has...ther
010140: 65 66 6F 72 65 20 00 62 65 65 6E 00 F0 20 64 65 efore .been.. de
010150: 65 6D 65 64 20 61 63 63 65 70 74 69 62 6C 65 20 emed acceptible
010160: 00 74 6F 00 EF 20 00 63 68 61 6E 67 65 00 EE 20 .to.. .change..
010170: 00 69 74 00 ED 20 01 00 20 00 43 50 4D 00 EC 2E .it.. .. .CPM...
010180: BF C0 00 49 66 00 EB 20 00 79 6F 75 00 EA 20 77 ...If.. .you.. w
010190: 61 6E 74 20 F2 20 69 6E 64 65 70 65 6E 64 61 6E ant . independan
0101A0: 74 20 00 49 4F 00 E9 2C 20 00 75 73 65 00 E8 20 t .IO.., .use..
0101B0: 73 74 72 65 61 6D 73 BF C0 F4 20 64 69 66 66 65 streams... diffe
0101C0: 72 65 6E 63 65 73 20 00 61 72 65 00 E7 3A BF C0 rences .are..:..
0101D0: 53 6F 6D 65 20 70 61 72 61 6D 65 74 65 72 73 20 Some parameters
0101E0: 70 61 73 73 65 64 20 00 62 79 00 E6 20 8E 20 69 passed .by.. . i
0101F0: 6E 73 74 65 61 64 20 00 6F 66 00 E5 20 76 61 6C nstead .of.. val
010200: 75 65 C0 00 62 6C 6B 6E 72 00 E4 20 70 61 72 61 ue..blknr.. para
010210: 6D 61 74 65 72 20 F3 20 68 61 6E 64 6C 65 64 20 mater . handled
010220: 64 69 66 66 65 72 65 6E 74 6C 79 C0 00 62 79 74 differently..byt
010230: 65 00 E3 20 00 63 6F 75 6E 74 00 E2 20 00 6E 6F e.. .count.. .no
010240: 74 00 E1 20 00 77 6F 72 64 00 E0 20 E2 20 75 73 t.. .word.. . us
010250: 65 64 20 01 00 20 00 62 75 66 66 65 72 00 DF 20 ed .. .buffer..
010260: 6C 65 6E 67 74 68 73 C0 4E 6F 74 20 00 61 6C 6C lengths.Not .all
010270: 00 DE 20 FB 31 31 20 00 65 72 72 6F 72 00 DD 20 .. .11 .error..
010280: 00 63 6F 64 65 73 00 DC 20 6D 61 6B 65 20 73 65 .codes.. make se
010290: 6E 73 65 20 75 6E 64 65 72 20 EC C0 01 01 20 E7 nse under .... .
0102A0: 20 E1 20 43 68 61 6E 6E 65 6C 20 6E 75 6D 62 65 . Channel numbe
0102B0: 72 73 21 20 B5 2A 29 BF BF 93 20 53 59 53 54 45 rs! .*)... SYSTE
0102C0: 4D 20 A3 20 AB 2C 57 4F 52 44 3B BF 93 20 EC BC M £ .,WORD;.. ..
0102D0: A3 20 00 66 63 62 00 DB 3B BF BF 28 2A B4 FE 20 £ .fcb..;..(*..
0102E0: 00 74 68 61 74 00 DA 20 52 61 64 35 30 00 6E 61 .that.. Rad50.na
0102F0: 6D 65 00 D9 20 00 61 6E 64 00 D8 20 52 61 64 69 me.. .and.. Radi
010300: FD 20 42 49 4F 53 20 74 61 62 6C 65 2E 20 43 68 . BIOS table. Ch
010310: 61 6E 67 69 6E 67 20 FD 20 43 6F 6C 64 20 42 6F anging . Cold Bo
010320: 6F 74 20 85 20 F3 20 E1 C1 73 75 70 70 6F 72 74 ot . . ..support
010330: 65 64 20 2D 20 65 69 74 68 65 72 20 E6 20 75 73 ed - either . us
010340: 20 00 6F 72 00 81 20 E6 20 44 69 67 69 74 61 6C .or.. . Digital
010350: 20 52 65 73 65 61 72 63 68 21 BF C0 44 65 75 78 Research!..Deux
010360: 69 65 6D 65 20 72 65 6D 61 72 6B 3A C1 E9 20 EF ieme remark:.. .
010370: 20 6F 74 68 65 72 73 20 64 65 76 69 63 65 73 20 others devices
010380: F3 20 B0 20 E6 20 53 54 52 45 41 4D 53 BF BF 2A . . . STREAMS..*
010390: 29 BF AF 20 97 28 8E 20 66 3A C4 3B DF 3A AB 3B ).. .(. f:.;.:.;
0103A0: 9F 3A AD 3B C1 8E 20 AE 3A AA 29 3B BF AF 20 95 .:.;.. .:.);.. .
0103B0: 28 8E 20 66 3A C4 3B DF 3A AB 3B 9F 3A AD 3B C1 (. f:.;.:.;.:.;.
0103C0: 8E 20 AE 3A AA 29 3B BF BF 28 2A B4 F4 20 D0 20 . .:.);..(*.. .
0103D0: 28 8A 20 56 31 2E 30 33 29 20 98 20 EF 20 70 65 (. V1.03) . . pe
0103E0: 72 66 6F 72 6D 20 CA 20 E9 C0 50 61 72 61 6D 65 rform . ..Parame
0103F0: 74 65 72 73 20 E7 20 82 20 01 00 20 CB 20 D8 20 ters . . .. . .
010400: C9 20 65 78 63 65 70 74 20 74 68 65 72 65 C0 F3 . except there..
010410: 20 B3 20 9E 20 8C 2A 29 BF BF AF 20 C7 28 8E 20 . . .*)... .(.
010420: 66 3A C4 3B D0 2C 6F 6C 64 3A 9B 20 84 20 99 3B f:.;.,old:. . .;
010430: 8E 20 AE 3A AA 29 3B BF 28 2A B4 43 68 61 6E 67 . .:.);.(*.Chang
010440: 65 73 20 FD 20 CE 20 D9 BF C0 46 69 6C 65 20 B7 es . . ...File .
010450: 20 90 20 D6 2C 20 B6 20 00 6D 75 73 74 00 80 20 . ., . .must..
010460: E1 20 90 20 61 63 63 65 73 73 65 64 20 75 6E 74 . . accessed unt
010470: 69 6C 20 72 65 2D 6F 70 65 6E 65 64 C0 61 66 74 il re-opened.aft
010480: 65 72 20 D9 20 EE BF C0 41 6E 79 20 D2 20 CE 20 er . ...Any . .
010490: 77 69 74 68 20 73 61 6D 65 20 D9 20 F3 20 64 65 with same . . de
0104A0: 6C 65 74 65 64 2A 29 BF AF 20 4D 61 6B 65 42 41 leted*).. MakeBA
0104B0: 4B 28 8E 20 66 3A C4 3B 8E 20 AE 3A AA 29 3B BF K(. f:.;. .:.);.
0104C0: 28 2A B4 BB 20 FD 20 CE 20 6E 61 6D 65 64 20 F5 (*.. . . named .
0104D0: 20 FD 20 B1 20 46 43 42 20 EF 20 61 20 42 41 4B . . FCB . a BAK
0104E0: 20 CE 2A 29 BF AF 20 53 65 74 42 6C 6F 63 6B 28 .*).. SetBlock(
0104F0: 8E 20 66 3A C4 3B E4 3A AD 29 3B B4 BF 28 2A B4 . f:.;.:.);..(*.
010500: 63 35 30 20 E7 20 6F 6D 69 74 74 65 64 20 2A 29 c50 . omitted *)
010510: BF BF 28 2A B4 50 72 6F 63 65 64 75 72 65 B4 42 ..(*.Procedure.B
010520: 44 4F 53 20 72 65 71 75 65 73 74 B4 66 75 6E 63 DOS request.func
010530: 74 69 6F 6E BF C0 00 4C 6F 6F 6B 75 70 00 D7 B5 tion...Lookup...
010540: 6F 70 6E 66 63 B5 00 6F 70 65 6E 00 D6 20 DB C0 opnfc..open.. ..
010550: 00 43 72 65 61 74 65 00 D5 B5 00 64 65 6C 66 63 .Create....delfc
010560: 00 D4 2F 6D 61 6B 66 63 B4 00 64 65 6C 65 74 65 ../makfc..delete
010570: 00 D3 20 61 6E 79 20 00 65 78 69 73 74 69 6E 67 .. any .existing
010580: 00 D2 20 D8 20 00 63 72 65 61 74 65 00 D1 20 00 .. . .create.. .
010590: 6E 65 77 00 D0 C0 00 44 65 6C 65 74 65 00 CF B5 new....Delete...
0105A0: D4 B5 D3 20 00 66 69 6C 65 00 CE C0 00 52 65 6C ... .file....Rel
0105B0: 65 61 73 65 00 CD B5 D4 B5 D3 20 DE 20 65 78 74 ease...... . ext
0105C0: 65 6E 74 73 C0 00 43 6C 6F 73 65 00 CC B5 63 6C ents..Close...cl
0105D0: 73 66 63 B5 63 6C 6F 73 65 20 CE C0 00 57 72 69 sfc.close ...Wri
0105E0: 74 65 42 6C 6F 63 6B 00 CB B4 77 73 72 66 63 B5 teBlock...wsrfc.
0105F0: 28 00 73 65 71 75 65 6E 74 69 61 6C 00 CA 29 20 (.sequential..)
010600: 77 72 69 74 65 C0 00 52 65 61 64 42 6C 6F 63 6B write..ReadBlock
010610: 00 C9 B4 72 73 72 66 63 B5 28 CA 29 20 00 72 65 ...rsrfc.(.) .re
010620: 61 64 00 C8 C0 00 52 65 6E 61 6D 65 00 C7 B5 72 ad....Rename...r
010630: 65 6E 66 63 B5 C7 20 CE BF 2A 29 BF 96 20 B4 C0 enfc.. ..*).. ..
010640: 00 44 65 76 69 63 65 74 79 70 65 00 C6 3D 28 63 .Devicetype..=(c
010650: 6F 6E 2C 72 64 72 2C 6C 73 74 2C 70 75 6E 2C 00 on,rdr,lst,pun,.
010660: 64 69 73 63 00 C5 29 3B C0 00 46 49 4C 45 00 C4 disc..);..FILE..
010670: 3D A5 C1 64 65 76 74 79 70 65 3A C6 3B C1 66 3A =..devtype:.;.f:
010680: DB 3B C1 65 6F 66 3A AC 3B C1 89 3B C0 46 69 6C .;.eof:.;..;.Fil
010690: 65 4E 61 6D 65 3D 9B 5B 30 2E 2E 31 33 5D 20 84 eName=.[0..13] .
0106A0: 20 99 3B 20 28 2A 65 2E 67 2E 20 62 3A 66 69 6C .; (*e.g. b:fil
0106B0: 65 6E 61 6D 65 2E 64 61 74 2A 29 BF BF AF 20 43 ename.dat*)... C
0106C0: 6F 6E 76 65 72 74 46 69 6C 65 4E 61 6D 65 28 8E onvertFileName(.
0106D0: 20 66 3A DB 3B 00 66 6E 00 C3 3A 9B 20 84 20 99 f:.;.fn..:. . .
0106E0: 29 3B BF BF 28 2A B4 00 43 6F 6E 76 65 72 74 00 );..(*..Convert.
0106F0: BB 20 61 20 CE 20 D9 20 00 69 6E 74 6F 00 B9 20 . a . . .into..
010700: 50 6F 73 69 74 69 6F 6E 20 EF 20 61 20 9E 20 F5 Position . a . .
010710: 20 61 20 CE C0 FD 20 9E 20 80 20 65 78 69 73 74 a ... . . exist
010720: 20 F5 20 FD 20 CE 20 61 6C 72 65 61 64 79 20 2D . . . already -
010730: 20 81 20 8A 20 6D 6F 73 74 20 90 20 FD C0 6E 65 . . most . ..ne
010740: 78 74 20 9E 20 EF 20 90 20 61 64 64 65 64 20 EF xt . . . added .
010750: 20 FD 20 CE C0 C0 F7 20 F3 20 62 65 63 61 75 73 . .... . becaus
010760: 65 20 F8 20 72 6F 75 74 69 6E 65 20 70 65 72 66 e . routine perf
010770: 6F 72 6D 73 20 61 20 EC 20 31 20 63 6F 6D 70 61 orms a . 1 compa
010780: 74 69 62 6C 65 20 73 65 71 75 65 6E 63 65 2C 20 tible sequence,
010790: 72 61 74 68 65 72 C0 86 20 FD 20 65 78 74 65 6E rather.. . exten
0107A0: 64 65 64 20 DC 20 69 6E 74 72 6F 64 75 63 65 64 ded . introduced
0107B0: 20 E6 20 FF 2F 4D 20 32 2E 32 2E 20 28 49 74 73 . ./M 2.2. (Its
0107C0: 20 70 72 6F 62 61 62 6C 79 20 66 61 73 74 65 72 probably faster
0107D0: 20 74 6F 6F 29 20 2A 29 BF BF 89 20 01 01 2E BF too) *)... ....
0107E0: 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0107F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
010800: B2 20 A4 20 00 47 65 74 46 69 6C 65 73 00 9A 3B . . .GetFiles..;
010810: BF BF 28 2A B4 47 65 74 20 61 20 00 6C 69 73 74 ..(*.Get a .list
010820: 00 98 20 00 6F 66 00 97 20 00 66 69 6C 65 00 96 .. .of.. .file..
010830: 20 00 6E 61 6D 65 73 00 95 20 6D 65 65 74 69 6E .names.. meetin
010840: 67 20 61 20 77 69 6C 64 63 61 72 64 20 64 65 73 g a wildcard des
010850: 63 72 69 70 74 69 6F 6E 2A 29 BF 93 20 00 46 69 cription*).. .Fi
010860: 6C 65 73 00 94 20 A3 20 00 46 69 6C 65 4E 61 6D les.. £ .FileNam
010870: 65 00 92 3B BF AF 20 47 65 74 4E 61 6D 65 73 28 e..;.. GetNames(
010880: 00 50 61 74 74 65 72 6E 00 91 3A 9B 20 84 20 99 .Pattern..:. . .
010890: 3B C1 8E B4 95 3A 9B 20 84 20 92 3B 8E 20 00 63 ;....:. . .;. .c
0108A0: 6F 75 6E 74 00 90 3A AA 29 3B BF BF 28 2A B4 91 ount..:.);..(*..
0108B0: 20 00 69 73 00 8F 20 61 20 70 61 74 74 65 72 6E .is.. a pattern
0108C0: 20 00 74 6F 00 8D 20 75 73 65 20 00 66 6F 72 00 .to.. use .for.
0108D0: 8C 20 00 74 68 65 00 8B 20 73 65 61 72 63 68 C0 . .the.. search.
0108E0: 95 20 00 72 65 74 75 72 6E 73 00 8A 20 61 20 98 . .returns.. a .
0108F0: 20 97 20 6D 61 74 63 68 69 6E 67 20 96 20 00 6E . matching . .n
010900: 00 61 6E 00 B8 20 DB BF C0 CE 20 D9 20 00 6D 61 .an.. .... . .ma
010910: 79 00 B7 20 69 6E 63 6C 75 64 65 20 77 69 6C 64 y.. include wild
010920: 20 63 61 72 64 73 20 28 00 62 75 74 00 B6 20 00 cards (.but.. .
010930: 6E 6F 00 B3 20 73 65 61 72 63 68 20 01 00 20 6D no.. search .. m
010940: 61 74 63 68 69 6E 67 20 C1 00 66 69 6C 65 73 00 atching ..files.
010950: B1 20 F3 20 00 70 65 72 66 6F 72 6D 65 64 00 B0 . . .performed..
010960: 2A 29 B4 BF AF 20 D7 28 8E 20 66 3A C4 3B C3 3A *)... .(. f:.;.:
010970: 9B 20 84 20 99 3B 8E 20 00 72 65 70 6C 79 00 AE . . .;. .reply..
010980: 3A AA 29 3B BF BF 28 2A B4 AE 20 00 72 65 74 75 :.);..(*.. .retu
010990: 72 6E 73 00 A9 20 B4 30 20 00 69 66 00 A8 20 6F rns.. .0 .if.. o
0109A0: 6B 20 28 6E 6F 74 65 2D 20 E1 20 CE 20 6C 65 6E k (note- . . len
0109B0: 67 74 68 29 C2 2D 31 20 A8 20 6F 75 74 70 75 74 gth).-1 . output
0109C0: 20 00 6F 6E 6C 79 00 A7 20 00 64 65 76 69 63 65 .only.. .device
0109D0: 00 A6 20 00 73 70 65 63 69 66 69 65 64 00 A2 C2 .. .specified...
0109E0: 2D 32 20 A8 20 CE 20 E1 20 66 6F 75 6E 64 2A 29 -2 . . . found*)
0109F0: BF BF BF AF 20 D5 28 8E 20 66 3A C4 3B C3 3A 9B .... .(. f:.;.:.
010A00: 20 84 20 99 3B 8E 20 AE 3A AA 29 3B BF BF 28 2A . .;. .:.);..(*
010A10: B4 D3 20 D2 20 D8 20 D1 20 D0 20 CE C0 AE 20 3D .. . . . . ... =
010A20: 20 30 2C 20 A8 20 00 4F 4B 00 A1 C0 BE 20 2D 31 0, . .OK.... -1
010A30: BA A8 20 69 6E 70 75 74 20 A7 20 A6 20 A2 C0 BE .. input . . ...
010A40: 20 2D 32 2C 20 64 69 72 65 63 74 6F 72 79 20 00 -2, directory .
010A50: 66 75 6C 6C 00 A0 2A 29 BF BF AF 20 CF 28 8E 20 full..*)... .(.
010A60: 66 3A C4 3B C3 3A 9B 20 84 20 99 3B 8E 20 AE 3A f:.;.:. . .;. .:
010A70: AA 29 3B BF BF 28 2A B4 D3 20 D2 C0 52 65 70 6C .);..(*.. ..Repl
010A80: 79 20 2D 20 30 20 A1 C1 2D 32 2C 6E 6F 6E 20 73 y - 0 ..-2,non s
010A90: 75 63 68 2A 29 BF BF AF 20 CC 28 8E 20 66 3A C4 uch*)... .(. f:.
010AA0: 29 3B BF BF 28 2A B4 CC 20 CE 2A 29 BF BF AF 20 );..(*.. .*)...
010AB0: CD 28 8E 20 66 3A C4 29 3B C0 BF 28 2A B4 CF 20 .(. f:.);..(*..
010AC0: B8 20 D6 20 CE 20 2A 29 BF BF AF 20 C9 28 8E 20 . . . *)... .(.
010AD0: 66 3A C4 3B DF 3A AB 3B E4 2C 00 62 79 74 65 63 f:.;.:.;.,.bytec
010AE0: 6F 75 6E 74 00 9F 3A AD 3B C1 8E 20 AE 3A AA 29 ount..:.;.. .:.)
010AF0: 3B BF AF 20 CB 28 8E 20 66 3A C4 3B DF 3A AB 3B ;.. .(. f:.;.:.;
010B00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
010B10: 0E 00 00 00 02 09 4E E5 0E 00 41 02 00 00 00 02 ......N...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: 61 6D 65 00 88 20 28 77 69 74 68 20 00 6E 6F 00 ame.. (with .no.
010C10: 87 20 64 65 76 69 63 65 20 88 C1 6F 6E 20 8B 20 . device ..on .
010C20: 66 72 6F 6E 74 29 C0 90 20 8A 20 6E 75 6D 62 65 front).. . numbe
010C30: 72 20 97 20 95 20 00 72 65 74 75 72 6E 65 64 00 r . . .returned.
010C40: 86 20 69 6E 20 95 BF C0 49 66 20 8B 20 67 69 76 . in ...If . giv
010C50: 65 6E 20 88 20 63 6F 6E 74 61 69 6E 73 20 87 20 en . contains .
010C60: 77 69 6C 64 20 63 61 72 64 2C 20 00 69 74 00 85 wild card, .it..
010C70: 20 8F 20 61 6C 77 61 79 73 20 86 C0 00 61 73 00 . always ...as.
010C80: 83 20 8B 20 6F 6E 6C 79 20 6D 61 74 63 68 2C 20 . . only match,
010C90: 77 68 65 74 68 65 72 20 85 20 65 78 69 73 74 73 whether . exists
010CA0: 20 6F 72 20 6E 6F 74 20 BF C0 57 68 69 6C 65 20 or not ..While
010CB0: 00 74 68 69 73 00 82 20 6D 65 61 6E 73 20 74 68 .this.. means th
010CC0: 61 74 20 82 20 72 6F 75 74 69 6E 65 20 63 61 6E at . routine can
010CD0: 6E 6F 74 20 00 62 65 00 81 20 00 75 73 65 64 00 not .be.. .used.
010CE0: 80 20 8D 20 63 68 65 63 6B 20 8C C0 8B 20 65 78 . . check ... ex
010CF0: 69 73 74 65 6E 63 65 20 97 20 61 20 96 2C 20 85 istence . a ., .
010D00: 20 63 61 6E 20 81 20 80 20 8D 20 63 6F 6E 76 65 can . . . conve
010D10: 72 74 20 61 20 70 61 72 61 6D 65 74 65 72 C0 8D rt a parameter..
010D20: 20 61 20 66 69 6C 65 6E 61 6D 65 20 83 20 72 65 a filename . re
010D30: 71 75 69 72 65 64 20 62 79 20 8B 20 6D 6F 64 75 quired by . modu
010D40: 6C 65 20 94 20 2A 29 BF 89 20 9A 2E BF 00 00 1A le . *).. ......
010D50: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
010D60: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
010D70: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
010D80: B2 20 A4 20 00 49 6E 4F 75 74 00 F9 3B BF 93 20 . . .InOut..;..
010D90: 00 53 74 72 65 61 6D 73 00 F8 20 A3 20 00 53 54 .Streams.. £ .ST
010DA0: 52 45 41 4D 00 F7 3B BF BF 28 2A B4 F8 20 00 6D REAM..;..(*.. .m
010DB0: 6F 64 75 6C 65 00 F6 20 00 61 73 00 F5 20 70 65 odule.. .as.. pe
010DC0: 72 20 00 57 69 72 74 68 00 F4 27 73 20 62 6F 6F r .Wirth..'s boo
010DD0: 6B BF C0 00 49 6E 00 F3 20 61 64 64 69 74 69 6F k...In.. additio
010DE0: 6E 2C 20 00 74 68 65 72 65 00 F2 20 00 61 72 65 n, .there.. .are
010DF0: 00 F1 20 61 20 66 65 77 20 65 78 74 72 61 20 00 .. a few extra .
010E00: 00 8F 20 96 20 AB 20 EB 20 00 63 61 6C 6C 65 64 .. . . . .called
010E10: 00 8D 2C 20 E3 20 6F 6E 65 20 DE 20 EB 20 CB 2C .., . one . . .,
010E20: 20 9A 20 C0 B9 20 D6 20 EB 20 8F 20 96 20 CA 20 . .. . . . . .
010E30: EB 20 8D 2C 20 61 20 9C 20 EB 20 CB 2E 20 C0 A2 . ., a . . .. ..
010E40: 20 61 20 9C 20 EB 20 CB 2C 20 EE 20 A6 20 00 75 a . . ., . . .u
010E50: 73 65 00 8C 20 62 61 63 6B 73 70 61 63 65 2C 20 se.. backspace,
010E60: 00 63 6F 6E 74 72 6F 6C 00 8B 20 50 2C 20 8B 20 .control.. P, .
010E70: 55 C0 65 74 63 2E 20 DB 20 EE 20 95 20 77 61 6E U.etc. . . . wan
010E80: 74 20 61 20 9C 20 EF 20 D4 20 CB 20 28 65 76 65 t a . . . . (eve
010E90: 6E 20 BB 20 AB 29 2C 20 C6 C0 EA 20 C7 20 CE 20 n . .), ... . .
010EA0: EF 20 C5 2A 29 BF BF AF 20 52 65 61 64 4C 69 6E . .*)... ReadLin
010EB0: 65 28 8E 20 73 3A 9B 20 84 20 99 29 3B BF C0 28 e(. s:. . .);..(
010EC0: 2A AB 20 61 20 E1 20 E9 20 74 65 78 74 2E 20 DB *. a . . text. .
010ED0: 20 E1 20 EB 20 6C 6F 6E 67 65 72 20 00 74 68 61 . . longer .tha
010EE0: 6E 00 8A 20 73 2C 20 EA 20 72 65 6D 61 69 6E 64 n.. s, . remaind
010EF0: 65 72 C0 20 E9 20 EA 20 E1 20 EB 20 64 69 73 63 er. . . . . disc
010F00: 61 72 64 65 64 2A 29 BF BF AF 20 53 6B 69 70 45 arded*)... SkipE
010F10: 4F 4C 3B BF C0 28 2A 53 6B 69 70 20 72 65 73 74 OL;..(*Skip rest
010F20: 20 E9 20 E1 2A 29 BF BF AF 20 52 65 61 64 49 6E . .*)... ReadIn
010F30: 74 28 8E 20 78 3A AA 29 3B BF C0 28 2A AB 20 90 t(. x:.);..(*. .
010F40: 20 00 69 6E 74 65 67 65 72 00 88 20 B1 20 C0 20 .integer.. . .
010F50: 4E 75 6D 62 65 72 20 6D 61 79 20 68 61 76 65 20 Number may have
010F60: 00 6C 65 61 64 69 6E 67 00 87 20 73 69 67 6E C0 .leading.. sign.
010F70: 20 92 20 91 2C 20 E1 20 73 65 70 61 72 61 74 6F . ., . separato
010F80: 72 73 20 E6 20 74 61 62 73 20 F1 20 A7 C0 20 41 rs . tabs . .. A
010F90: 20 6E 6F 6E 2D 6E 75 6D 65 72 69 63 20 94 2A 29 non-numeric .*)
010FA0: BF BF AF 20 52 65 61 64 43 61 72 64 28 8E 20 78 ... ReadCard(. x
010FB0: 3A AD 29 3B BF C0 28 2A AB 20 61 20 63 61 72 64 :.);..(*. a card
010FC0: 69 6E 61 6C 2A 29 BF BF AF 20 D7 28 A8 3A 99 29 inal*)... .(.:.)
010FD0: 3B BF C0 28 2A D7 20 61 20 DE 2A 29 BF BF AF 20 ;..(*. a .*)...
010FE0: A9 3B BF C0 28 2A D7 20 61 20 E1 20 73 65 70 61 .;..(*. a . sepa
010FF0: 72 61 74 6F 72 2A 29 BF BF AF 20 B3 28 73 3A 9B rator*)... .(s:.
011000: 72 6F 75 74 69 6E 65 73 00 F0 20 00 74 6F 00 EF routines.. .to..
011010: 20 61 6C 6C 6F 77 20 00 79 6F 75 00 EE C0 EF 20 allow .you....
011020: 74 65 6D 70 6F 72 61 72 69 6C 6C 79 20 73 77 69 temporarilly swi
011030: 74 63 68 20 EF 20 61 20 6E 65 77 20 00 73 74 72 tch . a new .str
011040: 65 61 6D 00 ED BF C0 00 54 68 69 73 00 EC 20 00 eam.....This.. .
011050: 69 73 00 EB 20 00 74 68 65 00 EA 20 66 69 6C 6C is.. .the.. fill
011060: 20 76 65 72 73 69 6F 6E 20 00 6F 66 00 E9 20 69 version .of.. i
011070: 6E 6F 75 74 20 00 74 68 61 74 00 E8 20 61 6C 6C nout .that.. all
011080: 6F 77 73 20 C0 73 77 69 74 63 68 69 6E 67 20 E9 ows .switching .
011090: 20 00 73 74 72 65 61 6D 73 00 E7 20 00 61 6E 64 .streams.. .and
0110A0: 00 E6 20 72 65 64 69 72 65 63 74 69 6F 6E 20 28 .. redirection (
0110B0: 00 73 65 65 00 E5 20 61 6C 73 6F 20 C0 43 6F 6D .see.. also .Com
0110C0: 6D 61 6E 64 4C 69 6E 65 29 BF C0 00 54 68 65 72 mandLine)...Ther
0110D0: 65 00 E4 20 EB 20 61 6E 6F 74 68 65 72 20 F6 20 e.. . another .
0110E0: 53 6D 61 6C 6C 49 4F 2C 20 77 68 69 63 68 20 00 SmallIO, which .
0110F0: 6F 6E 6C 79 00 E3 20 73 75 70 70 6F 72 74 73 C0 only.. supports.
011100: EA 20 73 74 61 6E 64 61 72 64 20 E7 20 EF 20 EA . standard . . .
011110: 20 00 63 6F 6E 73 6F 6C 65 00 E2 2A 29 BF BF 9D .console..*)...
011120: B4 45 4F 4C 3D 31 65 78 3B B4 28 2A 20 45 6E 64 .EOL=1ex;.(* End
011130: 20 E9 20 00 6C 69 6E 65 00 E1 20 6D 61 72 6B 65 . .line.. marke
011140: 72 C2 BA 00 4E 6F 74 65 00 E0 20 E8 20 F4 20 75 r...Note.. . . u
011150: 73 65 73 20 31 65 68 20 3D 20 52 65 63 6F 72 64 ses 1eh = Record
011160: 20 73 65 70 65 72 61 74 6F 72 C2 BA 00 54 68 65 seperator...The
011170: 00 DF 20 E3 20 72 65 71 75 69 72 65 6D 65 6E 74 .. . requirement
011180: 20 EB 20 E8 20 EA 20 00 63 68 61 72 61 63 74 65 . . . .characte
011190: 72 00 DE C2 BA 64 6F 65 73 20 00 6E 6F 74 00 DD r....does .not..
0111A0: 20 6F 63 63 75 72 20 00 69 6E 00 DC 20 EA 20 6D occur .in.. . m
0111B0: 69 64 64 6C 65 20 E9 20 61 20 E1 BF C2 00 49 66 iddle . a ....If
0111C0: 00 DB 20 00 74 68 69 73 00 DA 20 73 79 6D 62 6F .. .this.. symbo
0111D0: 6C 20 EB 20 00 6F 75 74 70 75 74 00 D9 20 00 62 l . .output.. .b
0111E0: 79 00 D8 20 00 57 72 69 74 65 00 D7 2C 20 00 69 y.. .Write.., .i
0111F0: 74 00 D6 20 00 77 69 6C 6C 00 D5 20 00 62 65 00 t.. .will.. .be.
011200: 20 84 20 99 29 3B BF C0 28 2A D7 20 61 20 A5 2E . .);..(*. a ..
011210: 20 54 65 72 6D 69 6E 61 74 65 64 20 D8 20 6C 65 Terminated . le
011220: 6E 67 74 68 20 6F 72 20 6E 75 6C 6C 20 DE 2A 29 ngth or null .*)
011230: BF BF AF 20 57 72 69 74 65 49 6E 74 28 78 3A AA ... WriteInt(x:.
011240: 3B 00 70 6C 61 63 65 73 00 86 3A AD 29 3B BF C0 ;.places..:.);..
011250: 28 2A D7 20 78 20 DC 20 D0 20 6C 65 61 73 74 20 (*. x . . least
011260: 86 20 86 20 C0 20 00 6E 75 6D 62 65 72 00 85 20 . . . .number..
011270: EB 20 72 69 67 68 74 20 6A 75 73 74 69 66 69 65 . right justifie
011280: 64 2E 20 DB 20 6D 6F 72 65 20 73 70 61 63 65 73 d. . more spaces
011290: 20 F1 20 72 65 71 75 69 72 65 64 C0 20 8A 20 F2 . required. . .
0112A0: 20 F1 20 86 2C 20 EA 20 66 69 65 6C 64 20 EB 20 . ., . field .
0112B0: 65 78 70 61 6E 64 65 64 2E 20 F3 20 DA C0 20 63 expanded. . .. c
0112C0: 61 73 65 2C 20 F2 20 F1 20 6E 6F 20 87 20 91 2A ase, . . no . .*
0112D0: 29 BF BF AF 20 57 72 69 74 65 43 61 72 64 28 78 )... WriteCard(x
0112E0: 2C 86 3A AD 29 3B BF AF 20 00 57 72 69 74 65 48 ,.:.);.. .WriteH
0112F0: 65 78 00 83 28 78 2C 86 3A AD 29 3B BF AF 20 57 ex..(x,.:.);.. W
011300: 72 69 74 65 4F 63 74 28 78 2C 86 3A AD 29 3B BF riteOct(x,.:.);.
011310: C0 28 2A 4F 74 68 65 72 20 63 61 72 64 69 6E 61 .(*Other cardina
011320: 6C 6F 75 74 70 75 74 20 F0 2E 20 54 6F 20 77 72 loutput .. To wr
011330: 69 74 65 20 90 20 88 20 DC 20 68 65 78 2C 20 8C ite . . . hex, .
011340: C0 20 83 28 43 61 72 64 69 6E 61 6C 28 69 6E 74 . .(Cardinal(int
011350: 65 67 65 72 76 61 6C 75 65 29 2C 34 20 28 2A 73 egervalue),4 (*s
011360: 61 79 2A 29 29 3B 20 2D 31 20 D5 20 70 72 69 6E ay*)); -1 . prin
011370: 74 20 F5 20 46 46 46 46 2A 29 BF C0 28 2A 53 65 t . FFFF*)..(*Se
011380: 65 20 EA 20 F6 20 52 65 61 6C 49 6E 4F 75 74 20 e . . RealInOut
011390: CD 20 52 65 61 6C 20 85 20 49 4F 2A 29 BF BF BF . Real . IO*)...
0113A0: AF 20 53 77 69 74 63 68 49 6E 53 74 72 65 61 6D . SwitchInStream
0113B0: 28 70 3A F7 29 3B BF C0 28 2A 00 53 77 69 74 63 (p:.);..(*.Switc
0113C0: 68 00 82 20 EF 20 00 67 69 76 65 6E 00 81 20 ED h.. . .given.. .
0113D0: 20 CD 20 BD BF C0 BA DF 20 65 78 69 73 74 69 6E . ..... existin
0113E0: 67 20 ED 20 97 20 6F 70 65 6E BF C0 BA DF 20 69 g . . open.... i
0113F0: 64 65 6E 74 69 66 69 65 72 20 E9 20 EA 20 ED 20 dentifier . . .
011400: D4 C2 74 72 61 6E 73 6C 61 74 65 64 20 EF 20 00 ..translated . .
011410: 63 61 72 72 69 61 67 65 00 D3 20 00 72 65 74 75 carriage.. .retu
011420: 72 6E 00 D2 2F E1 20 00 66 65 65 64 00 D1 2A 29 rn../. .feed..*)
011430: C0 45 6F 73 43 48 3D 30 78 3B B5 28 2A DE 20 EF .EosCH=0x;.(*. .
011440: 20 D2 20 00 61 74 00 D0 20 45 4F 46 20 2A 29 BF . .at.. EOF *).
011450: BF 8E B4 00 44 6F 6E 65 00 CF 3A AC 3B B4 28 2A ....Done..:.;.(*
011460: F5 20 DC 20 27 6C 69 6B 65 20 61 20 64 69 6E 6E . . 'like a dinn
011470: 65 72 27 20 EC 20 00 76 61 72 69 61 62 6C 65 00 er' . .variable.
011480: CE C2 BA EB 20 75 73 65 64 20 00 66 6F 72 00 CD .... used .for..
011490: 20 61 6C 6C 20 73 6F 72 74 73 20 E9 20 73 74 61 all sorts . sta
0114A0: 74 75 73 20 00 72 65 74 75 72 6E 73 00 CC C2 BA tus .returns....
0114B0: E5 20 70 72 6F 63 65 64 75 72 65 20 64 65 66 69 . procedure defi
0114C0: 6E 69 74 69 6F 6E 73 20 CD 20 64 65 74 61 69 6C nitions . detail
0114D0: 73 C2 BA 2A 29 BF C0 74 65 72 6D 43 48 3A 99 3B s..*)..termCH:.;
0114E0: B4 28 2A 53 74 72 69 6E 67 20 74 65 72 6D 69 6E .(*String termin
0114F0: 61 74 69 6E 67 20 DE 20 61 66 74 65 72 20 00 72 ating . after .r
011500: 65 61 64 00 CB C2 BA D8 20 00 52 65 61 64 53 74 ead..... .ReadSt
011510: 72 69 6E 67 00 CA 2A 29 C0 00 69 67 6E 6F 72 65 ring..*)..ignore
011520: 63 68 00 C9 3A 99 28 2A 3D 30 61 78 2A 29 3B B4 ch..:.(*=0ax*);.
011530: 28 2A 00 4E 6F 72 6D 61 6C 6C 79 00 C8 20 E1 20 (*.Normally.. .
011540: D1 2A 29 BF 20 B4 65 6F 6C 63 68 3A 99 28 2A 3D .*). .eolch:.(*=
011550: 30 64 78 2A 29 3B B5 28 2A C8 20 D3 20 D2 2A 29 0dx*);.(*. . .*)
011560: C0 00 41 6C 77 61 79 73 42 75 66 66 65 72 00 C7 ..AlwaysBuffer..
011570: 3A AC 28 2A 3D A1 2A 29 3B C3 28 2A E5 20 CA 20 :.(*=.*);.(*. .
011580: 2D 20 00 73 65 74 00 C6 20 00 74 72 75 65 00 C5 - .set.. .true..
011590: 20 EF 20 66 6F 72 63 65 C3 62 75 66 66 65 72 65 . force.buffere
0115A0: 64 20 CB 20 E9 20 AE 20 2A 29 BF BF BF AF 20 4F d . . . *).... O
0115B0: 70 65 6E 49 6E 70 75 74 28 00 64 65 66 65 78 74 penInput(.defext
0115C0: 00 C4 3A 9B 20 84 20 99 29 3B BF BF 28 2A B4 00 ..:. . .);..(*..
0115D0: 4F 70 65 6E 00 C1 20 61 20 00 66 69 6C 65 00 BE Open.. a .file..
0115E0: 2E 20 53 65 74 20 D6 20 F5 20 EA 20 00 69 6E 70 . Set . . . .inp
0115F0: 75 74 00 BD 20 ED 20 64 65 76 69 63 65 C0 C4 20 ut.. . device..
011600: EB 20 63 72 65 61 74 65 64 20 D8 20 EA 20 C0 BA . created . . ..
011610: F6 20 F8 2A 29 BF BF BF AF 20 53 77 69 74 63 68 . .*).... Switch
011620: 4F 75 74 53 74 72 65 61 6D 28 70 3A F7 29 3B BF OutStream(p:.);.
011630: C0 28 2A 82 20 EF 20 81 20 ED 20 CD 20 4F 75 74 .(*. . . . . Out
011640: 70 75 74 2A 29 BF BF AF 20 50 6F 70 49 6E 53 74 put*)... PopInSt
011650: 72 65 61 6D 3B BF C0 28 2A 00 52 65 74 75 72 6E ream;..(*.Return
011660: 00 80 20 EF 20 61 70 72 65 76 69 6F 75 73 20 BD .. . aprevious .
011670: 20 ED 2A 29 BF BF AF 20 50 6F 70 4F 75 74 53 74 .*)... PopOutSt
011680: 72 65 61 6D 3B BF C0 28 2A 80 20 EF 20 B6 20 D9 ream;..(*. . . .
011690: 20 ED 2A 29 B4 BF BF 89 20 F9 2E 20 BF 00 00 20 .*).... .. ...
0116A0: EF 20 C5 2A 29 BF BF AF 20 52 65 61 64 4C 69 6E . .*)... ReadLin
0116B0: 65 28 8E 20 73 3A 9B 20 84 20 99 29 3B BF C0 28 e(. s:. . .);..(
0116C0: 2A AB 20 61 20 E1 20 E9 20 74 65 78 74 2E 20 DB *. a . . text. .
0116D0: 20 E1 20 EB 20 6C 6F 6E 67 65 72 20 00 74 68 61 . . longer .tha
0116E0: 6E 00 8A 20 73 2C 20 EA 20 72 65 6D 61 69 6E 64 n.. s, . remaind
0116F0: 65 72 C0 20 E9 20 EA 20 E1 20 EB 20 64 69 73 63 er. . . . . disc
011700: B2 20 A4 20 00 49 6E 74 4C 6F 67 69 63 00 80 3B . . .IntLogic..;
011710: BF BF 28 2A B4 53 6F 6D 65 20 69 6E 74 65 67 65 ..(*.Some intege
011720: 72 20 6C 6F 67 69 63 20 6F 70 65 72 61 74 69 6F r logic operatio
011730: 6E 73 2A 29 BF BF AF 20 49 41 4E 44 28 69 2C 6A ns*)... IAND(i,j
011740: 3A AA 29 3A AA 3B BF AF 20 49 4F 52 28 69 2C 6A :.):.;.. IOR(i,j
011750: 3A AA 29 3A AA 3B BF AF 20 49 58 4F 52 28 69 2C :.):.;.. IXOR(i,
011760: 6A 3A AA 29 3A AA 3B BF 89 20 80 2E BF 00 00 1A j:.):.;.. ......
011770: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
011780: B2 20 A4 20 00 4C 4F 41 44 45 52 00 87 3B BF 28 . . .LOADER..;.(
011790: 2A C1 54 68 69 73 20 00 69 73 00 86 20 61 20 64 *.This .is.. a d
0117A0: 75 6D 6D 79 20 00 6D 6F 64 75 6C 65 00 85 BF C1 ummy .module....
0117B0: 49 74 20 86 20 61 6C 77 61 79 73 20 6C 6F 61 64 It . always load
0117C0: 65 64 20 6C 61 73 74 2E 20 54 68 65 20 00 61 64 ed last. The .ad
0117D0: 64 72 65 73 73 00 84 20 00 6F 66 00 83 20 00 69 dress.. .of.. .i
0117E0: 74 73 00 82 C1 6F 6E 65 20 73 79 6D 62 6F 6C 2C ts...one symbol,
0117F0: 20 74 68 65 72 65 66 6F 72 65 2C 20 86 20 00 74 therefore, . .t
011800: EB 20 61 20 70 72 6F 6D 70 74 20 EF 20 64 69 73 . a prompt . dis
011810: 70 6C 61 79 20 6F 6E 20 EA 20 E2 20 DC C0 72 65 play on . . ..re
011820: 71 75 65 73 74 20 CD 20 EA 20 BE 20 6E 61 6D 65 quest . . . name
011830: BF C0 DF 20 70 72 65 63 65 64 69 6E 67 20 BE 20 ... preceding .
011840: EB 20 70 75 73 68 65 64 20 6F 6E 74 6F 20 61 20 . pushed onto a
011850: 00 73 74 61 63 6B 00 BC 2C 20 D8 20 64 65 66 61 .stack.., . defa
011860: 75 6C 74 C0 E3 20 74 77 6F 20 65 6E 74 72 69 65 ult.. two entrie
011870: 73 20 64 65 65 70 2E 20 DB 20 EA 20 BC 20 6F 76 s deep. . . . ov
011880: 65 72 66 6C 6F 77 73 2C 20 EA C0 70 72 6F 67 72 erflows, ..progr
011890: 61 6D 20 61 62 6F 72 74 73 20 00 77 69 74 68 00 am aborts .with.
0118A0: BB 20 EA 20 6D 65 73 73 61 67 65 20 27 53 74 61 . . message 'Sta
0118B0: 63 6B 20 6F 76 65 72 66 6C 6F 77 20 DC 20 F9 27 ck overflow . .'
0118C0: BF C0 CF 20 CC 20 C5 20 00 69 66 00 B9 20 BE 20 ... . . .if.. .
0118D0: 00 77 61 73 00 B8 20 6F 70 65 6E 65 64 20 73 75 .was.. opened su
0118E0: 63 63 65 73 73 66 75 6C 6C 79 2A 29 BF BF AF 20 ccessfully*)...
0118F0: 4F 70 65 6E 4F 75 74 70 75 74 28 C4 3A 9B 20 84 OpenOutput(.:. .
011900: 20 99 29 3B BF BF 28 2A B4 C1 20 61 20 BE 20 CD .);..(*.. a . .
011910: 20 D9 20 2D 20 F5 20 CD 20 BD 2A 29 BF BF BF AF . - . . .*)....
011920: 20 43 6C 6F 73 65 49 6E 70 75 74 3B BF BF 28 2A CloseInput;..(*
011930: B4 00 43 6C 6F 73 65 00 B7 20 EA 20 BD 20 BE 2E ..Close.. . . ..
011940: 20 52 65 73 74 6F 72 65 73 20 EA 20 BD 20 ED 20 Restores . . .
011950: EF 20 EA 20 C0 00 70 72 65 76 69 6F 75 73 00 B6 . . ..previous..
011960: 20 00 76 61 6C 75 65 00 B1 2A 29 BF BF AF 20 43 .value..*)... C
011970: 6C 6F 73 65 4F 75 74 70 75 74 3B BF BF 28 2A B4 loseOutput;..(*.
011980: B7 20 EA 20 D9 20 BE 2C 20 72 65 74 61 69 6E 69 . . . ., retaini
011990: 6E 67 20 EA 20 00 69 6E 66 6F 72 6D 61 74 69 6F ng . .informatio
0119A0: 6E 00 B0 2A 29 BF BF AF 20 00 52 65 61 64 00 AB n..*)... .Read..
0119B0: 28 8E 20 00 63 68 00 A8 3A 99 29 3B BF BF 28 2A (. .ch..:.);..(*
0119C0: B4 AB 20 6E 65 78 74 20 DE 2E 20 E0 20 E8 20 4C .. next .. . . L
0119D0: 69 6E 65 20 46 65 65 64 73 20 F1 20 6E 6F 72 6D ine Feeds . norm
0119E0: 61 6C 6C 79 20 00 69 67 6E 6F 72 65 64 00 A7 BF ally .ignored...
0119F0: C0 59 6F 75 20 00 63 61 6E 00 A6 20 63 68 61 6E .You .can.. chan
011A00: 68 65 00 81 20 84 20 83 20 81 C1 74 6F 70 20 83 he.. . . ..top .
011A10: 20 81 20 6C 6F 61 64 20 85 20 28 6E 6F 74 65 20 . load . (note
011A20: 2D 20 82 20 81 20 84 2C C1 00 6E 6F 74 00 80 20 - . . .,..not..
011A30: 81 20 63 6F 6E 74 65 6E 74 73 29 BF C1 44 6F 20 . contents)..Do
011A40: 80 20 72 65 63 6F 6D 70 69 6C 65 20 74 68 69 73 . recompile this
011A50: 20 85 2E BF BF 2A 29 BF 8E B4 54 4F 50 20 3A 99 ....*)...TOP :.
011A60: 3B 20 28 2A 6F 72 20 61 6E 79 74 68 69 6E 67 2C ; (*or anything,
011A70: 20 61 73 20 69 74 20 6E 65 76 65 72 20 67 65 74 as it never get
011A80: 73 20 61 6C 6C 6F 63 61 74 65 64 2A 29 BF 89 20 s allocated*)..
011A90: 87 2E BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
011AA0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
011AB0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
011AC0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
011AD0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
011AE0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
011AF0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
011B00: B2 20 A4 20 00 4D 61 74 68 73 00 99 3B BF BF 28 . . .Maths..;..(
011B10: 2A B4 53 6F 6D 65 20 6D 61 74 68 65 6D 61 74 69 *.Some mathemati
011B20: 63 61 6C 20 00 66 75 6E 63 74 69 6F 6E 73 00 98 cal .functions..
011B30: C0 B1 20 28 43 29 20 44 61 76 65 20 4D 6F 6F 72 .. (C) Dave Moor
011B40: 65 2C 20 46 54 4C 20 4D 6F 64 75 6C 61 2D 32 20 e, FTL Modula-2
011B50: 31 39 38 36 C0 43 50 2F 4D 20 38 30 20 76 65 72 1986.CP/M 80 ver
011B60: 73 69 6F 6E 20 00 6F 66 00 97 20 61 20 67 65 6E sion .of.. a gen
011B70: 65 72 69 63 20 6D 6F 64 75 6C 65 BF C0 35 20 4A eric module..5 J
011B80: 61 6E 20 38 37 20 2D 20 41 64 64 65 64 20 45 6E an 87 - Added En
011B90: 74 69 65 72 20 66 75 6E 63 74 69 6F 6E BF 2A 29 tier function.*)
011BA0: BF BF 9D B4 00 50 49 00 96 B4 3D BD B4 33 2E 31 .....PI...=..3.1
011BB0: 34 31 35 39 32 36 35 33 35 38 39 37 39 33 32 33 4159265358979323
011BC0: 3B C0 4F 6E 65 4F 6E 50 49 B4 3D B4 30 2E 33 31 ;.OneOnPI.=.0.31
011BD0: 38 33 30 39 38 38 36 31 38 33 37 39 30 36 37 3B 830988618379067;
011BE0: C0 65 B4 3D B4 32 2E 37 31 38 32 38 31 38 32 38 .e.=.2.718281828
011BF0: 34 35 39 30 34 35 32 33 3B BF BF 28 2A B4 53 74 45904523;..(*.St
011C00: 67 65 20 DA 20 D8 20 61 6C 74 65 72 69 6E 67 20 ge . . altering
011C10: EA 20 B1 20 E9 20 C9 BF C0 CF 20 CC 20 C5 20 B9 . . . .... . . .
011C20: 20 61 20 DE 20 B8 20 66 6F 75 6E 64 2A 29 BF BF a . . found*)..
011C30: AF 20 CA 28 8E 20 73 3A 9B 20 84 20 99 29 3B BF . .(. s:. . .);.
011C40: BF 28 2A B4 AB 20 61 20 00 73 74 72 69 6E 67 00 .(*.. a .string.
011C50: A5 2E 20 00 57 68 65 6E 00 A2 20 00 72 65 61 64 .. .When.. .read
011C60: 69 6E 67 00 A0 20 00 66 72 6F 6D 00 9F 20 EA 20 ing.. .from.. .
011C70: E2 20 DA 20 E6 20 EA C0 B6 20 63 6F 6D 6D 61 6E . . . ... comman
011C80: 64 20 69 6E 74 65 72 61 63 74 20 DC 20 61 20 73 d interact . a s
011C90: 70 65 63 69 61 6C 20 77 61 79 3A BF C0 EC 20 00 pecial way:... .
011CA0: 72 6F 75 74 69 6E 65 00 9E 20 D5 20 00 62 75 66 routine.. . .buf
011CB0: 66 65 72 00 9C 20 EA 20 BD 20 00 77 68 65 72 61 fer.. . . .whera
011CC0: 73 00 9A 20 AB 20 D5 20 DD 2E C0 00 48 6F 77 65 s.. . . ....Howe
011CD0: 76 65 72 00 98 2C 20 B9 20 EE 20 63 61 6C 6C 20 ver.., . . call
011CE0: DA 20 9E 20 E6 20 EA 20 AB 20 E6 20 B0 C0 00 72 . . . . . . ...r
011CF0: 65 6D 61 69 6E 73 00 97 20 DC 20 EA 20 9C 2C 20 emains.. . . .,
011D00: EA 20 AB 20 9E 20 D5 20 D2 20 D6 2E BF C0 DF 20 . . . . . .....
011D10: DE 20 64 65 6C 69 6D 69 74 65 72 20 61 63 74 73 . delimiter acts
011D20: 20 F5 20 61 20 A5 20 74 65 72 6D 69 6E 61 74 6F . a . terminato
011D30: 72 20 DE 2E C0 41 6E 79 20 DE 20 3C 3D 20 DA 20 r ...Any . <= .
011D40: DE 20 D5 20 74 65 72 6D 69 6E 61 74 65 20 61 20 . . terminate a
011D50: A5 2E 20 C0 98 2C 20 00 77 68 65 6E 00 96 20 A0 .. .., .when.. .
011D60: 20 9F 20 EA 20 E2 2C 20 65 6E 64 20 E9 20 E1 20 . . ., end . .
011D70: 00 61 6C 77 61 79 73 00 95 C0 00 74 65 72 6D 69 .always....termi
011D80: 6E 61 74 65 73 00 94 20 61 20 A5 2E BF C0 00 4C nates.. a .....L
011D90: 65 61 64 69 6E 67 00 92 20 00 62 6C 61 6E 6B 73 eading.. .blanks
011DA0: 00 91 20 F1 20 A7 2E BF BF 20 B4 E4 20 EB 20 61 .. . .... .. . a
011DB0: 20 73 75 62 74 6C 65 74 79 20 69 6E 76 6F 6C 76 subtlety involv
011DC0: 69 6E 67 20 AB 20 E6 20 CA 20 96 20 A0 20 C0 9F ing . . . . . ..
011DD0: 20 EA 20 E2 2E BF C0 DF 20 F6 20 72 65 74 61 69 . ..... . retai
011DE0: 6E 73 20 00 61 6E 00 90 20 BD 20 9C 20 CD 20 EA ns .an.. . . . .
011DF0: 20 E2 2E 20 DB 20 DA 20 EB C0 00 65 6D 70 74 79 .. . . ...empty
011E00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
011E10: 0F 00 00 00 02 09 4E E5 0F 00 41 02 00 00 00 02 ......N...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: 61 6E 64 61 72 64 20 74 72 69 67 6F 6E 6F 6D 65 andard trigonome
011F10: 74 72 69 63 20 98 2E C0 41 6C 6C 20 74 72 69 67 tric ...All trig
011F20: 20 98 20 77 6F 72 6B 20 00 69 6E 00 95 20 52 61 . work .in.. Ra
011F30: 64 69 61 6E 73 2C C0 6E 6F 74 20 64 65 67 72 65 dians,.not degre
011F40: 65 73 2E BF BF 20 2A 29 BF BF AF 20 53 49 4E 28 es... *)... SIN(
011F50: 41 3A 00 52 45 41 4C 00 94 29 3A 94 3B BF AF 20 A:.REAL..):.;..
011F60: 43 4F 53 28 41 3A 94 29 3A 94 3B BF AF 20 00 54 COS(A:.):.;.. .T
011F70: 41 4E 00 93 28 41 3A 94 29 3A 94 3B BF BF 28 2A AN..(A:.):.;..(*
011F80: B4 4E 61 74 75 72 61 6C 20 6C 6F 67 6F 72 69 74 .Natural logorit
011F90: 68 6D 20 00 61 6E 64 00 92 20 65 78 70 6F 6E 65 hm .and.. expone
011FA0: 6E 74 69 61 6C 20 C0 4E 6F 74 65 20 00 74 68 61 ntial .Note .tha
011FB0: 74 00 91 20 4C 4F 47 31 30 28 41 29 3D 00 4C 4E t.. LOG10(A)=.LN
011FC0: 00 90 28 41 29 2A 30 2E 34 33 34 32 39 34 34 38 ..(A)*0.43429448
011FD0: 31 39 30 33 32 35 31 38 32 C0 92 20 91 20 61 5E 190325182.. . a^
011FE0: 62 20 28 61 20 00 74 6F 00 8F 20 00 74 68 65 00 b (a .to.. .the.
011FF0: 8E 20 70 6F 77 65 72 20 97 20 62 29 20 00 69 73 . power . b) .is
012000: 00 8D 20 00 45 58 50 00 8C 28 62 2A 90 28 61 29 .. .EXP..(b*.(a)
012010: 29 C0 62 75 74 20 69 66 20 62 20 8D 20 00 69 6E ).but if b . .in
012020: 74 65 67 65 72 00 8B 2C 20 74 68 65 72 65 20 8D teger.., there .
012030: 20 61 20 66 61 73 74 65 72 20 77 61 79 20 2D 20 a faster way -
012040: 75 73 65 20 61 74 6F 69 20 C0 00 66 72 6F 6D 00 use atoi ..from.
012050: 8A 20 52 65 61 6C 49 6E 4F 75 74 20 2A 29 BF AF . RealInOut *)..
012060: 20 90 28 41 3A 94 29 3A 94 3B BF AF 20 8C 28 41 .(A:.):.;.. .(A
012070: 3A 94 29 3A 94 3B BF BF 28 2A B4 53 71 75 61 72 :.):.;..(*.Squar
012080: 65 20 72 6F 6F 74 20 2A 29 BF AF 20 53 51 52 54 e root *).. SQRT
012090: 28 41 3A 94 29 3A 94 3B BF BF 28 2A B4 49 6E 76 (A:.):.;..(*.Inv
0120A0: 65 72 73 65 20 93 20 98 20 2D 20 67 69 76 65 6E erse . . - given
0120B0: 20 8E 20 93 C0 57 68 61 74 20 8D 20 8E 20 00 61 . ..What . . .a
0120C0: 6E 67 6C 65 00 88 3F 20 2A 29 BF AF 20 00 41 52 ngle..? *).. .AR
0120D0: 43 54 41 4E 00 87 28 41 3A 94 29 3A 94 3B BF AF CTAN..(A:.):.;..
0120E0: 20 87 32 28 41 2C 42 3A 94 29 3A 94 3B BF BF 28 .2(A,B:.):.;..(
0120F0: 2A B4 87 32 20 00 72 65 74 75 72 6E 73 00 86 20 *..2 .returns..
012100: 6D 61 74 69 63 61 6C 6C 79 21 2A 29 BF BF AF 20 matically!*)...
012110: D4 28 70 3A A6 3B 61 3A AB 3B 6E 3A AD 3B 8E 20 .(p:.;a:.;n:.;.
012120: 71 3A E0 29 3B BF BF 28 2A B4 47 65 6E 65 72 61 q:.);..(*.Genera
012130: 74 65 20 61 20 CA 20 71 20 C1 20 73 74 61 72 74 te a . q . start
012140: 73 20 A5 20 9F 20 C2 20 70 C0 DD 20 68 61 73 20 s . . . p.. has
012150: 61 20 00 77 6F 72 6B 00 9B 20 00 73 70 61 63 65 a .work.. .space
012160: 00 99 20 CC 20 00 73 69 7A 65 00 98 20 6E 20 C5 .. . .size.. n .
012170: 20 61 64 64 72 65 73 73 20 61 20 D2 20 6D 65 6D address a . mem
012180: 6F 72 79 20 BF C0 44 6F 20 D8 20 B7 20 DE 20 CA ory ..Do . . . .
012190: 20 79 65 74 20 28 74 68 61 74 73 20 64 6F 6E 65 yet (thats done
0121A0: 20 A5 20 D3 20 29 BF C0 00 59 6F 75 00 95 20 D6 . . )...You.. .
0121B0: 20 70 72 6F 62 61 62 6C 79 20 77 6F 6E 64 65 72 probably wonder
0121C0: 69 6E 67 20 77 68 61 74 20 DF 20 61 20 00 67 6F ing what . a .go
0121D0: 6F 64 00 94 20 77 61 79 20 DC 20 00 63 61 6C 63 od.. way . .calc
0121E0: 75 6C 61 74 65 00 92 20 DE C0 98 20 00 72 65 71 ulate.. ... .req
0121F0: 75 69 72 65 64 00 91 20 B1 20 DE 20 A2 BF C0 53 uired.. . . ...S
012200: 6F 20 D6 20 77 65 2E 20 9E 20 9B 20 99 20 DF 20 o . we. . . . .
012210: 00 75 73 65 64 00 90 20 B1 20 DE 20 73 74 61 63 .used.. . . stac
012220: 6B 20 CC 20 DE 20 C2 C0 70 20 28 DD 20 CB 20 C2 k . . ..p (. . .
012230: 20 B8 20 63 61 6C 6C 73 20 D2 20 74 75 72 6E 29 . calls . turn)
012240: 20 41 73 20 94 20 00 61 6E 00 8F 20 61 70 70 72 As . .an.. appr
012250: 6F 61 63 68 20 E5 20 CB C0 77 6F 75 6C 64 20 C7 oach . ..would .
012260: 20 DC 20 74 68 69 6E 6B 20 CC 20 61 20 6E 75 6D . think . a num
012270: 62 65 72 20 DD 20 00 64 6F 75 62 6C 65 00 8D 20 ber . .double..
012280: B8 2C 20 74 68 65 6E 20 8D 20 B8 20 61 67 61 69 ., then . . agai
012290: 6E 2E BF C0 CF 20 B6 20 72 65 61 6C 79 20 77 61 n.... . realy wa
0122A0: 6E 74 20 DC 20 92 20 B8 20 2D 20 68 65 72 65 20 nt . . . - here
0122B0: D6 20 00 73 6F 6D 65 00 8C 20 6E 75 6D 62 65 72 . .some.. number
0122C0: 73 3A BF C0 46 6F 72 20 65 61 63 68 20 B7 2C 20 s:..For each .,
0122D0: BE 20 DC 20 36 20 A0 20 D6 20 91 2C 20 00 70 6C . . 6 . . ., .pl
0122E0: 75 73 00 88 20 99 20 B1 20 70 61 72 61 6D 65 74 us.. . . paramet
0122F0: 65 72 73 C0 28 32 20 E4 20 00 76 61 72 00 87 2C ers.(2 . .var..,
012300: 8E 20 88 20 28 95 20 72 61 64 69 61 6E 73 29 20 . . (. radians)
012310: 00 77 69 74 68 00 85 20 74 61 6E 67 65 6E 74 20 .with.. tangent
012320: 41 2F 42 C0 87 32 28 41 2C 42 29 3D 87 28 41 2F A/B..2(A,B)=.(A/
012330: 42 29 BF C0 41 6C 73 6F 2C 20 87 32 20 86 20 61 B)..Also, .2 . a
012340: 20 00 76 61 6C 75 65 00 84 20 95 20 8E 20 00 72 .value.. . . .r
012350: 61 6E 67 65 00 83 20 30 20 8F 20 32 2A 96 20 C0 ange.. 0 . 2*. .
012360: 57 68 65 72 65 61 73 20 87 20 86 20 8E 20 84 20 Whereas . . . .
012370: 95 20 8E 20 83 20 2D 96 2F 32 2E 2E 96 2F 32 BF . . . -./2.../2.
012380: C0 00 54 68 69 73 00 82 20 6D 65 61 6E 73 20 91 ..This.. means .
012390: 20 87 32 20 63 61 6E 20 62 65 20 75 73 65 64 20 .2 can be used
0123A0: 64 69 72 65 63 74 6C 79 20 66 6F 72 20 72 65 63 directly for rec
0123B0: 74 61 6E 67 75 6C 61 72 C0 8F 20 70 6F 6C 61 72 tangular.. polar
0123C0: 20 63 6F 2D 6F 72 64 69 6E 61 74 65 73 2E 20 49 co-ordinates. I
0123D0: 6E 20 61 64 64 69 74 69 6F 6E 2C 20 87 32 20 00 n addition, .2 .
0123E0: 77 6F 72 6B 73 00 81 20 77 68 65 6E 20 42 3D 30 works.. when B=0
0123F0: 2E 30 2A 29 BF BF AF 20 45 4E 54 49 45 52 28 78 .0*)... ENTIER(x
012400: 3A 94 29 3A AA 3B BF BF 28 2A B4 63 6F 6E 76 65 :.):.;..(*.conve
012410: 72 74 20 61 20 72 65 61 6C 20 8F 20 61 6E 20 8B rt a real . an .
012420: 2E 20 82 20 64 69 66 66 65 72 73 20 8A 20 00 54 . . differs . .T
012430: 52 55 4E 43 00 80 20 62 65 63 61 75 73 65 C0 80 RUNC.. because..
012440: 20 6F 6E 6C 79 20 81 20 85 20 70 6F 73 69 74 69 only . . positi
012450: 76 65 20 76 61 6C 75 65 73 2A 29 BF 89 20 99 2E ve values*).. ..
012460: BF 00 00 6E 20 00 6F 66 00 97 20 61 20 67 65 6E ...n .of.. a gen
012470: 65 72 69 63 20 6D 6F 64 75 6C 65 BF C0 35 20 4A eric module..5 J
012480: B2 20 A4 20 00 50 72 6F 63 65 73 73 65 73 00 E7 . . .Processes..
012490: 3B BF BF 28 2A B4 E7 20 00 6D 6F 64 75 6C 65 00 ;..(*.. .module.
0124A0: E6 20 00 61 73 00 E5 20 00 70 65 72 00 E4 20 00 . .as.. .per.. .
0124B0: 57 69 72 74 68 00 E3 BF C0 44 2E 20 4D 6F 6F 72 Wirth....D. Moor
0124C0: 65 20 34 20 4A 61 6E 20 38 34 BF C0 52 65 76 61 e 4 Jan 84..Reva
0124D0: 6D 70 65 64 20 32 20 53 65 70 74 20 38 36 20 00 mped 2 Sept 86 .
0124E0: 73 6F 00 E2 20 00 74 68 61 74 00 E1 20 00 50 52 so.. .that.. .PR
0124F0: 4F 43 45 53 53 00 E0 20 00 69 73 00 DF 20 00 74 OCESS.. .is.. .t
012500: 20 00 70 61 72 61 6D 65 74 65 72 00 86 20 98 20 .parameter.. .
012510: B1 20 00 76 61 6C 75 65 00 85 20 28 6D 69 6E 20 . .value.. (min
012520: 32 29 2C 20 36 20 B1 20 00 6F 70 65 6E 00 84 20 2), 6 . .open..
012530: 00 61 72 72 61 79 00 83 20 B0 C0 87 2C 20 36 2B .array.. ..., 6+
012540: 86 20 98 20 B1 20 84 20 83 20 B0 20 85 20 2C 20 . . . . . . . ,
012550: 88 20 99 20 B1 C0 BB 20 88 20 61 20 66 65 77 20 . . ... . a few
012560: B1 20 8A 20 6C 6F 6F 70 73 2C 20 97 20 73 74 61 . . loops, . sta
012570: 74 6D 65 6E 74 73 2C 20 74 65 6D 70 6F 72 61 72 tments, temporar
012580: 69 65 73 2C 20 65 74 63 20 BF 2A 29 BF BF AF 20 ies, etc .*)...
012590: D3 28 8E 20 70 2C 71 3A E0 29 3B BF BF 28 2A B4 .(. p,q:.);..(*.
0125A0: 54 72 61 6E 73 66 65 72 20 DC 20 CA 20 71 20 73 Transfer . . q s
0125B0: 61 76 69 6E 67 20 63 75 72 72 65 6E 74 20 CA 20 aving current .
0125C0: D2 20 70 20 2A 29 BF BF AF 20 00 49 4F 54 52 41 . p *)... .IOTRA
0125D0: 4E 53 46 45 52 00 82 28 8E 20 70 2C 71 3A E0 3B NSFER..(. p,q:.;
0125E0: 76 61 3A AD 3B 8E 20 77 3A A8 29 3B BF BF 28 2A va:.;. w:.);..(*
0125F0: B4 50 65 72 66 6F 72 6D 20 8F 20 82 20 2D 20 B3 .Perform . . - .
012600: 20 50 52 4F 43 45 53 53 45 2E 8B 20 B1 20 6C 6F PROCESSE.. . lo
012610: 74 73 20 CC 20 64 69 73 63 75 73 73 69 6F 6E 2E ts . discussion.
012620: BF C0 D5 20 DE 20 65 78 74 72 61 20 86 2C 20 77 ... . extra ., w
012630: 2E 20 D9 20 DF 20 61 20 9B 20 61 72 65 61 20 90 . . . a . area .
012640: 20 B1 C0 61 20 00 73 74 75 62 00 81 20 DC 20 74 ..a .stub.. . t
012650: 72 61 6E 73 66 65 72 20 D2 20 DD 20 6F 75 74 20 ransfer . . out
012660: CC 20 DE 20 00 69 6E 74 65 72 72 75 70 74 00 80 . . .interrupt..
012670: 2E 20 2A 29 BF 28 2A B4 2A 2A 2A 2A 2A 2A 2A 2A . *).(*.********
012680: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A C0 4E 4F 54 ************.NOT
012690: 45 C0 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A E.**************
0126A0: 2A 2A 2A 2A 2A 2A BF C0 D9 20 E6 20 66 6F 6C 6C ******... . foll
0126B0: 6F 77 73 20 DE 20 73 74 61 6E 64 61 72 64 73 20 ows . standards
0126C0: A7 20 64 6F 77 6E 20 B0 20 E3 20 E5 20 66 61 72 . down . . . far
0126D0: 20 E5 20 70 6F 73 73 69 62 6C 65 2E C0 95 20 C8 . possible... .
0126E0: 20 68 61 63 6B 20 D1 20 E6 20 DC 20 69 6D 70 72 hack . . . impr
0126F0: 6F 76 65 20 80 20 72 65 73 70 6F 6E 73 65 20 74 ove . response t
012700: 68 65 00 DE 20 73 61 6D 65 20 E5 20 AB 20 00 61 he.. same . . .a
012710: 6E 64 00 DD C0 E2 20 E5 20 00 74 6F 00 DC 20 73 nd.... . .to.. s
012720: 75 70 70 6F 72 74 20 00 6D 6F 64 65 00 DB 20 32 upport .mode.. 2
012730: 20 00 69 6E 74 65 72 72 75 70 74 73 00 DA 2E 20 .interrupts...
012740: 00 54 68 69 73 00 D9 20 73 68 6F 75 6C 64 20 00 .This.. should .
012750: 6E 6F 74 00 D8 20 61 66 66 65 63 74 20 00 79 6F not.. affect .yo
012760: 75 72 00 D7 C0 70 72 6F 67 72 61 6D 73 20 E5 20 ur...programs .
012770: 61 6C 6C 20 DE 20 63 68 61 6E 67 65 73 20 00 61 all . changes .a
012780: 72 65 00 D6 20 69 6E 76 69 73 69 62 6C 65 2E BF re.. invisible..
012790: C0 00 4E 6F 74 65 00 D5 20 2D 20 00 4E 45 57 50 ..Note.. - .NEWP
0127A0: 52 4F 43 45 53 53 00 D4 20 DD 20 00 54 52 41 4E ROCESS.. . .TRAN
0127B0: 53 46 45 52 00 D3 20 D6 20 00 69 6E 00 D2 20 00 SFER.. . .in.. .
0127C0: 74 68 69 73 00 D1 20 E6 2C 20 D8 C0 D2 20 00 53 this.. ., ... .S
0127D0: 59 53 54 45 4D 00 D0 2C 20 E5 20 D2 20 E3 2E BF YSTEM.., . . ...
0127E0: BF BF 2A 29 BF BF 28 2A B4 2A 2A 2A 2A 2A 2A 2A ..*)..(*.*******
0127F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
012800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
012810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A ****************
012820: 2A 2A 2A 2A C0 4C 49 4D 49 54 41 54 49 4F 4E C0 ****.LIMITATION.
012830: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D BF C0 00 49 66 00 ==========...If.
012840: CF 20 6D 6F 72 65 20 74 68 61 6E 20 00 6F 6E 65 . more than .one
012850: 00 CE 20 00 63 6F 70 79 00 CD 20 00 6F 66 00 CC .. .copy.. .of..
012860: 20 00 61 6E 79 00 CB 20 00 70 72 6F 63 65 73 73 .any.. .process
012870: 00 CA 20 00 77 69 74 68 69 6E 00 C9 20 61 20 67 .. .within.. a g
012880: 69 76 65 6E 20 E6 20 00 63 61 6E 00 C8 C0 00 62 iven . .can....b
012890: 65 00 C7 20 00 72 75 6E 6E 69 6E 67 00 C6 20 00 e.. .running.. .
0128A0: 61 74 00 C5 20 CB 20 CE 20 74 69 6D 65 2C 20 DE at.. . . time, .
0128B0: 20 00 64 69 73 70 6C 61 79 00 C4 20 00 77 69 6C .display.. .wil
0128C0: 6C 00 C3 20 D8 20 C7 20 72 65 74 61 69 6E 65 64 l.. . . retained
0128D0: C0 62 65 74 77 65 65 6E 20 DE 20 73 75 73 70 65 .between . suspe
0128E0: 6E 73 69 6F 6E 20 CC 20 61 20 00 70 72 6F 63 65 nsion . a .proce
0128F0: 64 75 72 65 00 C2 20 DD 20 69 74 73 20 72 65 2D dure.. . its re-
012900: 69 6D 65 73 20 61 20 6C 69 74 74 6C 65 C0 B0 20 imes a little..
012910: 73 65 74 74 69 6E 67 20 BE 20 D7 20 80 20 81 20 setting . . . .
012920: 73 65 70 61 72 61 74 65 6C 79 2E 20 2A 29 BF BF separately. *)..
012930: 28 2A B4 53 65 65 20 61 6C 73 6F 20 DE 20 E6 20 (*.See also . .
012940: 50 4F 52 54 49 4F 20 B1 20 8C 20 6F 74 68 65 72 PORTIO . . other
012950: 20 75 73 65 66 75 6C 20 72 6F 75 74 69 6E 65 73 useful routines
012960: 2E 20 2A 29 BF 89 20 E7 2E BF 20 00 00 00 00 00 . *).. ... .....
012970: 00 00 00 00 00 00 60 5D 24 0F 62 19 00 01 00 00 ......`]$.b.....
012980: B2 20 A4 20 51 75 69 63 6B 53 74 72 3B BF BF 28 . . QuickStr;..(
012990: 2A B4 00 51 75 69 63 6B 00 CD 20 00 6F 70 65 6E *..Quick.. .open
0129A0: 00 CC 20 72 6F 75 74 69 6E 65 20 00 66 6F 72 00 .. routine .for.
0129B0: CB 20 00 73 74 72 65 61 6D 73 00 CA BF C0 28 CD . .streams....(.
0129C0: 20 00 69 6E 00 C9 20 00 74 68 65 00 C8 20 73 65 .in.. .the.. se
0129D0: 6E 73 65 20 00 6F 66 00 C7 20 63 6F 64 69 6E 67 nse .of.. coding
0129E0: 20 74 69 6D 65 20 73 61 76 65 64 29 BF C0 44 61 time saved)..Da
0129F0: 76 65 20 4D 6F 6F 72 65 C0 43 65 72 65 6E 6B 6F ve Moore.Cerenko
012A00: 66 20 43 6F 6D 70 75 74 69 6E 67 C0 32 39 20 53 f Computing.29 S
012A10: 65 70 20 38 35 BF C0 00 54 68 69 73 00 C6 20 00 ep 85...This.. .
012A20: 6D 6F 64 75 6C 65 00 C5 20 00 69 73 00 C4 20 6E module.. .is.. n
012A30: 6F 74 20 C9 20 C8 20 6D 61 6E 75 61 6C 20 62 65 ot . . manual be
012A40: 63 61 75 73 65 20 00 69 74 00 BE 20 70 6F 73 74 cause .it.. post
012A50: 2D 64 61 74 65 73 20 BE 2E BF C0 00 49 74 00 BD -dates .....It..
012A60: 20 C4 20 64 65 73 69 67 6E 65 64 20 00 74 6F 00 . designed .to.
012A70: BC 20 72 65 64 75 63 65 20 C8 20 77 6F 72 6B 20 . reduce . work
012A80: 00 79 6F 75 00 BB 20 68 61 76 65 20 BC 20 64 6F .you.. have . do
012A90: 20 BC 20 CC C0 CA 20 00 75 73 69 6E 67 00 B9 20 . ... .using..
012AA0: C8 20 00 63 6F 6D 6D 61 6E 64 00 B8 20 00 6C 69 . .command.. .li
012AB0: 6E 65 00 B7 20 00 70 61 72 61 6D 65 74 65 72 73 ne.. .parameters
012AC0: 00 B6 BF C0 C6 20 C5 20 61 6C 6C 6F 77 73 20 BB ..... . allows .
012AD0: 20 BC 20 CC 20 6F 6E 65 20 00 6F 72 00 B5 20 6D . . one .or.. m
012AE0: 6F 72 65 20 00 66 69 6C 65 73 00 B3 20 B5 20 CA ore .files.. . .
012AF0: C0 B9 20 00 65 69 74 68 65 72 00 B1 20 C8 20 CA .. .either.. . .
012B00: 61 63 74 69 76 61 74 69 6F 6E 2E 20 D9 C0 C3 20 activation. ...
012B10: C7 20 72 65 6D 6F 76 65 64 20 D2 20 56 31 2E 31 . removed . V1.1
012B20: 39 BF C0 D9 20 6D 65 61 6E 73 20 E1 20 61 20 72 9... means . a r
012B30: 6F 75 74 69 6E 65 20 00 77 68 69 63 68 00 C1 20 outine .which..
012B40: 73 75 73 70 65 6E 64 73 20 6D 75 73 74 20 D8 20 suspends must .
012B50: 63 6F 6E 74 61 69 6E 20 CB C0 00 75 70 00 BE 20 contain ...up..
012B60: 00 6C 65 76 65 6C 00 BD 20 00 61 64 64 72 65 73 .level.. .addres
012B70: 73 69 6E 67 00 BC 2E 20 28 54 68 61 74 20 DF 20 sing... (That .
012B80: 72 65 66 65 72 65 6E 63 65 73 20 DC 20 00 76 61 references . .va
012B90: 72 69 61 62 6C 65 73 00 BB 20 D2 20 C0 00 70 72 riables.. . ..pr
012BA0: 6F 63 65 64 75 72 65 73 00 BA 20 D2 20 C1 20 DE ocedures.. . . .
012BB0: 20 73 75 73 70 65 6E 64 69 6E 67 20 C2 20 DF 20 suspending . .
012BC0: 00 6E 65 73 74 65 64 00 B9 29 2E 20 4E 6F 72 20 .nested..). Nor
012BD0: 6D 61 79 C0 00 69 74 00 B8 20 00 63 61 6C 6C 00 may..it.. .call.
012BE0: B7 20 BA 20 B9 20 C9 20 69 74 73 65 6C 66 20 C1 . . . . itself .
012BF0: 20 68 61 76 65 20 BE 20 BD 20 C0 BC BF C0 CF 20 have . . .....
012C00: 00 79 6F 75 00 B6 20 D6 20 C6 20 6D 75 6C 74 69 .you.. . . multi
012C10: 70 6C 65 20 70 72 6F 63 65 73 73 65 73 2C 20 B8 ple processes, .
012C20: 20 DF 20 62 65 73 74 20 DC 20 00 75 73 65 00 B5 . best . .use..
012C30: 20 DE C0 2F 50 20 6C 69 6E 6B 65 72 20 66 6C 61 ../P linker fla
012C40: 67 20 2D 20 00 73 65 65 00 B3 20 DE 20 6D 61 6E g - .see.. . man
012C50: 75 61 6C 20 00 66 6F 72 00 B1 20 64 65 74 61 69 ual .for.. detai
012C60: 6C 73 BF C0 D9 20 6C 69 6D 69 74 61 74 69 6F 6E ls... limitation
012C70: 20 63 6F 75 6C 64 20 C7 20 6F 76 65 72 63 6F 6D could . overcom
012C80: 65 20 00 62 79 00 B0 20 74 61 6B 69 6E 67 20 61 e .by.. taking a
012C90: 20 CD 20 CC 20 DE C0 C4 20 77 68 65 6E 65 76 65 . . ... wheneve
012CA0: 72 20 CA 20 73 74 61 74 65 73 20 D6 20 73 77 69 r . states . swi
012CB0: 74 63 68 65 64 2E 20 49 20 73 68 61 6C 6C 20 B3 tched. I shall .
012CC0: 20 00 69 66 00 AE 20 49 20 C0 C8 20 00 64 6F 00 .if.. I .. .do.
012CD0: AA 20 D1 20 B1 20 DE 20 6E 65 78 74 20 72 65 6C . . . . next rel
012CE0: 65 61 73 65 BF 2A 29 BF 93 B4 D0 20 A3 20 AB 3B ease.*).... £ .;
012CF0: C0 BF 96 B4 00 53 49 47 4E 41 4C 00 A9 3B C0 E0 .....SIGNAL..;..
012D00: 20 B5 20 C8 20 B3 20 69 6E 74 65 72 66 61 63 65 . . . interface
012D10: BF C0 BD 20 77 69 6C 6C 20 61 6C 73 6F 20 00 72 ... will also .r
012D20: 65 74 75 72 6E 00 B0 20 61 20 00 73 65 74 00 AE eturn.. a .set..
012D30: 20 C7 20 00 6F 70 74 69 6F 6E 73 00 AD 20 66 6F . .options.. fo
012D40: 75 6E 64 BF C0 54 6F 20 63 61 6C 6C 20 BE 2C 20 und..To call .,
012D50: AE 20 75 70 20 00 61 6E 00 AB 20 61 72 72 61 79 . up .an.. array
012D60: 20 C7 20 74 79 70 65 20 00 53 74 72 65 61 6D 52 . type .StreamR
012D70: 65 63 6F 72 64 00 AA BF C0 45 61 63 68 20 65 6E ecord....Each en
012D80: 74 72 79 20 70 6F 69 6E 74 73 20 BC 20 B1 20 61 try points . . a
012D90: 20 00 66 69 6C 65 00 A9 20 B5 20 61 20 00 73 74 .file.. . a .st
012DA0: 72 65 61 6D 00 A7 20 77 68 69 63 68 20 C4 20 BC ream.. which . .
012DB0: 20 00 62 65 00 A6 20 00 6F 70 65 6E 65 64 00 A2 .be.. .opened..
012DC0: 2E C0 41 20 00 64 65 66 61 75 6C 74 00 A0 20 A9 ..A .default.. .
012DD0: 20 00 6E 61 6D 65 00 9F 20 63 61 6E 20 A6 20 00 .name.. can . .
012DE0: 67 69 76 65 6E 00 9E 2E 20 00 49 66 00 9D 20 00 given... .If.. .
012DF0: 6E 6F 00 9C 20 A0 20 C4 20 9E 20 28 BC 20 67 69 no.. . . . (. gi
012E00: 76 65 C0 9C 20 A0 2C 20 AE 20 BC 20 6E 75 6C 6C ve.. ., . . null
012E10: 20 73 74 72 69 6E 67 29 2C 20 00 61 6E 64 00 99 string), .and..
012E20: 20 9C 20 00 70 61 72 61 6D 65 74 65 72 00 98 20 . .parameter..
012E30: C4 20 9E 2C 20 9C 20 A9 20 C0 C4 20 A2 2A 29 20 . ., . . .. .*)
012E40: BF 93 B4 53 74 72 65 61 6D 73 20 A3 20 00 53 54 ...Streams £ .ST
012E50: 52 45 41 4D 00 97 2C 00 44 69 72 65 63 74 69 6F REAM..,.Directio
012E60: 6E 00 95 3B BF 93 B4 46 69 6C 65 73 BA A3 20 00 n..;...Files.£ .
012E70: 46 69 6C 65 4E 61 6D 65 00 94 2C 00 46 49 4C 45 FileName..,.FILE
012E80: 00 92 3B BF 96 B4 00 70 53 54 52 45 41 4D 00 91 ..;....pSTREAM..
012E90: 3D A8 20 86 20 97 3B C0 00 70 46 49 4C 45 00 8F =. . .;..pFILE..
012EA0: 3D A8 20 86 20 92 3B C0 00 4F 70 74 69 6F 6E 73 =. . .;..Options
012EB0: 53 65 74 00 8C 3D 8D 20 84 20 5B 27 41 27 2E 2E Set..=. . ['A'..
012EC0: 27 5A 27 5D 3B C1 C0 AA 3D A5 C1 4F 70 65 6E 65 'Z'];...=..Opene
012ED0: 64 3A AC 3B C1 4D 75 73 74 53 75 70 70 6C 79 3A d:.;.MustSupply:
012EE0: AC 3B 20 28 2A AE 20 00 74 72 75 65 00 8B 20 00 .; (*. .true.. .
012EF0: 69 66 00 8A 20 61 62 73 65 6E 63 65 20 C7 20 98 if.. absence . .
012F00: 3D AB 3B C0 00 49 6E 74 65 72 72 75 70 74 53 74 =.;..InterruptSt
012F10: 75 62 00 A8 3B BF 8E B4 4D 6F 64 65 32 3A AC 28 ub..;...Mode2:.(
012F20: 2A 3D A1 2A 29 3B 20 28 2A 00 73 65 74 00 A7 20 *=.*); (*.set..
012F30: DC 20 9A 20 DC 20 B5 20 DB 20 32 20 DA 20 2A 29 . . . . . 2 . *)
012F40: BF BF AF 20 53 74 61 72 74 50 72 6F 63 65 73 73 ... StartProcess
012F50: 28 70 3A 00 50 52 4F 43 00 A6 3B 6E 3A AD 29 3B (p:.PROC..;n:.);
012F60: BF BF 28 2A B4 53 74 61 72 74 20 61 20 63 6F 6E ..(*.Start a con
012F70: 63 75 72 72 65 6E 74 20 CA 20 00 77 69 74 68 00 current . .with.
012F80: A5 20 70 72 6F 67 72 61 6D 20 50 20 DD C0 61 20 . program P ..a
012F90: 00 77 6F 72 6B 73 70 61 63 65 00 A2 20 CC 20 6E .workspace.. . n
012FA0: 20 00 62 79 74 65 73 00 A0 BF C0 A6 20 DF 20 61 .bytes..... . a
012FB0: 20 73 74 61 6E 64 61 72 64 20 74 79 70 65 20 72 standard type r
012FC0: 65 70 72 65 73 65 6E 74 69 6E 67 20 61 20 00 70 epresenting a .p
012FD0: 61 72 61 6D 65 74 65 72 6C 65 73 73 00 9F 20 C2 arameterless.. .
012FE0: BF C0 00 54 68 65 00 9E 20 73 74 6F 72 61 67 65 ...The.. storage
012FF0: 20 DF 20 67 6F 74 20 66 72 6F 6D 20 DE 20 68 65 . got from . he
013000: 61 70 20 BF BF 2A 29 BF AF 20 53 45 4E 44 28 8E ap ..*).. SEND(.
013010: 20 73 3A A9 29 3B BF BF 28 2A B4 9E 20 66 69 72 s:.);..(*.. fir
013020: 73 74 20 CA 20 28 6C 6F 6E 67 65 73 74 20 00 77 st . (longest .w
013030: 61 69 74 69 6E 67 00 9D 29 C0 9D 20 6F 6E 20 73 aiting..).. on s
013040: 20 DF 20 72 65 73 74 61 72 74 65 64 2A 29 BF BF . restarted*)..
013050: AF 20 57 41 49 54 28 8E 20 73 3A A9 29 3B BF BF . WAIT(. s:.);..
013060: 28 2A B4 57 61 69 74 20 B1 20 61 20 00 73 69 67 (*.Wait . a .sig
013070: 6E 61 6C 00 9C BF C0 D5 20 2D 20 62 65 77 61 72 nal..... - bewar
013080: 65 20 DE 20 42 6F 73 74 6F 6E 20 53 75 62 77 61 e . Boston Subwa
013090: 79 2A 29 BF BF AF 20 41 77 61 69 74 65 64 28 73 y*)... Awaited(s
0130A0: 3A A9 29 3A AC 3B BF BF 28 2A B4 52 65 74 75 72 :.):.;..(*.Retur
0130B0: 6E 73 20 9A 20 AE 20 73 6F 6D 65 74 68 69 6E 67 ns . . something
0130C0: 20 DF 20 9D 2A 29 BF BF AF 20 49 6E 69 74 28 8E . .*)... Init(.
0130D0: 20 73 3A A9 29 3B BF BF 28 2A B4 49 6E 69 74 69 s:.);..(*.Initi
0130E0: 61 6C 69 73 65 20 61 20 9C 20 2D 20 53 69 6D 75 alise a . - Simu
0130F0: 6C 61 20 36 37 20 C8 20 AA 20 D1 20 61 75 74 6F la 67 . . . auto
013100: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
013110: 10 00 00 00 02 09 4E E5 10 00 41 02 00 00 00 02 ......N...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: 20 C3 B4 C4 20 AB 20 00 65 72 72 6F 72 00 88 20 ... . .error..
013210: 2A 29 C1 90 20 49 73 53 74 72 65 61 6D 3A AC 20 *).. IsStream:.
013220: 84 C2 A1 3A 46 69 6C 65 3A 8F 7C C2 9A 3A 53 74 ...:File:.|..:St
013230: 72 65 61 6D 3A 91 3B C2 89 3B C1 44 65 66 61 75 ream:.;..;.Defau
013240: 6C 74 4E 61 6D 65 3A 94 3B C1 44 69 72 3A 95 3B ltName:.;.Dir:.;
013250: 20 28 2A 00 69 6E 70 75 74 00 87 20 B5 20 00 6F (*.input.. . .o
013260: 75 74 70 75 74 00 85 2A 29 C1 4C 6F 6F 6B 75 70 utput..*).Lookup
013270: 46 69 72 73 74 3A AC 3B 20 28 2A 8A 20 8B 2C 20 First:.; (*. .,
013280: 6C 6F 6F 6B 75 70 20 72 61 74 68 65 72 20 74 68 lookup rather th
013290: 61 6E 20 C3 20 B4 63 72 65 61 74 65 20 CB 20 85 an . .create . .
0132A0: 2E 20 55 73 65 66 75 6C 20 CB C3 B4 49 6E 70 75 . Useful ...Inpu
0132B0: 74 2D 4F 75 74 70 75 74 20 CA 2A 29 C1 89 3B BF t-Output .*)..;.
0132C0: AF 20 4F 70 65 6E 53 74 72 65 61 6D 73 28 8E 20 . OpenStreams(.
0132D0: 53 74 72 65 61 6D 4C 69 73 74 3A 9B 20 84 20 AA StreamList:. . .
0132E0: 3B C0 8E 20 00 4F 70 74 69 6F 6E 73 00 83 3A 8C ;.. .Options..:.
0132F0: 29 3A AC 3B BF BF 28 2A B4 4F 70 65 6E 20 61 20 ):.;..(*.Open a
013300: AE 20 C7 20 CA BF C0 46 6F 72 20 65 61 63 68 20 . . ...For each
013310: A7 2C 20 61 20 70 6F 69 6E 74 65 72 20 C8 20 C8 ., a pointer . .
013320: 20 A7 20 76 61 72 69 61 62 6C 65 2C 20 61 20 A0 . variable, a .
013330: 20 A9 20 9F 2C C1 99 20 61 20 64 69 72 65 63 74 . .,.. a direct
013340: 69 6F 6E 20 28 87 20 B5 20 85 29 2C 20 00 61 72 ion (. . .), .ar
013350: 65 00 82 20 70 61 73 73 65 64 BF C0 9D 20 00 74 e.. passed... .t
013360: 68 65 72 65 00 81 20 82 20 00 61 6E 79 00 80 20 here.. . .any..
013370: AD 20 6F 6E 20 C8 20 B8 20 B7 2C 20 74 68 65 79 . on . . ., they
013380: 20 82 20 72 65 74 75 72 6E 65 64 20 C9 20 C8 20 . returned . .
013390: AE C0 83 2A 29 BF AF 20 56 65 72 79 51 75 69 63 ...*).. VeryQuic
0133A0: 6B 28 8E 20 49 6E 2C 4F 75 74 3A 97 29 3A AC 3B k(. In,Out:.):.;
0133B0: BF BF 28 2A B4 41 75 74 6F 6D 61 74 69 63 61 6C ..(*.Automatical
0133C0: 6C 79 20 CC 20 AB 20 87 20 A7 20 99 20 AB 20 85 ly . . . . . . .
0133D0: 20 A7 BF C0 41 74 74 61 63 68 20 BC 20 B3 20 9E ...Attach . . .
0133E0: 20 61 73 20 B6 2E 20 9D 20 B6 20 82 20 6F 6D 69 as .. . . . omi
0133F0: 74 74 65 64 2C C0 61 74 74 61 63 68 20 BC 20 63 tted,.attach . c
013400: 20 63 68 61 72 61 63 74 65 72 73 C0 72 65 6D 61 characters.rema
013410: 69 6E 2C 20 CE 20 93 20 88 20 CD 20 73 68 61 76 in, . . . . shav
013420: 65 64 2C 20 8B 20 CE 20 B6 20 6D 6F 76 65 73 20 ed, . . . moves
013430: 91 20 CF C0 CE 20 88 20 00 73 69 7A 65 00 86 20 . ... . .size..
013440: 72 65 6D 61 69 6E 73 20 CE 20 73 61 6D 65 2E BF remains . same..
013450: C0 8D 20 CE 20 DD 20 73 74 69 6C 6C 20 77 6F 6E .. . . still won
013460: 74 20 00 66 69 74 00 85 2C 20 65 78 74 72 61 20 t .fit.., extra
013470: 8A 20 E1 20 BE 20 D1 20 CE 20 DD BF C0 9D 20 A3 . . . . . .... £
013480: 20 9C 20 96 20 CE 20 DD 20 E5 20 61 20 A9 20 00 . . . . . a . .
013490: 74 65 72 6D 69 6E 61 74 65 64 00 83 20 98 20 D5 terminated.. . .
0134A0: 20 C0 A3 BF 2A 29 BF BF AF 20 57 72 69 74 65 52 .£.*)... WriteR
0134B0: 65 61 6C 4F 63 74 28 78 3A A6 3B 6E 3A AD 29 3B ealOct(x:.;n:.);
0134C0: C0 28 2A E6 20 DE 20 DD 20 D5 20 6F 63 74 61 6C .(*. . . . octal
0134D0: 20 D1 20 64 65 62 75 67 67 69 6E 67 20 70 75 72 . debugging pur
0134E0: 70 6F 73 65 73 2A 29 BF AF 20 57 72 69 74 65 52 poses*).. WriteR
0134F0: 65 61 6C 48 65 78 28 78 3A A6 3B 6E 3A AD 29 3B ealHex(x:.;n:.);
013500: BF BF AF 20 57 72 69 74 65 52 65 61 6C 46 69 78 ... WriteRealFix
013510: 65 64 28 78 3A A6 3B 86 2C B9 3A AD 29 3B BF AF ed(x:.;.,.:.);..
013520: 20 DA 28 8E 20 A3 3A 9B 20 84 20 99 3B 78 3A A6 .(. £:. . .;x:.
013530: 3B 86 2C B9 3A AD 29 3B BF BF 28 2A B4 95 20 61 ;.,.:.);..(*.. a
013540: 20 DE 20 DD 20 D5 20 66 69 78 65 64 20 A7 C0 86 . . . fixed ...
013550: 20 CD 20 86 20 BD 20 88 20 D7 20 00 75 73 65 00 . . . . . .use.
013560: 82 C0 B9 20 CD 20 DD 20 BD 20 B9 20 D1 20 64 65 ... . . . . . de
013570: 63 69 6D 61 6C 73 BF C0 8D 20 CE 20 DD 20 CD 20 cimals... . . .
013580: 00 74 6F 6F 00 81 20 6C 61 72 67 65 20 D7 20 85 .too.. large . .
013590: 20 D5 20 CE 20 88 2C 20 C0 A8 20 A7 20 B5 20 CD . . ., .. . . .
0135A0: 20 72 65 76 65 72 74 65 64 20 D7 C0 C0 8D 20 CE reverted .... .
0135B0: 20 DD 20 CD 20 81 20 73 6D 61 6C 6C 2C 20 D0 20 . . . small, .
0135C0: 70 72 69 6E 74 73 20 E5 20 A9 BF C0 9D 20 A3 20 prints . .... £
0135D0: 70 72 6F 63 65 64 75 72 65 20 96 20 CE 20 76 61 procedure . . va
0135E0: 6C 75 65 20 D5 20 54 65 78 2C 20 E5 20 61 20 A9 lue . Tex, . a .
0135F0: 20 83 C0 98 BF 2A 29 BF AF 20 00 61 74 6F 69 00 ....*).. .atoi.
013600: 6F 6E 73 6F 6C 65 BF C0 42 6F 74 68 20 66 75 6E onsole..Both fun
013610: 63 74 69 6F 6E 73 20 B0 20 9A 20 8A 20 81 20 C4 ctions . . . . .
013620: 20 80 20 88 BF 2A 29 B4 BF 89 20 51 75 69 63 6B . ..*)... Quick
013630: 73 74 72 2E BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A str.............
013640: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
013650: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
013660: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
013670: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
013680: B2 20 A4 20 00 52 65 61 6C 49 6E 4F 75 74 00 E7 . . .RealInOut..
013690: 3B BF 28 2A B4 52 65 61 6C 20 69 6E 70 75 74 20 ;.(*.Real input
0136A0: 00 6F 75 74 70 75 74 00 E6 C0 00 61 73 00 E5 20 .output....as..
0136B0: 70 65 72 20 57 69 72 74 68 20 77 69 74 68 20 65 per Wirth with e
0136C0: 78 74 65 6E 73 69 6F 6E 73 C0 B1 20 28 43 29 20 xtensions.. (C)
0136D0: 00 44 61 76 65 00 E4 20 00 4D 6F 6F 72 65 00 E3 .Dave.. .Moore..
0136E0: 2C 20 46 54 4C 20 4D 6F 64 75 6C 61 2D 32 20 31 , FTL Modula-2 1
0136F0: 39 38 36 C0 41 20 67 65 6E 65 72 69 63 20 00 6D 986.A generic .m
013700: 6F 64 75 6C 65 00 E2 BF C0 4D 6F 64 69 66 69 65 odule....Modifie
013710: 64 20 4A 75 6C 79 20 31 39 38 37 2C 20 E4 20 E3 d July 1987, . .
013720: BF C0 54 68 65 72 65 20 00 61 72 65 00 E1 20 6E ..There .are.. n
013730: 6F 77 20 74 77 6F 20 00 6E 65 77 00 E0 20 72 6F ow two .new.. ro
013740: 75 74 69 6E 65 73 20 00 74 68 61 74 00 DF 20 73 utines .that.. s
013750: 75 70 70 6F 72 74 20 63 6F 64 69 6E 67 C0 61 20 upport coding.a
013760: 00 72 65 61 6C 00 DE 20 00 6E 75 6D 62 65 72 00 .real.. .number.
013770: DD 20 69 6E 74 6F 20 61 20 00 74 65 78 74 00 DC . into a .text..
013780: 20 61 72 72 61 79 2E 20 54 68 65 73 65 20 E1 20 array. These .
013790: 00 57 72 69 74 65 52 65 61 6C 54 65 78 74 00 DB .WriteRealText..
0137A0: 20 61 6E 64 C0 00 57 72 69 74 65 52 65 61 6C 46 and..WriteRealF
0137B0: 69 78 65 64 54 65 78 74 00 DA 2E 20 BF C0 41 6C ixedText... ..Al
0137C0: 73 6F 2C 20 52 65 61 64 52 65 61 6C 46 69 78 65 so, ReadRealFixe
0137D0: 64 20 00 61 6C 6C 6F 77 73 00 D9 20 00 79 6F 75 d .allows.. .you
0137E0: 00 D8 20 00 74 6F 00 D7 20 00 72 65 61 64 00 D6 .. .to.. .read..
0137F0: 20 00 69 6E 00 D5 20 00 6E 75 6D 62 65 72 73 00 .in.. .numbers.
013800: 80 28 61 3A A6 3B 69 3A AA 29 3A A6 3B BF BF 28 .(a:.;i:.):.;..(
013810: 2A B4 52 61 69 73 65 20 61 20 DE 20 DD 20 D7 20 *.Raise a . . .
013820: 9E 20 69 6E 74 65 67 65 72 20 70 6F 77 65 72 C0 . integer power.
013830: 54 68 69 73 20 BE 20 D7 20 B3 20 D5 20 43 6F 6E This . . . . Con
013840: 76 65 72 73 69 69 6F 6E 73 2C 20 77 68 69 63 68 versiions, which
013850: 20 77 61 73 20 61 20 76 65 72 79 C0 69 6E 6E 61 was a very.inna
013860: 70 70 72 6F 70 72 61 74 65 20 70 6C 61 63 65 20 pproprate place
013870: D1 20 D0 2E 20 E7 20 CD 20 AB 20 77 68 6F 6C 6C . .. . . . wholl
013880: 79 C0 61 70 70 72 6F 70 72 69 61 74 65 2C 20 CF y.appropriate, .
013890: 20 C7 20 D8 20 82 20 6F 6E 65 20 80 2C 20 D8 20 . . . one ., .
0138A0: 92 20 70 72 6F 62 61 62 6C 79 C0 61 6C 73 6F 20 . probably.also
0138B0: 82 20 E7 2A 29 BF BF 89 20 E7 2E 20 BF BF 00 00 . .*)... .. ....
0138C0: C0 28 2A E6 20 DE 20 DD 20 D5 20 6F 63 74 61 6C .(*. . . . octal
0138D0: 20 D1 20 64 65 62 75 67 67 69 6E 67 20 70 75 72 . debugging pur
0138E0: 70 6F 73 65 73 2A 29 BF AF 20 57 72 69 74 65 52 poses*).. WriteR
0138F0: 65 61 6C 48 65 78 28 78 3A A6 3B 6E 3A AD 29 3B ealHex(x:.;n:.);
013900: B2 20 A4 20 00 53 65 74 55 70 43 61 6C 6C 00 90 . . .SetUpCall..
013910: 3B BF BF 28 2A B4 8D 20 55 70 20 63 61 6C 6C 20 ;..(*.. Up call
013920: 70 61 72 61 6D 65 74 65 72 73 20 00 66 6F 72 00 parameters .for.
013930: 8F 20 61 20 70 72 6F 67 72 61 6D 20 61 6E 64 20 . a program and
013940: 63 68 61 69 6E 20 00 74 6F 00 8C 20 69 74 BF C0 chain .to.. it..
013950: 54 68 69 73 20 00 6D 6F 64 75 6C 65 00 8B 20 00 This .module.. .
013960: 69 73 00 8A 20 75 73 65 64 20 00 62 79 00 88 20 is.. used .by..
013970: 00 74 68 65 00 87 20 65 64 69 74 6F 72 20 8F 20 .the.. editor .
013980: 63 61 6C 6C 69 6E 67 20 87 C0 63 6F 6D 70 69 6C calling ..compil
013990: 65 72 73 2E BF C0 54 68 65 20 73 65 63 6F 6E 64 ers...The second
0139A0: 20 00 70 61 72 61 6D 65 74 65 72 00 86 20 8A 20 .parameter.. .
0139B0: 87 20 00 66 63 62 00 85 20 8F 20 87 20 66 69 6C . .fcb.. . . fil
0139C0: 65 20 77 68 69 63 68 20 8A 20 8C 20 00 62 65 00 e which . . .be.
0139D0: 83 20 63 6F 6D 70 69 6C 65 64 BF C0 00 49 74 00 . compiled...It.
0139E0: 82 20 00 77 69 6C 6C 00 81 20 83 20 73 65 74 20 . .will.. . set
0139F0: 75 70 20 6F 6E 20 87 20 63 6F 6D 6D 61 6E 64 20 up on . command
013A00: D4 20 00 66 72 6F 6D 00 D3 20 DC 20 73 74 72 69 . .from.. . stri
013A10: 6E 67 73 BF C0 49 20 63 6F 75 6C 64 20 63 6C 61 ngs..I could cla
013A20: 69 6D 20 DF 20 49 20 64 69 64 20 00 74 68 69 73 im . I did .this
013A30: 00 D2 20 62 65 63 61 75 73 65 20 73 6F 6D 65 20 .. because some
013A40: 70 65 6F 70 6C 65 20 68 61 64 20 61 73 6B 65 64 people had asked
013A50: 20 00 66 6F 72 00 D1 20 00 69 74 00 D0 2C C0 00 .for.. .it..,..
013A60: 62 75 74 00 CF 20 00 74 68 65 00 CE 20 DE 20 72 but.. .the.. . r
013A70: 65 61 73 6F 6E 20 00 69 73 00 CD 20 D0 20 6D 61 eason .is.. . ma
013A80: 64 65 20 D0 20 65 61 73 69 65 72 20 D7 20 77 72 de . easier . wr
013A90: 69 74 65 20 61 20 E0 20 00 74 65 73 74 00 CC 20 ite a . .test..
013AA0: E2 C0 D7 20 CC 20 E7 2E BF 2A 29 BF 8E B4 C0 00 ... . ...*).....
013AB0: 53 63 61 6C 65 00 CB 3A AD 28 2A 3D 30 2A 29 3B Scale..:.(*=0*);
013AC0: B4 28 2A 00 73 63 61 6C 65 00 CA 20 66 61 63 74 .(*.scale.. fact
013AD0: 6F 72 20 D1 20 00 57 72 69 74 65 52 65 61 6C 00 or . .WriteReal.
013AE0: C9 2A 29 C0 00 45 6E 67 69 6E 65 65 72 69 6E 67 .*)..Engineering
013AF0: 00 C8 3A AC 28 2A 3D A1 2A 29 3B 20 BF C1 28 2A ..:.(*=.*); ..(*
013B00: 00 69 66 00 C7 20 00 74 72 75 65 00 C6 2C 20 00 .if.. .true.., .
013B10: 65 6E 67 69 6E 65 65 72 69 6E 67 00 C5 20 00 65 engineering.. .e
013B20: 78 70 6F 6E 65 6E 74 73 00 C4 20 E1 20 00 75 73 xponents.. . .us
013B30: 65 64 00 BE C1 BA C5 20 C4 20 E1 20 61 6C 77 61 ed..... . . alwa
013B40: 79 73 20 6D 75 6C 74 69 70 6C 65 73 C1 BA 00 6F ys multiples...o
013B50: 66 00 BD 20 33 B7 2A 29 BF C0 4C 65 61 64 69 6E f.. 3.*)..Leadin
013B60: 67 70 6C 61 63 65 73 3A AD 28 2A 3D 32 2A 29 3B gplaces:.(*=2*);
013B70: 20 BF C1 28 2A DD 20 BD 20 00 70 6C 61 63 65 73 ..(*. . .places
013B80: 00 B9 20 D7 20 6C 65 61 76 65 20 00 62 65 66 6F .. . leave .befo
013B90: 72 65 00 B8 20 00 64 6F 74 00 B6 C1 BA 75 73 65 re.. .dot....use
013BA0: 66 75 6C 20 70 61 72 74 69 63 75 6C 61 72 6C 79 ful particularly
013BB0: 20 D1 20 C5 20 00 66 6F 72 6D 61 74 00 B5 C1 BA . . .format....
013BC0: 77 68 65 6E 20 D0 20 73 68 6F 75 6C 64 20 00 62 when . should .b
013BD0: 65 00 B3 20 00 73 65 74 00 B0 20 D7 20 00 61 74 e.. .set.. . .at
013BE0: 00 AE 20 6C 65 61 73 74 20 34 B4 2A 29 BF C0 46 .. least 4.*)..F
013BF0: 6F 72 63 65 45 78 70 6F 6E 65 6E 74 3A AC 28 2A orceExponent:.(*
013C00: 6C 69 6E 65 20 00 61 73 00 80 20 61 20 86 2E 20 line .as.. a ..
013C10: 82 20 81 20 83 20 66 6F 6C 6C 6F 77 65 64 C0 88 . . . followed..
013C20: 20 2F 45 20 80 20 61 6E 20 6F 70 74 69 6F 6E 2E /E . an option.
013C30: BF C0 49 66 20 74 68 69 73 20 8A 20 74 6F 6F 20 ..If this . too
013C40: 63 6C 65 76 65 72 20 8F 20 79 6F 75 72 20 72 65 clever . your re
013C50: 71 75 69 72 65 6D 65 6E 74 73 2C 20 79 6F 75 20 quirements, you
013C60: 63 6F 75 6C 64 20 75 73 65 20 87 20 8B C0 27 43 could use . ..'C
013C70: 68 61 69 6E 27 20 64 69 72 65 63 74 6C 79 2E C0 hain' directly..
013C80: 2A 29 BF BF 93 20 B4 43 50 4D 20 A3 20 85 2C 61 *)... .CPM £ .,a
013C90: 6C 66 61 3B BF AF 20 4D 61 6B 65 43 61 6C 6C 28 lfa;.. MakeCall(
013CA0: 70 72 6F 67 6E 61 6D 65 3A 9B 20 84 20 99 3B 8E progname:. . .;.
013CB0: 20 66 3A 85 29 3B BF 89 20 90 2E BF BF 00 00 1A f:.);.. .......
013CC0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
013CD0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
013CE0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
013CF0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
013D00: B2 20 A4 20 00 53 6D 61 6C 6C 49 4F 00 A2 3B BF . . .SmallIO..;.
013D10: BF 28 2A B4 00 54 68 69 73 00 A0 20 00 69 73 00 .(*..This.. .is.
013D20: 9F 20 00 74 68 65 00 9E 20 73 6D 61 6C 6C 20 76 . .the.. small v
013D30: 65 72 73 69 6F 6E 20 00 6F 66 00 9C 20 49 6E 4F ersion .of.. InO
013D40: 75 74 20 77 68 69 63 68 20 00 6F 6E 6C 79 00 9B ut which .only..
013D50: 20 73 75 70 70 6F 72 74 73 C0 69 2D 6F 20 66 72 supports.i-o fr
013D60: 6F 6D 20 9E 20 63 6F 6E 73 6F 6C 65 2A 29 BF BF om . console*)..
013D70: BF BF 9D B4 45 4F 4C 3D 30 00 64 78 00 9A 3B B4 ....EOL=0.dx..;.
013D80: 28 2A 30 44 48 20 3D 20 00 63 61 72 72 69 61 67 (*0DH = .carriag
013D90: 65 00 98 20 00 72 65 74 75 72 6E 00 97 C2 BA 4E e.. .return....N
013DA0: 6F 74 65 20 00 74 68 61 74 00 96 20 57 69 72 74 ote .that.. Wirt
013DB0: 68 20 75 73 65 73 20 31 65 68 20 3D 20 52 65 63 h uses 1eh = Rec
013DC0: 6F 72 64 20 73 65 70 65 72 61 74 6F 72 C2 BA 54 ord seperator..T
013DD0: 68 65 20 9B 20 72 65 71 75 69 72 65 6D 65 6E 74 he . requirement
013DE0: 20 9F 20 96 20 9E 20 00 63 68 61 72 61 63 74 65 . . . .characte
013DF0: 72 00 95 C2 BA 64 6F 65 73 20 6E 6F 74 20 6F 63 r....does not oc
013E00: 3D 9A 2A 29 3B 20 BF C1 28 2A B0 20 D7 20 66 61 =.*); ..(*. . fa
013E10: 6C 73 65 20 D7 20 00 6E 6F 74 00 AB 20 E6 20 C4 lse . .not.. . .
013E20: 20 BD 20 00 7A 65 72 6F 00 A9 20 6F 6E 20 00 66 . .zero.. on .f
013E30: 6C 6F 61 74 69 6E 67 00 A8 20 00 70 6F 69 6E 74 loating.. .point
013E40: 00 A7 C1 BA D4 2A 29 BF BF AF 20 52 65 61 64 52 .....*)... ReadR
013E50: 65 61 6C 28 8E 20 78 3A 00 52 45 41 4C 00 A6 29 eal(. x:.REAL..)
013E60: 3B BF AF 20 00 52 65 61 64 52 65 61 6C 54 65 78 ;.. .ReadRealTex
013E70: 74 00 A5 28 8E 20 00 54 65 78 74 00 A3 3A 9B 20 t..(. .Text.£:.
013E80: 84 20 99 3B 8E 20 00 41 74 50 6F 73 00 A2 3A AD . .;. .AtPos..:.
013E90: 3B 8E 20 78 3A A6 29 3B BF C1 28 2A B4 52 65 61 ;. x:.);..(*.Rea
013EA0: 64 20 61 20 DE 20 DD 20 BF C2 66 6F 72 6D 73 20 d a . . ..forms
013EB0: E1 20 5B 2B 21 2D 5D 5B 64 2A 5D 5B 2E 64 2A 5D . [+!-][d*][.d*]
013EC0: 5B 65 5B 2B 21 2D 5D 64 2B 5D BF C2 00 65 67 00 [e[+!-]d+]...eg.
013ED0: A0 BB B4 31 2E 30 C3 32 C3 2E 33 C3 45 33 BF C2 ...1.0.2..3.E3..
013EE0: 54 65 72 6D 69 6E 61 74 69 6F 6E 20 00 63 68 61 Termination .cha
013EF0: 72 61 63 74 65 72 00 9F 20 CD 20 72 65 74 75 72 racter.. . retur
013F00: 6E 65 64 20 D5 20 C2 74 65 72 6D 43 48 20 D3 20 ned . .termCH .
013F10: 49 4E 4F 55 54 20 28 73 69 6E 63 65 20 D2 20 E2 INOUT (since . .
013F20: 20 CD C2 65 66 66 65 63 74 69 76 65 6C 79 20 00 ..effectively .
013F30: 61 6E 00 9E 20 65 78 74 65 6E 73 69 6F 6E 20 BD an.. extension .
013F40: 20 49 6E 4F 75 74 29 BF C1 00 54 68 65 00 9D 20 InOut)...The..
013F50: A5 20 00 72 6F 75 74 69 6E 65 00 9C 20 D9 20 D8 . .routine.. . .
013F60: 20 D7 20 D6 20 61 20 DE 20 DD 20 C1 D3 20 61 20 . . a . . .. a
013F70: 00 73 74 72 69 6E 67 00 98 2E 20 A2 20 CD 20 CE .string... . . .
013F80: 20 00 69 6E 64 65 78 00 97 20 D1 20 CE 20 66 69 .index.. . . fi
013F90: 72 73 74 20 9F 20 D7 C1 D6 20 28 73 74 61 72 74 rst . ... (start
013FA0: 73 20 AE 20 30 29 2E 20 49 74 20 00 72 65 74 75 s . 0). It .retu
013FB0: 72 6E 73 00 96 20 97 20 BD 20 9F 20 61 66 74 65 rns.. . . . afte
013FC0: 72 C1 DD C1 2A 29 BF BF AF 20 C9 28 78 3A A6 3B r...*)... .(x:.;
013FD0: 6E 3A AD 29 3B BF AF 20 DB 28 8E 20 A3 3A 9B 20 n:.);.. .(. £:.
013FE0: 84 20 99 3B 78 3A A6 3B 6E 3A AD 29 3B BF 28 2A . .;x:.;n:.);.(*
013FF0: B4 00 57 72 69 74 65 00 95 20 61 20 DE 20 DD 20 ..Write.. a . .
014000: 63 75 72 20 00 69 6E 00 94 20 9E 20 6D 69 64 64 cur .in.. . midd
014010: 6C 65 20 9C 20 61 20 00 6C 69 6E 65 00 93 2A 29 le . a .line..*)
014020: BF BF 8E B4 44 6F 6E 65 3A AC 3B B4 28 2A 00 61 ....Done:.;.(*.a
014030: 73 00 92 20 94 20 27 6C 69 6B 65 20 61 20 64 69 s.. . 'like a di
014040: 6E 6E 65 72 27 20 A0 20 76 61 72 69 61 62 6C 65 nner' . variable
014050: C2 BA 9F 20 75 73 65 64 20 00 66 6F 72 00 91 20 ... used .for..
014060: 61 6C 6C 20 73 6F 72 74 73 20 9C 20 73 74 61 74 all sorts . stat
014070: 75 73 20 72 65 74 75 72 6E 73 C2 BA 00 73 65 65 us returns...see
014080: 00 90 20 70 72 6F 63 65 64 75 72 65 20 64 65 66 .. procedure def
014090: 69 6E 69 74 69 6F 6E 73 20 91 20 64 65 74 61 69 initions . detai
0140A0: 6C 73 C2 BA 2A 29 BF C0 74 65 72 6D 43 48 3A 99 ls..*)..termCH:.
0140B0: 3B B4 28 2A 53 74 72 69 6E 67 20 74 65 72 6D 69 ;.(*String termi
0140C0: 6E 61 74 69 6E 67 20 95 20 61 66 74 65 72 20 00 nating . after .
0140D0: 72 65 61 64 00 8F C2 BA 62 79 20 00 52 65 61 64 read....by .Read
0140E0: 53 74 72 69 6E 67 00 8D 2A 29 C0 69 67 6E 6F 72 String..*).ignor
0140F0: 65 63 68 3A 99 28 2A 3D 30 61 78 2A 29 3B B4 28 ech:.(*=0ax*);.(
014100: 2A 00 4E 6F 72 6D 61 6C 6C 79 00 8C 20 93 20 66 *.Normally.. . f
014110: 65 65 64 2A 29 C0 65 6F 6C 63 68 3A 99 28 2A 3D eed*).eolch:.(*=
014120: 30 9A 2A 29 3B B5 28 2A 8C 20 98 20 97 2A 29 C0 0.*);.(*. . .*).
014130: 64 65 6C 69 6D 69 74 65 72 3A 99 28 2A 3D 27 20 delimiter:.(*='
014140: 27 2A 29 3B 20 B4 28 2A 8C 20 42 6C 61 6E 6B 20 '*); .(*. Blank
014150: 61 6E 79 20 95 3C 3D 20 00 74 68 69 73 00 8B 20 any .<= .this..
014160: 95 C2 20 B4 64 65 6C 69 6D 69 74 73 20 61 20 73 .. .delimits a s
014170: 74 72 69 6E 67 2A 29 C0 41 6C 77 61 79 73 42 75 tring*).AlwaysBu
014180: 66 66 65 72 3A AC 28 2A 3D A1 2A 29 3B C3 28 2A ffer:.(*=.*);.(*
014190: 90 20 8D 20 2D 20 73 65 74 20 74 72 75 65 20 74 . . - set true t
0141A0: 6F 20 66 6F 72 63 65 C3 62 75 66 66 65 72 65 64 o force.buffered
0141B0: 20 8F 20 9C 20 AE 20 2A 29 BF BF BF AF 20 52 65 . . . *).... Re
0141C0: 61 64 49 6E 74 28 8E 20 78 3A AA 29 3B BF C0 28 adInt(. x:.);..(
0141D0: 2A 00 52 65 61 64 00 8A 20 00 61 6E 00 88 20 00 *.Read.. .an.. .
0141E0: 69 6E 74 65 67 65 72 00 87 20 76 61 6C 75 65 20 integer.. value
0141F0: C0 20 4E 75 6D 62 65 72 20 6D 61 79 20 68 61 76 . Number may hav
014200: D5 20 00 6D 61 6E 74 69 73 73 61 00 94 20 2B 20 . .mantissa.. +
014210: 00 65 78 70 6F 6E 65 6E 74 00 93 20 66 6F 72 6D .exponent.. form
014220: BF C0 D1 20 65 78 61 6D 70 6C 65 2C 20 31 30 20 ... example, 10
014230: 00 77 69 6C 6C 00 92 20 B3 20 E6 20 E5 20 30 2E .will.. . . . 0.
014240: 31 45 32 BF C0 9D 20 76 61 72 69 61 62 6C 65 20 1E2... variable
014250: CB 2C 20 C7 20 2B 76 65 2C 20 92 20 63 61 75 73 ., . +ve, . caus
014260: 65 20 CE 20 2E 20 D7 20 B3 20 73 68 69 66 74 65 e . . . . shifte
014270: 64 20 00 72 69 67 68 74 00 91 C0 C7 20 00 6E 65 d .right.... .ne
014280: 67 61 74 69 76 65 00 90 2C 20 91 BF C0 A0 20 C7 gative.., .... .
014290: 20 CB 3D 31 2C 20 31 30 20 92 20 00 70 72 69 6E .=1, 10 . .prin
0142A0: 74 00 8F 20 E5 20 31 2E 30 45 32 BF C0 00 49 66 t.. . 1.0E2...If
0142B0: 00 8D 20 C8 20 CD 20 C6 2C 20 CE 20 DD 20 CD 20 .. . . ., . . .
0142C0: 73 63 61 6C 65 64 2C 20 00 74 68 65 6E 00 8C 20 scaled, .then..
0142D0: CE 20 94 C0 C7 20 72 6F 75 6E 64 65 64 20 D7 20 . ... rounded .
0142E0: 61 20 6D 75 6C 74 69 70 6C 65 20 BD 20 33 20 28 a multiple . 3 (
0142F0: CE 20 DD 20 BD 20 64 69 67 69 74 73 20 B8 20 CE . . . digits . .
014300: C0 B6 20 CD 20 72 65 64 75 63 65 64 BF C0 00 73 .. . reduced...s
014310: 6F 00 8B 2C 20 31 30 20 92 20 8F 20 E5 20 30 2E o.., 10 . . . 0.
014320: 30 31 45 33 20 28 C7 20 CA 3D 30 2C 31 29 C2 BC 01E3 (. .=0,1)..
014330: 31 30 2E 30 45 30 BA 28 C7 20 CA 3D 32 2C 33 2C 10.0E0.(. .=2,3,
014340: 34 29 C2 20 31 30 30 30 30 2E 30 45 2D 33 20 28 4). 10000.0E-3 (
014350: C7 20 CA 3D 35 2C 36 2C 37 29 20 65 74 63 BF C0 . .=5,6,7) etc..
014360: 9D 20 6C 61 79 6F 75 74 20 CD 20 E5 20 66 6F 6C . layout . . fol
014370: 6C 6F 77 73 3A BF C0 9D 20 72 69 67 68 74 6D 6F lows:... rightmo
014380: 73 74 20 35 20 00 63 6F 6C 75 6D 6E 73 00 8A 20 st 5 .columns..
014390: BD 20 CE 20 00 66 69 65 6C 64 00 88 20 E1 20 72 . . .field.. . r
0143A0: 65 73 65 72 76 65 64 20 D1 20 CE 20 93 C0 74 68 eserved . . ..th
0143B0: 65 72 65 20 6D 75 73 74 20 8C 20 B3 20 00 73 69 ere must . . .si
0143C0: 67 64 69 67 69 74 73 00 87 2B 31 20 28 6F 72 20 gdigits..+1 (or
0143D0: 87 2B 32 20 C7 20 90 29 20 C0 9F 20 70 6F 73 69 .+2 . .) .. posi
0143E0: 74 69 6F 6E 73 20 6C 65 66 74 20 D5 20 CE 20 88 tions left . . .
0143F0: 2E 20 8D 20 69 6E 73 75 66 66 69 63 69 65 6E 74 . . insufficient
014400: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
014410: 11 00 00 00 02 09 4E E5 11 00 41 02 00 00 00 02 ......N...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: 65 20 00 6C 65 61 64 69 6E 67 00 86 20 73 69 67 e .leading.. sig
014510: 6E C0 20 4C 65 61 64 69 6E 67 20 00 62 6C 61 6E n. Leading .blan
014520: 6B 73 00 85 2C 20 93 20 73 65 70 61 72 61 74 6F ks.., . separato
014530: 72 73 20 61 6E 64 20 74 61 62 73 20 00 61 72 65 rs and tabs .are
014540: 00 84 20 69 67 6E 6F 72 65 64 C0 20 41 20 6E 6F .. ignored. A no
014550: 6E 2D 6E 75 6D 65 72 69 63 20 74 65 72 6D 69 6E n-numeric termin
014560: 61 74 65 73 2A 29 BF BF AF 20 52 65 61 64 43 61 ates*)... ReadCa
014570: 72 64 28 8E 20 78 3A AD 29 3B BF C0 28 2A 8A 20 rd(. x:.);..(*.
014580: 61 20 63 61 72 64 69 6E 61 6C 2A 29 BF BF BF AF a cardinal*)....
014590: 20 57 72 69 74 65 49 6E 74 28 78 3A AA 3B 00 70 WriteInt(x:.;.p
0145A0: 6C 61 63 65 73 00 83 3A AD 29 3B BF C0 28 2A 57 laces..:.);..(*W
0145B0: 72 69 74 65 20 78 20 94 20 61 74 20 6C 65 61 73 rite x . at leas
0145C0: 74 20 83 20 83 20 C0 20 00 6E 75 6D 62 65 72 00 t . . . .number.
0145D0: 82 20 9F 20 72 69 67 68 74 20 6A 75 73 74 69 66 . . right justif
0145E0: 69 65 64 2E 20 49 66 20 6D 6F 72 65 20 73 70 61 ied. If more spa
0145F0: 63 65 73 20 84 20 72 65 71 75 69 72 65 64 C0 20 ces . required.
014600: 74 68 61 6E 20 00 74 68 65 72 65 00 81 20 84 20 than .there.. .
014610: 83 2C 20 9E 20 66 69 65 6C 64 20 9F 20 65 78 70 ., . field . exp
014620: 61 6E 64 65 64 2E 20 49 6E 20 8B C0 20 63 61 73 anded. In .. cas
014630: 65 2C 20 81 20 84 20 6E 6F 20 86 20 85 2A 29 BF e, . . no . .*).
014640: BF AF 20 57 72 69 74 65 43 61 72 64 28 78 2C 83 .. WriteCard(x,.
014650: 3A AD 29 3B BF AF 20 00 57 72 69 74 65 48 65 78 :.);.. .WriteHex
014660: 00 80 28 78 2C 83 3A AD 29 3B BF AF 20 57 72 69 ..(x,.:.);.. Wri
014670: 74 65 4F 63 74 28 78 2C 83 3A AD 29 3B BF C0 28 teOct(x,.:.);..(
014680: 2A 4F 74 68 65 72 20 63 61 72 64 69 6E 61 6C 6F *Other cardinalo
014690: 75 74 70 75 74 20 72 6F 75 74 69 6E 65 73 2E 20 utput routines.
0146A0: 54 6F 20 77 72 69 74 65 20 88 20 87 20 94 20 68 To write . . . h
0146B0: 65 78 2C 20 75 73 65 C0 20 80 28 43 61 72 64 69 ex, use. .(Cardi
0146C0: 6E 61 6C 28 69 6E 74 65 67 65 72 76 61 6C 75 65 nal(integervalue
0146D0: 29 2C 34 20 28 2A 73 61 79 2A 29 29 3B 20 2D 31 ),4 (*say*)); -1
0146E0: 20 77 69 6C 6C 20 70 72 69 6E 74 20 92 20 46 46 will print . FF
0146F0: 46 46 2A 29 BF C0 28 2A 53 65 65 20 9E 20 6D 6F FF*)..(*See . mo
014700: 69 63 68 00 D2 20 00 72 65 74 75 72 6E 73 00 D1 ich.. .returns..
014710: 20 9A 20 C1 00 69 66 00 D0 20 DA 20 D9 20 D8 20 . ..if.. . . .
014720: D7 20 00 69 73 00 CF 20 00 66 6F 75 6E 64 00 CE . .is.. .found..
014730: 2C 20 00 6F 72 00 CD 20 00 74 68 65 00 CC 20 00 , .or.. .the.. .
014740: 63 68 61 72 61 63 74 65 72 00 CB 20 45 4F 46 20 character.. EOF
014750: 28 31 61 78 29 20 C1 CF 20 CE 2E BF C1 54 68 65 (1ax) .. ....The
014760: 20 DC 20 DD 20 00 61 6C 6C 6F 77 73 00 CA 20 CC . . .allows.. .
014770: 20 00 75 73 65 00 C9 20 D8 20 73 74 72 65 61 6D .use.. . stream
014780: 73 20 DB 20 C1 62 69 6E 61 72 79 20 00 66 69 6C s . .binary .fil
014790: 65 73 00 C8 BF C1 DF 20 33 30 20 4E 6F 76 20 38 es..... 30 Nov 8
0147A0: 36 BF C1 31 2F 20 57 72 69 74 65 73 20 00 6E 6F 6..1/ Writes .no
0147B0: 77 00 C7 20 00 63 68 65 63 6B 00 C6 20 DB 20 D9 w.. .check.. . .
0147C0: 20 D8 20 00 64 69 73 6B 00 C5 20 00 61 6E 64 00 . .disk.. .and.
0147D0: C4 20 73 65 74 73 C1 65 6F 66 20 00 66 6C 61 67 . sets.eof .flag
0147E0: 00 C3 20 D0 20 CE 2E 20 00 59 6F 75 00 C2 20 00 .. . .. .You.. .
0147F0: 63 61 6E 00 BE 20 00 64 6F 00 BD 20 D3 28 73 29 can.. .do.. .(s)
014800: 20 00 61 66 74 65 72 00 BC 20 61 C1 00 77 72 69 .after.. a..wri
014810: 74 65 00 B9 20 D4 20 C6 20 DB 20 C5 20 66 75 6C te.. . . . . ful
014820: 6C 2E 20 C2 20 00 6D 75 73 74 00 B8 20 BD 20 CC l. . .must.. . .
014830: 20 74 65 73 74 C1 73 74 72 61 69 67 68 74 20 BC test.straight .
014840: 20 CC 20 B9 20 2D 20 00 6F 74 68 65 72 00 B7 20 . . - .other..
014850: 6F 70 65 72 61 74 69 6F 6E 73 20 BE 20 63 68 61 operations . cha
014860: 6E 67 65 C1 CC 20 73 74 61 74 75 73 20 D8 20 CC nge.. status . .
014870: 20 C3 2E BF C1 32 2F 20 52 61 6E 64 6F 6D 20 00 ....2/ Random .
014880: 69 6E 70 75 74 00 B6 2D 00 6F 75 74 70 75 74 00 input..-.output.
014890: B3 20 00 77 69 74 68 00 B0 20 72 65 63 6F 72 64 . .with.. record
0148A0: 73 20 74 68 61 74 20 73 70 61 6E 20 62 6C 6F 63 s that span bloc
0148B0: 6B 73 20 CF 20 C7 C1 BB 73 75 70 70 6F 72 74 65 ks . ...supporte
0148C0: 64 2E BF C1 33 2F 20 00 54 68 65 72 65 00 AE 20 d...3/ .There..
0148D0: CF 20 61 20 DE 20 00 70 72 6F 63 65 64 75 72 65 . a . .procedure
0148E0: 00 A9 20 00 53 65 74 42 75 66 66 65 72 73 00 A8 .. .SetBuffers..
0148F0: 20 D2 20 CA 20 00 79 6F 75 00 A7 20 D4 C1 BB 00 . . .you.. ....
014900: 64 75 6C 65 20 52 65 61 6C 49 6E 4F 75 74 20 91 dule RealInOut .
014910: 20 52 65 61 6C 20 82 20 49 4F 2A 29 BF BF BF BF Real . IO*)....
014920: 89 20 A2 2E 20 BF 00 00 73 65 70 61 72 61 74 6F . .. ...separato
014930: 72 73 20 61 6E 64 20 74 61 62 73 20 00 61 72 65 rs and tabs .are
014940: 00 84 20 69 67 6E 6F 72 65 64 C0 20 41 20 6E 6F .. ignored. A no
014950: 6E 2D 6E 75 6D 65 72 69 63 20 74 65 72 6D 69 6E n-numeric termin
014960: 61 74 65 73 2A 29 BF BF AF 20 52 65 61 64 43 61 ates*)... ReadCa
014970: 72 64 28 8E 20 78 3A AD 29 3B BF C0 28 2A 8A 20 rd(. x:.);..(*.
014980: B2 20 A4 20 00 53 6F 6C 76 65 00 8F 3B BF BF 28 . . .Solve..;..(
014990: 2A B4 8F 20 61 20 00 73 65 74 00 8D 20 00 6F 66 *.. a .set.. .of
0149A0: 00 8C 20 00 65 71 75 61 74 69 6F 6E 73 00 8B 20 .. .equations..
0149B0: 62 79 20 67 61 75 73 73 69 61 6E 20 65 6C 69 6D by gaussian elim
0149C0: 69 6E 61 74 69 6F 6E 2A 29 BF BF BF BF BF 96 B4 ination*).......
0149D0: 00 43 4F 4C 55 4D 4E 00 8A 3D 9B 5B 31 2E 2E 31 .COLUMN..=.[1..1
0149E0: 30 5D 20 84 20 52 45 41 4C 3B BF BF AF 20 47 61 0] . REAL;... Ga
0149F0: 75 73 73 28 8E 20 4D 61 74 72 69 78 3A 9B 20 84 uss(. Matrix:. .
014A00: 20 8A 3B 00 64 65 70 74 68 00 88 2C 6C 65 6E 3A .;.depth..,len:
014A10: AD 29 3B BF BF 28 2A B4 8F 20 61 20 8D 20 8C 20 .);..(*.. a . .
014A20: 8B 20 66 6F 72 20 00 61 6E 00 87 20 61 72 62 69 . for .an.. arbi
014A30: 74 72 61 72 79 20 00 6E 75 6D 62 65 72 00 86 20 trary .number..
014A40: 8C 20 72 69 67 68 74 C0 68 61 6E 64 20 73 69 64 . right.hand sid
014A50: 65 73 2E BF C0 00 6D 61 74 72 69 78 00 85 20 00 es....matrix.. .
014A60: 69 73 00 83 20 87 20 00 61 72 72 61 79 00 82 20 is.. . .array..
014A70: 8C 20 63 6F 6C 75 6D 6E 73 20 77 68 69 63 68 20 . columns which
014A80: 00 6D 61 6B 65 00 81 20 75 70 20 00 74 68 65 00 .make.. up .the.
014A90: 80 20 82 BF C0 88 20 83 20 80 20 86 20 8C 20 65 . .... . . . . e
014AA0: 6C 65 6D 65 6E 74 73 20 69 6E 20 65 61 63 68 20 lements in each
014AB0: 63 6F 6C 75 6D 6E 2E 20 54 68 65 20 66 69 72 73 column. The firs
014AC0: 74 C0 88 20 72 6F 77 73 20 61 72 65 20 75 73 65 t.. rows are use
014AD0: 64 20 74 6F 20 81 20 61 20 73 71 75 61 72 65 20 d to . a square
014AE0: 85 2A 29 BF 89 20 8F 2E BF BA BF 00 00 1A 1A 1A .*).. ..........
014AF0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
014B00: 73 65 74 00 A6 20 CC 20 6E 75 6D 62 65 72 20 D8 set.. . number .
014B10: 20 62 75 66 66 65 72 73 20 D4 20 C9 20 DB 20 61 buffers . . . a
014B20: 20 D7 2E C1 BA C1 BB AE 20 CF 20 61 6C 73 6F 20 ....... . also
014B30: 61 20 DE 20 A9 20 00 43 68 61 6E 67 65 44 69 72 a . . .ChangeDir
014B40: 65 63 74 69 6F 6E 00 A5 20 D2 C1 BB 63 68 61 6E ection.. ...chan
014B50: 67 65 73 20 CC 20 00 64 69 72 65 63 74 69 6F 6E ges . .direction
014B60: 00 A2 20 D8 20 61 20 D7 2E BF C1 34 2F 20 00 52 .. . a ....4/ .R
014B70: 65 73 65 74 00 A0 20 6E 6F 20 6C 6F 6E 67 65 72 eset.. no longer
014B80: 20 6D 61 6B 65 73 20 61 20 D7 20 00 61 6E 00 9F makes a . .an..
014B90: 20 B6 20 D7 2E BF 2A 29 BF BF 93 20 53 59 53 54 . ...*)... SYST
014BA0: 45 4D 20 A3 20 00 57 4F 52 44 00 9E 2C AB 3B BF EM £ .WORD..,.;.
014BB0: 93 20 46 69 6C 65 73 20 A3 20 00 46 49 4C 45 00 . Files £ .FILE.
014BC0: 9D 3B BF 96 20 B4 D5 3B C0 00 44 69 72 65 63 74 .;.. ..;..Direct
014BD0: 69 6F 6E 00 9C 3D 28 B6 2C B3 29 3B BF BF AF 20 ion..=(.,.);...
014BE0: 00 43 6F 6E 6E 65 63 74 00 9B 28 8E 20 73 3A D5 .Connect..(. s:.
014BF0: 3B 8E 20 66 3A 9D 3B 64 69 72 3A 9C 29 3B BF C0 ;. f:.;dir:.);..
014C00: 28 2A B4 9B 20 00 73 74 72 65 61 6D 00 98 20 73 (*.. .stream.. s
014C10: 20 B0 20 D7 20 66 C1 D7 20 00 6D 61 79 00 97 20 . . f.. .may..
014C20: 00 62 65 00 95 20 00 6F 70 65 6E 00 94 20 CD 20 .be.. .open.. .
014C30: 63 6C 6F 73 65 64 2C 20 00 62 75 74 00 92 20 A7 closed, .but.. .
014C40: 20 B8 20 94 20 CC C1 D7 20 62 65 66 6F 72 65 20 . . ... before
014C50: 61 63 63 65 73 73 69 6E 67 20 69 74 20 76 69 61 accessing it via
014C60: 20 CC 20 98 BF C1 4E 6F 74 65 20 CC 20 64 69 66 . ...Note . dif
014C70: 66 65 72 65 6E 63 65 20 E1 20 CC 20 74 68 69 72 ference . . thir
014C80: 64 20 70 61 72 61 6D 65 74 65 72 C1 00 49 6E 00 d parameter..In.
014C90: 91 20 E0 2C 20 00 74 68 69 73 00 90 20 CF 20 9A . ., .this.. . .
014CA0: 20 DB 20 61 20 77 6F 72 64 20 D7 2C 20 A1 20 DB . a word ., . .
014CB0: 20 61 C1 42 59 54 45 20 D7 2E 20 91 20 90 20 76 a.BYTE .. . . v
014CC0: 65 72 73 69 6F 6E 2C 20 42 59 54 45 73 20 C4 20 ersion, BYTEs .
014CD0: 57 4F 52 44 73 20 97 20 95 C1 69 6E 74 65 72 6D WORDs . ..interm
014CE0: 69 78 65 64 20 D6 20 61 20 D7 2C 20 92 20 A7 20 ixed . a ., . .
014CF0: B8 20 69 6E 66 6F 72 6D 20 E3 C1 E2 20 D4 20 CC . inform ... . .
014D00: B2 20 A4 20 00 53 6F 72 74 00 8D 3B BF BF 28 2A . . .Sort..;..(*
014D10: 49 6E 74 65 72 6E 61 6C 20 00 73 6F 72 74 00 8C Internal .sort..
014D20: 20 00 6F 66 00 8B 20 66 69 78 65 64 20 6C 65 6E .of.. fixed len
014D30: 67 74 68 20 00 72 65 63 6F 72 64 73 00 8A 2A 29 gth .records..*)
014D40: BF BF 28 2A B4 75 73 65 73 20 51 75 69 63 6B 73 ..(*.uses Quicks
014D50: 6F 72 74 2A 29 BF 93 20 53 59 53 54 45 4D 20 A3 ort*).. SYSTEM £
014D60: 20 AB 3B BF 96 B4 00 4B 65 79 50 72 6F 63 00 88 .;....KeyProc..
014D70: 3D AF 20 28 AB 2C AB 29 3A AC 3B BF BF AF 20 53 =. (.,.):.;... S
014D80: 6F 72 74 52 65 63 6F 72 64 73 28 00 74 61 62 6C ortRecords(.tabl
014D90: 65 00 87 3A AB 3B 00 65 6C 65 6D 65 6E 74 73 00 e..:.;.elements.
014DA0: 86 2C 00 65 6C 65 6D 65 6E 74 73 69 7A 65 00 85 .,.elementsize..
014DB0: 3A AD 3B C2 00 43 6F 6D 70 61 72 00 84 3A 88 29 :.;..Compar..:.)
014DC0: 3B BF BF 28 2A B4 8D 20 00 74 68 65 00 83 20 8A ;..(*.. .the.. .
014DD0: BF C0 87 20 B5 00 69 73 00 82 20 83 20 64 61 74 ... ..is.. . dat
014DE0: 61 20 74 6F 20 8C C0 86 20 B4 82 20 83 20 00 6E a to ... .. . .n
014DF0: 75 6D 62 65 72 00 81 20 8B 20 86 20 00 69 6E 00 umber.. . . .in.
014E00: 80 20 83 20 87 C0 85 B4 82 20 83 20 81 20 8B 20 . . ..... . . .
014E10: 62 79 74 65 73 20 80 20 65 61 63 68 20 65 6C 65 bytes . each ele
014E20: 6D 65 6E 74 C0 84 B5 82 20 61 20 72 6F 75 74 69 ment.... a routi
014E30: 6E 65 20 77 68 6F 63 68 20 72 65 74 75 72 6E 73 ne whoch returns
014E40: 20 9A 20 69 66 20 83 20 C2 86 20 70 61 73 73 65 . if . .. passe
014E50: 64 20 61 73 20 70 61 72 61 6D 65 74 65 72 73 20 d as parameters
014E60: 61 72 65 20 6F 75 74 20 8B 20 C2 6F 72 64 65 72 are out . .order
014E70: 2A 29 BF 89 20 8D 2E BF 00 00 1A 1A 1A 1A 1A 1A *).. ...........
014E80: B2 20 A4 20 00 53 54 4F 52 41 47 45 00 9A 3B BF . . .STORAGE..;.
014E90: 28 2A B4 48 65 61 70 20 00 61 6C 6C 6F 63 61 74 (*.Heap .allocat
014EA0: 69 6F 6E 00 99 2F 64 65 61 6C 6C 6F 63 61 74 69 ion../deallocati
014EB0: 6F 6E BF C0 44 2E 4D 6F 6F 72 65 20 32 39 20 44 on..D.Moore 29 D
014EC0: 65 63 20 38 34 BF C0 43 68 61 6E 67 65 64 20 33 ec 84..Changed 3
014ED0: 30 20 4A 61 6E 20 38 35 BF C0 54 68 65 20 00 46 0 Jan 85..The .F
014EE0: 75 6C 6C 55 70 00 98 20 00 70 72 6F 63 65 64 75 ullUp.. .procedu
014EF0: 72 65 00 97 20 6D 61 79 20 72 65 74 75 72 6E 20 re.. may return
014F00: 20 A2 20 28 B6 20 CD 20 B3 29 20 DB 20 CC 20 D7 . (. . .) . . .
014F10: 20 BF C1 4D 6F 72 65 20 74 68 61 6E 20 6F 6E 65 ..More than one
014F20: 20 98 20 97 20 95 20 63 6F 6E 6E 65 63 74 65 64 . . . connected
014F30: 20 D4 20 61 20 D7 2A 29 BF BF AF 20 00 44 69 73 . a .*)... .Dis
014F40: 63 6F 6E 6E 65 63 74 00 8F 28 8E 20 73 3A D5 3B connect..(. s:.;
014F50: 00 63 6C 6F 73 65 66 69 6C 65 00 8D 3A AC 29 3B .closefile..:.);
014F60: BF C0 28 2A B4 8F 20 C4 20 6F 70 74 69 6F 6E 61 ..(*.. . optiona
014F70: 6C 6C 79 20 63 6C 6F 73 65 20 D7 BF C1 41 63 74 lly close ...Act
014F80: 75 61 6C 6C 79 2C 20 D0 20 8D 20 CF 20 66 61 6C ually, . . . fal
014F90: 73 65 2C 20 CC 20 6F 6E 6C 79 20 65 66 66 65 63 se, . only effec
014FA0: 74 C1 CF 20 D4 20 66 6C 75 73 68 20 61 6E 79 20 t.. . flush any
014FB0: B3 20 00 62 75 66 66 65 72 00 8C BF C1 9F 20 D9 . .buffer..... .
014FC0: 20 D8 20 D7 20 CB 20 28 31 00 61 68 00 8B 29 20 . . . (1.ah..)
014FD0: CF 20 61 6C 77 61 79 73 20 77 72 69 74 74 65 6E . always written
014FE0: 2A 29 BF AF 20 57 72 69 74 65 57 6F 72 64 28 73 *).. WriteWord(s
014FF0: 3A D5 3B 77 3A 9E 29 3B BF C0 28 2A B4 00 4F 75 :.;w:.);..(*..Ou
015000: 74 70 75 74 00 8A 20 74 77 6F 20 62 79 74 65 73 tput.. two bytes
015010: 20 77 69 74 68 6F 75 74 20 63 6F 6E 76 65 72 73 without convers
015020: 69 6F 6E 2A 29 BF BF AF 20 57 72 69 74 65 43 68 ion*)... WriteCh
015030: 61 72 28 73 3A D5 3B 77 3A 99 29 3B BF C0 28 2A ar(s:.;w:.);..(*
015040: B4 8A 20 61 20 CB 20 D4 20 CC 20 98 20 2A 29 BF .. a . . . . *).
015050: BF AF 20 45 6E 64 57 72 69 74 65 28 73 3A D5 29 .. EndWrite(s:.)
015060: 3B BF C0 28 2A B4 46 6C 75 73 68 20 8C 2C 20 D0 ;..(*.Flush ., .
015070: 20 72 65 71 75 69 72 65 64 2A 29 BF BF AF 20 52 required*)... R
015080: 65 61 64 57 6F 72 64 28 73 3A D5 3B 8E 20 77 3A eadWord(s:.;. w:
015090: 9E 29 3B BF AF 20 52 65 61 64 43 68 61 72 28 73 .);.. ReadChar(s
0150A0: 3A D5 3B 8E 20 77 3A 99 29 3B BF C0 28 2A B4 52 :.;. w:.);..(*.R
0150B0: 65 61 64 20 77 6F 72 64 73 20 C4 20 00 63 68 61 ead words . .cha
0150C0: 72 61 63 74 65 72 73 00 88 BF C1 54 68 65 73 65 racters....These
0150D0: 20 72 6F 75 74 69 6E 65 73 20 BD 20 6E 6F 74 20 routines . not
0150E0: 6B 6E 6F 77 20 00 61 62 6F 75 74 00 87 20 65 6F know .about.. eo
0150F0: 66 73 20 64 65 66 69 6E 65 64 20 00 62 79 00 86 fs defined .by..
015100: 63 6F 6E 74 72 6F 6C 20 00 74 6F 00 96 20 00 41 control .to.. .A
015110: 4C 4C 4F 43 41 54 45 00 95 C0 00 49 66 00 94 20 LLOCATE....If..
015120: 00 69 74 00 92 20 64 6F 65 73 20 00 73 6F 00 91 .it.. does .so..
015130: 2C 20 00 74 68 65 00 90 20 99 20 00 77 69 6C 6C , .the.. . .will
015140: 00 8F 20 00 62 65 00 8D 20 74 72 69 65 64 20 00 .. .be.. tried .
015150: 61 67 61 69 6E 00 8C 2E 20 94 20 92 C0 66 61 69 again... . ..fai
015160: 6C 73 2C 20 00 74 68 65 6E 00 8B 20 98 20 8F 20 ls, .then.. . .
015170: 8D 20 63 61 6C 6C 65 64 20 8C 20 2D 20 61 64 20 . called . - ad
015180: 69 6E 66 69 6E 69 74 75 6D 2C 20 91 C0 59 6F 75 infinitum, ..You
015190: 72 20 98 20 72 6F 75 74 69 6E 65 20 6D 75 73 74 r . routine must
0151A0: 20 64 6F 20 73 6F 6D 65 74 68 69 6E 67 20 75 73 do something us
0151B0: 65 66 75 6C 20 28 6C 69 6B 65 20 48 41 4C 54 29 eful (like HALT)
0151C0: 2A 29 BF 93 20 53 59 53 54 45 4D 20 A3 20 AB 3B *).. SYSTEM £ .;
0151D0: BF AF 20 95 28 8E 20 00 50 6F 69 6E 74 65 72 00 .. .(. .Pointer.
0151E0: 8A 3A AB 3B 00 73 69 7A 65 00 88 3A AD 29 3B BF .:.;.size..:.);.
0151F0: BF 28 2A B4 41 6C 6C 6F 63 61 74 65 20 00 6D 65 .(*.Allocate .me
015200: 6D 6F 72 79 00 87 20 66 72 6F 6D 20 00 68 65 61 mory.. from .hea
015210: 70 00 86 2A 29 BF BF AF 20 52 45 4C 45 41 53 45 p..*)... RELEASE
015220: 28 00 4E 65 77 54 6F 70 00 85 3A AD 29 3B BF BF (.NewTop..:.);..
015230: 28 2A B4 46 72 65 65 20 75 70 20 61 6C 6C 20 00 (*.Free up all .
015240: 6F 66 00 84 20 87 20 61 62 6F 76 65 20 85 20 28 of.. . above . (
015250: 69 6E 63 6C 75 73 69 76 65 29 20 2A 29 BF BF AF inclusive) *)...
015260: 20 44 45 41 4C 4C 4F 43 41 54 45 28 8E 20 8A 3A DEALLOCATE(. .:
015270: AB 3B 88 3A AD 29 3B BF BF 28 2A B4 44 65 61 6C .;.:.);..(*.Deal
015280: 6C 6F 63 61 74 65 20 73 6F 6D 65 20 87 2A 29 BF locate some .*).
015290: AF 20 46 72 65 65 53 70 61 63 65 28 29 3A AD 3B . FreeSpace():.;
0152A0: BF 28 2A B4 41 6D 6F 75 6E 74 20 84 20 73 70 61 .(*.Amount . spa
0152B0: 63 65 20 6C 65 66 74 20 62 65 74 77 65 65 6E 20 ce left between
0152C0: 74 6F 70 20 84 20 86 20 00 61 6E 64 00 83 20 73 top . . .and.. s
0152D0: 74 61 63 6B 20 00 69 6E 00 82 20 62 79 74 65 73 tack .in.. bytes
0152E0: 2A 29 BF 8E B4 98 3A 50 52 4F 43 3B BF 28 2A B4 *)....:PROC;.(*.
0152F0: 50 72 6F 63 65 64 75 72 65 20 96 20 63 61 6C 6C Procedure . call
015300: 20 C1 70 61 72 74 69 63 75 6C 61 72 20 88 20 28 .particular . (
015310: 65 67 20 31 8B 20 CD 20 65 35 68 29 BF C1 28 92 eg 1. . e5h)..(.
015320: 20 D3 20 6B 6E 6F 77 73 20 87 20 31 8B 29 20 C0 . knows . 1.) .
015330: 2A 29 BF BF BF AF 20 D3 28 73 3A D5 29 3A AC 3B *).... .(s:.):.;
015340: BF C0 28 2A B4 52 65 74 75 72 6E 73 20 74 72 75 ..(*.Returns tru
015350: 65 20 D0 20 61 74 20 D9 20 D8 20 98 20 28 D7 29 e . at . . . (.)
015360: C1 45 6E 64 20 D8 20 D7 20 CF 20 65 69 74 68 65 .End . . . eithe
015370: 72 20 DA 20 D9 20 D8 20 D7 C1 CD 20 64 65 74 65 r . . . ... dete
015380: 63 74 69 6F 6E 20 D8 20 CC 20 CB 20 31 8B 2A 29 ction . . . 1.*)
015390: BF BF AF 20 A0 28 73 3A D5 29 3B BF C0 28 2A B4 ... .(s:.);..(*.
0153A0: 53 65 74 73 20 98 20 62 61 63 6B 20 D4 20 62 65 Sets . back . be
0153B0: 67 69 6E 6E 69 6E 67 C1 4F 6E 20 6C 69 73 74 20 ginning.On list
0153C0: 00 64 65 76 69 63 65 00 85 2C 20 64 6F 65 73 20 .device.., does
0153D0: 61 20 70 61 67 65 20 74 68 72 6F 77 2A 29 BF BF a page throw*)..
0153E0: AF 20 53 65 74 50 6F 73 28 73 3A D5 3B 00 68 69 . SetPos(s:.;.hi
0153F0: 67 68 00 84 2C 00 6C 6F 77 00 83 3A AD 29 3B BF gh..,.low..:.);.
015400: AF 20 47 65 74 50 6F 73 28 73 3A D5 3B 8E 20 84 . GetPos(s:.;. .
015410: 2C 83 3A AD 29 3B BF C0 28 2A B4 47 65 74 2F A6 ,.:.);..(*.Get/.
015420: 20 63 75 72 72 65 6E 74 20 CB 20 70 6F 73 69 74 current . posit
015430: 69 6F 6E 20 E1 20 D7 C1 4F 6E 6C 79 20 77 6F 72 ion . ..Only wor
015440: 6B 73 20 D6 20 64 69 73 63 20 C8 21 2A 29 BF BF ks . disc .!*)..
015450: AF 20 42 75 66 66 65 72 41 68 65 61 64 28 73 3A . BufferAhead(s:
015460: D5 3B 66 6F 72 63 65 3A AC 29 3B BF C0 28 2A B4 .;force:.);..(*.
015470: 49 66 20 63 6F 6E 73 6F 6C 65 20 B6 2C 20 72 65 If console ., re
015480: 61 64 20 61 68 65 61 64 C1 55 73 65 20 77 68 65 ad ahead.Use whe
015490: 6E 20 72 65 61 64 69 6E 67 20 CB 20 86 20 CB 20 n reading . . .
0154A0: 92 20 73 74 69 6C 6C C1 77 61 6E 74 20 43 50 2F . still.want CP/
0154B0: 4D 20 65 64 69 74 74 69 6E 67 BF C1 49 67 6E 6F M editting..Igno
0154C0: 72 65 64 20 DB 20 B7 20 64 65 76 69 63 65 73 20 red . . devices
0154D0: D4 20 70 72 6F 64 75 63 65 20 85 20 69 6E 64 65 . produce . inde
0154E0: 70 65 6E 64 65 6E 63 65 2A 29 BF AF 20 52 65 61 pendence*).. Rea
0154F0: 64 52 65 63 28 73 3A D5 3B 00 52 65 63 00 82 3A dRec(s:.;.Rec..:
015500: 20 00 77 68 65 6E 00 81 20 87 20 00 66 75 6C 6C .when.. . .full
015510: 00 80 BF C0 44 65 66 61 75 6C 74 73 20 96 20 61 ....Defaults . a
015520: 20 97 20 82 20 53 74 6F 72 61 67 65 20 77 68 69 . . Storage whi
015530: 63 68 20 70 72 69 6E 74 73 20 87 20 80 20 6D 65 ch prints . . me
015540: 73 73 61 67 65 C0 83 20 8B 20 73 74 6F 70 73 BF ssage.. . stops.
015550: C0 53 74 6F 72 65 20 90 20 61 64 64 72 65 73 73 .Store . address
015560: 20 84 20 61 20 97 20 79 6F 75 20 77 61 6E 74 20 . a . you want
015570: 96 20 65 78 65 63 75 74 65 20 81 20 87 C0 69 73 . execute . ..is
015580: 20 80 20 82 20 74 68 69 73 20 97 20 76 61 72 69 . . this . vari
015590: 61 62 6C 65 2A 29 BF 89 20 9A 2E BF 00 00 1A 1A able*).. .......
0155A0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0155B0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0155C0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0155D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0155E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0155F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
015600: B2 20 A4 20 00 53 74 72 65 61 6D 73 00 E3 3B BF . . .Streams..;.
015610: BF 28 2A B5 E3 20 6D 6F 64 75 6C 65 20 00 61 73 .(*.. module .as
015620: 00 E2 20 00 69 6E 00 E1 20 00 57 69 72 74 68 00 .. .in.. .Wirth.
015630: E0 27 73 20 62 6F 6F 6B 2E C1 B1 20 28 43 29 20 .'s book... (C)
015640: 44 61 76 65 20 4D 6F 6F 72 65 2C 20 46 54 4C 20 Dave Moore, FTL
015650: 4D 6F 64 75 6C 61 2D 32 20 31 39 38 36 BF C1 00 Modula-2 1986...
015660: 4D 6F 64 69 66 69 65 64 00 DF 20 31 31 20 46 65 Modified.. 11 Fe
015670: 62 20 38 36 20 BF C1 41 20 00 6E 65 77 00 DE 20 b 86 ..A .new..
015680: 00 66 75 6E 63 74 69 6F 6E 00 DD 20 2C 20 00 50 .function.. , .P
015690: 68 79 73 69 63 61 6C 45 4F 53 00 DC 2C 20 63 68 hysicalEOS.., ch
0156A0: 65 63 6B 73 20 00 66 6F 72 00 DB 20 00 70 68 79 ecks .for.. .phy
0156B0: 73 69 63 61 6C 00 DA 20 00 65 6E 64 00 D9 20 00 sical.. .end.. .
0156C0: 6F 66 00 D8 20 C1 00 66 69 6C 65 00 D7 20 00 6F of.. ..file.. .o
0156D0: 6E 00 D6 20 61 20 00 53 54 52 45 41 4D 00 D5 2E n.. a .STREAM...
0156E0: 20 54 68 69 73 20 63 6F 6E 74 72 61 73 74 73 20 This contrasts
0156F0: 00 74 6F 00 D4 20 00 45 4F 53 00 D3 20 00 77 68 .to.. .EOS.. .wh
015700: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
015710: 12 00 00 00 02 09 4E E5 12 00 41 02 00 00 00 02 ......N...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: AB 3B 00 42 79 74 65 73 00 81 3A AD 3B 8E 20 00 .;.Bytes..:.;. .
015810: 72 65 70 6C 79 00 80 3A AA 29 3B BF AF 20 57 72 reply..:.);.. Wr
015820: 69 74 65 52 65 63 28 73 3A D5 3B 82 3A AB 3B 81 iteRec(s:.;.:.;.
015830: 3A AD 3B 8E 20 80 3A AA 29 3B BF AF 20 DC 28 73 :.;. .:.);.. .(s
015840: 3A D5 29 3A AC 3B BF BF 28 2A B4 D1 20 9A 20 D0 :.):.;..(*.. . .
015850: 20 DA 20 D9 20 D8 20 D7 20 CE 20 2A 29 BF AF 20 . . . . . *)..
015860: A8 28 43 6F 75 6E 74 3A AD 29 3B BF AF 20 A5 28 .(Count:.);.. .(
015870: 73 3A D5 3B 44 69 72 3A 9C 29 3B BF 89 20 E3 2E s:.;Dir:.);.. ..
015880: BF 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 . ..............
015890: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0158A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0158B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0158C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0158D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0158E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0158F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
015900: B2 20 A4 20 00 53 74 72 69 6E 67 73 00 B8 3B BF . . .Strings..;.
015910: BF 28 2A B4 00 53 74 72 69 6E 67 00 B7 20 6D 61 .(*..String.. ma
015920: 74 63 68 20 72 6F 75 74 69 6E 65 73 BF C0 B8 20 tch routines...
015930: 61 72 65 20 00 74 65 72 6D 69 6E 61 74 65 64 00 are .terminated.
015940: B6 20 00 62 79 00 B5 20 00 7A 65 72 6F 00 B3 20 . .by.. .zero..
015950: 62 79 74 65 73 20 00 6F 72 00 B1 20 B5 20 00 6C bytes .or.. . .l
015960: 65 6E 67 74 68 00 B0 BF BF 2A 29 BF BF 96 B4 B7 ength....*).....
015970: 3D 9B 5B 30 2E 2E 38 30 5D 20 84 20 99 3B B4 28 =.[0..80] . .;.(
015980: 2A 68 65 72 65 20 00 66 6F 72 00 AE 20 63 6F 6D *here .for.. com
015990: 70 61 74 69 62 69 6C 74 79 20 6F 6E 6C 79 2A 29 patibilty only*)
0159A0: BF BF AF 20 50 6F 73 28 4D 61 74 63 68 2C 00 53 ... Pos(Match,.S
0159B0: 65 61 72 63 68 00 AB 3A 9B 20 84 20 99 3B 00 53 earch..:. . .;.S
0159C0: 74 61 72 74 00 AA 3A AD 29 3A AD 3B BF BF 28 2A tart..:.):.;..(*
0159D0: B4 00 52 65 74 75 72 6E 73 00 A9 20 00 6E 75 6D ..Returns.. .num
0159E0: 62 65 72 00 A8 20 00 6F 66 00 A7 20 00 63 68 61 ber.. .of.. .cha
0159F0: 72 61 63 74 65 72 73 00 A6 20 70 72 65 63 65 64 racters.. preced
015A00: 64 29 2A 29 BF AF 20 00 52 65 61 64 00 92 28 8E d)*).. .Read..(.
015A10: 20 62 3A 99 29 3B BF BF 28 2A B4 92 20 A1 20 00 b:.);..(*.. . .
015A20: 63 68 61 72 61 63 74 65 72 00 91 2E 20 00 49 66 character... .If
015A30: 00 90 20 A8 20 B9 20 00 62 75 66 66 65 72 00 8F .. . . .buffer..
015A40: 2C 20 BC 20 91 20 BB 20 72 65 74 75 72 6E 65 64 , . . . returned
015A50: C0 4F 74 68 65 72 77 69 73 65 20 61 20 77 61 69 .Otherwise a wai
015A60: 74 20 95 20 91 20 62 64 6F 73 20 00 63 61 6C 6C t . . bdos .call
015A70: 00 8D 20 BB 20 69 73 73 75 65 64 2A 29 BF BF AF .. . issued*)...
015A80: 20 52 65 61 64 42 75 66 66 65 72 28 00 66 6F 72 ReadBuffer(.for
015A90: 63 65 00 8C 3A AC 29 3B B5 BF BF 28 2A B4 42 75 ce..:.);...(*.Bu
015AA0: 66 66 65 72 20 61 68 65 61 64 2E C0 52 65 61 64 ffer ahead..Read
015AB0: 73 20 61 6E 6F 74 68 65 72 20 8F 20 00 69 66 00 s another . .if.
015AC0: 8B 20 8F 20 BB 20 65 6D 70 74 79 20 00 6F 72 00 . . . empty .or.
015AD0: 8A 20 8C 20 BB 20 74 72 75 65 C0 44 75 72 69 6E . . . true.Durin
015AE0: 67 20 BA 20 94 2C 20 61 6C 6C 20 00 43 50 00 88 g . ., all .CP..
015AF0: 2F 4D 20 63 6F 6E 74 72 6F 6C 20 63 6F 64 65 73 /M control codes
015B00: 20 9C 20 00 62 65 00 87 20 9F 2A 29 BF BF AF 20 . .be.. .*)...
015B10: 00 42 75 73 79 52 65 61 64 00 86 28 8E 20 62 3A .BusyRead..(. b:
015B20: 99 29 3B B4 BF BF 28 2A B4 92 20 61 20 63 6F 6E .);...(*.. a con
015B30: 73 6F 6C 65 20 91 20 9A 20 77 61 69 74 69 6E 67 sole . . waiting
015B40: C0 54 68 69 73 20 9D 20 69 67 6E 6F 72 65 73 20 .This . ignores
015B50: BA 20 63 6F 6E 74 65 6E 74 73 20 9E 20 BA 20 8F . contents . . .
015B60: C0 72 65 74 75 72 6E 73 20 6E 75 6C 6C 20 91 20 .returns null .
015B70: 8B 20 98 20 68 61 73 20 62 65 65 6E 20 94 2A 29 . . has been .*)
015B80: BF BF AF 20 52 65 61 64 41 67 61 69 6E 3B B4 BF ... ReadAgain;..
015B90: BF 28 2A B4 63 61 75 73 65 73 20 00 6C 61 73 74 .(*.causes .last
015BA0: 00 85 20 91 20 B1 20 87 20 62 61 63 6B 65 64 20 .. . . . backed
015BB0: 00 75 70 00 83 20 6F 76 65 72 C0 55 73 65 66 75 .up.. over.Usefu
015BC0: 6C 20 95 20 6C 65 78 69 63 61 6C 20 61 6E 61 6C l . lexical anal
015BD0: 79 73 65 72 73 2E 20 59 6F 75 20 9C 20 6F 6E 6C ysers. You . onl
015BE0: 79 20 62 61 63 6B C0 83 20 B1 20 BA 20 62 65 67 y back.. . . beg
015BF0: 69 6E 6E 69 6E 67 20 9E 20 61 20 00 6C 69 6E 65 inning . a .line
015C00: 69 6E 67 20 00 66 69 72 73 74 00 A5 C0 6F 63 63 ing .first...occ
015C10: 75 72 72 65 6E 63 65 20 A7 20 4D 41 54 43 48 20 urrence . MATCH
015C20: BF C0 AA 20 67 69 76 65 73 20 A8 20 A7 20 A6 20 ... gives . . .
015C30: 00 74 6F 00 A3 20 73 6B 69 70 20 00 61 74 00 A2 .to.£ skip .at..
015C40: 20 62 65 67 69 6E 6E 69 6E 67 20 A7 20 AB BF C0 beginning . ...
015C50: A9 20 98 28 AB 29 2B 31 20 00 69 66 00 A1 20 00 . .(.)+1 .if.. .
015C60: 6E 6F 74 00 A0 20 00 66 6F 75 6E 64 00 9F 2A 29 not.. .found..*)
015C70: BF BF AF 20 00 49 6E 73 65 72 74 00 9E 28 00 73 ... .Insert..(.s
015C80: 75 62 73 74 72 00 9D 3A 9B 20 84 20 99 3B C1 20 ubstr..:. . .;.
015C90: 8E 20 00 64 65 73 74 00 9C 3A 9B 20 84 20 99 3B . .dest..:. . .;
015CA0: C1 20 00 69 6E 78 00 9A 3A AD 29 3B BF 28 2A B4 . .inx..:.);.(*.
015CB0: 9E 20 00 74 68 65 00 97 20 73 75 62 73 74 72 69 . .the.. substri
015CC0: 6E 67 20 9D 20 00 69 6E 74 6F 00 95 20 9C 20 A2 ng . .into.. . .
015CD0: 20 97 20 70 6F 73 69 74 69 6F 6E C0 67 69 76 65 . position.give
015CE0: 6E 20 B5 20 9A 2A 29 BF BF AF 20 43 6F 6E 63 61 n . .*)... Conca
015CF0: 74 28 73 31 2C 73 32 3A 9B 20 84 20 99 3B 8E 20 t(s1,s2:. . .;.
015D00: 73 33 3A 9B 20 84 20 99 29 3B BF BF 28 2A B4 43 s3:. . .);..(*.C
015D10: 6F 6E 63 61 74 65 6E 61 74 65 20 74 77 6F 20 73 oncatenate two s
015D20: 74 72 69 6E 67 73 20 A3 20 63 72 65 61 74 65 20 trings £ create
015D30: 61 20 74 68 69 72 64 BF C0 00 72 65 73 75 6C 74 a third...result
015D40: 00 94 20 00 73 74 72 69 6E 67 00 93 20 00 69 73 .. .string.. .is
015D50: 00 92 20 B3 20 00 62 79 74 65 00 91 20 B6 BF C0 .. . .byte.. ...
015D60: 94 20 92 20 74 72 75 6E 63 61 74 65 64 20 A1 20 . . truncated .
015D70: 77 6F 6E 27 74 20 66 69 74 2A 29 BF BF AF 20 4C won't fit*)... L
015D80: 65 6E 67 74 68 28 73 31 3A 9B 20 84 20 99 29 3A ength(s1:. . .):
015D90: AD 3B BF BF 28 2A B4 52 65 74 75 72 6E 20 B0 20 .;..(*.Return .
015DA0: A7 20 93 20 00 69 6E 00 90 20 A6 2A 29 BF BF BF . . .in.. .*)...
015DB0: AF 20 00 41 73 73 69 67 6E 00 8F 28 73 31 3A 9B . .Assign..(s1:.
015DC0: 20 84 20 99 3B 8E 20 73 32 3A 9B 20 84 20 99 29 . .;. s2:. . .)
015DD0: 3B BF BF 28 2A B4 8F 20 73 31 20 A3 20 73 32 2E ;..(*.. s1 £ s2.
015DE0: 20 41 64 64 20 61 20 6E 75 6C 6C 20 74 65 72 6D Add a null term
015DF0: 69 6E 61 74 6F 72 20 A1 20 72 65 71 75 69 72 65 inator . require
015E00: 00 82 BF C0 4F 6E 6C 79 20 77 6F 72 6B 73 20 6F ....Only works o
015E10: 6E 20 00 62 75 66 66 65 72 65 64 00 81 20 69 6E n .buffered.. in
015E20: 70 75 74 BF 2A 29 BF AF 20 00 57 72 69 74 65 00 put.*).. .Write.
015E30: 80 28 42 3A 99 29 3B BF AF 20 A9 3B B4 28 2A 80 .(B:.);.. .;.(*.
015E40: 20 61 20 63 61 72 72 69 61 67 65 20 72 65 74 75 a carriage retu
015E50: 72 6E 20 82 20 66 65 65 64 20 70 61 69 72 2A 29 rn . feed pair*)
015E60: BF AF 20 B3 28 73 3A 9B 20 84 20 99 29 3B BF AF .. .(s:. . .);..
015E70: 20 45 72 72 6F 72 45 78 69 74 28 73 3A 9B 20 84 ErrorExit(s:. .
015E80: 20 99 29 3B BF AF 20 52 65 61 64 53 74 72 69 6E .);.. ReadStrin
015E90: 67 28 8E 20 73 3A 9B 20 84 20 99 29 3B BF AF 20 g(. s:. . .);..
015EA0: 43 6C 65 61 72 43 68 61 72 42 75 66 66 65 72 3B ClearCharBuffer;
015EB0: BF BF 28 2A B4 4F 76 65 72 63 6F 6D 65 20 88 2F ..(*.Overcome ./
015EC0: 4D 20 62 75 67 C0 90 20 B7 20 C2 20 97 20 86 2C M bug.. . . . .,
015ED0: 20 BA 20 85 20 91 20 B7 20 94 20 B6 20 87 20 70 . . . . . . . p
015EE0: 72 65 73 65 6E 74 65 64 B4 C0 61 20 73 65 63 6F resented..a seco
015EF0: 6E 64 20 74 69 6D 65 20 8B 20 B7 20 74 68 65 6E nd time . . then
015F00: 20 B0 20 61 6E 20 6F 72 64 69 6E 61 72 79 20 94 . an ordinary .
015F10: 20 8A 20 61 20 81 20 94 C0 54 6F 20 6F 76 65 72 . a . ..To over
015F20: 63 6F 6D 65 20 AB 2C 20 8D 20 AB 20 9D 20 6A 75 come ., . . . ju
015F30: 73 74 20 62 65 66 6F 72 65 20 65 78 69 74 74 69 st before exitti
015F40: 6E 67 20 8A C0 77 68 65 6E 20 B7 20 73 77 69 74 ng ..when . swit
015F50: 63 68 20 BE 20 6F 6E 65 20 B1 20 BA 20 6F 74 68 ch . one . . oth
015F60: 65 72 2A 29 BF 89 20 AE 2E BF 00 00 6C 20 91 20 er*).. .....l .
015F70: 8B 20 98 20 68 61 73 20 62 65 65 6E 20 94 2A 29 . . has been .*)
015F80: B2 20 A4 20 00 50 6F 72 74 49 4F 00 87 3B BF BF . . .PortIO..;..
015F90: 28 2A B4 53 75 70 70 6F 72 74 20 50 4F 52 54 20 (*.Support PORT
015FA0: 49 4F 20 28 00 49 6E 00 86 20 00 61 6E 64 00 85 IO (.In.. .and..
015FB0: 20 00 4F 75 74 00 84 29 20 85 20 72 65 61 6C 74 .Out..) . realt
015FC0: 65 64 20 73 74 75 66 66 20 BF C0 B1 20 28 43 29 ed stuff ... (C)
015FD0: 20 44 61 76 65 20 4D 6F 6F 72 65 20 53 65 70 74 Dave Moore Sept
015FE0: 20 31 39 38 36 20 2A 29 BF 93 B4 53 59 53 54 45 1986 *)...SYSTE
015FF0: 4D 20 A3 20 00 57 4F 52 44 00 82 2C AB 3B BF AF M £ .WORD..,.;..
016000: 64 2A 29 BF BF BF AF 20 53 74 6F 53 28 53 6F 75 d*).... StoS(Sou
016010: 72 63 65 3A 9B 20 84 20 99 3B 8E 20 00 44 65 73 rce:. . .;. .Des
016020: 74 00 8D 3A 9B 20 84 20 99 3B 42 6C 61 6E 6B 46 t..:. . .;BlankF
016030: 69 6C 6C 3A AC 29 3A AD 3B BF BF 28 2A B4 4E 65 ill:.):.;..(*.Ne
016040: 77 20 00 66 75 6E 63 74 69 6F 6E 00 8C 20 A2 20 w .function.. .
016050: 56 65 72 73 69 6F 6E 20 31 2E 32 BF C0 43 6F 6E Version 1.2..Con
016060: 76 65 72 74 73 20 97 20 93 20 90 20 73 6F 75 72 verts . . . sour
016070: 63 65 20 A3 20 61 20 93 20 90 20 8D C0 49 66 20 ce £ a . . ..If
016080: 42 6C 61 6E 6B 66 69 6C 6C 20 92 20 74 72 75 65 Blankfill . true
016090: 2C 20 64 65 73 74 69 6E 61 74 69 6F 6E 20 92 20 , destination .
0160A0: 00 62 6C 61 6E 6B 00 8B 20 66 69 6C 6C 65 64 2C .blank.. filled,
0160B0: 20 C0 6F 74 68 65 72 77 69 73 65 2C 20 69 74 20 .otherwise, it
0160C0: 92 20 B6 20 77 69 74 68 20 61 20 B3 20 91 20 28 . . with a . . (
0160D0: A1 20 00 74 68 65 72 65 00 8A 20 92 20 00 72 6F . .there.. . .ro
0160E0: 6F 6D 00 88 29 BF C0 43 6F 70 79 69 6E 67 20 73 om..)..Copying s
0160F0: 74 6F 70 73 20 A1 20 97 20 65 6E 64 20 A7 20 65 tops . . end . e
016100: 69 74 68 65 72 20 61 72 72 61 79 20 92 20 65 6E ither array . en
016110: 63 6F 75 6E 74 65 72 65 64 2C 20 B1 20 61 20 B3 countered, . a .
016120: C0 91 20 92 20 9F 20 90 20 97 20 69 6E 70 75 74 .. . . . . input
016130: BF C0 54 68 65 20 8C 20 72 65 74 75 72 6E 73 20 ..The . returns
016140: 97 20 A8 20 A7 20 A6 20 61 63 74 75 61 6C 6C 79 . . . . actually
016150: 20 63 6F 70 69 65 64 2C 20 A0 20 69 6E 63 6C 75 copied, . inclu
016160: 64 69 6E 67 C0 97 20 B3 20 91 20 B1 20 97 20 8B ding.. . . . . .
016170: 20 66 69 6C 6C 20 28 A1 20 61 6E 79 29 2E 2A 29 fill (. any).*)
016180: BF AF 20 00 44 65 6C 65 74 65 00 87 28 8E 20 00 .. .Delete..(. .
016190: 73 74 72 00 86 3A 9B 20 84 20 99 3B 9A 2C 00 6C str..:. . .;.,.l
0161A0: 65 6E 00 85 3A AD 29 3B BF BF 28 2A B4 87 20 A6 en..:.);..(*.. .
0161B0: 20 00 66 72 6F 6D 00 83 20 86 20 00 73 74 61 72 .from.. . .star
0161C0: 74 69 6E 67 00 82 20 A2 20 00 63 68 61 72 61 63 ting.. . .charac
0161D0: 74 65 72 00 81 20 9A C0 87 20 85 20 A6 20 2A 29 ter.. ... . . *)
0161E0: BF BF BF AF 20 00 43 6F 70 79 00 80 28 86 3A 9B .... .Copy..(.:.
0161F0: 20 84 20 99 3B 9A 2C 85 3A AD 3B 8E 20 94 3A 9B . .;.,.:.;. .:.
016200: BA 86 28 00 50 6F 72 74 41 64 64 72 65 73 73 00 ..(.PortAddress.
016210: 81 3A AD 29 3A 82 3B BF AF 20 84 28 81 3A AD 3B .:.):.;.. .(.:.;
016220: 56 61 6C 3A 82 29 3B BF BF 28 2A B4 64 6F 20 00 Val:.);..(*.do .
016230: 61 6E 00 80 20 83 20 6F 72 20 80 20 4F 55 54 2E an.. . or . OUT.
016240: 20 86 20 72 65 74 75 72 6E 73 20 49 4E 65 64 20 . returns INed
016250: 76 61 6C 75 65 20 61 73 20 66 75 6E 64 74 69 6F value as fundtio
016260: 6E 20 72 65 73 75 6C 74 20 2A 29 BF BF AF 20 44 n result *)... D
016270: 69 73 61 62 6C 65 49 6E 74 65 72 72 75 70 74 73 isableInterrupts
016280: 3B BF AF 20 45 6E 61 62 6C 65 49 6E 74 65 72 72 ;.. EnableInterr
016290: 75 70 74 73 3B BF BF AF 20 53 65 74 4D 6F 64 65 upts;... SetMode
0162A0: 32 42 61 73 65 28 61 3A AB 29 3B BF BF 28 2A B4 2Base(a:.);..(*.
0162B0: 53 65 74 20 62 61 73 65 20 61 64 64 72 65 73 73 Set base address
0162C0: 20 66 6F 72 20 6D 6F 64 65 20 32 20 69 6E 74 65 for mode 2 inte
0162D0: 72 72 75 70 74 73 20 BF C0 4D 75 73 74 20 62 65 rrupts ..Must be
0162E0: 20 6F 6E 20 61 20 32 35 36 20 62 79 74 65 20 62 on a 256 byte b
0162F0: 6F 75 6E 64 61 72 79 20 28 69 65 2C 20 6C 6F 77 oundary (ie, low
016300: 20 38 20 62 69 74 73 20 7A 65 72 6F 29 2A 29 BF 8 bits zero)*).
016310: 89 20 87 2E BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A . ..............
016320: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
016330: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
016340: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
016350: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
016360: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
016370: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
016380: B2 20 A4 20 00 43 68 61 69 6E 00 87 3B BF BF 28 . . .Chain..;..(
016390: 2A B4 87 20 00 74 6F 00 86 20 61 6E 6F 74 68 65 *.. .to.. anothe
0163A0: 72 20 00 70 72 6F 67 72 61 6D 00 85 BF C0 4C 6F r .program....Lo
0163B0: 77 20 6D 65 6D 6F 72 79 20 6D 75 73 74 20 00 62 w memory must .b
0163C0: 65 00 84 20 73 65 74 20 75 70 20 72 65 61 64 79 e.. set up ready
0163D0: 20 00 66 6F 72 00 83 20 00 74 68 65 00 82 20 00 .for.. .the.. .
0163E0: 63 61 6C 6C 65 64 00 81 20 85 BF C0 28 61 73 20 called.. ...(as
0163F0: 69 66 20 81 20 66 72 6F 6D 20 43 43 50 29 BF C0 if . from CCP)..
016400: 20 84 20 99 29 3B BF 28 2A C0 80 20 A6 20 83 20 . .);.(*.. . .
016410: 86 20 82 20 A2 20 9A 20 AE 20 85 20 A6 20 95 C0 . . . . . . . ..
016420: 94 2E 20 52 65 73 75 6C 74 20 92 20 B3 20 91 20 .. Result . . .
016430: B6 2C 20 A1 20 8A 20 92 20 88 20 2A 29 BF BF 28 ., . . . . *)..(
016440: 2A B4 4E 6F 74 65 20 57 65 6C 6C C0 2A 2A 2A 2A *.Note Well.****
016450: 2A 2A 2A 2A 2A BF C0 49 6E 78 20 73 74 61 72 74 *****..Inx start
016460: 73 20 A2 20 B3 2C 20 A0 20 31 20 2D 20 97 20 A5 s . ., . 1 - . .
016470: 20 81 20 90 20 61 20 93 C0 92 20 81 20 B3 2E 20 . . a ... . ..
016480: 2A 29 BF 89 20 B8 2E BF 00 00 1A 1A 1A 1A 1A 1A *).. ...........
016490: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0164A0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0164B0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0164C0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0164D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0164E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
0164F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
016500: B2 20 A4 20 AE 3B BF 93 20 53 59 53 54 45 4D 20 . . .;.. SYSTEM
016510: A3 20 42 59 54 45 3B BF 28 2A B4 AE 20 49 4F 20 £ BYTE;.(*.. IO
016520: 72 6F 75 74 69 6E 65 73 BF C0 54 68 65 73 65 20 routines..These
016530: 00 61 72 65 00 C2 20 73 65 70 65 72 61 74 65 64 .are.. seperated
016540: 20 00 66 72 6F 6D 00 BE 20 53 74 72 65 61 6D 73 .from.. Streams
016550: 20 00 62 65 63 61 75 73 65 00 BD 20 00 74 68 61 .because.. .tha
016560: 74 00 BC 20 00 69 73 00 BB 20 00 74 68 65 00 BA t.. .is.. .the..
016570: C0 77 61 79 20 69 74 20 BB 20 64 6F 6E 65 20 00 .way it . done .
016580: 69 6E 00 B9 20 57 69 72 74 68 2C 20 00 61 6E 64 in.. Wirth, .and
016590: 00 B8 20 BD 20 00 79 6F 75 00 B7 20 00 6D 61 79 .. . .you.. .may
0165A0: 00 B6 20 77 61 6E 74 20 00 74 6F 00 B1 C0 00 75 .. want .to....u
0165B0: 73 65 00 B0 20 00 74 68 69 73 00 AB 20 00 6D 6F se.. .this.. .mo
0165C0: 64 75 6C 65 00 AA 20 64 69 72 65 63 74 6C 79 20 dule.. directly
0165D0: B9 20 00 61 6E 79 00 A8 20 63 61 73 65 BF C0 53 . .any.. case..S
0165E0: 65 65 20 61 6C 73 6F 2C 20 BA 20 AA 20 00 53 63 ee also, . . .Sc
0165F0: 72 65 65 6E 49 4F 00 A7 20 77 68 69 63 68 20 64 reenIO.. which d
016600: 2A 29 BF BF 93 B4 43 50 4D 20 A3 20 00 66 63 62 *)....CPM £ .fcb
016610: 00 80 3B BF AF 20 4C 6F 61 64 41 6E 64 45 78 65 ..;.. LoadAndExe
016620: 63 75 74 65 28 8E 20 66 3A 80 29 3B BF BF 28 2A cute(. f:.);..(*
016630: B4 54 68 65 20 70 61 72 61 6D 65 74 65 72 20 69 .The parameter i
016640: 73 20 61 6E 20 80 20 83 20 82 20 66 69 6C 65 20 s an . . . file
016650: 86 20 84 20 6C 6F 61 64 65 64 2A 29 BF BF 89 20 . . loaded*)...
016660: 87 2E BF C0 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
016670: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
016680: 44 45 46 49 4E 49 54 49 4F 4E 20 4D 4F 44 55 4C DEFINITION MODUL
016690: 45 20 53 63 72 65 65 6E 49 4F 3B 0D 0A 0D 0A 28 E ScreenIO;....(
0166A0: 2A 09 53 63 72 65 65 6E 20 68 61 6E 64 6C 69 6E *.Screen handlin
0166B0: 67 20 72 6F 75 74 69 6E 65 73 20 66 6F 72 20 63 g routines for c
0166C0: 75 72 73 6F 72 20 70 6F 73 69 74 69 6F 6E 2C 20 ursor position,
0166D0: 61 74 74 72 69 62 75 74 65 20 65 74 63 0D 0A 0D attribute etc...
0166E0: 0A 09 53 70 65 63 69 66 69 63 20 74 6F 20 74 68 ..Specific to th
0166F0: 69 73 20 63 6F 6D 70 69 6C 65 72 2A 29 0D 0A 0D is compiler*)...
016700: 0A 46 52 4F 4D 09 53 59 53 54 45 4D 20 49 4D 50 .FROM.SYSTEM IMP
016710: 4F 52 54 20 42 59 54 45 3B 0D 0A 46 52 4F 4D 09 ORT BYTE;..FROM.
016720: 46 69 6C 65 73 20 49 4D 50 4F 52 54 20 46 69 6C Files IMPORT Fil
016730: 65 4E 61 6D 65 3B 0D 0A 54 59 50 45 09 45 64 69 eName;..TYPE.Edi
016740: 74 73 3D 28 44 69 6D 2C 42 72 69 67 68 74 2C 4E ts=(Dim,Bright,N
016750: 6F 72 6D 61 6C 2C 49 6E 76 65 72 73 65 2C 42 6C ormal,Inverse,Bl
016760: 69 6E 6B 2C 53 74 61 72 74 47 72 61 70 68 2C 45 ink,StartGraph,E
016770: 6E 64 47 72 61 70 68 2C 0D 0A 09 09 44 65 6C 43 ndGraph,....DelC
016780: 68 61 72 2C 44 65 6C 4C 69 6E 65 2C 49 6E 73 43 har,DelLine,InsC
016790: 68 61 72 2C 49 6E 73 4C 69 6E 65 2C 44 65 6C 45 har,InsLine,DelE
0167A0: 6F 6C 2C 44 65 6C 45 6F 73 2C 43 6C 65 61 72 53 ol,DelEos,ClearS
0167B0: 63 72 65 65 6E 2C 0D 0A 09 09 48 6F 72 69 7A 6F creen,....Horizo
0167C0: 6E 74 61 6C 2C 56 65 72 74 69 63 61 6C 2C 43 6F ntal,Vertical,Co
0167D0: 72 6E 65 72 4C 4C 2C 43 6F 72 6E 65 72 55 4C 2C rnerLL,CornerUL,
0167E0: 43 6F 72 6E 65 72 55 52 2C 43 6F 72 6E 65 72 4C CornerUR,CornerL
0167F0: 52 2C 0D 0A 09 09 53 74 61 72 74 78 79 2C 4D 69 R,....Startxy,Mi
016800: 6F 65 73 20 74 68 69 6E 67 73 20 77 69 74 68 20 oes things with
016810: BA C0 00 63 75 72 73 6F 72 00 A6 20 65 74 63 BF ...cursor.. etc.
016820: BF 2A 29 BF 96 B4 00 43 68 61 72 57 72 69 74 00 .*)....CharWrit.
016830: A5 3D AF 28 99 29 3B BF C0 28 2A B4 00 54 68 65 .=.(.);..(*..The
016840: 00 A2 20 00 6E 65 78 74 00 A1 20 66 6F 75 72 20 .. .next.. four
016850: 00 76 61 72 69 61 62 6C 65 73 00 A0 20 C2 20 00 .variables.. . .
016860: 75 73 65 64 00 9F 20 62 79 20 A7 C1 B1 20 27 70 used.. by ... 'p
016870: 69 6E 63 68 27 20 BA 20 6C 6F 77 65 73 74 20 6C inch' . lowest l
016880: 65 76 65 6C 20 00 6F 66 00 9E 20 74 65 72 6D 69 evel .of.. termi
016890: 6E 61 6C 20 6F 75 74 70 75 74 C1 B8 20 B1 20 70 nal output.. . p
0168A0: 72 6F 76 69 64 65 20 61 20 A6 20 62 6C 69 6E 6B rovide a . blink
0168B0: 20 66 61 63 69 6C 69 74 79 BF C1 A2 20 A7 20 00 facility... . .
0168C0: 72 6F 75 74 69 6E 65 00 9D 20 73 65 74 73 20 BA routine.. sets .
0168D0: 20 A0 20 72 61 74 68 65 72 20 74 68 61 6E C1 AE . rather than..
0168E0: 20 69 6D 70 6F 72 74 69 6E 67 20 A7 20 73 6F 20 importing . so
0168F0: BC 20 AE 20 00 63 61 6E 00 9C 20 72 75 6E C1 00 . . .can.. run..
016900: 77 69 74 68 6F 75 74 00 9A 20 A7 20 62 65 69 6E without.. . bein
016910: 67 20 70 72 65 73 65 6E 74 2E 20 4F 66 20 63 6F g present. Of co
016920: 75 72 73 65 2C 20 74 68 65 72 65 C1 BB 20 00 6E urse, there.. .n
016930: 6F 74 68 69 6E 67 00 98 20 B1 20 73 74 6F 70 20 othing.. . stop
016940: B7 20 00 75 73 69 6E 67 00 97 20 74 68 65 73 65 . .using.. these
016950: 20 65 6E 74 72 79 20 70 6F 69 6E 74 73 20 00 66 entry points .f
016960: 6F 72 00 95 C1 79 6F 75 72 20 6F 77 6E 20 6D 6F or...your own mo
016970: 64 75 6C 65 73 2A 29 BF BF 8E B4 43 68 61 72 52 dules*)....CharR
016980: 6F 75 74 69 6E 65 3A A5 3B C0 43 68 61 72 45 6E outine:.;.CharEn
016990: 61 62 6C 65 64 3A AC 3B C0 42 6C 69 6E 6B 52 6F abled:.;.BlinkRo
0169A0: 75 74 69 6E 65 3A 50 52 4F 43 3B C0 42 6C 69 6E utine:PROC;.Blin
0169B0: 6B 45 6E 61 62 6C 65 64 3A AC 3B BF BF C0 53 74 kEnabled:.;...St
0169C0: 72 69 6E 67 4C 65 6E 3A AD 3B B4 28 2A 6C 65 6E ringLen:.;.(*len
0169D0: 67 74 68 20 9E 20 00 72 65 61 64 00 94 20 73 74 gth . .read.. st
0169E0: 72 69 6E 67 20 28 63 68 61 72 61 63 74 65 72 73 ring (characters
0169F0: 20 61 63 74 75 61 6C 6C 79 20 65 6E 74 65 72 65 actually entere
016A00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
016A10: 13 00 00 00 02 09 4E E5 13 00 41 02 00 00 00 02 ......N...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: 64 64 6C 65 58 59 2C 45 6E 64 58 59 2C 52 69 6E ddleXY,EndXY,Rin
016B10: 67 42 65 6C 6C 2C 4D 6F 76 65 4C 65 66 74 2C 4D gBell,MoveLeft,M
016B20: 6F 76 65 52 69 67 68 74 2C 0D 0A 09 09 4D 6F 76 oveRight,....Mov
016B30: 65 44 6F 77 6E 2C 4D 6F 76 65 55 70 29 3B 0D 0A eDown,MoveUp);..
016B40: 0D 0A 09 28 2A 09 54 68 65 20 65 64 69 74 74 69 ...(*.The editti
016B50: 6E 67 20 6D 6E 65 6D 6F 6E 69 63 73 20 68 61 76 ng mnemonics hav
016B60: 65 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 e the following
016B70: 6D 65 61 6E 69 6E 67 20 0D 0A 0D 0A 09 09 44 69 meaning ......Di
016B80: 6D 2C 42 72 69 67 68 74 2C 4E 6F 72 6D 61 6C 2C m,Bright,Normal,
016B90: 49 6E 76 65 72 73 65 2C 42 6C 69 6E 6B 0D 0A 0D Inverse,Blink...
016BA0: 0A 09 09 09 45 6E 74 65 72 20 74 68 65 20 67 69 ....Enter the gi
016BB0: 76 65 6E 20 6D 6F 64 65 2E 20 4D 6F 64 65 73 20 ven mode. Modes
016BC0: 73 68 6F 75 6C 64 20 6E 6F 74 20 62 65 20 63 6F should not be co
016BD0: 6D 62 69 6E 65 64 0D 0A 09 09 09 61 73 20 74 6F mbined.....as to
016BE0: 6F 20 6D 75 63 68 20 76 61 72 69 61 74 69 6F 6E o much variation
016BF0: 20 65 78 69 73 74 73 20 62 65 74 77 65 65 6E 20 exists between
016C00: 74 65 72 6D 69 6E 61 6C 73 20 69 6E 0D 0A 09 09 terminals in....
016C10: 09 74 68 69 73 20 61 72 65 61 0D 0A 0D 0A 09 09 .this area......
016C20: 53 74 61 72 74 47 72 61 70 68 2C 45 6E 64 47 72 StartGraph,EndGr
016C30: 61 70 68 0D 0A 0D 0A 09 09 09 45 6E 74 65 72 20 aph.......Enter
016C40: 61 6E 64 20 65 78 69 74 20 67 72 61 70 68 69 63 and exit graphic
016C50: 20 63 68 61 72 61 63 74 65 72 20 73 65 74 20 6D character set m
016C60: 6F 64 65 0D 0A 09 09 09 55 73 65 64 20 66 6F 72 ode.....Used for
016C70: 20 64 72 61 77 69 6E 67 20 62 61 72 73 20 61 72 drawing bars ar
016C80: 6F 75 6E 64 20 77 69 6E 64 6F 77 73 0D 0A 09 09 ound windows....
016C90: 09 49 66 20 79 6F 75 72 20 74 65 72 6D 69 6E 61 .If your termina
016CA0: 6C 20 63 61 6E 20 64 6F 20 74 68 69 73 20 77 69 l can do this wi
016CB0: 74 68 20 6F 72 64 69 6E 61 72 79 20 63 68 61 72 th ordinary char
016CC0: 61 63 74 65 72 73 2C 0D 0A 09 09 09 73 65 74 20 acters,.....set
016CD0: 74 68 65 73 65 20 73 65 71 75 65 6E 63 65 73 20 these sequences
016CE0: 65 6D 70 74 79 20 61 6E 64 20 70 75 74 20 74 68 empty and put th
016CF0: 65 20 72 65 71 75 69 72 65 64 20 0D 0A 09 09 09 e required .....
016D00: 4D 4F 44 55 4C 45 20 48 69 54 68 65 72 65 3B 0D MODULE HiThere;.
016D10: 0A 46 52 4F 4D 20 54 65 72 6D 69 6E 61 6C 20 49 .FROM Terminal I
016D20: 4D 50 4F 52 54 20 57 72 69 74 65 53 74 72 69 6E MPORT WriteStrin
016D30: 67 2C 57 72 69 74 65 4C 6E 3B 0D 0A 42 45 47 49 g,WriteLn;..BEGI
016D40: 4E 0D 0A 09 57 72 69 74 65 53 74 72 69 6E 67 28 N...WriteString(
016D50: 27 48 69 20 54 68 65 72 65 27 29 3B 57 72 69 74 'Hi There');Writ
016D60: 65 4C 6E 3B 0D 0A 09 45 4E 44 20 48 69 54 68 65 eLn;...END HiThe
016D70: 72 65 2E 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A re..............
016D80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016D90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016DA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016DB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016DC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016DD0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016DE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016DF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016E00: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016E10: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016E20: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016E30: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016E40: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016E50: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016E60: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016E70: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016E80: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016E90: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016EA0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016EB0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016EC0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016ED0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016EE0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016EF0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
016F00: 63 68 61 72 61 63 74 65 72 73 20 69 6E 20 74 68 characters in th
016F10: 65 20 73 65 71 75 65 6E 63 65 73 20 62 65 6C 6F e sequences belo
016F20: 77 0D 0A 0D 0A 09 09 44 65 6C 43 68 61 72 2C 44 w......DelChar,D
016F30: 65 6C 4C 69 6E 65 2C 49 6E 73 43 68 61 72 2C 49 elLine,InsChar,I
016F40: 6E 73 4C 69 6E 65 2C 44 65 6C 45 6F 6C 2C 44 65 nsLine,DelEol,De
016F50: 6C 45 6F 73 2C 43 6C 65 61 72 53 63 72 65 65 6E lEos,ClearScreen
016F60: 0D 0A 0D 0A 09 09 09 50 65 72 66 6F 72 6D 20 74 .......Perform t
016F70: 68 65 20 76 61 72 69 6F 75 73 20 65 64 69 74 74 he various editt
016F80: 69 6E 67 20 73 65 71 75 65 6E 63 65 73 0D 0A 09 ing sequences...
016F90: 09 09 44 65 6C 45 6F 6C 20 64 65 6C 65 74 65 73 ..DelEol deletes
016FA0: 20 66 72 6F 6D 20 75 6E 64 65 72 20 63 75 72 73 from under curs
016FB0: 6F 72 20 74 6F 20 65 6E 64 20 6F 66 20 6C 69 6E or to end of lin
016FC0: 65 0D 0A 09 09 09 44 65 6C 45 6F 73 20 64 65 6C e.....DelEos del
016FD0: 65 74 65 73 20 66 72 6F 6D 20 75 6E 64 65 72 20 etes from under
016FE0: 63 75 72 73 6F 72 20 74 6F 20 65 6E 64 20 6F 66 cursor to end of
016FF0: 20 73 63 72 65 65 6E 0D 0A 09 09 09 43 6C 65 61 screen.....Clea
017000: 72 73 63 72 65 65 6E 20 68 6F 6D 65 73 20 74 68 rscreen homes th
017010: 65 20 63 75 72 73 6F 72 20 61 73 20 77 65 6C 6C e cursor as well
017020: 20 28 74 6F 20 74 6F 70 20 6C 65 66 74 29 0D 0A (to top left)..
017030: 0D 0A 09 09 48 6F 72 69 7A 6F 6E 74 61 6C 2C 56 ....Horizontal,V
017040: 65 72 74 69 63 61 6C 2C 43 6F 72 6E 65 72 4C 4C ertical,CornerLL
017050: 2C 43 6F 72 6E 65 72 55 4C 2C 43 6F 72 6E 65 72 ,CornerUL,Corner
017060: 55 52 2C 43 6F 72 6E 65 72 4C 52 0D 0A 0D 0A 09 UR,CornerLR.....
017070: 09 09 43 68 61 72 61 63 74 65 72 20 73 65 71 75 ..Character sequ
017080: 65 6E 63 65 73 20 74 6F 20 64 72 61 77 20 68 6F ences to draw ho
017090: 72 69 7A 6F 6E 74 61 6C 20 61 6E 64 20 76 65 72 rizontal and ver
0170A0: 74 69 63 61 6C 0D 0A 09 09 09 62 61 72 73 20 61 tical.....bars a
0170B0: 72 6F 75 6E 64 20 77 69 6E 64 6F 77 73 20 61 6E round windows an
0170C0: 64 20 74 6F 20 64 6F 20 74 68 65 20 63 6F 72 6E d to do the corn
0170D0: 65 72 73 20 28 6C 6F 77 65 72 20 6C 65 66 74 2C ers (lower left,
0170E0: 0D 0A 09 09 09 75 70 70 65 72 20 6C 65 66 74 2C .....upper left,
0170F0: 20 75 70 70 65 72 20 72 69 67 68 74 2C 6C 6F 77 upper right,low
017100: 72 20 31 39 38 36 20 62 79 20 47 20 4D 75 72 72 r 1986 by G Murr
017110: 61 79 20 4D 49 41 50 0D 0A 09 31 33 20 46 65 62 ay MIAP...13 Feb
017120: 20 38 37 20 4E 61 6D 65 20 63 68 61 6E 67 65 64 87 Name changed
017130: 20 61 6E 64 20 69 6E 63 6F 72 70 6F 72 61 74 65 and incorporate
017140: 64 20 69 6E 74 6F 20 6D 61 69 6E 20 6C 69 62 72 d into main libr
017150: 61 72 79 0D 0A 09 09 09 2D 20 44 61 76 65 20 4E ary.....- Dave N
017160: 75 74 6B 69 6E 73 2C 20 48 69 53 6F 66 74 0D 0A utkins, HiSoft..
017170: 0D 0A 2A 29 0D 0A 46 52 4F 4D 20 53 59 53 54 45 ..*)..FROM SYSTE
017180: 4D 20 49 4D 50 4F 52 54 20 42 59 54 45 2C 57 4F M IMPORT BYTE,WO
017190: 52 44 3B 0D 0A 0D 0A 43 4F 4E 53 54 0D 0A 0D 0A RD;....CONST....
0171A0: 28 2A 20 43 6F 6E 73 74 61 6E 74 73 20 74 68 61 (* Constants tha
0171B0: 74 20 67 69 76 65 20 6D 6E 65 6D 6F 6E 69 63 73 t give mnemonics
0171C0: 20 6F 66 20 42 49 4F 53 20 6A 75 6D 70 20 62 6C of BIOS jump bl
0171D0: 6F 63 6B 20 2A 29 0D 0A 0D 0A 09 63 62 6F 6F 74 ock *).....cboot
0171E0: 09 3D 30 3B 09 09 28 2A 20 43 6F 6C 64 20 62 6F .=0;..(* Cold bo
0171F0: 6F 74 20 2A 29 0D 0A 09 77 62 6F 6F 74 09 3D 31 ot *)...wboot.=1
017200: 3B 09 09 28 2A 20 57 61 72 6D 20 62 6F 6F 74 20 ;..(* Warm boot
017210: 2A 29 0D 0A 09 63 6F 6E 73 74 20 09 3D 32 3B 09 *)...const .=2;.
017220: 09 28 2A 20 43 6F 6E 73 6F 6C 65 20 73 74 61 74 .(* Console stat
017230: 75 73 20 2A 29 0D 0A 09 63 6F 6E 69 6E 09 3D 33 us *)...conin.=3
017240: 3B 09 09 28 2A 20 52 65 61 64 20 63 68 61 72 61 ;..(* Read chara
017250: 63 74 65 72 20 66 72 6F 6D 20 63 6F 6E 73 6F 6C cter from consol
017260: 65 20 2A 29 0D 0A 09 63 6F 6E 6F 75 74 09 3D 34 e *)...conout.=4
017270: 3B 09 09 28 2A 20 57 72 69 74 65 20 63 6F 6E 73 ;..(* Write cons
017280: 6F 6C 65 20 63 68 61 72 61 63 74 65 72 20 6F 75 ole character ou
017290: 74 20 2A 29 0D 0A 09 6C 69 73 74 09 3D 35 3B 09 t *)...list.=5;.
0172A0: 09 28 2A 20 57 72 69 74 65 20 6C 69 73 74 20 63 .(* Write list c
0172B0: 68 61 72 61 63 74 65 72 20 6F 75 74 20 2A 29 0D haracter out *).
0172C0: 0A 09 61 75 78 6F 75 74 09 3D 36 3B 09 09 28 2A ..auxout.=6;..(*
0172D0: 20 57 72 69 74 65 20 61 75 78 69 6C 69 61 72 79 Write auxiliary
0172E0: 20 63 68 61 72 61 63 74 65 72 20 2A 29 0D 0A 09 character *)...
0172F0: 61 75 78 69 6E 09 3D 37 3B 09 09 28 2A 20 52 65 auxin.=7;..(* Re
017300: 65 72 20 72 69 67 68 74 29 0D 0A 0D 0A 09 09 53 er right)......S
017310: 74 61 72 74 78 79 2C 4D 69 64 64 6C 65 58 59 2C tartxy,MiddleXY,
017320: 45 6E 64 58 59 0D 0A 0D 0A 09 09 09 54 68 65 20 EndXY.......The
017330: 63 68 61 72 61 63 74 65 72 20 73 65 71 75 65 6E character sequen
017340: 63 65 73 20 74 6F 20 73 74 61 72 74 20 61 20 63 ces to start a c
017350: 75 72 73 6F 72 20 61 64 64 72 65 73 73 0D 0A 09 ursor address...
017360: 09 09 63 6F 6D 6D 61 6E 64 2C 20 66 6F 72 20 62 ..command, for b
017370: 65 74 77 65 65 6E 20 74 68 65 20 63 6F 2D 6F 72 etween the co-or
017380: 64 69 6E 61 74 65 73 20 61 6E 64 20 61 66 74 65 dinates and afte
017390: 72 20 74 68 65 0D 0A 09 09 09 63 75 72 73 6F 72 r the.....cursor
0173A0: 20 61 64 64 72 65 73 73 20 63 6F 6D 6D 61 6E 64 address command
0173B0: 2E 0D 0A 0D 0A 09 09 4D 6F 76 65 4C 65 66 74 2C .......MoveLeft,
0173C0: 4D 6F 76 65 52 69 67 68 74 2C 4D 6F 76 65 44 6F MoveRight,MoveDo
0173D0: 77 6E 2C 4D 6F 76 65 55 70 0D 0A 0D 0A 09 09 09 wn,MoveUp.......
0173E0: 43 75 72 73 6F 72 20 6D 6F 76 65 20 63 6F 6D 6D Cursor move comm
0173F0: 61 6E 64 73 0D 0A 09 09 2A 29 0D 0A 09 28 2A 09 ands....*)...(*.
017400: 59 6F 75 20 73 68 6F 75 6C 64 20 6E 6F 74 20 6E You should not n
017410: 65 65 64 20 74 6F 20 75 73 65 20 74 68 65 20 6E eed to use the n
017420: 65 78 74 20 66 65 77 20 74 79 70 65 20 64 65 63 ext few type dec
017430: 6C 61 72 61 74 69 6F 6E 73 0D 0A 09 09 54 68 65 larations....The
017440: 79 20 61 72 65 20 69 6E 63 6C 75 64 65 64 20 68 y are included h
017450: 65 72 65 20 66 6F 72 20 75 73 65 20 62 79 20 74 ere for use by t
017460: 68 65 20 63 6F 6E 66 69 67 75 72 61 74 69 6F 6E he configuration
017470: 20 70 72 6F 67 72 61 6D 2A 29 0D 0A 0D 0A 0D 0A program*)......
017480: 50 52 4F 43 45 44 55 52 45 20 47 6F 74 6F 78 79 PROCEDURE Gotoxy
017490: 28 78 2C 79 3A 43 41 52 44 49 4E 41 4C 29 3B 09 (x,y:CARDINAL);.
0174A0: 09 0D 0A 0D 0A 28 2A 09 09 50 6F 73 69 74 69 6F .....(*..Positio
0174B0: 6E 20 74 6F 20 67 69 76 65 6E 20 63 6F 6F 72 64 n to given coord
0174C0: 69 6E 61 74 65 73 0D 0A 09 09 74 6F 70 20 6C 65 inates....top le
0174D0: 66 74 20 69 73 20 61 6C 77 61 79 73 20 30 2C 30 ft is always 0,0
0174E0: 2C 20 77 68 69 63 68 20 6D 65 61 6E 73 20 74 68 , which means th
0174F0: 61 74 0D 0A 09 09 74 68 65 20 62 69 67 67 65 72 at....the bigger
017500: 4D 4F 44 55 4C 45 20 4C 69 73 74 3B 0D 0A 0D 0A MODULE List;....
017510: 28 2A 09 4C 69 73 74 20 6F 6E 65 20 6F 66 20 6D (*.List one of m
017520: 6F 72 65 20 66 69 6C 65 73 0D 0A 0D 0A 09 44 61 ore files.....Da
017530: 76 65 20 4D 6F 6F 72 65 20 46 54 4C 20 4D 6F 64 ve Moore FTL Mod
017540: 75 6C 61 2D 32 0D 0A 09 43 2F 4F 20 57 6F 72 6B ula-2...C/O Work
017550: 6D 61 6E 20 61 6E 64 20 41 73 73 6F 63 69 61 74 man and Associat
017560: 65 73 0D 0A 09 31 39 32 35 20 45 61 73 74 20 4D es...1925 East M
017570: 6F 75 6E 74 61 69 6E 20 53 74 72 65 65 74 0D 0A ountain Street..
017580: 09 50 61 73 61 64 65 6E 61 2C 20 43 41 20 39 31 .Pasadena, CA 91
017590: 31 30 34 0D 0A 09 28 38 31 38 29 20 37 39 31 2D 104...(818) 791-
0175A0: 37 39 37 39 0D 0A 0D 0A 09 54 68 69 73 20 69 73 7979.....This is
0175B0: 20 61 20 6D 6F 64 75 6C 65 20 70 72 6F 76 69 64 a module provid
0175C0: 65 64 20 77 69 74 68 20 74 68 65 20 73 79 73 74 ed with the syst
0175D0: 65 6D 2E 20 59 6F 75 20 6D 61 79 20 68 61 63 6B em. You may hack
0175E0: 20 69 74 0D 0A 09 61 6E 64 20 75 73 65 20 69 74 it...and use it
0175F0: 20 66 6F 72 20 77 68 61 74 65 76 65 72 20 70 75 for whatever pu
017600: 72 70 6F 73 65 73 20 79 6F 75 20 77 69 73 68 2E rposes you wish.
017610: 20 0D 0A 0D 0A 09 43 61 6C 6C 20 69 73 20 4C 49 .....Call is LI
017620: 53 54 20 20 20 3C 28 77 69 6C 64 20 63 61 72 64 ST <(wild card
017630: 29 20 66 69 6C 65 20 6E 61 6D 65 3E 2C 2E 2E 2E ) file name>,...
017640: 2E 20 28 6F 75 74 70 75 74 20 66 69 6C 65 20 6E . (output file n
017650: 61 6D 65 5B 6F 29 20 0D 0A 0D 0A 09 57 68 65 72 ame[o) .....Wher
017660: 65 20 74 68 65 20 6F 75 74 70 75 74 20 66 69 6C e the output fil
017670: 65 20 6E 61 6D 65 20 69 73 20 6F 70 74 69 6F 6E e name is option
017680: 61 6C 20 28 64 65 66 61 75 6C 74 73 20 74 6F 20 al (defaults to
017690: 70 72 69 6E 74 65 72 20 64 65 76 69 63 65 29 0D printer device).
0176A0: 0A 0D 0A 09 42 75 67 73 3A 0D 0A 0D 0A 09 09 4F ....Bugs:......O
0176B0: 76 65 72 77 72 69 74 65 73 20 6F 75 74 70 75 74 verwrites output
0176C0: 20 66 69 6C 65 20 77 69 74 68 6F 75 74 20 63 68 file without ch
0176D0: 65 63 6B 69 6E 67 20 69 66 20 4F 4B 0D 0A 0D 0A ecking if OK....
0176E0: 2A 29 0D 0A 49 4D 50 4F 52 54 09 44 65 62 75 67 *)..IMPORT.Debug
0176F0: 3B 0D 0A 46 52 4F 4D 20 53 59 53 54 45 4D 20 49 ;..FROM SYSTEM I
017700: 20 79 20 69 73 2C 20 74 68 65 20 66 75 72 74 68 y is, the furth
017710: 65 72 20 64 6F 77 6E 20 74 68 65 20 73 63 72 65 er down the scre
017720: 65 6E 0D 0A 0D 0A 09 09 78 20 69 73 20 63 6F 6C en......x is col
017730: 75 6D 6E 2C 20 79 20 69 73 20 72 6F 77 0D 0A 0D umn, y is row...
017740: 0A 09 09 41 20 27 53 74 61 6E 64 61 72 64 27 20 ...A 'Standard'
017750: 53 63 72 65 65 6E 20 69 73 20 38 30 20 62 79 20 Screen is 80 by
017760: 32 34 2E 20 54 68 65 20 6C 69 6D 69 74 20 69 73 24. The limit is
017770: 20 73 65 74 20 62 79 0D 0A 09 09 74 68 65 20 74 set by....the t
017780: 65 72 6D 69 6E 61 6C 20 64 65 66 69 6E 69 74 69 erminal definiti
017790: 6F 6E 20 66 69 6C 65 09 2A 29 0D 0A 0D 0A 50 52 on file.*)....PR
0177A0: 4F 43 45 44 55 52 45 20 4C 6F 61 64 54 65 72 6D OCEDURE LoadTerm
0177B0: 43 6F 64 65 28 66 69 6C 65 6E 61 6D 65 3A 46 69 Code(filename:Fi
0177C0: 6C 65 4E 61 6D 65 29 3B 0D 0A 0D 0A 28 2A 09 09 leName);....(*..
0177D0: 4C 6F 61 64 20 74 68 65 20 74 65 72 6D 69 6E 61 Load the termina
0177E0: 6C 20 64 65 66 69 6E 69 74 69 6F 6E 20 66 6F 72 l definition for
0177F0: 20 74 68 65 20 63 75 72 72 65 6E 74 20 74 65 72 the current ter
017800: 6D 69 6E 61 6C 0D 0A 0D 0A 09 09 66 69 6C 65 6E minal......filen
017810: 61 6D 65 20 69 73 20 74 68 65 20 6E 61 6D 65 20 ame is the name
017820: 6F 66 20 74 68 65 20 66 69 6C 65 20 74 6F 20 72 of the file to r
017830: 65 61 64 0D 0A 0D 0A 09 09 4E 6F 72 6D 61 6C 6C ead......Normall
017840: 79 2C 20 77 68 65 6E 20 74 68 65 20 70 72 6F 67 y, when the prog
017850: 72 61 6D 20 69 73 20 6C 6F 61 64 65 64 2C 20 74 ram is loaded, t
017860: 68 65 20 66 69 6C 65 0D 0A 09 09 27 54 45 52 4D he file....'TERM
017870: 49 4E 41 4C 2E 43 4F 44 27 20 69 73 20 6C 6F 61 INAL.COD' is loa
017880: 64 65 64 20 66 72 6F 6D 20 74 68 65 20 6C 6F 67 ded from the log
017890: 67 65 64 20 69 6E 20 64 69 73 63 0D 0A 09 09 54 ged in disc....T
0178A0: 68 69 73 20 72 6F 75 74 69 6E 65 20 6F 6E 6C 79 his routine only
0178B0: 20 6E 65 65 64 73 20 74 6F 20 62 65 20 75 73 65 needs to be use
0178C0: 64 20 69 66 20 74 68 61 74 0D 0A 09 09 66 69 6C d if that....fil
0178D0: 65 20 69 73 20 6E 6F 74 20 74 68 65 20 6F 6E 65 e is not the one
0178E0: 20 74 6F 20 75 73 65 20 28 65 67 2C 20 74 6F 20 to use (eg, to
0178F0: 73 77 61 70 20 73 63 72 65 65 6E 73 2A 29 20 0D swap screens*) .
017900: 4D 50 4F 52 54 20 41 44 44 52 45 53 53 2C 41 44 MPORT ADDRESS,AD
017910: 52 2C 54 53 49 5A 45 3B 0D 0A 46 52 4F 4D 20 43 R,TSIZE;..FROM C
017920: 6F 6D 6D 61 6E 64 20 49 4D 50 4F 52 54 20 50 61 ommand IMPORT Pa
017930: 72 61 6D 65 74 65 72 2C 50 61 72 63 6C 61 73 73 rameter,Parclass
017940: 2C 47 65 74 50 61 72 61 6D 73 3B 0D 0A 46 52 4F ,GetParams;..FRO
017950: 4D 20 46 69 6C 65 73 20 49 4D 50 4F 52 54 20 46 M Files IMPORT F
017960: 69 6C 65 4E 61 6D 65 2C 46 49 4C 45 2C 4C 6F 6F ileName,FILE,Loo
017970: 6B 75 70 2C 43 72 65 61 74 65 3B 0D 0A 46 52 4F kup,Create;..FRO
017980: 4D 20 53 74 72 65 61 6D 73 20 49 4D 50 4F 52 54 M Streams IMPORT
017990: 20 43 6F 6E 6E 65 63 74 2C 44 69 73 63 6F 6E 6E Connect,Disconn
0179A0: 65 63 74 2C 53 54 52 45 41 4D 2C 69 6E 70 75 74 ect,STREAM,input
0179B0: 2C 6F 75 74 70 75 74 2C 57 72 69 74 65 43 68 61 ,output,WriteCha
0179C0: 72 2C 0D 0A 09 09 52 65 61 64 43 68 61 72 2C 45 r,....ReadChar,E
0179D0: 4F 53 3B 0D 0A 46 52 4F 4D 20 47 65 74 46 69 6C OS;..FROM GetFil
0179E0: 65 73 20 49 4D 50 4F 52 54 20 47 65 74 4E 61 6D es IMPORT GetNam
0179F0: 65 73 3B 0D 0A 46 52 4F 4D 20 54 65 72 6D 69 6E es;..FROM Termin
017A00: 61 6C 20 49 4D 50 4F 52 54 20 57 72 69 74 65 53 al IMPORT WriteS
017A10: 74 72 69 6E 67 2C 57 72 69 74 65 4C 6E 3B 0D 0A tring,WriteLn;..
017A20: 46 52 4F 4D 20 53 6F 72 74 20 49 4D 50 4F 52 54 FROM Sort IMPORT
017A30: 20 53 6F 72 74 52 65 63 6F 72 64 73 3B 0D 0A 43 SortRecords;..C
017A40: 4F 4E 53 54 09 46 46 3D 30 63 78 3B 0D 0A 09 54 ONST.FF=0cx;...T
017A50: 41 42 3D 30 39 78 3B 0D 0A 09 4C 46 3D 30 61 78 AB=09x;...LF=0ax
017A60: 3B 0D 0A 09 43 52 3D 30 64 78 3B 0D 0A 20 20 20 ;...CR=0dx;..
017A70: 20 20 20 20 20 54 41 42 53 3D 32 30 78 3B 20 0D TABS=20x; .
017A80: 0A 54 59 50 45 20 09 50 46 69 6C 65 4E 61 6D 65 .TYPE .PFileName
017A90: 3D 50 4F 49 4E 54 45 52 20 54 4F 20 46 69 6C 65 =POINTER TO File
017AA0: 4E 61 6D 65 3B 0D 0A 56 41 52 09 4C 69 73 74 3A Name;..VAR.List:
017AB0: 53 54 52 45 41 4D 3B 0D 0A 09 4C 69 73 74 46 3A STREAM;...ListF:
017AC0: 46 49 4C 45 3B 0D 0A 09 72 65 70 6C 79 3A 49 4E FILE;...reply:IN
017AD0: 54 45 47 45 52 3B 0D 0A 09 69 2C 6A 3A 49 4E 54 TEGER;...i,j:INT
017AE0: 45 47 45 52 3B 0D 0A 09 49 6E 73 3A 53 54 52 45 EGER;...Ins:STRE
017AF0: 41 4D 3B 0D 0A 09 49 6E 66 3A 46 49 4C 45 3B 0D AM;...Inf:FILE;.
017B00: 0A 0D 0A 0D 0A 0D 0A 50 52 4F 43 45 44 55 52 45 .......PROCEDURE
017B10: 20 53 63 72 65 65 6E 43 6F 6E 74 72 6F 6C 28 73 ScreenControl(s
017B20: 3A 45 64 69 74 73 29 3B 0D 0A 0D 0A 28 2A 09 09 :Edits);....(*..
017B30: 50 65 72 66 6F 72 6D 20 61 20 73 63 72 65 65 6E Perform a screen
017B40: 20 63 6F 6E 74 72 6F 6C 20 6F 70 65 72 61 74 69 control operati
017B50: 6F 6E 2A 29 0D 0A 0D 0A 50 52 4F 43 45 44 55 52 on*)....PROCEDUR
017B60: 45 20 20 44 72 61 77 42 6F 78 28 78 31 2C 79 31 E DrawBox(x1,y1
017B70: 2C 78 32 2C 79 32 3A 43 41 52 44 49 4E 41 4C 29 ,x2,y2:CARDINAL)
017B80: 3B 0D 0A 0D 0A 28 2A 09 09 64 72 61 77 20 61 20 ;....(*..draw a
017B90: 62 6F 78 20 66 6F 72 20 61 20 77 69 6E 64 6F 77 box for a window
017BA0: 20 6F 6E 20 74 68 65 20 73 63 72 65 65 6E 0D 0A on the screen..
017BB0: 0D 0A 09 09 78 31 2C 79 31 20 20 69 73 20 74 68 ....x1,y1 is th
017BC0: 65 20 6C 6F 77 65 72 20 6C 65 66 74 20 63 6F 72 e lower left cor
017BD0: 6E 65 72 0D 0A 09 09 78 32 2C 79 32 20 20 69 73 ner....x2,y2 is
017BE0: 20 75 70 70 65 72 20 72 69 67 68 74 20 63 6F 72 upper right cor
017BF0: 6E 65 72 2A 29 0D 0A 50 52 4F 43 45 44 55 52 45 ner*)..PROCEDURE
017C00: 20 43 6C 69 70 28 78 31 2C 79 31 2C 78 32 2C 79 Clip(x1,y1,x2,y
017C10: 32 3A 43 41 52 44 49 4E 41 4C 29 3B 0D 0A 28 2A 2:CARDINAL);..(*
017C20: 09 09 53 65 74 20 63 6C 69 70 20 62 6F 75 6E 64 ..Set clip bound
017C30: 61 72 69 65 73 0D 0A 09 09 75 73 65 64 20 62 79 aries....used by
017C40: 20 57 69 6E 64 6F 77 73 20 77 68 65 6E 20 64 72 Windows when dr
017C50: 61 77 69 6E 67 20 62 6F 78 65 73 20 73 6F 20 74 awing boxes so t
017C60: 68 61 74 20 6F 6E 6C 79 20 74 68 65 0D 0A 09 09 hat only the....
017C70: 70 61 72 74 73 20 6F 66 20 74 68 65 20 62 6F 78 parts of the box
017C80: 65 73 20 6D 61 73 6B 65 64 20 61 72 65 20 72 65 es masked are re
017C90: 2D 64 72 61 77 6E 0D 0A 09 09 68 61 73 20 6E 6F -drawn....has no
017CA0: 20 65 66 66 65 63 74 20 65 78 63 65 70 74 20 69 effect except i
017CB0: 6E 20 44 72 61 77 42 6F 78 2A 29 0D 0A 56 41 52 n DrawBox*)..VAR
017CC0: 09 53 63 72 65 65 6E 44 65 70 74 68 2C 53 63 72 .ScreenDepth,Scr
017CD0: 65 65 6E 57 69 64 74 68 3A 43 41 52 44 49 4E 41 eenWidth:CARDINA
017CE0: 4C 3B 0D 0A 09 4D 61 64 65 43 68 61 6E 67 65 3A L;...MadeChange:
017CF0: 42 4F 4F 4C 45 41 4E 3B 0D 0A 0D 0A 09 28 2A 09 BOOLEAN;.....(*.
017D00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
017D10: 14 00 00 00 02 09 4E E5 14 00 41 02 00 00 00 02 ......N...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: 0A 09 63 68 3A 43 48 41 52 3B 0D 0A 0D 0A 09 62 ..ch:CHAR;.....b
017E10: 75 66 66 65 72 3A 41 52 52 41 59 5B 30 2E 2E 34 uffer:ARRAY[0..4
017E20: 30 39 35 5D 20 4F 46 20 43 48 41 52 3B 0D 0A 09 095] OF CHAR;...
017E30: 62 75 66 66 6C 65 6E 3A 43 41 52 44 49 4E 41 4C bufflen:CARDINAL
017E40: 3B 09 0D 0A 28 2A 09 49 20 62 75 66 66 65 72 20 ;...(*.I buffer
017E50: 74 68 65 20 63 68 61 72 61 63 74 65 72 73 20 6F the characters o
017E60: 6E 20 6F 75 74 70 75 74 20 73 69 6E 63 65 20 49 n output since I
017E70: 20 68 61 76 65 20 61 20 70 72 69 6E 74 65 72 20 have a printer
017E80: 77 68 69 63 68 0D 0A 09 73 74 6F 70 73 20 70 72 which...stops pr
017E90: 69 6E 74 69 6E 67 20 77 68 65 6E 65 76 65 72 20 inting whenever
017EA0: 61 6E 79 74 68 69 6E 67 20 61 70 70 65 61 72 73 anything appears
017EB0: 20 6F 6E 20 74 68 65 20 69 6E 74 65 72 66 61 63 on the interfac
017EC0: 65 2E 20 54 6F 0D 0A 09 67 65 74 20 69 74 20 74 e. To...get it t
017ED0: 6F 20 72 75 6E 20 61 74 20 73 70 65 65 64 2C 20 o run at speed,
017EE0: 79 6F 75 20 6D 75 73 74 20 68 69 74 20 69 74 20 you must hit it
017EF0: 77 69 74 68 20 61 20 62 75 66 66 65 72 20 66 75 with a buffer fu
017F00: 6C 6C 20 27 61 74 0D 0A 09 61 20 74 69 6D 65 27 ll 'at...a time'
017F10: 2A 29 0D 0A 50 52 4F 43 45 44 55 52 45 20 46 6C *)..PROCEDURE Fl
017F20: 75 73 68 42 75 66 66 65 72 3B 0D 0A 56 41 52 09 ushBuffer;..VAR.
017F30: 69 3A 43 41 52 44 49 4E 41 4C 3B 0D 0A 42 45 47 i:CARDINAL;..BEG
017F40: 49 4E 0D 0A 09 49 46 20 62 75 66 66 6C 65 6E 3E IN...IF bufflen>
017F50: 30 20 54 48 45 4E 20 0D 0A 09 09 46 4F 52 20 69 0 THEN ....FOR i
017F60: 3A 3D 30 20 54 4F 20 62 75 66 66 6C 65 6E 2D 31 :=0 TO bufflen-1
017F70: 20 44 4F 20 57 72 69 74 65 43 68 61 72 28 4C 69 DO WriteChar(Li
017F80: 73 74 2C 62 75 66 66 65 72 5B 69 5D 29 20 45 4E st,buffer[i]) EN
017F90: 44 3B 0D 0A 09 09 45 4E 44 3B 0D 0A 09 62 75 66 D;....END;...buf
017FA0: 66 6C 65 6E 3A 3D 30 3B 0D 0A 09 45 4E 44 20 46 flen:=0;...END F
017FB0: 6C 75 73 68 42 75 66 66 65 72 3B 0D 0A 50 52 4F lushBuffer;..PRO
017FC0: 43 45 44 55 52 45 20 42 75 66 66 65 72 4F 75 74 CEDURE BufferOut
017FD0: 28 63 68 3A 43 48 41 52 29 3B 0D 0A 42 45 47 49 (ch:CHAR);..BEGI
017FE0: 4E 0D 0A 09 49 46 20 62 75 66 66 6C 65 6E 3D 48 N...IF bufflen=H
017FF0: 49 47 48 28 62 75 66 66 65 72 29 20 54 48 45 4E IGH(buffer) THEN
018000: C0 01 1C 20 01 13 20 6E 75 6D 62 65 72 73 20 01 ... .. numbers .
018010: 2A 20 66 6F 6C 6C 6F 77 73 3A BF C1 69 6E 74 20 * follows:..int
018020: 6E 6F BE BA DB 20 28 64 65 63 69 6D 61 6C 29 C1 no... (decimal).
018030: 00 52 53 54 00 CF 20 30 B5 30 C1 CF 20 31 B5 38 .RST.. 0.0.. 1.8
018040: C1 CF 20 32 B5 31 36 C1 CF 20 33 B5 32 34 20 C1 .. 2.16.. 3.24 .
018050: CF 20 34 B5 33 32 C1 CF 20 35 B5 34 30 C1 CF 20 . 4.32.. 5.40..
018060: 36 B5 34 38 20 00 54 68 69 73 00 CE 20 00 61 6E 6.48 .This.. .an
018070: 64 00 CD 20 01 20 20 00 6E 65 78 74 00 CC 20 D4 d.. . .next.. .
018080: 20 75 73 75 61 6C 6C 79 20 66 72 65 65 C1 CF 20 usually free..
018090: 37 B5 35 36 20 75 6E 64 65 72 20 43 50 2F 4D 20 7.56 under CP/M
0180A0: 38 30 BF C0 00 49 6E 00 CB 20 D1 20 00 6D 6F 64 80...In.. . .mod
0180B0: 65 00 CA 20 31 2C 20 6F 6E 6C 79 20 CF 20 37 20 e.. 1, only . 7
0180C0: 01 23 20 75 73 65 64 2C 20 00 73 6F 00 C9 20 79 .# used, .so.. y
0180D0: 6F 75 20 00 63 61 6E 00 C8 20 00 75 73 65 00 C7 ou .can.. .use..
0180E0: 20 CA 20 31 20 01 2A C0 00 69 66 00 C6 20 DE 20 . 1 .*..if.. .
0180F0: 77 65 72 65 20 61 20 CA 20 30 20 01 13 2E BF C0 were a . 0 .....
018100: CB 20 D1 20 CA 20 32 2C 20 01 22 20 01 13 20 00 . . . 2, ." .. .
018110: 76 65 63 74 6F 72 00 C5 20 C8 20 E9 20 70 6C 61 vector.. . . pla
018120: 63 65 64 20 61 6E 79 77 68 65 72 65 20 C0 D2 20 ced anywhere ..
018130: 6D 65 6D 6F 72 79 2E 20 57 69 74 68 20 56 31 2E memory. With V1.
018140: 31 38 2C 20 CA 20 32 20 01 13 20 73 75 70 70 6F 18, . 2 .. suppo
018150: 72 74 20 00 68 61 73 00 C4 20 62 65 65 6E 20 61 rt .has.. been a
018160: 64 64 65 64 2E BF C0 00 54 6F 00 C2 20 C7 20 CA dded....To.. . .
018170: 20 32 20 69 6E 74 65 72 72 75 70 74 73 2C 20 F0 2 interrupts, .
018180: 20 01 20 20 76 61 72 69 61 62 6C 65 20 D0 32 20 . variable .2
018190: 01 1C 20 9A 2E 20 CB 20 CA C0 32 2C 20 DB 20 01 .. .. . ..2, . .
0181A0: 23 20 01 20 20 F7 20 01 05 20 01 20 20 C5 20 00 # . . .. . . .
0181B0: 74 68 61 74 00 BD 20 01 23 20 01 1C 20 E9 20 6C that.. .# .. . l
0181C0: 69 6E 6B 65 64 20 01 1C 2E BF C0 C2 20 F0 20 E7 inked ...... . .
0181D0: 20 01 22 20 01 13 20 FA 2C 20 01 20 20 FE 20 01 ." .. ., . . .
0181E0: 21 20 01 23 20 01 1C 20 E9 20 01 20 C0 01 13 20 ! .# .. . . ...
0181F0: FE 20 01 23 20 73 74 61 72 74 65 64 20 00 77 69 . .# started .wi
018200: 20 46 6C 75 73 68 42 75 66 66 65 72 20 45 4E 44 FlushBuffer END
018210: 3B 0D 0A 09 62 75 66 66 65 72 5B 62 75 66 66 6C ;...buffer[buffl
018220: 65 6E 5D 3A 3D 63 68 3B 0D 0A 09 62 75 66 66 6C en]:=ch;...buffl
018230: 65 6E 3A 3D 62 75 66 66 6C 65 6E 2B 31 3B 0D 0A en:=bufflen+1;..
018240: 09 45 4E 44 20 42 75 66 66 65 72 4F 75 74 3B 0D .END BufferOut;.
018250: 0A 0D 0A 50 52 4F 43 45 44 55 52 45 20 43 6F 6D ...PROCEDURE Com
018260: 70 61 72 28 61 2C 62 3A 41 44 44 52 45 53 53 29 par(a,b:ADDRESS)
018270: 3A 42 4F 4F 4C 45 41 4E 3B 0D 0A 56 41 52 09 70 :BOOLEAN;..VAR.p
018280: 2C 71 3A 50 46 69 6C 65 4E 61 6D 65 3B 0D 0A 42 ,q:PFileName;..B
018290: 45 47 49 4E 0D 0A 09 70 3A 3D 50 46 69 6C 65 4E EGIN...p:=PFileN
0182A0: 61 6D 65 28 61 29 3B 0D 0A 09 71 3A 3D 50 46 69 ame(a);...q:=PFi
0182B0: 6C 65 4E 61 6D 65 28 62 29 3B 0D 0A 09 52 45 54 leName(b);...RET
0182C0: 55 52 4E 20 70 5E 3E 71 5E 0D 0A 09 45 4E 44 20 URN p^>q^...END
0182D0: 43 6F 6D 70 61 72 3B 0D 0A 50 52 4F 43 45 44 55 Compar;..PROCEDU
0182E0: 52 45 20 55 73 61 67 65 3B 0D 0A 42 45 47 49 4E RE Usage;..BEGIN
0182F0: 0D 0A 09 57 72 69 74 65 53 74 72 69 6E 67 28 27 ...WriteString('
018300: 55 73 61 67 65 20 69 73 3A 20 20 20 4C 49 53 54 Usage is: LIST
018310: 20 66 69 6C 65 2C 66 69 6C 65 2C 2E 2E 2E 27 29 file,file,...')
018320: 3B 57 72 69 74 65 4C 6E 3B 0D 0A 09 57 72 69 74 ;WriteLn;...Writ
018330: 65 53 74 72 69 6E 67 28 27 20 20 20 20 20 20 6F eString(' o
018340: 72 20 20 20 20 4C 49 53 54 20 66 69 6C 65 2C 66 r LIST file,f
018350: 69 6C 65 2C 2E 2E 2E 2C 6F 75 74 70 75 74 20 66 ile,...,output f
018360: 69 6C 65 5B 6F 27 29 3B 57 72 69 74 65 4C 6E 3B ile[o');WriteLn;
018370: 0D 0A 09 57 72 69 74 65 53 74 72 69 6E 67 28 27 ...WriteString('
018380: 20 77 68 65 72 65 20 66 69 6C 65 20 69 73 20 61 where file is a
018390: 20 66 69 6C 65 20 74 6F 20 6C 69 73 74 20 6F 72 file to list or
0183A0: 20 61 20 77 69 6C 64 20 63 61 72 64 20 66 6F 72 a wild card for
0183B0: 20 66 69 6C 65 73 20 74 6F 20 6C 69 73 74 27 29 files to list')
0183C0: 3B 57 72 69 74 65 4C 6E 3B 0D 0A 09 57 72 69 74 ;WriteLn;...Writ
0183D0: 65 4C 6E 3B 0D 0A 09 57 72 69 74 65 53 74 72 69 eLn;...WriteStri
0183E0: 6E 67 28 27 20 66 6F 72 20 65 78 61 6D 70 6C 65 ng(' for example
0183F0: 3A 20 20 4C 49 53 54 20 2A 2E 44 45 46 27 29 3B : LIST *.DEF');
018400: 74 68 00 BC 3A BF C1 E5 28 49 6E 74 65 72 75 70 th..:...(Interup
018410: 74 52 6F 75 74 2C 8F 28 01 01 29 2C 53 49 5A 45 tRout,.(..),SIZE
018420: 28 01 01 29 2C 00 50 52 4F 00 BB 29 3B C1 F4 28 (..),.PRO..);..(
018430: 00 43 4F 4E 00 B9 2C BB 29 3B 20 BF C0 B9 20 6E .CON..,.); ... n
018440: 65 65 64 20 D8 20 E9 20 69 6E 69 74 69 61 6C 69 eed . . initiali
018450: 73 65 64 20 2D 20 DE 20 01 23 20 64 6F 6E 65 20 sed - . .# done
018460: E6 20 F4 BF C0 46 6F 6C 6C 6F 77 65 64 20 E6 20 . ...Followed .
018470: 28 69 6E 73 69 64 65 20 01 20 20 D9 20 01 1C 20 (inside . . ..
018480: 49 6E 74 65 72 72 75 70 74 52 6F 75 74 2C 20 01 InterruptRout, .
018490: 21 20 01 23 20 00 6E 6F 77 00 B8 20 62 65 69 6E ! .# .now.. bein
0184A0: 67 C0 D3 29 BF C1 DC 28 BB 2C B9 2C 01 13 20 F7 g..)...(.,.,.. .
0184B0: 29 3B BF C0 CE 20 73 65 6E 64 73 20 EE 20 00 62 );... sends . .b
0184C0: 61 63 6B 00 B7 20 01 1C 20 01 20 20 00 73 74 61 ack.. .. . .sta
0184D0: 74 65 6D 65 6E 74 00 B6 20 DA 20 01 20 20 F6 20 tement.. . . .
0184E0: F4 2E C0 57 68 65 6E 20 01 22 20 01 13 20 D6 2C ...When ." .. .,
0184F0: 20 01 20 20 B6 28 73 29 20 FF 20 01 20 20 DC 20 . .(s) . . .
018500: D4 C0 D3 20 CD 20 EE 20 01 23 20 72 65 74 75 72 ... . . .# retur
018510: 6E 65 64 20 DF 20 01 20 20 DC 20 01 23 20 D3 20 ned . . . .# .
018520: C0 61 67 61 69 6E 2E 20 C1 BF BF 2A 29 BF 96 B4 .again. ...*)...
018530: 50 52 4F 43 41 44 52 3D AF 20 28 AB 29 3B BF C0 PROCADR=. (.);..
018540: 00 70 57 4F 52 44 00 B2 3D A8 20 86 20 01 25 3B .pWORD..=. . .%;
018550: BF 8E B4 C0 00 77 70 00 B1 3A B2 3B C0 00 6A 6D .....wp..:.;..jm
018560: 70 00 B0 3A AB 3B BF 9C C0 28 2A 20 F1 20 F0 20 p..:.;...(* . .
018570: EF 20 01 1C 20 EE 20 ED 20 EC 20 EB 20 FE 2A 29 . .. . . . . .*)
018580: BF BF C0 28 2A 20 B4 F9 20 F2 20 FE 20 EA 20 E9 ...(* .. . . . .
018590: 20 E8 20 F0 20 E7 20 E6 C1 E5 2A 29 BF C0 28 2A . . . ...*)..(*
0185A0: B4 E4 20 01 20 20 F2 20 FE 20 E3 20 E2 C1 01 20 .. . . . . ...
0185B0: 20 F3 20 FE 20 E3 2E 20 F9 20 01 27 C1 FA 20 E1 . . .. . .'.. .
0185C0: 20 E0 20 01 20 20 F2 20 E3 C1 E6 20 01 20 20 F3 . . . ... . .
0185D0: 20 E3 20 DF 20 DE 20 DD 20 01 20 C1 F2 20 E3 2A . . . . . .. .*
0185E0: 29 BF C0 F3 3A 3D F2 3B BF C0 28 2A B8 20 F0 20 )...:=.;..(*. .
0185F0: E7 20 01 13 20 72 6F 75 74 69 6E 65 BF C0 BA 00 . .. routine....
018600: 53 42 43 20 20 20 20 20 01 1C 0E 1F 98 9E C6 53 SBC .......S
018610: 42 43 20 20 20 20 20 01 00 0E 1F 98 9E C6 1A 1A BC .........
018620: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
018630: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
018640: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
018650: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
018660: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
018670: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
018680: 58 4F 52 20 20 20 20 20 01 1B 0E 23 EE AE C6 41 XOR ...#...A
018690: 44 43 20 20 20 20 20 01 1C 0E 1F 88 AE C6 41 44 DC .......AD
0186A0: 44 20 20 20 20 20 01 1C 0E 1F 80 AE C6 41 4E 44 D .......AND
0186B0: 20 20 20 20 20 01 1C 0E 1F A0 AE C6 43 50 20 20 .......CP
0186C0: 20 20 20 20 01 1C 0E 1F B8 AE C6 4F 52 20 20 20 .......OR
0186D0: 20 20 20 01 1C 0E 1F B0 AE C6 53 55 42 20 20 20 .......SUB
0186E0: 20 20 01 1C 0E 1F 90 AE C6 58 4F 52 20 20 20 20 .......XOR
0186F0: 20 01 1C 0E 1F A8 AE C6 58 4F 52 20 20 20 20 20 .......XOR
018700: 41 44 43 20 20 20 20 20 02 1B 0E 21 DD 8E C6 41 ADC ...!...A
018710: 44 43 20 20 20 20 20 02 1B 0E 22 FD 8E C6 41 44 DC ..."...AD
018720: 43 20 20 20 20 20 01 1B 0E 23 CE 8E C6 41 44 44 C ...#...ADD
018730: 20 20 20 20 20 02 1B 0E 21 DD 86 C6 41 44 44 20 ...!...ADD
018740: 20 20 20 20 02 1B 0E 22 FD 86 C6 41 44 44 20 20 ..."...ADD
018750: 20 20 20 01 1B 0E 23 C6 86 C6 41 4E 44 20 20 20 ...#...AND
018760: 20 20 02 1B 0E 21 DD A6 C6 41 4E 44 20 20 20 20 ...!...AND
018770: 20 02 1B 0E 22 FD A6 C6 41 4E 44 20 20 20 20 20 ..."...AND
018780: 41 4E 44 20 20 20 20 20 01 1B 0E 23 E6 A6 C6 43 AND ...#...C
018790: 50 20 20 20 20 20 20 02 1B 0E 21 DD BE C6 43 50 P ...!...CP
0187A0: 20 20 20 20 20 20 02 1B 0E 22 FD BE C6 43 50 20 ..."...CP
0187B0: 20 20 20 20 20 01 1B 0E 23 FE BE C6 53 42 43 20 ...#...SBC
0187C0: 20 20 20 20 01 01 0E 01 9E BE C6 53 42 43 20 20 .......SBC
0187D0: 20 20 20 02 1B 0E 21 DD 9E C6 53 42 43 20 20 20 ...!...SBC
0187E0: 20 20 02 1B 0E 22 FD 9E C6 53 42 43 20 20 20 20 ..."...SBC
0187F0: 20 01 1B 0E 23 DE 9E C6 53 42 43 20 20 20 20 20 ...#...SBC
018800: 4E 6F 74 65 00 AA 20 BD 20 01 20 20 01 1E 20 74 Note.. . . .. t
018810: 61 73 6B 73 20 D5 20 D4 20 73 74 6F 72 65 64 20 asks . . stored
018820: D2 20 01 07 20 CD C0 BA 74 68 65 72 65 66 6F 72 . .. ...therefor
018830: 65 2C 20 DF 20 01 20 20 01 13 20 D6 2C 20 00 77 e, . . .. ., .w
018840: 65 00 A6 20 E1 20 68 61 76 65 20 01 1C 20 01 27 e.. . have .. .'
018850: C0 BA B7 20 E2 20 01 07 2A 29 BF C0 97 20 77 20 ... . ..*)... w
018860: 81 C1 01 10 3A 3D 30 65 35 68 3B C1 01 0F 3A 3D ....:=0e5h;...:=
018870: 32 31 68 3B C1 01 0E 3A 3D 8F 28 F3 29 3B C1 01 21h;...:=.(.);..
018880: 0D 3A 3D 30 65 33 68 3B C1 01 0C 3A 3D 30 63 64 .:=0e3h;...:=0cd
018890: 68 3B C1 01 0B 3A 3D 01 27 3B C1 01 0A 3A 3D 30 h;...:=.';...:=0
0188A0: 63 39 68 3B C1 89 3B C0 82 20 D0 32 20 95 C1 B1 c9h;..;.. .2 ...
0188B0: 3A 3D B2 28 DB 29 3B C0 91 C1 B1 3A 3D B2 28 DB :=.(.);....:=.(.
0188C0: 2B 31 29 3B C1 B0 3A 3D AB 28 DB 29 3B C1 B0 5E +1);..:=.(.);..^
0188D0: 3A 3D 30 63 33 68 3B C1 89 3B C0 B1 5E 3A 3D 8F :=0c3h;..;..^:=.
0188E0: 28 77 29 C0 01 27 28 8F 28 F3 29 29 3B BF C0 28 (w)..'(.(.));..(
0188F0: 2A B4 00 57 65 00 A2 20 00 67 65 74 00 9F 20 B7 *..We.. .get.. .
018900: 20 00 68 65 72 65 00 9E 20 DF 20 01 20 20 01 13 .here.. . . ..
018910: 20 D6 2E 20 01 07 20 B8 C1 C4 20 01 20 20 F8 20 .. .. ... . .
018920: F7 20 EC 20 01 20 20 01 13 20 01 12 2E 20 A2 20 . . . .. ... .
018930: 70 75 74 20 DE C1 B7 20 D2 20 4E 65 77 54 61 73 put ... . NewTas
018940: 6B 20 C9 20 BD 20 F5 20 01 20 20 CC 20 01 0C 20 k . . . . . ..
018950: 01 1C 20 DC 20 A6 C1 F8 20 01 1C 20 01 20 20 69 .. . ... .. . i
018960: 6E 74 65 72 72 75 70 74 65 64 20 01 1D 20 2A 29 nterrupted .. *)
018970: BF C0 F2 3A 3D F3 3B C0 89 20 DC 3B BF C0 BF 28 ...:=.;.. .;...(
018980: 2A B4 00 48 61 6C 74 65 64 00 9D 20 01 23 20 D7 *..Halted.. .# .
018990: 20 DF 20 61 20 FA 20 F0 20 E7 20 BC 20 E5 C0 CD . a . . . . ...
0189A0: 20 D7 20 BC 20 F4 20 22 FD 20 FC 20 01 20 20 FB . . . ". . . .
0189B0: 22 2E 20 F9 20 00 65 6E 74 69 72 65 00 9B C0 00 ". . .entire....
0189C0: 70 72 6F 67 72 61 6D 00 99 20 01 23 20 73 74 6F program.. .# sto
0189D0: 70 70 65 64 20 28 01 2A 20 72 65 71 75 69 72 65 pped (.* require
0189E0: 64 20 E6 20 01 29 27 73 20 62 6F 6F 6B 29 BF BF d . .)'s book)..
0189F0: 2A 29 BF AF 20 9D 3B BF 9C C0 B3 28 27 20 FE 20 *).. .;....(' .
018A00: DA 7F E1 CB 0D D2 1D 03 21 5B 2F E5 21 19 00 E5 ........![/.!...
018A10: 21 1A 00 E5 CD 1A 96 CD A8 95 C3 00 00 DD F9 DD !...............
018A20: E1 C9 DD E5 DD 21 00 00 DD 39 DD 6E 04 DD 66 05 .....!...9.n..f.
018A30: 22 04 A1 21 FF FF 22 06 A1 2A 04 A1 11 FF FF B7 "..!.."..*......
018A40: ED 52 C2 48 03 C3 9F 03 2A 04 A1 22 06 A1 2A 04 .R.H....*.."..*.
018A50: A1 EB DD E5 E1 01 06 00 09 01 08 00 CD 57 98 D2 .............W..
018A60: 73 03 2A 04 A1 11 0A 00 19 5E 23 56 ED 53 04 A1 s.*......^#V.S..
018A70: C3 9C 03 2A 04 A1 DD E5 D1 01 06 00 EB 09 EB 01 ...*............
018A80: 08 00 CD 57 98 D2 99 03 2A 04 A1 11 08 00 19 5E ...W....*......^
018A90: 23 56 ED 53 04 A1 C3 9C 03 C3 9F 03 C3 39 03 DD #V.S.........9..
018AA0: E1 D1 21 0A 00 39 F9 EB E9 DD E5 DD 21 00 00 DD ..!..9......!...
018AB0: 39 E5 DD E5 D1 01 08 00 EB 09 EB 21 F8 FF 39 F9 9..........!..9.
018AC0: EB 01 08 00 ED B0 DD 6E 06 DD 66 07 5E 23 56 EB .......n..f.^#V.
018AD0: E5 CD 22 03 2A 04 A1 11 FF FF B7 ED 52 CA FE 03 ..".*.......R...
018AE0: DD 6E 04 26 00 CB 0D D2 FB 03 11 76 2F 21 C4 FF .n.&.......v/!..
018AF0: 39 F9 EB 01 3C 00 ED B0 CD 0C 01 C3 9E 04 DD E5 9...<...........
018B00: E1 01 FE FF 09 E5 21 11 00 E5 CD B8 85 DD 6E FE ......!.......n.
018B10: DD 66 FF EB DD E5 E1 01 08 00 09 01 08 00 ED B0 .f..............
018B20: DD 6E FE DD 66 FF 11 08 00 19 11 FF FF 73 23 72 .n..f........s#r
018B30: DD 6E FE DD 66 FF 11 0A 00 19 11 FF FF 73 23 72 .n..f........s#r
018B40: 2A 06 A1 11 FF FF B7 ED 52 C2 5E 04 DD 6E 06 DD *.......R.^..n..
018B50: 66 07 DD 5E FE DD 56 FF 73 23 72 C3 95 04 2A 06 f..^..V.s#r...*.
018B60: A1 EB DD E5 E1 01 08 00 09 01 08 00 CD 57 98 D2 .............W..
018B70: 85 04 2A 06 A1 11 0A 00 19 DD 5E FE DD 56 FF 73 ..*.......^..V.s
018B80: 23 72 C3 95 04 2A 06 A1 11 08 00 19 DD 5E FE DD #r...*.......^..
018B90: 56 FF 73 23 72 DD 6E FE DD 66 FF 22 04 A1 DD F9 V.s#r.n..f."....
018BA0: DD E1 D1 21 0C 00 39 F9 EB E9 DD E5 DD 21 00 00 ...!..9......!..
018BB0: DD 39 DD 6E 06 DD 66 07 ED 5B 82 9E D5 22 82 9E .9.n..f..[..."..
018BC0: E5 FD E1 DD 5E 04 DD 56 05 21 00 00 B7 ED 52 C2 ....^..V.!....R.
018BD0: F5 04 FD 6E 00 26 00 11 FF 00 B7 ED 52 21 00 00 ...n.&......R!..
018BE0: 20 01 2C 26 00 DD 75 08 DD 74 09 E1 22 82 9E C3 .,&..u..t.."...
018BF0: 98 13 C3 94 13 21 01 00 B7 ED 52 C2 40 05 FD 2A .....!....R.@..*
018C00: 65 78 69 74 65 64 20 2D 20 99 20 68 61 6C 74 27 exited - . halt'
018C10: 29 3B C0 A9 3B C0 00 48 41 4C 54 00 98 C0 89 20 );..;..HALT....
018C20: 9D 3B BF AF 20 E5 28 70 3A 01 15 3B 61 3A AB 3B .;.. .(p:..;a:.;
018C30: 6E 3A AD 3B 8E 20 00 6E 65 77 00 94 3A 01 18 29 n:.;. .new..:..)
018C40: 3B BF 96 B4 00 52 65 67 53 61 76 65 00 92 3D A5 ;....RegSave..=.
018C50: C1 69 79 3A 01 25 3B C1 69 78 3A 01 25 3B C1 68 .iy:.%;.ix:.%;.h
018C60: 6C 3A 01 25 3B C1 64 65 3A 01 25 3B C1 62 63 3A l:.%;.de:.%;.bc:
018C70: 01 25 3B C1 00 61 66 00 90 3A 01 25 3B C1 01 0A .%;..af..:.%;...
018C80: 3A 01 25 3B C1 89 3B BF 96 20 B4 00 70 52 65 67 :.%;..;.. ..pReg
018C90: 53 61 76 65 00 8D 3D A8 20 86 20 92 3B BF 8E B4 Save..=. . .;...
018CA0: 00 70 72 00 8C 3A 8D 3B BF 9C C0 8C 3A 3D 8D 28 .pr..:.;....:=.(
018CB0: AD 28 61 29 2B 6E 2D 01 24 28 92 29 29 3B C0 8C .(a)+n-.$(.));..
018CC0: 5E 2E 01 0A 3A 3D 9D 3B B4 28 2A C9 20 C6 20 FD ^...:=.;.(*. . .
018CD0: 20 FC 20 FB 2C 20 99 20 73 74 6F 70 73 20 BC 20 . ., . stops .
018CE0: 6D 65 73 73 61 67 65 20 2A 29 C0 8C 3A 3D 8D 28 message *)..:=.(
018CF0: AD 28 61 29 2B 6E 2D 01 24 28 92 29 2D 34 29 3B .(a)+n-.$(.)-4);
018D00: C0 94 3A 3D 8C 3B C0 8C 5E 2E 01 0A 3A 3D 70 3B ..:=.;..^...:=p;
018D10: C0 8C 5E 2E 90 3A 3D 30 3B B4 28 2A 63 6C 65 61 ..^..:=0;.(*clea
018D20: 72 20 01 20 20 66 6C 61 67 73 20 2A 29 C0 89 20 r . flags *)..
018D30: E5 3B BF AF 20 01 02 28 70 3A 01 15 3B 6E 3A AD .;.. ..(p:..;n:.
018D40: 29 3B BF 9C BF 28 2A B4 53 74 61 72 74 20 61 20 );...(*.Start a
018D50: 63 6F 6E 63 75 72 72 65 6E 74 20 FE 20 BC 20 99 concurrent . . .
018D60: 20 50 20 CD C0 61 20 77 6F 72 6B 73 70 61 63 65 P ..a workspace
018D70: 20 01 05 20 6E 20 62 79 74 65 73 BF C0 01 15 20 .. n bytes....
018D80: 01 23 20 61 20 73 74 61 6E 64 61 72 64 20 74 79 .# a standard ty
018D90: 70 65 20 72 65 70 72 65 73 65 6E 74 69 6E 67 20 pe representing
018DA0: 61 20 70 61 72 61 6D 65 74 65 72 6C 65 73 73 20 a parameterless
018DB0: FA BF C0 F9 20 73 74 6F 72 61 67 65 20 01 23 20 .... storage .#
018DC0: 67 6F 74 20 01 1F 20 01 20 20 68 65 61 70 BF C0 got .. . heap..
018DD0: AA 20 BD 20 01 04 20 F0 20 E7 20 BC 20 74 68 69 . . .. . . . thi
018DE0: 73 20 FA 20 6D 61 79 20 66 61 6C 6C 20 FC 20 01 s . may fall . .
018DF0: 20 C0 FB 20 77 69 74 68 6F 75 74 20 74 65 72 6D .. without term
018E00: 77 68 65 6E 00 DF 20 00 69 74 00 DE 20 00 61 63 when.. .it.. .ac
018E10: 74 69 76 61 74 65 73 00 DD 20 01 20 C1 F2 20 E3 tivates.. . .. .
018E20: 2A 29 BF C0 F3 3A 3D F2 3B C0 01 27 28 8F 28 F3 *)...:=.;..'(.(.
018E30: 29 29 3B C0 89 20 F4 3B BF BF AF 20 00 49 4F 54 ));.. .;... .IOT
018E40: 52 41 4E 53 46 45 52 00 DC 28 8E 20 F3 2C F2 3A RANSFER..(. .,.:
018E50: 01 18 3B 00 76 61 00 DB 3A AD 3B 8E 20 77 3A 01 ..;.va..:.;. w:.
018E60: 14 29 3B BF BF 28 2A B4 50 65 72 66 6F 72 6D 20 .);..(*.Perform
018E70: 01 22 20 49 6E 70 75 74 2D 4F 75 74 70 75 74 20 ." Input-Output
018E80: 54 72 61 6E 73 66 65 72 BF C0 43 61 75 74 69 6F Transfer..Cautio
018E90: 6E 20 2D 20 F9 20 00 66 6F 6C 6C 6F 77 69 6E 67 n - . .following
018EA0: 00 DA 20 00 63 6F 64 65 00 D9 20 01 23 20 00 6E .. .code.. .# .n
018EB0: 6F 74 00 D8 20 61 74 20 61 6C 6C 20 6E 69 63 65 ot.. at all nice
018EC0: 2E C0 2A 2A 2A 2A 2A 2A 2A C0 F9 20 F3 20 FE 20 ..*******.. . .
018ED0: 01 23 20 01 20 20 FE 20 01 1C 20 E9 20 00 63 61 .# . . .. . .ca
018EE0: 6C 6C 65 64 00 D7 20 DF 20 01 22 20 01 13 20 C0 lled.. . ." .. .
018EF0: 00 6F 63 63 75 72 73 00 D6 2E 20 F9 20 F6 20 74 .occurs... . . t
018F00: 77 6F 20 00 70 61 72 61 6D 65 74 65 72 73 00 D5 wo .parameters..
018F10: 20 00 61 72 65 00 D4 20 01 2A 20 EC 20 F4 2E BF .are.. .* . ...
018F20: C0 F9 20 74 68 69 72 64 20 F7 20 01 23 20 01 20 .. third . .# .
018F30: 20 F7 20 01 1C 20 72 65 63 65 69 76 65 20 61 20 . .. receive a
018F40: 6A 75 6D 70 20 69 6E 73 74 72 75 63 74 69 6F 6E jump instruction
018F50: C0 01 21 20 E1 20 E9 20 00 65 78 65 63 75 74 65 ..! . . .execute
018F60: 64 00 D3 20 DF 20 01 20 20 01 13 20 D6 2E BF C0 d.. . . .. ....
018F70: 46 6F 72 20 65 78 61 6D 70 6C 65 2C 20 00 69 6E For example, .in
018F80: 00 D2 20 00 49 6E 74 65 72 72 75 70 74 00 D1 20 .. .Interrupt..
018F90: 00 4D 6F 64 65 00 D0 20 30 20 28 53 65 65 20 41 .Mode.. 0 (See A
018FA0: 20 4F 73 62 6F 72 6E 65 2C 20 41 6E 20 49 6E 74 Osborne, An Int
018FB0: 72 6F 64 75 63 74 69 6F 6E 20 01 1C C0 4D 69 63 roduction ...Mic
018FC0: 72 6F 63 6F 6D 70 75 74 65 72 73 2C 20 56 6F 6C rocomputers, Vol
018FD0: 20 49 49 20 2D 20 53 6F 6D 65 20 52 65 61 6C 20 II - Some Real
018FE0: 44 65 76 69 63 65 73 20 2D 20 53 59 42 45 58 29 Devices - SYBEX)
018FF0: 2C 20 DB 20 63 6F 72 72 65 73 70 6F 6E 64 73 20 , . corresponds
019000: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
019010: 15 00 00 00 02 09 4E E5 15 00 41 02 00 00 00 02 ......N...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: 69 6E 61 74 69 6E 67 20 01 20 20 9B 20 99 2E 20 inating . . ..
019110: 54 68 65 79 20 73 69 6D 70 6C 79 20 C0 63 65 61 They simply .cea
019120: 73 65 20 01 1C 20 65 78 69 73 74 2C 20 CD 20 01 se .. exist, . .
019130: 20 20 00 73 79 73 74 65 6D 00 8B 20 67 65 74 73 .system.. gets
019140: 20 F5 20 BC 20 70 72 6F 63 65 73 73 69 6E 67 20 . . processing
019150: 61 6E 79 20 72 65 6D 61 69 6E 69 6E 67 20 C0 01 any remaining ..
019160: 04 BF 2A 29 C0 01 28 28 01 01 2C 6E 29 3B C0 4E ..*)..((..,n);.N
019170: 45 57 28 01 07 29 3B C0 E5 28 70 2C 01 01 2C 6E EW(..);..(p,..,n
019180: 2C 01 07 5E 2E 01 19 29 3B C0 01 07 5E 2E 01 17 ,..^...);...^...
019190: 3A 3D 01 09 3B C0 01 09 3A 3D 01 07 3B C0 01 19 :=..;...:=..;...
0191A0: 5E 3A 3D 01 00 3B B5 28 2A 72 65 73 65 74 20 C9 ^:=..;.(*reset .
0191B0: 20 BD 20 74 68 65 79 20 00 64 6F 6E 00 8A 27 74 . they .don..'t
0191C0: 20 73 74 6F 70 20 8B 2A 29 C0 01 27 28 01 07 29 stop .*)..'(..)
0191D0: 3B B4 28 2A 63 61 6C 6C 73 20 FE 20 A6 20 8A 27 ;.(*calls . . .'
0191E0: 74 20 9F 20 B7 20 01 1F C3 01 11 20 75 6E 74 69 t . . ..... unti
0191F0: 6C 20 01 20 20 FE 20 74 65 72 6D 69 6E 61 74 65 l . . terminate
019200: 73 20 6F 72 20 C3 00 77 61 69 74 73 00 88 20 A6 s or ..waits.. .
019210: 20 9F 20 B7 20 9E 20 DF 20 FE 20 88 2A 29 C0 89 . . . . . .*)..
019220: 20 01 02 3B BF AF 20 00 53 45 4E 44 00 87 28 8E ..;.. .SEND..(.
019230: 20 73 3A 01 1A 29 3B BF BF 28 2A B4 F9 20 F6 20 s:..);..(*.. .
019240: FE 20 28 6C 6F 6E 67 65 73 74 20 00 77 61 69 74 . (longest .wait
019250: 69 6E 67 00 85 29 C0 85 20 F5 20 73 20 01 23 20 ing..).. . s .#
019260: 72 65 73 74 61 72 74 65 64 2A 29 BF 8E B4 71 2C restarted*)...q,
019270: 72 2C 74 3A 01 1A 3B BF 9C C0 74 3A 3D 73 3B 72 r,t:..;...t:=s;r
019280: 3A 3D 01 08 3B 71 3A 3D 01 08 3B C0 A0 20 74 3C :=..;q:=..;.. t<
019290: 3E 01 08 20 81 C1 71 3A 3D 72 3B C1 72 3A 3D 74 >.. ..q:=r;.r:=t
0192A0: 3B C1 74 3A 3D 74 5E 2E 01 17 3B C1 89 3B C0 82 ;.t:=t^...;..;..
0192B0: 20 72 3C 3E 01 08 20 95 C1 82 20 71 3D 01 08 20 r<>.. ... q=..
0192C0: 95 20 73 3A 3D 01 08 C1 91 20 71 5E 2E 01 17 3A . s:=.... q^...:
0192D0: 3D 01 08 20 89 3B C1 72 5E 2E 01 17 3A 3D 01 09 =.. .;.r^...:=..
0192E0: 3B C1 01 09 3A 3D 72 3B C1 01 27 28 72 29 3B C1 ;...:=r;..'(r);.
0192F0: 89 3B C0 89 20 87 3B BF AF 20 00 57 41 49 54 00 .;.. .;.. .WAIT.
019300: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
019310: 20 00 52 65 61 6C 49 6E 4F 75 74 00 FD 3B BF BF .RealInOut..;..
019320: 28 2A B4 00 54 68 65 00 FC 20 6E 65 77 20 73 74 (*..The.. new st
019330: 75 66 66 20 00 66 6F 72 00 FB 20 72 65 61 64 20 uff .for.. read
019340: 00 61 6E 64 00 FA 20 00 77 72 69 74 65 00 F9 20 .and.. .write..
019350: 72 65 61 6C 73 20 68 61 73 20 62 65 65 6E 20 61 reals has been a
019360: 64 64 65 64 20 00 69 6E 00 F8 20 00 74 77 6F 00 dded .in.. .two.
019370: F7 20 77 61 79 73 3A BF C0 FC 20 6F 6C 64 20 00 . ways:... old .
019380: 57 72 69 74 65 52 65 61 6C 00 F6 20 FA 20 00 57 WriteReal.. . .W
019390: 72 69 74 65 52 65 61 6C 46 69 78 65 64 00 F5 20 riteRealFixed..
0193A0: 00 72 6F 75 74 69 6E 65 73 00 F4 20 00 6E 6F 77 .routines.. .now
0193B0: 00 F3 20 63 61 6C 6C 20 00 74 68 65 00 F2 20 00 .. call .the.. .
0193C0: 54 65 78 74 00 F1 C0 F4 20 FA 20 74 68 65 6E 20 Text.... . then
0193D0: 00 64 6F 00 F0 20 61 20 B3 2E 20 FC 20 00 52 65 .do.. a .. . .Re
0193E0: 61 64 52 65 61 6C 00 EF 20 00 72 6F 75 74 69 6E adReal.. .routin
0193F0: 65 00 EE 20 72 65 61 64 73 C0 62 6F 74 68 20 74 e.. reads.both t
019400: 79 70 65 73 20 00 6F 66 00 ED 20 00 6E 75 6D 62 ypes .of.. .numb
019410: 65 72 00 EC 20 00 62 75 74 00 EB 20 F2 20 00 52 er.. .but.. . .R
019420: 65 61 64 00 EA 20 63 68 61 72 61 63 74 65 72 20 ead.. character
019430: EE 20 64 69 66 66 65 72 65 6E 74 69 61 74 65 73 . differentiates
019440: C0 62 65 74 77 65 65 6E 20 F2 20 F7 20 66 6F 72 .between . . for
019450: 6D 73 20 ED 20 69 6E 70 75 74 20 2A 29 BF 93 20 ms . input *)..
019460: 49 4E 4F 55 54 20 A3 20 EA 2C 00 57 72 69 74 65 INOUT £ .,.Write
019470: 00 E9 2C 00 57 72 69 74 65 4F 63 74 00 E8 2C 00 ..,.WriteOct..,.
019480: 57 72 69 74 65 48 65 78 00 E7 2C 00 57 72 69 74 WriteHex..,.Writ
019490: 65 49 6E 74 00 E6 2C B3 C1 2C A9 2C 00 74 65 72 eInt..,..,.,.ter
0194A0: 6D 43 48 00 E5 2C 00 41 6C 77 61 79 73 42 75 66 mCH..,.AlwaysBuf
0194B0: 66 65 72 00 E4 2C 00 44 6F 6E 65 00 E3 3B BF 93 fer..,.Done..;..
0194C0: B4 53 59 53 54 45 4D 20 A3 20 AB 2C 8F 3B BF BF .SYSTEM £ .,.;..
0194D0: 28 2A B5 FC 20 66 6F 69 6C 6C 6F 77 69 6E 67 20 (*.. foillowing
0194E0: 69 6D 70 6F 72 74 73 20 00 63 61 6E 00 E2 20 00 imports .can.. .
0194F0: 62 65 00 E1 20 75 73 65 64 20 69 6E 73 74 65 61 be.. used instea
019500: 84 28 8E 20 73 3A 01 1A 29 3B BF BF 28 2A B4 57 .(. s:..);..(*.W
019510: 61 69 74 20 EC 20 61 20 73 69 67 6E 61 6C BF C0 ait . a signal..
019520: AA 20 2D 20 C6 20 65 76 65 72 79 74 68 69 6E 67 . - . everything
019530: 20 88 2C 20 01 20 20 8B 20 64 69 65 73 20 2A 29 ., . . dies *)
019540: BF 8E B4 74 3A 01 1A 3B BF 9C C0 82 20 01 09 3D ...t:..;.... ..=
019550: 01 08 20 95 C1 B3 28 27 20 53 79 73 74 65 6D 20 .. ...(' System
019560: C4 20 6C 6F 63 6B 65 64 20 E7 27 29 3B C1 98 C1 . locked .');...
019570: 89 3B C0 74 3A 3D 01 09 3B C0 01 09 3A 3D 01 09 .;.t:=..;...:=..
019580: 5E 2E 01 17 3B C0 74 5E 2E 01 17 3A 3D 73 3B C0 ^...;.t^...:=s;.
019590: 73 3A 3D 74 3B C0 01 27 28 74 29 3B C0 89 20 84 s:=t;..'(t);.. .
0195A0: 3B C0 BF AF 20 00 41 77 61 69 74 65 64 00 83 28 ;... .Awaited..(
0195B0: 73 3A 01 1A 29 3A AC 3B BF BF 28 2A B4 52 65 74 s:..):.;..(*.Ret
0195C0: 75 72 6E 73 20 9A 20 C6 20 73 6F 6D 65 74 68 69 urns . . somethi
0195D0: 6E 67 20 01 23 20 85 2A 29 BF 9C C0 A7 20 73 3C ng .# .*).... s<
0195E0: 3E 01 08 20 C0 89 20 83 3B BF AF 20 00 49 6E 69 >.. .. .;.. .Ini
0195F0: 74 00 80 28 8E 20 73 3A 01 1A 29 3B BF BF 9C C0 t..(. s:..);....
019600: 73 3A 3D 01 08 3B C0 89 20 80 3B BF 9C C0 D0 32 s:=..;.. .;....2
019610: 3A 3D A1 3B C0 89 20 01 2C 2E BF 20 00 00 C0 89 :=.;.. .,.. ....
019620: 20 01 02 3B BF AF 20 00 53 45 4E 44 00 87 28 8E ..;.. .SEND..(.
019630: 20 73 3A 01 1A 29 3B BF BF 28 2A B4 F9 20 F6 20 s:..);..(*.. .
019640: FE 20 28 6C 6F 6E 67 65 73 74 20 00 77 61 69 74 . (longest .wait
019650: 69 6E 67 00 85 29 C0 85 20 F5 20 73 20 01 23 20 ing..).. . s .#
019660: 72 65 73 74 61 72 74 65 64 2A 29 BF 8E B4 71 2C restarted*)...q,
019670: 72 2C 74 3A 01 1A 3B BF 9C C0 74 3A 3D 73 3B 72 r,t:..;...t:=s;r
019680: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
019690: 20 00 51 75 69 63 6B 53 74 72 00 CE 3B BF 93 B4 .QuickStr..;...
0196A0: 43 6F 6D 6D 61 6E 64 20 A3 20 00 50 61 72 61 6D Command £ .Param
0196B0: 65 74 65 72 00 CD 2C 50 61 72 63 6C 61 73 73 2C eter..,Parclass,
0196C0: 00 47 65 74 50 61 72 61 6D 73 00 CC 3B BF 93 B4 .GetParams..;...
0196D0: AE 20 A3 20 B3 2C A9 2C 00 57 72 69 74 65 00 CB . £ .,.,.Write..
0196E0: 3B BF 93 B4 53 74 6F 72 61 67 65 20 A3 20 41 4C ;...Storage £ AL
0196F0: 4C 4F 43 41 54 45 3B BF 93 B4 46 69 6C 65 73 20 LOCATE;...Files
019700: 64 20 ED 20 F2 20 69 6D 70 6F 72 74 20 66 72 6F d . . import fro
019710: 6D C1 49 6E 4F 75 74 20 00 74 6F 00 E0 20 70 72 m.InOut .to.. pr
019720: 6F 64 75 63 65 20 73 6D 61 6C 6C 65 72 20 70 72 oduce smaller pr
019730: 6F 67 72 61 6D 73 20 2D 20 EB 20 00 79 6F 75 00 ograms - . .you.
019740: DF 20 77 69 6C 6C 20 00 6F 6E 6C 79 00 DE 20 E1 . will .only.. .
019750: 20 61 62 6C 65 20 C1 E0 20 F0 20 49 4F 20 E0 20 able .. . IO .
019760: F2 20 63 6F 6E 73 6F 6C 65 20 BF 93 20 AE 20 A3 . console .. . £
019770: 20 EA 2C E9 2C B3 2C A9 3B BF 93 20 53 6D 61 6C .,.,.,.;.. Smal
019780: 6C 49 4F 20 A3 20 E8 2C E7 2C E6 2C E5 2C E4 2C lIO £ .,.,.,.,.,
019790: C1 E3 3B BF 2A 29 BF 93 B4 49 6E 74 4C 6F 67 69 ..;.*)...IntLogi
0197A0: 63 20 A3 20 00 49 41 4E 44 00 DD 3B BF 9D B4 00 c £ .IAND..;....
0197B0: 74 61 62 00 DC 3D 30 39 78 3B C0 00 53 69 67 44 tab..=09x;..SigD
0197C0: 69 67 69 74 73 00 DB 3D 31 35 3B BF 8E B4 00 74 igits..=15;....t
0197D0: 63 68 00 DA 3A 99 3B C0 00 6E 65 67 00 D9 3A AC ch..:.;..neg..:.
0197E0: 3B C0 00 63 68 73 00 D8 3A 9B 5B 31 2E 2E 31 35 ;..chs..:.[1..15
0197F0: 5D 20 84 20 99 3B C0 61 2C 62 3A 00 52 45 41 4C ] . .;.a,b:.REAL
019800: 00 D7 3B C0 69 2C 6A 2C 6B 2C 6C 3A AA 3B C0 00 ..;.i,j,k,l:.;..
019810: 77 68 6F 6C 65 70 6C 61 63 65 73 00 D6 3A AA 3B wholeplaces..:.;
019820: C0 00 72 76 61 6C 00 D5 2C 00 73 76 61 6C 00 D4 ..rval..,.sval..
019830: 3A D7 3B BF BF AF 20 00 61 74 6F 69 00 D3 28 61 :.;... .atoi..(a
019840: 3A D7 3B 69 3A AA 29 3A D7 3B BF 8E B4 62 3A D7 :.;i:.):.;...b:.
019850: 3B C0 BF 9C C0 62 3A 3D 31 2E 30 3B C0 82 20 69 ;....b:=1.0;.. i
019860: 3C 30 20 95 20 C1 69 3A 3D 2D 69 3B C1 61 3A 3D <0 . .i:=-i;.a:=
019870: 31 2F 61 3B C1 89 3B C0 6C 3A 3D 31 3B C0 94 C1 1/a;..;.l:=1;...
019880: 82 20 DD 28 69 2C 6C 29 3C 3E 30 20 95 20 62 3A . .(i,l)<>0 . b:
019890: 3D 62 2A 61 20 89 3B C1 82 20 6C 3E 3D 69 20 95 =b*a .;.. l>=i .
0198A0: 20 92 20 89 3B C1 61 3A 3D 61 2A 61 3B C1 6C 3A . .;.a:=a*a;.l:
0198B0: 3D 6C 2B 6C 3B C1 89 3B C0 A7 20 62 3B C0 89 20 =l+l;..;.. b;..
0198C0: D3 3B BF 8E B4 00 54 65 78 74 41 64 64 72 00 D2 .;....TextAddr..
0198D0: 3A AB 3B C0 00 54 65 78 74 4C 65 6E 00 D1 3A AD :.;..TextLen..:.
0198E0: 3B C0 00 54 65 78 74 50 6F 73 00 D0 3A AD 3B BF ;..TextPos..:.;.
0198F0: AF 20 00 57 72 69 74 65 43 48 00 CF 28 00 63 68 . .WriteCH..(.ch
019900: A3 20 00 4C 6F 6F 6B 75 70 00 CA 2C 00 43 72 65 £ .Lookup..,.Cre
019910: 61 74 65 00 C9 3B BF 93 B4 53 54 52 45 41 4D 53 ate..;...STREAMS
019920: 20 A3 20 00 43 6F 6E 6E 65 63 74 00 C8 3B BF 93 £ .Connect..;..
019930: B4 53 59 53 54 45 4D 20 A3 20 8F 3B BF 8E B4 00 .SYSTEM £ .;....
019940: 44 69 72 54 65 78 74 00 C7 3A 9B 20 44 69 72 65 DirText..:. Dire
019950: 63 74 69 6F 6E 2C 5B 31 2E 2E 37 5D 20 84 20 99 ction,[1..7] . .
019960: 3D 5B C1 27 66 69 6E 64 BB 27 2C C1 27 63 72 65 =[.'find.',.'cre
019970: 61 74 65 20 27 5D 3B BF AF 20 00 4F 70 65 6E 53 ate '];.. .OpenS
019980: 74 72 65 61 6D 73 00 C6 28 8E 20 00 53 74 72 65 treams..(. .Stre
019990: 61 6D 4C 69 73 74 00 C5 3A 9B 20 84 20 00 53 74 amList..:. . .St
0199A0: 72 65 61 6D 52 65 63 6F 72 64 00 C4 3B 8E 20 00 reamRecord..;. .
0199B0: 4F 70 74 69 6F 6E 73 00 BE 3A 00 4F 70 74 69 6F Options..:.Optio
0199C0: 6E 73 53 65 74 00 B9 29 3A AC 3B BF 8E B4 00 50 nsSet..):.;....P
0199D0: 61 72 73 00 B8 3A 9B 5B 31 2E 2E 36 5D 20 84 20 ars..:.[1..6] .
0199E0: CD 3B C0 00 63 6F 75 6E 74 00 B7 3A AA 3B C0 69 .;..count..:.;.i
0199F0: 3A AA 3B C0 66 3A 70 46 49 4C 45 3B C0 00 72 65 :.;.f:pFILE;..re
019A00: 70 6C 79 00 B6 3A AA 3B BF 9C C0 8A 20 69 3A 3D ply..:.;.... i:=
019A10: 30 20 86 20 98 28 C5 29 20 81 20 C5 5B 69 5D 2E 0 . .(.) . .[i].
019A20: 00 4F 70 65 6E 65 64 00 B2 3A 3D A1 20 89 3B C0 .Opened..:=. .;.
019A30: BE 3A 3D B9 7B 7D 3B C0 CC 28 B8 2C B7 29 3B BF .:=.{};..(.,.);.
019A40: C0 28 2A B4 46 69 72 73 74 2C 20 73 65 65 20 69 .(*.First, see i
019A50: 66 20 74 68 65 72 65 20 61 72 65 20 61 6E 79 20 f there are any
019A60: 6F 70 74 69 6F 6E 73 2A 29 BF C0 97 20 B8 5B B7 options*)... .[.
019A70: 5D 5E 20 81 C1 82 20 00 43 6C 61 73 73 00 B1 3D ]^ ... .Class..=
019A80: 00 6F 70 74 69 6F 6E 00 B0 20 95 C2 8A 20 69 3A .option.. ... i:
019A90: 3D 30 20 86 20 4F 52 44 28 00 4C 65 6E 67 74 68 =0 . ORD(.Length
019AA0: 00 AD 2D 31 29 20 81 20 C3 82 20 00 43 41 50 00 ..-1) . .. .CAP.
019AB0: AB 28 00 43 68 61 72 73 00 A8 5B 69 5D 29 20 83 .(.Chars..[i]) .
019AC0: 20 B9 7B 27 41 27 2E 2E 27 5A 27 7D 20 95 C3 B4 .{'A'..'Z'} ...
019AD0: 49 4E 43 4C 28 BE 2C AB 28 A8 5B 69 5D 29 29 3B INCL(.,.(.[i]));
019AE0: C3 91 C3 B4 B3 28 27 49 6E 76 61 6C 69 64 20 4F .....('Invalid O
019AF0: 70 74 69 6F 6E 20 27 29 3B C3 B4 CB 28 A8 5B 69 ption ');...(.[i
019B00: 00 CE 3A 99 29 3B BF 9C C0 82 20 D0 3C 3D D1 20 ..:.);.... .<=.
019B10: 95 20 D2 5E 3A 3D CE 20 89 3B C0 00 49 4E 43 00 . .^:=. .;..INC.
019B20: CD 28 D2 29 3B C0 CD 28 D0 29 3B C0 89 20 CF 3B .(.);..(.);.. .;
019B30: BF AF 20 00 53 65 74 55 70 00 CC 28 8E 20 F1 3A .. .SetUp..(. .:
019B40: 9B 20 84 20 99 29 3B BF 9C C0 D2 3A 3D 8F 28 F1 . . .);....:=.(.
019B50: 29 3B C0 D1 3A 3D 98 28 F1 29 3B C0 D0 3A 3D 30 );..:=.(.);..:=0
019B60: 3B C0 89 20 CC 3B BF AF 20 00 52 65 61 64 43 48 ;.. .;.. .ReadCH
019B70: 00 CB 28 8E 20 CE 3A 99 29 3B BF 9C C0 82 20 D1 ..(. .:.);.... .
019B80: 3D 30 20 95 20 EA 28 CE 29 C0 9E 20 D0 3E D1 20 =0 . .(.).. .>.
019B90: 95 20 CE 3A 3D 27 20 27 3B E3 3A 3D A1 C0 91 C1 . .:=' ';.:=....
019BA0: E3 3A 3D 9A 3B C1 CE 3A 3D D2 5E 3B C1 CD 28 D2 .:=.;..:=.^;..(.
019BB0: 29 3B C1 82 20 CE 3C 3E 00 43 48 52 00 CA 28 30 );.. .<>.CHR..(0
019BC0: 29 20 95 20 CD 28 D0 29 20 89 3B C1 89 3B C0 89 ) . .(.) .;..;..
019BD0: 20 CB 3B B4 BF AF 20 00 52 65 61 64 52 65 61 6C .;... .ReadReal
019BE0: 4E 75 6D 62 65 72 00 C9 28 8E 20 00 76 61 6C 00 Number..(. .val.
019BF0: C8 3A D7 29 3B BF 8E B4 00 53 61 76 65 42 75 66 .:.);....SaveBuf
019C00: 66 00 C7 3A AC 3B C0 00 52 65 61 64 4F 4B 00 C6 f..:.;..ReadOK..
019C10: 3A AC 3B C0 00 6E 65 67 65 00 C5 3A AC 3B BF 9C :.;..nege..:.;..
019C20: C0 C7 3A 3D E4 3B C0 E4 3A 3D 9A 3B C0 CB 28 DA ..:=.;..:=.;..(.
019C30: 29 3B 20 C0 A0 BC 28 DA 3D 27 20 27 29 20 85 20 ); ...(.=' ') .
019C40: 28 DA 3D DC 29 20 87 20 E3 20 81 20 C1 CB 28 DA (.=.) . . . ..(.
019C50: 29 3B C1 89 3B C0 D9 3A 3D A1 3B C0 82 20 DA 3D );..;..:=.;.. .=
019C60: 27 2D 27 20 95 C1 D9 3A 3D 9A 3B C1 CB 28 DA 29 '-' ...:=.;..(.)
019C70: 3B C0 9E 20 DA 3D 27 2B 27 20 95 20 C1 CB 28 DA ;.. .='+' . ..(.
019C80: 29 3B C1 89 3B C0 D4 3A 3D 30 2E 30 3B C0 C6 3A );..;..:=0.0;..:
019C90: 3D A1 3B C0 A0 20 28 DA 3E 3D 27 30 27 29 20 87 =.;.. (.>='0') .
019CA0: 20 28 DA 3C 3D 27 39 27 29 20 87 20 E3 20 81 20 (.<='9') . . .
019CB0: C1 C6 3A 3D 9A 3B C1 D4 3A 3D 31 30 2E 30 2A D4 ..:=.;..:=10.0*.
019CC0: 2B 28 00 4F 52 44 00 C4 28 DA 29 2D C4 28 27 30 +(.ORD..(.)-.('0
019CD0: 27 29 29 3B C1 CB 28 DA 29 3B C1 89 3B C0 E5 3A '));..(.);..;..:
019CE0: 3D DA 3B C0 82 20 DA 3D 27 2E 27 20 95 20 C1 C6 =.;.. .='.' . ..
019CF0: 3A 3D 9A 3B C1 CB 28 DA 29 3B C1 D5 3A 3D 31 2E :=.;..(.);..:=1.
019D00: 5D 29 3B C3 B4 A9 3B 20 C3 B4 A7 20 9A 3B C3 B4 ]);...; ... .;..
019D10: 89 3B C3 89 3B C2 44 45 43 28 B7 29 3B C2 89 3B .;..;.DEC(.);..;
019D20: 20 28 2A 63 6C 61 73 73 3D B0 2A 29 C1 89 3B 20 (*class=.*)..;
019D30: 28 2A 97 20 B8 5B B7 5D 2A 29 BF C0 28 2A B4 4E (*. .[.]*)..(*.N
019D40: 6F 77 20 70 72 6F 63 65 73 73 20 66 69 6C 65 20 ow process file
019D50: 6E 61 6D 65 73 2A 29 BF C0 8A 20 69 3A 3D 31 20 names*)... i:=1
019D60: 86 20 98 28 C5 29 2B 31 20 81 C1 97 20 B8 5B 69 . .(.)+1 ... .[i
019D70: 5D 5E 20 81 C2 82 20 28 69 3C 3D B7 29 20 87 20 ]^ ... (i<=.) .
019D80: 28 B1 3C 3E 6E 61 6D 65 29 20 95 C3 B3 28 27 20 (.<>name) ...('
019D90: 4E 61 6D 65 20 00 70 61 72 61 6D 65 74 65 72 00 Name .parameter.
019DA0: A6 20 65 78 70 65 63 74 65 64 20 27 29 3B C3 B3 . expected ');..
019DB0: 28 A8 29 3B C3 A9 3B C3 A7 20 9A C2 91 20 C2 BA (.);..;.. ... ..
019DC0: 97 20 C5 5B 69 2D 31 5D 20 81 C2 BD 82 20 28 AD . .[i-1] .... (.
019DD0: 3D 30 29 20 85 20 28 69 3E B7 29 20 95 C3 B4 B2 =0) . (i>.) ....
019DE0: 3A 3D A1 3B C3 B4 82 20 00 4D 75 73 74 53 75 70 :=.;... .MustSup
019DF0: 70 6C 79 00 A5 20 95 C3 B5 B3 28 27 20 52 65 71 ply.. ....(' Req
019E00: 75 69 72 65 64 20 A6 20 6F 6D 69 74 74 65 64 20 uired . omitted
019E10: 27 29 3B C3 B5 A9 3B C3 B5 A7 20 9A 3B C3 B5 89 ');...;... .;...
019E20: 3B C2 BD 91 C3 B4 00 44 65 66 61 75 6C 74 4E 61 ;......DefaultNa
019E30: 6D 65 00 A2 3A 3D 00 46 69 6C 65 4E 61 6D 65 00 me..:=.FileName.
019E40: A0 28 A8 29 3B BD C3 B4 89 3B C2 BD 82 20 00 49 .(.);....;... .I
019E50: 73 53 74 72 65 61 6D 00 9F 20 95 20 4E 45 57 28 sStream.. . NEW(
019E60: 66 29 C2 BD 91 20 66 3A 3D 46 69 6C 65 20 89 3B f)... f:=File .;
019E70: C2 BD B6 3A 3D 31 3B C2 BD 82 20 28 00 44 69 72 ...:=1;... (.Dir
019E80: 00 9E 3D 00 69 6E 70 75 74 00 9D 29 20 85 20 00 ..=.input..) . .
019E90: 4C 6F 6F 6B 75 70 46 69 72 73 74 00 96 20 95 C3 LookupFirst.. ..
019EA0: CA 28 66 5E 2C A2 2C B6 29 3B C3 89 3B C2 BD 82 .(f^,.,.);..;...
019EB0: 20 28 9E 3D 00 6F 75 74 70 75 74 00 94 29 20 87 (.=.output..) .
019EC0: 20 28 B6 3C 3E 30 29 20 95 C3 C9 28 66 5E 2C A0 (.<>0) ...(f^,.
019ED0: 28 A2 29 2C B6 29 3B C3 89 3B C2 BD B2 3A 3D 9A (.),.);..;...:=.
019EE0: 3B C2 BD 82 20 B6 3C 3E 30 20 95 C3 B4 B3 28 27 ;... .<>0 ....('
019EF0: 20 43 6F 75 6C 64 20 6E 6F 74 20 27 29 3B C3 B4 Could not ');..
019F00: 30 3B C1 A0 20 28 DA 3E 3D 27 30 27 29 20 87 20 0;.. (.>='0') .
019F10: 28 DA 3C 3D 27 39 27 29 20 81 20 C2 D4 3A 3D 31 (.<='9') . ..:=1
019F20: 30 2E 30 2A D4 2B 28 C4 28 DA 29 2D C4 28 27 30 0.0*.+(.(.)-.('0
019F30: 27 29 29 3B C2 D5 3A 3D 31 30 2E 30 2A D5 3B C2 '));..:=10.0*.;.
019F40: CB 28 DA 29 3B C2 89 3B C1 D4 3A 3D D4 2F D5 3B .(.);..;..:=./.;
019F50: C1 89 3B C0 E5 3A 3D DA 3B C0 82 20 28 DA 3D 27 ..;..:=.;.. (.='
019F60: 65 27 29 20 85 20 28 DA 3D 27 45 27 29 20 95 C1 e') . (.='E') ..
019F70: 69 3A 3D 30 3B C1 CB 28 DA 29 3B C1 C5 3A 3D DA i:=0;..(.);..:=.
019F80: 3D 27 2D 27 3B C1 82 20 28 DA 3D 27 2D 27 29 20 ='-';.. (.='-')
019F90: 85 20 28 DA 3D 27 2B 27 29 20 95 20 CB 28 DA 29 . (.='+') . .(.)
019FA0: 20 89 3B C1 94 C2 82 20 28 DA 3C 27 30 27 29 20 .;.... (.<'0')
019FB0: 85 20 28 DA 3E 27 39 27 29 20 95 20 92 20 89 3B . (.>'9') . . .;
019FC0: C2 82 20 69 3E 33 30 30 30 20 95 20 92 20 89 3B .. i>3000 . . .;
019FD0: C2 69 3A 3D 31 30 2A 69 2B 28 C4 28 DA 29 2D C4 .i:=10*i+(.(.)-.
019FE0: 28 27 30 27 29 29 3B C2 CB 28 DA 29 3B C2 89 3B ('0'));..(.);..;
019FF0: C1 82 20 C5 20 95 20 D4 3A 3D D4 2F D3 28 31 30 .. . . .:=./.(10
01A000: 2E 30 2C 69 29 C1 91 20 D4 3A 3D D4 2A D3 28 31 .0,i).. .:=.*.(1
01A010: 30 2E 30 2C 69 29 20 89 3B C1 89 3B B5 C0 C0 82 0.0,i) .;..;....
01A020: BA D9 20 95 20 B4 D4 3A 3D 2D D4 20 89 3B C0 C8 .. . ..:=-. .;..
01A030: 3A 3D D4 3B C0 E4 3A 3D C7 3B C0 E3 3A 3D C6 3B :=.;..:=.;..:=.;
01A040: C0 89 20 C9 3B 20 BF AF 20 EF 28 8E 20 61 3A D7 .. .; .. .(. a:.
01A050: 29 3B BF 9C C0 D1 3A 3D 30 3B C0 C9 28 61 29 3B );....:=0;..(a);
01A060: C0 89 20 EF 3B BF AF 20 00 52 65 61 64 52 65 61 .. .;.. .ReadRea
01A070: 6C 54 65 78 74 00 C3 28 8E 20 F1 3A 9B 20 84 20 lText..(. .:. .
01A080: 99 3B 8E 20 00 41 74 50 6F 73 00 BE 3A AD 3B 8E .;. .AtPos..:.;.
01A090: 20 72 3A D7 29 3B BF 9C C0 CC 28 F1 29 3B C0 D0 r:.);....(.);..
01A0A0: 3A 3D BE 3B C0 A0 20 28 D0 3C 3D D1 29 20 87 20 :=.;.. (.<=.) .
01A0B0: 28 99 28 D2 5E 29 3D 27 20 27 29 20 81 C1 CD 28 (.(.^)=' ') ...(
01A0C0: D0 29 3B C1 CD 28 D2 29 3B C1 89 3B C0 82 20 D0 .);..(.);..;.. .
01A0D0: 3E D1 20 95 20 72 3A 3D 30 3B E3 3A 3D A1 3B C0 >. . r:=0;.:=.;.
01A0E0: 91 20 C9 28 72 29 20 89 3B C0 BE 3A 3D D0 3B C0 . .(r) .;..:=.;.
01A0F0: 89 20 C3 3B BF AF 20 00 50 72 65 53 63 61 6C 65 . .;.. .PreScale
01A100: B3 28 C7 5B 9E 5D 29 3B C3 B4 B3 28 A2 29 3B C3 .(.[.]);...(.);.
01A110: B4 A9 3B C3 B4 A7 20 9A 3B C3 B4 89 3B C2 BC 82 ..;... .;...;...
01A120: 20 9F 20 95 20 C8 28 00 53 74 72 65 61 6D 00 92 . . .(.Stream..
01A130: 5E 2C 66 5E 2C 9E 29 20 89 3B C2 BC 89 3B C2 BA ^,f^,.) .;...;..
01A140: 89 C2 89 3B C1 89 3B C0 82 20 B7 3E 28 98 28 C5 ...;..;.. .>(.(.
01A150: 29 2B 31 29 20 95 C1 B3 28 27 20 54 6F 6F 20 6D )+1) ...(' Too m
01A160: 61 6E 79 20 70 61 72 61 6D 65 74 65 72 73 20 61 any parameters a
01A170: 74 20 27 29 3B C1 B3 28 B8 5B B7 5D 5E 2E A8 29 t ');..(.[.]^..)
01A180: 3B C1 A9 3B C1 A7 20 9A 3B C1 89 3B C0 A7 20 A1 ;..;.. .;..;.. .
01A190: 3B C0 89 20 C6 3B BF AF 20 00 56 65 72 79 51 75 ;.. .;.. .VeryQu
01A1A0: 69 63 6B 00 90 28 8E 20 00 49 6E 00 8D 2C 00 4F ick..(. .In..,.O
01A1B0: 75 74 00 8C 3A 53 54 52 45 41 4D 29 3A AC 3B BF ut..:STREAM):.;.
01A1C0: BF 28 2A B4 4F 70 65 6E 20 61 20 00 73 74 72 65 .(*.Open a .stre
01A1D0: 61 6D 00 8B 20 00 66 6F 72 00 88 20 9D 20 61 6E am.. .for.. . an
01A1E0: 64 20 61 20 8B 20 88 20 94 20 2A 29 BF 8E B4 53 d a . . . *)...S
01A1F0: 3A 9B 5B 31 2E 2E 32 5D 20 84 20 C4 3B C0 6F 3A :.[1..2] . .;.o:
01A200: B9 3B BF 9C C0 97 20 53 5B 31 5D 20 81 C1 9F 3A .;.... S[1] ...:
01A210: 3D 9A 3B C1 A2 3A 3D 27 00 43 4F 4E 00 80 3A 27 =.;..:='.CON..:'
01A220: 3B C1 9E 3A 3D 9D 3B C1 96 3A 3D A1 3B C1 A5 3A ;..:=.;..:=.;..:
01A230: 3D A1 3B C1 92 3A 3D 8F 28 8D 29 3B C1 89 3B C0 =.;..:=.(.);..;.
01A240: 97 20 53 5B 32 5D 20 81 C1 9F 3A 3D 9A 3B C1 A2 . S[2] ...:=.;..
01A250: 3A 3D 27 80 3A 27 3B C1 9E 3A 3D 94 3B C1 96 3A :='.:';..:=.;..:
01A260: 3D A1 3B C1 A5 3A 3D A1 3B C1 92 3A 3D 8F 28 8C =.;..:=.;..:=.(.
01A270: 29 3B C1 89 3B C0 A7 20 C6 28 53 2C 6F 29 3B C0 );..;.. .(S,o);.
01A280: 89 20 90 3B BF 89 20 CE 2E BF 00 00 1A 1A 1A 1A . .;.. .........
01A290: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01A2A0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01A2B0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01A2C0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01A2D0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01A2E0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01A2F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01A300: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01A310: 16 00 00 00 02 09 4E E5 16 00 41 02 00 00 00 02 ......N...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: 57 72 69 74 65 4C 6E 3B 0D 0A 09 48 41 4C 54 0D WriteLn;...HALT.
01A410: 0A 09 45 4E 44 20 55 73 61 67 65 3B 0D 0A 50 52 ..END Usage;..PR
01A420: 4F 43 45 44 55 52 45 20 4C 69 73 74 69 74 3B 0D OCEDURE Listit;.
01A430: 0A 0D 0A 56 41 52 09 50 61 72 61 6D 3A 41 52 52 ...VAR.Param:ARR
01A440: 41 59 20 5B 30 2E 2E 31 30 5D 20 4F 46 20 50 61 AY [0..10] OF Pa
01A450: 72 61 6D 65 74 65 72 3B 0D 0A 09 43 6F 75 6E 74 rameter;...Count
01A460: 3A 49 4E 54 45 47 45 52 3B 0D 0A 09 4E 61 6D 65 :INTEGER;...Name
01A470: 73 3A 41 52 52 41 59 20 5B 30 2E 2E 31 30 30 5D s:ARRAY [0..100]
01A480: 20 4F 46 20 46 69 6C 65 4E 61 6D 65 3B 0D 0A 09 OF FileName;...
01A490: 4E 61 6D 65 43 6F 75 6E 74 20 3A 20 49 4E 54 45 NameCount : INTE
01A4A0: 47 45 52 3B 0D 0A 09 43 6F 75 6E 74 65 72 20 3A GER;...Counter :
01A4B0: 20 49 4E 54 45 47 45 52 3B 0D 0A 09 43 6E 74 65 INTEGER;...Cnte
01A4C0: 72 20 3A 20 49 4E 54 45 47 45 52 3B 0D 0A 42 45 r : INTEGER;..BE
01A4D0: 47 49 4E 0D 0A 0D 0A 09 47 65 74 50 61 72 61 6D GIN.....GetParam
01A4E0: 73 28 50 61 72 61 6D 2C 43 6F 75 6E 74 29 3B 0D s(Param,Count);.
01A4F0: 0A 20 20 20 20 20 20 20 20 43 6F 75 6E 74 65 72 . Counter
01A500: 20 3A 3D 20 31 0D 0A 20 20 20 20 20 20 20 20 49 := 1.. I
01A510: 46 20 43 6F 75 6E 74 3D 30 20 54 48 45 4E 20 55 F Count=0 THEN U
01A520: 73 61 67 65 20 45 4E 44 3B 0D 0A 09 49 46 20 50 sage END;...IF P
01A530: 61 72 61 6D 5B 43 6F 75 6E 74 2D 31 5D 5E 2E 43 aram[Count-1]^.C
01A540: 6C 61 73 73 3D 6F 70 74 69 6F 6E 20 54 48 45 4E lass=option THEN
01A550: 0D 0A 09 09 44 45 43 28 43 6F 75 6E 74 29 3B 0D ....DEC(Count);.
01A560: 0A 09 09 49 46 20 43 6F 75 6E 74 3D 30 20 54 48 ...IF Count=0 TH
01A570: 45 4E 20 55 73 61 67 65 20 45 4E 44 3B 0D 0A 09 EN Usage END;...
01A580: 09 47 65 74 4E 61 6D 65 73 28 50 61 72 61 6D 5B .GetNames(Param[
01A590: 43 6F 75 6E 74 2D 31 5D 5E 2E 43 68 61 72 73 2C Count-1]^.Chars,
01A5A0: 4E 61 6D 65 73 2C 4E 61 6D 65 43 6F 75 6E 74 29 Names,NameCount)
01A5B0: 3B 0D 0A 09 09 43 72 65 61 74 65 28 4C 69 73 74 ;....Create(List
01A5C0: 46 2C 4E 61 6D 65 73 5B 30 5D 2C 72 65 70 6C 79 F,Names[0],reply
01A5D0: 29 3B 0D 0A 09 09 49 46 20 72 65 70 6C 79 3C 3E );....IF reply<>
01A5E0: 30 20 54 48 45 4E 0D 0A 09 09 09 57 72 69 74 65 0 THEN.....Write
01A5F0: 53 74 72 69 6E 67 28 27 20 43 6F 75 6C 64 20 6E String(' Could n
01A600: BF C0 28 2A B4 BB 20 E0 20 00 65 6E 67 69 6E 65 ..(*.. . .engine
01A610: 65 72 69 6E 67 00 A2 20 66 6F 72 6D 20 69 66 20 ering.. form if
01A620: 72 65 71 75 69 72 65 64 BF C1 54 68 69 73 20 63 required..This c
01A630: 6F 64 65 20 64 6F 65 73 20 73 6F 20 62 79 20 73 ode does so by s
01A640: 68 69 66 74 69 6E 67 20 6D 6F 72 65 20 B8 20 F8 hifting more . .
01A650: 20 66 72 6F 6E 74 20 ED C1 F2 20 64 6F 74 BF C1 front ... dot..
01A660: 49 66 20 DF 20 77 61 6E 74 20 E0 20 73 68 69 66 If . want . shif
01A670: 74 20 F2 20 6F 74 68 65 72 20 77 61 79 2C 20 63 t . other way, c
01A680: 68 61 6E 67 65 20 F2 20 73 69 67 6E 73 BF C1 6F hange . signs..o
01A690: 6E 20 F2 20 6E 75 6D 62 65 72 73 2A 29 BF 20 C0 n . numbers*). .
01A6A0: 82 20 00 45 6E 67 69 6E 65 65 72 69 6E 67 00 9F . .Engineering..
01A6B0: 20 95 C1 A0 20 28 69 20 8B 20 33 29 3C 3E 30 20 ... (i . 3)<>0
01A6C0: 81 20 C2 69 3A 3D 69 2D 31 3B C2 A6 3A 3D A6 2B . .i:=i-1;..:=.+
01A6D0: 31 3B C2 89 3B C1 89 3B C0 A8 3A 3D B9 2D 28 35 1;..;..;..:=.-(5
01A6E0: 2B 33 29 3B BF C0 28 2A B4 A6 20 F3 20 63 6F 6E +3);..(*.. . con
01A6F0: 74 61 69 6E 73 20 F2 20 EC 20 ED 20 B9 20 E0 20 tains . . . . .
01A700: C1 70 72 65 63 65 64 65 20 F2 20 64 65 63 69 6D .precede . decim
01A710: 61 6C 20 70 6F 69 6E 74 C0 2A 29 BF C0 6A 3A 3D al point.*)..j:=
01A720: AA 28 00 4C 65 61 64 69 6E 67 70 6C 61 63 65 73 .(.Leadingplaces
01A730: 00 97 29 2D A6 3B C0 8A 20 6A 3A 3D 6A 20 86 20 ..)-.;.. j:=j .
01A740: 31 20 80 20 2D 31 20 81 20 CF 28 27 20 27 29 20 1 . -1 . .(' ')
01A750: 89 3B BF C0 6A 3A 3D 30 3B C0 82 20 D9 20 95 20 .;..j:=0;.. . .
01A760: CF 28 27 2D 27 29 C0 91 20 CF 28 27 20 27 29 BA .('-').. .(' ').
01A770: 89 3B C0 82 20 A8 3C 32 20 95 20 A8 3A 3D 32 20 .;.. .<2 . .:=2
01A780: 89 3B BF C0 28 2A B4 F9 20 6F 75 74 20 F2 20 EC .;..(*.. out . .
01A790: 2A 29 C0 82 20 A8 3C A6 20 95 BF C1 28 2A 20 74 *).. .<. ...(* t
01A7A0: 68 69 73 20 E2 20 DE 20 68 61 70 70 65 6E 20 FB his . . happen .
01A7B0: 20 A2 20 66 6F 72 6D 61 74 20 2A 29 C1 A8 3A 3D . format *)..:=
01A7C0: A6 C1 89 3B C0 61 3A 3D 61 2B D3 28 30 2E 31 2C ...;.a:=a+.(0.1,
01A7D0: A8 29 2A 30 2E 35 3B C0 82 20 00 54 52 55 4E 43 .)*0.5;.. .TRUNC
01A7E0: 00 96 28 61 29 3E 39 20 95 C1 61 3A 3D 61 2F 31 ..(a)>9 ..a:=a/1
01A7F0: 30 2E 30 3B C1 69 3A 3D 69 2B 31 C1 89 3B C0 A0 0.0;.i:=i+1..;..
01A800: 6F 74 20 63 72 65 61 74 65 20 6C 69 73 74 20 66 ot create list f
01A810: 69 6C 65 27 29 3B 0D 0A 09 09 09 57 72 69 74 65 ile');.....Write
01A820: 4C 6E 3B 0D 0A 09 09 09 48 41 4C 54 3B 0D 0A 09 Ln;.....HALT;...
01A830: 09 09 45 4E 44 3B 0D 0A 09 09 44 45 43 28 43 6F ..END;....DEC(Co
01A840: 75 6E 74 29 3B 0D 0A 09 09 49 46 20 43 6F 75 6E unt);....IF Coun
01A850: 74 3D 30 20 54 48 45 4E 20 55 73 61 67 65 20 45 t=0 THEN Usage E
01A860: 4E 44 3B 0D 0A 09 45 4C 53 45 0D 0A 09 09 43 72 ND;...ELSE....Cr
01A870: 65 61 74 65 28 4C 69 73 74 46 2C 27 4C 53 54 3A eate(ListF,'LST:
01A880: 27 2C 72 65 70 6C 79 29 3B 0D 0A 09 09 45 4E 44 ',reply);....END
01A890: 3B 0D 0A 09 43 6F 6E 6E 65 63 74 28 4C 69 73 74 ;...Connect(List
01A8A0: 2C 4C 69 73 74 46 2C 6F 75 74 70 75 74 29 3B 0D ,ListF,output);.
01A8B0: 0A 09 46 4F 52 20 69 3A 3D 30 20 54 4F 20 43 6F ..FOR i:=0 TO Co
01A8C0: 75 6E 74 2D 31 20 44 4F 0D 0A 09 09 47 65 74 4E unt-1 DO....GetN
01A8D0: 61 6D 65 73 28 50 61 72 61 6D 5B 69 5D 5E 2E 43 ames(Param[i]^.C
01A8E0: 68 61 72 73 2C 4E 61 6D 65 73 2C 4E 61 6D 65 43 hars,Names,NameC
01A8F0: 6F 75 6E 74 29 3B 0D 0A 09 09 49 46 20 4E 61 6D ount);....IF Nam
01A900: 65 43 6F 75 6E 74 3E 31 20 54 48 45 4E 0D 0A 09 eCount>1 THEN...
01A910: 09 09 53 6F 72 74 52 65 63 6F 72 64 73 28 41 44 ..SortRecords(AD
01A920: 52 28 4E 61 6D 65 73 29 2C 43 41 52 44 49 4E 41 R(Names),CARDINA
01A930: 4C 28 4E 61 6D 65 43 6F 75 6E 74 29 2C 0D 0A 09 L(NameCount),...
01A940: 09 09 09 54 53 49 5A 45 28 46 69 6C 65 4E 61 6D ...TSIZE(FileNam
01A950: 65 29 2C 43 6F 6D 70 61 72 29 3B 0D 0A 09 09 09 e),Compar);.....
01A960: 45 4E 44 3B 0D 0A 09 09 46 4F 52 20 6A 3A 3D 30 END;....FOR j:=0
01A970: 20 54 4F 20 4E 61 6D 65 43 6F 75 6E 74 2D 31 20 TO NameCount-1
01A980: 44 4F 0D 0A 09 09 09 4C 6F 6F 6B 75 70 28 49 6E DO.....Lookup(In
01A990: 66 2C 4E 61 6D 65 73 5B 6A 5D 2C 72 65 70 6C 79 f,Names[j],reply
01A9A0: 29 3B 0D 0A 09 09 09 49 46 20 72 65 70 6C 79 3C );.....IF reply<
01A9B0: 30 20 54 48 45 4E 0D 0A 09 09 09 09 57 72 69 74 0 THEN......Writ
01A9C0: 65 53 74 72 69 6E 67 28 27 20 43 6F 75 6C 64 20 eString(' Could
01A9D0: 6E 6F 74 20 6F 70 65 6E 20 27 29 3B 0D 0A 09 09 not open ');....
01A9E0: 09 09 57 72 69 74 65 53 74 72 69 6E 67 28 4E 61 ..WriteString(Na
01A9F0: 6D 65 73 5B 6A 5D 29 3B 0D 0A 09 09 09 09 57 72 mes[j]);......Wr
01AA00: BA 28 6A 3C 3D A8 29 20 81 C1 6B 3A 3D 96 28 61 .(j<=.) ..k:=.(a
01AA10: 29 3B C1 82 20 6B 3E 39 20 95 20 C2 6B 3A 3D 39 );.. k>9 . .k:=9
01AA20: 3B C2 61 3A 3D 31 30 2E 30 3B C2 89 3B C1 82 20 ;.a:=10.0;..;..
01AA30: 6B 3C 30 20 95 20 C2 00 57 72 69 74 65 52 65 61 k<0 . ..WriteRea
01AA40: 6C 48 65 78 00 90 28 61 2C 31 34 29 3B C2 E6 28 lHex..(a,14);..(
01AA50: 6B 2C 34 29 3B C2 A9 3B C2 89 3B C1 CF 28 CA 28 k,4);..;..;..(.(
01AA60: 6B 2B C4 28 27 30 27 29 29 29 3B C1 61 3A 3D 31 k+.('0')));.a:=1
01AA70: 30 2E 30 2A 28 61 2D 6B 29 3B C1 82 20 61 3C 30 0.0*(a-k);.. a<0
01AA80: 2E 30 20 95 20 61 3A 3D 30 20 89 3B C1 82 20 6A .0 . a:=0 .;.. j
01AA90: 3D A6 20 95 20 CF 28 27 2E 27 29 20 89 3B C1 6A =. . .('.') .;.j
01AAA0: 3A 3D 6A 2B 31 3B C1 89 3B C1 C0 82 20 28 69 3C :=j+1;..;... (i<
01AAB0: 3E 30 29 20 85 20 00 46 6F 72 63 65 45 78 70 6F >0) . .ForceExpo
01AAC0: 6E 65 6E 74 00 8D 20 95 C1 CF 28 27 65 27 29 3B nent.. ...('e');
01AAD0: C1 82 20 69 3C 30 20 95 C2 CF 28 27 2D 27 29 3B .. i<0 ...('-');
01AAE0: C2 69 3A 3D 2D 69 3B C1 91 20 C2 CF 28 27 2B 27 .i:=-i;.. ..('+'
01AAF0: 29 3B C2 89 3B C1 8A 20 6B 3A 3D 31 20 86 20 33 );..;.. k:=1 . 3
01AB00: 20 81 C2 6A 3A 3D 69 20 88 20 31 30 3B C2 6C 3A ..j:=i . 10;.l:
01AB10: 3D 69 2D 31 30 2A 6A 3B C2 D8 5B 6B 5D 3A 3D CA =i-10*j;..[k]:=.
01AB20: 28 6C 2B C4 28 27 30 27 29 29 3B C2 69 3A 3D 6A (l+.('0'));.i:=j
01AB30: 3B C2 89 3B C1 8A 20 6B 3A 3D 33 20 86 20 31 20 ;..;.. k:=3 . 1
01AB40: 80 20 2D 31 20 81 BA CF 28 D8 5B 6B 5D 29 20 89 . -1 ...(.[k]) .
01AB50: 3B C1 89 3B C0 CF 28 CA 28 30 29 29 3B C0 89 20 ;..;..(.(0));..
01AB60: B2 3B BF AF 20 F6 28 63 3A D7 3B B9 3A AD 29 3B .;.. .(c:.;.:.);
01AB70: BF 8E B4 F1 3A 9B 5B 30 2E 2E 33 30 5D 20 84 20 ....:.[0..30] .
01AB80: 99 3B BF 9C C0 B2 28 F1 2C 63 2C B9 29 3B C0 B3 .;....(.,c,.);..
01AB90: 28 F1 29 C0 89 20 F6 3B BF BF AF 20 00 57 72 69 (.).. .;... .Wri
01ABA0: 74 65 52 65 61 6C 4F 63 74 00 8C 28 78 3A D7 3B teRealOct..(x:.;
01ABB0: 6E 3A AD 29 3B BF 8E B4 61 3A AB 3B C0 69 3A AD n:.);...a:.;.i:.
01ABC0: 3B BF 9C C0 61 3A 3D AB 28 AD 28 8F 28 78 29 29 ;...a:=.(.(.(x))
01ABD0: 2B 37 29 3B C0 8A 20 69 3A 3D 38 20 86 20 31 20 +7);.. i:=8 . 1
01ABE0: 80 20 2D 31 20 81 C1 E8 28 61 5E 2C 33 29 3B E9 . -1 ...(a^,3);.
01ABF0: 28 27 20 27 29 3B C1 61 3A 3D AB 28 AD 28 61 29 (' ');.a:=.(.(a)
01AC00: 69 74 65 4C 6E 3B 0D 0A 09 09 09 45 4C 53 45 0D iteLn;.....ELSE.
01AC10: 0A 09 09 09 09 57 72 69 74 65 53 74 72 69 6E 67 .....WriteString
01AC20: 28 27 20 4C 69 73 74 69 6E 67 3A 27 29 3B 0D 0A (' Listing:');..
01AC30: 09 09 09 09 57 72 69 74 65 53 74 72 69 6E 67 28 ....WriteString(
01AC40: 4E 61 6D 65 73 5B 6A 5D 29 3B 0D 0A 09 09 09 09 Names[j]);......
01AC50: 57 72 69 74 65 4C 6E 3B 0D 0A 09 09 09 09 43 6F WriteLn;......Co
01AC60: 75 6E 74 65 72 20 3A 3D 20 31 3B 0D 0A 09 09 09 unter := 1;.....
01AC70: 09 42 75 66 66 65 72 4F 75 74 28 46 46 29 3B 0D .BufferOut(FF);.
01AC80: 0A 09 09 09 09 43 6F 6E 6E 65 63 74 28 49 6E 73 .....Connect(Ins
01AC90: 2C 49 6E 66 2C 69 6E 70 75 74 29 3B 0D 0A 09 09 ,Inf,input);....
01ACA0: 09 09 57 48 49 4C 45 20 4E 4F 54 20 45 4F 53 28 ..WHILE NOT EOS(
01ACB0: 49 6E 73 29 20 44 4F 0D 0A 09 09 09 09 09 52 65 Ins) DO.......Re
01ACC0: 61 64 43 68 61 72 28 49 6E 73 2C 63 68 29 3B 0D adChar(Ins,ch);.
01ACD0: 0A 09 09 09 09 09 49 46 20 63 68 3E 3D 38 30 78 ......IF ch>=80x
01ACE0: 20 54 48 45 4E 0D 0A 09 09 09 09 09 09 63 68 3A THEN........ch:
01ACF0: 3D 43 48 52 28 4F 52 44 28 63 68 29 2D 38 30 68 =CHR(ORD(ch)-80h
01AD00: 29 3B 0D 0A 09 09 09 09 09 09 45 4E 44 3B 0D 0A );........END;..
01AD10: 09 09 09 09 28 2A 6F 75 74 70 75 74 20 63 68 61 ....(*output cha
01AD20: 72 61 63 74 65 72 20 69 66 20 6E 6F 74 20 63 6F racter if not co
01AD30: 6E 74 72 6F 6C 20 63 6F 64 65 2A 29 0D 0A 09 09 ntrol code*)....
01AD40: 09 09 09 49 46 20 28 28 63 68 3E 3D 27 20 27 29 ...IF ((ch>=' ')
01AD50: 20 41 4E 44 20 28 63 68 3C 3D 27 7E 27 29 29 0D AND (ch<='~')).
01AD60: 0A 09 09 09 09 09 20 20 4F 52 20 28 63 68 3D 54 ...... OR (ch=T
01AD70: 41 42 29 0D 0A 09 09 09 09 09 20 20 4F 52 20 28 AB)....... OR (
01AD80: 63 68 3D 43 52 29 0D 0A 09 09 09 09 09 20 20 4F ch=CR)....... O
01AD90: 52 20 28 63 68 3D 4C 46 29 20 54 48 45 4E 20 0D R (ch=LF) THEN .
01ADA0: 0A 09 09 09 09 09 09 42 75 66 66 65 72 4F 75 74 .......BufferOut
01ADB0: 28 63 68 29 20 0D 0A 09 09 09 09 09 09 45 4E 44 (ch) ........END
01ADC0: 3B 0D 0A 09 09 09 09 09 0D 0A 09 09 09 09 09 45 ;..............E
01ADD0: 4E 44 3B 0D 0A 09 09 09 09 44 69 73 63 6F 6E 6E ND;......Disconn
01ADE0: 65 63 74 28 49 6E 73 2C 54 52 55 45 29 3B 0D 0A ect(Ins,TRUE);..
01ADF0: 09 09 09 09 45 4E 44 3B 0D 0A 09 09 09 45 4E 44 ....END;.....END
01AE00: 2D 31 29 3B C1 89 3B C0 89 20 8C 3B BF AF 20 90 -1);..;.. .;.. .
01AE10: 28 78 3A D7 3B 6E 3A AD 29 3B BF 8E B4 61 3A AB (x:.;n:.);...a:.
01AE20: 3B C0 69 3A AD 3B BF 9C C0 61 3A 3D AB 28 AD 28 ;.i:.;...a:=.(.(
01AE30: 8F 28 78 29 29 2B 37 29 3B C0 8A 20 69 3A 3D 38 .(x))+7);.. i:=8
01AE40: 20 86 20 31 20 80 20 2D 31 20 81 C1 E7 28 61 5E . 1 . -1 ...(a^
01AE50: 2C 32 29 3B C1 82 20 6E 3E 31 36 20 95 20 E9 28 ,2);.. n>16 . .(
01AE60: 27 20 27 29 20 89 3B C1 61 3A 3D AB 28 AD 28 61 ' ') .;.a:=.(.(a
01AE70: 29 2D 31 29 3B C1 89 3B C0 89 20 90 3B BF AF 20 )-1);..;.. .;..
01AE80: 00 57 72 69 74 65 52 65 61 6C 46 69 78 65 64 54 .WriteRealFixedT
01AE90: 65 78 74 00 83 28 8E 20 F1 3A 9B 20 84 20 99 3B ext..(. .:. . .;
01AEA0: 78 3A D7 3B B7 2C B9 3A AD 29 3B BF 28 2A B4 B1 x:.;.,.:.);.(*..
01AEB0: 20 61 20 B0 20 EC 2A 29 BF 8E B4 C0 A6 3A AA 3B a . .*).....:.;
01AEC0: BF BF 9C C0 CC 28 F1 29 3B C0 61 3A 3D 78 3B C0 .....(.);.a:=x;.
01AED0: BD 3B BF C0 28 2A 61 64 64 20 68 61 6C 66 20 E0 .;..(*add half .
01AEE0: 20 70 6C 61 63 65 20 61 66 74 65 72 20 6C 65 61 place after lea
01AEF0: 73 74 20 73 69 67 20 64 69 67 69 74 2A 29 C0 A6 st sig digit*)..
01AF00: 3A 3D B7 2D B9 2D 31 3B C0 82 20 D9 20 95 20 A6 :=.-.-1;.. . . .
01AF10: 3A 3D A6 2D 31 20 89 3B BF C0 28 2A 73 70 61 63 :=.-1 .;..(*spac
01AF20: 65 20 66 69 6C 6C 20 66 69 65 6C 64 2A 29 C0 82 e fill field*)..
01AF30: 20 69 3C 3D 30 20 95 20 B4 C1 D6 3A 3D 31 3B C1 i<=0 . ...:=1;.
01AF40: 61 3A 3D 41 42 53 28 78 29 3B C1 69 3A 3D 30 3B a:=ABS(x);.i:=0;
01AF50: C0 91 20 B5 D6 3A 3D 69 2B 31 20 89 3B C0 6A 3A .. ..:=i+1 .;.j:
01AF60: 3D D6 2B AA 28 B9 29 2D 31 3B C0 82 20 6A 3E DB =.+.(.)-1;.. j>.
01AF70: 20 95 20 6A 3A 3D DB 20 89 3B C0 61 3A 3D 61 2B . j:=. .;.a:=a+
01AF80: D3 28 30 2E 31 2C 6A 29 2A 30 2E 35 3B C0 8A 20 .(0.1,j)*0.5;..
01AF90: 6A 3A 3D D6 20 86 20 A6 20 81 20 CF 28 27 20 27 j:=. . . . .(' '
01AFA0: 29 20 89 3B C0 82 20 D9 20 95 20 CF 28 27 2D 27 ) .;.. . . .('-'
01AFB0: 29 20 89 3B C0 8A 20 6A 3A 3D 31 20 86 20 D6 20 ) .;.. j:=1 . .
01AFC0: 81 C1 6B 3A 3D 96 28 61 29 3B C1 82 20 6B 3E 39 ..k:=.(a);.. k>9
01AFD0: 20 95 20 6B 3A 3D 39 20 89 3B C1 CF 28 CA 28 6B . k:=9 .;..(.(k
01AFE0: 2B C4 28 27 30 27 29 29 29 3B C1 61 3A 3D 31 30 +.('0')));.a:=10
01AFF0: 2E 30 2A 28 61 2D 6B 29 3B C1 82 20 61 3C 30 2E .0*(a-k);.. a<0.
01B000: 3B 0D 0A 09 09 45 4E 44 3B 0D 0A 09 45 4E 44 20 ;....END;...END
01B010: 4C 69 73 74 69 74 3B 09 09 09 0D 0A 42 45 47 49 Listit;.....BEGI
01B020: 4E 0D 0A 09 62 75 66 66 6C 65 6E 3A 3D 30 3B 0D N...bufflen:=0;.
01B030: 0A 09 4C 69 73 74 69 74 3B 0D 0A 09 46 6C 75 73 ..Listit;...Flus
01B040: 68 42 75 66 66 65 72 3B 0D 0A 09 44 69 73 63 6F hBuffer;...Disco
01B050: 6E 6E 65 63 74 28 4C 69 73 74 2C 54 52 55 45 29 nnect(List,TRUE)
01B060: 3B 0D 0A 09 45 4E 44 20 4C 69 73 74 2E 0D 0A 1A ;...END List....
01B070: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 00 00 ................
01B080: 00 00 00 00 00 A0 6D 41 0B 7C 03 CA E5 00 00 43 ......mA.|.....C
01B090: 55 53 54 4F 4D 49 5A 45 58 45 00 00 00 00 00 00 USTOMIZEXE......
01B0A0: 00 00 00 00 00 93 6D 41 0B 99 03 DE 84 00 00 46 ......mA.......F
01B0B0: 49 4E 44 50 20 20 20 43 4F 4D 00 00 00 00 00 00 INDP COM......
01B0C0: 00 00 00 00 00 95 35 86 0B AA 03 00 2D 00 00 41 ......5.....-..A
01B0D0: 52 43 20 20 20 20 20 45 58 45 00 00 00 00 00 00 RC EXE......
01B0E0: 00 00 00 00 00 E1 66 FC 0A B0 03 00 6C 00 00 1A ......f.....l...
01B0F0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01B100: 29 3B 0D 0A 09 09 09 09 09 09 45 4E 44 3B 0D 0A );........END;..
01B110: 09 09 09 09 28 2A 6F 75 74 70 75 74 20 63 68 61 ....(*output cha
01B120: 72 61 63 74 65 72 20 69 66 20 6E 6F 74 20 63 6F racter if not co
01B130: 6E 74 72 6F 6C 20 63 6F 64 65 2A 29 0D 0A 09 09 ntrol code*)....
01B140: 09 09 09 49 46 20 28 28 63 68 3E 3D 27 20 27 29 ...IF ((ch>=' ')
01B150: 20 41 4E 44 20 28 63 68 3C 3D 27 7E 27 29 29 0D AND (ch<='~')).
01B160: 0A 09 09 09 09 09 20 20 4F 52 20 28 63 68 3D 54 ...... OR (ch=T
01B170: 41 42 29 0D 0A 09 09 09 09 09 20 20 4F 52 20 28 AB)....... OR (
01B180: 63 68 3D 43 52 29 0D 0A 09 09 09 09 09 20 20 4F ch=CR)....... O
01B190: 52 20 28 63 68 3D 4C 46 29 20 54 48 45 4E 20 0D R (ch=LF) THEN .
01B1A0: 0A 09 09 09 09 09 09 42 75 66 66 65 72 4F 75 74 .......BufferOut
01B1B0: 28 63 68 29 20 0D 0A 09 09 09 09 09 09 45 4E 44 (ch) ........END
01B1C0: 3B 0D 0A 09 09 09 09 09 0D 0A 09 09 09 09 09 45 ;..............E
01B1D0: 4E 44 3B 0D 0A 09 09 09 09 44 69 73 63 6F 6E 6E ND;......Disconn
01B1E0: 65 63 74 28 49 6E 73 2C 54 52 55 45 29 3B 0D 0A ect(Ins,TRUE);..
01B1F0: 09 09 09 09 45 4E 44 3B 0D 0A 09 09 09 45 4E 44 ....END;.....END
01B200: 30 20 95 20 61 3A 3D 30 2E 30 20 89 3B C1 89 3B 0 . a:=0.0 .;..;
01B210: C0 CF 28 27 2E 27 29 3B C0 8A 20 6A 3A 3D 31 20 ..('.');.. j:=1
01B220: 86 20 AA 28 B9 29 20 81 C1 6B 3A 3D 96 28 61 29 . .(.) ..k:=.(a)
01B230: 3B C1 82 20 6B 3E 39 20 95 20 6B 3A 3D 39 3B 61 ;.. k>9 . k:=9;a
01B240: 3A 3D 31 30 2E 30 20 89 3B BF 28 2A B5 82 20 28 :=10.0 .;.(*.. (
01B250: 6B 3C 30 29 20 85 20 28 6B 3E 39 29 20 95 C2 B3 k<0) . (k>9) ...
01B260: 28 27 6B 3D 27 29 3B E6 28 6B 2C 36 29 3B C2 90 ('k=');.(k,6);..
01B270: 28 61 2C 31 34 29 3B A9 3B C2 89 3B 2A 29 C1 CF (a,14);.;..;*)..
01B280: 28 CA 28 6B 2B C4 28 27 30 27 29 29 29 3B C1 61 (.(k+.('0')));.a
01B290: 3A 3D 31 30 2E 30 2A 28 61 2D 6B 29 3B C1 82 20 :=10.0*(a-k);..
01B2A0: 61 3C 30 2E 30 20 95 20 61 3A 3D 30 2E 30 20 89 a<0.0 . a:=0.0 .
01B2B0: 3B C1 89 3B C0 CF 28 CA 28 30 29 29 3B C0 89 20 ;..;..(.(0));..
01B2C0: 83 3B BF AF 20 F5 28 78 3A D7 3B B7 2C B9 3A AD .;.. .(x:.;.,.:.
01B2D0: 29 3B BF 8E B4 F1 3A 9B 5B 30 2E 2E 33 30 5D 20 );....:.[0..30]
01B2E0: 84 20 99 3B BF 9C C0 83 28 F1 2C 78 2C B7 2C B9 . .;....(.,x,.,.
01B2F0: 29 3B C0 B3 28 F1 29 3B C0 89 20 F5 3B BF 9C C0 );..(.);.. .;...
01B300: A5 3A 3D 30 3B C0 9F 3A 3D A1 3B C0 97 3A 3D 32 .:=0;..:=.;..:=2
01B310: 3B C0 8D 3A 3D 9A 3B C0 89 20 FD 2E BF BF BF BF ;..:=.;.. ......
01B320: 00 00 66 69 6C 6C 20 66 69 65 6C 64 2A 29 C0 82 ..fill field*)..
01B330: 20 69 3C 3D 30 20 95 20 B4 C1 D6 3A 3D 31 3B C1 i<=0 . ...:=1;.
01B340: 61 3A 3D 41 42 53 28 78 29 3B C1 69 3A 3D 30 3B a:=ABS(x);.i:=0;
01B350: C0 91 20 B5 D6 3A 3D 69 2B 31 20 89 3B C0 6A 3A .. ..:=i+1 .;.j:
01B360: 3D D6 2B AA 28 B9 29 2D 31 3B C0 82 20 6A 3E DB =.+.(.)-1;.. j>.
01B370: 20 95 20 6A 3A 3D DB 20 89 3B C0 61 3A 3D 61 2B . j:=. .;.a:=a+
01B380: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
01B390: 20 00 53 65 74 55 70 43 61 6C 6C 00 9A 3B BF BF .SetUpCall..;..
01B3A0: 28 2A B4 8D 20 55 70 20 63 61 6C 6C 20 70 61 72 (*.. Up call par
01B3B0: 61 6D 65 74 65 72 73 20 66 6F 72 20 61 20 70 72 ameters for a pr
01B3C0: 6F 67 72 61 6D 20 61 6E 64 20 63 68 61 69 6E 20 ogram and chain
01B3D0: 74 6F 20 69 74 C0 2A 29 BF 93 B4 43 68 61 69 6E to it.*)...Chain
01B3E0: 20 A3 20 00 4C 6F 61 64 41 6E 64 45 78 65 63 75 £ .LoadAndExecu
01B3F0: 74 65 00 97 3B BF 93 B4 53 59 53 54 45 4D 20 A3 te..;...SYSTEM £
01B400: 00 BD 3B BF BF 28 2A B4 00 43 6F 6E 76 65 72 74 ..;..(*..Convert
01B410: 00 BB 20 F2 20 EC 20 E0 20 E1 20 F8 20 F2 20 72 .. . . . . . . r
01B420: 61 6E 67 65 20 31 20 E0 20 31 30 20 28 75 6E 6C ange 1 . 10 (unl
01B430: 65 73 73 20 7A 65 72 6F 29 C0 69 20 72 65 74 75 ess zero).i retu
01B440: 72 6E 73 20 00 70 6C 61 63 65 73 00 B9 20 73 68 rns .places.. sh
01B450: 69 66 74 65 64 20 F8 20 70 72 6F 63 65 73 73 2A ifted . process*
01B460: 29 BF 9C C0 D9 3A 3D 61 3C 30 2E 30 3B C0 82 20 )....:=a<0.0;..
01B470: D9 20 95 20 61 3A 3D 2D 61 20 89 3B C0 28 2A 63 . . a:=-a .;.(*c
01B480: 61 6C 63 75 6C 61 74 65 20 77 68 6F 6C 65 20 00 alculate whole .
01B490: 64 69 67 69 74 73 00 B8 20 00 73 69 7A 65 00 B7 digits.. .size..
01B4A0: 2A 29 C0 69 3A 3D 30 3B C0 82 20 61 3C 3E 30 2E *).i:=0;.. a<>0.
01B4B0: 30 20 95 C1 A0 20 61 3E 3D 31 2E 30 65 31 34 20 0 ... a>=1.0e14
01B4C0: 81 20 C2 61 3A 3D 61 2F 31 2E 30 65 31 34 3B C2 . .a:=a/1.0e14;.
01B4D0: 69 3A 3D 69 2B 31 34 3B C2 89 3B C1 A0 20 61 3E i:=i+14;..;.. a>
01B4E0: 3D 31 30 2E 30 20 81 C2 61 3A 3D 61 2F 31 30 2E =10.0 ..a:=a/10.
01B4F0: 30 3B C2 69 3A 3D 69 2B 31 3B C2 89 3B BF 20 B5 0;.i:=i+1;..;. .
01B500: A0 20 61 3C 31 2E 30 65 2D 31 34 20 81 BF 28 2A . a<1.0e-14 ..(*
01B510: B6 B3 28 27 20 3C 3C 20 27 29 3B 2A 29 C2 61 3A ..(' << ');*).a:
01B520: 3D 31 2E 30 65 31 34 2A 61 3B C2 69 3A 3D 69 2D =1.0e14*a;.i:=i-
01B530: 31 34 3B C2 89 3B C1 A0 20 61 3C 31 2E 30 20 81 14;..;.. a<1.0 .
01B540: BF 28 2A B6 B3 28 27 20 3C 20 27 29 3B 2A 29 C2 .(*..(' < ');*).
01B550: 61 3A 3D 31 30 2E 30 2A 61 3B C2 69 3A 3D 69 2D a:=10.0*a;.i:=i-
01B560: 31 3B C2 89 3B C1 89 3B C0 89 20 BD 3B BF AF 20 1;..;..;.. .;..
01B570: 00 57 72 69 74 65 52 65 61 6C 54 65 78 74 00 B2 .WriteRealText..
01B580: 28 8E 20 F1 3A 9B 20 84 20 99 3B 63 3A D7 3B B9 (. .:. . .;c:.;.
01B590: 3A AD 29 3B BF 28 2A B4 00 6F 75 74 70 75 74 00 :.);.(*..output.
01B5A0: B1 20 61 20 00 72 65 61 6C 00 B0 20 EC 2A 29 BF . a .real.. .*).
01B5B0: 8E B4 00 73 69 67 64 69 67 69 74 73 00 A8 3A AA ...sigdigits..:.
01B5C0: 3B C0 00 70 6C 61 63 65 73 62 65 66 6F 72 65 64 ;..placesbefored
01B5D0: 6F 74 00 A6 3A AA 3B BF 9C C0 CC 28 F1 29 3B C0 ot..:.;....(.);.
01B5E0: 61 3A 3D 63 3B C0 BD 3B C0 A6 3A 3D 00 53 63 61 a:=c;..;..:=.Sca
01B5F0: 6C 65 00 A5 3B C0 69 3A 3D 69 2D AA 28 A5 29 3B le..;.i:=i-.(.);
01B600: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01B610: 17 00 00 00 02 09 4E E5 17 00 41 02 00 00 00 02 ......N...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: 20 00 42 59 54 45 00 96 3B BF 28 2A B4 4C 6F 77 .BYTE..;.(*.Low
01B710: 20 63 6F 72 65 20 76 61 72 69 61 62 6C 65 73 2A core variables*
01B720: 29 BF 8E B4 00 66 63 62 00 94 31 5B 35 00 63 68 )....fcb..1[5.ch
01B730: 00 92 5D 3A 94 3B C0 94 32 5B 36 92 5D 3A 94 3B ..]:.;..2[6.]:.;
01B740: C0 00 63 6F 6D 6D 61 6E 64 6C 65 6E 00 91 5B 38 ..commandlen..[8
01B750: 30 68 5D 3A 96 3B C0 00 63 6F 6D 6D 61 6E 64 00 0h]:.;..command.
01B760: 90 5B 38 31 68 5D 3A 9B 5B 30 2E 2E 38 30 5D 20 .[81h]:.[0..80]
01B770: 84 20 99 3B C0 69 2C 6A 3A AA 3B BF AF 20 00 4D . .;.i,j:.;.. .M
01B780: 61 6B 65 43 61 6C 6C 00 8F 28 00 70 72 6F 67 6E akeCall..(.progn
01B790: 61 6D 65 00 8C 3A 9B 20 84 20 99 3B 8E 20 66 3A ame..:. . .;. f:
01B7A0: 94 29 3B BF 9C BF 20 B4 94 31 3A 3D 66 3B C0 94 .);... ..1:=f;..
01B7B0: 32 2E 00 66 63 62 64 6E 00 8B 3A 3D 30 3B C0 94 2..fcbdn..:=0;..
01B7C0: 32 2E 00 66 63 62 66 6E 00 88 5B 31 5D 3A 3D 27 2..fcbfn..[1]:='
01B7D0: 20 27 3B C0 28 2A 73 65 74 20 75 70 20 90 20 6C ';.(*set up . l
01B7E0: 69 6E 65 2A 29 BF C0 69 3A 3D 30 3B C0 6A 3A 3D ine*)..i:=0;.j:=
01B7F0: 31 3B C0 82 20 94 31 2E 8B 3C 3E 30 20 95 C1 90 1;.. .1..<>0 ...
01B800: 5B 69 5D 3A 3D 43 48 52 28 00 4F 52 44 00 85 28 [i]:=CHR(.ORD..(
01B810: 94 31 2E 8B 29 2B 85 28 27 41 27 29 2D 31 29 3B .1..)+.('A')-1);
01B820: C1 00 49 4E 43 00 83 28 69 29 3B C1 90 5B 69 5D ..INC..(i);..[i]
01B830: 3A 3D 27 3A 27 3B C1 83 28 69 29 3B C1 89 3B C0 :=':';..(i);..;.
01B840: A0 20 28 6A 3C 3D 38 29 20 87 20 28 94 31 2E 88 . (j<=8) . (.1..
01B850: 5B 6A 5D 3C 3E 27 20 27 29 20 81 C1 90 5B 69 5D [j]<>' ') ...[i]
01B860: 3A 3D 94 31 2E 88 5B 6A 5D 3B C1 83 28 69 29 3B :=.1..[j];..(i);
01B870: C1 83 28 6A 29 3B C1 89 3B C0 6A 3A 3D 31 3B C0 ..(j);..;.j:=1;.
01B880: 90 5B 69 5D 3A 3D 27 2E 27 3B C0 83 28 69 29 3B .[i]:='.';..(i);
01B890: C0 A0 20 28 6A 3C 3D 33 29 20 87 20 28 66 2E 00 .. (j<=3) . (f..
01B8A0: 66 63 62 66 74 00 80 5B 6A 5D 3C 3E 27 20 27 29 fcbft..[j]<>' ')
01B8B0: 20 81 C1 90 5B 69 5D 3A 3D 94 31 2E 80 5B 6A 5D ...[i]:=.1..[j]
01B8C0: 3B C1 83 28 69 29 3B C1 83 28 6A 29 3B C1 89 3B ;..(i);..(j);..;
01B8D0: C0 6A 3A 3D 30 3B C0 A0 20 28 6A 3C 3D 98 28 8C .j:=0;.. (j<=.(.
01B8E0: 29 29 20 87 20 28 8C 5B 6A 5D 3C 3E 27 5B 27 29 )) . (.[j]<>'[')
01B8F0: 20 81 20 83 28 6A 29 20 89 3B C0 82 20 28 6A 3C . .(j) .;.. (j<
01B900: 8F 3A 9B 20 5B 31 2E 2E 31 30 20 28 2A 98 28 AB .:. [1..10 (*.(.
01B910: 29 2A 29 5D 20 84 20 AC 3B C0 00 50 69 76 6F 74 )*)] . .;..Pivot
01B920: 4E 6F 00 8D 3A AD 3B C0 00 4D 61 78 45 6C 65 6D No..:.;..MaxElem
01B930: 65 6E 74 00 8B 2C 00 48 65 61 64 45 6C 65 6D 65 ent..,.HeadEleme
01B940: 6E 74 00 88 3A B9 3B C0 69 2C 6A 2C 6B 3A AD 3B nt..:.;.i,j,k:.;
01B950: B4 C0 61 2C 62 3A B9 3B C0 00 74 65 6D 70 00 87 ..a,b:.;..temp..
01B960: 3A AB 3B C0 63 2C 64 2C 65 3A B9 3B BF 9C C0 28 :.;.c,d,e:.;...(
01B970: 2A C8 20 61 6C 6C 20 70 69 76 6F 74 73 20 91 20 *. all pivots .
01B980: 66 61 6C 73 65 2A 29 C0 8A 20 69 3A 3D 31 20 86 false*).. i:=1 .
01B990: 20 AA 20 81 20 8F 5B 69 5D 3A 3D A1 20 89 3B C0 . . .[i]:=. .;.
01B9A0: 8A 20 69 3A 3D 31 20 86 20 AA 2D 31 20 81 C1 28 . i:=1 . .-1 ..(
01B9B0: 2A 63 68 6F 6F 73 65 20 61 20 00 70 69 76 6F 74 *choose a .pivot
01B9C0: 00 85 2A 29 C1 8B 3A 3D 30 2E 30 3B C1 8D 3A 3D ..*)..:=0.0;..:=
01B9D0: 30 3B C1 8A 20 6A 3A 3D 31 20 86 20 AA 20 81 C1 0;.. j:=1 . . ..
01B9E0: BC 82 20 8C 20 8F 5B 6A 5D 20 95 C2 82 20 B2 28 .. . .[j] ... .(
01B9F0: B0 5B 69 2D 31 5D 5B 6A 5D 29 3E 8B 20 95 C3 B3 .[i-1][j])>. ...
01BA00: 28 27 20 74 72 79 69 6E 67 20 27 29 3B C4 28 6A (' trying ');.(j
01BA10: 2C 35 29 3B A9 3B C3 8D 3A 3D 6A 3B C3 8B 3A 3D ,5);.;..:=j;..:=
01BA20: B2 28 B0 5B 69 2D 31 5D 5B 6A 5D 29 3B C3 89 3B .(.[i-1][j]);..;
01BA30: C2 89 3B C1 BC 89 3B 28 2A 8C 20 8F 2A 29 C1 82 ..;...;(*. .*)..
01BA40: 20 8D 3D 30 20 95 C2 B3 28 27 20 53 69 6E 67 75 .=0 ...(' Singu
01BA50: 6C 61 72 20 B0 27 29 3B C2 48 41 4C 54 3B C2 89 lar .');.HALT;..
01BA60: 3B C1 8F 5B 8D 5D 3A 3D 9A 3B C1 90 5B 69 5D 3A ;..[.]:=.;..[i]:
01BA70: 3D 8D 3B C1 B3 28 27 20 00 6E 65 78 74 00 83 20 =.;..(' .next..
01BA80: 85 20 9D 20 27 29 3B C4 28 8D 2C 35 29 3B BE 28 . . ');.(.,5);.(
01BA90: 8B 2C 31 34 29 3B C1 A9 3B BF 28 2A B5 62 3A 3D .,14);..;.(*.b:=
01BAA0: 8B 3B 2A 29 C1 8B 3A 3D 31 2E 30 2F 8B 3B BF 28 .;*)..:=1.0/.;.(
01BAB0: 2A B5 BD 28 31 2E 30 2F 8B 2C 62 2C 31 29 3B 2A *..(1.0/.,b,1);*
01BAC0: 29 C1 C1 8A 20 6A 3A 3D 31 20 86 20 AA 20 81 C2 )... j:=1 . . ..
01BAD0: 82 20 8C 20 8F 5B 6A 5D 20 95 C2 BC 88 3A 3D 8B . . .[j] ....:=.
01BAE0: 2A B0 5B 69 2D 31 5D 5B 6A 5D 3B BF 28 2A B6 BC *.[i-1][j];.(*..
01BAF0: BD 28 B0 5B 69 2D 31 5D 5B 6A 5D 2C 88 2F 8B 2C .(.[i-1][j],./.,
01BB00: 98 28 8C 29 29 20 95 20 C1 90 5B 69 5D 3A 3D 27 .(.)) . ..[i]:='
01BB10: 5B 27 3B C1 83 28 69 29 3B C1 90 5B 69 5D 3A 3D [';..(i);..[i]:=
01BB20: 8C 5B 6A 2B 31 5D 3B C1 83 28 69 29 3B C1 89 3B .[j+1];..(i);..;
01BB30: C0 91 3A 3D 69 3B C0 66 2E 88 3A 3D 27 BE BA 27 ..:=i;.f..:='..'
01BB40: 3B C0 8A 20 69 3A 3D 30 20 86 20 6A 2D 31 20 81 ;.. i:=0 . j-1 .
01BB50: C1 66 2E 88 5B 69 2B 31 5D 3A 3D 8C 5B 69 5D 3B .f..[i+1]:=.[i];
01BB60: C1 89 3B C0 66 2E 80 3A 3D 27 43 4F 4D 27 3B C0 ..;.f..:='COM';.
01BB70: 66 2E 8B 3A 3D 30 3B C0 66 2E 66 63 62 65 78 3A f..:=0;.f.fcbex:
01BB80: 3D 30 3B C0 66 2E 66 63 62 63 72 3A 3D 30 3B C0 =0;.f.fcbcr:=0;.
01BB90: 97 28 66 29 3B C0 89 20 8F 3B B4 BF 89 20 9A 2E .(f);.. .;... ..
01BBA0: BF BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01BBB0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01BBC0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01BBD0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01BBE0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01BBF0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01BC00: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
01BC10: 20 00 53 6D 61 6C 6C 49 4F 00 B2 3B BF 93 20 43 .SmallIO..;.. C
01BC20: 6F 6E 76 65 72 73 69 6F 6E 73 20 A3 20 00 43 61 onversions £ .Ca
01BC30: 72 64 54 6F 53 74 72 69 6E 67 00 B1 2C 00 49 6E rdToString..,.In
01BC40: 74 54 6F 53 74 72 69 6E 67 00 B0 3B BF 93 20 AE tToString..;.. .
01BC50: 20 A3 20 00 52 65 61 64 00 AB 2C 00 57 72 69 74 £ .Read..,.Writ
01BC60: 65 00 A9 2C B3 2C 00 52 65 61 64 42 75 66 66 65 e..,.,.ReadBuffe
01BC70: 72 00 A8 3B BF 9D B4 4D 61 78 44 65 70 74 68 3D r..;...MaxDepth=
01BC80: 33 3B BF AF 20 00 53 6B 69 70 42 6C 61 6E 6B 73 3;.. .SkipBlanks
01BC90: 00 A7 28 8E 20 00 63 68 00 A5 3A 99 29 3B BF 9C ..(. .ch..:.);..
01BCA0: C0 A6 BF 20 B5 AB 28 A5 29 3B C1 9F 20 A5 3C 3E ... ..(.);.. .<>
01BCB0: 27 20 27 C0 89 20 A7 3B BF AF 20 00 52 65 61 64 ' '.. .;.. .Read
01BCC0: 43 61 72 64 00 A2 28 8E 20 63 3A AD 29 3B BF 8E Card..(. c:.);..
01BCD0: B4 A5 3A 99 3B BF 9C C0 63 3A 3D 30 3B C0 A8 28 ..:.;...c:=0;..(
01BCE0: A1 29 3B C0 A7 28 A5 29 3B C0 A0 20 28 A5 3E 3D .);..(.);.. (.>=
01BCF0: 27 30 27 29 20 87 20 28 A5 3C 3D 27 39 27 29 20 '0') . (.<='9')
01BD00: 32 29 3B 2A 29 C2 BC B0 5B 69 2D 31 5D 5B 6A 5D 2);*)...[i-1][j]
01BD10: 3A 3D 30 2E 30 3B C2 BC 8A 20 6B 3A 3D 69 2B 31 :=0.0;... k:=i+1
01BD20: 20 86 20 A8 20 81 C3 62 3A 3D B0 5B 6B 2D 31 5D . . ..b:=.[k-1]
01BD30: 5B 6A 5D 3B C3 B0 5B 6B 2D 31 5D 5B 6A 5D 3A 3D [j];..[k-1][j]:=
01BD40: B0 5B 6B 2D 31 5D 5B 6A 5D C3 B4 2D B0 5B 6B 2D .[k-1][j]..-.[k-
01BD50: 31 5D 5B 8D 5D 2A 88 3B BF 28 2A B7 BD 28 88 2C 1][.]*.;.(*..(.,
01BD60: 28 62 2D B0 5B 6B 2D 31 5D 5B 6A 5D 29 2F C3 B4 (b-.[k-1][j])/..
01BD70: B0 5B 6B 2D 31 5D 5B 8D 5D 2C 33 29 3B 2A 29 C3 .[k-1][.],3);*).
01BD80: 89 3B 28 2A 8A 2A 29 C2 BC 89 3B 28 2A 82 20 8C .;(*.*)...;(*. .
01BD90: 20 8F 2A 29 C2 89 3B 20 28 2A 8A 20 6A 2A 29 C1 .*)..; (*. j*).
01BDA0: 89 3B 20 28 2A 74 72 69 61 6E 67 75 6C 61 72 69 .; (*triangulari
01BDB0: 73 61 74 69 6F 6E 2A 29 C0 20 28 2A 96 20 9E 20 sation*). (*. .
01BDC0: 9D 20 6E 6F 77 20 75 70 70 65 72 20 74 72 69 61 . now upper tria
01BDD0: 6E 67 75 6C 61 72 2C 20 62 75 74 20 96 20 94 20 ngular, but . .
01BDE0: 92 C0 BB 70 65 72 6D 75 74 65 64 20 61 73 20 67 ...permuted as g
01BDF0: 69 76 65 6E 20 C5 20 90 2A 29 BF C0 28 2A B4 73 iven . .*)..(*.s
01BE00: 6F 6C 76 65 20 96 20 A5 20 A2 20 9F 2A 29 C0 C0 olve . . . .*)..
01BE10: 6B 3A 3D 31 3B C0 A0 20 8F 5B 6B 5D 20 81 20 49 k:=1;.. .[k] . I
01BE20: 4E 43 28 6B 29 20 89 3B C0 90 5B AA 5D 3A 3D 6B NC(k) .;..[.]:=k
01BE30: 3B C0 8A 20 6B 3A 3D AA 2B 31 20 86 20 A8 20 81 ;.. k:=.+1 . . .
01BE40: C1 87 3A 3D B0 5B 6B 2D 31 5D 3B B4 28 2A A5 20 ..:=.[k-1];.(*.
01BE50: A2 20 9F 2A 29 C1 8A 20 69 3A 3D AA 20 86 20 31 . .*).. i:=. . 1
01BE60: 20 80 20 2D 31 20 81 C2 8D 3A 3D 90 5B 69 5D 3B . -1 ...:=.[i];
01BE70: B4 28 2A 72 6F 77 20 91 20 70 72 6F 64 75 63 65 .(*row . produce
01BE80: 20 83 20 72 65 73 75 6C 74 2A 29 C2 61 3A 3D 87 . result*).a:=.
01BE90: 5B 8D 5D 3B C2 8A 20 6A 3A 3D 69 2B 31 20 86 20 [.];.. j:=i+1 .
01BEA0: AA 20 81 C3 62 3A 3D 61 3B C3 61 3A 3D 61 2D B0 . ..b:=a;.a:=a-.
01BEB0: 5B 6A 2D 31 5D 5B 8D 5D 2A B0 5B 6B 2D 31 5D 5B [j-1][.]*.[k-1][
01BEC0: 6A 5D 3B BF 28 2A B7 82 20 B0 5B 6B 2D 31 5D 5B j];.(*.. .[k-1][
01BED0: 6A 5D 3C 3E 30 2E 30 20 95 C3 B4 BD 28 28 62 2D j]<>0.0 ....((b-
01BEE0: 61 29 2F B0 5B 6B 2D 31 5D 5B 6A 5D 2C B0 5B 6A a)/.[k-1][j],.[j
01BEF0: 2D 31 5D 5B 8D 5D 2C 34 29 3B C3 B4 89 3B 2A 29 -1][.],4);...;*)
01BF00: 81 C1 63 3A 3D 31 30 2A 63 2B 28 00 4F 52 44 00 ..c:=10*c+(.ORD.
01BF10: 9E 28 A5 29 2D 9E 28 27 30 27 29 29 3B C1 AB 28 .(.)-.('0'));..(
01BF20: A5 29 3B C1 89 3B 28 2A A0 2A 29 C0 00 74 65 72 .);..;(*.*)..ter
01BF30: 6D 43 48 00 98 3A 3D A5 3B C0 89 20 A2 3B BF AF mCH..:=.;.. .;..
01BF40: 20 00 52 65 61 64 49 6E 74 00 97 28 8E 20 78 3A .ReadInt..(. x:
01BF50: AA 29 3B BF 8E B4 00 6E 65 67 00 96 3A AC 3B C0 .);....neg..:.;.
01BF60: A5 3A 99 3B BF 9C C0 A8 28 A1 29 3B C0 A7 28 A5 .:.;....(.);..(.
01BF70: 29 3B C0 96 3A 3D A1 3B C0 82 20 A5 3D 27 2D 27 );..:=.;.. .='-'
01BF80: 20 95 20 96 3A 3D 9A 20 89 3B C0 82 20 28 A5 3D . .:=. .;.. (.=
01BF90: 27 2D 27 29 20 85 20 28 A5 3D 27 2B 27 29 20 95 '-') . (.='+') .
01BFA0: 20 AB 28 A5 29 20 89 3B C0 78 3A 3D 30 3B C0 A0 .(.) .;.x:=0;..
01BFB0: 20 28 A5 3E 3D 27 30 27 29 20 87 20 28 A5 3C 3D (.>='0') . (.<=
01BFC0: 27 39 27 29 20 81 C1 78 3A 3D 31 30 2A 78 2B 28 '9') ..x:=10*x+(
01BFD0: 9E 28 A5 29 2D 9E 28 27 30 27 29 29 3B C1 AB 28 .(.)-.('0'));..(
01BFE0: A5 29 3B C1 89 3B 28 2A A0 2A 29 C0 98 3A 3D A5 .);..;(*.*)..:=.
01BFF0: 3B C0 82 20 96 20 95 20 78 3A 3D 2D 78 20 89 3B ;.. . . x:=-x .;
01C000: C0 89 20 97 3B BF BF AF 20 00 57 72 69 74 65 43 .. .;... .WriteC
01C010: 61 72 64 49 6E 47 69 76 65 6E 42 61 73 65 00 94 ardInGivenBase..
01C020: 28 63 2C 00 62 61 73 65 00 92 3A AD 3B 00 70 6C (c,.base..:.;.pl
01C030: 61 63 65 73 00 90 3A AD 3B C0 00 7A 65 72 6F 73 aces..:.;..zeros
01C040: 75 70 70 72 65 73 73 00 8F 3A AC 29 3B BF 8E B4 uppress..:.);...
01C050: 00 74 65 78 74 00 8D 3A 9B 5B 31 2E 2E 35 5D 20 .text..:.[1..5]
01C060: 84 20 99 3B C0 00 75 73 65 64 00 8C 3A AA 3B C0 . .;..used..:.;.
01C070: A5 3A 99 3B C0 69 3A AA 3B BF 9C B4 C0 B1 28 63 .:.;.i:.;.....(c
01C080: 2C 92 2C 8D 2C 8C 29 3B C0 82 20 8F 20 95 20 A5 ,.,.,.);.. . . .
01C090: 3A 3D 27 20 27 C0 91 20 A5 3A 3D 27 30 27 20 89 :=' '.. .:='0' .
01C0A0: 3B C0 8A 20 69 3A 3D 8C 2B 31 20 86 20 AA 28 90 ;.. i:=.+1 . .(.
01C0B0: 29 20 81 20 A9 28 A5 29 20 89 3B C0 8A 20 69 3A ) . .(.) .;.. i:
01C0C0: 3D 36 2D 8C 20 86 20 35 20 81 20 A9 28 8D 5B 69 =6-. . 5 . .(.[i
01C0D0: 5D 29 20 89 3B C0 89 20 94 3B BF AF 20 00 57 72 ]) .;.. .;.. .Wr
01C0E0: 69 74 65 43 61 72 64 00 8B 28 63 3A AD 3B 90 3A iteCard..(c:.;.:
01C0F0: AD 29 3B BF 9C C0 94 28 63 2C 31 30 2C 90 2C 9A .);....(c,10,.,.
01C100: C3 89 3B C2 B0 5B 6B 2D 31 5D 5B 69 5D 3A 3D 61 ..;..[k-1][i]:=a
01C110: 2F B0 5B 69 2D 31 5D 5B 8D 5D 3B BF 28 2A B6 BD /.[i-1][.];.(*..
01C120: 28 61 2C B0 5B 6B 2D 31 5D 5B 69 5D 2A B0 5B 69 (a,.[k-1][i]*.[i
01C130: 2D 31 5D 5B 8D 5D 2C 35 29 3B 2A 29 C2 89 3B C1 -1][.],5);*)..;.
01C140: 89 3B BF BF C0 89 20 B1 3B C1 C1 C1 BF 89 20 C9 .;.... .;..... .
01C150: 2E BF BA BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01C160: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01C170: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01C180: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
01C190: 20 00 53 6F 72 74 00 A2 3B BF 28 2A 49 6E 74 65 .Sort..;.(*Inte
01C1A0: 72 6E 61 6C 20 00 73 6F 72 74 00 9D 20 00 6F 66 rnal .sort.. .of
01C1B0: 00 9B 20 66 69 78 65 64 20 6C 65 6E 67 74 68 20 .. fixed length
01C1C0: 72 65 63 6F 72 64 73 2A 29 BF 93 20 46 61 73 74 records*).. Fast
01C1D0: 4D 6F 76 65 20 A3 20 00 53 77 61 70 00 99 3B BF Move £ .Swap..;.
01C1E0: 28 2A B4 75 73 65 73 20 00 71 75 69 63 6B 00 98 (*.uses .quick..
01C1F0: 20 9D 2A 29 BF 8E B4 69 2C 6A 3A AD 3B C0 00 73 .*)...i,j:.;..s
01C200: 6F 72 74 65 64 00 97 3A AC 3B BF AF 20 00 53 6F orted..:.;.. .So
01C210: 72 74 52 65 63 6F 72 64 73 00 96 28 00 74 61 62 rtRecords..(.tab
01C220: 6C 65 00 94 3A AB 3B 00 65 6C 65 6D 65 6E 74 73 le..:.;.elements
01C230: 00 92 2C 00 65 6C 65 6D 65 6E 74 73 69 7A 65 00 ..,.elementsize.
01C240: 90 3A AD 3B C2 00 43 6F 6D 70 61 72 00 8F 3A 4B .:.;..Compar..:K
01C250: 65 79 50 72 6F 63 29 3B BF 8E B4 00 65 6C 00 8D eyProc);....el..
01C260: 3A AD 3B C0 61 2C 62 2C 63 3A AB 3B BF 9C C0 82 :.;.a,b,c:.;....
01C270: 20 92 3D 30 20 95 20 A7 20 89 3B C0 82 20 92 3C .=0 . . .;.. .<
01C280: 35 20 95 C1 28 2A 00 75 73 65 00 8B 20 62 75 62 5 ..(*.use.. bub
01C290: 62 6C 65 20 00 66 6F 72 00 85 20 73 6D 61 6C 6C ble .for.. small
01C2A0: 20 6E 75 6D 62 65 72 20 9B 20 92 2A 29 C1 6A 3A number . .*).j:
01C2B0: 3D 92 2D 31 3B C1 A6 C2 97 3A 3D 9A 3B C2 61 3A =.-1;....:=.;.a:
01C2C0: 3D 94 3B C2 8A 20 69 3A 3D 31 20 86 20 6A 20 81 =.;.. i:=1 . j .
01C2D0: C3 62 3A 3D AB 28 AD 28 61 29 2B 90 29 3B C3 82 .b:=.(.(a)+.);..
01C2E0: 20 8F 28 61 2C 62 29 20 95 20 C3 B4 99 28 61 2C .(a,b) . ...(a,
01C2F0: 62 2C 90 29 3B C3 B4 97 3A 3D A1 C3 B4 89 3B C3 b,.);...:=....;.
01C300: 29 C0 89 20 8B 3B BF AF 20 00 57 72 69 74 65 48 ).. .;.. .WriteH
01C310: 65 78 00 88 28 63 3A AD 3B 90 3A AD 29 3B BF 9C ex..(c:.;.:.);..
01C320: C0 94 28 63 2C 31 36 2C 90 2C A1 29 C0 89 20 88 ..(c,16,.,.).. .
01C330: 3B BF AF 20 00 57 72 69 74 65 4F 63 74 00 83 28 ;.. .WriteOct..(
01C340: 63 3A AD 3B 90 3A AD 29 3B BF 9C C0 94 28 63 2C c:.;.:.);....(c,
01C350: 38 2C 90 2C A1 29 C0 89 20 83 3B BF AF 20 00 57 8,.,.).. .;.. .W
01C360: 72 69 74 65 49 6E 74 00 80 28 63 3A AA 3B 90 3A riteInt..(c:.;.:
01C370: AD 29 3B BF 8E B4 8D 3A 9B 5B 31 2E 2E 36 5D 20 .);....:.[1..6]
01C380: 84 20 99 3B C0 8C 3A AA 3B C0 69 3A AA 3B BF 9C . .;..:.;.i:.;..
01C390: B4 C0 B0 28 63 2C 31 30 2C 8D 2C 8C 29 3B C0 8A ...(c,10,.,.);..
01C3A0: 20 69 3A 3D 8C 2B 31 20 86 20 AA 28 90 29 20 81 i:=.+1 . .(.) .
01C3B0: 20 A9 28 27 20 27 29 20 89 3B C0 8A 20 69 3A 3D .(' ') .;.. i:=
01C3C0: 37 2D 8C 20 86 20 36 20 81 20 A9 28 8D 5B 69 5D 7-. . 6 . .(.[i]
01C3D0: 29 20 89 3B C0 89 20 80 3B BF 9C C0 69 67 6E 6F ) .;.. .;...igno
01C3E0: 72 65 63 68 3A 3D 30 61 78 3B C0 65 6F 6C 63 68 rech:=0ax;.eolch
01C3F0: 3A 3D 30 64 78 3B B4 C0 64 65 6C 69 6D 69 74 65 :=0dx;..delimite
01C400: 72 3A 3D 27 20 27 3B 20 C0 41 6C 77 61 79 73 42 r:=' '; .AlwaysB
01C410: 75 66 66 65 72 3A 3D A1 3B C0 89 20 B2 2E BF BF uffer:=.;.. ....
01C420: 00 00 76 65 72 73 69 6F 6E 73 20 A3 20 00 43 61 ..versions £ .Ca
01C430: 72 64 54 6F 53 74 72 69 6E 67 00 B1 2C 00 49 6E rdToString..,.In
01C440: 74 54 6F 53 74 72 69 6E 67 00 B0 3B BF 93 20 AE tToString..;.. .
01C450: 20 A3 20 00 52 65 61 64 00 AB 2C 00 57 72 69 74 £ .Read..,.Writ
01C460: 65 00 A9 2C B3 2C 00 52 65 61 64 42 75 66 66 65 e..,.,.ReadBuffe
01C470: 72 00 A8 3B BF 9D B4 4D 61 78 44 65 70 74 68 3D r..;...MaxDepth=
01C480: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
01C490: 20 00 53 6F 6C 76 65 00 C9 3B BF BF 28 2A B4 C9 .Solve..;..(*..
01C4A0: 20 61 20 00 73 65 74 00 C8 20 00 6F 66 00 C7 20 a .set.. .of..
01C4B0: 00 65 71 75 61 74 69 6F 6E 73 00 C6 20 00 62 79 .equations.. .by
01C4C0: 00 C5 20 67 61 75 73 73 69 61 6E 20 65 6C 69 6D .. gaussian elim
01C4D0: 69 6E 61 74 69 6F 6E 2A 29 BF 93 20 AE 20 A3 20 ination*).. . £
01C4E0: B3 2C A9 3B BF 93 B4 49 6E 4F 75 74 20 A3 20 00 .,.;...InOut £ .
01C4F0: 57 72 69 74 65 43 61 72 64 00 C4 3B BF 93 20 52 WriteCard..;.. R
01C500: 61 3A 3D 62 3B C3 89 3B 28 2A 8A 2A 29 C3 6A 3A a:=b;..;(*.*).j:
01C510: 3D 6A 2D 31 3B C2 9F 20 97 3B C3 C0 91 20 B4 C1 =j-1;.. .;... ..
01C520: 28 2A 8B 20 98 20 85 20 6D 6F 72 65 2A 29 BF C1 (*. . . more*)..
01C530: 28 2A 00 73 65 6C 65 63 74 00 84 20 61 20 00 70 (*.select.. a .p
01C540: 69 76 6F 74 00 83 2A 29 BF C1 61 3A 3D AB 28 AD ivot..*)..a:=.(.
01C550: 28 94 29 2B 90 2A 28 92 20 88 20 32 29 29 3B C1 (.)+.*(. . 2));.
01C560: 63 3A 3D AB 28 AD 28 94 29 2B 90 2A 28 92 2D 31 c:=.(.(.)+.*(.-1
01C570: 29 29 3B BF C1 28 2A 84 20 6D 69 64 64 6C 65 20 ));..(*. middle
01C580: 00 65 6C 65 6D 65 6E 74 00 80 2A 29 C1 82 20 8F .element..*).. .
01C590: 28 94 2C 61 29 20 95 20 28 2A 94 3E 61 2A 29 C2 (.,a) . (*.>a*).
01C5A0: 82 20 8F 28 63 2C 94 29 20 95 20 62 3A 3D 94 C2 . .(c,.) . b:=..
01C5B0: 9E 20 8F 28 61 2C 63 29 20 95 20 B4 62 3A 3D 61 . .(a,c) . .b:=a
01C5C0: C2 91 B6 62 3A 3D 63 20 89 C1 91 B4 28 2A 61 3E ...b:=c ....(*a>
01C5D0: 3D 94 2A 29 C2 82 20 8F 28 63 2C 61 29 20 95 20 =.*).. .(c,a) .
01C5E0: 62 3A 3D 61 C2 9E 20 8F 28 94 2C 63 29 20 95 20 b:=a.. .(.,c) .
01C5F0: 62 3A 3D 94 C2 91 20 62 3A 3D 63 20 89 3B C2 89 b:=... b:=c .;..
01C600: 3B C1 28 2A 62 20 69 73 20 6E 6F 77 20 83 2A 29 ;.(*b is now .*)
01C610: C1 8D 3A 3D 92 3B C1 61 3A 3D 94 3B C1 A0 20 28 ..:=.;.a:=.;.. (
01C620: AD 28 61 29 3C AD 28 63 29 29 20 81 C2 A0 20 28 .(a)<.(c)) ... (
01C630: AD 28 61 29 3C AD 28 63 29 29 20 87 20 8C 20 8F .(a)<.(c)) . . .
01C640: 28 61 2C 62 29 20 81 20 C3 61 3A 3D AB 28 AD 28 (a,b) . .a:=.(.(
01C650: 61 29 2B 90 29 3B C3 89 3B C2 A0 20 28 AD 28 61 a)+.);..;.. (.(a
01C660: 29 3C AD 28 63 29 29 20 87 20 8C 20 8F 28 62 2C )<.(c)) . . .(b,
01C670: 63 29 20 81 C3 63 3A 3D AB 28 AD 28 63 29 2D 90 c) ..c:=.(.(c)-.
01C680: 29 3B C3 8D 3A 3D 8D 2D 31 3B C3 89 3B C2 82 20 );..:=.-1;..;..
01C690: 28 AD 28 61 29 3C AD 28 63 29 29 20 95 20 C3 99 (.(a)<.(c)) . ..
01C6A0: 28 61 2C 63 2C 90 29 3B BF C3 28 2A 69 66 20 83 (a,c,.);..(*if .
01C6B0: 20 80 20 68 61 73 20 62 65 65 6E 20 6D 6F 76 65 . has been move
01C6C0: 64 2C 20 C3 BA 72 65 70 6F 73 69 74 69 6F 6E 20 d, ..reposition
01C6D0: 70 6F 69 6E 74 65 72 20 74 6F 20 69 74 2A 29 BF pointer to it*).
01C6E0: C3 82 20 61 3D 62 20 95 20 62 3A 3D 63 C3 9E 20 .. a=b . b:=c..
01C6F0: 63 3D 62 20 95 20 62 3A 3D 61 20 89 3B 20 C3 89 c=b . b:=a .; ..
01C700: 65 61 6C 49 6E 4F 75 74 20 A3 20 00 57 72 69 74 ealInOut £ .Writ
01C710: 65 52 65 61 6C 00 BE 2C 57 72 69 74 65 52 65 61 eReal..,WriteRea
01C720: 6C 48 65 78 3B BF BF 28 2A AF 20 00 43 68 65 63 lHex;..(*. .Chec
01C730: 6B 00 BD 28 61 2C 62 3A 00 52 45 41 4C 00 B9 3B k..(a,b:.REAL..;
01C740: 00 41 74 00 B8 3A AD 29 3B BF 9C C0 82 20 00 41 .At..:.);.... .A
01C750: 42 53 00 B2 28 61 2D 62 29 3E B2 28 31 2E 30 65 BS..(a-b)>.(1.0e
01C760: 2D 31 34 2A 28 61 2B 62 29 29 20 95 C1 B3 28 27 -14*(a+b)) ...('
01C770: 20 61 74 20 27 29 3B C1 C4 28 B8 2C 35 29 3B C1 at ');..(.,5);.
01C780: B3 28 27 61 20 62 20 64 69 66 27 29 3B C1 BE 28 .('a b dif');..(
01C790: 61 2C 32 30 29 3B C1 BE 28 62 2C 32 30 29 3B C1 a,20);..(b,20);.
01C7A0: BE 28 61 2D 62 2C 32 30 29 3B C1 A9 3B C1 89 3B .(a-b,20);..;..;
01C7B0: C0 89 20 BD 3B 2A 29 BF AF 20 00 47 61 75 73 73 .. .;*).. .Gauss
01C7C0: 00 B1 28 8E 20 00 4D 61 74 72 69 78 00 B0 3A 9B ..(. .Matrix..:.
01C7D0: 20 84 20 00 43 4F 4C 55 4D 4E 00 AB 3B 00 64 65 . .COLUMN..;.de
01C7E0: 70 74 68 00 AA 2C 00 6C 65 6E 00 A8 3A AD 29 3B pth..,.len..:.);
01C7F0: BF BF 28 2A B4 C9 20 61 20 C8 20 C7 20 C6 20 66 ..(*.. a . . . f
01C800: 6F 72 20 00 61 6E 00 A7 20 61 72 62 69 74 72 61 or .an.. arbitra
01C810: 72 79 20 00 6E 75 6D 62 65 72 00 A6 20 C7 20 00 ry .number.. . .
01C820: 72 69 67 68 74 00 A5 C0 00 68 61 6E 64 00 A2 20 right....hand..
01C830: 00 73 69 64 65 73 00 9F 2E BF C0 00 6D 61 74 72 .sides......matr
01C840: 69 78 00 9E 20 00 69 73 00 9D 20 A7 20 00 61 72 ix.. .is.. . .ar
01C850: 72 61 79 00 99 20 C7 20 63 6F 6C 75 6D 6E 73 20 ray.. . columns
01C860: 77 68 69 63 68 20 00 6D 61 6B 65 00 97 20 75 70 which .make.. up
01C870: 20 00 74 68 65 00 96 20 99 BF C0 AA 20 9D 20 96 .the.. .... . .
01C880: 20 A6 20 C7 20 65 6C 65 6D 65 6E 74 73 20 69 6E . . elements in
01C890: 20 65 61 63 68 20 63 6F 6C 75 6D 6E 2E 20 54 68 each column. Th
01C8A0: 65 20 66 69 72 73 74 C0 AA 20 00 72 6F 77 73 00 e first.. .rows.
01C8B0: 94 20 00 61 72 65 00 92 20 75 73 65 64 20 00 74 . .are.. used .t
01C8C0: 6F 00 91 20 97 20 61 20 73 71 75 61 72 65 20 9E o.. . a square .
01C8D0: 2A 29 BF BF 8E B4 00 50 69 76 6F 74 73 00 90 3A *).....Pivots..:
01C8E0: 9B 5B 31 2E 2E 31 30 BB 28 2A 98 28 AB 29 2A 29 .[1..10.(*.(.)*)
01C8F0: 5D 20 84 20 AD 3B C0 00 50 69 76 6F 74 65 64 00 ] . .;..Pivoted.
01C900: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01C910: 18 00 00 00 02 09 4E E5 18 00 41 02 00 00 00 02 ......N...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: 3B C2 89 3B C1 82 20 28 8D 3D 31 29 20 87 20 8F ;..;.. (.=1) . .
01CA10: 28 61 2C 62 29 20 95 20 99 28 61 2C 62 2C 90 29 (a,b) . .(a,b,.)
01CA20: 20 89 3B C1 82 20 8F 28 61 2C 62 29 20 95 20 44 .;.. .(a,b) . D
01CA30: 45 43 28 8D 29 20 C1 9E 20 8D 3D 92 20 95 20 8D EC(.) .. .=. . .
01CA40: 3A 3D 8D 2D 31 C1 91 20 63 3A 3D AB 28 AD 28 63 :=.-1.. c:=.(.(c
01CA50: 29 2B 90 29 20 89 3B C1 96 28 94 2C 8D 2C 90 2C )+.) .;..(.,.,.,
01CA60: 8F 29 3B C1 96 28 63 2C 92 2D 8D 2C 90 2C 8F 29 .);..(c,.-.,.,.)
01CA70: 3B C1 89 3B 28 2A 3C 35 20 92 2A 29 C0 89 20 96 ;..;(*<5 .*).. .
01CA80: 3B C1 BF 89 20 A2 2E BF 00 00 1A 1A 1A 1A 1A 1A ;... ...........
01CA90: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01CAA0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01CAB0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01CAC0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01CAD0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01CAE0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01CAF0: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01CB00: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
01CB10: 20 00 53 54 4F 52 41 47 45 00 C8 3B BF 28 2A B4 .STORAGE..;.(*.
01CB20: 48 65 61 70 20 61 6C 6C 6F 63 61 74 69 6F 6E 2F Heap allocation/
01CB30: 64 65 61 6C 6C 6F 63 61 74 69 6F 6E BF C0 44 2E deallocation..D.
01CB40: 4D 6F 6F 72 65 20 32 39 20 44 65 63 20 38 34 2A Moore 29 Dec 84*
01CB50: 29 BF 93 20 53 59 53 54 45 4D 20 A3 20 8F 3B BF ).. SYSTEM £ .;.
01CB60: 93 20 49 6E 74 4C 6F 67 69 63 20 A3 20 00 49 41 . IntLogic £ .IA
01CB70: 4E 44 00 C7 3B BF 93 20 4C 4F 41 44 45 52 20 A3 ND..;.. LOADER £
01CB80: 20 00 54 4F 50 00 C6 3B BF 93 20 AE 20 A3 20 B3 .TOP..;.. . £ .
01CB90: 2C A9 3B BF 9D B4 00 48 65 61 64 52 6F 6F 6D 00 ,.;....HeadRoom.
01CBA0: C5 3D 35 31 32 3B B5 28 2A 6D 69 6E 20 68 65 61 .=512;.(*min hea
01CBB0: 64 72 6F 6F 6D 20 62 65 74 77 65 65 6E 20 73 74 droom between st
01CBC0: 61 63 6B 20 00 61 6E 64 00 C4 20 00 68 65 61 70 ack .and.. .heap
01CBD0: 00 BE 2A 29 BF 96 B4 00 46 72 61 6D 65 00 BD 3D ..*)....Frame..=
01CBE0: A5 B5 28 2A 00 46 72 65 65 00 BC 20 00 6C 69 73 ..(*.Free.. .lis
01CBF0: 74 00 BB 20 66 72 61 6D 65 2A 29 C1 00 6E 65 78 t.. frame*)..nex
01CC00: E6 B5 3A 00 44 69 72 65 63 74 69 6F 6E 00 E5 3B ..:.Direction..;
01CC10: C1 00 6F 75 74 70 75 74 66 63 62 00 E4 B4 3A 01 ..outputfcb...:.
01CC20: 00 3B B5 28 2A 01 00 20 E9 20 75 73 65 20 00 66 .;.(*.. . use .f
01CC30: 6F 72 00 E3 20 00 6F 75 74 70 75 74 00 E2 20 EB or.. .output.. .
01CC40: 20 E6 3D 00 69 6E 70 75 74 00 E1 2A 29 C1 00 42 .=.input..*)..B
01CC50: 75 66 66 65 72 53 69 7A 65 00 E0 B4 3A AA 3B B4 ufferSize...:.;.
01CC60: 28 2A EA 20 00 73 69 7A 65 00 DF 20 F3 20 F4 20 (*. .size.. . .
01CC70: 2A 29 C1 00 43 68 61 72 73 52 65 61 64 00 DE B4 *)..CharsRead...
01CC80: 3A AA 3B B4 28 2A F4 20 F3 20 EA 2A 29 C1 00 42 :.;.(*. . .*)..B
01CC90: 75 66 66 65 72 00 DD B5 3A 9B 5B 30 2E 2E F5 2D uffer...:.[0...-
01CCA0: 31 5D 20 84 20 01 11 3B C2 28 2A 54 68 65 20 EA 1] . ..;.(*The .
01CCB0: 20 69 73 20 6F 6E 6C 79 20 75 73 65 64 20 E3 20 is only used .
01CCC0: 01 09 20 66 69 6C 65 73 20 61 6E 64 20 C2 BA 63 .. files and ..c
01CCD0: 6F 6E 73 6F 6C 65 20 E1 20 DF 20 6D 61 79 20 00 onsole . . may .
01CCE0: 62 65 00 DC 20 69 6E 63 72 65 61 73 65 64 20 61 be.. increased a
01CCF0: 74 20 77 69 6C 6C 2A 29 BF C1 89 3B BF 8E B4 69 t will*)...;...i
01CD00: 3A AA 3B C0 00 42 75 66 66 65 72 73 00 DB 3A AD :.;..Buffers..:.
01CD10: 3B BF AF 20 00 43 6F 6E 6E 65 63 74 00 DA 28 8E ;.. .Connect..(.
01CD20: 20 73 3A F1 3B 8E 20 66 3A EE 3B 00 64 69 72 00 s:.;. f:.;.dir.
01CD30: D9 3A E5 29 3B BF 9C C0 FC 28 73 2C 00 53 49 5A .:.);....(s,.SIZ
01CD40: 45 00 D8 28 73 5E 29 2B F5 2A 28 DB 2D 31 29 29 E..(s^)+.*(.-1))
01CD50: 3B C0 97 20 73 5E 20 81 C1 ED 3A 3D EF 28 8F 28 ;.. s^ ...:=.(.(
01CD60: 66 29 29 3B C1 EC 3A 3D A1 3B C1 E6 3A 3D D9 3B f));..:=.;..:=.;
01CD70: C1 E0 3A 3D F5 2A DB 3B C1 82 20 D9 3D E2 20 95 ..:=.*.;.. .=. .
01CD80: 20 E8 3A 3D 30 C1 91 20 E8 3A 3D E0 2B 31 20 89 .:=0.. .:=.+1 .
01CD90: 3B C1 E4 3A 3D ED 5E 2E 66 3B C1 DE 3A 3D E0 C1 ;..:=.^.f;..:=..
01CDA0: 89 3B C0 89 20 DA 3B BF AF 20 00 42 75 66 66 65 .;.. .;.. .Buffe
01CDB0: 72 4F 75 74 00 D7 28 73 3A F1 29 3B BF 8E B4 69 rOut..(s:.);...i
01CDC0: 3A AA 3B BF 9C C0 97 20 73 5E 20 81 C1 ED 5E 2E :.;.... s^ ...^.
01CDD0: 66 3A 3D E4 3B C1 01 0F 28 ED 5E 2C 8F 28 DD 29 f:=.;...(.^,.(.)
01CDE0: 2C E0 2C 69 29 3B C1 82 20 69 3C 3E E0 20 95 20 ,.,i);.. i<>. .
01CDF0: ED 5E 2E 00 65 6F 66 00 D6 3A 3D 9A 20 89 3B C1 .^..eof..:=. .;.
01CE00: 74 00 B9 3A AB 3B C1 00 73 69 7A 65 00 B8 3A AD t..:.;..size..:.
01CE10: 3B C1 89 3B C0 00 50 46 72 61 6D 65 00 B7 3D A8 ;..;..PFrame..=.
01CE20: 20 86 20 BD 3B BF 8E B4 00 46 72 65 65 4C 69 73 . .;....FreeLis
01CE30: 74 00 B6 3A B7 3B C0 00 54 6F 70 4F 66 48 65 61 t..:.;..TopOfHea
01CE40: 70 00 B2 3A AD 3B C0 00 4C 61 73 74 00 B1 2C 00 p..:.;..Last..,.
01CE50: 4C 61 73 74 42 75 74 4F 6E 65 00 B0 2C BC 2C 00 LastButOne..,.,.
01CE60: 4E 65 78 74 00 AC 3A B7 3B BF AF 20 00 41 4C 4C Next..:.;.. .ALL
01CE70: 4F 43 41 54 45 00 A6 28 8E 20 00 50 6F 69 6E 74 OCATE..(. .Point
01CE80: 65 72 00 A2 3A AB 3B B8 3A AD 29 3B BF 28 2A B4 er..:.;.:.);.(*.
01CE90: 00 41 6C 6C 6F 63 61 74 65 00 A1 20 00 6D 65 6D .Allocate.. .mem
01CEA0: 6F 72 79 00 9F 20 00 66 72 6F 6D 00 9E 20 BE 2A ory.. .from.. .*
01CEB0: 29 BF 9C C0 B8 3A 3D C7 28 B8 2B 33 2C 30 66 66 )....:=.(.+3,0ff
01CEC0: 66 63 68 29 3B 20 28 2A 6D 61 6B 65 20 6D 75 6C fch); (*make mul
01CED0: 74 69 70 6C 65 20 00 6F 66 00 9B 20 34 20 62 79 tiple .of.. 4 by
01CEE0: 74 65 73 2A 29 C0 94 B4 BF C1 28 2A 00 74 72 79 tes*).....(*.try
01CEF0: 00 9A 20 74 6F 20 66 69 6E 64 20 9F BF C1 BA 49 .. to find ....I
01CF00: 66 20 00 6E 6F 74 00 99 20 66 6F 75 6E 64 2C 20 f .not.. found,
01CF10: 63 61 6C 6C 20 4D 65 6D 46 75 6C 6C 20 C4 20 9A call MemFull . .
01CF20: 20 61 67 61 69 6E 20 00 69 66 00 98 20 4D 65 6D again .if.. Mem
01CF30: 66 75 6C 6C C1 BA 72 65 74 75 72 6E 73 20 2A 29 full..returns *)
01CF40: BF C1 BC 3A 3D B6 3B C1 B1 3A 3D 00 4E 49 4C 00 ...:=.;..:=.NIL.
01CF50: 97 3B C1 A0 20 28 BC 3C 3E 97 29 20 87 20 28 BC .;.. (.<>.) . (.
01CF60: 5E 2E B8 3C B8 29 20 81 C2 B1 3A 3D BC 3B C2 BC ^..<.) ...:=.;..
01CF70: 3A 3D BC 5E 2E B9 3B C2 89 3B C1 82 20 BC 3C 3E :=.^..;..;.. .<>
01CF80: 97 20 95 B4 28 2A A1 20 9E 20 00 66 72 65 65 00 . ..(*. . .free.
01CF90: 90 20 BB 2A 29 C2 BC 5E 2E B8 3A 3D BC 5E 2E B8 . .*)..^..:=.^..
01CFA0: 2D B8 3B C2 82 20 BC 5E 2E B8 3D 30 20 95 C3 82 -.;.. .^..=0 ...
01CFB0: 20 B1 3D 97 20 95 20 B6 3A 3D BC 5E 2E B9 C3 91 .=. . .:=.^....
01CFC0: 20 B1 5E 2E B9 3A 3D BC 5E 2E B9 20 89 C3 89 3B .^..:=.^.. ...;
01CFD0: C2 A2 3A 3D AB 28 AD 28 BC 29 2B BC 5E 2E B8 29 ..:=.(.(.)+.^..)
01CFE0: 3B C2 92 3B C1 91 B4 28 2A 61 6C 6C 6F 63 61 74 ;..;...(*allocat
01CFF0: 65 20 9E 20 74 6F 70 20 9B 20 BE 2A 29 C2 A2 3A e . top . .*)..:
01D000: E8 3A 3D 30 3B C1 EC 3A 3D A1 3B C1 E4 3A 3D ED .:=0;..:=.;..:=.
01D010: 5E 2E 66 3B C1 89 3B C0 89 20 D7 3B BF AF 20 00 ^.f;..;.. .;.. .
01D020: 42 75 66 66 65 72 49 6E 00 D5 28 73 3A F1 29 3B BufferIn..(s:.);
01D030: BF 8E B4 69 3A AA 3B BF 9C C0 97 20 73 5E 20 81 ...i:.;.... s^ .
01D040: C1 E4 3A 3D ED 5E 2E 66 3B C1 01 10 28 ED 5E 2C ..:=.^.f;...(.^,
01D050: 8F 28 DD 29 2C E0 2C 69 29 3B C1 ED 5E 2E D6 3A .(.),.,i);..^..:
01D060: 3D 69 3D 30 3B C1 DE 3A 3D 69 3B C1 E8 3A 3D 30 =i=0;..:=i;..:=0
01D070: 3B C1 89 3B C0 89 20 D5 3B C2 BF AF 20 00 57 72 ;..;.. .;... .Wr
01D080: 69 74 65 43 68 61 72 00 D4 28 73 3A F1 3B 77 3A iteChar..(s:.;w:
01D090: 99 29 3B BF 9C C0 97 20 73 5E 20 81 C1 90 20 ED .);.... s^ ... .
01D0A0: 5E 2E 00 64 65 76 74 79 70 65 00 D3 20 84 C1 01 ^..devtype.. ...
01D0B0: 0D 3A B4 FF 28 77 29 7C C1 01 0B 3A B4 69 3A 3D .:..(w)|...:.i:=
01D0C0: 01 05 28 01 03 2C 00 57 4F 52 44 00 D2 28 77 29 ..(..,.WORD..(w)
01D0D0: 29 7C C1 01 0A 3A B4 69 3A 3D 01 05 28 01 04 2C )|...:.i:=..(..,
01D0E0: D2 28 77 29 29 7C C1 01 09 3A B4 DD 5B E8 5D 3A .(w))|...:..[.]:
01D0F0: 3D 77 3B C2 00 49 4E 43 00 D1 28 E8 29 3B C2 EC =w;..INC..(.);..
01D100: 3A 3D 9A 3B C2 82 20 E8 3E 3D E0 20 95 20 C3 D7 :=.;.. .>=. . ..
01D110: 28 73 29 3B C3 82 20 E6 3D E1 20 95 20 D5 28 73 (s);.. .=. . .(s
01D120: 29 20 89 3B 20 C3 89 3B C2 89 20 28 2A 00 43 61 ) .; ..;.. (*.Ca
01D130: 73 65 00 D0 20 D3 2A 29 3B C1 89 3B 20 28 2A 97 se.. .*);..; (*.
01D140: 20 73 5E 2A 29 C0 89 20 D4 3B BF AF 20 00 44 69 s^*).. .;.. .Di
01D150: 73 63 6F 6E 6E 65 63 74 00 CF 28 8E 20 73 3A F1 sconnect..(. s:.
01D160: 3B 00 63 6C 6F 73 65 66 69 6C 65 00 CE 3A AC 29 ;.closefile..:.)
01D170: 3B BF 8E B4 00 53 61 76 65 53 69 7A 65 00 CD 3A ;....SaveSize..:
01D180: AA 3B BF 9C C0 97 20 73 5E 20 81 20 C1 82 20 EC .;.... s^ . .. .
01D190: 20 95 20 C2 D4 28 73 2C FA 29 3B B4 28 2A F9 20 . ..(s,.);.(*.
01D1A0: F8 20 F7 20 F6 2A 29 C2 28 2A B4 66 69 6C 6C 20 . . .*).(*.fill
01D1B0: EA 20 75 70 20 E9 20 31 32 38 20 E7 20 F2 20 62 . up . 128 . . b
01D1C0: 6F 75 6E 64 61 72 79 2A 29 C2 CD 3A 3D E0 3B C2 oundary*)..:=.;.
01D1D0: E0 3A 3D F5 2A 28 28 E8 20 88 20 F5 29 2B 31 29 .:=.*((. . .)+1)
01D1E0: 3B C2 8A 20 E8 3A 3D E8 20 86 20 E0 2D 31 20 81 ;.. .:=. . .-1 .
01D1F0: C3 DD 5B E8 5D 3A 3D FA 3B C3 89 3B C2 28 2A 6D ..[.]:=.;..;.(*m
01D200: 3D AB 28 B2 29 3B C2 B2 3A 3D B2 2B B8 3B C2 82 =.(.);..:=.+.;..
01D210: 20 B2 3E 28 AD 28 8F 28 B8 29 29 2D C5 29 20 95 .>(.(.(.))-.) .
01D220: C3 B2 3A 3D B2 2D B8 3B C3 00 46 75 6C 6C 55 70 ..:=.-.;..FullUp
01D230: 00 8D 3B C2 91 C3 92 C3 89 3B C2 89 3B C1 89 3B ..;......;..;..;
01D240: C0 89 20 A6 3B BF AF 20 00 4D 65 6D 49 73 46 75 .. .;.. .MemIsFu
01D250: 6C 6C 00 8C 3B BF 9C C0 B3 28 27 20 4F 75 74 20 ll..;....(' Out
01D260: 9B 20 9F 27 29 3B C0 A9 3B C0 48 41 4C 54 C0 89 . .');..;.HALT..
01D270: 20 8C 3B C0 BF BF AF 20 00 52 45 4C 45 41 53 45 .;.... .RELEASE
01D280: 00 8B 28 00 4E 65 77 54 6F 70 00 8A 3A AD 29 3B ..(.NewTop..:.);
01D290: BF BF 28 2A B4 BC 20 75 70 20 61 6C 6C 20 9B 20 ..(*.. up all .
01D2A0: 9F 20 61 62 6F 76 65 20 8A 20 28 69 6E 63 6C 75 . above . (inclu
01D2B0: 73 69 76 65 29 20 2A 29 BF 9C C0 B6 3A 3D 97 3B sive) *)....:=.;
01D2C0: C0 B2 3A 3D 8A 3B C0 89 20 8B 3B BF AF 20 00 44 ..:=.;.. .;.. .D
01D2D0: 45 41 4C 4C 4F 43 41 54 45 00 88 28 8E 20 A2 3A EALLOCATE..(. .:
01D2E0: AB 3B B8 3A AD 29 3B BF BF 28 2A B4 44 65 61 6C .;.:.);..(*.Deal
01D2F0: 6C 6F 63 61 74 65 20 73 6F 6D 65 20 9F 2A 29 BF locate some .*).
01D300: 9C C0 B8 3A 3D C7 28 B8 2B 33 2C 30 46 46 46 43 ...:=.(.+3,0FFFC
01D310: 48 29 3B C0 AC 3A 3D B6 3B C0 B1 3A 3D 97 3B C0 H);..:=.;..:=.;.
01D320: B0 3A 3D 97 3B C0 A0 20 28 AD 28 A2 29 3E AD 28 .:=.;.. (.(.)>.(
01D330: AC 29 29 20 87 20 28 AC 3C 3E 97 29 20 81 C1 B0 .)) . (.<>.) ...
01D340: 3A 3D B1 3B C1 B1 3A 3D AC 3B C1 AC 3A 3D AC 5E :=.;..:=.;..:=.^
01D350: 2E B9 3B C1 89 3B BF C0 28 2A B4 00 73 65 65 00 ..;..;..(*..see.
01D360: 85 20 98 20 61 64 6A 6F 69 6E 73 20 B9 20 00 61 . . adjoins . .a
01D370: 72 65 61 00 84 20 69 6E 20 90 20 BB 2A 29 C0 BC rea.. in . .*)..
01D380: 3A 3D B7 28 A2 29 3B C0 BC 5E 2E B8 3A 3D B8 3B :=.(.);..^..:=.;
01D390: C0 BC 5E 2E B9 3A 3D AC 3B C0 82 20 AD 28 AC 29 ..^..:=.;.. .(.)
01D3A0: 3D 28 AD 28 A2 29 2B B8 29 20 95 20 BF C1 28 2A =(.(.)+.) . ..(*
01D3B0: 6D 65 72 67 65 20 00 77 69 74 68 00 83 20 66 6F merge .with.. fo
01D3C0: 6C 6C 6F 77 69 6E 67 BF C1 BA 97 20 69 73 20 30 llowing.... is 0
01D3D0: 66 66 66 66 68 2C 20 73 6F 20 6A 6F 69 6E 69 6E ffffh, so joinin
01D3E0: 67 20 69 6D 70 6C 69 65 73 20 B9 BA 99 20 6E 69 g implies ... ni
01D3F0: 6C 2A 29 BF C1 BC 5E 2E B8 3A 3D B8 2B AC 5E 2E l*)...^..:=.+.^.
01D400: 75 73 74 20 DC 20 01 09 20 F7 2A 29 C2 D7 28 73 ust . .. .*)..(s
01D410: 29 3B C2 89 3B C1 82 20 CE 20 95 20 01 0E 28 ED );..;.. . . ..(.
01D420: 5E 29 20 89 3B C1 89 3B C0 FB 28 73 2C D8 28 73 ^) .;..;..(s,.(s
01D430: 5E 29 2B CD 2D F5 29 3B C0 89 20 CF 3B BF AF 20 ^)+.-.);.. .;..
01D440: 00 57 72 69 74 65 57 6F 72 64 00 CC 28 73 3A F1 .WriteWord..(s:.
01D450: 3B 77 3A D2 29 3B BF 9C C0 D4 28 73 2C 01 08 28 ;w:.);....(s,..(
01D460: 77 29 29 3B C0 D4 28 73 2C 01 07 28 77 29 29 3B w));..(s,..(w));
01D470: C0 89 20 CC 3B BF AF 20 00 45 6E 64 57 72 69 74 .. .;.. .EndWrit
01D480: 65 00 CB 28 73 3A F1 29 3B BF 9C C0 97 20 73 5E e..(s:.);.... s^
01D490: 20 81 C1 82 20 28 ED 5E 2E D3 3D 01 09 29 20 B4 ... (.^..=..) .
01D4A0: 87 20 28 E8 3C 3E 30 29 20 95 C2 D7 28 73 29 3B . (.<>0) ...(s);
01D4B0: C2 89 3B C1 89 3B C0 89 20 CB 3B BF AF 20 00 52 ..;..;.. .;.. .R
01D4C0: 65 61 64 43 68 61 72 00 CA 28 73 3A F1 3B 8E 20 eadChar..(s:.;.
01D4D0: 77 3A 99 29 3B BF 9C C0 97 20 73 5E 20 81 C1 90 w:.);.... s^ ...
01D4E0: 20 ED 5E 2E D3 20 84 C1 01 0D 3A B4 FD 28 77 29 .^.. ....:..(w)
01D4F0: 7C C1 01 0C 3A B4 77 3A 3D 99 28 01 05 28 01 02 |...:.w:=.(..(..
01D500: 2C 30 29 29 7C C1 01 09 3A B4 82 20 E8 3E 3D DE ,0))|...:.. .>=.
01D510: 20 95 20 D5 28 73 29 20 89 3B C2 77 3A 3D DD 5B . .(s) .;.w:=.[
01D520: E8 5D 3B C2 D1 28 E8 29 3B C2 89 20 28 2A D0 20 .];..(.);.. (*.
01D530: D3 2A 29 3B C1 89 3B 20 28 2A 97 20 73 5E 2A 29 .*);..; (*. s^*)
01D540: C0 89 20 CA 3B BF AF 20 00 52 65 61 64 57 6F 72 .. .;.. .ReadWor
01D550: 64 00 C9 28 73 3A F1 3B 8E 20 77 3A D2 29 3B BF d..(s:.;. w:.);.
01D560: 8E B4 00 6C 6F 77 62 79 74 65 00 C8 2C 00 68 69 ...lowbyte..,.hi
01D570: 67 68 62 79 74 65 00 C7 3A 99 3B BF 9C C0 CA 28 ghbyte..:.;....(
01D580: 73 2C C8 29 3B C0 CA 28 73 2C C7 29 3B C0 77 3A s,.);..(s,.);.w:
01D590: 3D 01 06 28 01 11 28 C7 29 2C 01 11 28 C8 29 29 =..(..(.),..(.))
01D5A0: 3B C0 89 20 C9 3B BF AF 20 00 45 4F 53 00 C6 28 ;.. .;.. .EOS..(
01D5B0: 73 3A F1 29 3A AC 3B BF 9C C0 97 20 73 5E 2C ED s:.):.;.... s^,.
01D5C0: 5E 20 81 C1 82 20 D3 3D 01 09 20 95 20 C2 82 20 ^ ... .=.. . ..
01D5D0: E8 3E 3D DE 20 95 20 D5 28 73 29 20 89 3B C2 82 .>=. . .(s) .;..
01D5E0: 20 D6 20 95 20 A7 20 9A C2 91 20 A7 20 DD 5B E8 . . . ... . .[.
01D5F0: 5D 3D FA 20 89 3B C1 91 C2 A7 20 A1 20 C2 89 28 ]=. .;.... . ..(
01D600: B8 3B C1 BC 5E 2E B9 3A 3D AC 5E 2E B9 3B C1 89 .;..^..:=.^..;..
01D610: 3B BF C0 82 20 B1 3D 97 20 95 20 B6 3A 3D BC C0 ;... .=. . .:=..
01D620: 91 B4 82 20 28 AD 28 B1 29 2B B1 5E 2E B8 29 3D ... (.(.)+.^..)=
01D630: AD 28 BC 29 20 95 BF C1 28 2A 20 4A 6F 69 6E 20 .(.) ...(* Join
01D640: 83 20 70 72 65 63 65 64 69 6E 67 20 84 2A 29 BF . preceding .*).
01D650: C2 B1 5E 2E B8 3A 3D B1 5E 2E B8 2B BC 5E 2E B8 ..^..:=.^..+.^..
01D660: 3B C2 B1 5E 2E B9 3A 3D BC 5E 2E B9 3B C2 BC 3A ;..^..:=.^..;..:
01D670: 3D B1 3B C1 91 C2 B1 5E 2E B9 3A 3D BC 20 C2 89 =.;....^..:=. ..
01D680: 3B C1 89 20 28 2A B1 3D 97 2A 29 3B BF C0 28 2A ;.. (*.=.*);..(*
01D690: B4 85 20 98 20 61 74 20 65 6E 64 20 9B 20 9F 2A .. . at end . .*
01D6A0: 29 BF C0 82 20 28 AD 28 BC 29 2B BC 5E 2E B8 29 )... (.(.)+.^..)
01D6B0: 3D B2 20 95 C1 B2 3A 3D AD 28 BC 29 3B C1 82 20 =. ...:=.(.);..
01D6C0: BC 3D B1 20 95 20 B1 3A 3D B0 20 89 3B C1 82 20 .=. . .:=. .;..
01D6D0: B1 3D 97 20 95 20 B6 3A 3D 97 C1 91 20 B1 5E 2E .=. . .:=... .^.
01D6E0: B9 3A 3D 97 20 89 3B C1 89 3B C0 A2 3A 3D 97 3B .:=. .;..;..:=.;
01D6F0: C0 89 20 88 3B BF AF 20 00 46 72 65 65 53 70 61 .. .;.. .FreeSpa
01D700: 63 65 00 80 28 29 3A AD 3B BF 8E B4 69 3A AA 3B ce..():.;...i:.;
01D710: BF 9C C0 A7 20 AD 28 8F 28 69 29 29 2D B2 3B C0 .... .(.(i))-.;.
01D720: 89 20 80 3B BF 9C B4 28 2A 49 6E 69 74 69 61 6C . .;...(*Initial
01D730: 69 73 61 74 69 6F 6E 2A 29 C0 B2 3A 3D 8F 28 C6 isation*)..:=.(.
01D740: 29 3B C0 B6 3A 3D 97 C0 8D 3A 3D 8C 3B C0 89 20 );..:=...:=.;..
01D750: C8 2E BF 00 00 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01D760: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01D770: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01D780: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
01D790: 20 00 53 74 72 65 61 6D 73 00 01 12 3B BF 93 20 .Streams...;..
01D7A0: 53 59 53 54 45 4D 20 A3 20 8F 2C 00 42 59 54 45 SYSTEM £ .,.BYTE
01D7B0: 00 01 11 3B BF 93 20 46 69 6C 65 73 20 A3 20 00 ...;.. Files £ .
01D7C0: 53 65 71 52 65 61 64 42 6C 6F 63 6B 00 01 10 2C SeqReadBlock...,
01D7D0: 00 53 65 71 57 72 69 74 65 42 6C 6F 63 6B 00 01 .SeqWriteBlock..
01D7E0: 0F 2C 00 43 6C 6F 73 65 00 01 0E 2C 44 65 76 69 .,.Close...,Devi
01D7F0: 63 65 74 79 70 65 2C C1 00 63 6F 6E 00 01 0D 2C cetype,..con...,
01D800: 2A D3 3D 01 09 2A 29 3B C1 89 3B 28 2A 97 2A 29 *.=..*);..;(*.*)
01D810: C0 89 20 C6 3B BF AF 20 00 50 68 79 73 69 63 61 .. .;.. .Physica
01D820: 6C 45 4F 53 00 C5 28 73 3A F1 29 3A AC 3B BF 9C lEOS..(s:.):.;..
01D830: C0 82 20 C6 28 73 29 20 95 C1 A7 20 73 5E 2E ED .. .(s) ... s^..
01D840: 5E 2E D6 3B C0 91 C1 A7 20 A1 3B C1 89 3B C0 89 ^..;.... .;..;..
01D850: 20 C5 3B BF AF 20 00 52 65 73 65 74 00 C4 28 73 .;.. .Reset..(s
01D860: 3A F1 29 3B BF 9C C0 97 20 73 5E 2C ED 5E 20 81 :.);.... s^,.^ .
01D870: C1 82 20 D3 3D 01 09 20 95 C2 01 0E 28 ED 5E 29 .. .=.. ....(.^)
01D880: 3B C2 66 2E 00 66 63 62 65 78 00 BE 3A 3D 30 3B ;.f..fcbex..:=0;
01D890: C2 66 2E 00 66 63 62 63 72 00 BD 3A 3D 30 3B C2 .f..fcbcr..:=0;.
01D8A0: 69 3A 3D 01 05 28 01 01 2C 8F 28 66 29 29 3B C2 i:=..(..,.(f));.
01D8B0: E8 3A 3D E0 2B 31 3B C2 E4 3A 3D 66 3B C1 9E 20 .:=.+1;..:=f;..
01D8C0: D3 3D 01 0D 20 95 20 FE 28 9A 29 C1 9E 20 D3 3D .=.. . .(.).. .=
01D8D0: 01 0B 20 95 20 C2 69 3A 3D 01 05 28 01 03 2C 30 .. . .i:=..(..,0
01D8E0: 64 68 29 3B C2 69 3A 3D 01 05 28 01 03 2C 30 00 dh);.i:=..(..,0.
01D8F0: 63 68 00 BC 29 3B 20 28 2A 70 61 67 65 20 65 6A ch..); (*page ej
01D900: 65 63 74 2A 29 C2 89 C1 89 C0 89 20 C4 3B C2 BF ect*)...... .;..
01D910: AF 20 00 53 65 74 50 6F 73 00 BB 28 73 3A F1 3B . .SetPos..(s:.;
01D920: 00 68 69 67 68 00 B9 2C 00 6C 6F 77 00 B8 3A AD .high..,.low..:.
01D930: 29 3B BF 8E B4 00 45 78 74 65 6E 74 00 B7 3A AD );....Extent..:.
01D940: 3B BF 9C C0 97 20 73 5E 2C ED 5E 20 81 C1 82 20 ;.... s^,.^ ...
01D950: EC 20 95 20 D7 28 73 29 20 89 3B C1 B7 3A 3D 34 . . .(s) .;..:=4
01D960: 2A 01 08 28 B9 29 3B C1 A0 20 B8 3E 31 36 33 38 *..(.);.. .>1638
01D970: 33 20 81 C2 B8 3A 3D B8 2D 31 36 33 38 34 3B C2 3 ...:=.-16384;.
01D980: D1 28 B7 29 3B C2 89 3B BF C1 28 2A B4 6F 70 65 .(.);..;..(*.ope
01D990: 6E 20 74 68 65 20 72 65 71 75 69 72 65 64 20 65 n the required e
01D9A0: 78 74 65 6E 74 2A 29 BF C1 82 20 B7 3C 3E 00 4F xtent*)... .<>.O
01D9B0: 52 44 00 B6 28 66 2E BE 29 20 95 C2 01 0E 28 ED RD..(f..) ....(.
01D9C0: 5E 29 3B C2 66 2E BE 3A 3D B7 3B C2 69 3A 3D 01 ^);.f..:=.;.i:=.
01D9D0: 05 28 01 01 2C 8F 28 66 29 29 3B C2 89 3B C1 82 .(..,.(f));..;..
01D9E0: 20 69 3D 32 35 35 20 95 20 C2 D6 3A 3D 9A 3B C2 i=255 . ..:=.;.
01D9F0: E8 3A 3D E0 2B 31 3B C1 91 BA C2 B7 3A 3D B8 20 .:=.+1;.....:=.
01DA00: 00 72 64 72 00 01 0C 2C 00 6C 73 74 00 01 0B 2C .rdr...,.lst...,
01DA10: 00 70 75 6E 00 01 0A 2C 00 64 69 73 63 00 01 09 .pun...,.disc...
01DA20: 3B BF 93 20 43 6F 6E 76 65 72 73 69 6F 6E 73 20 ;.. Conversions
01DA30: A3 20 00 4C 6F 77 42 79 74 65 00 01 08 2C 00 48 £ .LowByte...,.H
01DA40: 69 67 68 42 79 74 65 00 01 07 2C 00 4D 61 6B 65 ighByte...,.Make
01DA50: 57 6F 72 64 00 01 06 3B BF 93 20 43 50 4D 20 A3 Word...;.. CPM £
01DA60: 20 00 42 44 4F 53 00 01 05 2C 00 77 70 75 66 63 .BDOS...,.wpufc
01DA70: 00 01 04 2C 00 77 6C 63 66 63 00 01 03 2C 00 72 ...,.wlcfc...,.r
01DA80: 72 64 66 63 00 01 02 2C 00 6F 70 6E 66 63 00 01 rdfc...,.opnfc..
01DA90: 01 2C 00 66 63 62 00 01 00 3B BF 93 20 AE 20 A3 .,.fcb...;.. . £
01DAA0: 20 00 57 72 69 74 65 00 FF 2C 00 52 65 61 64 42 .Write..,.ReadB
01DAB0: 75 66 66 65 72 00 FE 2C 00 52 65 61 64 00 FD 2C uffer..,.Read..,
01DAC0: A9 3B BF 93 20 53 54 4F 52 41 47 45 20 A3 20 00 .;.. STORAGE £ .
01DAD0: 41 4C 4C 4F 43 41 54 45 00 FC 2C 00 44 45 41 4C ALLOCATE..,.DEAL
01DAE0: 4C 4F 43 41 54 45 00 FB 3B BF BF 9D B4 00 45 4F LOCATE..;.....EO
01DAF0: 46 00 FA 3D 31 61 78 3B B5 28 2A 00 65 6E 64 00 F..=1ax;.(*.end.
01DB00: F9 20 00 6F 66 00 F8 20 00 66 69 6C 65 00 F7 20 . .of.. .file..
01DB10: 00 63 68 61 72 61 63 74 65 72 00 F6 2A 29 C0 00 .character..*)..
01DB20: 42 6C 6F 63 6B 53 69 7A 65 00 F5 3D 31 32 38 3B BlockSize..=128;
01DB30: B5 28 2A 00 63 68 61 72 61 63 74 65 72 73 00 F4 .(*.characters..
01DB40: 20 00 69 6E 00 F3 20 61 20 00 62 6C 6F 63 6B 00 .in.. a .block.
01DB50: F2 2A 29 BF 96 B4 00 53 54 52 45 41 4D 00 F1 3D .*)....STREAM..=
01DB60: A8 20 86 20 00 53 74 72 65 61 6D 52 65 63 6F 72 . . .StreamRecor
01DB70: 64 00 F0 3B C0 00 46 69 6C 65 50 6F 69 6E 74 65 d..;..FilePointe
01DB80: 72 00 EF 3D A8 20 86 20 00 46 49 4C 45 00 EE 3B r..=. . .FILE..;
01DB90: C0 F0 3D A5 C1 00 43 6F 6E 6E 65 63 74 46 69 6C ..=...ConnectFil
01DBA0: 65 00 ED B4 3A EF 3B C1 00 55 70 64 61 74 65 64 e...:.;..Updated
01DBB0: 00 EC B5 3A AC 3B B4 28 2A 9A 20 00 69 66 00 EB ...:.;.(*. .if..
01DBC0: 20 00 62 75 66 66 65 72 00 EA 20 77 72 69 74 74 .buffer.. writt
01DBD0: 65 6E 20 00 74 6F 00 E9 2A 29 C1 00 50 6F 73 00 en .to..*)..Pos.
01DBE0: E8 B5 3A AA 3B B4 28 2A 4E 65 78 74 20 00 62 79 ..:.;.(*Next .by
01DBF0: 74 65 00 E7 20 F3 20 EA 2A 29 C1 00 44 69 72 00 te.. . .*)..Dir.
01DC00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01DC10: 19 00 00 00 02 09 4E E5 19 00 41 02 00 00 00 02 ......N...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: 88 20 F5 3B C2 66 2E BD 3A 3D B7 3B C2 D5 28 73 . .;.f..:=.;..(s
01DD10: 29 3B C2 E8 3A 3D B8 2D F5 2A B7 3B C2 89 3B C1 );..:=.-.*.;..;.
01DD20: 89 3B C0 89 20 BB 3B BF AF 20 00 52 65 61 64 52 .;.. .;.. .ReadR
01DD30: 65 63 00 B3 28 73 3A F1 3B 00 52 65 63 00 B2 3A ec..(s:.;.Rec..:
01DD40: AB 3B 00 42 79 74 65 73 00 B1 3A AD 3B 8E 20 00 .;.Bytes..:.;. .
01DD50: 72 65 70 6C 79 00 B0 3A AA 29 3B BF 8E B4 69 3A reply..:.);...i:
01DD60: AD 3B C0 BC 3A 99 3B BF 9C C0 69 3A 3D 30 3B B4 .;..:.;...i:=0;.
01DD70: 28 2A 00 62 79 74 65 73 00 A6 20 00 72 65 61 64 (*.bytes.. .read
01DD80: 00 A2 2A 29 C0 94 C1 82 20 69 3E 3D B1 20 95 20 ..*).... i>=. .
01DD90: 92 20 89 3B C1 CA 28 73 2C BC 29 3B C1 82 20 73 . .;..(s,.);.. s
01DDA0: 5E 2E ED 5E 2E D6 20 95 20 92 20 89 3B C1 B2 5E ^..^.. . . .;..^
01DDB0: 3A 3D 01 11 28 BC 29 3B C1 D1 28 B2 29 3B C1 69 :=..(.);..(.);.i
01DDC0: 3A 3D 69 2B 31 3B C1 89 3B C0 B0 3A 3D AA 28 69 :=i+1;..;..:=.(i
01DDD0: 29 3B C0 89 20 B3 3B BF AF 20 00 57 72 69 74 65 );.. .;.. .Write
01DDE0: 52 65 63 00 9F 28 73 3A F1 3B B2 3A AB 3B B1 3A Rec..(s:.;.:.;.:
01DDF0: AD 3B 8E 20 B0 3A AA 29 3B BF 8E B4 69 3A AD 3B .;. .:.);...i:.;
01DE00: BF 9C C0 69 3A 3D 30 3B B4 28 2A A6 20 A2 2A 29 ...i:=0;.(*. .*)
01DE10: C0 73 5E 2E ED 5E 2E D6 3A 3D A1 3B C0 A0 20 28 .s^..^..:=.;.. (
01DE20: 69 3C B1 29 20 87 20 8C 20 73 5E 2E ED 5E 2E D6 i<.) . . s^..^..
01DE30: BA 81 C1 D4 28 73 2C 99 28 B2 5E 29 29 3B C1 D1 ....(s,.(.^));..
01DE40: 28 B2 29 3B C1 69 3A 3D 69 2B 31 3B C1 89 3B C0 (.);.i:=i+1;..;.
01DE50: B0 3A 3D AA 28 69 29 3B C0 89 20 9F 3B BF AF 20 .:=.(i);.. .;..
01DE60: 00 47 65 74 50 6F 73 00 98 28 73 3A F1 3B 8E 20 .GetPos..(s:.;.
01DE70: B9 2C B8 3A AD 29 3B BF 8E B4 69 3A AD 3B BF 9C .,.:.);...i:.;..
01DE80: C0 97 20 73 5E 2C ED 5E 20 81 C1 B8 3A 3D E8 2B .. s^,.^ ...:=.+
01DE90: F5 2A B6 28 66 2E BD 29 3B C1 69 3A 3D B6 28 66 .*.(f..);.i:=.(f
01DEA0: 2E BE 29 3B C1 B9 3A 3D 69 20 88 20 34 3B C1 B8 ..);..:=i . 4;..
01DEB0: 3A 3D B8 2B 31 36 33 38 34 2A 28 69 2D 34 2A B9 :=.+16384*(i-4*.
01DEC0: 29 3B C1 82 20 E6 3D E1 20 95 20 28 2A 20 F7 20 );.. .=. . (* .
01DED0: 70 6F 69 6E 74 65 72 73 20 61 72 65 20 61 68 65 pointers are ahe
01DEE0: 61 64 20 F8 20 70 6F 73 69 74 69 6F 6E 2A 29 C2 ad . position*).
01DEF0: 82 20 B8 3C 3D AD 28 DE 29 20 95 C3 44 45 43 28 . .<=.(.) ..DEC(
01DF00: 95 20 88 3A 3D 6B 2D 8F 20 89 3B C0 8A 20 69 3A . .:=k-. .;.. i:
01DF10: 3D 8F 20 86 20 6B 2D 88 20 81 20 8B 5B 69 5D 3A =. . k-. . .[i]:
01DF20: 3D 8B 5B 69 2B 88 5D 20 89 3B C0 69 3A 3D 6B 2D =.[i+.] .;.i:=k-
01DF30: 88 3B C0 82 20 69 3C 3D 98 28 8B 29 20 95 20 8B .;.. i<=.(.) . .
01DF40: 5B 69 5D 3A 3D 30 78 20 89 3B C0 89 20 8C 3B BF [i]:=0x .;.. .;.
01DF50: AF 20 00 43 6F 70 79 00 83 28 8B 3A 9B 20 84 20 . .Copy..(.:. .
01DF60: 99 3B 8F 2C 88 3A AD 3B 8E 20 A3 3A 9B 20 84 20 .;.,.:.;. £:. .
01DF70: 99 29 3B BF 8E B4 69 3A AD 3B BF 9C C0 82 20 88 .);...i:.;.... .
01DF80: 3E 8D 28 A3 29 20 95 20 88 3A 3D 8D 28 A3 29 20 >.(£) . .:=.(£)
01DF90: 89 3B C0 69 3A 3D A8 28 8B 29 3B C0 82 20 28 8F .;.i:=.(.);.. (.
01DFA0: 3E 3D 69 29 20 85 20 28 88 3D 30 29 20 95 20 C1 >=i) . (.=0) . .
01DFB0: A3 5B 30 5D 3A 3D 30 78 3B C1 A7 C1 89 3B C0 82 £[0]:=0x;....;..
01DFC0: 20 28 8F 2B 88 29 3E 69 20 95 20 88 3A 3D 69 2D (.+.)>i . .:=i-
01DFD0: 8F 20 89 3B C0 8A 20 69 3A 3D 8F 20 86 20 8F 2B . .;.. i:=. . .+
01DFE0: 88 2D 31 20 81 C1 A3 5B 69 2D 8F 5D 3A 3D 8B 5B .-1 ..£[i-.]:=.[
01DFF0: 69 5D 3B C1 89 3B C0 82 20 88 3C 3D 98 28 A3 29 i];..;.. .<=.(£)
01E000: 20 95 20 A3 5B 88 5D 3A 3D 30 78 20 89 3B C0 89 . £[.]:=0x .;..
01E010: 20 83 3B BF 89 20 BD 2E BF 00 00 9C C0 69 3A 3D .;.. .......i:=
01E020: 30 3B C0 A0 20 28 69 3C 3D 98 28 73 31 29 29 20 0;.. (i<=.(s1))
01E030: 87 20 28 73 31 5B 69 5D 3C 3E 30 63 29 BA 81 20 . (s1[i]<>0c)..
01E040: A6 28 69 29 20 89 3B C0 A7 20 69 3B C0 89 20 A8 .(i) .;.. i;.. .
01E050: 3B BF AF 20 00 53 74 6F 53 00 9E 28 00 53 6F 75 ;.. .StoS..(.Sou
01E060: 72 63 65 00 9D 3A 9B 20 84 20 99 3B 8E 20 00 44 rce..:. . .;. .D
01E070: 65 73 74 00 9A 3A 9B 20 84 20 99 3B 00 42 6C 61 est..:. . .;.Bla
01E080: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
01E090: 20 AE 3B BF BF 28 2A B4 4C 6F 77 20 6C 65 76 65 .;..(*.Low leve
01E0A0: 6C 20 74 65 72 6D 69 6E 61 6C 20 73 75 70 70 6F l terminal suppo
01E0B0: 72 74 BF C0 44 61 76 65 20 4D 6F 6F 72 65 20 32 rt..Dave Moore 2
01E0C0: 34 20 64 65 63 20 38 34 BF 2A 29 BF 93 20 43 50 4 dec 84.*).. CP
01E0D0: 4D 20 A3 20 00 42 44 4F 53 00 B8 2C 00 72 63 63 M £ .BDOS..,.rcc
01E0E0: 66 63 00 B7 2C 00 77 63 63 66 63 00 B6 2C 00 72 fc..,.wccfc..,.r
01E0F0: 63 62 66 63 00 B5 2C 00 72 63 73 66 63 00 B2 2C cbfc..,.rcsfc..,
01E100: B9 29 3B C3 B8 3A 3D B8 2B 28 4D 41 58 28 AD 29 .);..:=.+(MAX(.)
01E110: 2D AD 28 DE 29 29 3B C2 91 C3 B8 3A 3D B8 2D AD -.(.));....:=.-.
01E120: 28 DE 29 2D 31 3B C3 89 3B C2 89 3B C1 89 C0 89 (.)-1;..;..;....
01E130: 20 98 3B BF AF 20 00 42 75 66 66 65 72 41 68 65 .;.. .BufferAhe
01E140: 61 64 00 8D 28 73 3A F1 3B 00 66 6F 72 63 65 00 ad..(s:.;.force.
01E150: 8B 3A AC 29 3B BF 9C C0 82 20 73 5E 2E ED 5E 2E .:.);.... s^..^.
01E160: D3 3D 01 0D 20 95 20 FE 28 8B 29 20 89 3B C0 89 .=.. . .(.) .;..
01E170: 20 8D 3B BF AF 20 00 53 65 74 42 75 66 66 65 72 .;.. .SetBuffer
01E180: 73 00 85 28 00 43 6F 75 6E 74 00 83 3A AD 29 3B s..(.Count..:.);
01E190: BF 9C C0 82 20 83 3C 31 20 95 20 DB 3A 3D 31 C0 .... .<1 . .:=1.
01E1A0: 9E 20 83 3E 38 20 28 2A 70 75 72 65 6C 79 20 61 . .>8 (*purely a
01E1B0: 72 62 69 74 72 61 72 79 20 6C 69 6D 69 74 2A 29 rbitrary limit*)
01E1C0: 20 95 20 DB 3A 3D 38 C0 91 20 DB 3A 3D 83 20 89 . .:=8.. .:=. .
01E1D0: C0 89 20 85 3B BF AF 20 00 43 68 61 6E 67 65 44 .. .;.. .ChangeD
01E1E0: 69 72 65 63 74 69 6F 6E 00 80 28 73 3A F1 3B D9 irection..(s:.;.
01E1F0: 3A E5 29 3B BF 28 2A B4 49 20 61 6D 20 6E 6F 74 :.);.(*.I am not
01E200: 20 73 75 72 65 20 F8 20 74 68 69 73 20 63 6F 64 sure . this cod
01E210: 65 2E 20 48 61 76 65 20 49 20 6D 69 73 73 65 64 e. Have I missed
01E220: 20 64 6F 69 6E 67 20 61 6E 79 74 68 69 6E 67 3F doing anything?
01E230: 2A 29 BF 9C C0 73 5E 2E E6 3A 3D D9 3B C0 89 20 *)...s^..:=.;..
01E240: 80 3B BF 9C C0 DB 3A 3D 31 3B C0 89 20 01 12 2E .;....:=1;.. ...
01E250: BF BF C1 BF 00 00 29 3B C0 89 20 9F 3B BF AF 20 ......);.. .;..
01E260: 00 47 65 74 50 6F 73 00 98 28 73 3A F1 3B 8E 20 .GetPos..(s:.;.
01E270: B9 2C B8 3A AD 29 3B BF 8E B4 69 3A AD 3B BF 9C .,.:.);...i:.;..
01E280: 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F 4E 20 A4 IMPLEMENTATION .
01E290: 20 00 53 74 72 69 6E 67 73 00 BD 3B BF 28 2A B4 .Strings..;.(*.
01E2A0: 53 74 72 69 6E 67 20 6D 61 74 63 68 20 72 6F 75 String match rou
01E2B0: 74 69 6E 65 73 BF C0 BD 20 61 72 65 20 00 74 65 tines... are .te
01E2C0: 72 6D 69 6E 61 74 65 64 00 BC 20 00 62 79 00 BB rminated.. .by..
01E2D0: 20 00 7A 65 72 6F 00 B9 20 62 79 74 65 73 20 6F .zero.. bytes o
01E2E0: 72 20 BB 20 00 6C 65 6E 67 74 68 00 B8 BF BF 2A r . .length....*
01E2F0: 29 BF AF 20 00 50 6F 73 00 B7 28 00 4D 61 74 63 ).. .Pos..(.Matc
01E300: 00 64 69 6F 66 63 00 B1 3B BF 93 20 53 59 53 54 .diofc..;.. SYST
01E310: 45 4D 20 A3 20 8F 2C 00 57 4F 52 44 00 B0 3B BF EM £ .,.WORD..;.
01E320: 8E B4 00 43 6F 6E 73 6F 6C 65 42 75 66 66 65 72 ...ConsoleBuffer
01E330: 00 AB B4 3A 9B 5B 30 2E 2E 31 32 38 5D 20 84 20 ...:.[0..128] .
01E340: 00 42 59 54 45 00 A8 3B C0 00 50 6F 73 69 74 69 .BYTE..;..Positi
01E350: 6F 6E 00 A7 B4 3A A8 3B C0 69 3A AA 3B C0 6A 3A on...:.;.i:.;.j:
01E360: AD 3B C0 00 63 68 00 A6 3A 99 3B BF AF 20 00 57 .;..ch..:.;.. .W
01E370: 72 69 74 65 00 A5 28 62 3A 99 29 3B BF 8E B4 69 rite..(b:.);...i
01E380: 3A AA 3B B4 28 2A 6E 65 65 64 65 64 20 00 74 6F :.;.(*needed .to
01E390: 00 A2 20 61 76 6F 69 64 20 63 6F 6E 66 6C 69 63 .. avoid conflic
01E3A0: 74 20 00 77 69 74 68 00 A0 20 67 6C 6F 62 61 6C t .with.. global
01E3B0: 2A 29 BF 9C C0 82 20 00 43 68 61 72 45 6E 61 62 *).... .CharEnab
01E3C0: 6C 65 64 00 9F 20 95 20 43 68 61 72 52 6F 75 74 led.. . CharRout
01E3D0: 69 6E 65 28 62 29 20 C0 91 C1 69 3A 3D B8 28 B6 ine(b) ...i:=.(.
01E3E0: 2C B0 28 62 29 29 C1 89 3B C0 89 20 A5 3B BF AF ,.(b))..;.. .;..
01E3F0: 20 00 52 65 61 64 42 75 66 66 65 72 00 9D 28 00 .ReadBuffer..(.
01E400: 66 6F 72 63 65 00 9A 3A AC 29 3B BF 9C BF BC 82 force..:.);.....
01E410: 20 9A 20 85 20 28 28 A7 2D 31 29 3E AB 5B 31 5D . . ((.-1)>.[1]
01E420: 29 20 95 C0 AB 5B 30 5D 3A 3D 98 28 AB 29 2D 31 ) ...[0]:=.(.)-1
01E430: 3B C0 69 3A 3D B8 28 B5 2C 8F 28 AB 29 29 3B C0 ;.i:=.(.,.(.));.
01E440: A7 3A 3D 31 3B C0 89 3B BF BC 89 20 9D 3B BF AF .:=1;..;... .;..
01E450: 20 00 52 65 61 64 00 97 28 8E 20 62 3A 99 29 3B .Read..(. b:.);
01E460: BF 9C C0 82 20 A7 3C 3D AB 5B 31 5D 20 95 20 C1 .... .<=.[1] . .
01E470: 62 3A 3D AB 5B A7 2B 31 5D 3B C1 A7 3A 3D A7 2B b:=.[.+1];..:=.+
01E480: 31 3B C0 9E 20 28 A7 2D 31 29 3D AB 5B 31 5D 20 1;.. (.-1)=.[1]
01E490: 95 C1 62 3A 3D 30 44 78 3B B4 28 2A 63 61 72 72 ..b:=0Dx;.(*carr
01E4A0: 69 61 67 65 20 72 65 74 75 72 6E 2A 29 C1 A7 3A iage return*)..:
01E4B0: 3D A7 2B 31 3B C1 69 3A 3D B8 28 B6 2C 30 00 61 =.+1;.i:=.(.,0.a
01E4C0: 68 00 96 29 3B C0 91 B4 C1 69 3A 3D B8 28 B7 2C h..);....i:=.(.,
01E4D0: 30 29 3B C1 62 3A 3D 00 43 48 52 00 90 28 69 29 0);.b:=.CHR..(i)
01E4E0: 3B C1 82 20 62 3D 30 00 64 78 00 8D 20 95 20 69 ;.. b=0.dx.. . i
01E4F0: 3A 3D B8 28 B6 2C 30 96 29 20 89 3B C1 89 3B C0 :=.(.,0.) .;..;.
01E500: 68 00 B6 2C 00 53 65 61 72 63 68 00 B5 3A 9B 20 h..,.Search..:.
01E510: 84 20 99 3B 00 53 74 61 72 74 00 B3 3A AD 29 3A . .;.Start..:.):
01E520: AD 3B BF 28 2A B4 00 52 65 74 75 72 6E 73 00 B2 .;.(*..Returns..
01E530: 20 00 6E 75 6D 62 65 72 00 B1 20 00 6F 66 00 B0 .number.. .of..
01E540: 20 00 63 68 61 72 61 63 74 65 72 73 00 AE 20 70 .characters.. p
01E550: 72 65 63 65 64 69 6E 67 20 66 69 72 73 74 C0 6F receding first.o
01E560: 63 63 75 72 72 65 6E 63 65 20 B0 20 4D 41 54 43 ccurrence . MATC
01E570: 48 20 BF C0 B3 20 67 69 76 65 73 20 B1 20 B0 20 H ... gives . .
01E580: AE 20 00 74 6F 00 AB 20 73 6B 69 70 20 61 74 20 . .to.. skip at
01E590: 62 65 67 69 6E 6E 69 6E 67 20 B0 20 B5 BF C0 B2 beginning . ....
01E5A0: 20 98 28 B5 29 2B 31 20 00 69 66 00 A9 20 6E 6F .(.)+1 .if.. no
01E5B0: 74 20 66 6F 75 6E 64 2A 29 BF 8E B4 69 2C 6A 2C t found*)...i,j,
01E5C0: 6B 3A AD 3B BF 9C C0 6B 3A 3D 00 4C 65 6E 67 74 k:.;...k:=.Lengt
01E5D0: 68 00 A8 28 B5 29 2D A8 28 B6 29 3B C0 69 3A 3D h..(.)-.(.);.i:=
01E5E0: B3 3B C0 94 C1 82 20 28 69 3E 6B 29 20 95 20 92 .;.... (i>k) . .
01E5F0: 20 89 3B C1 6A 3A 3D 30 3B C1 94 C2 82 20 28 6A .;.j:=0;.... (j
01E600: 3E 98 28 B6 29 29 20 85 20 28 B6 5B 6A 5D 3D 30 >.(.)) . (.[j]=0
01E610: 63 29 20 95 C3 A7 20 69 C3 89 3B C2 82 20 28 B6 c) ... i..;.. (.
01E620: 5B 6A 5D 3C 3E B5 5B 69 2B 6A 5D 29 20 95 20 92 [j]<>.[i+j]) . .
01E630: 20 89 3B C2 00 49 4E 43 00 A6 28 6A 29 3B C2 89 .;..INC..(j);..
01E640: 3B C1 A6 28 69 29 3B C1 89 3B C0 A7 20 98 28 B5 ;..(i);..;.. .(.
01E650: 29 2B 31 3B C0 89 20 B7 3B B4 BF BF BF BF BF AF )+1;.. .;.......
01E660: 20 00 43 6F 6E 63 61 74 00 A5 28 73 31 2C 73 32 .Concat..(s1,s2
01E670: 3A 9B 20 84 20 99 3B 8E 20 73 33 3A 9B 20 84 20 :. . .;. s3:. .
01E680: 99 29 3B BF BF 28 2A B4 43 6F 6E 63 61 74 65 6E .);..(*.Concaten
01E690: 61 74 65 20 74 77 6F 20 73 74 72 69 6E 67 73 20 ate two strings
01E6A0: AB 20 63 72 65 61 74 65 20 61 20 74 68 69 72 64 . create a third
01E6B0: BF C0 00 72 65 73 75 6C 74 00 A3 20 00 73 74 72 ...result.£ .str
01E6C0: 69 6E 67 00 A2 20 00 69 73 00 9F 20 B9 20 62 79 ing.. .is.. . by
01E6D0: 74 65 20 BC BF C0 A3 20 9F 20 74 72 75 6E 63 61 te ...£ . trunca
01E6E0: 74 65 64 20 A9 20 77 6F 6E 27 74 20 66 69 74 2A ted . won't fit*
01E6F0: 29 BF 8E B4 69 2C 6A 2C 6B 3A AD 3B BF 9C C0 6A )...i,j,k:.;...j
01E700: 89 20 97 3B BF AF 20 00 42 75 73 79 52 65 61 64 . .;.. .BusyRead
01E710: 00 8C 28 8E 20 62 3A 99 29 3B BF 9C C0 28 2A 74 ..(. b:.);...(*t
01E720: 68 65 72 65 20 69 73 20 61 20 70 72 6F 62 6C 65 here is a proble
01E730: 6D 20 77 69 75 74 68 20 43 50 2F 4D 20 77 68 65 m wiuth CP/M whe
01E740: 6E 20 74 68 65 73 65 20 00 63 61 6C 6C 73 00 8B n these .calls..
01E750: 20 61 72 65 C0 BA 69 6E 74 65 72 6D 69 78 65 64 are..intermixed
01E760: 20 A0 20 8B 20 A2 20 97 2E 20 54 68 69 73 20 72 . . . .. This r
01E770: 65 73 75 6C 74 73 20 69 6E 20 73 6F 6D 65 20 C0 esults in some .
01E780: BA 63 68 61 72 61 63 74 65 72 73 20 62 65 69 6E .characters bein
01E790: 67 20 72 65 63 65 69 76 65 64 20 74 77 69 63 65 g received twice
01E7A0: 2A 29 C0 69 3A 3D B8 28 B1 2C 32 35 35 29 3B C0 *).i:=.(.,255);.
01E7B0: 62 3A 3D 90 28 69 29 3B C0 82 20 00 42 6C 69 6E b:=.(i);.. .Blin
01E7C0: 6B 45 6E 61 62 6C 65 64 00 8A 20 95 20 42 6C 69 kEnabled.. . Bli
01E7D0: 6E 6B 52 6F 75 74 69 6E 65 20 89 3B B4 C0 89 20 nkRoutine .;...
01E7E0: 8C 3B BF AF 20 00 43 6C 65 61 72 43 68 61 72 42 .;.. .ClearCharB
01E7F0: 75 66 66 65 72 00 88 3B BF C0 28 2A 6F 76 65 72 uffer..;..(*over
01E800: 63 6F 6D 65 20 62 75 67 20 6D 65 6E 74 69 6F 6E come bug mention
01E810: 65 64 20 61 62 6F 76 65 2A 29 BF 9C C0 69 3A 3D ed above*)...i:=
01E820: B8 28 B2 2C 30 29 3B C0 82 20 69 3C 3E 30 20 95 .(.,0);.. i<>0 .
01E830: 20 69 3A 3D B8 28 B7 2C 30 29 20 89 3B C0 89 20 i:=.(.,0) .;..
01E840: 88 3B BF AF 20 00 52 65 61 64 41 67 61 69 6E 00 .;.. .ReadAgain.
01E850: 87 3B BF 9C C0 82 20 A7 3E 31 20 95 20 A7 3A 3D .;.... .>1 . .:=
01E860: A7 2D 31 20 89 3B C0 89 20 87 3B BF AF 20 A9 3B .-1 .;.. .;.. .;
01E870: BF 9C C0 A5 28 30 8D 29 3B C0 A5 28 30 61 78 29 ....(0.);..(0ax)
01E880: 3B C0 89 20 A9 3B BF AF 20 00 4F 75 74 53 74 72 ;.. .;.. .OutStr
01E890: 69 6E 67 00 86 28 8E 20 73 3A 9B 20 84 20 99 29 ing..(. s:. . .)
01E8A0: 3B BF 9C C0 69 3A 3D 30 3B C0 94 C1 82 20 69 3E ;...i:=0;.... i>
01E8B0: 98 28 73 29 20 95 20 92 20 89 3B C1 82 20 73 5B .(s) . . .;.. s[
01E8C0: 69 5D 3D 30 63 20 95 20 92 20 89 3B C1 A5 28 73 i]=0c . . .;..(s
01E8D0: 5B 69 5D 29 3B C1 69 3A 3D 69 2B 31 3B C1 89 3B [i]);.i:=i+1;..;
01E8E0: 20 28 2A 94 2A 29 C0 89 20 86 3B BF AF 20 B3 28 (*.*).. .;.. .(
01E8F0: 73 3A 9B 20 84 20 99 29 3B BF 9C C0 86 28 73 29 s:. . .);....(s)
01E900: 3A 3D 98 28 73 33 29 3B C0 82 20 6A 3E 98 28 73 :=.(s3);.. j>.(s
01E910: 31 29 20 95 20 6A 3A 3D 98 28 73 31 29 20 89 3B 1) . j:=.(s1) .;
01E920: C0 69 3A 3D 30 3B C0 A0 20 28 69 3C 3D 6A 29 20 .i:=0;.. (i<=j)
01E930: 87 20 28 73 31 5B 69 5D 3C 3E 30 63 29 20 81 C1 . (s1[i]<>0c) ..
01E940: 73 33 5B 69 5D 3A 3D 73 31 5B 69 5D 3B C1 A6 28 s3[i]:=s1[i];..(
01E950: 69 29 3B C1 89 3B C0 82 20 69 3E 98 28 73 33 29 i);..;.. i>.(s3)
01E960: 20 95 20 A7 20 89 3B C0 6A 3A 3D 98 28 73 32 29 . . .;.j:=.(s2)
01E970: 3B C0 82 20 6A 3E 28 98 28 73 33 29 2D 69 29 20 ;.. j>(.(s3)-i)
01E980: 95 20 6A 3A 3D 98 28 73 33 29 2D 69 20 89 3B C0 . j:=.(s3)-i .;.
01E990: 6B 3A 3D 30 3B C0 A0 20 28 6B 3C 3D 6A 29 20 87 k:=0;.. (k<=j) .
01E9A0: 20 28 73 32 5B 6B 5D 3C 3E 30 63 29 20 81 C1 73 (s2[k]<>0c) ..s
01E9B0: 33 5B 69 5D 3A 3D 73 32 5B 6B 5D 3B C1 A6 28 69 3[i]:=s2[k];..(i
01E9C0: 29 3B C1 A6 28 6B 29 3B C1 89 3B C0 82 20 69 3C );..(k);..;.. i<
01E9D0: 3D 98 28 73 33 29 20 95 20 73 33 5B 69 5D 3A 3D =.(s3) . s3[i]:=
01E9E0: 30 78 20 89 3B C0 89 20 A5 3B BF AF 20 A8 28 73 0x .;.. .;.. .(s
01E9F0: 31 3A 9B 20 84 20 99 29 3A AD 3B BF BF 28 2A B4 1:. . .):.;..(*.
01EA00: 52 65 74 75 72 6E 20 B8 20 B0 20 A2 20 69 6E 20 Return . . . in
01EA10: AE 2A 29 BF 8E B4 69 3A AD 3B BF 9C C0 69 3A 3D .*)...i:.;...i:=
01EA20: 30 3B C0 A0 20 28 69 3C 3D 98 28 73 31 29 29 20 0;.. (i<=.(s1))
01EA30: 87 20 28 73 31 5B 69 5D 3C 3E 30 63 29 BA 81 20 . (s1[i]<>0c)..
01EA40: A6 28 69 29 20 89 3B C0 A7 20 69 3B C0 89 20 A8 .(i) .;.. i;.. .
01EA50: 3B BF AF 20 00 53 74 6F 53 00 9E 28 00 53 6F 75 ;.. .StoS..(.Sou
01EA60: 72 63 65 00 9D 3A 9B 20 84 20 99 3B 8E 20 00 44 rce..:. . .;. .D
01EA70: 65 73 74 00 9A 3A 9B 20 84 20 99 3B 00 42 6C 61 est..:. . .;.Bla
01EA80: 6E 6B 46 69 6C 6C 00 97 3A AC 29 3A AD 3B BF 8E nkFill..:.):.;..
01EA90: B4 69 2C 6A 2C 6B 2C 6C 3A AD 3B BF BF 9C C0 69 .i,j,k,l:.;....i
01EAA0: 3A 3D 30 3B C0 A0 20 28 69 3C 3D 98 28 9D 29 29 :=0;.. (i<=.(.))
01EAB0: 20 87 20 28 69 3C 3D 98 28 9A 29 29 20 87 20 28 . (i<=.(.)) . (
01EAC0: 9D 5B 69 5D 3C 3E 30 78 29 20 81 C1 9A 5B 69 5D .[i]<>0x) ...[i]
01EAD0: 3A 3D 9D 5B 69 5D 3B C1 A6 28 69 29 3B C1 89 3B :=.[i];..(i);..;
01EAE0: C0 6C 3A 3D 69 3B B4 28 2A 73 61 76 65 20 66 6F .l:=i;.(*save fo
01EAF0: 72 20 72 65 74 75 72 6E 20 76 61 6C 75 65 2A 29 r return value*)
01EB00: 3B C0 89 20 B3 3B BF AF 20 00 45 72 72 6F 72 45 ;.. .;.. .ErrorE
01EB10: 78 69 74 00 83 28 73 3A 9B 20 84 20 99 29 3B BF xit..(s:. . .);.
01EB20: 9C C0 86 28 73 29 3B C0 69 3A 3D B8 28 30 2C 30 ...(s);.i:=.(0,0
01EB30: 29 3B C0 89 20 83 3B B4 BF AF 20 00 52 65 61 64 );.. .;... .Read
01EB40: 53 74 72 69 6E 67 00 81 28 8E 20 73 3A 9B 20 84 String..(. s:. .
01EB50: 20 99 29 3B BF BF 9C C0 9D 28 A1 29 3B C0 00 53 .);.....(.);..S
01EB60: 74 72 69 6E 67 4C 65 6E 00 80 3A 3D 30 3B C0 94 tringLen..:=0;..
01EB70: C1 82 20 80 3E 98 28 73 29 20 95 20 92 20 89 3B .. .>.(s) . . .;
01EB80: C1 97 28 A6 29 3B C1 82 20 A6 3C 27 20 27 20 95 ..(.);.. .<' ' .
01EB90: 20 C2 92 20 C2 89 3B C1 73 5B 80 5D 3A 3D A6 3B .. ..;.s[.]:=.;
01EBA0: C1 80 3A 3D 80 2B 31 3B C1 89 20 28 2A 94 2A 29 ..:=.+1;.. (*.*)
01EBB0: 3B C0 82 20 80 3C 3D 98 28 73 29 20 95 20 73 5B ;.. .<=.(s) . s[
01EBC0: 80 5D 3A 3D 30 78 20 89 3B C0 89 20 81 3B BF 9C .]:=0x .;.. .;..
01EBD0: C0 AB 5B 31 5D 3A 3D 30 3B C0 A7 3A 3D 31 32 39 ..[1]:=0;..:=129
01EBE0: 3B C0 9F 3A 3D A1 3B C0 8A 3A 3D A1 3B C0 89 20 ;..:=.;..:=.;..
01EBF0: AE 2E BF BF 00 00 09 6F D6 0C 48 0D 00 23 00 00 .......o..H..#..
01EC00: 63 6F 6D 65 20 62 75 67 20 6D 65 6E 74 69 6F 6E come bug mention
01EC10: 65 64 20 61 62 6F 76 65 2A 29 BF 9C C0 69 3A 3D ed above*)...i:=
01EC20: B8 28 B2 2C 30 29 3B C0 82 20 69 3C 3E 30 20 95 .(.,0);.. i<>0 .
01EC30: 20 69 3A 3D B8 28 B7 2C 30 29 20 89 3B C0 89 20 i:=.(.,0) .;..
01EC40: 88 3B BF AF 20 00 52 65 61 64 41 67 61 69 6E 00 .;.. .ReadAgain.
01EC50: 87 3B BF 9C C0 82 20 A7 3E 31 20 95 20 A7 3A 3D .;.... .>1 . .:=
01EC60: A7 2D 31 20 89 3B C0 89 20 87 3B BF AF 20 A9 3B .-1 .;.. .;.. .;
01EC70: BF 9C C0 A5 28 30 8D 29 3B C0 A5 28 30 61 78 29 ....(0.);..(0ax)
01EC80: 3B C0 89 20 A9 3B BF AF 20 00 4F 75 74 53 74 72 ;.. .;.. .OutStr
01EC90: 69 6E 67 00 86 28 8E 20 73 3A 9B 20 84 20 99 29 ing..(. s:. . .)
01ECA0: 3B BF 9C C0 69 3A 3D 30 3B C0 94 C1 82 20 69 3E ;...i:=0;.... i>
01ECB0: 98 28 73 29 20 95 20 92 20 89 3B C1 82 20 73 5B .(s) . . .;.. s[
01ECC0: 69 5D 3D 30 63 20 95 20 92 20 89 3B C1 A5 28 73 i]=0c . . .;..(s
01ECD0: 5B 69 5D 29 3B C1 69 3A 3D 69 2B 31 3B C1 89 3B [i]);.i:=i+1;..;
01ECE0: 20 28 2A 94 2A 29 C0 89 20 86 3B BF AF 20 B3 28 (*.*).. .;.. .(
01ECF0: 73 3A 9B 20 84 20 99 29 3B BF 9C C0 86 28 73 29 s:. . .);....(s)
01ED00: C0 82 20 97 20 95 C1 8A 20 69 3A 3D 69 20 86 20 .. . ... i:=i .
01ED10: 98 28 9A 29 20 81 20 9A 5B 69 5D 3A 3D 27 20 27 .(.) . .[i]:=' '
01ED20: 20 89 3B C1 69 3A 3D 98 28 9A 29 2B 31 3B C1 89 .;.i:=.(.)+1;..
01ED30: 3B C0 82 20 69 3C 3D 98 28 9A 29 20 95 C1 9A 5B ;.. i<=.(.) ...[
01ED40: 69 5D 3A 3D 30 78 C1 89 3B C0 A7 20 6C C0 89 20 i]:=0x..;.. l..
01ED50: 9E 3B BF AF 20 00 41 73 73 69 67 6E 00 96 28 73 .;.. .Assign..(s
01ED60: 31 3A 9B 20 84 20 99 3B 8E 20 73 32 3A 9B 20 84 1:. . .;. s2:. .
01ED70: 20 99 29 3B BF 8E B4 69 3A AD 3B BF 9C C0 69 3A .);...i:.;...i:
01ED80: 3D 9E 28 73 31 2C 73 32 2C A1 29 3B C0 89 20 96 =.(s1,s2,.);.. .
01ED90: 3B BF AF 20 00 49 6E 73 65 72 74 00 93 28 00 73 ;.. .Insert..(.s
01EDA0: 75 62 73 74 72 00 91 3A 9B 20 84 20 99 3B 8E 20 ubstr..:. . .;.
01EDB0: 00 64 65 73 74 00 90 3A 9B 20 84 20 99 3B 00 69 .dest..:. . .;.i
01EDC0: 6E 78 00 8F 3A AD 29 3B BF 8E B4 69 2C 6A 2C 6B nx..:.);...i,j,k
01EDD0: 3A AA 3B BF 9C BF C0 6B 3A 3D A8 28 91 29 3B C0 :.;....k:=.(.);.
01EDE0: 6A 3A 3D A8 28 90 29 3B BF C0 28 2A 74 72 75 6E j:=.(.);..(*trun
01EDF0: 63 61 74 65 20 A3 20 A9 20 74 6F 6F 20 6C 61 72 cate £ . too lar
01EE00: 67 65 20 2A 29 C0 82 20 6B 3E 28 00 53 49 5A 45 ge *).. k>(.SIZE
01EE10: 00 8D 28 90 29 2D AA 28 8F 29 29 20 95 20 6B 3A ..(.)-.(.)) . k:
01EE20: 3D 8D 28 90 29 2D 8F 20 89 3B C0 82 20 28 6A 2B =.(.)-. .;.. (j+
01EE30: 6B 29 3E 8D 28 90 29 20 95 20 6A 3A 3D 8D 28 90 k)>.(.) . j:=.(.
01EE40: 29 2D 6B 20 89 3B C0 28 2A 6D 6F 76 65 20 75 70 )-k .;.(*move up
01EE50: 20 72 65 73 74 20 B0 20 A2 2A 29 C0 8A 20 69 3A rest . .*).. i:
01EE60: 3D 6A 2D 31 20 86 20 AA 28 8F 29 20 80 20 2D 31 =j-1 . .(.) . -1
01EE70: 20 81 20 90 5B 69 2B 6B 5D 3A 3D 90 5B 69 5D 20 . .[i+k]:=.[i]
01EE80: 89 3B C0 8A 20 69 3A 3D 30 20 86 20 6B 2D 31 20 .;.. i:=0 . k-1
01EE90: 81 20 90 5B 69 2B AA 28 8F 29 5D 3A 3D 91 5B 69 . .[i+.(.)]:=.[i
01EEA0: 5D 20 89 3B C0 89 20 93 3B BF AF 20 00 44 65 6C ] .;.. .;.. .Del
01EEB0: 65 74 65 00 8C 28 8E 20 00 73 74 72 00 8B 3A 9B ete..(. .str..:.
01EEC0: 20 84 20 99 3B 8F 2C 00 6C 65 6E 00 88 3A AD 29 . .;.,.len..:.)
01EED0: 3B BF 8E B4 69 2C 6A 2C 6B 3A AD 3B BF 9C C0 6B ;...i,j,k:.;...k
01EEE0: 3A 3D A8 28 8B 29 3B C0 82 20 8F 3E 3D 6B 20 95 :=.(.);.. .>=k .
01EEF0: 20 A7 20 89 3B C0 82 20 28 8F 2B 88 29 3E 6B 20 . .;.. (.+.)>k
01EF00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
01EF10: 1A 00 00 00 02 09 4E E5 1A 00 41 02 00 00 00 02 ......N...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: 43 6F 6E 74 72 6F 6C 20 69 73 20 74 68 65 20 63 Control is the c
01F010: 75 72 72 65 6E 74 20 63 6F 6E 74 72 6F 6C 20 63 urrent control c
01F020: 6F 64 65 20 73 65 74 20 66 6F 72 20 74 68 65 20 ode set for the
01F030: 74 65 72 6D 69 6E 61 6C 0D 0A 0D 0A 09 09 4D 61 terminal......Ma
01F040: 64 65 43 68 61 6E 67 65 20 69 73 20 54 52 55 45 deChange is TRUE
01F050: 20 6F 6E 20 72 65 74 75 72 6E 20 66 72 6F 6D 20 on return from
01F060: 53 63 72 65 65 6E 43 6F 6E 74 72 6F 6C 20 69 66 ScreenControl if
01F070: 20 74 68 65 20 0D 0A 09 09 72 65 71 75 69 72 65 the ....require
01F080: 64 20 63 6F 64 65 20 69 73 20 69 6D 70 6C 65 6D d code is implem
01F090: 65 6E 74 65 64 2C 20 65 6C 73 65 20 66 61 6C 73 ented, else fals
01F0A0: 65 0D 0A 0D 0A 09 09 45 64 69 74 44 69 73 70 20 e......EditDisp
01F0B0: 63 6F 6E 74 61 69 6E 73 20 63 6F 64 65 20 74 6F contains code to
01F0C0: 20 73 69 6D 75 6C 61 74 65 20 73 6F 6D 65 20 63 simulate some c
01F0D0: 6F 64 65 73 20 77 68 65 6E 20 74 68 65 79 0D 0A odes when they..
01F0E0: 09 09 61 72 65 20 6E 6F 74 20 69 6D 70 6C 65 6D ..are not implem
01F0F0: 65 6E 74 65 64 2A 29 0D 0A 0D 0A 28 2A 09 4E 65 ented*)....(*.Ne
01F100: 77 20 72 6F 75 74 69 6E 65 73 20 61 64 64 65 64 w routines added
01F110: 20 61 74 20 76 65 72 73 69 6F 6E 20 31 2E 30 32 at version 1.02
01F120: 0D 0A 0D 0A 09 54 68 65 73 65 20 72 6F 75 74 69 .....These routi
01F130: 6E 65 73 20 6D 6F 76 65 20 74 68 65 20 72 65 73 nes move the res
01F140: 70 6F 73 69 62 69 6C 74 79 20 66 6F 72 20 73 63 posibilty for sc
01F150: 72 6F 6C 6C 69 6E 67 20 77 69 74 68 69 6E 20 61 rolling within a
01F160: 20 77 69 6E 64 6F 77 20 66 72 6F 6D 0D 0A 09 45 window from...E
01F170: 64 69 74 53 74 61 74 20 74 6F 20 53 63 72 65 65 ditStat to Scree
01F180: 6E 49 4F 0D 0A 0D 0A 09 54 68 69 73 20 69 73 20 nIO.....This is
01F190: 64 6F 6E 65 20 73 6F 20 74 68 61 74 2C 20 77 68 done so that, wh
01F1A0: 65 6E 20 77 6F 72 6B 69 6E 67 20 77 69 74 68 20 en working with
01F1B0: 74 68 65 20 6D 65 6D 6F 72 79 20 6D 61 70 70 65 the memory mappe
01F1C0: 64 20 76 65 72 73 69 6F 6E 20 6F 66 20 53 63 72 d version of Scr
01F1D0: 65 65 6E 49 4F 2C 0D 0A 09 54 68 65 20 42 61 72 eenIO,...The Bar
01F1E0: 73 20 6E 65 65 64 20 6E 6F 74 20 6A 75 6D 70 20 s need not jump
01F1F0: 75 70 20 61 6E 64 20 64 6F 77 6E 20 77 68 65 6E up and down when
01F200: 69 74 65 00 CB 28 73 3A F1 29 3B BF 9C C0 97 20 ite..(s:.);....
01F210: 73 5E 20 81 C1 82 20 28 ED 5E 2E D3 3D 01 09 29 s^ ... (.^..=..)
01F220: 20 B4 87 20 28 E8 3C 3E 30 29 20 95 C2 D7 28 73 .. (.<>0) ...(s
01F230: 29 3B C2 89 3B C1 89 3B C0 89 20 CB 3B BF AF 20 );..;..;.. .;..
01F240: 00 52 65 61 64 43 68 61 72 00 CA 28 73 3A F1 3B .ReadChar..(s:.;
01F250: 8E 20 77 3A 99 29 3B BF 9C C0 97 20 73 5E 20 81 . w:.);.... s^ .
01F260: C1 90 20 ED 5E 2E D3 20 84 C1 01 0D 3A B4 FD 28 .. .^.. ....:..(
01F270: 77 29 7C C1 01 0C 3A B4 77 3A 3D 99 28 01 05 28 w)|...:.w:=.(..(
01F280: 01 02 2C 30 29 29 7C C1 01 09 3A B4 82 20 E8 3E ..,0))|...:.. .>
01F290: 3D DE 20 95 20 D5 28 73 29 20 89 3B C2 77 3A 3D =. . .(s) .;.w:=
01F2A0: DD 5B E8 5D 3B C2 D1 28 E8 29 3B C2 89 20 28 2A .[.];..(.);.. (*
01F2B0: D0 20 D3 2A 29 3B C1 89 3B 20 28 2A 97 20 73 5E . .*);..; (*. s^
01F2C0: 2A 29 C0 89 20 CA 3B BF AF 20 00 52 65 61 64 57 *).. .;.. .ReadW
01F2D0: 6F 72 64 00 C9 28 73 3A F1 3B 8E 20 77 3A D2 29 ord..(s:.;. w:.)
01F2E0: 3B BF 8E B4 00 6C 6F 77 62 79 74 65 00 C8 2C 00 ;....lowbyte..,.
01F2F0: 68 69 67 68 62 79 74 65 00 C7 3A 99 3B BF 9C C0 highbyte..:.;...
01F300: CA 28 73 2C C8 29 3B C0 CA 28 73 2C C7 29 3B C0 .(s,.);..(s,.);.
01F310: 77 3A 3D 01 06 28 01 11 28 C7 29 2C 01 11 28 C8 w:=..(..(.),..(.
01F320: 29 29 3B C0 89 20 C9 3B BF AF 20 00 45 4F 53 00 ));.. .;.. .EOS.
01F330: C6 28 73 3A F1 29 3A AC 3B BF 9C C0 97 20 73 5E .(s:.):.;.... s^
01F340: 2C ED 5E 20 81 C1 82 20 D3 3D 01 09 20 95 20 C2 ,.^ ... .=.. . .
01F350: 82 20 E8 3E 3D DE 20 95 20 D5 28 73 29 20 89 3B . .>=. . .(s) .;
01F360: C2 82 20 D6 20 95 20 A7 20 9A C2 91 20 A7 20 DD .. . . . ... . .
01F370: 5B E8 5D 3D FA 20 89 3B C1 91 C2 A7 20 A1 20 C2 [.]=. .;.... . .
01F380: 89 28 2A D3 3D 01 09 2A 29 3B C1 89 3B 28 2A 97 .(*.=..*);..;(*.
01F390: 2A 29 C0 89 20 C6 3B BF AF 20 00 50 68 79 73 69 *).. .;.. .Physi
01F3A0: 63 61 6C 45 4F 53 00 C5 28 73 3A F1 29 3A AC 3B calEOS..(s:.):.;
01F3B0: BF 9C C0 82 20 C6 28 73 29 20 95 C1 A7 20 73 5E .... .(s) ... s^
01F3C0: 2E ED 5E 2E D6 3B C0 91 C1 A7 20 A1 3B C1 89 3B ..^..;.... .;..;
01F3D0: C0 89 20 C5 3B BF AF 20 00 52 65 73 65 74 00 C4 .. .;.. .Reset..
01F3E0: 28 73 3A F1 29 3B BF 9C C0 97 20 73 5E 2C ED 5E (s:.);.... s^,.^
01F3F0: 20 81 C1 82 20 D3 3D 01 09 20 95 C2 01 0E 28 ED ... .=.. ....(.
01F400: 20 61 20 77 69 6E 64 6F 77 20 69 73 20 73 63 72 a window is scr
01F410: 6F 6C 6C 65 64 2A 29 0D 0A 50 52 4F 43 45 44 55 olled*)..PROCEDU
01F420: 52 45 20 53 63 72 6F 6C 6C 57 69 6E 64 6F 77 55 RE ScrollWindowU
01F430: 70 28 53 74 61 72 74 4C 69 6E 65 2C 45 6E 64 4C p(StartLine,EndL
01F440: 69 6E 65 3A 43 41 52 44 49 4E 41 4C 29 3B 0D 0A ine:CARDINAL);..
01F450: 50 52 4F 43 45 44 55 52 45 20 53 63 72 6F 6C 6C PROCEDURE Scroll
01F460: 57 69 6E 64 6F 77 44 6F 77 6E 28 53 74 61 72 74 WindowDown(Start
01F470: 4C 69 6E 65 2C 45 6E 64 4C 69 6E 65 3A 43 41 52 Line,EndLine:CAR
01F480: 44 49 4E 41 4C 29 3B 0D 0A 50 52 4F 43 45 44 55 DINAL);..PROCEDU
01F490: 52 45 20 4F 75 74 70 75 74 54 6F 53 63 72 65 65 RE OutputToScree
01F4A0: 6E 28 54 75 72 6E 4F 6E 3A 42 4F 4F 4C 45 41 4E n(TurnOn:BOOLEAN
01F4B0: 29 3B 0D 0A 0D 0A 28 2A 09 43 61 6C 6C 20 74 68 );....(*.Call th
01F4C0: 69 73 20 72 6F 75 74 69 6E 65 20 77 69 74 68 20 is routine with
01F4D0: 46 41 4C 53 45 20 74 6F 20 70 72 65 76 65 6E 74 FALSE to prevent
01F4E0: 20 6F 75 74 70 75 74 20 67 6F 69 6E 67 20 74 6F output going to
01F4F0: 20 74 68 65 0D 0A 09 73 63 72 65 65 6E 2E 20 54 the...screen. T
01F500: 68 69 73 20 61 6C 6C 6F 77 73 20 79 6F 75 20 74 his allows you t
01F510: 6F 20 73 75 70 70 72 65 73 73 20 6F 75 74 70 75 o suppress outpu
01F520: 74 20 77 68 69 6C 65 20 6C 61 72 67 65 20 61 6D t while large am
01F530: 6F 75 6E 74 73 0D 0A 09 6F 66 20 73 63 72 65 65 ounts...of scree
01F540: 6E 20 61 6C 74 65 72 61 74 69 6F 6E 73 20 61 72 n alterations ar
01F550: 65 20 62 65 69 6E 67 20 6D 61 64 65 20 74 6F 20 e being made to
01F560: 73 70 65 65 64 20 75 70 20 61 20 70 72 6F 67 72 speed up a progr
01F570: 61 6D 2E 20 4F 66 0D 0A 09 63 6F 75 72 73 65 2C am. Of...course,
01F580: 20 79 6F 75 20 6D 75 73 74 20 72 65 2D 65 6E 61 you must re-ena
01F590: 62 6C 65 20 73 63 72 65 65 6E 20 6F 75 74 70 75 ble screen outpu
01F5A0: 74 20 61 6E 64 20 74 68 65 6E 20 72 65 2D 64 72 t and then re-dr
01F5B0: 61 77 20 74 68 65 0D 0A 09 73 63 72 65 65 6E 20 aw the...screen
01F5C0: 6C 61 74 65 72 2E 20 54 68 69 73 20 69 73 20 75 later. This is u
01F5D0: 73 65 64 20 62 79 20 74 68 65 20 65 64 69 74 6F sed by the edito
01F5E0: 72 20 74 6F 20 73 75 70 70 72 65 73 73 20 73 63 r to suppress sc
01F5F0: 72 65 65 6E 0D 0A 09 61 6C 74 65 72 61 74 69 6F reen...alteratio
01F600: 6D 6C 75 0D 0A 3C 64 65 66 66 69 6C 65 73 2E 6C mlu..<deffiles.l
01F610: 62 72 0D 0A 3C 65 20 43 4F 4D 4D 41 4E 44 2E 44 br..<e COMMAND.D
01F620: 45 46 0D 0A 3C 65 20 43 4F 4E 56 45 52 53 49 2E EF..<e CONVERSI.
01F630: 44 45 46 0D 0A 3C 65 20 43 50 4D 2E 44 45 46 0D DEF..<e CPM.DEF.
01F640: 0A 3C 65 20 43 50 4D 42 49 4F 53 2E 44 45 46 0D .<e CPMBIOS.DEF.
01F650: 0A 3C 65 20 44 45 42 55 47 2E 44 45 46 0D 0A 3C .<e DEBUG.DEF..<
01F660: 65 20 45 58 43 48 41 4E 47 45 2E 44 45 46 0D 0A e EXCHANGE.DEF..
01F670: 3C 65 20 46 41 53 54 4D 4F 56 45 2E 44 45 46 0D <e FASTMOVE.DEF.
01F680: 0A 3C 65 20 46 49 4C 45 53 2E 44 45 46 0D 0A 3C .<e FILES.DEF..<
01F690: 65 20 47 45 54 46 49 4C 45 53 2E 44 45 46 0D 0A e GETFILES.DEF..
01F6A0: 3C 65 20 49 4E 4F 55 54 2E 44 45 46 0D 0A 3C 65 <e INOUT.DEF..<e
01F6B0: 20 49 4E 54 4C 4F 47 49 43 2E 44 45 46 0D 0A 3C INTLOGIC.DEF..<
01F6C0: 65 20 4C 4F 41 44 45 52 2E 44 45 46 0D 0A 3C 65 e LOADER.DEF..<e
01F6D0: 20 4D 41 54 48 53 2E 44 45 46 0D 0A 3C 65 20 50 MATHS.DEF..<e P
01F6E0: 52 4F 43 45 53 53 45 2E 44 45 46 0D 0A 3C 65 20 ROCESSE.DEF..<e
01F6F0: 51 55 49 43 4B 53 54 52 2E 44 45 46 0D 0A 3C 65 QUICKSTR.DEF..<e
01F700: 20 52 45 41 4C 49 4E 4F 55 2E 44 45 46 0D 0A 3C REALINOU.DEF..<
01F710: 65 20 53 45 54 55 50 43 41 4C 2E 44 45 46 0D 0A e SETUPCAL.DEF..
01F720: 3C 65 20 53 4D 41 4C 4C 49 4F 2E 44 45 46 0D 0A <e SMALLIO.DEF..
01F730: 3C 65 20 53 4F 4C 56 45 2E 44 45 46 0D 0A 3C 65 <e SOLVE.DEF..<e
01F740: 20 53 4F 52 54 2E 44 45 46 0D 0A 3C 65 20 53 54 SORT.DEF..<e ST
01F750: 4F 52 41 47 45 2E 44 45 46 0D 0A 3C 65 20 53 54 ORAGE.DEF..<e ST
01F760: 52 45 41 4D 53 2E 44 45 46 0D 0A 3C 65 20 53 54 REAMS.DEF..<e ST
01F770: 52 49 4E 47 53 2E 44 45 46 0D 0A 3C 65 20 54 45 RINGS.DEF..<e TE
01F780: 52 4D 49 4E 41 4C 2E 44 45 46 0D 0A 3C 65 20 50 RMINAL.DEF..<e P
01F790: 4F 52 54 49 4F 2E 44 45 46 0D 0A 3C 65 20 43 48 ORTIO.DEF..<e CH
01F7A0: 41 49 4E 2E 44 45 46 0D 0A 3C 65 20 53 43 52 45 AIN.DEF..<e SCRE
01F7B0: 45 4E 49 4F 2E 44 45 46 0D 0A 3C 66 0D 0A 1A 65 ENIO.DEF..<f...e
01F7C0: 20 53 4F 52 54 2E 44 45 46 0D 0A 3C 65 20 53 54 SORT.DEF..<e ST
01F7D0: 4F 52 41 47 45 2E 44 45 46 0D 0A 3C 65 20 53 54 ORAGE.DEF..<e ST
01F7E0: 52 45 41 4D 53 2E 44 45 46 0D 0A 3C 65 20 53 54 REAMS.DEF..<e ST
01F7F0: 52 49 4E 47 53 2E 44 45 46 0D 0A 3C 65 20 54 45 RINGS.DEF..<e TE
01F800: 6E 73 20 64 75 72 69 6E 67 20 65 78 65 63 75 74 ns during execut
01F810: 69 6F 6E 20 6F 66 20 72 65 70 65 61 74 73 20 2A ion of repeats *
01F820: 29 0D 0A 45 4E 44 20 53 63 72 65 65 6E 49 4F 2E )..END ScreenIO.
01F830: 0D 0A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01F840: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01F850: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01F860: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01F870: 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A 1A ................
01F880: 44 49 4E 41 4C 29 3B 0D 0A 50 52 4F 43 45 44 55 DINAL);..PROCEDU
01F890: 52 45 20 4F 75 74 70 75 74 54 6F 53 63 72 65 65 RE OutputToScree
01F8A0: 6E 28 54 75 72 6E 4F 6E 3A 42 4F 4F 4C 45 41 4E n(TurnOn:BOOLEAN
01F8B0: 29 3B 0D 0A 0D 0A 28 2A 09 43 61 6C 6C 20 74 68 );....(*.Call th
01F8C0: 69 73 20 72 6F 75 74 69 6E 65 20 77 69 74 68 20 is routine with
01F8D0: 46 41 4C 53 45 20 74 6F 20 70 72 65 76 65 6E 74 FALSE to prevent
01F8E0: 20 6F 75 74 70 75 74 20 67 6F 69 6E 67 20 74 6F output going to
01F8F0: 20 74 68 65 0D 0A 09 73 63 72 65 65 6E 2E 20 54 the...screen. T
01F900: 68 69 73 20 61 6C 6C 6F 77 73 20 79 6F 75 20 74 his allows you t
01F910: 6F 20 73 75 70 70 72 65 73 73 20 6F 75 74 70 75 o suppress outpu
01F920: 74 20 77 68 69 6C 65 20 6C 61 72 67 65 20 61 6D t while large am
01F930: 6F 75 6E 74 73 0D 0A 09 6F 66 20 73 63 72 65 65 ounts...of scree
01F940: 6E 20 61 6C 74 65 72 61 74 69 6F 6E 73 20 61 72 n alterations ar
01F950: 65 20 62 65 69 6E 67 20 6D 61 64 65 20 74 6F 20 e being made to
01F960: 73 70 65 65 64 20 75 70 20 61 20 70 72 6F 67 72 speed up a progr
01F970: 61 6D 2E 20 4F 66 0D 0A 09 63 6F 75 72 73 65 2C am. Of...course,
01F980: 20 79 6F 75 20 6D 75 73 74 20 72 65 2D 65 6E 61 you must re-ena
01F990: 62 6C 65 20 73 63 72 65 65 6E 20 6F 75 74 70 75 ble screen outpu
01F9A0: 74 20 61 6E 64 20 74 68 65 6E 20 72 65 2D 64 72 t and then re-dr
01F9B0: 61 77 20 74 68 65 0D 0A 09 73 63 72 65 65 6E 20 aw the...screen
01F9C0: 6C 61 74 65 72 2E 20 54 68 69 73 20 69 73 20 75 later. This is u
01F9D0: 73 65 64 20 62 79 20 74 68 65 20 65 64 69 74 6F sed by the edito
01F9E0: 72 20 74 6F 20 73 75 70 70 72 65 73 73 20 73 63 r to suppress sc
01F9F0: 72 65 65 6E 0D 0A 09 61 6C 74 65 72 61 74 69 6F reen...alteratio
01FA00: 61 64 00 A2 2A 29 C0 94 C1 82 20 69 3E 3D B1 20 ad..*).... i>=.
01FA10: 95 20 92 20 89 3B C1 CA 28 73 2C BC 29 3B C1 82 . . .;..(s,.);..
01FA20: 20 73 5E 2E ED 5E 2E D6 20 95 20 92 20 89 3B C1 s^..^.. . . .;.
01FA30: B2 5E 3A 3D 01 11 28 BC 29 3B C1 D1 28 B2 29 3B .^:=..(.);..(.);
01FA40: C1 69 3A 3D 69 2B 31 3B C1 89 3B C0 B0 3A 3D AA .i:=i+1;..;..:=.
01FA50: 28 69 29 3B C0 89 20 B3 3B BF AF 20 00 57 72 69 (i);.. .;.. .Wri
01FA60: 74 65 52 65 63 00 9F 28 73 3A F1 3B B2 3A AB 3B teRec..(s:.;.:.;
01FA70: B1 3A AD 3B 8E 20 B0 3A AA 29 3B BF 8E B4 69 3A .:.;. .:.);...i:
01FA80: AD 3B BF 9C C0 69 3A 3D 30 3B B4 28 2A A6 20 A2 .;...i:=0;.(*. .
01FA90: 2A 29 C0 73 5E 2E ED 5E 2E D6 3A 3D A1 3B C0 A0 *).s^..^..:=.;..
01FAA0: 20 28 69 3C B1 29 20 87 20 8C 20 73 5E 2E ED 5E (i<.) . . s^..^
01FAB0: 2E D6 BA 81 C1 D4 28 73 2C 99 28 B2 5E 29 29 3B ......(s,.(.^));
01FAC0: C1 D1 28 B2 29 3B C1 69 3A 3D 69 2B 31 3B C1 89 ..(.);.i:=i+1;..
01FAD0: 3B C0 B0 3A 3D AA 28 69 29 3B C0 89 20 9F 3B BF ;..:=.(i);.. .;.
01FAE0: AF 20 00 47 65 74 50 6F 73 00 98 28 73 3A F1 3B . .GetPos..(s:.;
01FAF0: 8E 20 B9 2C B8 3A AD 29 3B BF 8E B4 69 3A AD 3B . .,.:.);...i:.;
01FB00: BF 9C C0 97 20 73 5E 2C ED 5E 20 81 C1 B8 3A 3D .... s^,.^ ...:=
01FB10: E8 2B F5 2A B6 28 66 2E BD 29 3B C1 69 3A 3D B6 .+.*.(f..);.i:=.
01FB20: 28 66 2E BE 29 3B C1 B9 3A 3D 69 20 88 20 34 3B (f..);..:=i . 4;
01FB30: C1 B8 3A 3D B8 2B 31 36 33 38 34 2A 28 69 2D 34 ..:=.+16384*(i-4
01FB40: 2A B9 29 3B C1 82 20 E6 3D E1 20 95 20 28 2A 20 *.);.. .=. . (*
01FB50: F7 20 70 6F 69 6E 74 65 72 73 20 61 72 65 20 61 . pointers are a
01FB60: 68 65 61 64 20 F8 20 70 6F 73 69 74 69 6F 6E 2A head . position*
01FB70: 29 C2 82 20 B8 3C 3D AD 28 DE 29 20 95 C3 44 45 ).. .<=.(.) ..DE
01FB80: 43 28 B9 29 3B C3 B8 3A 3D B8 2B 28 4D 41 58 28 C(.);..:=.+(MAX(
01FB90: AD 29 2D AD 28 DE 29 29 3B C2 91 C3 B8 3A 3D B8 .)-.(.));....:=.
01FBA0: 2D AD 28 DE 29 2D 31 3B C3 89 3B C2 89 3B C1 89 -.(.)-1;..;..;..
01FBB0: C0 89 20 98 3B BF AF 20 00 42 75 66 66 65 72 41 .. .;.. .BufferA
01FBC0: 68 65 61 64 00 8D 28 73 3A F1 3B 00 66 6F 72 63 head..(s:.;.forc
01FBD0: 65 00 8B 3A AC 29 3B BF 9C C0 82 20 73 5E 2E ED e..:.);.... s^..
01FBE0: 5E 2E D3 3D 01 0D 20 95 20 FE 28 8B 29 20 89 3B ^..=.. . .(.) .;
01FBF0: C0 89 20 8D 3B BF AF 20 00 53 65 74 42 75 66 66 .. .;.. .SetBuff
01FC00: 3A AA 3B B4 28 2A F4 20 F3 20 EA 2A 29 C1 00 42 :.;.(*. . .*)..B
01FC10: 75 66 66 65 72 00 DD B5 3A 9B 5B 30 2E 2E F5 2D uffer...:.[0...-
01FC20: 31 5D 20 84 20 01 11 3B C2 28 2A 54 68 65 20 EA 1] . ..;.(*The .
01FC30: 20 69 73 20 6F 6E 6C 79 20 75 73 65 64 20 E3 20 is only used .
01FC40: 01 09 20 66 69 6C 65 73 20 61 6E 64 20 C2 BA 63 .. files and ..c
01FC50: 6F 6E 73 6F 6C 65 20 E1 20 DF 20 6D 61 79 20 00 onsole . . may .
01FC60: 62 65 00 DC 20 69 6E 63 72 65 61 73 65 64 20 61 be.. increased a
01FC70: 74 20 77 69 6C 6C 2A 29 BF C1 89 3B BF 8E B4 69 t will*)...;...i
01FC80: 3A AA 3B C0 00 42 75 66 66 65 72 73 00 DB 3A AD :.;..Buffers..:.
01FC90: 3D 31 3B BF AF 20 00 43 6F 6E 6E 65 63 74 00 DA =1;.. .Connect..
01FCA0: 28 8E 20 73 3A F1 3B 8E 20 66 3A EE 3B 00 64 69 (. s:.;. f:.;.di
01FCB0: 72 00 D9 3A E5 29 3B BF 9C C0 FC 28 73 2C 00 53 r..:.);....(s,.S
01FCC0: 49 5A 45 00 D8 28 73 5E 29 2B F5 2A 28 DB 2D 31 IZE..(s^)+.*(.-1
01FCD0: 29 29 3B C0 97 20 73 5E 20 81 C1 ED 3A 3D EF 28 ));.. s^ ...:=.(
01FCE0: 8F 28 66 29 29 3B C1 EC 3A 3D A1 3B C1 E6 3A 3D .(f));..:=.;..:=
01FCF0: D9 3B C1 E0 3A 3D F5 2A DB 3B C1 82 20 D9 3D E2 .;..:=.*.;.. .=.
01FD00: 20 95 20 E8 3A 3D 30 C1 91 20 E8 3A 3D E0 2B 31 . .:=0.. .:=.+1
01FD10: 20 89 3B C1 E4 3A 3D ED 5E 2E 66 3B C1 DE 3A 3D .;..:=.^.f;..:=
01FD20: E0 C1 89 3B C0 89 20 DA 3B BF AF 20 00 42 75 66 ...;.. .;.. .Buf
01FD30: 66 65 72 4F 75 74 00 D7 28 73 3A F1 29 3B BF 8E ferOut..(s:.);..
01FD40: B4 69 3A AA 3B BF 9C C0 97 20 73 5E 20 81 C1 ED .i:.;.... s^ ...
01FD50: 5E 2E 66 3A 3D E4 3B C1 01 0F 28 ED 5E 2C 8F 28 ^.f:=.;...(.^,.(
01FD60: DD 29 2C E0 2C 69 29 3B C1 82 20 69 3C 3E E0 20 .),.,i);.. i<>.
01FD70: 95 20 ED 5E 2E 00 65 6F 66 00 D6 3A 3D 9A 20 89 . .^..eof..:=. .
01FD80: 3B C1 E8 3A 3D 30 3B C1 EC 3A 3D A1 3B C1 E4 3A ;..:=0;..:=.;..:
01FD90: 3D ED 5E 2E 66 3B C1 89 3B C0 89 20 D7 3B BF AF =.^.f;..;.. .;..
01FDA0: 20 00 42 75 66 66 65 72 49 6E 00 D5 28 73 3A F1 .BufferIn..(s:.
01FDB0: 29 3B BF 8E B4 69 3A AA 3B BF 9C C0 97 20 73 5E );...i:.;.... s^
01FDC0: 20 81 C1 E4 3A 3D ED 5E 2E 66 3B C1 01 10 28 ED ...:=.^.f;...(.
01FDD0: 5E 2C 8F 28 DD 29 2C E0 2C 69 29 3B C1 ED 5E 2E ^,.(.),.,i);..^.
01FDE0: D6 3A 3D 69 3D 30 3B C1 DE 3A 3D 69 3B C1 E8 3A .:=i=0;..:=i;..:
01FDF0: 3D 30 3B C1 89 3B C0 89 20 D5 3B C2 BF AF 20 00 =0;..;.. .;... .
01FE00: 6D 6C 75 0D 0A 3C 61 73 6D 66 69 6C 65 73 2E 6C mlu..<asmfiles.l
01FE10: 62 72 0D 0A 3C 65 20 43 48 41 49 4E 2E 41 53 4D br..<e CHAIN.ASM
01FE20: 0D 0A 3C 65 20 43 50 4D 2E 41 53 4D 0D 0A 3C 65 ..<e CPM.ASM..<e
01FE30: 20 43 50 4D 42 49 4F 53 2E 41 53 4D 0D 0A 3C 65 CPMBIOS.ASM..<e
01FE40: 20 46 41 53 54 4D 4F 56 45 2E 41 53 4D 0D 0A 3C FASTMOVE.ASM..<
01FE50: 65 20 49 4E 54 4C 4F 47 49 43 2E 41 53 4D 0D 0A e INTLOGIC.ASM..
01FE60: 3C 65 20 50 4F 52 54 49 4F 2E 41 53 4D 0D 0A 3C <e PORTIO.ASM..<
01FE70: 65 20 2D 52 45 41 44 4D 45 2E 41 53 4D 0D 0A 3C e -README.ASM..<
01FE80: 65 20 45 58 43 48 41 4E 47 45 2E 41 53 4D 0D 0A e EXCHANGE.ASM..
01FE90: 3C 65 20 4F 50 53 41 53 4D 2E 44 41 54 0D 0A 3C <e OPSASM.DAT..<
01FEA0: 66 0D 0A 00 00 00 00 00 00 00 00 00 00 00 00 00 f...............
01FEB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FEC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FED0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FEE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FEF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FF00: 00 1A 45 58 43 48 41 4E 47 45 2E 41 53 4D 0D 0A ..EXCHANGE.ASM..
01FF10: 3C 65 20 4F 50 53 41 53 4D 2E 44 41 54 0D 0A 3C <e OPSASM.DAT..<
01FF20: 66 0D 0A 00 00 00 00 00 00 00 00 00 00 00 00 00 f...............
01FF30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FF40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FF50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FF60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FF70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FF80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FF90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FFA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FFB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FFC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FFD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FFE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
01FFF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020000: 6D 6C 75 0D 0A 3C 6D 6F 64 66 69 6C 65 73 2E 6C mlu..<modfiles.l
020010: 62 72 0D 0A 3C 65 20 42 55 49 4C 44 53 55 42 2E br..<e BUILDSUB.
020020: 4D 4F 44 0D 0A 3C 65 20 43 4F 4D 4D 41 4E 44 2E MOD..<e COMMAND.
020030: 4D 4F 44 0D 0A 3C 65 20 43 4F 4E 56 45 52 53 49 MOD..<e CONVERSI
020040: 2E 4D 4F 44 0D 0A 3C 65 20 44 45 42 55 47 2E 4D .MOD..<e DEBUG.M
020050: 4F 44 0D 0A 3C 65 20 46 49 4C 45 53 2E 4D 4F 44 OD..<e FILES.MOD
020060: 0D 0A 3C 65 20 47 45 54 46 49 4C 45 53 2E 4D 4F ..<e GETFILES.MO
020070: 44 0D 0A 3C 65 20 49 4E 4F 55 54 2E 4D 4F 44 0D D..<e INOUT.MOD.
020080: 0A 3C 65 20 50 4C 55 53 42 49 4F 53 2E 4D 4F 44 .<e PLUSBIOS.MOD
020090: 0D 0A 3C 65 20 4D 41 54 48 53 2E 4D 4F 44 0D 0A ..<e MATHS.MOD..
0200A0: 3C 65 20 50 52 45 43 45 44 45 4E 2E 4D 4F 44 0D <e PRECEDEN.MOD.
0200B0: 0A 3C 65 20 50 52 4F 43 45 53 53 45 2E 4D 4F 44 .<e PROCESSE.MOD
0200C0: 0D 0A 3C 65 20 51 55 49 43 4B 53 54 52 2E 4D 4F ..<e QUICKSTR.MO
0200D0: 44 0D 0A 3C 65 20 52 45 41 4C 49 4E 4F 55 2E 4D D..<e REALINOU.M
0200E0: 4F 44 0D 0A 3C 65 20 53 45 54 55 50 43 41 4C 2E OD..<e SETUPCAL.
0200F0: 4D 4F 44 0D 0A 3C 65 20 53 4D 41 4C 4C 49 4F 2E MOD..<e SMALLIO.
020100: 4D 4F 44 0D 0A 3C 65 20 53 4F 4C 56 45 2E 4D 4F MOD..<e SOLVE.MO
020110: 44 0D 0A 3C 65 20 53 4F 52 54 2E 4D 4F 44 0D 0A D..<e SORT.MOD..
020120: 3C 65 20 53 54 4F 52 41 47 45 2E 4D 4F 44 0D 0A <e STORAGE.MOD..
020130: 3C 65 20 53 54 52 45 41 4D 53 2E 4D 4F 44 0D 0A <e STREAMS.MOD..
020140: 3C 65 20 53 54 52 49 4E 47 53 2E 4D 4F 44 0D 0A <e STRINGS.MOD..
020150: 3C 65 20 54 45 52 4D 49 4E 41 4C 2E 4D 4F 44 0D <e TERMINAL.MOD.
020160: 0A 3C 66 0D 0A 1A 20 53 45 54 55 50 43 41 4C 2E .<f... SETUPCAL.
020170: 4D 4F 44 0D 0A 3C 65 20 53 4D 41 4C 4C 49 4F 2E MOD..<e SMALLIO.
020180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0201A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0201B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0201C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0201D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0201E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0201F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020200: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
020210: 1B 00 00 00 02 09 4E E5 1B 00 41 02 00 00 00 02 ......N...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: C0 B2 20 67 69 76 65 73 20 B0 20 AE 20 AB 20 00 .. gives . . . .
020310: 74 6F 00 AA 20 73 6B 69 70 20 61 74 20 62 65 67 to.. skip at beg
020320: 69 6E 6E 69 6E 67 20 AE 20 B3 BF C0 B1 20 98 28 inning . .... .(
020330: B3 29 2B 31 20 00 69 66 00 A9 20 6E 6F 74 20 66 .)+1 .if.. not f
020340: 6F 75 6E 64 2A 29 BF 9C C0 6B 3A 3D 00 4C 65 6E ound*)...k:=.Len
020350: 67 74 68 00 A8 28 B3 29 2D A8 28 B5 29 3B C0 69 gth..(.)-.(.);.i
020360: 3A 3D B2 3B C0 94 C1 82 20 28 69 3E 6B 29 20 95 :=.;.... (i>k) .
020370: 20 92 20 89 3B C1 6A 3A 3D 30 3B C1 94 C2 82 20 . .;.j:=0;....
020380: 28 6A 3E 98 28 B5 29 29 20 85 20 28 B5 5B 6A 5D (j>.(.)) . (.[j]
020390: 3D 30 63 29 20 95 C3 A7 20 69 C3 89 3B C2 82 20 =0c) ... i..;..
0203A0: 28 B5 5B 6A 5D 3C 3E B3 5B 69 2B 6A 5D 29 20 95 (.[j]<>.[i+j]) .
0203B0: 20 92 20 89 3B C2 00 49 4E 43 00 A6 28 6A 29 3B . .;..INC..(j);
0203C0: C2 89 3B C1 A6 28 69 29 3B C1 89 3B C0 A7 20 98 ..;..(i);..;.. .
0203D0: 28 B3 29 2B 31 3B C0 89 20 B6 3B B4 BF BF BF BF (.)+1;.. .;.....
0203E0: BF AF 20 00 43 6F 6E 63 61 74 00 A5 28 73 31 2C .. .Concat..(s1,
0203F0: 73 32 3A 9B 20 84 20 99 3B 8E 20 73 33 3A 9B 20 s2:. . .;. s3:.
020400: 84 20 99 29 3B BF BF 28 2A B4 43 6F 6E 63 61 74 . .);..(*.Concat
020410: 65 6E 61 74 65 20 74 77 6F 20 73 74 72 69 6E 67 enate two string
020420: 73 20 AA 20 63 72 65 61 74 65 20 61 20 74 68 69 s . create a thi
020430: 72 64 BF C0 00 72 65 73 75 6C 74 00 A3 20 00 73 rd...result.£ .s
020440: 74 72 69 6E 67 00 A2 20 00 69 73 00 9F 20 B8 20 tring.. .is.. .
020450: 62 79 74 65 20 BB BF C0 A3 20 9F 20 74 72 75 6E byte ...£ . trun
020460: 63 61 74 65 64 20 A9 20 77 6F 6E 27 74 20 66 69 cated . won't fi
020470: 74 2A 29 BF 9C C0 6A 3A 3D 98 28 73 33 29 3B C0 t*)...j:=.(s3);.
020480: 82 20 6A 3E 98 28 73 31 29 20 95 20 6A 3A 3D 98 . j>.(s1) . j:=.
020490: 28 73 31 29 20 89 3B C0 69 3A 3D 30 3B C0 A0 20 (s1) .;.i:=0;..
0204A0: 28 69 3C 3D 6A 29 20 87 20 28 73 31 5B 69 5D 3C (i<=j) . (s1[i]<
0204B0: 3E 30 63 29 20 81 C1 73 33 5B 69 5D 3A 3D 73 31 >0c) ..s3[i]:=s1
0204C0: 5B 69 5D 3B C1 A6 28 69 29 3B C1 89 3B C0 82 20 [i];..(i);..;..
0204D0: 69 3E 98 28 73 33 29 20 95 20 A7 20 89 3B C0 6A i>.(s3) . . .;.j
0204E0: 3A 3D 98 28 73 32 29 3B C0 82 20 6A 3E 28 98 28 :=.(s2);.. j>(.(
0204F0: 73 33 29 2D 69 29 20 95 20 6A 3A 3D 98 28 73 33 s3)-i) . j:=.(s3
020500: E5 CD 0D 19 C3 97 08 C9 21 01 00 E5 CD D4 07 CD ........!.......
020510: 81 08 C9 DD E5 DD 21 00 00 DD 39 DD 6E 06 DD 66 ......!...9.n..f
020520: 07 E5 DD 6E 04 26 00 E5 CD 9B 18 DD 6E 06 DD 66 ...n.&......n..f
020530: 07 5E 23 56 EB ED 5B 10 01 D5 22 10 01 E5 FD E1 .^#V..[...".....
020540: 21 FF FF FD 75 00 FD 74 01 21 FF FF FD 75 02 FD !...u..t.!...u..
020550: 74 03 21 FF FF FD 75 06 FD 74 07 2A 5F 02 26 00 t.!...u..t.*_.&.
020560: CB 0D D2 7E 09 2A 71 02 FD 75 04 FD 74 05 DD 6E ...~.*q..u..t..n
020570: 06 DD 66 07 5E 23 56 ED 53 71 02 C3 98 09 2A 73 ..f.^#V.Sq....*s
020580: 02 FD 2A 10 01 FD 75 04 FD 74 05 DD 6E 06 DD 66 ..*...u..t..n..f
020590: 07 5E 23 56 ED 53 73 02 E1 22 10 01 DD E1 E1 C1 .^#V.Ss.."......
0205A0: C1 E9 DD E5 DD 21 00 00 DD 39 E5 DD 6E 06 DD 66 .....!...9..n..f
0205B0: 07 E5 2A 7C 01 29 11 59 01 19 5E 23 56 EB E5 CD ..*|.).Y..^#V...
0205C0: 9B 76 2A 7E 01 11 FF FF B7 ED 52 CA EB 09 2A 7E .v*~......R...*~
0205D0: 01 11 08 00 19 5E 16 00 EB 11 09 00 B7 ED 52 21 .....^........R!
0205E0: 00 00 28 01 23 DD 75 FF C3 39 0A DD 6E 06 DD 66 ..(.#.u..9..n..f
0205F0: 07 E5 CD 78 76 21 7E 01 E5 DD 6E 04 26 00 E5 CD ...xv!~...n.&...
020600: 13 09 21 00 00 DD 75 FF 2A 7C 01 29 11 59 01 19 ..!...u.*|.).Y..
020610: 5E 23 56 EB 11 FF FF B7 ED 52 C2 2F 0A 2A 7C 01 ^#V......R./.*|.
020620: 29 11 59 01 19 ED 5B 7E 01 73 23 72 C3 39 0A 2A ).Y...[~.s#r.9.*
020630: 80 01 ED 5B 7E 01 73 23 72 DD 6E FF 26 00 CB 0D ...[~.s#r.n.&...
020640: D2 4D 0A 21 02 00 E5 CD 15 78 C3 5A 0A 2A 7E 01 .M.!.....x.Z.*~.
020650: 11 08 00 19 DD 5E 04 16 00 73 DD F9 DD E1 E1 C1 .....^...s......
020660: C1 E9 DD E5 DD 21 00 00 DD 39 E5 DD 6E 04 DD 66 .....!...9..n..f
020670: 05 ED 5B 10 01 D5 22 10 01 E5 FD E1 FD 6E 04 FD ..[..."......n..
020680: 66 05 11 00 00 B7 ED 52 C2 2C 0B FD 6E 00 FD 66 f......R.,..n..f
020690: 01 11 FF FF B7 ED 52 C2 A6 0A 21 02 00 DD 75 FE ......R...!...u.
0206A0: DD 74 FF C3 BD 0A FD 2A 10 01 FD 6E 00 FD 66 01 .t.....*...n..f.
0206B0: 11 09 00 19 5E 23 56 DD 73 FE DD 72 FF 2A CF 01 ....^#V.s..r.*..
0206C0: 23 22 CF 01 2A CF 01 FD 2A 10 01 FD 75 04 FD 74 #"..*...*...u..t
0206D0: 05 21 D7 01 ED 5B 12 01 D5 22 12 01 E5 FD E1 2A .!...[...".....*
0206E0: CF 01 FD 75 00 FD 74 01 DD 6E FE 26 00 FD 75 04 ...u..t..n.&..u.
0206F0: DD 6E FE DD 66 FF 11 01 00 B7 ED 52 C2 0A 0B FD .n..f......R....
020700: C3 39 15 01 02 FF 00 00 00 01 00 00 00 00 00 00 .9..............
020710: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020720: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020730: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020740: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020750: 00 00 00 00 00 00 00 00 00 FF FF FF FF FF FF FF ................
020760: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 00 ................
020770: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020780: 00 00 00 00 00 00 00 00 53 54 41 4E 44 41 52 44 ........STANDARD
020790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0207A0: 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 00 ........
0207B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0207C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0207D0: 00 01 00 03 00 00 00 00 00 00 00 00 00 00 00 00 ................
0207E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0207F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020800: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020810: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020820: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020830: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020840: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020850: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
020860: 00 00 00 00 00 00 00 00 00 64 00 64 00 FF FF 00 .........d.d....
020870: 00 FF FF FF FF FF FF 00 DD E5 DD 21 00 00 DD 39 ...........!...9
020880: 2A 7F 18 11 04 00 19 ED 5B D1 01 73 23 72 DD 6E *.......[..s#r.n
020890: 04 DD 66 05 ED 5B D1 01 73 23 72 2A D1 01 23 22 ..f..[..s#r*..#"
0208A0: D1 01 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 21 ..........!...9!
0208B0: 35 00 E5 CD 1C 6F DD 6E 04 DD 66 05 E5 CD 46 6F 5....o.n..f...Fo
0208C0: DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 E5 21 D7 ........!...9.!.
0208D0: 01 ED 5B 10 01 D5 22 10 01 E5 FD E1 21 36 00 E5 ..[...".....!6..
0208E0: FD 6E 04 26 00 E5 CD 3A 6F FD 2A 10 01 FD 6E 00 .n.&...:o.*...n.
0208F0: FD 66 01 E5 CD 1C 6F FD 2A 10 01 FD 6E 04 26 00 .f....o.*...n.&.
020900: 6E 05 26 00 FD 75 05 C3 25 0B FD 2A 12 01 FD 6E n.&..u..%..*...n
020910: 05 26 00 FD 75 05 FD 6E 05 FD 66 06 11 00 01 CD .&..u..n..f.....
020920: 7A 6B FD 75 06 E1 22 12 01 CD C5 02 E1 22 10 01 zk.u.."......"..
020930: DD F9 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 2A ..........!...9*
020940: 87 01 26 00 DD 5E 06 16 00 B7 ED 52 CA 5C 0B DD ..&..^.....R.\..
020950: 6E 04 DD 66 05 E5 CD 15 78 C3 5F 0B CD 0D 70 DD n..f....x._...p.
020960: E1 E1 C1 C1 E9 DD E5 DD 21 00 00 DD 39 E5 E5 21 ........!...9..!
020970: FF FF DD 75 FC DD 74 FD 2A DA 15 DD 75 06 DD 74 ...u..t.*...u..t
020980: 07 DD 6E 04 DD 66 05 11 00 00 73 2A 87 01 26 00 ..n..f....s*..&.
020990: 11 1D 00 B7 ED 52 C2 E9 0B DD 6E 04 DD 66 05 11 .....R....n..f..
0209A0: 01 00 73 CD 0D 70 21 34 00 E5 21 29 00 E5 CD 37 ..s..p!4..!)...7
0209B0: 0B DD E5 E1 01 FC FF 09 E5 CD 14 1B DD 6E FC DD .............n..
0209C0: 66 FD ED 5B 10 01 D5 22 10 01 E5 FD E1 21 04 00 f..[...".....!..
0209D0: FD 75 0B 21 FF FF FD 75 0E FD 74 0F 21 00 00 FD .u.!...u..t.!...
0209E0: 75 09 FD 74 0A E1 22 10 01 2A 87 01 26 00 11 01 u..t.."..*..&...
0209F0: 00 B7 ED 52 CA 01 0C 21 3B 00 E5 CD 15 78 C3 80 ...R...!;....x..
020A00: 0C CD 08 09 2A 7E 01 11 FF FF B7 ED 52 CA 80 0C ....*~......R...
020A10: DD 6E FC DD 66 FD 11 FF FF B7 ED 52 C2 2B 0C 2A .n..f......R.+.*
020A20: 7E 01 DD 75 06 DD 74 07 C3 65 0C DD 6E FC DD 66 ~..u..t..e..n..f
020A30: FD 11 0C 00 19 ED 5B 7E 01 73 23 72 2A 7E 01 11 ......[~.s#r*~..
020A40: 09 00 19 5E 23 56 EB CD E6 6B E5 DD 6E FC DD 66 ...^#V...k..n..f
020A50: FD 11 09 00 19 D1 73 23 72 DD 6E FC DD 66 FD DD ......s#r.n..f..
020A60: 75 06 DD 74 07 2A 7E 01 11 08 00 19 5E 16 00 EB u..t.*~.....^...
020A70: 11 04 00 B7 ED 52 CA 80 0C 21 4E 00 E5 CD 15 78 .....R...!N....x
020A80: DD F9 DD E1 E1 C1 E9 2A 0E 01 01 F2 FF 09 E5 21 .......*.......!
020A90: 06 00 E5 CD BE 6C FD 2A 0E 01 FD 6E F4 FD 66 F5 .....l.*...n..f.
020AA0: FD 5E F2 FD 56 F3 01 06 00 ED B0 FD 6E F4 FD 66 .^..V.......n..f
020AB0: F5 11 03 00 19 FD 5E F2 FD 56 F3 73 23 72 FD 6E ......^..V.s#r.n
020AC0: F4 FD 66 F5 23 ED 5B DA 15 73 23 72 FD 6E F4 FD ..f.#.[..s#r.n..
020AD0: 66 F5 11 00 00 73 FD 6E F4 FD 66 F5 11 05 00 19 f....s.n..f.....
020AE0: 11 00 00 73 FD 6E F2 FD 66 F3 FD 75 F4 FD 74 F5 ...s.n..f..u..t.
020AF0: C9 DD E5 2A 0E 01 E5 ED 73 0E 01 DD 2A 0E 01 21 ...*....s...*..!
020B00: 26 00 11 01 00 B7 ED 52 FA 34 03 D5 E5 DD 73 FE &......R.4....s.
020B10: DD 72 FF 2A 10 01 01 04 00 09 DD 5E FE DD 56 FF .r.*.......^..V.
020B20: 19 5E 16 00 EB 26 00 E5 CD 1C 6F E1 D1 13 2B CB .^...&....o...+.
020B30: 7C CA 0B 03 E1 22 10 01 DD F9 DD E1 C9 2A CF 01 |....".......*..
020B40: 23 22 CF 01 2A CF 01 11 C8 00 EB B7 ED 52 F2 58 #"..*........R.X
020B50: 03 21 95 00 E5 CD 15 78 2A CF 01 22 D7 01 2A DB .!.....x*.."..*.
020B60: 01 26 00 23 7D 32 DB 01 CD C5 02 21 00 00 22 DC .&.#}2.....!..".
020B70: 01 C9 2A CF 01 11 00 00 B7 ED 52 FA 93 03 2A DB ..*.......R...*.
020B80: 01 26 00 11 01 00 EB B7 ED 52 F2 93 03 CD 3D 03 .&.......R....=.
020B90: C3 99 03 21 00 00 22 D7 01 C9 DD E5 DD 21 00 00 ...!.."......!..
020BA0: DD 39 DD 6E 04 DD 66 05 5E 23 56 EB 11 FF FF B7 .9.n..f.^#V.....
020BB0: ED 52 C2 BF 03 21 01 00 7D 32 DB 01 C3 D4 03 DD .R...!..}2......
020BC0: 6E 04 DD 66 05 5E 23 56 EB 11 09 00 19 5E 16 00 n..f.^#V.....^..
020BD0: 7B 32 DB 01 DD 6E 04 DD 66 05 11 08 00 19 5E 23 {2...n..f.....^#
020BE0: 56 ED 53 DC 01 21 00 00 7D 32 DE 01 CD 3D 03 DD V.S..!..}2...=..
020BF0: 6E 04 DD 66 05 11 04 00 19 ED 5B CF 01 73 23 72 n..f......[..s#r
020C00: DD E1 E1 C1 E9 11 DC 01 21 F8 FF 39 F9 EB 01 08 ........!..9....
020C10: 00 ED B0 11 C2 15 21 F8 FF 39 F9 EB 01 08 00 ED ......!..9......
020C20: B0 CD 21 67 21 30 00 26 00 E5 2A A8 01 26 00 26 ..!g!0.&..*..&.&
020C30: 00 D1 B7 ED 52 E5 CD F2 66 CD 71 66 11 DC 01 01 ....R...f.qf....
020C40: 08 00 CD AA 6C C9 DD E5 DD 21 00 00 DD 39 21 F5 ....l....!...9!.
020C50: FF 39 F9 21 00 00 E5 CD F2 66 11 DC 01 01 08 00 .9.!.....f......
020C60: CD AA 6C 21 01 00 E5 CD F2 66 DD E5 D1 01 F6 FF ..l!.....f......
020C70: EB 09 EB 01 08 00 CD AA 6C 21 01 00 DD 75 FE DD ........l!...u..
020C80: 74 FF 21 87 01 DD 5E FE DD 56 FF 19 5E 16 00 EB t.!...^..V..^...
020C90: 11 30 00 B7 ED 52 FA D5 04 21 87 01 DD 5E FE DD .0...R...!...^..
020CA0: 56 FF 19 5E 16 00 EB 11 39 00 EB B7 ED 52 FA D5 V..^....9....R..
020CB0: 04 21 87 01 DD 5E FE DD 56 FF 19 5E 16 00 7B 32 .!...^..V..^..{2
020CC0: A8 01 CD 05 04 DD 6E FE DD 66 FF 23 DD 75 FE DD ......n..f.#.u..
020CD0: 74 FF C3 82 04 21 87 01 DD 5E FE DD 56 FF 19 5E t....!...^..V..^
020CE0: 16 00 EB 11 2E 00 B7 ED 52 C2 89 05 CD D9 75 2A ........R.....u*
020CF0: A8 01 26 00 11 30 00 B7 ED 52 FA 67 05 2A A8 01 ..&..0...R.g.*..
020D00: A9 FF 39 F9 21 FF FF 22 62 02 21 00 00 DD 75 AD ..9.!.."b.!...u.
020D10: 2A 5F 02 26 00 DD 75 AF 21 00 00 7D 32 5F 02 DD *_.&..u.!..}2_..
020D20: E5 E1 01 AB FF 09 E5 CD 14 1B DD 6E AB DD 66 AC ...........n..f.
020D30: ED 5B 10 01 D5 22 10 01 E5 FD E1 21 02 00 FD 75 .[...".....!...u
020D40: 09 FD 74 0A 21 0D 00 FD 75 0B 21 FF FF FD 75 0C ..t.!...u.!...u.
020D50: FD 74 0D E1 22 10 01 21 00 00 DD 75 B0 DD 74 B1 .t.."..!...u..t.
020D60: 21 FF FF DD 75 F6 DD 74 F7 21 00 00 DD 75 FE DD !...u..t.!...u..
020D70: 74 FF 21 00 00 DD 75 FC DD 74 FD 2A 87 01 26 00 t.!...u..t.*..&.
020D80: 11 04 00 B7 ED 52 C2 AF 11 CD 0D 70 2A 87 01 26 .....R.....p*..&
020D90: 00 11 05 00 B7 ED 52 CA C9 10 2A 87 01 26 00 11 ......R...*..&..
020DA0: 41 00 B7 ED 52 C2 B4 0D CD 0D 70 21 01 00 DD 75 A...R.....p!...u
020DB0: F9 C3 BA 0D 21 00 00 DD 75 F9 2A 87 01 26 00 11 ....!...u.*..&..
020DC0: 01 00 B7 ED 52 CA D2 0D 21 3B 00 E5 CD 15 78 C3 ....R...!;....x.
020DD0: A9 0E 2A 87 01 26 00 11 01 00 B7 ED 52 C2 A9 0E ..*..&......R...
020DE0: 21 88 01 E5 21 03 00 E5 CD A2 09 DD 6E F9 26 00 !...!.......n.&.
020DF0: CB 0D D2 03 0E 2A 7E 01 11 0C 00 19 11 01 00 73 .....*~........s
020E00: C3 0E 0E 2A 7E 01 11 0C 00 19 11 00 00 73 DD 6E ...*~........s.n
020E10: FE DD 66 FF 29 DD E5 D1 01 B4 FF EB 09 EB 19 ED ..f.)...........
020E20: 5B 7E 01 73 23 72 DD 6E FE DD 66 FF 23 DD 75 FE [~.s#r.n..f.#.u.
020E30: DD 74 FF DD E5 E1 01 F4 FF 09 E5 21 06 00 E5 CD .t.........!....
020E40: BE 6C DD 6E F4 DD 66 F5 11 03 00 19 DD 5E F6 DD .l.n..f......^..
020E50: 56 F7 73 23 72 DD 6E F4 DD 66 F5 DD 75 F6 DD 74 V.s#r.n..f..u..t
020E60: F7 DD 6E F6 DD 66 F7 DD 5E F9 16 00 73 DD 6E F6 ..n..f..^...s.n.
020E70: DD 66 F7 23 11 FF FF 73 23 72 CD 0D 70 2A 87 01 .f.#...s#r..p*..
020E80: 26 00 11 08 00 B7 ED 52 C2 91 0E CD 0D 70 C3 A6 &......R.....p..
020E90: 0E 2A 87 01 26 00 11 0D 00 B7 ED 52 CA A6 0E 21 .*..&......R...!
020EA0: 0B 00 E5 CD 15 78 C3 D2 0D 21 0D 00 E5 21 4F 00 .....x...!...!O.
020EB0: E5 CD 37 0B E5 DD E5 E1 01 AE FF 09 E5 CD 65 0B ..7...........e.
020EC0: D1 DD 73 B2 DD 72 B3 DD 6E F9 26 00 CB 0D 3F CB ..s..r..n.&...?.
020ED0: 15 DD 5E AE 16 00 7D A3 6F DD 5E AD 16 00 7D B3 ..^...}£o.^...}.
020EE0: 6F DD 75 AD DD 6E AE 26 00 CB 0D DA F8 0E DD 6E o.u..n.&.......n
020EF0: F9 26 00 CB 0D D2 04 0F 21 02 00 DD 75 FA DD 74 .&......!...u..t
020F00: 26 00 11 39 00 EB B7 ED 52 FA 67 05 DD 6E FE DD &..9....R.g..n..
020F10: 66 FF 23 DD 75 FE DD 74 FF 21 87 01 DD 5E FE DD f.#.u..t.!...^..
020F20: 56 FF 19 ED 5B A8 01 16 00 73 CD 05 04 DD E5 D1 V...[....s......
020F30: 01 F6 FF EB 09 EB 21 F8 FF 39 F9 EB 01 08 00 ED ......!..9......
020F40: B0 11 C2 15 21 F8 FF 39 F9 EB 01 08 00 ED B0 CD ....!..9........
020F50: 21 67 DD E5 D1 01 F6 FF EB 09 EB 01 08 00 CD AA !g..............
020F60: 6C CD D9 75 C3 EF 04 2A A8 01 26 00 11 65 00 B7 l..u...*..&..e..
020F70: ED 52 CA 86 05 2A A8 01 26 00 11 45 00 B7 ED 52 .R...*..&..E...R
020F80: CA 86 05 CD C7 72 C3 90 05 21 45 00 7D 32 A8 01 .....r...!E.}2..
020F90: 11 DC 01 21 F8 FF 39 F9 EB 01 08 00 ED B0 DD E5 ...!..9.........
020FA0: D1 01 F6 FF EB 09 EB 21 F8 FF 39 F9 EB 01 08 00 .......!..9.....
020FB0: ED B0 CD FE 67 11 DC 01 01 08 00 CD AA 6C 2A A8 ....g........l*.
020FC0: 01 26 00 11 45 00 B7 ED 52 CA DA 05 2A A8 01 26 .&..E...R...*..&
020FD0: 00 11 65 00 B7 ED 52 C2 08 07 CD D9 75 2A A8 01 ..e...R.....u*..
020FE0: 26 00 11 2D 00 B7 ED 52 21 00 00 20 01 23 DD 75 &..-...R!.. .#.u
020FF0: F5 2A A8 01 26 00 11 2D 00 B7 ED 52 CA 0D 06 2A .*..&..-...R...*
021000: A8 01 26 00 11 2B 00 B7 ED 52 C2 10 06 CD D9 75 ..&..+...R.....u
021010: 21 00 00 DD 75 FE DD 74 FF 2A A8 01 26 00 11 30 !...u..t.*..&..0
021020: 00 B7 ED 52 FA 62 06 2A A8 01 26 00 11 39 00 EB ...R.b.*..&..9..
021030: B7 ED 52 FA 62 06 21 30 00 26 00 E5 2A A8 01 26 ..R.b.!0.&..*..&
021040: 00 26 00 D1 B7 ED 52 E5 DD 6E FE DD 66 FF 11 0A .&....R..n..f...
021050: 00 CD 3F 6B D1 19 DD 75 FE DD 74 FF CD D9 75 C3 ..?k...u..t...u.
021060: 19 06 CD C7 72 21 0A 00 E5 CD F2 66 DD E5 D1 01 ....r!.....f....
021070: F6 FF EB 09 EB 01 08 00 CD AA 6C DD 6E F5 26 00 ..........l.n.&.
021080: CB 0D D2 B9 06 11 CA 15 21 F8 FF 39 F9 EB 01 08 ........!..9....
021090: 00 ED B0 DD E5 D1 01 F6 FF EB 09 EB 21 F8 FF 39 ............!..9
0210A0: F9 EB 01 08 00 ED B0 CD FE 67 DD E5 D1 01 F6 FF .........g......
0210B0: EB 09 EB 01 08 00 CD AA 6C 21 01 00 DD 5E FE DD ........l!...^..
0210C0: 56 FF 2B B7 ED 52 F2 08 07 D5 E5 DD 73 FE DD 72 V.+..R......s..r
0210D0: FF 11 DC 01 21 F8 FF 39 F9 EB 01 08 00 ED B0 DD ....!..9........
0210E0: E5 D1 01 F6 FF EB 09 EB 21 F8 FF 39 F9 EB 01 08 ........!..9....
0210F0: 00 ED B0 CD 21 67 11 DC 01 01 08 00 CD AA 6C E1 ....!g........l.
021100: FB C3 2F 0F DD 6E B2 DD 66 B3 11 09 00 19 5E 23 ../..n..f.....^#
021110: 56 DD 73 FA DD 72 FB DD 6E FA DD 66 FB 11 02 00 V.s..r..n..f....
021120: B7 ED 52 F2 2F 0F 21 02 00 DD 75 FA DD 74 FB DD ..R./.!...u..t..
021130: 6E F6 DD 66 F7 DD 75 F4 DD 74 F5 DD 6E F4 DD 66 n..f..u..t..n..f
021140: F5 11 FF FF B7 ED 52 CA B0 0F DD 6E F4 DD 66 F5 ......R....n..f.
021150: 23 5E 23 56 EB 11 FF FF B7 ED 52 CA 6A 0F 21 FF #^#V......R.j.!.
021160: FF DD 75 F4 DD 74 F5 C3 AD 0F DD 6E F4 DD 66 F5 ..u..t.....n..f.
021170: 11 05 00 19 DD 5E AE 16 00 73 DD 6E F4 DD 66 F5 .....^...s.n..f.
021180: 23 DD 5E B2 DD 56 B3 73 23 72 DD 6E AE 26 00 CB #.^..V.s#r.n.&..
021190: 0D D2 9A 0F CD 87 0C CD 87 0C DD 6E F4 DD 66 F5 ...........n..f.
0211A0: 11 03 00 19 5E 23 56 DD 73 F4 DD 72 F5 C3 3B 0F ....^#V.s..r..;.
0211B0: DD 6E FC DD 66 FD DD 5E FE DD 56 FF B7 ED 52 F2 .n..f..^..V...R.
0211C0: 9D 10 DD 6E FC DD 66 FD 29 DD E5 D1 01 B4 FF EB ...n..f.).......
0211D0: 09 EB 19 5E 23 56 ED 53 7E 01 DD 6E B0 DD 66 B1 ...^#V.S~..n..f.
0211E0: DD 5E FA DD 56 FB B7 ED 52 DD 75 B0 DD 74 B1 2A .^..V...R.u..t.*
0211F0: 7E 01 ED 5B 10 01 D5 22 10 01 E5 FD E1 DD 6E B0 ~..[..."......n.
021200: DD 66 B1 FD 75 09 FD 74 0A DD 6E B2 DD 66 B3 FD .f..u..t..n..f..
021210: 75 06 FD 74 07 DD 6E AE 26 00 CB 0D D2 6D 10 FD u..t..n.&....m..
021220: 6E 0C 26 00 11 01 00 B7 ED 52 CA 63 10 DD E5 E1 n.&......R.c....
021230: 01 A9 FF 09 E5 21 04 00 E5 CD BE 6C DD 6E A9 DD .....!.....l.n..
021240: 66 AA ED 5B 62 02 73 23 72 DD 6E A9 DD 66 AA 11 f..[b.s#r.n..f..
021250: 02 00 19 ED 5B 7E 01 73 23 72 DD 6E A9 DD 66 AA ....[~.s#r.n..f.
021260: 22 62 02 21 01 00 FD 2A 10 01 FD 75 0C E1 22 10 "b.!...*...u..".
021270: 01 DD 6E AE 26 00 CB 0D D2 8D 10 DD 6E B0 DD 66 ..n.&.......n..f
021280: B1 11 04 00 B7 ED 52 DD 75 B0 DD 74 B1 DD 6E FC ......R.u..t..n.
021290: DD 66 FD 23 DD 75 FC DD 74 FD C3 B0 0F 2A 87 01 .f.#.u..t....*..
0212A0: 26 00 11 0E 00 B7 ED 52 C2 B1 10 CD 0D 70 C3 C6 &......R.....p..
0212B0: 10 2A 87 01 26 00 11 05 00 B7 ED 52 CA C6 10 21 .*..&......R...!
0212C0: 60 00 E5 CD 27 78 C3 8C 0D CD 0D 70 21 06 00 DD `...'x.....p!...
0212D0: 5E B0 DD 56 B1 B7 ED 52 DD 75 B0 DD 74 B1 DD 6E ^..V...R.u..t..n
0212E0: FE DD 66 FF DD 75 FC DD 74 FD DD 6E FC DD 66 FD ..f..u..t..n..f.
0212F0: 11 00 00 EB B7 ED 52 F2 40 11 DD 6E FC DD 66 FD ......R.@..n..f.
021300: D1 1B 23 CB 7C C2 C9 06 21 08 00 7D 32 DB 01 2A ..#.|...!..}2..*
021310: E0 15 22 D9 01 21 02 00 7D 32 87 01 DD F9 DD E1 .."..!..}2......
021320: C9 DD E5 DD 21 00 00 DD 39 E5 E5 DD 6E 04 DD 66 ....!...9...n..f
021330: 05 11 01 00 B7 ED 52 C2 46 07 2A D2 15 DD 75 06 ......R.F.*...u.
021340: DD 74 07 C3 9C 07 2A 5F 02 26 00 DD 75 FD 21 00 .t....*_.&..u.!.
021350: 00 7D 32 5F 02 DD E5 E1 01 FE FF 09 E5 CD 14 1B .}2_............
021360: DD 6E FE DD 66 FF ED 5B 10 01 D5 22 10 01 E5 FD .n..f..[..."....
021370: E1 21 0A 00 FD 75 0B DD 6E 04 DD 66 05 FD 75 09 .!...u..n..f..u.
021380: FD 74 0A E1 22 10 01 DD 6E FD 26 00 7D 32 5F 02 .t.."...n.&.}2_.
021390: DD 6E FE DD 66 FF DD 75 06 DD 74 07 DD F9 DD E1 .n..f..u..t.....
0213A0: E1 C1 E9 DD E5 DD 21 00 00 DD 39 2A 87 01 26 00 ......!...9*..&.
0213B0: DD 5E 04 16 00 B7 ED 52 CA CF 07 2A 87 01 26 00 .^.....R...*..&.
0213C0: 11 00 00 B7 ED 52 CA CF 07 CD 0D 70 C3 AB 07 DD .....R.....p....
0213D0: E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 2A 7C 01 23 .......!...9*|.#
0213E0: 22 82 01 21 FF FF 22 7E 01 2A 6F 01 ED 5B 82 01 "..!.."~.*o..[..
0213F0: B7 ED 52 F2 20 08 2A 7E 01 11 FF FF B7 ED 52 C2 ..R. .*~......R.
021400: 20 08 2A 82 01 2B 22 82 01 21 88 01 E5 2A 82 01 .*..+"..!...*..
021410: 29 11 59 01 19 5E 23 56 EB E5 CD 9B 76 C3 E9 07 ).Y..^#V....v...
021420: 2A 7E 01 11 FF FF B7 ED 52 C2 37 08 21 88 01 E5 *~......R.7.!...
021430: 2A 59 01 E5 CD 9B 76 2A 7E 01 11 FF FF B7 ED 52 *Y....v*~......R
021440: C2 57 08 DD 6E 04 26 00 CB 0D D2 54 08 21 01 00 .W..n.&....T.!..
021450: E5 CD 15 78 C3 7C 08 2A 7E 01 11 08 00 19 5E 16 ...x.|.*~.....^.
021460: 00 EB 11 08 00 B7 ED 52 C2 7C 08 2A 7E 01 11 09 .......R.|.*~...
021470: 00 19 5E 23 56 ED 53 7E 01 C3 57 08 DD E1 E1 C1 ..^#V.S~..W.....
021480: E9 CD 0D 70 2A 7E 01 11 FF FF B7 ED 52 CA 07 09 ...p*~......R...
021490: 21 7E 01 E5 CD 0D 19 2A 7E 01 11 08 00 19 5E 16 !~.....*~.....^.
0214A0: 00 EB 11 07 00 B7 ED 52 C2 07 09 2A 87 01 26 00 .......R...*..&.
0214B0: 11 0A 00 B7 ED 52 C2 07 09 CD 0D 70 2A 87 01 26 .....R.....p*..&
0214C0: 00 11 01 00 B7 ED 52 CA D4 08 21 39 00 E5 CD 15 ......R...!9....
0214D0: 78 C3 FD 08 21 88 01 E5 2A 7E 01 11 0D 00 19 5E x...!...*~.....^
0214E0: 23 56 EB E5 CD 9B 76 2A 7E 01 11 FF FF B7 ED 52 #V....v*~......R
0214F0: C2 FA 08 21 01 00 E5 CD 15 78 CD 0D 70 21 7E 01 ...!.....x..p!~.
021500: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
021510: 1C 00 00 00 02 09 4E E5 1C 00 41 02 00 00 00 02 ......N...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: 2B DD 75 FC DD 74 FD DD 6E FC DD 66 FD 29 DD E5 +.u..t..n..f.)..
021610: D1 01 B4 FF EB 09 EB 19 5E 23 56 ED 53 7E 01 2A ........^#V.S~.*
021620: 7E 01 11 09 00 19 5E 23 56 EB DD 5E B0 DD 56 B1 ~.....^#V..^..V.
021630: 19 E5 2A 7E 01 11 09 00 19 D1 73 23 72 C3 EA 10 ..*~......s#r...
021640: 21 FF FF DD 75 F2 DD 74 F3 DD 6E F6 DD 66 F7 11 !...u..t..n..f..
021650: FF FF B7 ED 52 CA 99 11 DD 6E F6 DD 66 F7 11 03 ....R....n..f...
021660: 00 19 5E 23 56 DD 73 F4 DD 72 F5 DD 6E F6 DD 66 ..^#V.s..r..n..f
021670: F7 11 03 00 19 DD 5E F2 DD 56 F3 73 23 72 DD 6E ......^..V.s#r.n
021680: F6 DD 66 F7 DD 75 F2 DD 74 F3 DD 6E F4 DD 66 F5 ..f..u..t..n..f.
021690: DD 75 F6 DD 74 F7 C3 49 11 DD 6E AB DD 66 AC 11 .u..t..I..n..f..
0216A0: 0C 00 19 DD 5E F2 DD 56 F3 73 23 72 C3 DD 11 DD ....^..V.s#r....
0216B0: 6E AB DD 66 AC 11 0C 00 19 11 FF FF 73 23 72 21 n..f........s#r!
0216C0: 06 00 DD 75 B0 DD 74 B1 2A 87 01 26 00 11 0D 00 ...u..t.*..&....
0216D0: B7 ED 52 C2 DD 11 21 7F 00 E5 CD 27 78 2A 87 01 ..R...!....'x*..
0216E0: 26 00 11 0D 00 B7 ED 52 C2 19 12 CD 0D 70 E5 DD &......R.....p..
0216F0: E5 E1 01 AE FF 09 E5 CD 65 0B DD 6E AB DD 66 AC ........e..n..f.
021700: 11 06 00 19 D1 73 23 72 DD 6E AE 26 00 CB 0D D2 .....s#r.n.&....
021710: 19 12 21 7B 00 E5 CD 15 78 21 0E 00 E5 21 06 00 ..!{....x!...!..
021720: E5 CD 37 0B DD 6E 06 DD 66 07 ED 5B 10 01 D5 22 ..7..n..f..[..."
021730: 10 01 E5 FD E1 21 01 00 FD 75 08 DD 6E B0 DD 66 .....!...u..n..f
021740: B1 FD 75 09 FD 74 0A DD 6E AD 26 00 FD 75 0F DD ..u..t..n.&..u..
021750: 6E AB DD 66 AC FD 75 06 FD 74 07 E1 22 10 01 DD n..f..u..t.."...
021760: 6E AF 26 00 7D 32 5F 02 ED 7B 0E 01 E1 22 0E 01 n.&.}2_..{..."..
021770: DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 21 FA FF ........!...9!..
021780: 39 F9 2A 87 01 26 00 11 27 00 B7 ED 52 CA 4C 13 9.*..&..'...R.L.
021790: 2A 87 01 26 00 11 37 00 B7 ED 52 CA A1 12 CD D0 *..&..7...R.....
0217A0: 2F 2A 87 01 26 00 11 37 00 B7 ED 52 C2 49 13 21 /*..&..7...R.I.!
0217B0: 01 00 7D 32 58 01 CD 0D 70 21 01 00 E5 21 04 00 ..}2X...p!...!..
0217C0: E5 CD 37 0B 21 88 01 E5 2A 7C 01 29 11 59 01 19 ..7.!...*|.).Y..
0217D0: 5E 23 56 EB E5 CD 9B 76 2A 7E 01 11 FF FF B7 ED ^#V....v*~......
0217E0: 52 C2 13 13 21 88 01 E5 21 01 00 E5 CD A2 09 2A R...!...!......*
0217F0: 7E 01 11 0B 00 19 11 01 00 73 2A 7E 01 11 0E 00 ~........s*~....
021800: 21 FF FF 22 33 19 DD 6E D7 26 00 7D 32 5F 02 DD !.."3..n.&.}2_..
021810: F9 DD E1 C9 DD E5 DD 21 00 00 DD 39 2A 33 19 11 .......!...9*3..
021820: FF FF B7 ED 52 C2 3C 1B CD 6E 76 DD 6E 04 DD 66 ....R.<..nv.n..f
021830: 05 E5 21 04 00 E5 CD 13 09 C3 49 1B DD 6E 04 DD ..!.......I..n..
021840: 66 05 ED 5B 33 19 73 23 72 DD 6E 04 DD 66 05 5E f..[3.s#r.n..f.^
021850: 23 56 EB ED 5B 21 19 D5 22 21 19 E5 FD E1 21 04 #V..[!.."!....!.
021860: 00 FD 75 08 21 FF FF FD 75 06 FD 74 07 E1 22 21 ..u.!...u..t.."!
021870: 19 21 FF FF 22 33 19 DD E1 E1 C1 E9 DD E5 DD 21 .!.."3.........!
021880: 00 00 DD 39 21 F9 FF 39 F9 DD 6E 06 DD 66 07 11 ...9!..9..n..f..
021890: 00 00 B7 ED 52 C2 B4 1B 21 1B 00 E5 2A 6B 02 E5 ....R...!...*k..
0218A0: CD 3A 6F DD 6E 04 DD 66 05 E5 CD 46 6F 21 01 00 .:o.n..f...Fo!..
0218B0: E5 CD 1C 6F 21 1C 00 E5 2A 6B 02 E5 CD 3A 6F DD ...o!...*k...:o.
0218C0: 6E 06 DD 66 07 E5 CD 46 6F 2A CF 01 DD 75 FE DD n..f...Fo*...u..
0218D0: 74 FF 21 0A 00 CD E6 6B 22 CF 01 CD 0D 70 2A 87 t.!....k"....p*.
0218E0: 01 26 00 11 15 00 B7 ED 52 C2 1C 1C CD 0D 70 DD .&......R.....p.
0218F0: 6E 08 DD 66 09 11 0B 00 19 5E 16 00 EB 11 04 00 n..f.....^......
021900: B7 ED 52 C2 19 1C DD 6E 08 DD 66 09 11 0C 00 19 ..R....n..f.....
021910: 5E 23 56 DD 73 08 DD 72 09 C3 DE 1B DD 6E 08 DD ^#V.s..r.....n..
021920: 66 09 11 09 00 19 5E 23 56 DD 73 FC DD 72 FD 2A f.....^#V.s..r.*
021930: 87 01 26 00 11 08 00 B7 ED 52 C2 40 1C CD 0D 70 ..&......R.@...p
021940: 2A 87 01 26 00 11 09 00 B7 ED 52 21 00 00 20 01 *..&......R!.. .
021950: 23 DD 75 F9 DD 6E F9 26 00 CB 0D DA 6C 1C 2A 87 #.u..n.&....l.*.
021960: 01 26 00 11 07 00 B7 ED 52 C2 6F 1C CD 0D 70 2A .&......R.o...p*
021970: 87 01 26 00 11 01 00 B7 ED 52 C2 96 1C CD 08 09 ..&......R......
021980: 2A 7E 01 11 0B 00 19 5E 23 56 D5 21 D7 01 11 05 *~.....^#V.!....
021990: 00 19 D1 73 23 72 21 31 00 E5 DD 6E FC DD 66 FD ...s#r!1...n..f.
0219A0: E5 CD 3A 6F 2A 87 01 26 00 11 03 00 B7 ED 52 CA ..:o*..&......R.
0219B0: C7 1C 21 D7 01 11 02 00 19 5E 23 56 EB ED 5B E0 ..!......^#V..[.
0219C0: 15 B7 ED 52 C2 45 1D DD 6E F9 26 00 CB 0D D2 0A ...R.E..n.&.....
0219D0: 1D 21 D7 01 11 02 00 19 5E 23 56 EB ED 5B E0 15 .!......^#V..[..
0219E0: B7 ED 52 C2 0A 1D 21 D7 01 11 05 00 19 EB 21 F8 ..R...!.......!.
0219F0: FF 39 F9 EB 01 08 00 ED B0 CD 40 66 21 D7 01 11 .9........@f!...
021A00: 19 11 00 00 73 2A 7E 01 11 0C 00 19 E5 CD 78 02 ....s*~.......x.
021A10: C3 1A 13 21 05 00 E5 CD 15 78 2A 7E 01 DD 75 FE ...!.....x*~..u.
021A20: DD 74 FF 2A 7C 01 23 22 7C 01 2A 7C 01 29 11 59 .t.*|.#"|.*|.).Y
021A30: 01 19 11 FF FF 73 23 72 2A 7E 01 E5 CD F1 0C 2A .....s#r*~.....*
021A40: 7C 01 2B 22 7C 01 C3 A1 12 C3 82 12 CD 0D 70 DD |.+"|.........p.
021A50: F9 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 21 DA .........!...9!.
021A60: FF 39 F9 2A 7C 01 23 22 7C 01 2A 7C 01 29 11 59 .9.*|.#"|.*|.).Y
021A70: 01 19 11 FF FF 73 23 72 2A 6F 01 DD 75 FE DD 74 .....s#r*o..u..t
021A80: FF 2A 7C 01 22 6F 01 2A D5 01 DD 75 FC DD 74 FD .*|."o.*...u..t.
021A90: 2A 71 02 DD 75 FA DD 74 FB 21 A9 01 DD E5 D1 01 *q..u..t.!......
021AA0: DA FF EB 09 EB 01 20 00 ED B0 2A BC 6C 22 D5 01 ...... ...*.l"..
021AB0: 2A BC 6C 23 22 BC 6C CD 0D 70 2A 87 01 26 00 11 *.l#".l..p*..&..
021AC0: 01 00 B7 ED 52 CA D2 13 21 3B 00 E5 CD 15 78 C3 ....R...!;....x.
021AD0: D3 14 21 88 01 11 A9 01 01 20 00 ED B0 21 88 01 ..!...... ...!..
021AE0: E5 2A 7C 01 29 11 59 01 19 5E 23 56 EB E5 CD 9B .*|.).Y..^#V....
021AF0: 76 21 88 01 E5 CD 78 76 CD 66 76 21 C9 01 E5 21 v!....xv.fv!...!
021B00: 24 00 E5 CD BE 6C 2A C9 01 11 08 00 19 11 07 00 $....l*.........
021B10: 73 2A C9 01 11 0B 00 19 11 FF FF 73 23 72 2A C9 s*.........s#r*.
021B20: 01 11 13 00 19 ED 5B D5 01 73 23 72 21 FF FF 22 ......[..s#r!.."
021B30: 71 02 CD 0D 70 21 0E 00 E5 21 5C 00 E5 CD 37 0B q...p!...!\...7.
021B40: 2A 87 01 26 00 11 29 00 B7 ED 52 C2 6C 14 21 91 *..&..)...R.l.!.
021B50: 00 E5 CD 27 78 2A 87 01 26 00 11 0E 00 B7 ED 52 ...'x*..&......R
021B60: CA 69 14 CD 0D 70 C3 55 14 CD 0D 70 2A 87 01 26 .i...p.U...p*..&
021B70: 00 11 2E 00 B7 ED 52 CA 88 14 2A 87 01 26 00 11 ......R...*..&..
021B80: 2B 00 B7 ED 52 C2 8E 14 CD 4F 39 C3 6C 14 21 FF +...R....O9.l.!.
021B90: FF E5 CD 75 12 2A 65 02 11 00 00 EB B7 ED 52 F2 ...u.*e.......R.
021BA0: BB 14 21 1B 00 E5 2A 69 02 E5 CD 3A 6F 2A 65 02 ..!...*i...:o*e.
021BB0: E5 CD 46 6F 21 00 00 E5 CD 1C 6F 21 12 00 E5 CD ..Fo!.....o!....
021BC0: 1C 6F 2A D1 01 E5 CD 46 6F 2A CF 01 E5 CD 46 6F .o*....Fo*....Fo
021BD0: CD 22 43 2A 87 01 26 00 11 01 00 B7 ED 52 CA EB ."C*..&......R..
021BE0: 14 21 3B 00 E5 CD 15 78 C3 04 15 21 A9 01 11 88 .!;....x...!....
021BF0: 01 01 20 00 CD 94 6C CA 01 15 21 66 00 E5 CD 15 .. ...l...!f....
021C00: 05 00 19 EB 01 08 00 CD AA 6C DD 6E FC DD 66 FD .........l.n..f.
021C10: 11 01 00 B7 ED 52 FA 42 1D D5 E5 DD 73 FA DD 72 .....R.B....s..r
021C20: FB 21 D7 01 11 04 00 19 DD 5E FA DD 56 FB 19 5E .!.......^..V..^
021C30: 16 00 EB 26 00 E5 CD 1C 6F E1 D1 13 2B CB 7C CA ...&....o...+.|.
021C40: 19 1D C3 94 1D DD 6E FC DD 66 FD 11 01 00 B7 ED ......n..f......
021C50: 52 C2 66 1D 21 D7 01 11 05 00 19 5E 23 56 EB E5 R.f.!......^#V..
021C60: CD 1C 6F C3 94 1D DD 6E F9 26 00 CB 0D D2 85 1D ..o....n.&......
021C70: 21 D7 01 11 05 00 19 5E 23 56 EB CD E6 6B E5 CD !......^#V...k..
021C80: 46 6F C3 94 1D 21 D7 01 11 05 00 19 5E 23 56 EB Fo...!......^#V.
021C90: E5 CD 46 6F 2A 87 01 26 00 11 08 00 B7 ED 52 CA ..Fo*..&......R.
021CA0: A5 1D CD 0D 70 2A 87 01 26 00 11 08 00 B7 ED 52 ....p*..&......R
021CB0: CA 2F 1C 2A 87 01 26 00 11 16 00 B7 ED 52 C2 C7 ./.*..&......R..
021CC0: 1D CD 0D 70 C3 B3 1D DD 6E FE DD 66 FF 22 CF 01 ...p....n..f."..
021CD0: 21 1C 00 E5 2A 6B 02 E5 CD 3A 6F DD 6E 06 DD 66 !...*k...:o.n..f
021CE0: 07 DD 5E 04 DD 56 05 19 E5 CD 46 6F DD F9 DD E1 ..^..V....Fo....
021CF0: D1 21 06 00 39 F9 EB E9 2A 87 01 26 00 11 0D 00 .!..9...*..&....
021D00: B7 ED 52 CA 28 1E 2A 87 01 26 00 11 27 00 B7 ED ..R.(.*..&..'...
021D10: 52 CA 28 1E 2A 87 01 26 00 11 25 00 B7 ED 52 CA R.(.*..&..%...R.
021D20: 28 1E CD 0D 70 C3 F8 1D 2A 87 01 26 00 11 0D 00 (...p...*..&....
021D30: B7 ED 52 C2 39 1E CD 0D 70 C9 DD E5 DD 21 00 00 ..R.9...p....!..
021D40: DD 39 E5 2A BC 6C DD 75 FE DD 74 FF E5 CD 1B 63 .9.*.l.u..t....c
021D50: D1 ED 53 3E 19 2A 3E 19 11 03 00 19 5E 16 00 EB ..S>.*>.....^...
021D60: 11 03 00 B7 ED 52 CA 85 1E 21 2A 00 E5 CD 15 78 .....R...!*....x
021D70: 2A DA 15 22 36 19 21 00 00 22 38 19 21 00 00 22 *.."6.!.."8.!.."
021D80: 3A 19 C3 B2 1E 2A 3E 19 ED 5B 21 19 D5 22 21 19 :....*>..[!.."!.
021D90: E5 FD E1 FD 6E 00 FD 66 01 22 36 19 FD 6E 04 FD ....n..f."6..n..
021DA0: 66 05 22 38 19 FD 6E 08 FD 66 09 22 3A 19 E1 22 f."8..n..f.":.."
021DB0: 21 19 DD 6E FE DD 66 FF 22 BC 6C DD F9 DD E1 C9 !..n..f.".l.....
021DC0: DD E5 DD 21 00 00 DD 39 E5 21 01 00 E5 21 39 00 ...!...9.!...!9.
021DD0: E5 CD 37 0B 21 88 01 E5 21 00 00 E5 CD A2 09 2A ..7.!...!......*
021DE0: 7E 01 DD 75 FE DD 74 FF 21 10 00 E5 21 3A 00 E5 ~..u..t.!...!:..
021DF0: CD 37 0B CD 3A 1E DD 6E FE DD 66 FF ED 5B 21 19 .7..:..n..f..[!.
021E00: 78 CD 0D 70 DD 6E FE DD 66 FF 22 6F 01 2A D5 01 x..p.n..f."o.*..
021E10: 22 BC 6C DD 6E FA DD 66 FB 22 71 02 DD 6E FC DD ".l.n..f."q..n..
021E20: 66 FD 22 D5 01 DD E5 E1 01 DA FF 09 11 A9 01 01 f.".............
021E30: 20 00 ED B0 DD F9 DD E1 C9 2A 06 00 2B F9 2A BC ........*..+.*.
021E40: 6C 22 D5 01 2A E4 15 22 59 01 CD F2 6D CD 04 6F l"..*.."Y...m..o
021E50: CD 0D 70 2A 87 01 26 00 11 22 00 B7 ED 52 CA 6B ..p*..&.."...R.k
021E60: 15 21 6A 00 E5 CD 15 78 C3 B2 15 21 01 00 7D 32 .!j....x...!..}2
021E70: 5F 02 21 01 00 7D 32 5E 02 CD 0D 70 21 00 00 22 _.!..}2^...p!.."
021E80: 84 01 2A 87 01 26 00 11 32 00 B7 ED 52 CA 9A 15 ..*..&..2...R...
021E90: 21 0A 00 E5 CD 15 78 C3 9D 15 CD 56 13 2A 87 01 !.....x....V.*..
021EA0: 26 00 11 0A 00 B7 ED 52 CA B2 15 21 08 00 E5 CD &......R...!....
021EB0: 15 78 21 18 00 E5 CD 1C 6F CD CE 6F CD FD 79 C3 .x!.....o..o..y.
021EC0: 00 00 81 50 00 00 00 00 00 00 81 08 00 00 00 00 ...P............
021ED0: 00 00 42 18 17 18 F4 17 24 18 1B 17 5B 16 19 16 ..B.....$...[...
021EE0: A8 17 84 16 ED 15 44 16 48 47 49 48 04 01 16 03 ......D.HGIH....
021EF0: 17 FF FF 1B 17 06 FF FF 06 FF FF 07 01 52 48 43 .............RHC
021F00: 03 19 16 99 16 FF FF 84 16 06 FF FF 04 FF FF 02 ................
021F10: 01 4E 41 45 4C 4F 4F 42 07 2D 16 5B 16 FF FF FF .NAELOOB.-.[....
021F20: FF 04 01 00 03 00 00 01 00 53 42 41 03 FF FF 44 .........SBA...D
021F30: 16 FF FF FF FF 06 06 18 00 FF FF 02 01 54 45 53 .............TES
021F40: 54 49 42 06 FF FF FF FF FF FF FF FF 04 02 00 09 TIB.............
021F50: 30 18 4C 41 4E 49 44 52 41 43 08 6F 16 84 16 FF 0.LANIDRAC.o....
021F60: FF FF FF 04 02 00 0F 00 00 FF FF 50 41 43 03 FF ...........PAC..
021F70: FF FF FF FF FF FF FF 06 FF FF 00 84 16 05 03 52 ...............R
021F80: 41 48 43 04 FF FF FF FF FF FF FF FF 04 01 00 02 AHC.............
021F90: 00 00 FF 00 4C 43 58 45 04 A8 16 CC 16 FF FF FF ....LCXE........
021FA0: FF 05 07 00 43 45 44 03 FF FF BB 16 FF FF FF FF ....CED.........
021FB0: 05 05 00 45 53 4F 50 53 49 44 07 FF FF FF FF FF ...ESOPSID......
021FC0: FF FF FF 05 03 00 54 41 4F 4C 46 05 E2 16 F4 16 ......TAOLF.....
021FD0: FF FF A8 17 06 FF FF 02 FF FF 02 04 45 53 4C 41 ............ESLA
021FE0: 46 05 FF FF FF FF FF FF 19 16 00 00 00 00 00 54 F..............T
021FF0: 4C 41 48 04 FF FF FF FF FF FF FF FF 05 04 00 44 LAH............D
022000: D5 22 21 19 E5 FD E1 21 00 00 FD 75 0D 2A 36 19 ."!....!...u.*6.
022010: FD 75 06 FD 74 07 2A 38 19 FD 75 09 FD 74 0A FD .u..t.*8..u..t..
022020: 6E 06 FD 66 07 ED 5B E0 15 B7 ED 52 C2 48 1F 2A n..f..[....R.H.*
022030: 3E 19 11 08 00 19 ED 5B 21 19 01 0B 00 EB 09 EB >......[!.......
022040: 01 08 00 ED B0 C3 5C 1F 2A 3E 19 11 08 00 19 5E ......\.*>.....^
022050: 23 56 FD 2A 21 19 FD 73 0B FD 72 0C E1 22 21 19 #V.*!..s..r.."!.
022060: DD F9 DD E1 C9 FD 2A 23 19 FD 6E FE FD 66 FF 22 ......*#..n..f."
022070: 84 01 CD A0 1F FD 2A 23 19 FD 6E FC FD 66 FD ED ......*#..n..f..
022080: 5B 84 01 B7 ED 52 F2 92 1F 2A 84 01 FD 75 FC FD [....R...*...u..
022090: 74 FD FD 2A 23 19 FD 6E FC FD 66 FD 22 84 01 C9 t..*#..n..f."...
0220A0: DD E5 2A 23 19 E5 ED 73 23 19 DD 2A 23 19 E5 E5 ..*#...s#..*#...
0220B0: CD 43 19 2A 87 01 26 00 11 27 00 B7 ED 52 CA 35 .C.*..&..'...R.5
0220C0: 21 2A 87 01 26 00 11 19 00 B7 ED 52 CA 35 21 2A !*..&......R.5!*
0220D0: 87 01 26 00 11 25 00 B7 ED 52 CA 35 21 2A 87 01 ..&..%...R.5!*..
0220E0: 26 00 11 01 00 B7 ED 52 C2 F4 1F CD 95 2C CD 43 &......R.....,.C
0220F0: 19 C3 2F 21 2A 87 01 26 00 11 20 00 B7 ED 52 C2 ../!*..&.. ...R.
022100: 17 21 CD 0D 70 2A 87 01 26 00 11 01 00 B7 ED 52 .!..p*..&......R
022110: C2 89 20 21 88 01 E5 21 03 00 E5 CD A2 09 2A 7E .. !...!......*~
022120: 01 FD 2A 21 19 FD 75 F3 FD 74 F4 CD 0D 70 21 0D ..*!..u..t...p!.
022130: 00 E5 21 2B 00 E5 CD 37 0B FD 2A 21 19 FD 6E F3 ..!+...7..*!..n.
022140: FD 66 F4 ED 5B 25 19 D5 22 25 19 E5 FD E1 2A 84 .f..[%.."%....*.
022150: 01 FD 75 09 FD 74 0A E5 CD 87 29 D1 FD 2A 25 19 ..u..t....)..*%.
022160: FD 73 06 FD 72 07 21 00 00 FD 75 0C FD 6E 06 FD .s..r.!...u..n..
022170: 66 07 11 09 00 19 5E 23 56 EB ED 5B 84 01 19 22 f.....^#V..[..."
022180: 84 01 E1 22 25 19 C3 9F 20 21 0D 00 E5 21 2B 00 ..."%... !...!+.
022190: E5 CD 37 0B 21 01 00 E5 21 3B 00 E5 CD 37 0B 2A ..7.!...!;...7.*
0221A0: 84 01 DD 75 FE DD 74 FF 21 00 00 DD 75 FC DD 74 ...u..t.!...u..t
0221B0: FD 21 34 00 E5 21 3C 00 E5 CD 37 0B CD F8 1D 2A .!4..!<...7....*
0221C0: 87 01 26 00 11 27 00 B7 ED 52 CA F5 20 2A 87 01 ..&..'...R.. *..
0221D0: 26 00 11 25 00 B7 ED 52 CA F5 20 CD 65 1F 2A 87 &..%...R.. .e.*.
0221E0: 01 26 00 11 19 00 B7 ED 52 C2 F2 20 CD 0D 70 CD .&......R.. ..p.
0221F0: F8 1D C3 BF 20 2A 87 01 26 00 11 25 00 B7 ED 52 .... *..&..%...R
022200: 52 4F 03 1B 17 83 17 FF FF 17 18 06 FF FF 03 FF RO..............
022210: FF 01 01 52 45 47 45 54 4E 49 07 2F 17 4E 17 FF ...REGETNI./.N..
022220: FF FF FF 04 02 00 00 00 80 FF 7F 43 4E 49 03 FF ...........CNI..
022230: FF 3F 17 FF FF FF FF 05 06 00 4C 43 4E 49 04 FF .?........LCNI..
022240: FF FF FF FF FF FF FF 05 08 00 4C 49 4E 03 5F 17 ..........LIN._.
022250: 6E 17 FF FF F4 17 00 00 00 FF FF 57 45 4E 03 52 n..........WEN.R
022260: 18 FF FF FF FF FF FF 05 01 00 44 44 4F 03 FF FF ..........DDO...
022270: FF FF FF FF 19 16 06 FF FF 00 FF FF 02 02 45 55 ..............EU
022280: 52 54 04 95 17 B8 17 FF FF 19 16 00 00 00 01 00 RT..............
022290: 43 4F 52 50 04 FF FF A8 17 FF FF FF FF 04 02 00 CORP............
0222A0: 0D FF FF 4C 41 45 52 04 FF FF 73 18 FF FF FF FF ...LAER...s.....
0222B0: 04 08 00 01 4C 41 56 03 CE 17 E5 17 FF FF FF FF ....LAV.........
0222C0: 06 FF FF 08 FF FF 00 01 43 4E 55 52 54 05 FF FF ........CNURT...
0222D0: FF FF FF FF 1B 17 06 FF FF 02 A8 17 00 03 54 45 ..............TE
0222E0: 53 54 49 42 06 FF FF FF FF FF FF FF FF 04 02 00 STIB............
0222F0: 09 1B 17 00 FF FF FF FF FF FF FF FF 04 02 00 10 ................
022300: 24 18 53 42 41 03 FF FF FF FF FF FF FF FF 06 FF $.SBA...........
022310: FF 00 A8 17 03 04 00 FF FF FF FF FF FF FF FF 04 ................
022320: 02 00 12 00 FF FF FF FF FF FF FF FF 04 01 00 0C ................
022330: FF FF FF FF FF FF FF FF 04 01 00 06 00 00 0F 00 ................
022340: 17 18 FF FF FF FF FF FF FF FF 04 01 00 0A 4E 49 ..............NI
022350: 4D 03 62 18 FF FF FF FF FF FF 06 FF FF 0C 58 41 M.b...........XA
022360: 4D 03 FF FF FF FF FF FF FF FF 06 FF FF 0D 45 5A M.............EZ
022370: 49 53 04 FF FF FF FF FF FF FF FF 06 FF FF 09 81 IS..............
022380: 18 FF FF 00 0A 00 00 00 8A 18 FF FF 00 0A 01 00 ................
022390: 32 13 10 10 0D 12 0B 12 24 0B 24 C1 E1 11 91 18 2.......$.$.....
0223A0: 19 5E 16 00 2A BC 6C EB 19 22 BC 6C E1 73 23 72 .^..*.l..".l.s#r
0223B0: C5 C9 C1 E1 FD E1 C5 E5 FD 6E 08 26 00 11 91 18 .........n.&....
0223C0: 19 6E 26 00 FD 7E FF E6 BF FD 77 FF E6 3F 5F 16 .n&..~....w..?_.
0223D0: 00 19 23 44 4D FD E5 E1 B7 ED 52 2B FD E1 E5 2A ..#DM.....R+...*
0223E0: BC 6C EB 19 23 FD 75 00 FD 74 01 E1 ED B0 ED 53 .l..#.u..t.....S
0223F0: BC 6C C9 C1 E1 2B 7E F6 40 77 C5 C9 C1 E1 D1 2B .l...+~.@w.....+
022400: C2 09 21 CD 0D 70 CD 65 1F 21 27 00 E5 21 6C 00 ..!..p.e.!'..!l.
022410: E5 CD 37 0B C3 2F 21 2A 87 01 26 00 11 27 00 B7 ..7../!*..&..'..
022420: ED 52 CA 2F 21 21 67 00 E5 CD 15 78 CD 0D 70 CD .R./!!g....x..p.
022430: 43 19 C3 B3 1F ED 7B 23 19 E1 22 23 19 DD E1 C9 C.....{#.."#....
022440: DD E5 2A 21 19 E5 ED 73 21 19 DD 2A 21 19 21 F2 ..*!...s!..*!.!.
022450: FF 39 F9 2A 86 01 26 00 DD 75 F5 21 01 00 7D 32 .9.*..&..u.!..}2
022460: 86 01 2A 5F 02 26 00 DD 75 F2 21 00 00 7D 32 5F ..*_.&..u.!..}2_
022470: 02 CD 0D 70 2A 84 01 DD 75 F6 DD 74 F7 21 00 00 ...p*...u..t.!..
022480: 22 84 01 2A 7C 01 23 22 7C 01 2A 7C 01 29 11 59 "..*|.#"|.*|.).Y
022490: 01 19 11 FF FF 73 23 72 DD E5 E1 01 F8 FF 09 E5 .....s#r........
0224A0: CD 14 1B CD A0 1F 21 27 00 E5 21 67 00 E5 CD 37 ......!'..!g...7
0224B0: 0B DD 6E F2 26 00 7D 32 5F 02 DD 6E F8 DD 66 F9 ..n.&.}2_..n..f.
0224C0: ED 5B 23 19 D5 22 23 19 E5 FD E1 21 05 00 FD 75 .[#.."#....!...u
0224D0: 0B 2A 84 01 FD 75 09 FD 74 0A 2A 7C 01 29 11 59 .*...u..t.*|.).Y
0224E0: 01 19 5E 23 56 FD 73 0C FD 72 0D E1 22 23 19 2A ..^#V.s..r.."#.*
0224F0: 7C 01 2B 22 7C 01 DD 6E F8 DD 66 F9 DD 75 06 DD |.+"|..n..f..u..
022500: 74 07 DD 6E F6 DD 66 F7 22 84 01 DD 6E F5 26 00 t..n..f."...n.&.
022510: 7D 32 86 01 ED 7B 21 19 E1 22 21 19 DD E1 C9 DD }2...{!.."!.....
022520: E5 DD 21 00 00 DD 39 E5 E5 21 15 00 E5 21 43 00 ..!...9..!...!C.
022530: E5 CD 37 0B DD E5 E1 01 FE FF 09 E5 CD 14 1B DD ..7.............
022540: 6E FE DD 66 FF ED 5B 23 19 D5 22 23 19 E5 FD E1 n..f..[#.."#....
022550: CD 3A 1E 2A 36 19 11 0B 00 19 5E 16 00 EB 11 0A .:.*6.....^.....
022560: 00 B7 ED 52 C2 85 22 2A 36 19 11 09 00 19 5E 23 ...R.."*6.....^#
022570: 56 EB 11 01 00 B7 ED 52 CA 82 22 21 76 00 E5 CD V......R.."!v...
022580: 15 78 C3 A0 22 2A 36 19 11 0B 00 19 5E 16 00 EB .x.."*6.....^...
022590: 11 01 00 B7 ED 52 C2 A0 22 21 A1 00 E5 CD 15 78 .....R.."!.....x
0225A0: DD 6E 04 DD 66 05 11 FF FF B7 ED 52 C2 BF 22 2A .n..f......R.."*
0225B0: 36 19 FD 2A 23 19 FD 75 10 FD 74 11 C3 CF 22 DD 6..*#..u..t...".
0225C0: 6E 04 DD 66 05 FD 2A 23 19 FD 75 10 FD 74 11 2A n..f..*#..u..t.*
0225D0: 3A 19 FD 2A 23 19 FD 75 0C FD 74 0D 21 18 00 E5 :..*#..u..t.!...
0225E0: 21 3E 00 E5 CD 37 0B CD 3A 1E 2A 3A 19 FD 2A 23 !>...7..:.*:..*#
0225F0: 19 FD 75 0E FD 74 0F FD 6E 10 FD 66 11 ED 5B D4 ..u..t..n..f..[.
022600: 7E 11 00 00 E6 40 CA 0A 19 13 D5 C5 C9 C1 E1 C5 ~....@..........
022610: E5 E5 5E 23 56 D5 CD DA 52 D1 E1 73 23 72 C9 00 ..^#V...R..s#r..
022620: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
022630: 00 00 00 FF FF 00 00 00 00 00 00 00 00 00 00 00 ................
022640: 00 00 00 2A 87 01 26 00 11 0E 00 B7 ED 52 C2 57 ...*..&......R.W
022650: 19 CD 0D 70 C3 43 19 C9 DD E5 DD 21 00 00 DD 39 ...p.C.....!...9
022660: 21 D7 FF 39 F9 21 01 00 E5 21 3B 00 E5 CD 37 0B !..9.!...!;...7.
022670: 21 88 01 DD E5 D1 01 E0 FF EB 09 EB 01 20 00 ED !............ ..
022680: B0 2A 87 01 26 00 11 0E 00 B7 ED 52 C2 B5 19 21 .*..&......R...!
022690: 88 01 E5 21 04 00 E5 CD A2 09 2A 7E 01 11 09 00 ...!......*~....
0226A0: 19 11 02 00 73 23 72 2A 7E 01 11 0B 00 19 11 11 ....s#r*~.......
0226B0: 00 73 C3 0F 1B DD E5 E1 01 E0 FF 09 E5 2A 7C 01 .s...........*|.
0226C0: 29 11 59 01 19 5E 23 56 EB E5 CD 9B 76 2A 7E 01 ).Y..^#V....v*~.
0226D0: DD 75 D8 DD 74 D9 2A 5F 02 26 00 DD 75 D7 DD 6E .u..t.*_.&..u..n
0226E0: D8 DD 66 D9 11 FF FF B7 ED 52 CA 46 1A 2A 7E 01 ..f......R.F.*~.
0226F0: 11 0B 00 19 5E 16 00 EB 11 07 00 B7 ED 52 C2 15 ....^........R..
022700: 1A 2A 7E 01 11 0C 00 19 5E 23 56 EB 11 02 00 B7 .*~.....^#V.....
022710: ED 52 CA 1C 1A 21 05 00 E5 CD 15 78 DD 6E D8 DD .R...!.....x.n..
022720: 66 D9 11 04 00 19 5E 23 56 EB 11 FF FF B7 ED 52 f.....^#V......R
022730: CA 3A 1A 21 01 00 7D 32 5F 02 DD 6E D8 DD 66 D9 .:.!..}2_..n..f.
022740: 22 33 19 C3 6F 1A DD E5 E1 01 E0 FF 09 E5 21 04 "3..o.........!.
022750: 00 E5 CD A2 09 2A 7E 01 22 33 19 2A 7E 01 DD 75 .....*~."3.*~..u
022760: D8 DD 74 D9 2A 7E 01 11 08 00 19 11 08 00 73 21 ..t.*~........s!
022770: 10 00 E5 21 48 00 E5 CD 37 0B E5 CD 87 29 D1 DD ...!H...7....)..
022780: 73 DA DD 72 DB DD 6E DA DD 66 DB 11 FF FF B7 ED s..r..n..f......
022790: 52 CA C1 1A DD 6E DA DD 66 DB 11 08 00 19 5E 16 R....n..f.....^.
0227A0: 00 EB 11 08 00 B7 ED 52 C2 C1 1A DD 6E DA DD 66 .......R....n..f
0227B0: DB 11 09 00 19 5E 23 56 DD 73 DA DD 72 DB C3 85 .....^#V.s..r...
0227C0: 1A DD E5 E1 01 E0 FF 09 11 88 01 01 20 00 ED B0 ............ ...
0227D0: 2A 33 19 11 FF FF B7 ED 52 CA 06 1B 2A 33 19 11 *3......R...*3..
0227E0: 08 00 19 5E 16 00 EB 11 08 00 B7 ED 52 C2 06 1B ...^........R...
0227F0: 2A 33 19 11 09 00 19 DD 5E DA DD 56 DB 73 23 72 *3......^..V.s#r
022800: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
022810: 1D 00 00 00 02 09 4E E5 1D 00 41 02 00 00 00 02 ......N...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: 15 B7 ED 52 C2 1D 23 2A 36 19 ED 5B DC 15 B7 ED ...R..#*6..[....
022910: 52 C2 1D 23 2A DC 15 FD 75 10 FD 74 11 E5 FD 2A R..#*...u..t...*
022920: 23 19 FD 6E 10 FD 66 11 E5 2A 36 19 E5 CD 4A 47 #..n..f..*6...JG
022930: E1 CB 0D DA 3D 23 21 3F 00 E5 CD 15 78 FD 2A 23 ....=#!?....x.*#
022940: 19 FD 6E 10 FD 66 11 ED 5B DC 15 B7 ED 52 C2 6A ..n..f..[....R.j
022950: 23 E5 FD 6E 0E FD 66 0F E5 FD 6E 0C FD 66 0D E5 #..n..f...n..f..
022960: CD 23 7B D1 DD 73 FD C3 87 23 FD 2A 23 19 FD 6E .#{..s...#.*#..n
022970: 0E FD 66 0F FD 5E 0C FD 56 0D B7 ED 52 CB 04 21 ..f..^..V...R..!
022980: 00 00 CB 15 DD 75 FD DD 6E FD 26 00 CB 0D D2 A8 .....u..n.&.....
022990: 23 21 40 00 E5 CD 15 78 FD 2A 23 19 FD 6E 0C FD #!@....x.*#..n..
0229A0: 66 0D FD 75 0E FD 74 0F FD 2A 23 19 FD 6E 10 FD f..u..t..*#..n..
0229B0: 66 11 11 0B 00 19 5E 16 00 EB 11 0A 00 B7 ED 52 f.....^........R
0229C0: C2 CC 23 2A E2 15 FD 75 10 FD 74 11 FD 2A 23 19 ..#*...u..t..*#.
0229D0: FD 6E 10 FD 66 11 11 09 00 19 5E 23 56 D5 DD 6E .n..f.....^#V..n
0229E0: FE DD 66 FF 11 09 00 19 D1 73 23 72 21 06 00 FD ..f......s#r!...
0229F0: 75 0B 21 16 00 E5 21 44 00 E5 CD 37 0B DD 6E FE u.!...!D...7..n.
022A00: DD 66 FF DD 75 06 DD 74 07 E1 22 23 19 DD F9 DD .f..u..t.."#....
022A10: E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 21 FA FF 39 .......!...9!..9
022A20: F9 2A 87 01 26 00 11 01 00 B7 ED 52 C2 A6 24 CD .*..&......R..$.
022A30: 08 09 2A 7E 01 DD 75 FC DD 74 FD DD 6E FC DD 66 ..*~..u..t..n..f
022A40: FD 11 FF FF B7 ED 52 CA A3 24 DD 6E FC DD 66 FD ......R.£$.n..f.
022A50: ED 5B 23 19 D5 22 23 19 E5 FD E1 FD 6E 08 26 00 .[#.."#.....n.&.
022A60: 11 04 00 B7 ED 52 C2 98 24 DD 6E FC DD 66 FD DD .....R..$.n..f..
022A70: 75 04 DD 74 05 2A 87 01 26 00 11 15 00 B7 ED 52 u..t.*..&......R
022A80: C2 95 24 E5 DD 6E FC DD 66 FD E5 CD 1F 22 D1 DD ..$..n..f...."..
022A90: 73 04 DD 72 05 C3 9F 24 21 41 00 E5 CD 15 78 E1 s..r...$!A....x.
022AA0: 22 23 19 C3 FB 25 2A 87 01 26 00 11 15 00 B7 ED "#...%*..&......
022AB0: 52 C2 C6 24 E5 21 FF FF E5 CD 1F 22 D1 DD 73 04 R..$.!....."..s.
022AC0: DD 72 05 C3 FB 25 2A 87 01 26 00 11 04 00 B7 ED .r...%*..&......
022AD0: 52 C2 F4 25 21 00 00 DD 75 FE DD 74 FF DD E5 E1 R..%!...u..t....
022AE0: 01 FA FF 09 E5 CD 14 1B DD 6E FA DD 66 FB ED 5B .........n..f..[
022AF0: 23 19 D5 22 23 19 E5 FD E1 21 00 00 FD 75 0C FD #.."#....!...u..
022B00: 15 00 B7 ED 52 C2 5B 2D E5 21 94 00 E5 CD 58 2C ....R.[-.!....X,
022B10: D1 DD 73 C9 2A 7E 01 11 0C 00 19 11 34 00 73 2A ..s.*~......4.s*
022B20: 7E 01 11 0B 00 19 11 00 00 73 CD 0D 70 CD 3A 1E ~........s..p.:.
022B30: DD 6E D4 DD 66 D5 29 DD E5 D1 01 D6 FF EB 09 EB .n..f.).........
022B40: 19 5E 23 56 EB 11 09 00 19 ED 5B 3A 19 73 23 72 .^#V......[:.s#r
022B50: 21 16 00 E5 21 44 00 E5 CD 37 0B DD 6E D4 DD 66 !...!D...7..n..f
022B60: D5 23 DD 75 D4 DD 74 D5 2A 87 01 26 00 11 08 00 .#.u..t.*..&....
022B70: B7 ED 52 C2 79 2D CD 0D 70 C3 AB 2C 2A 87 01 26 ..R.y-..p..,*..&
022B80: 00 11 01 00 B7 ED 52 C2 91 2D 21 9B 00 E5 CD 15 ......R..-!.....
022B90: 78 2A 87 01 26 00 11 0D 00 B7 ED 52 CA 22 2E 2A x*..&......R.".*
022BA0: 87 01 26 00 11 02 00 B7 ED 52 CA F3 2D 2A 87 01 ..&......R..-*..
022BB0: 26 00 11 03 00 B7 ED 52 CA F3 2D 2A 87 01 26 00 &......R..-*..&.
022BC0: 11 04 00 B7 ED 52 CA F3 2D 2A 87 01 26 00 11 39 .....R..-*..&..9
022BD0: 00 B7 ED 52 CA F3 2D 2A 87 01 26 00 11 1D 00 B7 ...R..-*..&.....
022BE0: ED 52 CA F3 2D 2A 87 01 26 00 11 3C 00 B7 ED 52 .R..-*..&..<...R
022BF0: C2 FD 2D 21 49 00 E5 CD 27 78 C3 1F 2E 2A 87 01 ..-!I...'x...*..
022C00: 26 00 11 10 00 B7 ED 52 C2 18 2E 21 4A 00 E5 CD &......R...!J...
022C10: 27 78 CD 0D 70 C3 1F 2E 21 4B 00 E5 CD 27 78 C3 'x..p...!K...'x.
022C20: 25 2E CD 0D 70 E5 CD 87 29 D1 DD 73 CC DD 72 CD %...p...)..s..r.
022C30: DD 6E CC DD 66 CD 22 36 19 2A 87 01 26 00 11 10 .n..f."6.*..&...
022C40: 00 B7 ED 52 C2 72 2E E5 21 4C 00 E5 CD 58 2C E1 ...R.r..!L...X,.
022C50: CB 0D D2 6F 2E 21 6B 02 E5 21 67 02 E5 CD 03 2C ...o.!k..!g....,
022C60: 2A 67 02 22 84 01 2A 6B 02 DD 75 CA DD 74 CB C3 *g."..*k..u..t..
022C70: B2 2E 2A 77 02 26 00 CB 0D DA A6 2E 2A 7C 01 ED ..*w.&......*|..
022C80: 5B 6F 01 B7 ED 52 C2 A6 2E 21 69 02 E5 21 65 02 [o...R...!i..!e.
022C90: E5 CD 03 2C 2A 69 02 DD 75 CA DD 74 CB 2A 65 02 ...,*i..u..t.*e.
022CA0: 22 84 01 C3 B2 2E 21 01 00 CD E6 6B DD 75 CA DD ".....!....k.u..
022CB0: 74 CB 2A 84 01 22 40 19 DD 6E D4 DD 66 D5 2B 11 t.*.."@..n..f.+.
022CC0: 00 00 B7 ED 52 FA 71 2F D5 E5 DD 73 D2 DD 72 D3 ....R.q/...s..r.
022CD0: DD 6E D2 DD 66 D3 29 DD E5 D1 01 D6 FF EB 09 EB .n..f.).........
022CE0: 19 5E 23 56 EB ED 5B 21 19 D5 22 21 19 E5 FD E1 .^#V..[!.."!....
022CF0: DD 6E CC DD 66 CD FD 75 06 FD 74 07 FD 6E 0C 26 .n..f..u..t..n.&
022D00: 74 0D 21 0E 00 FD 75 0B CD 0D 70 21 01 00 E5 21 t.!...u...p!...!
022D10: 39 00 E5 CD 37 0B 21 88 01 E5 21 00 00 E5 CD A2 9...7.!...!.....
022D20: 09 2A 7E 01 ED 5B 25 19 D5 22 25 19 E5 FD E1 21 .*~..[%.."%....!
022D30: 00 00 FD 75 09 FD 74 0A DD 6E FE DD 66 FF FD 75 ...u..t..n..f..u
022D40: 0B FD 74 0C DD 6E FA DD 66 FB FD 75 06 FD 74 07 ..t..n..f..u..t.
022D50: 21 01 00 FD 75 0D E1 22 25 19 DD 6E FE DD 66 FF !...u.."%..n..f.
022D60: 23 DD 75 FE DD 74 FF 2A 87 01 26 00 11 08 00 B7 #.u..t.*..&.....
022D70: ED 52 CA 08 25 DD 6E FE DD 66 FF 2B FD 2A 23 19 .R..%.n..f.+.*#.
022D80: FD 75 0E FD 74 0F FD 6E 0E FD 66 0F 11 FF 00 EB .u..t..n..f.....
022D90: B7 ED 52 FA A2 25 2A D8 15 11 FF FF B7 ED 52 C2 ..R..%*.......R.
022DA0: B2 25 2A DC 15 FD 2A 23 19 FD 75 10 FD 74 11 C3 .%*...*#..u..t..
022DB0: BF 25 2A D8 15 FD 2A 23 19 FD 75 10 FD 74 11 FD .%*...*#..u..t..
022DC0: 2A 23 19 FD 6E 10 FD 66 11 11 09 00 19 5E 23 56 *#..n..f.....^#V
022DD0: FD 73 09 FD 72 0A E1 22 23 19 21 05 00 E5 21 0F .s..r.."#.!...!.
022DE0: 00 E5 CD 37 0B DD 6E FA DD 66 FB DD 75 04 DD 74 ...7..n..f..u..t
022DF0: 05 C3 FB 25 21 3B 00 E5 CD 15 78 DD F9 DD E1 C9 ...%!;....x.....
022E00: DD E5 DD 21 00 00 DD 39 E5 DD E5 E1 01 FE FF 09 ...!...9........
022E10: E5 CD 14 1B CD 0D 70 DD 6E FE DD 66 FF 11 0B 00 ......p.n..f....
022E20: 19 11 04 00 73 2A 87 01 26 00 11 15 00 B7 ED 52 ....s*..&......R
022E30: C2 48 26 E5 CD 14 24 DD 6E FE DD 66 FF 11 0E 00 .H&...$.n..f....
022E40: 19 D1 73 23 72 C3 D3 26 2A 87 01 26 00 11 01 00 ..s#r..&*..&....
022E50: B7 ED 52 C2 CC 26 CD 08 09 DD 6E FE DD 66 FF 11 ..R..&....n..f..
022E60: 0E 00 19 ED 5B 7E 01 73 23 72 2A 7E 01 ED 5B 23 ....[~.s#r*~..[#
022E70: 19 D5 22 23 19 E5 FD E1 FD 6E 08 26 00 11 04 00 .."#.....n.&....
022E80: B7 ED 52 C2 BE 26 FD 6E 0B 26 00 11 06 00 B7 ED ..R..&.n.&......
022E90: 52 CA C5 26 FD 6E 0B 26 00 11 02 00 B7 ED 52 CA R..&.n.&......R.
022EA0: C5 26 FD 6E 0B 26 00 11 0E 00 B7 ED 52 CA C5 26 .&.n.&......R..&
022EB0: FD 6E 0B 26 00 11 03 00 B7 ED 52 CA C5 26 21 4E .n.&......R..&!N
022EC0: 00 E5 CD 15 78 E1 22 23 19 C3 D3 26 21 74 00 E5 ....x."#...&!t..
022ED0: CD 15 78 DD 6E FE DD 66 FF ED 5B 23 19 D5 22 23 ..x.n..f..[#.."#
022EE0: 19 E5 FD E1 2A 87 01 26 00 11 08 00 B7 ED 52 C2 ....*..&......R.
022EF0: 07 27 E5 CD 00 26 DD 6E FE DD 66 FF 11 0C 00 19 .'...&.n..f.....
022F00: 00 11 34 00 B7 ED 52 CA 64 2F DD 6E CA 26 00 FD ..4...R.d/.n.&..
022F10: 75 0B 2A 86 01 26 00 CB 0D D2 3E 2F 2A 84 01 FD u.*..&....>/*...
022F20: 75 09 FD 74 0A DD 6E CC DD 66 CD 11 09 00 19 5E u..t..n..f.....^
022F30: 23 56 EB ED 5B 84 01 19 22 84 01 C3 64 2F DD 6E #V..[..."...d/.n
022F40: CC DD 66 CD 11 09 00 19 5E 23 56 EB ED 5B 84 01 ..f.....^#V..[..
022F50: EB B7 ED 52 22 84 01 2A 84 01 FD 2A 21 19 FD 75 ...R"..*...*!..u
022F60: 09 FD 74 0A E1 22 21 19 E1 D1 13 2B CB 7C CA C8 ..t.."!....+.|..
022F70: 2E DD 6E CA DD 66 CB ED 5B 69 02 B7 ED 52 C2 8A ..n..f..[i...R..
022F80: 2F 2A 84 01 22 65 02 C3 A0 2F DD 6E CA DD 66 CB /*.."e.../.n..f.
022F90: ED 5B 6B 02 B7 ED 52 C2 A0 2F 2A 84 01 22 67 02 .[k...R../*.."g.
022FA0: DD F9 DD E1 C9 CD 95 2C 2A 87 01 26 00 11 10 00 .......,*..&....
022FB0: B7 ED 52 C2 CC 2F 2A 36 19 E5 2A 40 19 E5 2A 84 ..R../*6..*@..*.
022FC0: 01 ED 5B 40 19 B7 ED 52 E5 CD 7C 1B CD 43 19 C9 ..[@...R..|..C..
022FD0: DD E5 DD 21 00 00 DD 39 21 F8 FF 39 F9 2A 84 01 ...!...9!..9.*..
022FE0: DD 75 F8 DD 74 F9 21 01 00 7D 32 35 19 21 00 00 .u..t.!..}25.!..
022FF0: 7D 32 42 19 2A 35 19 26 00 CB 0D D2 D3 30 2A 87 }2B.*5.&.....0*.
023000: 01 26 00 11 21 00 B7 ED 52 C2 2E 30 CD 0D 70 CD .&..!...R..0..p.
023010: C0 1E 21 0E 00 E5 21 06 00 E5 CD 37 0B 2A 87 01 ..!...!....7.*..
023020: 26 00 11 01 00 B7 ED 52 CA 0F 30 C3 C9 30 2A 87 &......R..0..0*.
023030: 01 26 00 11 3F 00 B7 ED 52 C2 64 30 CD 0D 70 CD .&..?...R.d0..p.
023040: 58 19 2A 87 01 26 00 11 0E 00 B7 ED 52 C2 53 30 X.*..&......R.S0
023050: CD 0D 70 2A 87 01 26 00 11 01 00 B7 ED 52 CA 3F ..p*..&......R.?
023060: 30 C3 C9 30 2A 87 01 26 00 11 41 00 B7 ED 52 C2 0..0*..&..A...R.
023070: AE 30 CD 0D 70 2A 7C 01 11 01 00 B7 ED 52 21 00 .0..p*|......R!.
023080: 00 20 01 23 7D 32 86 01 DD 6E F8 DD 66 F9 22 84 . .#}2...n..f.".
023090: 01 CD A5 2F 2A 87 01 26 00 11 01 00 B7 ED 52 CA .../*..&......R.
0230A0: 91 30 2A 84 01 DD 75 F8 DD 74 F9 C3 C9 30 21 00 .0*...u..t...0!.
0230B0: 00 7D 32 35 19 2A 42 19 26 00 CB 0D DA C9 30 21 .}25.*B.&.....0!
0230C0: 86 00 E5 CD 15 78 CD 0D 70 21 01 00 7D 32 42 19 .....x..p!..}2B.
0230D0: C3 F4 2F DD 6E F8 DD 66 F9 22 84 01 DD F9 DD E1 ../.n..f."......
0230E0: C9 C3 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0230F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023100: D1 73 23 72 C3 21 27 21 34 00 E5 21 3C 00 E5 CD .s#r.!'!4..!<...
023110: 37 0B E5 CD 87 29 D1 FD 2A 23 19 FD 73 0C FD 72 7....)..*#..s..r
023120: 0D FD 2A 23 19 FD 6E 0E FD 66 0F 11 FF FF B7 ED ..*#..n..f......
023130: 52 C2 40 27 21 00 00 FD 75 09 FD 74 0A C3 7F 27 R.@'!...u..t...'
023140: FD 2A 23 19 FD 6E 0E FD 66 0F 11 0C 00 19 5E 23 .*#..n..f.....^#
023150: 56 EB E5 FD 6E 0E FD 66 0F 11 0E 00 19 5E 23 56 V...n..f.....^#V
023160: EB D1 B7 ED 52 23 E5 FD 6E 0C FD 66 0D 11 09 00 ....R#..n..f....
023170: 19 5E 23 56 EB D1 CD 3F 6B FD 75 09 FD 74 0A E1 .^#V...?k.u..t..
023180: 22 23 19 DD 6E FE DD 66 FF DD 75 04 DD 74 05 DD "#..n..f..u..t..
023190: F9 DD E1 C9 FD 2A 21 19 FD 6E FA FD 66 FB 11 FF .....*!..n..f...
0231A0: FF B7 ED 52 C2 BD 27 FD 6E FE FD 66 FF 11 0C 00 ...R..'.n..f....
0231B0: 19 FD 5E FC FD 56 FD 73 23 72 C3 D4 27 FD 2A 21 ..^..V.s#r..'.*!
0231C0: 19 FD 6E FA FD 66 FB 11 03 00 19 FD 5E FC FD 56 ..n..f......^..V
0231D0: FD 73 23 72 FD 2A 21 19 FD 6E FC FD 66 FD FD 75 .s#r.*!..n..f..u
0231E0: FA FD 74 FB C9 2A 21 19 01 FC FF 09 E5 21 06 00 ..t..*!......!..
0231F0: E5 CD BE 6C FD 2A 21 19 FD 6E FC FD 66 FD 11 00 ...l.*!..n..f...
023200: 00 73 FD 6E FC FD 66 FD 23 ED 5B DA 15 73 23 72 .s.n..f.#.[..s#r
023210: FD 6E FC FD 66 FD 11 03 00 19 11 FF FF 73 23 72 .n..f........s#r
023220: CD 94 27 C9 DD E5 2A 21 19 E5 ED 73 21 19 DD 2A ..'...*!...s!..*
023230: 21 19 21 F9 FF 39 F9 DD E5 E1 01 FE FF 09 E5 CD !.!..9..........
023240: 14 1B DD 6E FE DD 66 FF ED 5B 23 19 D5 22 23 19 ...n..f..[#.."#.
023250: E5 FD E1 21 0D 00 FD 75 0B 21 FF FF FD 75 0C FD ...!...u.!...u..
023260: 74 0D 21 02 00 FD 75 09 FD 74 0A E1 22 23 19 21 t.!...u..t.."#.!
023270: FF FF DD 75 FA DD 74 FB CD 0D 70 2A 87 01 26 00 ...u..t...p*..&.
023280: 11 04 00 B7 ED 52 C2 70 29 CD 0D 70 2A 87 01 26 .....R.p)..p*..&
023290: 00 11 05 00 B7 ED 52 CA 31 29 DD E5 E1 01 FC FF ......R.1)......
0232A0: 09 E5 21 06 00 E5 CD BE 6C DD 6E FC DD 66 FD ED ..!.....l.n..f..
0232B0: 5B 23 19 D5 22 23 19 E5 FD E1 2A 87 01 26 00 11 [#.."#....*..&..
0232C0: 41 00 B7 ED 52 C2 D4 28 21 01 00 FD 75 00 CD 0D A...R..(!...u...
0232D0: 70 C3 DE 28 21 00 00 FD 2A 23 19 FD 75 00 21 FF p..(!...*#..u.!.
0232E0: FF FD 2A 23 19 FD 75 03 FD 74 04 E5 2A 23 19 01 ..*#..u..t..*#..
0232F0: 05 00 09 E5 CD 65 0B D1 FD 2A 23 19 FD 73 01 FD .....e...*#..s..
023300: 00 00 00 00 00 FF FF 00 00 00 00 00 00 00 00 00 ................
023310: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023320: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
023330: 00 00 00 00 00 00 00 00 2A 33 31 11 00 00 B7 ED ........*31.....
023340: 52 F2 51 31 2A 11 31 11 00 00 EB B7 ED 52 FA 5F R.Q1*.1......R._
023350: 31 2A 11 31 ED 5B 33 31 EB B7 ED 52 FA 9B 31 2A 1*.1.[31...R..1*
023360: 11 31 11 00 00 B7 ED 52 CB 04 21 00 00 CB 15 E5 .1.....R..!.....
023370: 2A 33 31 11 00 00 B7 ED 52 2B CB 04 21 00 00 3F *31.....R+..!..?
023380: CB 15 D1 7D A3 6F CB 0D DA 9B 31 2A 33 31 ED 5B ...}£o....1*31.[
023390: 0D 31 B7 ED 52 22 33 31 C3 A8 31 2A 33 31 ED 5B .1..R"31..1*31.[
0233A0: 0F 31 B7 ED 52 22 33 31 C9 DD E5 DD 21 00 00 DD .1..R"31....!...
0233B0: 39 E5 DD 6E 04 DD 66 05 5E 23 56 EB 11 FF FF B7 9..n..f.^#V.....
0233C0: ED 52 CA E2 31 DD 6E 04 DD 66 05 5E 23 56 ED 53 .R..1.n..f.^#V.S
0233D0: 33 31 CD 38 31 DD 6E 04 DD 66 05 ED 5B 33 31 73 31.81.n..f..[31s
0233E0: 23 72 DD F9 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD #r..........!...
0233F0: 39 DD 6E 04 DD 66 05 11 FF FF B7 ED 52 C2 0C 32 9.n..f......R..2
023400: 21 FF FF DD 75 06 DD 74 07 C3 21 32 DD 6E 04 DD !...u..t..!2.n..
023410: 66 05 22 33 31 CD 38 31 2A 33 31 DD 75 06 DD 74 f."31.81*31.u..t
023420: 07 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 2A 04 .........!...9*.
023430: 31 26 00 CB 0D DA F4 32 DD 6E 04 DD 66 05 ED 5B 1&.....2.n..f..[
023440: E6 30 D5 22 E6 30 E5 FD E1 FD 6E 08 26 00 26 00 .0.".0....n.&.&.
023450: EB 21 00 00 B7 ED 52 C2 9B 32 FD 6E 09 FD 66 0A .!....R..2.n..f.
023460: 11 00 00 B7 ED 52 CA 98 32 FD 6E 06 FD 66 07 ED .....R..2.n..f..
023470: 5B E0 15 B7 ED 52 C2 85 32 21 00 00 FD 75 09 FD [....R..2!...u..
023480: 74 0A C3 98 32 2A D3 01 11 02 00 B7 ED 52 FD 2A t...2*.......R.*
023490: E6 30 FD 75 0B FD 74 0C C3 F0 32 21 03 00 B7 ED .0.u..t...2!....
0234A0: 52 C2 C1 32 FD 2A E6 30 FD 6E 0C 26 00 11 34 00 R..2.*.0.n.&..4.
0234B0: B7 ED 52 CA BE 32 2A D3 01 26 00 FD 75 0C C3 F0 ..R..2*..&..u...
0234C0: 32 21 01 00 B7 ED 52 CA D3 32 21 02 00 B7 ED 52 2!....R..2!....R
0234D0: C2 F0 32 2A D3 01 11 02 00 B7 ED 52 FD 2A E6 30 ..2*.......R.*.0
0234E0: FD 75 0E DD 6E 04 DD 66 05 E5 CD ED 72 C3 F0 32 .u..n..f....r..2
0234F0: E1 22 E6 30 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD .".0........!...
023500: 72 02 CD 94 27 FD 2A 23 19 FD 6E 05 26 00 CB 0D r...'.*#..n.&...
023510: D2 19 29 CD E5 27 CD E5 27 E1 22 23 19 2A 87 01 ..)..'..'."#.*..
023520: 26 00 11 08 00 B7 ED 52 C2 2E 29 CD 0D 70 C3 8C &......R..)..p..
023530: 28 CD 0D 70 2A 87 01 26 00 11 0D 00 B7 ED 52 C2 (..p*..&......R.
023540: 70 29 CD 0D 70 E5 DD E5 E1 01 F9 FF 09 E5 CD 65 p)..p..........e
023550: 0B DD 6E FE DD 66 FF 11 06 00 19 D1 73 23 72 DD ..n..f......s#r.
023560: 6E F9 26 00 CB 0D D2 70 29 21 7B 00 E5 CD 15 78 n.&....p)!{....x
023570: DD 6E FE DD 66 FF DD 75 06 DD 74 07 ED 7B 21 19 .n..f..u..t..{!.
023580: E1 22 21 19 DD E1 C9 DD E5 DD 21 00 00 DD 39 21 ."!.......!...9!
023590: F6 FF 39 F9 2A 87 01 26 00 26 00 EB 21 39 00 B7 ..9.*..&.&..!9..
0235A0: ED 52 C2 B3 29 E5 CD 40 21 D1 DD 73 04 DD 72 05 .R..)..@!..s..r.
0235B0: C3 FE 2B 21 37 00 B7 ED 52 C2 CA 29 E5 CD 24 28 ..+!7...R..)..$(
0235C0: D1 DD 73 04 DD 72 05 C3 FE 2B 21 3C 00 B7 ED 52 ..s..r...+!<...R
0235D0: C2 06 2B DD E5 E1 01 F6 FF 09 E5 CD 14 1B CD 0D ..+.............
0235E0: 70 21 34 00 E5 21 42 00 E5 CD 37 0B DD 6E F6 DD p!4..!B...7..n..
0235F0: 66 F7 11 0B 00 19 11 09 00 73 E5 CD 14 24 DD 6E f........s...$.n
023600: F6 DD 66 F7 11 0C 00 19 D1 73 23 72 DD 6E F6 DD ..f......s#r.n..
023610: 66 F7 ED 5B 21 19 D5 22 21 19 E5 FD E1 FD 6E 0C f..[!.."!.....n.
023620: FD 66 0D ED 5B E2 15 B7 ED 52 C2 39 2A 21 20 00 .f..[....R.9*! .
023630: FD 75 09 FD 74 0A C3 F3 2A FD 2A 21 19 FD 6E 0C .u..t...*.*!..n.
023640: FD 66 0D ED 5B DE 15 B7 ED 52 C2 59 2A 21 01 00 .f..[....R.Y*!..
023650: FD 75 09 FD 74 0A C3 F3 2A FD 2A 21 19 FD 6E 0C .u..t...*.*!..n.
023660: FD 66 0D ED 5B 23 19 D5 22 23 19 E5 FD E1 FD 6E .f..[#.."#.....n
023670: 0B 26 00 11 06 00 B7 ED 52 CA 8A 2A FD 6E 0B 26 .&......R..*.n.&
023680: 00 11 0E 00 B7 ED 52 C2 E8 2A FD 2A 23 19 FD 6E ......R..*.*#..n
023690: 0E FD 66 0F FD 5E 0C FD 56 0D B7 ED 52 11 08 00 ..f..^..V...R...
0236A0: 19 11 08 00 CD 7A 6B E5 DD 6E F6 DD 66 F7 11 09 .....zk..n..f...
0236B0: 00 19 D1 73 23 72 DD 6E F6 DD 66 F7 11 09 00 19 ...s#r.n..f.....
0236C0: 5E 23 56 EB 11 80 00 EB B7 ED 52 F2 E5 2A 21 14 ^#V.......R..*!.
0236D0: 00 E5 CD 15 78 DD 6E F6 DD 66 F7 11 09 00 19 11 ....x.n..f......
0236E0: 80 00 73 23 72 C3 EF 2A 21 88 00 E5 CD 15 78 E1 ..s#r..*!.....x.
0236F0: 22 23 19 E1 22 21 19 DD 6E F6 DD 66 F7 DD 75 04 "#.."!..n..f..u.
023700: 39 2A 0B 31 11 FF FF B7 ED 52 CA BF 34 2A 0B 31 9*.1.....R..4*.1
023710: ED 5B E6 30 D5 22 E6 30 E5 FD E1 DD 6E 04 26 00 .[.0.".0....n.&.
023720: CB 0D D2 2C 33 2A 0B 31 E5 CD 93 7A 2A E6 30 01 ...,3*.1...z*.0.
023730: 06 00 09 E5 CD A9 31 2A E6 30 E5 CD A9 31 2A E6 ......1*.0...1*.
023740: 30 01 02 00 09 E5 CD A9 31 2A E6 30 01 04 00 09 0.......1*.0....
023750: E5 CD A9 31 2A 0B 31 E5 CD 26 32 FD 2A E6 30 FD ...1*.1..&2.*.0.
023760: 6E 08 26 00 26 00 EB 21 04 00 B7 ED 52 C2 94 34 n.&.&..!....R..4
023770: FD 6E 0B 26 00 26 00 EB 21 04 00 B7 ED 52 C2 9A .n.&.&..!....R..
023780: 33 2A E6 30 01 0C 00 09 E5 CD A9 31 2A E6 30 01 3*.0.......1*.0.
023790: 0E 00 09 E5 CD A9 31 C3 91 34 21 05 00 B7 ED 52 ......1..4!....R
0237A0: C2 B1 33 2A E6 30 01 0C 00 09 E5 CD A9 31 C3 91 ..3*.0.......1..
0237B0: 34 21 06 00 B7 ED 52 CA C3 33 21 0E 00 B7 ED 52 4!....R..3!....R
0237C0: C2 D1 33 2A E6 30 01 10 00 09 E5 CD A9 31 C3 91 ..3*.0.......1..
0237D0: 34 21 08 00 B7 ED 52 CA E3 33 21 09 00 B7 ED 52 4!....R..3!....R
0237E0: C2 F1 33 2A E6 30 01 0C 00 09 E5 CD A9 31 C3 91 ..3*.0.......1..
0237F0: 34 21 0D 00 B7 ED 52 C2 6F 34 E5 FD 2A E6 30 FD 4!....R.o4..*.0.
023800: 6E 0C FD 66 0D E5 CD E9 31 D1 FD 2A E6 30 FD 73 n..f....1..*.0.s
023810: 0C FD 72 0D FD 6E 0C FD 66 0D 22 FC 30 2A FC 30 ..r..n..f.".0*.0
023820: 11 FF FF B7 ED 52 CA 6C 34 2A FC 30 ED 5B E8 30 .....R.l4*.0.[.0
023830: D5 22 E8 30 E5 FD E1 2A E8 30 01 01 00 09 E5 CD .".0...*.0......
023840: A9 31 E5 FD 2A E8 30 FD 6E 03 FD 66 04 E5 CD E9 .1..*.0.n..f....
023850: 31 D1 FD 2A E8 30 FD 73 03 FD 72 04 FD 6E 03 FD 1..*.0.s..r..n..
023860: 66 04 22 FC 30 E1 22 E8 30 C3 1D 34 C3 91 34 21 f.".0.".0..4..4!
023870: 11 00 B7 ED 52 CA 81 34 21 07 00 B7 ED 52 C2 91 ....R..4!....R..
023880: 34 2A D3 01 FD 2A E6 30 FD 75 0C FD 74 0D C3 91 4*...*.0.u..t...
023890: 34 C3 AB 34 21 08 00 B7 ED 52 C2 AB 34 2A E6 30 4..4!....R..4*.0
0238A0: 01 09 00 09 E5 CD A9 31 C3 AB 34 FD 2A E6 30 FD .......1..4.*.0.
0238B0: 6E 04 FD 66 05 22 0B 31 E1 22 E6 30 C3 01 33 DD n..f.".1.".0..3.
0238C0: E1 E1 C1 E9 2A 00 31 E5 CD ED 72 21 88 01 E5 2A ....*.1...r!...*
0238D0: 7C 01 29 11 59 01 19 5E 23 56 EB E5 CD 9B 76 2A |.).Y..^#V....v*
0238E0: 00 31 ED 5B E6 30 D5 22 E6 30 E5 FD E1 2A 7E 01 .1.[.0.".0...*~.
0238F0: 11 FF FF B7 ED 52 CA 03 35 21 05 00 E5 CD 15 78 .....R..5!.....x
023900: DD 74 05 C3 FE 2B 21 1D 00 B7 ED 52 C2 1D 2B E5 .t...+!....R..+.
023910: CD 00 26 D1 DD 73 04 DD 72 05 C3 FE 2B 21 36 00 ..&..s..r...+!6.
023920: B7 ED 52 C2 F3 2B CD 0D 70 21 3E 00 E5 21 68 00 ..R..+..p!>..!h.
023930: E5 CD 37 0B DD E5 E1 01 F6 FF 09 E5 CD 14 1B DD ..7.............
023940: 6E F6 DD 66 F7 ED 5B 21 19 D5 22 21 19 E5 FD E1 n..f..[!.."!....
023950: 21 02 00 FD 75 09 FD 74 0A 21 08 00 FD 75 0B 2A !...u..t.!...u.*
023960: 87 01 26 00 11 01 00 B7 ED 52 CA 7F 2B E5 CD 87 ..&......R..+...
023970: 29 D1 FD 2A 21 19 FD 73 0C FD 72 0D C3 E0 2B 21 )..*!..s..r...+!
023980: 00 00 E5 CD D4 07 2A 7E 01 11 FF FF B7 ED 52 C2 ......*~......R.
023990: D1 2B 21 88 01 E5 21 04 00 E5 CD A2 09 2A 7E 01 .+!...!......*~.
0239A0: ED 5B 23 19 D5 22 23 19 E5 FD E1 21 07 00 FD 75 .[#.."#....!...u
0239B0: 0B 21 02 00 FD 75 0C FD 74 0D E1 22 23 19 CD 0D .!...u..t.."#...
0239C0: 70 2A 7E 01 FD 2A 21 19 FD 75 0C FD 74 0D C3 E0 p*~..*!..u..t...
0239D0: 2B E5 CD 14 24 D1 FD 2A 21 19 FD 73 0C FD 72 0D +...$..*!..s..r.
0239E0: E1 22 21 19 DD 6E F6 DD 66 F7 DD 75 04 DD 74 05 ."!..n..f..u..t.
0239F0: C3 FE 2B E5 CD 14 24 D1 DD 73 04 DD 72 05 DD F9 ..+...$..s..r...
023A00: DD E1 C9 DD E5 DD 21 00 00 DD 39 DD 6E 06 DD 66 ......!...9.n..f
023A10: 07 5E 23 56 EB 11 64 00 B7 ED 52 C2 52 2C 2A 60 .^#V..d...R.R,*`
023A20: 02 11 0A 00 EB B7 ED 52 F2 32 2C 21 80 00 E5 CD .......R.2,!....
023A30: 15 78 DD 6E 06 DD 66 07 ED 5B 60 02 73 23 72 2A .x.n..f..[`.s#r*
023A40: 60 02 23 22 60 02 DD 6E 04 DD 66 05 11 00 00 73 `.#"`..n..f....s
023A50: 23 72 DD E1 E1 C1 C1 E9 DD E5 DD 21 00 00 DD 39 #r.........!...9
023A60: 2A 6F 01 ED 5B 7C 01 B7 ED 52 FA 77 2C 2A 77 02 *o..[|...R.w,*w.
023A70: 26 00 CB 0D D2 8A 2C DD 6E 04 DD 66 05 E5 CD 15 &.....,.n..f....
023A80: 78 21 00 00 DD 75 06 C3 90 2C 21 01 00 DD 75 06 x!...u...,!...u.
023A90: DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 21 C9 FF ........!...9!..
023AA0: 39 F9 21 00 00 DD 75 D4 DD 74 D5 2A 87 01 26 00 9.!...u..t.*..&.
023AB0: 11 01 00 B7 ED 52 C2 7C 2D DD 6E D4 DD 66 D5 11 .....R.|-.n..f..
023AC0: 14 00 EB B7 ED 52 FA 7C 2D 21 88 01 E5 21 03 00 .....R.|-!...!..
023AD0: E5 CD A2 09 DD 6E D4 DD 66 D5 29 DD E5 D1 01 D6 .....n..f.).....
023AE0: FF EB 09 EB 19 ED 5B 7E 01 73 23 72 2A 7E 01 11 ......[~.s#r*~..
023AF0: 0C 00 19 11 00 00 73 CD 0D 70 2A 87 01 26 00 11 ......s..p*..&..
023B00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
023B10: 1E 00 00 00 02 09 4E E5 1E 00 41 02 00 00 00 02 ......N...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: C3 4A 35 21 FF FF FD 2A E6 30 FD 75 00 FD 74 01 .J5!...*.0.u..t.
023C10: 21 FF FF FD 75 02 FD 74 03 2A 7C 01 29 11 59 01 !...u..t.*|.).Y.
023C20: 19 5E 23 56 EB 11 FF FF B7 ED 52 C2 40 35 2A 7C .^#V......R.@5*|
023C30: 01 29 11 59 01 19 ED 5B 00 31 73 23 72 C3 4A 35 .).Y...[.1s#r.J5
023C40: 2A 80 01 ED 5B 00 31 73 23 72 E1 22 E6 30 C9 DD *...[.1s#r.".0..
023C50: E5 DD 21 00 00 DD 39 E5 2A 6F 02 11 0F 00 19 5E ..!...9.*o.....^
023C60: 23 56 ED 53 00 31 2A 00 31 11 FF FF B7 ED 52 CA #V.S.1*.1.....R.
023C70: F0 35 2A 00 31 ED 5B E6 30 D5 22 E6 30 E5 FD E1 .5*.1.[.0.".0...
023C80: 2A 00 31 E5 CD ED 72 FD 2A E6 30 FD 6E 08 26 00 *.1...r.*.0.n.&.
023C90: 11 00 00 B7 ED 52 C2 CB 35 FD 6E 0D 26 00 CB 0D .....R..5.n.&...
023CA0: D2 CB 35 FD 6E 06 FD 66 07 ED 5B E0 15 B7 ED 52 ..5.n..f..[....R
023CB0: CA CB 35 E5 FD 6E 06 FD 66 07 E5 CD 00 7B E1 CB ..5..n..f....{..
023CC0: 0D DA CB 35 2A 00 31 E5 CD 9C 7A E5 2A 00 31 E5 ...5*.1...z.*.1.
023CD0: CD 00 7B E1 CB 0D DA DC 35 CD C4 34 FD 2A E6 30 ..{.....5..4.*.0
023CE0: FD 6E 04 FD 66 05 22 00 31 E1 22 E6 30 C3 66 35 .n..f.".1.".0.f5
023CF0: DD F9 DD E1 C9 2A 0B 31 11 0F 00 19 5E 23 56 ED .....*.1....^#V.
023D00: 53 09 31 2A 09 31 11 FF FF B7 ED 52 CA 1C 37 2A S.1*.1.....R..7*
023D10: 09 31 E5 CD ED 72 2A 00 31 11 0F 00 19 5E 23 56 .1...r*.1....^#V
023D20: ED 53 07 31 21 88 01 ED 5B E4 30 01 E0 FF EB 09 .S.1!...[.0.....
023D30: EB 01 20 00 ED B0 2A 07 31 11 FF FF B7 ED 52 CA .. ...*.1.....R.
023D40: 49 36 2A 07 31 E5 CD ED 72 FD 2A E4 30 FD 6E E0 I6*.1...r.*.0.n.
023D50: 26 00 11 20 00 B7 ED 52 C2 61 36 21 FF FF 22 07 &.. ...R.a6!..".
023D60: 31 2A 07 31 11 FF FF B7 ED 52 CA A7 36 21 88 01 1*.1.....R..6!..
023D70: ED 5B E4 30 01 E0 FF EB 09 EB 01 20 00 CD 94 6C .[.0....... ...l
023D80: CA A7 36 2A 07 31 11 04 00 19 5E 23 56 ED 53 07 ..6*.1....^#V.S.
023D90: 31 2A 07 31 11 FF FF B7 ED 52 CA A4 36 2A 07 31 1*.1.....R..6*.1
023DA0: E5 CD ED 72 C3 61 36 2A 07 31 11 FF FF B7 ED 52 ...r.a6*.1.....R
023DB0: CA FA 36 2A 09 31 ED 5B E8 30 D5 22 E8 30 E5 FD ..6*.1.[.0.".0..
023DC0: E1 21 08 00 FD 75 08 E5 2A 07 31 E5 CD DA 52 D1 .!...u..*.1...R.
023DD0: FD 2A E8 30 FD 73 09 FD 72 0A FD 6E 09 FD 66 0A .*.0.s..r..n..f.
023DE0: 11 FF FF B7 ED 52 CA F3 36 FD 6E 09 FD 66 0A E5 .....R..6.n..f..
023DF0: CD 26 32 E1 22 E8 30 C3 0B 37 2A 36 31 26 00 CB .&2.".0..7*61&..
023E00: E5 E5 2A BC 6C 22 D5 01 2A BC 6C 23 22 BC 6C 2A ..*.l"..*.l#".l*
023E10: C9 01 E5 21 09 31 E5 CD B2 18 2A 09 31 E5 CD ED ...!.1....*.1...
023E20: 72 CD 66 76 2A C9 01 ED 5B 09 31 01 24 00 ED B0 r.fv*...[.1.$...
023E30: 2A 09 31 22 C9 01 2A 71 02 22 0B 31 CD 03 3B 2A *.1"..*q.".1..;*
023E40: 00 31 22 71 02 2A 73 02 22 0B 31 CD 03 3B 2A 00 .1"q.*s.".1..;*.
023E50: 31 22 73 02 2A 05 31 DD 75 FE DD 74 FF 21 FF FF 1"s.*.1.u..t.!..
023E60: 22 05 31 DD 6E FE DD 66 FF 11 FF FF B7 ED 52 CA ".1.n..f......R.
023E70: 03 40 DD 6E FE DD 66 FF 11 0F 00 19 5E 23 56 ED .@.n..f.....^#V.
023E80: 53 0B 31 CD 03 3B DD 6E FE DD 66 FF 11 0F 00 19 S.1..;.n..f.....
023E90: ED 5B 00 31 73 23 72 DD 6E FE DD 66 FF 11 11 00 .[.1s#r.n..f....
023EA0: 19 5E 23 56 ED 53 0B 31 CD 03 3B DD 6E FE DD 66 .^#V.S.1..;.n..f
023EB0: FF 11 11 00 19 ED 5B 00 31 73 23 72 DD 6E FE DD ......[.1s#r.n..
023EC0: 66 FF E5 21 09 31 E5 CD B2 18 DD 6E FE DD 66 FF f..!.1.....n..f.
023ED0: ED 5B 09 31 01 24 00 ED B0 DD 6E FE DD 66 FF 11 .[.1.$....n..f..
023EE0: 0B 00 19 5E 23 56 DD 73 FE DD 72 FF 2A 09 31 11 ...^#V.s..r.*.1.
023EF0: 0B 00 19 ED 5B 05 31 73 23 72 2A 09 31 22 05 31 ....[.1s#r*.1".1
023F00: C3 63 3F 2A 71 02 22 0B 31 CD E6 3C 2A 73 02 22 .c?*q.".1..<*s."
023F10: 0B 31 CD E6 3C 2A 05 31 DD 75 FE DD 74 FF DD 6E .1..<*.1.u..t..n
023F20: FE DD 66 FF 11 FF FF B7 ED 52 CA 6B 40 DD 6E FE ..f......R.k@.n.
023F30: DD 66 FF 11 0F 00 19 5E 23 56 ED 53 0B 31 CD E6 .f.....^#V.S.1..
023F40: 3C DD 6E FE DD 66 FF 11 11 00 19 5E 23 56 ED 53 <.n..f.....^#V.S
023F50: 0B 31 CD E6 3C DD 6E FE DD 66 FF 11 0B 00 19 5E .1..<.n..f.....^
023F60: 23 56 DD 73 FE DD 72 FF C3 1E 40 DD F9 DD E1 C9 #V.s..r...@.....
023F70: DD E5 DD 21 00 00 DD 39 DD 6E 04 DD 66 05 11 FF ...!...9.n..f...
023F80: FF B7 ED 52 CA E2 40 E5 DD 6E 04 DD 66 05 E5 CD ...R..@..n..f...
023F90: FC 18 E1 CB 0D DA A9 40 DD 6E 04 DD 66 05 E5 CD .......@.n..f...
023FA0: F3 18 21 00 00 7D 32 35 31 DD 6E 04 DD 66 05 11 ..!..}251.n..f..
023FB0: 08 00 19 5E 16 00 EB 11 08 00 B7 ED 52 C2 D6 40 ...^........R..@
023FC0: DD 6E 04 DD 66 05 11 09 00 19 5E 23 56 DD 73 04 .n..f.....^#V.s.
023FD0: DD 72 05 C3 DF 40 21 FF FF DD 75 04 DD 74 05 C3 .r...@!...u..t..
023FE0: 78 40 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 DD x@........!...9.
023FF0: 6E 04 DD 66 05 11 FF FF B7 ED 52 CA 3E 41 DD 6E n..f......R.>A.n
024000: 0D D2 0B 37 2A 09 31 E5 CD 93 7A 2A 09 31 11 04 ...7*.1...z*.1..
024010: 00 19 5E 23 56 ED 53 09 31 C3 03 36 C9 DD E5 2A ..^#V.S.1..6...*
024020: E4 30 E5 ED 73 E4 30 DD 2A E4 30 21 DF FF 39 F9 .0..s.0.*.0!..9.
024030: 2A BC 6C 22 0D 31 E5 CD C0 7B E1 11 00 00 B7 ED *.l".1...{......
024040: 52 C2 50 37 21 00 00 DD 75 06 DD 74 07 C3 44 39 R.P7!...u..t..D9
024050: 21 21 00 E5 CD 1C 6F 21 88 01 E5 CD 52 6F 2A 6F !!....o!....Ro*o
024060: 02 ED 5B E6 30 D5 22 E6 30 E5 FD E1 FD 6E 1C FD ..[.0.".0....n..
024070: 66 1D E5 CD 46 6F FD 2A E6 30 FD 6E 1A FD 66 1B f...Fo.*.0.n..f.
024080: E5 CD 46 6F FD 2A E6 30 FD 6E 09 FD 66 0A E5 CD ..Fo.*.0.n..f...
024090: 46 6F FD 2A E6 30 FD 6E 13 FD 66 14 22 11 31 FD Fo.*.0.n..f.".1.
0240A0: 6E 13 FD 66 14 ED 5B 0D 31 B7 ED 52 22 0D 31 FD n..f..[.1..R".1.
0240B0: 6E 15 FD 66 16 ED 5B E4 15 B7 ED 52 22 0F 31 E1 n..f..[....R".1.
0240C0: 22 E6 30 2A 6F 02 22 00 31 2A 36 31 26 00 DD 75 ".0*o.".1*61&..u
0240D0: DF 21 00 00 7D 32 04 31 2A 00 31 11 FF FF B7 ED .!..}2.1*.1.....
0240E0: 52 CA 60 38 2A 00 31 ED 5B E6 30 D5 22 E6 30 E5 R.`8*.1.[.0.".0.
0240F0: FD E1 2A E6 30 01 0F 00 09 E5 CD A9 31 2A E6 30 ..*.0.......1*.0
024100: 01 11 00 09 E5 CD A9 31 FD 2A E6 30 FD 6E 0F FD .......1.*.0.n..
024110: 66 10 22 0B 31 DD 6E DF 26 00 E5 CD F9 32 FD 2A f.".1.n.&....2.*
024120: E6 30 FD 6E 11 FD 66 12 22 0B 31 21 00 00 E5 CD .0.n..f.".1!....
024130: F9 32 2A E6 30 01 0B 00 09 E5 CD A9 31 FD 2A E6 .2*.0.......1.*.
024140: 30 FD 6E 0B FD 66 0C 22 00 31 21 01 00 7D 32 04 0.n..f.".1!..}2.
024150: 31 2A 37 31 26 00 DD 75 DF E1 22 E6 30 C3 D8 37 1*71&..u..".0..7
024160: 2A 6F 02 22 0B 31 21 00 00 7D 32 04 31 2A 0B 31 *o.".1!..}2.1*.1
024170: 11 FF FF B7 ED 52 CA 3B 39 2A 0B 31 E5 CD ED 72 .....R.;9*.1...r
024180: 21 88 01 11 13 31 01 20 00 ED B0 2A 05 31 22 00 !....1. ...*.1".
024190: 31 21 FF FF 22 09 31 2A 00 31 11 FF FF B7 ED 52 1!..".1*.1.....R
0241A0: CA F2 38 2A 00 31 E5 CD ED 72 21 13 31 11 88 01 ..8*.1...r!.1...
0241B0: 01 20 00 CD 94 6C C2 E1 38 2A 0B 31 11 09 00 19 . ...l..8*.1....
0241C0: 5E 23 56 EB E5 2A 00 31 11 09 00 19 5E 23 56 EB ^#V..*.1....^#V.
0241D0: D1 B7 ED 52 CA DE 38 21 97 00 E5 CD 27 78 CD F5 ...R..8!....'x..
0241E0: 35 2A 00 31 11 0B 00 19 5E 23 56 ED 53 00 31 C3 5*.1....^#V.S.1.
0241F0: 97 38 2A 0B 31 11 0B 00 19 5E 23 56 EB 11 FF FF .8*.1....^#V....
024200: 04 DD 66 05 E5 CD 70 40 DD 6E 04 DD 66 05 11 06 ..f...p@.n..f...
024210: 00 19 5E 23 56 EB E5 CD 70 40 DD 6E 04 DD 66 05 ..^#V...p@.n..f.
024220: 11 02 00 19 5E 23 56 EB E5 CD E7 40 DD 6E 04 DD ....^#V....@.n..
024230: 66 05 5E 23 56 DD 73 04 DD 72 05 C3 EF 40 DD E1 f.^#V.s..r...@..
024240: E1 C1 E9 DD E5 DD 21 00 00 DD 39 2A 0B 31 11 FF ......!...9*.1..
024250: FF B7 ED 52 CA 1D 43 2A 0B 31 ED 5B E6 30 D5 22 ...R..C*.1.[.0."
024260: E6 30 E5 FD E1 E5 2A 0B 31 E5 CD 00 7B E1 DD 5E .0....*.1...{..^
024270: 04 16 00 7D B3 6F CB 0D DA 82 41 2A 0B 31 E5 CD ...}.o....A*.1..
024280: 70 40 E5 2A 0B 31 E5 CD FC 18 E1 CB 0D D2 09 43 p@.*.1.........C
024290: 2A 0B 31 E5 CD ED 72 FD 2A E6 30 FD 6E 08 26 00 *.1...r.*.0.n.&.
0242A0: 11 08 00 B7 ED 52 CA B3 41 FD 6E 06 FD 66 07 E5 .....R..A.n..f..
0242B0: CD 70 40 FD 2A E6 30 FD 6E 08 26 00 26 00 EB 21 .p@.*.0.n.&.&..!
0242C0: 00 00 B7 ED 52 C2 FB 41 FD 6E 06 FD 66 07 11 FF ....R..A.n..f...
0242D0: FF B7 ED 52 CA F8 41 FD 6E 06 FD 66 07 11 0B 00 ...R..A.n..f....
0242E0: 19 5E 16 00 EB 11 0E 00 B7 ED 52 C2 F8 41 FD 6E .^........R..A.n
0242F0: 06 FD 66 07 E5 CD 70 40 C3 09 43 21 03 00 B7 ED ..f...p@..C!....
024300: 52 C2 07 42 C3 09 43 21 01 00 B7 ED 52 CA 19 42 R..B..C!....R..B
024310: 21 02 00 B7 ED 52 C2 1C 42 C3 09 43 21 04 00 B7 !....R..B..C!...
024320: ED 52 C2 09 43 FD 2A E6 30 FD 6E 0B 26 00 26 00 .R..C.*.0.n.&.&.
024330: EB 21 04 00 B7 ED 52 C2 55 42 FD 6E 0C FD 66 0D .!....R.UB.n..f.
024340: E5 CD 70 40 FD 2A E6 30 FD 6E 0E FD 66 0F E5 CD ..p@.*.0.n..f...
024350: 70 40 C3 06 43 21 05 00 B7 ED 52 C2 6F 42 FD 2A p@..C!....R.oB.*
024360: E6 30 FD 6E 0C FD 66 0D E5 CD E7 40 C3 06 43 21 .0.n..f....@..C!
024370: 06 00 B7 ED 52 CA 81 42 21 0E 00 B7 ED 52 C2 92 ....R..B!....R..
024380: 42 FD 2A E6 30 FD 6E 10 FD 66 11 E5 CD 70 40 C3 B.*.0.n..f...p@.
024390: 06 43 21 08 00 B7 ED 52 CA A4 42 21 09 00 B7 ED .C!....R..B!....
0243A0: 52 C2 B5 42 FD 2A E6 30 FD 6E 0C FD 66 0D E5 CD R..B.*.0.n..f...
0243B0: 70 40 C3 06 43 21 0D 00 B7 ED 52 C2 06 43 FD 2A p@..C!....R..C.*
0243C0: E6 30 FD 6E 0C FD 66 0D 22 FC 30 2A FC 30 11 FF .0.n..f.".0*.0..
0243D0: FF B7 ED 52 CA 03 43 2A FC 30 ED 5B E8 30 D5 22 ...R..C*.0.[.0."
0243E0: E8 30 E5 FD E1 FD 6E 01 FD 66 02 E5 CD 70 40 FD .0....n..f...p@.
0243F0: 2A E8 30 FD 6E 03 FD 66 04 22 FC 30 E1 22 E8 30 *.0.n..f.".0.".0
024400: B7 ED 52 C2 23 39 2A 0B 31 11 0B 00 19 ED 5B 05 ..R.#9*.1.....[.
024410: 31 73 23 72 2A 6F 02 22 05 31 21 FF FF 22 0B 31 1s#r*o.".1!..".1
024420: C3 31 39 2A 0B 31 11 0B 00 19 5E 23 56 ED 53 0B .19*.1....^#V.S.
024430: 31 21 01 00 7D 32 04 31 C3 6D 38 21 01 00 DD 75 1!..}2.1.m8!...u
024440: 06 DD 74 07 ED 7B E4 30 E1 22 E4 30 DD E1 C9 2A ..t..{.0.".0...*
024450: 87 01 26 00 11 2B 00 B7 ED 52 C2 5F 3A CD 0D 70 ..&..+...R._:..p
024460: 21 01 00 7D 32 36 31 21 01 00 7D 32 37 31 E5 CD !..}261!..}271..
024470: 1D 37 E1 11 00 00 B7 ED 52 C2 8D 39 21 5A 00 E5 .7......R..9!Z..
024480: CD 15 78 21 0E 00 E5 CD A3 07 C3 55 3A CD 0D 70 ..x!....£..U:..p
024490: 21 2E 00 E5 21 5B 00 E5 CD 37 0B 21 FF FF 22 00 !...![...7.!..".
0244A0: 31 2A 6F 02 11 17 00 19 11 00 00 73 2A 87 01 26 1*o........s*..&
0244B0: 00 11 01 00 B7 ED 52 C2 4B 3A 21 88 01 11 13 31 ......R.K:!....1
0244C0: 01 20 00 ED B0 2A 6F 02 11 0F 00 19 5E 23 56 ED . ...*o.....^#V.
0244D0: 53 0B 31 2A 0B 31 11 FF FF B7 ED 52 CA 34 3A 2A S.1*.1.....R.4:*
0244E0: 0B 31 E5 CD ED 72 21 13 31 11 88 01 01 20 00 CD .1...r!.1.... ..
0244F0: 94 6C C2 05 3A 2A 0B 31 E5 CD 9C 7A 21 FF FF 22 .l..:*.1...z!.."
024500: 0B 31 C3 31 3A 2A 0B 31 11 04 00 19 5E 23 56 ED .1.1:*.1....^#V.
024510: 53 0B 31 2A 0B 31 11 FF FF B7 ED 52 C2 31 3A 21 S.1*.1.....R.1:!
024520: 13 31 11 88 01 01 20 00 ED B0 21 5C 00 E5 CD 15 .1.... ...!\....
024530: 78 C3 D3 39 CD 0D 70 2A 87 01 26 00 11 08 00 B7 x..9..p*..&.....
024540: ED 52 C2 48 3A CD 0D 70 C3 AC 39 CD 4F 35 2A D3 .R.H:..p..9.O5*.
024550: 01 23 22 D3 01 21 00 00 7D 32 36 31 C3 F7 3A CD .#"..!..}261..:.
024560: 0D 70 21 01 00 7D 32 37 31 2A 87 01 26 00 11 01 .p!..}271*..&...
024570: 00 B7 ED 52 C2 F7 3A E5 CD 1D 37 E1 11 00 00 B7 ...R..:...7.....
024580: ED 52 C2 8F 3A 21 5A 00 E5 CD 15 78 C3 E0 3A 2A .R..:!Z....x..:*
024590: 6F 02 22 00 31 2A 6F 02 11 17 00 19 11 01 00 73 o.".1*o........s
0245A0: CD C4 34 2A 7C 01 23 22 7C 01 2A 7C 01 29 11 59 ..4*|.#"|.*|.).Y
0245B0: 01 19 11 FF FF 73 23 72 CD 4F 35 2A 7C 01 29 11 .....s#r.O5*|.).
0245C0: 59 01 19 5E 23 56 D5 2A 6F 02 11 0D 00 19 D1 73 Y..^#V.*o......s
0245D0: 23 72 2A 7C 01 2B 22 7C 01 2A D3 01 23 22 D3 01 #r*|.+"|.*..#"..
0245E0: CD 0D 70 2A 87 01 26 00 11 08 00 B7 ED 52 C2 F4 ..p*..&......R..
0245F0: 3A CD 0D 70 C3 69 3A 21 0E 00 E5 21 06 00 E5 CD :..p.i:!...!....
024600: C3 CB 42 C3 06 43 C3 09 43 FD 2A E6 30 FD 6E 04 ..B..C..C.*.0.n.
024610: FD 66 05 22 0B 31 E1 22 E6 30 C3 4B 41 DD E1 E1 .f.".1.".0.KA...
024620: C1 E9 DD E5 DD 21 00 00 DD 39 E5 E5 21 01 00 7D .....!...9..!..}
024630: 32 35 31 2A 71 02 22 0B 31 21 00 00 E5 CD 43 41 251*q.".1!....CA
024640: 2A 73 02 22 0B 31 21 01 00 E5 CD 43 41 2A 05 31 *s.".1!....CA*.1
024650: DD 75 FC DD 74 FD DD 6E FC DD 66 FD 11 FF FF B7 .u..t..n..f.....
024660: ED 52 CA AB 43 DD 6E FC DD 66 FD 11 0F 00 19 5E .R..C.n..f.....^
024670: 23 56 ED 53 0B 31 21 00 00 E5 CD 43 41 DD 6E FC #V.S.1!....CA.n.
024680: DD 66 FD 11 11 00 19 5E 23 56 ED 53 0B 31 21 01 .f.....^#V.S.1!.
024690: 00 E5 CD 43 41 DD 6E FC DD 66 FD 11 0B 00 19 5E ...CA.n..f.....^
0246A0: 23 56 DD 73 FC DD 72 FD C3 56 43 2A 35 31 26 00 #V.s..r..VC*51&.
0246B0: CB 0D D2 2C 43 CD F8 3E E5 CD 16 7B D1 DD 73 FE ...,C..>...{..s.
0246C0: DD 72 FF 21 17 00 E5 CD 1C 6F DD 6E FE DD 66 FF .r.!.....o.n..f.
0246D0: E5 CD 46 6F 2A C9 01 ED 5B E6 30 D5 22 E6 30 E5 ..Fo*...[.0.".0.
0246E0: FD E1 21 1F 00 E5 CD 1C 6F 2A D1 01 E5 CD 46 6F ..!.....o*....Fo
0246F0: 2A CF 01 E5 CD 46 6F 2A 7C 01 29 11 59 01 19 5E *....Fo*|.).Y..^
024700: 23 56 FD 2A E6 30 FD 73 0D FD 72 0E 2A 71 02 FD #V.*.0.s..r.*q..
024710: 75 0F FD 74 10 2A 73 02 FD 75 11 FD 74 12 2A D5 u..t.*s..u..t.*.
024720: 01 FD 75 13 FD 74 14 DD 6E FE DD 66 FF FD 75 09 ..u..t..n..f..u.
024730: FD 74 0A 2A E4 15 FD 75 15 FD 74 16 2A 05 31 FD .t.*...u..t.*.1.
024740: 75 0B FD 74 0C 2A E6 30 01 20 00 09 E5 2A E6 30 u..t.*.0. ...*.0
024750: 01 22 00 09 E5 CD ED 7A 2A D3 01 FD 2A E6 30 FD .".....z*...*.0.
024760: 75 1E FD 74 1F 2A D1 01 FD 75 1C FD 74 1D 2A CF u..t.*...u..t.*.
024770: 01 FD 75 1A FD 74 1B 2A 60 02 FD 75 18 FD 74 19 ..u..t.*`..u..t.
024780: 21 00 00 FD 75 17 E1 22 E6 30 21 A9 01 11 88 01 !...u..".0!.....
024790: 01 20 00 ED B0 CD B1 7C DD F9 DD E1 C9 C3 00 00 . .....|........
0247A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0247B0: 00 00 00 00 80 40 20 10 08 04 02 01 00 00 00 00 .....@ .........
0247C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0247D0: 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 ................
0247E0: 00 00 00 00 00 00 00 00 01 00 00 01 00 00 01 00 ................
0247F0: 00 04 02 01 06 03 05 DD E5 DD 21 00 00 DD 39 DD ..........!...9.
024800: 37 0B C9 DD E5 DD 21 00 00 DD 39 21 FA FF 39 F9 7.....!...9!..9.
024810: 21 FF FF 22 00 31 21 FF FF 22 09 31 2A 0B 31 11 !..".1!..".1*.1.
024820: FF FF B7 ED 52 CA 4F 3C E5 2A 0B 31 E5 CD FC 18 ....R.O<.*.1....
024830: E1 CB 0D D2 1F 3C 2A 0B 31 E5 21 00 31 E5 CD B2 .....<*.1.!.1...
024840: 18 2A 00 31 11 04 00 19 ED 5B 09 31 73 23 72 2A .*.1.....[.1s#r*
024850: 00 31 22 09 31 2A 00 31 11 08 00 19 5E 16 00 EB .1".1*.1....^...
024860: 11 04 00 B7 ED 52 C2 1C 3C 2A 00 31 11 0B 00 19 .....R..<*.1....
024870: 5E 16 00 EB 11 0D 00 B7 ED 52 C2 1C 3C 2A 0B 31 ^........R..<*.1
024880: 11 0C 00 19 5E 23 56 DD 73 FE DD 72 FF 21 FF FF ....^#V.s..r.!..
024890: DD 75 FC DD 74 FD DD 6E FE DD 66 FF 11 FF FF B7 .u..t..n..f.....
0248A0: ED 52 CA 1C 3C DD E5 E1 01 FA FF 09 E5 21 06 00 .R..<........!..
0248B0: E5 CD BE 6C DD 6E FE DD 66 FF DD 5E FA DD 56 FB ...l.n..f..^..V.
0248C0: 01 06 00 ED B0 DD 6E FC DD 66 FD 11 FF FF B7 ED ......n..f......
0248D0: 52 C2 E7 3B 2A 00 31 11 0C 00 19 DD 5E FA DD 56 R..;*.1.....^..V
0248E0: FB 73 23 72 C3 FA 3B DD 6E FC DD 66 FD 11 03 00 .s#r..;.n..f....
0248F0: 19 DD 5E FA DD 56 FB 73 23 72 DD 6E FE DD 66 FF ..^..V.s#r.n..f.
024900: 11 03 00 19 5E 23 56 DD 73 FE DD 72 FF DD 6E FA ....^#V.s..r..n.
024910: DD 66 FB DD 75 FC DD 74 FD C3 96 3B C3 25 3C 21 .f..u..t...;.%<!
024920: FF FF 22 00 31 2A 0B 31 11 08 00 19 11 08 00 73 ..".1*.1.......s
024930: 2A 0B 31 11 09 00 19 ED 5B 00 31 73 23 72 2A 0B *.1.....[.1s#r*.
024940: 31 11 04 00 19 5E 23 56 ED 53 0B 31 C3 1C 3B 21 1....^#V.S.1..;!
024950: FF FF 22 00 31 2A 09 31 11 FF FF B7 ED 52 CA 8C ..".1*.1.....R..
024960: 3C 2A 09 31 11 04 00 19 5E 23 56 ED 53 0B 31 2A <*.1....^#V.S.1*
024970: 09 31 11 04 00 19 ED 5B 00 31 73 23 72 2A 09 31 .1.....[.1s#r*.1
024980: 22 00 31 2A 0B 31 22 09 31 C3 55 3C DD F9 DD E1 ".1*.1".1.U<....
024990: C9 DD E5 DD 21 00 00 DD 39 DD 6E 04 DD 66 05 11 ....!...9.n..f..
0249A0: 08 00 19 5E 16 00 EB 11 08 00 B7 ED 52 C2 D5 3C ...^........R..<
0249B0: DD 6E 04 DD 66 05 11 FF FF B7 ED 52 CA D5 3C DD .n..f......R..<.
0249C0: 6E 04 DD 66 05 11 09 00 19 5E 23 56 DD 73 04 DD n..f.....^#V.s..
0249D0: 72 05 C3 99 3C DD 6E 04 DD 66 05 DD 75 06 DD 74 r...<.n..f..u..t
0249E0: 07 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 E5 21 .........!...9.!
0249F0: FF FF 22 00 31 2A 0B 31 11 FF FF B7 ED 52 CA F3 ..".1*.1.....R..
024A00: 6E 04 DD 66 05 E5 CD 15 78 2A 87 01 26 00 11 24 n..f....x*..&..$
024A10: 00 B7 ED 52 21 00 00 20 01 23 E5 2A 87 01 26 00 ...R!.. .#.*..&.
024A20: 11 3D 00 B7 ED 52 21 00 00 20 01 23 E5 2A 87 01 .=...R!.. .#.*..
024A30: 26 00 11 25 00 B7 ED 52 21 00 00 20 01 23 E5 2A &..%...R!.. .#.*
024A40: 87 01 26 00 11 27 00 B7 ED 52 21 00 00 20 01 23 ..&..'...R!.. .#
024A50: E5 2A 87 01 26 00 11 0E 00 B7 ED 52 21 00 00 20 .*..&......R!..
024A60: 01 23 D1 7D B3 6F D1 7D B3 6F D1 7D B3 6F D1 7D .#.}.o.}.o.}.o.}
024A70: B3 6F CB 0D DA 7D 45 CD 0D 70 C3 09 45 DD E1 E1 .o...}E..p..E...
024A80: C1 E9 DD E5 DD 21 00 00 DD 39 21 00 00 DD 75 08 .....!...9!...u.
024A90: DD 6E 06 DD 66 07 11 0B 00 19 5E 16 00 EB 11 10 .n..f.....^.....
024AA0: 00 B7 ED 52 C2 C7 45 DD 6E 04 DD 66 05 11 0B 00 ...R..E.n..f....
024AB0: 19 5E 16 00 EB 11 08 00 B7 ED 52 21 00 00 20 01 .^........R!.. .
024AC0: 23 DD 75 08 C3 44 47 DD 6E 06 DD 66 07 11 0B 00 #.u..DG.n..f....
024AD0: 19 5E 16 00 EB 11 DC 44 19 5E 16 00 CB 0B D2 01 .^.....D.^......
024AE0: 46 DD 6E 04 DD 66 05 11 0B 00 19 5E 16 00 EB 11 F.n..f.....^....
024AF0: 12 00 B7 ED 52 C2 01 46 21 01 00 DD 75 08 C3 44 ....R..F!...u..D
024B00: 47 DD 6E 06 DD 66 07 11 0B 00 19 5E 16 00 EB 11 G.n..f.....^....
024B10: 0B 00 B7 ED 52 C2 38 46 DD 6E 04 DD 66 05 11 09 ....R.8F.n..f...
024B20: 00 19 5E 23 56 EB 11 02 00 B7 ED 52 21 00 00 20 ..^#V......R!..
024B30: 01 23 DD 75 08 C3 44 47 DD 6E 06 DD 66 07 11 0B .#.u..DG.n..f...
024B40: 00 19 5E 16 00 EB 11 0C 00 B7 ED 52 C2 6F 46 DD ..^........R.oF.
024B50: 6E 04 DD 66 05 11 09 00 19 5E 23 56 EB 11 01 00 n..f.....^#V....
024B60: B7 ED 52 21 00 00 20 01 23 DD 75 08 C3 44 47 DD ..R!.. .#.u..DG.
024B70: 6E 06 DD 66 07 11 0B 00 19 5E 16 00 EB 11 02 00 n..f.....^......
024B80: B7 ED 52 C2 C5 46 DD 6E 04 DD 66 05 11 09 00 19 ..R..F.n..f.....
024B90: 5E 23 56 EB 11 01 00 B7 ED 52 21 00 00 20 01 23 ^#V......R!.. .#
024BA0: E5 DD 6E 04 DD 66 05 11 0B 00 19 5E 16 00 EB 11 ..n..f.....^....
024BB0: 0A 00 B7 ED 52 21 00 00 20 01 23 D1 7D A3 6F DD ....R!.. .#.}£o.
024BC0: 75 08 C3 44 47 DD 6E 06 DD 66 07 11 0B 00 19 5E u..DG.n..f.....^
024BD0: 16 00 EB 11 0A 00 B7 ED 52 C2 44 47 DD 6E 04 DD ........R.DG.n..
024BE0: 66 05 11 0B 00 19 5E 16 00 EB 11 04 00 B7 ED 52 f.....^........R
024BF0: C2 44 47 DD 6E 04 DD 66 05 11 0C 00 19 5E 23 56 .DG.n..f.....^#V
024C00: 3E 2A 0B 31 ED 5B E6 30 D5 22 E6 30 E5 FD E1 E5 >*.1.[.0.".0....
024C10: FD 6E 06 FD 66 07 E5 CD 91 3C D1 FD 2A E6 30 FD .n..f....<..*.0.
024C20: 73 06 FD 72 07 E5 FD 6E 00 FD 66 01 E5 CD 91 3C s..r...n..f....<
024C30: D1 FD 2A E6 30 FD 73 00 FD 72 01 E5 FD 6E 02 FD ..*.0.s..r...n..
024C40: 66 03 E5 CD 91 3C D1 FD 2A E6 30 FD 73 02 FD 72 f....<..*.0.s..r
024C50: 03 FD 6E 08 26 00 26 00 EB 21 00 00 B7 ED 52 CA ..n.&.&..!....R.
024C60: 6B 3D 21 03 00 B7 ED 52 C2 6E 3D C3 D9 3E 21 01 k=!....R.n=..>!.
024C70: 00 B7 ED 52 CA 80 3D 21 02 00 B7 ED 52 C2 83 3D ...R..=!....R..=
024C80: C3 D9 3E 21 04 00 B7 ED 52 C2 B3 3E FD 2A E6 30 ..>!....R..>.*.0
024C90: FD 6E 0B 26 00 26 00 EB 21 04 00 B7 ED 52 C2 D0 .n.&.&..!....R..
024CA0: 3D E5 FD 6E 0C FD 66 0D E5 CD 91 3C D1 FD 2A E6 =..n..f....<..*.
024CB0: 30 FD 73 0C FD 72 0D E5 FD 6E 0E FD 66 0F E5 CD 0.s..r...n..f...
024CC0: 91 3C D1 FD 2A E6 30 FD 73 0E FD 72 0F C3 B0 3E .<..*.0.s..r...>
024CD0: 21 05 00 B7 ED 52 C2 F6 3D E5 FD 2A E6 30 FD 6E !....R..=..*.0.n
024CE0: 0C FD 66 0D E5 CD 91 3C D1 FD 2A E6 30 FD 73 0C ..f....<..*.0.s.
024CF0: FD 72 0D C3 B0 3E 21 06 00 B7 ED 52 CA 08 3E 21 .r...>!....R..>!
024D00: 0E 00 B7 ED 52 C2 25 3E E5 FD 2A E6 30 FD 6E 10 ....R.%>..*.0.n.
024D10: FD 66 11 E5 CD 91 3C D1 FD 2A E6 30 FD 73 10 FD .f....<..*.0.s..
024D20: 72 11 C3 B0 3E 21 08 00 B7 ED 52 CA 37 3E 21 09 r...>!....R.7>!.
024D30: 00 B7 ED 52 C2 54 3E E5 FD 2A E6 30 FD 6E 0C FD ...R.T>..*.0.n..
024D40: 66 0D E5 CD 91 3C D1 FD 2A E6 30 FD 73 0C FD 72 f....<..*.0.s..r
024D50: 0D C3 B0 3E 21 0D 00 B7 ED 52 C2 B0 3E FD 2A E6 ...>!....R..>.*.
024D60: 30 FD 6E 0C FD 66 0D DD 75 FE DD 74 FF DD 6E FE 0.n..f..u..t..n.
024D70: DD 66 FF 11 FF FF B7 ED 52 CA AD 3E E5 DD 6E FE .f......R..>..n.
024D80: DD 66 FF 23 5E 23 56 EB E5 CD 91 3C DD 6E FE DD .f.#^#V....<.n..
024D90: 66 FF 23 D1 73 23 72 DD 6E FE DD 66 FF 11 03 00 f.#.s#r.n..f....
024DA0: 19 5E 23 56 DD 73 FE DD 72 FF C3 6D 3E C3 B0 3E .^#V.s..r..m>..>
024DB0: C3 D9 3E 21 08 00 B7 ED 52 C2 D9 3E E5 FD 2A E6 ..>!....R..>..*.
024DC0: 30 FD 6E 09 FD 66 0A E5 CD 91 3C D1 FD 2A E6 30 0.n..f....<..*.0
024DD0: FD 73 09 FD 72 0A C3 D9 3E 2A 0B 31 22 00 31 FD .s..r...>*.1".1.
024DE0: 2A E6 30 FD 6E 04 FD 66 05 22 0B 31 E1 22 E6 30 *.0.n..f.".1.".0
024DF0: C3 F5 3C DD F9 DD E1 C9 DD E5 DD 21 00 00 DD 39 ..<........!...9
024E00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
024E10: 1F 00 00 00 02 09 4E E5 1F 00 41 02 00 00 00 02 ......N...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: EB 11 0B 00 19 5E 16 00 EB 11 02 00 B7 ED 52 21 .....^........R!
024F10: 00 00 20 01 23 E5 DD 6E 04 DD 66 05 11 09 00 19 .. .#..n..f.....
024F20: 5E 23 56 EB E5 DD 6E 06 DD 66 07 11 09 00 19 5E ^#V...n..f.....^
024F30: 23 56 EB D1 B7 ED 52 21 00 00 20 01 23 D1 7D A3 #V....R!.. .#.}£
024F40: 6F DD 75 08 DD E1 E1 C1 C1 E9 DD E5 DD 21 00 00 o.u..........!..
024F50: DD 39 21 00 00 DD 75 08 DD 6E 06 DD 66 07 DD 5E .9!...u..n..f..^
024F60: 04 DD 56 05 B7 ED 52 C2 73 47 21 01 00 DD 75 08 ..V...R.sG!...u.
024F70: C3 91 49 DD 6E 06 DD 66 07 11 0B 00 19 5E 16 00 ..I.n..f.....^..
024F80: EB 11 06 00 B7 ED 52 CA A1 47 DD 6E 04 DD 66 05 ......R..G.n..f.
024F90: 11 0B 00 19 5E 16 00 EB 11 06 00 B7 ED 52 C2 8E ....^........R..
024FA0: 48 DD 6E 04 DD 66 05 11 0E 00 19 5E 23 56 EB E5 H.n..f.....^#V..
024FB0: DD 6E 06 DD 66 07 11 0C 00 19 5E 23 56 EB D1 EB .n..f.....^#V...
024FC0: B7 ED 52 FA EB 47 DD 6E 06 DD 66 07 11 0E 00 19 ..R..G.n..f.....
024FD0: 5E 23 56 EB E5 DD 6E 04 DD 66 05 11 0C 00 19 5E ^#V...n..f.....^
024FE0: 23 56 EB D1 EB B7 ED 52 F2 19 48 DD 6E 06 DD 66 #V.....R..H.n..f
024FF0: 07 11 0B 00 19 5E 16 00 EB 11 06 00 B7 ED 52 C2 .....^........R.
025000: 19 48 DD 6E 04 DD 66 05 11 0B 00 19 5E 16 00 EB .H.n..f.....^...
025010: 11 06 00 B7 ED 52 CA 8B 48 DD 6E 06 DD 66 07 11 .....R..H.n..f..
025020: 0B 00 19 5E 16 00 EB 11 06 00 B7 ED 52 C2 46 48 ...^........R.FH
025030: DD 6E 06 DD 66 07 11 10 00 19 5E 23 56 DD 73 06 .n..f.....^#V.s.
025040: DD 72 07 C3 19 48 DD 6E 04 DD 66 05 11 0B 00 19 .r...H.n..f.....
025050: 5E 16 00 EB 11 06 00 B7 ED 52 C2 73 48 DD 6E 04 ^........R.sH.n.
025060: DD 66 05 11 10 00 19 5E 23 56 DD 73 04 DD 72 05 .f.....^#V.s..r.
025070: C3 46 48 DD 6E 06 DD 66 07 DD 5E 04 DD 56 05 B7 .FH.n..f..^..V..
025080: ED 52 21 00 00 20 01 23 DD 75 08 C3 91 49 DD 6E .R!.. .#.u...I.n
025090: 06 DD 66 07 11 0B 00 19 5E 16 00 EB 11 0A 00 B7 ..f.....^.......
0250A0: ED 52 C2 E9 48 DD 6E 04 DD 66 05 11 0B 00 19 5E .R..H.n..f.....^
0250B0: 16 00 EB 11 0A 00 B7 ED 52 C2 E9 48 DD 6E 04 DD ........R..H.n..
0250C0: 66 05 11 09 00 19 5E 23 56 EB E5 DD 6E 06 DD 66 f.....^#V...n..f
0250D0: 07 11 09 00 19 5E 23 56 EB D1 B7 ED 52 21 00 00 .....^#V....R!..
0250E0: 20 01 23 DD 75 08 C3 91 49 DD 6E 06 DD 66 07 11 .#.u...I.n..f..
0250F0: 0B 00 19 5E 16 00 EB 11 04 00 B7 ED 52 C2 63 49 ...^........R.cI
025100: 5E 16 00 EB 11 12 00 B7 ED 52 C2 19 51 2A DA 15 ^........R..Q*..
025110: FD 75 00 FD 74 01 C3 34 51 FD 2A A2 44 FD 6E 00 .u..t..4Q.*.D.n.
025120: FD 66 01 ED 5B DC 15 B7 ED 52 C2 34 51 21 79 00 .f..[....R.4Q!y.
025130: E5 CD 15 78 C3 88 51 21 01 00 B7 ED 52 C2 6B 51 ...x..Q!....R.kQ
025140: ED 5B A2 44 01 08 00 EB 09 EB 21 F8 FF 39 F9 EB .[.D......!..9..
025150: 01 08 00 ED B0 CD 40 66 ED 5B A2 44 01 08 00 EB ......@f.[.D....
025160: 09 EB 01 08 00 CD AA 6C C3 88 51 21 02 00 B7 ED .......l..Q!....
025170: 52 C2 88 51 FD 2A A2 44 FD 6E 08 26 00 CB 0D 3F R..Q.*.D.n.&...?
025180: CB 15 FD 75 08 C3 88 51 E1 22 A2 44 C3 E9 51 DD ...u...Q.".D..Q.
025190: E5 E1 01 FE FF 09 E5 21 10 00 E5 CD BE 6C DD 6E .......!.....l.n
0251A0: FE DD 66 FF ED 5B A2 44 D5 22 A2 44 E5 FD E1 DD ..f..[.D.".D....
0251B0: 6E 04 DD 66 05 FD 75 00 FD 74 01 21 01 00 FD 75 n..f..u..t.!...u
0251C0: 03 DD 6E 08 26 00 FD 75 04 DD 6E 06 DD 66 07 FD ..n.&..u..n..f..
0251D0: 75 05 FD 74 06 DD 6E 06 DD 66 07 11 02 00 19 5E u..t..n..f.....^
0251E0: 16 00 FD 73 02 E1 22 A2 44 DD 6E FE DD 66 FF DD ...s..".D.n..f..
0251F0: 75 0A DD 74 0B DD F9 DD E1 D1 21 06 00 39 F9 EB u..t......!..9..
025200: E9 DD E5 DD 21 00 00 DD 39 DD 6E 04 DD 66 05 11 ....!...9.n..f..
025210: FF FF B7 ED 52 C2 21 52 21 00 00 DD 75 06 C3 4E ....R.!R!...u..N
025220: 52 DD 6E 04 DD 66 05 11 0B 00 19 5E 16 00 EB 11 R.n..f.....^....
025230: 06 00 B7 ED 52 C2 4E 52 DD 6E 04 DD 66 05 11 10 ....R.NR.n..f...
025240: 00 19 5E 23 56 DD 73 04 DD 72 05 C3 21 52 DD 6E ..^#V.s..r..!R.n
025250: 04 DD 66 05 11 09 00 19 5E 23 56 EB 11 01 00 B7 ..f.....^#V.....
025260: ED 52 21 00 00 20 01 23 E5 DD 6E 04 DD 66 05 11 .R!.. .#..n..f..
025270: 0B 00 19 5E 16 00 EB 11 0A 00 B7 ED 52 21 00 00 ...^........R!..
025280: 20 01 23 D1 7D A3 6F E5 DD 6E 04 DD 66 05 ED 5B .#.}£o..n..f..[
025290: E2 15 B7 ED 52 21 00 00 20 01 23 E5 DD 6E 04 DD ....R!.. .#..n..
0252A0: 66 05 ED 5B DE 15 B7 ED 52 21 00 00 20 01 23 E5 f..[....R!.. .#.
0252B0: DD 6E 04 DD 66 05 11 0B 00 19 5E 16 00 EB 11 DC .n..f.....^.....
0252C0: 44 19 5E 16 00 EB D1 7D B3 6F D1 7D B3 6F D1 7D D.^....}.o.}.o.}
0252D0: B3 6F DD 75 06 DD E1 E1 C1 E9 DD E5 DD 21 00 00 .o.u.........!..
0252E0: DD 39 DD 6E 04 DD 66 05 11 FF FF B7 ED 52 CA 1E .9.n..f......R..
0252F0: 53 DD 6E 04 DD 66 05 11 08 00 19 5E 16 00 EB 11 S.n..f.....^....
025300: DD 6E 04 DD 66 05 11 0B 00 19 5E 16 00 EB 11 04 .n..f.....^.....
025310: 00 B7 ED 52 C2 63 49 DD 6E 06 DD 66 07 11 0E 00 ...R.cI.n..f....
025320: 19 5E 23 56 EB 11 FF FF B7 ED 52 21 00 00 20 01 .^#V......R!.. .
025330: 23 E5 DD 6E 04 DD 66 05 11 0C 00 19 5E 23 56 EB #..n..f.....^#V.
025340: E5 DD 6E 06 DD 66 07 11 0C 00 19 5E 23 56 EB D1 ..n..f.....^#V..
025350: B7 ED 52 21 00 00 20 01 23 D1 7D A3 6F DD 75 08 ..R!.. .#.}£o.u.
025360: C3 91 49 E5 DD 6E 04 DD 66 05 E5 DD 6E 06 DD 66 ..I..n..f...n..f
025370: 07 E5 CD 82 45 E1 E5 E5 DD 6E 06 DD 66 07 E5 DD ....E....n..f...
025380: 6E 04 DD 66 05 E5 CD 82 45 E1 D1 7D B3 6F DD 75 n..f....E..}.o.u
025390: 08 DD E1 E1 C1 C1 E9 DD E5 DD 21 00 00 DD 39 21 ..........!...9!
0253A0: 00 00 DD 75 08 E5 DD 6E 06 DD 66 07 E5 DD 6E 04 ...u...n..f...n.
0253B0: DD 66 05 E5 CD 4A 47 E1 CB 0D D2 C6 49 21 01 00 .f...JG.....I!..
0253C0: DD 75 08 C3 6F 4C DD 6E 06 DD 66 07 ED 5B E0 15 .u..oL.n..f..[..
0253D0: B7 ED 52 C2 F4 49 E5 DD 6E 04 DD 66 05 E5 2A DA ..R..I..n..f..*.
0253E0: 15 E5 CD 4A 47 E1 CB 0D D2 F4 49 21 01 00 DD 75 ...JG.....I!...u
0253F0: 08 C3 6F 4C DD 6E 06 DD 66 07 11 0B 00 19 5E 16 ..oL.n..f.....^.
025400: 00 EB 11 06 00 B7 ED 52 C2 6C 4A DD 6E 04 DD 66 .......R.lJ.n..f
025410: 05 11 0B 00 19 5E 16 00 EB 11 06 00 B7 ED 52 C2 .....^........R.
025420: 6C 4A DD 6E 06 DD 66 07 11 0E 00 19 5E 23 56 EB lJ.n..f.....^#V.
025430: E5 DD 6E 04 DD 66 05 11 0C 00 19 5E 23 56 EB D1 ..n..f.....^#V..
025440: EB B7 ED 52 FA 6F 4C DD 6E 04 DD 66 05 11 0E 00 ...R.oL.n..f....
025450: 19 5E 23 56 EB E5 DD 6E 06 DD 66 07 11 0C 00 19 .^#V...n..f.....
025460: 5E 23 56 EB D1 EB B7 ED 52 FA 6F 4C DD 6E 06 DD ^#V.....R.oL.n..
025470: 66 07 11 0B 00 19 5E 16 00 EB 11 06 00 B7 ED 52 f.....^........R
025480: C2 99 4A DD 6E 06 DD 66 07 11 10 00 19 5E 23 56 ..J.n..f.....^#V
025490: DD 73 06 DD 72 07 C3 6C 4A DD 6E 04 DD 66 05 11 .s..r..lJ.n..f..
0254A0: 0B 00 19 5E 16 00 EB 11 06 00 B7 ED 52 C2 C6 4A ...^........R..J
0254B0: DD 6E 04 DD 66 05 11 10 00 19 5E 23 56 DD 73 04 .n..f.....^#V.s.
0254C0: DD 72 05 C3 99 4A DD 6E 06 DD 66 07 11 0B 00 19 .r...J.n..f.....
0254D0: 5E 16 00 EB 11 02 00 B7 ED 52 C2 14 4B DD 6E 04 ^........R..K.n.
0254E0: DD 66 05 11 0B 00 19 5E 16 00 EB 11 0A 00 B7 ED .f.....^........
0254F0: 52 C2 14 4B DD 6E 04 DD 66 05 11 09 00 19 5E 23 R..K.n..f.....^#
025500: 08 00 B7 ED 52 C2 1E 53 DD 6E 04 DD 66 05 11 09 ....R..S.n..f...
025510: 00 19 5E 23 56 DD 73 04 DD 72 05 C3 E2 52 DD 6E ..^#V.s..r...R.n
025520: 04 DD 66 05 DD 75 06 DD 74 07 DD E1 E1 C1 E9 DD ..f..u..t.......
025530: E5 DD 21 00 00 DD 39 DD 6E 04 DD 66 05 11 FF FF ..!...9.n..f....
025540: B7 ED 52 C2 4F 53 21 00 00 DD 75 06 C3 9B 53 DD ..R.OS!...u...S.
025550: 6E 04 DD 66 05 11 0B 00 19 5E 16 00 EB 11 06 00 n..f.....^......
025560: B7 ED 52 C2 83 53 E5 DD 6E 04 DD 66 05 11 10 00 ..R..S..n..f....
025570: 19 5E 23 56 EB E5 CD DA 52 D1 DD 73 04 DD 72 05 .^#V....R..s..r.
025580: C3 4F 53 DD 6E 04 DD 66 05 11 0B 00 19 5E 16 00 .OS.n..f.....^..
025590: EB 11 DC 44 19 5E 16 00 DD 73 06 DD E1 E1 C1 E9 ...D.^...s......
0255A0: DD E5 DD 21 00 00 DD 39 21 00 00 DD 75 06 E5 DD ...!...9!...u...
0255B0: 6E 04 DD 66 05 5E 23 56 EB E5 CD 01 52 E1 CB 0D n..f.^#V....R...
0255C0: D2 CC 53 21 01 00 DD 75 06 C3 E7 53 DD 6E 04 DD ..S!...u...S.n..
0255D0: 66 05 5E 23 56 EB ED 5B E0 15 B7 ED 52 CA E7 53 f.^#V..[....R..S
0255E0: 21 1C 00 E5 CD 15 78 DD E1 E1 C1 E9 DD E5 DD 21 !.....x........!
0255F0: 00 00 DD 39 E5 E5 E5 DD 6E 0A DD 66 0B E5 CD A0 ...9....n..f....
025600: 53 D1 DD 73 FF E5 DD 6E 08 DD 66 09 E5 CD A0 53 S..s...n..f....S
025610: D1 DD 73 FE DD 6E 06 26 00 DD 5E 04 16 00 B7 ED ..s..n.&..^.....
025620: 52 CA 36 54 DD 6E FF 26 00 DD 5E FE 16 00 7D A3 R.6T.n.&..^...}£
025630: 6F CB 0D DA 89 54 DD 6E 04 26 00 DD 75 FD DD 6E o....T.n.&..u..n
025640: FF 26 00 CB 0D D2 62 54 E5 21 04 00 E5 DD 6E 0A .&....bT.!....n.
025650: DD 66 0B E5 2A E0 15 E5 CD 8A 50 D1 DD 73 0A DD .f..*.....P..s..
025660: 72 0B DD 6E FE 26 00 CB 0D D2 86 54 E5 21 04 00 r..n.&.....T.!..
025670: E5 DD 6E 08 DD 66 09 E5 2A E0 15 E5 CD 8A 50 D1 ..n..f..*.....P.
025680: DD 73 08 DD 72 09 C3 91 54 DD 6E 06 26 00 DD 75 .s..r...T.n.&..u
025690: FD E5 DD 6E FD 26 00 E5 DD 6E 0A DD 66 0B E5 DD ...n.&...n..f...
0256A0: 6E 08 DD 66 09 E5 DD 6E 0A DD 66 0B 5E 23 56 EB n..f...n..f.^#V.
0256B0: E5 CD 75 4C D1 DD 73 0C DD 72 0D DD F9 DD E1 D1 ..uL..s..r......
0256C0: 21 08 00 39 F9 EB E9 DD E5 DD 21 00 00 DD 39 E5 !..9......!...9.
0256D0: DD E5 E1 01 FE FF 09 E5 21 10 00 E5 CD BE 6C DD ........!.....l.
0256E0: 6E FE DD 66 FF ED 5B A2 44 D5 22 A2 44 E5 FD E1 n..f..[.D.".D...
0256F0: 21 03 00 FD 75 03 21 00 00 FD 75 04 FD 74 05 DD !...u.!...u..t..
025700: 56 EB 11 01 00 B7 ED 52 C2 14 4B 21 01 00 DD 75 V......R..K!...u
025710: 08 C3 6F 4C DD 6E 06 DD 66 07 11 0B 00 19 5E 16 ..oL.n..f.....^.
025720: 00 EB 11 04 00 B7 ED 52 C2 90 4B DD 6E 06 DD 66 .......R..K.n..f
025730: 07 11 0C 00 19 5E 23 56 EB 11 0B 00 19 5E 16 00 .....^#V.....^..
025740: EB 11 02 00 B7 ED 52 C2 90 4B DD 6E 04 DD 66 05 ......R..K.n..f.
025750: 11 0B 00 19 5E 16 00 EB 11 0A 00 B7 ED 52 C2 90 ....^........R..
025760: 4B DD 6E 06 DD 66 07 11 09 00 19 5E 23 56 EB E5 K.n..f.....^#V..
025770: DD 6E 04 DD 66 05 11 09 00 19 5E 23 56 EB D1 B7 .n..f.....^#V...
025780: ED 52 2B CB 04 21 00 00 CB 15 DD 75 08 C3 6F 4C .R+..!.....u..oL
025790: DD 6E 06 DD 66 07 11 0B 00 19 5E 16 00 EB 11 0B .n..f.....^.....
0257A0: 00 B7 ED 52 C2 C9 4B DD 6E 04 DD 66 05 11 09 00 ...R..K.n..f....
0257B0: 19 5E 23 56 EB 11 02 00 B7 ED 52 2B CB 04 21 00 .^#V......R+..!.
0257C0: 00 CB 15 DD 75 08 C3 6F 4C DD 6E 06 DD 66 07 11 ....u..oL.n..f..
0257D0: 0B 00 19 5E 16 00 EB 11 04 00 B7 ED 52 C2 3B 4C ...^........R.;L
0257E0: DD 6E 06 DD 66 07 11 0E 00 19 5E 23 56 EB 11 FF .n..f.....^#V...
0257F0: FF B7 ED 52 C2 3B 4C DD 6E 04 DD 66 05 11 0B 00 ...R.;L.n..f....
025800: 19 5E 16 00 EB 11 04 00 B7 ED 52 C2 3B 4C DD 6E .^........R.;L.n
025810: 06 DD 66 07 11 0C 00 19 5E 23 56 EB E5 DD 6E 04 ..f.....^#V...n.
025820: DD 66 05 11 0C 00 19 5E 23 56 EB D1 B7 ED 52 21 .f.....^#V....R!
025830: 00 00 20 01 23 DD 75 08 C3 6F 4C DD 6E 04 DD 66 .. .#.u..oL.n..f
025840: 05 11 0B 00 19 5E 16 00 EB 11 DC 44 19 5E 16 00 .....^.....D.^..
025850: EB E5 DD 6E 06 DD 66 07 11 0B 00 19 5E 16 00 EB ...n..f.....^...
025860: 11 DC 44 19 5E 16 00 EB D1 7D A3 6F DD 75 08 DD ..D.^....}£o.u..
025870: E1 E1 C1 C1 E9 DD E5 DD 21 00 00 DD 39 E5 DD 6E ........!...9..n
025880: 08 DD 66 09 11 03 00 19 5E 16 00 EB 11 03 00 B7 ..f.....^.......
025890: ED 52 C2 16 50 DD 6E 06 DD 66 07 11 03 00 19 5E .R..P.n..f.....^
0258A0: 16 00 EB 11 03 00 B7 ED 52 C2 16 50 DD 6E 0A 26 ........R..P.n.&
0258B0: 00 11 0A 00 EB B7 ED 52 FA 16 50 DD 6E 08 DD 66 .......R..P.n..f
0258C0: 09 DD 75 FE DD 74 FF DD 6E 0A 26 00 26 00 EB 21 ..u..t..n.&.&..!
0258D0: 00 00 B7 ED 52 C2 09 4D DD 6E 06 DD 66 07 11 08 ....R..M.n..f...
0258E0: 00 19 5E 23 56 EB E5 DD 6E 08 DD 66 09 11 08 00 ..^#V...n..f....
0258F0: 19 5E 23 56 EB D1 19 E5 DD 6E 08 DD 66 09 11 08 .^#V.....n..f...
025900: 6E 04 DD 66 05 FD 75 08 FD 74 09 2A DA 15 FD 75 n..f..u..t.*...u
025910: 00 FD 74 01 E1 22 A2 44 DD 6E FE DD 66 FF DD 75 ..t..".D.n..f..u
025920: 06 DD 74 07 DD F9 DD E1 E1 C1 E9 DD E5 DD 21 00 ..t...........!.
025930: 00 DD 39 DD 6E 04 DD 66 05 E5 21 10 00 E5 CD BE ..9.n..f..!.....
025940: 6C DD 6E 04 DD 66 05 5E 23 56 EB ED 5B A2 44 D5 l.n..f.^#V..[.D.
025950: 22 A2 44 E5 FD E1 DD 6E 06 DD 66 07 11 06 00 19 ".D....n..f.....
025960: 5E 23 56 FD 73 00 FD 72 01 21 00 00 FD 75 02 DD ^#V.s..r.!...u..
025970: 6E 06 DD 66 07 11 08 00 19 5E 16 00 EB 11 03 00 n..f.....^......
025980: B7 ED 52 C2 90 55 21 7E 00 E5 CD 15 78 C3 DD 55 ..R..U!~....x..U
025990: DD 6E 06 DD 66 07 11 08 00 19 5E 16 00 EB 11 00 .n..f.....^.....
0259A0: 00 B7 ED 52 C2 DD 55 21 03 00 FD 2A A2 44 FD 75 ...R..U!...*.D.u
0259B0: 03 DD 6E 06 DD 66 07 11 09 00 19 5E 23 56 FD 73 ..n..f.....^#V.s
0259C0: 04 FD 72 05 DD 6E 06 DD 66 07 11 0B 00 19 ED 5B ..r..n..f......[
0259D0: A2 44 01 08 00 EB 09 EB 01 08 00 ED B0 E1 22 A2 .D............".
0259E0: 44 DD E1 E1 C1 C1 E9 DD E5 DD 21 00 00 DD 39 E5 D.........!...9.
0259F0: DD E5 E1 01 FE FF 09 E5 21 10 00 E5 CD BE 6C DD ........!.....l.
025A00: 6E FE DD 66 FF ED 5B A2 44 D5 22 A2 44 E5 FD E1 n..f..[.D.".D...
025A10: 21 03 00 FD 75 03 21 D7 01 5E 23 56 FD 73 04 FD !...u.!..^#V.s..
025A20: 72 05 21 D7 01 11 05 00 19 ED 5B A2 44 01 08 00 r.!.......[.D...
025A30: EB 09 EB 01 08 00 ED B0 21 D7 01 11 02 00 19 5E ........!......^
025A40: 23 56 FD 73 00 FD 72 01 E1 22 A2 44 DD 6E FE DD #V.s..r..".D.n..
025A50: 66 FF DD 75 04 DD 74 05 DD F9 DD E1 C9 DD E5 DD f..u..t.........
025A60: 21 00 00 DD 39 21 FA FF 39 F9 DD 6E 04 DD 66 05 !...9!..9..n..f.
025A70: E5 DD E5 E1 01 FE FF 09 E5 CD 2B 55 E5 DD 6E 04 ..........+U..n.
025A80: DD 66 05 11 06 00 19 5E 23 56 EB E5 CD DA 52 D1 .f.....^#V....R.
025A90: DD 73 FC DD 72 FD DD 6E FE DD 66 FF DD 75 06 DD .s..r..n..f..u..
025AA0: 74 07 DD F9 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD t...........!...
025AB0: 39 CD 08 09 2A 7E 01 11 FF FF B7 ED 52 CA D2 56 9...*~......R..V
025AC0: E5 2A 7E 01 E5 CD 5D 56 D1 DD 73 04 DD 72 05 C3 .*~...]V..s..r..
025AD0: DB 56 21 FF FF DD 75 04 DD 74 05 DD E1 C9 DD E5 .V!...u..t......
025AE0: DD 21 00 00 DD 39 E5 E5 DD 6E 04 DD 66 05 11 08 .!...9...n..f...
025AF0: 00 CD 7A 6B 23 DD 75 FE DD 74 FF E5 DD 6E 04 DD ..zk#.u..t...n..
025B00: 00 19 D1 73 23 72 C3 13 50 21 01 00 B7 ED 52 C2 ...s#r..P!....R.
025B10: 45 4D DD 6E 06 DD 66 07 11 08 00 19 5E 23 56 EB EM.n..f.....^#V.
025B20: E5 DD 6E 08 DD 66 09 11 08 00 19 5E 23 56 EB D1 ..n..f.....^#V..
025B30: B7 ED 52 E5 DD 6E 08 DD 66 09 11 08 00 19 D1 73 ..R..n..f......s
025B40: 23 72 C3 13 50 21 02 00 B7 ED 52 C2 81 4D DD 6E #r..P!....R..M.n
025B50: 06 DD 66 07 11 08 00 19 5E 23 56 EB E5 DD 6E 08 ..f.....^#V...n.
025B60: DD 66 09 11 08 00 19 5E 23 56 EB D1 CD 3F 6B E5 .f.....^#V...?k.
025B70: DD 6E 08 DD 66 09 11 08 00 19 D1 73 23 72 C3 13 .n..f......s#r..
025B80: 50 21 03 00 B7 ED 52 C2 DE 4D DD 6E 06 DD 66 07 P!....R..M.n..f.
025B90: 11 08 00 19 5E 23 56 EB 11 00 00 B7 ED 52 C2 AB ....^#V......R..
025BA0: 4D 21 78 00 E5 CD 15 78 C3 DB 4D DD 6E 06 DD 66 M!x....x..M.n..f
025BB0: 07 11 08 00 19 5E 23 56 EB E5 DD 6E 08 DD 66 09 .....^#V...n..f.
025BC0: 11 08 00 19 5E 23 56 EB D1 CD 7A 6B E5 DD 6E 08 ....^#V...zk..n.
025BD0: DD 66 09 11 08 00 19 D1 73 23 72 C3 13 50 21 04 .f......s#r..P!.
025BE0: 00 B7 ED 52 C2 3B 4E DD 6E 06 DD 66 07 11 08 00 ...R.;N.n..f....
025BF0: 19 5E 23 56 EB 11 00 00 B7 ED 52 C2 08 4E 21 78 .^#V......R..N!x
025C00: 00 E5 CD 15 78 C3 38 4E DD 6E 06 DD 66 07 11 08 ....x.8N.n..f...
025C10: 00 19 5E 23 56 EB E5 DD 6E 08 DD 66 09 11 08 00 ..^#V...n..f....
025C20: 19 5E 23 56 EB D1 CD B0 6B E5 DD 6E 08 DD 66 09 .^#V....k..n..f.
025C30: 11 08 00 19 D1 73 23 72 C3 13 50 21 05 00 B7 ED .....s#r..P!....
025C40: 52 C2 87 4E DD 6E 08 DD 66 09 11 08 00 19 EB 21 R..N.n..f......!
025C50: F8 FF 39 F9 EB 01 08 00 ED B0 DD 6E 06 DD 66 07 ..9........n..f.
025C60: 11 08 00 19 EB 21 F8 FF 39 F9 EB 01 08 00 ED B0 .....!..9.......
025C70: CD 71 66 DD 6E 08 DD 66 09 11 08 00 19 EB 01 08 .qf.n..f........
025C80: 00 CD AA 6C C3 13 50 21 06 00 B7 ED 52 C2 D3 4E ...l..P!....R..N
025C90: DD 6E 08 DD 66 09 11 08 00 19 EB 21 F8 FF 39 F9 .n..f......!..9.
025CA0: EB 01 08 00 ED B0 DD 6E 06 DD 66 07 11 08 00 19 .......n..f.....
025CB0: EB 21 F8 FF 39 F9 EB 01 08 00 ED B0 CD 69 66 DD .!..9........if.
025CC0: 6E 08 DD 66 09 11 08 00 19 EB 01 08 00 CD AA 6C n..f...........l
025CD0: C3 13 50 21 08 00 B7 ED 52 C2 53 4F DD 6E 06 DD ..P!....R.SO.n..
025CE0: 66 07 11 08 00 19 EB 21 F8 FF 39 F9 EB 01 08 00 f......!..9.....
025CF0: ED B0 11 38 66 21 F8 FF 39 F9 EB 01 08 00 ED B0 ...8f!..9.......
025D00: 66 05 E5 21 07 00 E5 CD 3D 6C D1 DD 73 FC DD 72 f..!....=l..s..r
025D10: FD 21 B4 44 DD 5E FC DD 56 FD 19 5E 16 00 EB E5 .!.D.^..V..^....
025D20: 2A A0 44 01 6D FF 09 DD 5E FE DD 56 FF 19 5E 16 *.D.m...^..V..^.
025D30: 00 EB D1 19 E5 2A A0 44 01 6D FF 09 DD 5E FE DD .....*.D.m...^..
025D40: 56 FF 19 D1 73 DD F9 DD E1 E1 C1 E9 E5 CD 1B 63 V...s..........c
025D50: D1 FD 2A A0 44 FD 73 F0 FD 72 F1 FD 6E F0 FD 66 ..*.D.s..r..n..f
025D60: F1 ED 5B A4 44 D5 22 A4 44 E5 FD E1 E5 FD 2A A0 ..[.D.".D.....*.
025D70: 44 FD 6E F6 FD 66 F7 E5 FD 2A A4 44 FD 6E 00 FD D.n..f...*.D.n..
025D80: 66 01 E5 CD 97 49 E1 CB 0D DA 96 57 21 12 00 E5 f....I.....W!...
025D90: CD 15 78 C3 75 58 FD 2A A4 44 FD 6E 03 26 00 11 ..x.uX.*.D.n.&..
025DA0: 03 00 B7 ED 52 C2 36 58 FD 6E 08 FD 66 09 FD 2A ....R.6X.n..f..*
025DB0: A0 44 FD 5E F8 FD 56 F9 B7 ED 52 FA D4 57 FD 6E .D.^..V...R..W.n
025DC0: FA FD 66 FB FD 2A A4 44 FD 5E 08 FD 56 09 B7 ED ..f..*.D.^..V...
025DD0: 52 F2 F2 57 21 81 00 E5 CD 15 78 FD 2A A0 44 FD R..W!.....x.*.D.
025DE0: 6E F8 FD 66 F9 FD 2A A4 44 FD 75 08 FD 74 09 C3 n..f..*.D.u..t..
025DF0: 33 58 FD 2A A4 44 FD 6E 08 FD 66 09 FD 2A A0 44 3X.*.D.n..f..*.D
025E00: FD 5E F8 FD 56 F9 B7 ED 52 FD 2A A4 44 FD 75 08 .^..V...R.*.D.u.
025E10: FD 74 09 FD 6E 08 FD 66 09 11 FF 03 EB B7 ED 52 .t..n..f.......R
025E20: F2 33 58 21 00 00 FD 75 08 FD 74 09 21 82 00 E5 .3X!...u..t.!...
025E30: CD 15 78 C3 75 58 FD 2A A0 44 FD 6E F8 FD 66 F9 ..x.uX.*.D.n..f.
025E40: 11 00 00 B7 ED 52 CA 75 58 E5 21 01 00 E5 FD 6E .....R.uX.!....n
025E50: F0 FD 66 F1 E5 FD 6E F4 FD 66 F5 E5 FD 2A A4 44 ..f...n..f...*.D
025E60: FD 6E 00 FD 66 01 E5 CD 75 4C D1 FD 2A A0 44 FD .n..f...uL..*.D.
025E70: 73 F0 FD 72 F1 E1 22 A4 44 C9 DD E5 DD 21 00 00 s..r..".D....!..
025E80: DD 39 E5 21 15 00 E5 FD 2A A0 44 FD 6E F2 FD 66 .9.!....*.D.n..f
025E90: F3 E5 DD 6E 04 DD 66 05 E5 FD 6E 06 FD 66 07 E5 ...n..f...n..f..
025EA0: CD 75 4C D1 FD 2A A0 44 FD 73 F2 FD 72 F3 01 67 .uL..*.D.s..r..g
025EB0: FF FD 09 FD 6E 00 FD 66 01 11 FF FF B7 ED 52 C2 ....n..f......R.
025EC0: D8 58 01 8B 00 FD 09 FD 6E 00 FD 66 01 01 75 FF .X......n..f..u.
025ED0: FD 09 FD 75 00 FD 74 01 DD E1 E1 C1 E9 DD E5 2A ...u..t........*
025EE0: A0 44 E5 ED 73 A0 44 DD 2A A0 44 21 67 FF 39 F9 .D..s.D.*.D!g.9.
025EF0: 21 FF FF DD 75 F2 DD 74 F3 21 FF FF DD E5 FD E1 !...u..t.!......
025F00: CD 1A 6A C2 10 4F 21 78 00 E5 CD 15 78 C3 50 4F ..j..O!x....x.PO
025F10: DD 6E 08 DD 66 09 11 08 00 19 EB 21 F8 FF 39 F9 .n..f......!..9.
025F20: EB 01 08 00 ED B0 DD 6E 06 DD 66 07 11 08 00 19 .......n..f.....
025F30: EB 21 F8 FF 39 F9 EB 01 08 00 ED B0 CD FE 67 DD .!..9.........g.
025F40: 6E 08 DD 66 09 11 08 00 19 EB 01 08 00 CD AA 6C n..f...........l
025F50: C3 13 50 21 07 00 B7 ED 52 C2 9F 4F DD 6E 08 DD ..P!....R..O.n..
025F60: 66 09 11 08 00 19 EB 21 F8 FF 39 F9 EB 01 08 00 f......!..9.....
025F70: ED B0 DD 6E 06 DD 66 07 11 08 00 19 EB 21 F8 FF ...n..f......!..
025F80: 39 F9 EB 01 08 00 ED B0 CD 21 67 DD 6E 08 DD 66 9........!g.n..f
025F90: 09 11 08 00 19 EB 01 08 00 CD AA 6C C3 13 50 21 ...........l..P!
025FA0: 0A 00 B7 ED 52 C2 D9 4F DD 6E 06 DD 66 07 11 08 ....R..O.n..f...
025FB0: 00 19 5E 16 00 EB E5 DD 6E 08 DD 66 09 11 08 00 ..^.....n..f....
025FC0: 19 5E 16 00 EB D1 7D B3 6F E5 DD 6E 08 DD 66 09 .^....}.o..n..f.
025FD0: 11 08 00 19 D1 73 C3 13 50 21 09 00 B7 ED 52 C2 .....s..P!....R.
025FE0: 13 50 DD 6E 06 DD 66 07 11 08 00 19 5E 16 00 EB .P.n..f.....^...
025FF0: E5 DD 6E 08 DD 66 09 11 08 00 19 5E 16 00 EB D1 ..n..f.....^....
026000: 7D A3 6F E5 DD 6E 08 DD 66 09 11 08 00 19 D1 73 }£o..n..f......s
026010: C3 13 50 C3 72 50 DD E5 E1 01 FE FF 09 E5 21 10 ..P.rP........!.
026020: 00 E5 CD BE 6C DD 6E FE DD 66 FF ED 5B A2 44 D5 ....l.n..f..[.D.
026030: 22 A2 44 E5 FD E1 DD 6E 04 DD 66 05 FD 75 00 FD ".D....n..f..u..
026040: 74 01 21 00 00 FD 75 03 DD 6E 0A 26 00 FD 75 04 t.!...u..n.&..u.
026050: DD 6E 08 DD 66 09 FD 75 05 FD 74 06 DD 6E 06 DD .n..f..u..t..n..
026060: 66 07 FD 75 07 FD 74 08 21 00 00 FD 75 02 E1 22 f..u..t.!...u.."
026070: A2 44 DD 6E FE DD 66 FF DD 75 0C DD 74 0D DD F9 .D.n..f..u..t...
026080: DD E1 D1 21 08 00 39 F9 EB E9 DD E5 DD 21 00 00 ...!..9......!..
026090: DD 39 E5 DD 6E 06 DD 66 07 11 03 00 19 5E 16 00 .9..n..f.....^..
0260A0: EB 11 03 00 B7 ED 52 C2 8F 51 DD 6E 08 26 00 11 ......R..Q.n.&..
0260B0: 02 00 EB B7 ED 52 FA 8F 51 DD 6E 06 DD 66 07 DD .....R..Q.n..f..
0260C0: 75 FE DD 74 FF DD 6E 06 DD 66 07 ED 5B A2 44 D5 u..t..n..f..[.D.
0260D0: 22 A2 44 E5 FD E1 DD 6E 08 26 00 26 00 EB 21 00 ".D....n.&.&..!.
0260E0: 00 B7 ED 52 C2 37 51 FD 6E 08 FD 66 09 CD E6 6B ...R.7Q.n..f...k
0260F0: FD 75 08 FD 74 09 FD 6E 00 FD 66 01 11 0B 00 19 .u..t..n..f.....
026100: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
026110: 20 00 00 00 02 09 4E E5 20 00 41 02 00 00 00 02 .....N. .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: 01 67 FF FD 09 FD 75 00 FD 74 01 DD 6E 06 DD 66 .g....u..t..n..f
026210: 07 ED 5B A2 44 D5 22 A2 44 E5 FD E1 FD 6E 0B 26 ..[.D.".D....n.&
026220: 00 11 09 00 B7 ED 52 CA 34 59 21 1E 00 E5 CD 15 ......R.4Y!.....
026230: 78 C3 95 5B FD 2A A2 44 FD 6E 0C FD 66 0D DD 75 x..[.*.D.n..f..u
026240: F6 DD 74 F7 DD 6E F6 DD 66 F7 11 0C 00 19 5E 23 ..t..n..f.....^#
026250: 56 DD 73 F8 DD 72 F9 DD 6E F6 DD 66 F7 11 0E 00 V.s..r..n..f....
026260: 19 5E 23 56 DD 73 FA DD 72 FB DD 6E F8 DD 66 F9 .^#V.s..r..n..f.
026270: 11 00 00 B7 ED 52 CA 8B 59 E5 DD 6E F8 DD 66 F9 .....R..Y..n..f.
026280: E5 CD C7 54 D1 DD 73 F4 DD 72 F5 FD 2A A2 44 FD ...T..s..r..*.D.
026290: 6E 09 FD 66 0A 11 80 00 EB B7 ED 52 FA CE 59 21 n..f.......R..Y!
0262A0: 80 00 11 01 00 B7 ED 52 FA CE 59 D5 E5 DD 73 FE .......R..Y...s.
0262B0: DD 72 FF DD E5 E1 01 6D FF 09 DD 5E FE DD 56 FF .r.....m...^..V.
0262C0: 19 11 00 00 73 E1 D1 13 2B CB 7C CA AB 59 CD 0D ....s...+.|..Y..
0262D0: 70 2A 87 01 26 00 11 01 00 B7 ED 52 CA FB 59 2A p*..&......R..Y*
0262E0: 87 01 26 00 11 02 00 B7 ED 52 CA FB 59 2A 87 01 ..&......R..Y*..
0262F0: 26 00 11 03 00 B7 ED 52 C2 FD 5A CD 4C 57 2A 87 &......R..Z.LW*.
026300: 01 26 00 11 18 00 B7 ED 52 C2 B3 5A CD 0D 70 DD .&......R..Z..p.
026310: 6E F0 DD 66 F1 DD 75 EE DD 74 EF CD 4C 57 DD 6E n..f..u..t..LW.n
026320: F0 DD 66 F1 11 03 00 19 5E 16 00 EB 11 03 00 B7 ..f.....^.......
026330: ED 52 C2 8E 5A DD 6E EE DD 66 EF 11 03 00 19 5E .R..Z.n..f.....^
026340: 16 00 EB 11 03 00 B7 ED 52 C2 8E 5A DD 6E EE DD ........R..Z.n..
026350: 66 EF 11 08 00 19 5E 23 56 EB E5 DD 6E F0 DD 66 f.....^#V...n..f
026360: F1 11 08 00 19 5E 23 56 EB D1 B7 ED 52 FA 8B 5A .....^#V....R..Z
026370: D5 E5 DD 73 FE DD 72 FF DD 6E FE DD 66 FF E5 CD ...s..r..n..f...
026380: DE 56 E1 D1 13 2B CB 7C CA 70 5A C3 B0 5A E5 21 .V...+.|.pZ..Z.!
026390: 14 00 E5 DD 6E F0 DD 66 F1 E5 DD 6E EE DD 66 EF ....n..f...n..f.
0263A0: E5 DD 6E 06 DD 66 07 E5 CD 75 4C E1 E5 CD 7A 58 ..n..f...uL...zX
0263B0: C3 E9 5A DD 6E F0 DD 66 F1 11 03 00 19 5E 16 00 ..Z.n..f.....^..
0263C0: EB 11 03 00 B7 ED 52 C2 DF 5A DD 6E F0 DD 66 F1 ......R..Z.n..f.
0263D0: 11 08 00 19 5E 23 56 EB E5 CD DE 56 C3 E9 5A DD ....^#V....V..Z.
0263E0: 6E F0 DD 66 F1 E5 CD 7A 58 2A 87 01 26 00 11 08 n..f...zX*..&...
0263F0: 00 B7 ED 52 C2 FA 5A CD 0D 70 C3 D1 59 DD E5 E1 ...R..Z..p..Y...
026400: 11 00 00 73 FD 6E 05 FD 66 06 DD 75 06 DD 74 07 ...s.n..f..u..t.
026410: E1 22 A4 44 DD F9 DD E1 E1 C1 E9 DD E5 2A A0 44 .".D.........*.D
026420: E5 ED 73 A0 44 DD 2A A0 44 21 F6 FF 39 F9 E5 CD ..s.D.*.D!..9...
026430: A3 5C D1 DD 73 FC DD 72 FD 2A 87 01 26 00 11 2F £\..s..r.*..&../
026440: 00 B7 ED 52 CA 64 63 2A 87 01 26 00 11 0F 00 B7 ...R.dc*..&.....
026450: ED 52 FA 1E 66 2A 87 01 26 00 11 14 00 EB B7 ED .R..f*..&.......
026460: 52 FA 1E 66 2A 87 01 26 00 DD 75 FB CD 0D 70 E5 R..f*..&..u...p.
026470: CD A3 5C D1 DD 73 FE DD 72 FF DD 6E FC DD 66 FD .£\..s..r..n..f.
026480: DD 75 F7 DD 74 F8 DD 6E FC DD 66 FD 5E 23 56 DD .u..t..n..f.^#V.
026490: 73 F9 DD 72 FA DD 6E FB 26 00 11 2F 00 B7 ED 52 s..r..n.&../...R
0264A0: C2 F2 63 E5 DD 6E F9 DD 66 FA E5 DD 6E FE DD 66 ..c..n..f...n..f
0264B0: FF 5E 23 56 EB 11 0C 00 19 5E 23 56 EB E5 CD 4A .^#V.....^#V...J
0264C0: 47 E1 CB 0D DA CE 63 21 26 00 E5 CD 15 78 E5 21 G.....c!&....x.!
0264D0: 13 00 E5 DD 6E FC DD 66 FD E5 DD 6E FE DD 66 FF ....n..f...n..f.
0264E0: E5 2A DE 15 E5 CD 75 4C D1 DD 73 FC DD 72 FD C3 .*....uL..s..r..
0264F0: 1B 66 21 15 00 DD 75 F6 DD 6E F9 DD 66 FA ED 5B .f!...u..n..f..[
026500: A2 44 D5 22 A2 44 E5 FD E1 E5 DD 6E F9 DD 66 FA .D.".D.....n..f.
026510: E5 CD 01 52 E1 CB 0D DA 2C 64 FD 2A A2 44 FD 6E ...R....,d.*.D.n
026520: 0B 26 00 11 01 00 B7 ED 52 C2 5D 64 E5 DD 6E FC .&......R.]d..n.
026530: DD 66 FD E5 DD 6E FE DD 66 FF E5 21 0C 00 E5 21 .f...n..f..!...!
026540: 0F 00 E5 CD EC 53 D1 DD 73 FC DD 72 FD DD 6E FC .....S..s..r..n.
026550: DD 66 FD ED 5B DE 15 73 23 72 C3 05 65 FD 2A A2 .f..[..s#r..e.*.
026560: 44 FD 6E 0B 26 00 11 08 00 B7 ED 52 CA 8B 64 FD D.n.&......R..d.
026570: 6E 0B 26 00 11 0B 00 B7 ED 52 CA 8B 64 FD 6E 0B n.&......R..d.n.
026580: 26 00 11 10 00 B7 ED 52 C2 BA 64 DD 6E FB 26 00 &......R..d.n.&.
026590: 11 10 00 B7 ED 52 CA A7 64 DD 6E FB 26 00 11 14 .....R..d.n.&...
0265A0: 00 B7 ED 52 C2 B0 64 21 0C 00 DD 75 F6 C3 B7 64 ...R..d!...u...d
0265B0: 21 27 00 E5 CD 15 78 C3 05 65 FD 2A A2 44 FD 6E !'....x..e.*.D.n
0265C0: 0B 26 00 11 04 00 B7 ED 52 CA DA 64 FD 6E 0B 26 .&......R..d.n.&
0265D0: 00 11 0A 00 B7 ED 52 C2 E3 64 21 0D 00 DD 75 F6 ......R..d!...u.
0265E0: C3 05 65 FD 2A A2 44 FD 6E 0B 26 00 11 09 00 B7 ..e.*.D.n.&.....
0265F0: ED 52 C2 FE 64 21 0E 00 DD 75 F6 C3 05 65 21 28 .R..d!...u...e!(
026600: 01 69 FF 09 11 D7 01 01 85 00 ED B0 21 D7 01 11 .i..........!...
026610: 02 00 19 DD 5E 06 DD 56 07 73 23 72 21 D7 01 11 ....^..V.s#r!...
026620: 04 00 19 FD 2A A2 44 FD 5E 09 16 00 73 CD 3D 03 ....*.D.^...s.=.
026630: E5 CD E7 55 D1 DD 73 F0 DD 72 F1 DD E5 FD E1 01 ...U..s..r......
026640: 67 FF FD 09 FD 6E 00 FD 66 01 11 FF FF B7 ED 52 g....n..f......R
026650: C2 62 5B DD 6E F0 DD 66 F1 DD 75 F2 DD 74 F3 C3 .b[.n..f..u..t..
026660: 7E 5B DD E5 FD E1 01 67 FF FD 09 FD 6E 00 FD 66 ~[.....g....n..f
026670: 01 11 05 00 19 DD 5E F0 DD 56 F1 73 23 72 21 1B ......^..V.s#r!.
026680: 00 E5 21 15 00 E5 CD 37 0B DD 6E F2 DD 66 F3 DD ..!....7..n..f..
026690: 75 08 DD 74 09 E1 22 A2 44 ED 7B A0 44 E1 22 A0 u..t..".D.{.D.".
0266A0: 44 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 DD 6E D........!...9.n
0266B0: 04 DD 66 05 5E 23 56 EB ED 5B DE 15 B7 ED 52 CA ..f.^#V..[....R.
0266C0: C9 5B 21 1D 00 E5 CD 15 78 DD E1 E1 C1 E9 DD E5 .[!.....x.......
0266D0: DD 21 00 00 DD 39 DD 6E 04 DD 66 05 5E 23 56 EB .!...9.n..f.^#V.
0266E0: 11 0B 00 19 5E 16 00 EB 11 09 00 B7 ED 52 C2 1E ....^........R..
0266F0: 5C E5 DD 6E 0C 26 00 E5 DD 6E 06 DD 66 07 E5 DD \..n.&...n..f...
026700: 6E 04 DD 66 05 E5 DD 6E 04 DD 66 05 5E 23 56 EB n..f...n..f.^#V.
026710: E5 CD 75 4C D1 DD 73 0E DD 72 0F C3 43 5C E5 DD ..uL..s..r..C\..
026720: 6E 06 DD 66 07 E5 DD 6E 04 DD 66 05 E5 DD 6E 0A n..f...n..f...n.
026730: 26 00 E5 DD 6E 08 26 00 E5 CD EC 53 D1 DD 73 0E &...n.&....S..s.
026740: DD 72 0F DD E1 D1 21 0A 00 39 F9 EB E9 DD E5 DD .r....!..9......
026750: 21 00 00 DD 39 2A DE 15 FD 2A A0 44 FD 75 F9 FD !...9*...*.D.u..
026760: 74 FA DD 6E 06 DD 66 07 E5 CD A6 5B DD 6E 04 DD t..n..f....[.n..
026770: 66 05 E5 CD A6 5B E5 DD 6E 08 26 00 E5 DD 6E 06 f....[..n.&...n.
026780: DD 66 07 E5 DD 6E 04 DD 66 05 E5 2A DE 15 E5 CD .f...n..f..*....
026790: 75 4C D1 DD 73 0A DD 72 0B DD E1 D1 21 06 00 39 uL..s..r....!..9
0267A0: F9 EB E9 DD E5 DD 21 00 00 DD 39 21 F9 FF 39 F9 ......!...9!..9.
0267B0: 2A 87 01 26 00 11 09 00 B7 ED 52 C2 39 5D CD 0D *..&......R.9]..
0267C0: 70 E5 CD F8 5F D1 DD 73 FE DD 72 FF DD 6E FE DD p..._..s..r..n..
0267D0: 66 FF 5E 23 56 EB ED 5B E0 15 B7 ED 52 C2 FD 5C f.^#V..[....R..\
0267E0: E5 21 01 00 E5 DD 6E FE DD 66 FF E5 2A E0 15 E5 .!....n..f..*...
0267F0: CD 8A 50 D1 DD 73 FE DD 72 FF C3 36 5D E5 DD 6E ..P..s..r..6]..n
026800: 00 E5 CD 15 78 E1 22 A2 44 DD 6E F6 26 00 11 15 ....x.".D.n.&...
026810: 00 B7 ED 52 CA 3A 65 E5 DD 6E F6 26 00 E5 DD 6E ...R.:e..n.&...n
026820: FC DD 66 FD E5 DD 6E FE DD 66 FF E5 2A DE 15 E5 ..f...n..f..*...
026830: CD 75 4C D1 DD 73 FC DD 72 FD E5 DD 6E F7 DD 66 .uL..s..r...n..f
026840: F8 5E 23 56 EB E5 DD 6E FE DD 66 FF 5E 23 56 EB .^#V...n..f.^#V.
026850: E5 CD 4A 47 E1 CB 0D DA 61 65 21 26 00 E5 CD 15 ..JG....ae!&....
026860: 78 DD 6E FC DD 66 FD 11 02 00 19 11 01 00 73 DD x.n..f........s.
026870: 6E FC DD 66 FD ED 5B A2 44 D5 22 A2 44 E5 FD E1 n..f..[.D.".D...
026880: 21 0F 00 DD 5E FB 16 00 2B B7 ED 52 F2 AA 65 D5 !...^...+..R..e.
026890: E5 DD 73 FB FD 2A A2 44 FD 6E 02 26 00 23 FD 75 ..s..*.D.n.&.#.u
0268A0: 02 E1 D1 1B 23 CB 7C C2 8F 65 FD 2A A2 44 FD 6E ....#.|..e.*.D.n
0268B0: 05 FD 66 06 11 03 00 19 5E 16 00 EB 11 03 00 B7 ..f.....^.......
0268C0: ED 52 C2 17 66 FD 6E 07 FD 66 08 11 03 00 19 5E .R..f.n..f.....^
0268D0: 16 00 EB 11 03 00 B7 ED 52 C2 17 66 E5 DD 6E FC ........R..f..n.
0268E0: DD 66 FD 5E 23 56 EB E5 CD 01 52 E1 CB 0D DA 05 .f.^#V....R.....
0268F0: 66 DD 6E FC DD 66 FD 5E 23 56 EB ED 5B E0 15 B7 f.n..f.^#V..[...
026900: ED 52 C2 17 66 E5 DD 6E FC DD 66 FD E5 CD 6F 61 .R..f..n..f...oa
026910: D1 DD 73 FC DD 72 FD E1 22 A2 44 C3 39 63 DD 6E ..s..r..".D.9c.n
026920: FC DD 66 FD DD 75 06 DD 74 07 ED 7B A0 44 E1 22 ..f..u..t..{.D."
026930: A0 44 DD E1 C9 C3 00 00 00 00 00 00 00 00 00 00 .D..............
026940: 21 09 00 39 06 06 7E ED 44 77 2B C2 62 66 10 F6 !..9..~.Dw+.bf..
026950: 7E ED 44 77 FE 80 C0 06 07 2B 34 AF 23 ED 67 10 ~.Dw.....+4.#.g.
026960: FB C9 7E 2F 77 2B 10 FA C9 D1 CD 40 66 D5 C3 71 ..~/w+.....@f..q
026970: 66 FD 21 02 00 FD 39 FD 7E 00 FD 96 08 CA 99 66 f.!...9.~......f
026980: DA 94 66 11 08 00 FD 19 CD CA 69 FD 7E F8 FD 77 ..f.......i.~..w
026990: 00 C3 9E 66 ED 44 CD CA 69 11 08 00 FD 19 06 07 ...f.D..i.......
0269A0: B7 FD 2B FD 7E 00 FD 4E 08 89 FD 77 08 10 F2 5F ..+.~..N...w..._
0269B0: FD 7E 00 A9 E6 80 C2 E7 66 7B A9 E6 80 CA E7 66 .~......f{.....f
0269C0: FD 7E 08 EE 80 FD 77 08 3E 01 11 07 00 FD 19 CD .~....w.>.......
0269D0: CA 69 FD 7E 00 3C FD 77 00 FD 7E 01 EE 08 FD 77 .i.~.<.w..~....w
0269E0: 01 CD 7C 69 C3 E8 6A 11 07 00 FD 19 CD 7C 69 C3 ..|i..j......|i.
0269F0: E8 6A D1 E1 01 00 00 7D FE 00 C2 09 67 7C FE 00 .j.....}....g|..
026A00: FE DD 66 FF 5E 23 56 EB E5 CD 2F 53 E1 CB 0D D2 ..f.^#V.../S....
026A10: 2F 5D E5 21 00 00 E5 DD 6E FE DD 66 FF E5 2A DA /].!....n..f..*.
026A20: 15 E5 CD 8A 50 D1 DD 73 FE DD 72 FF C3 36 5D 21 ....P..s..r..6]!
026A30: 20 00 E5 CD 15 78 C3 55 5D 2A 87 01 26 00 11 07 ....x.U]*..&...
026A40: 00 B7 ED 52 C2 4A 5D CD 0D 70 E5 CD F8 5F D1 DD ...R.J]..p..._..
026A50: 73 FE DD 72 FF 2A 87 01 26 00 11 07 00 B7 ED 52 s..r.*..&......R
026A60: CA 7F 5D 2A 87 01 26 00 11 09 00 B7 ED 52 CA 7F ..]*..&......R..
026A70: 5D 2A 87 01 26 00 11 35 00 B7 ED 52 C2 21 5E 2A ]*..&..5...R.!^*
026A80: 87 01 26 00 DD 75 FB CD 0D 70 E5 CD F8 5F D1 DD ..&..u...p..._..
026A90: 73 FC DD 72 FD DD 6E FB 26 00 11 35 00 B7 ED 52 s..r..n.&..5...R
026AA0: C2 C3 5D E5 21 0A 00 E5 DD 6E FE DD 66 FF E5 DD ..].!....n..f...
026AB0: 6E FC DD 66 FD E5 CD 4D 5C D1 DD 73 FE DD 72 FF n..f...M\..s..r.
026AC0: C3 1E 5E 2A 87 01 26 00 11 07 00 B7 ED 52 C2 F9 ..^*..&......R..
026AD0: 5D E5 21 10 00 E5 21 00 00 E5 21 05 00 E5 DD 6E ].!...!...!....n
026AE0: FE DD 66 FF E5 DD 6E FC DD 66 FD E5 CD CE 5B D1 ..f...n..f....[.
026AF0: DD 73 FE DD 72 FF C3 1E 5E E5 21 12 00 E5 21 01 .s..r...^.!...!.
026B00: 00 E5 21 06 00 E5 DD 6E FE DD 66 FF E5 DD 6E FC ..!....n..f...n.
026B10: DD 66 FD E5 CD CE 5B D1 DD 73 FE DD 72 FF C3 55 .f....[..s..r..U
026B20: 5D DD 6E FE DD 66 FF DD 75 04 DD 74 05 DD F9 DD ].n..f..u..t....
026B30: E1 C9 DD E5 DD 21 00 00 DD 39 21 FB FF 39 F9 2A .....!...9!..9.*
026B40: 87 01 26 00 DD 75 FD 2A 87 01 26 00 11 33 00 B7 ..&..u.*..&..3..
026B50: ED 52 C2 58 5E CD 0D 70 2A 87 01 26 00 11 1A 00 .R.X^..p*..&....
026B60: B7 ED 52 C2 78 5E E5 2A E6 15 E5 CD DD 58 D1 DD ..R.x^.*.....X..
026B70: 73 FE DD 72 FF C3 23 5F 2A 87 01 26 00 11 02 00 s..r..#_*..&....
026B80: B7 ED 52 CA 94 5E 2A 87 01 26 00 11 03 00 B7 ED ..R..^*..&......
026B90: 52 C2 A5 5E E5 CD E7 55 D1 DD 73 FE DD 72 FF CD R..^...U..s..r..
026BA0: 0D 70 C3 23 5F 2A 87 01 26 00 11 04 00 B7 ED 52 .p.#_*..&......R
026BB0: C2 CF 5E CD 0D 70 E5 CD 1B 63 D1 DD 73 FE DD 72 ..^..p...c..s..r
026BC0: FF 21 05 00 E5 21 21 00 E5 CD 37 0B C3 23 5F 2A .!...!!...7..#_*
026BD0: 87 01 26 00 11 01 00 B7 ED 52 C2 1C 5F CD 08 09 ..&......R.._...
026BE0: 2A 7E 01 11 FF FF B7 ED 52 CA 19 5F 2A 7E 01 11 *~......R.._*~..
026BF0: 08 00 19 5E 16 00 EB 11 00 00 B7 ED 52 C2 12 5F ...^........R.._
026C00: C2 09 67 C5 C5 C5 C5 D5 C9 C5 C5 CB 2C CB 1D CB ..g.........,...
026C10: 18 4D C5 44 0E 84 C5 FD 21 00 00 FD 39 D5 C3 7C .M.D....!...9..|
026C20: 69 21 E4 67 AF 32 E3 67 CD BC 6A CD BC 6A CD BC i!.g.2.g..j..j..
026C30: 6A 77 23 77 CD C4 6A 21 03 00 39 11 F5 67 01 07 jw#w..j!..9..g..
026C40: 00 ED B0 06 08 0E 80 21 0B 00 39 C5 06 07 11 EC .......!..9.....
026C50: 67 79 A6 CA 74 67 D5 C5 E5 21 FC 67 06 08 B7 1A gy..tg...!.g....
026C60: 8E 12 1B 2B 10 F9 D2 71 67 1A CE 00 12 1B DA 69 ...+...qg......i
026C70: 67 E1 C1 D1 23 13 10 D9 21 F5 67 06 08 B7 CB 1E g...#...!.g.....
026C80: 23 10 FB C1 CB 39 10 BF FD 21 02 00 FD 39 FD 7E #....9...!...9.~
026C90: 00 D6 80 DA A2 67 FD 86 08 D2 B2 67 11 00 6B C3 .....g.....g..k.
026CA0: F1 6A FD 86 08 DA B2 67 21 0A 00 39 CD BC 6A C3 .j.....g!..9..j.
026CB0: E8 6A C6 04 32 E2 67 FD 21 E2 67 06 10 11 0B 00 .j..2.g.!.g.....
026CC0: CD 81 69 21 E2 67 3A E1 67 21 E9 67 FE 00 C4 44 ..i!.g:.g!.g...D
026CD0: 66 21 0A 00 39 EB 21 E2 67 01 08 00 ED B0 C3 E8 f!..9.!.g.......
026CE0: 6A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 j...............
026CF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 21 02 ..............!.
026D00: 00 39 7E B7 CA EE 6A 21 EC 67 CD BC 6A CD BC 6A .9~...j!.g..j..j
026D10: 77 23 77 3C 32 07 69 CD C4 6A 21 0A 00 39 7E 32 w#w<2.i..j!..9~2
026D20: E2 67 AF 77 23 11 E5 67 01 07 00 ED B0 3E 80 12 .g.w#..g.....>..
026D30: C1 21 C8 FF 39 F9 C5 21 3A 00 39 7E 32 E3 67 23 .!..9..!:.9~2.g#
026D40: 06 07 11 F8 FF EB 19 C5 E5 06 08 B7 1A CB 1F 77 ...............w
026D50: 23 13 10 F8 E1 C1 10 EA 21 EC 67 22 04 69 3E 08 #.......!.g".i>.
026D60: 32 06 69 06 40 FD 21 42 00 FD 39 0E 00 21 F4 67 2.i.@.!B..9..!.g
026D70: CD 2E 69 DA 7A 68 0C C3 70 68 CB 21 CB 21 CB 21 ..i.zh..ph.!.!.!
026D80: 71 0E 08 C3 A7 68 CB 39 DC 00 69 CD 2E 69 DA A7 q....h.9..i..i..
026D90: 68 7E B1 77 CD 55 69 10 ED C3 AC 68 CB 39 DC 00 h~.w.Ui....h.9..
026DA0: 69 CD 08 69 DA 91 68 CD 55 69 10 F0 21 E2 67 7E i..i..h.Ui..!.g~
026DB0: 23 96 CB 13 C6 81 32 F3 67 17 AB 1F D2 CA 68 CB #.....2.g.....h.
026DC0: 1B DA F1 68 11 00 6B DA F1 6A 3A E1 67 21 FA 67 ...h..k..j:.g!.g
026DD0: FE 00 C4 44 66 FD 21 F3 67 06 12 11 09 00 CD 81 ...Df.!.g.......
026DE0: 69 11 F3 67 21 42 00 39 EB 01 08 00 ED B0 C3 F8 i..g!B.9........
026DF0: 68 21 42 00 39 CD BC 6A 21 40 00 C1 39 F9 C5 C9 h!B.9..j!@..9...
026E00: 2A 7E 01 E5 DD E5 E1 01 FE FF 09 E5 CD 2B 55 C3 *~...........+U.
026E10: 19 5F 21 22 00 E5 CD 15 78 C3 23 5F 21 23 00 E5 ._!"....x.#_!#..
026E20: CD 15 78 DD 6E FD 26 00 11 33 00 B7 ED 52 C2 4B ..x.n.&..3...R.K
026E30: 5F E5 21 02 00 E5 DD 6E FE DD 66 FF E5 2A DE 15 _.!....n..f..*..
026E40: E5 CD 8A 50 D1 DD 73 FE DD 72 FF DD 6E FE DD 66 ...P..s..r..n..f
026E50: FF DD 75 04 DD 74 05 DD F9 DD E1 C9 DD E5 DD 21 ..u..t.........!
026E60: 00 00 DD 39 E5 DD 6E 06 DD 66 07 5E 23 56 EB E5 ...9..n..f.^#V..
026E70: CD 2F 53 E1 CB 0D D2 DB 5F E5 DD 6E 04 DD 66 05 ./S....._..n..f.
026E80: 5E 23 56 EB E5 CD 2F 53 E1 CB 0D D2 DB 5F E5 DD ^#V.../S....._..
026E90: 6E 06 DD 66 07 5E 23 56 EB E5 DD 6E 04 DD 66 05 n..f.^#V...n..f.
026EA0: 5E 23 56 EB E5 CD 4A 47 E1 CB 0D D2 DB 5F E5 DD ^#V...JG....._..
026EB0: 6E 08 26 00 E5 DD 6E 06 DD 66 07 E5 DD 6E 04 DD n.&...n..f...n..
026EC0: 66 05 E5 DD 6E 06 DD 66 07 5E 23 56 EB E5 CD 75 f...n..f.^#V...u
026ED0: 4C D1 DD 73 0A DD 72 0B C3 EE 5F 21 24 00 E5 CD L..s..r..._!$...
026EE0: 15 78 DD 6E 06 DD 66 07 DD 75 0A DD 74 0B DD E1 .x.n..f..u..t...
026EF0: D1 21 06 00 39 F9 EB E9 DD E5 DD 21 00 00 DD 39 .!..9......!...9
026F00: 21 F9 FF 39 F9 E5 CD 32 5E D1 DD 73 FE DD 72 FF !..9...2^..s..r.
026F10: 2A 87 01 26 00 11 06 00 B7 ED 52 CA 56 60 2A 87 *..&......R.V`*.
026F20: 01 26 00 11 0B 00 B7 ED 52 CA 56 60 2A 87 01 26 .&......R.V`*..&
026F30: 00 11 31 00 B7 ED 52 CA 56 60 2A 87 01 26 00 11 ..1...R.V`*..&..
026F40: 1C 00 B7 ED 52 CA 56 60 2A 87 01 26 00 11 23 00 ....R.V`*..&..#.
026F50: B7 ED 52 C2 5E 61 2A 87 01 26 00 DD 75 F9 CD 0D ..R.^a*..&..u...
026F60: 70 E5 CD 32 5E D1 DD 73 FC DD 72 FD DD 6E F9 26 p..2^..s..r..n.&
026F70: 00 11 06 00 B7 ED 52 C2 A2 60 E5 21 11 00 E5 21 ......R..`.!...!
026F80: 02 00 E5 21 07 00 E5 DD 6E FE DD 66 FF E5 DD 6E ...!....n..f...n
026F90: FC DD 66 FD E5 CD CE 5B D1 DD 73 FE DD 72 FF C3 ..f....[..s..r..
026FA0: 5B 61 DD 6E F9 26 00 11 0B 00 B7 ED 52 C2 D4 60 [a.n.&......R..`
026FB0: E5 DD 6E FE DD 66 FF E5 DD 6E FC DD 66 FD E5 21 ..n..f...n..f..!
026FC0: 08 00 E5 21 08 00 E5 CD EC 53 D1 DD 73 FE DD 72 ...!.....S..s..r
026FD0: FF C3 5B 61 DD 6E F9 26 00 11 31 00 B7 ED 52 C2 ..[a.n.&..1...R.
026FE0: 02 61 E5 21 04 00 E5 DD 6E FE DD 66 FF E5 DD 6E .a.!....n..f...n
026FF0: FC DD 66 FD E5 CD 5C 5F D1 DD 73 FE DD 72 FF C3 ..f...\_..s..r..
027000: CB 19 23 C9 01 00 00 00 E5 C5 FD E5 D1 2A 04 69 ..#..........*.i
027010: 06 08 B7 1A 8E 77 2B 1B 10 F9 3A 07 69 47 C3 26 .....w+...:.iG.&
027020: 69 7E CE 00 77 2B D2 2B 69 10 F6 C1 E1 C9 E5 C5 i~..w+.+i.......
027030: FD E5 E1 ED 5B 04 69 06 08 B7 1A 9E 12 2B 1B 10 ....[.i......+..
027040: F9 3A 07 69 47 C3 4D 69 1A DE 00 12 1B D2 52 69 .:.iG.Mi......Ri
027050: 10 F6 C1 E1 C9 D5 3A 06 69 3D 11 F8 FF C2 75 69 ......:.i=....ui
027060: ED 5B 04 69 13 ED 53 04 69 3A 07 69 3C 32 07 69 .[.i..S.i:.i<2.i
027070: 11 38 00 3E 08 FD 19 32 06 69 D1 C9 06 0E 11 07 .8.>...2.i......
027080: 00 C5 FD 7E 00 FE 00 CA C2 69 FD 7E 01 FD E5 E1 ...~.....i.~....
027090: 19 43 CB 27 DA 9F 69 E6 F0 C2 C0 69 C3 A6 69 E6 .C.'..i....i..i.
0270A0: F0 EE F0 C2 C0 69 43 ED 6F 2B 10 FB FD 7E 00 3D .....iC.o+...~.=
0270B0: CA C2 69 FD 77 00 C1 10 C8 FD E5 E1 CD BC 6A C9 ..i.w.........j.
0270C0: C1 C9 FD E5 E1 CD BC 6A C1 C9 FE 0E D2 13 6A CB .......j......j.
0270D0: 2F D2 E9 69 F5 FD E5 E1 23 06 07 7E E6 80 CA E3 /..i....#..~....
0270E0: 69 3E 0F ED 67 23 10 FB F1 FE 00 C8 11 08 00 FD i>..g#..........
0270F0: E5 E1 19 5F 4F 16 00 E5 AF ED 52 D1 3E 07 91 47 ..._O.....R.>..G
027100: 2B 1B 7E 12 10 FA 41 E6 80 CA 0E 6A 3E FF 1B 12 +.~...A....j>...
027110: 10 FC C9 FD E5 E1 CD BC 6A C9 FD 21 02 00 FD 39 ........j..!...9
027120: FD 7E 00 FE 00 CA 4A 6A FD 7E 08 FE 00 CA 62 6A .~....Jj.~....bj
027130: FD 7E 01 FD AE 09 E6 80 CA 70 6A FD 7E 01 E6 80 .~.......pj.~...
027140: 1E 01 CA B0 6A 1E 02 C3 B0 6A 1E 00 FD 7E 08 FE ....j....j...~..
027150: 00 CA B0 6A FD 7E 09 1E 02 E6 80 CA B0 6A 1D C3 ...j.~.......j..
027160: B0 6A FD 7E 01 1E 01 E6 80 CA B0 6A 1C C3 B0 6A .j.~.......j...j
027170: FD 7E 00 FD BE 08 CA 8F 6A 1E 01 D2 80 6A 1E 02 .~......j....j..
027180: FD 7E 01 E6 80 CA B0 6A 3E 03 93 5F C3 B0 6A FD .~.....j>.._..j.
027190: E5 D1 21 08 00 19 06 07 13 23 1A BE C2 A6 6A 10 ..!......#....j.
0271A0: F7 1E 00 C3 B0 6A 1E 01 D2 80 6A 1E 02 C3 80 6A .....j....j....j
0271B0: C1 21 10 00 39 F9 7B FE 00 1F C5 C9 06 08 AF 77 .!..9.{........w
0271C0: 23 10 FC C9 FD 21 04 00 FD 39 FD 7E 01 21 0D 00 #....!...9.~.!..
0271D0: E6 80 5F C4 43 66 FD 7E 09 21 15 00 E6 80 57 C4 .._.Cf.~.!....W.
0271E0: 43 66 7B AA 32 E1 67 C9 E1 D1 D1 D1 D1 E9 11 FB Cf{.2.g.........
0271F0: 6A 0E 09 CD 05 00 0E 00 CD 05 00 2F 30 0D 0A 24 j........../0..$
027200: 5B 61 DD 6E F9 26 00 11 23 00 B7 ED 52 C2 30 61 [a.n.&..#...R.0a
027210: E5 21 03 00 E5 DD 6E FE DD 66 FF E5 DD 6E FC DD .!....n..f...n..
027220: 66 FD E5 CD 5C 5F D1 DD 73 FE DD 72 FF C3 5B 61 f...\_..s..r..[a
027230: DD 6E F9 26 00 11 1C 00 B7 ED 52 C2 5B 61 E5 21 .n.&......R.[a.!
027240: 09 00 E5 DD 6E FE DD 66 FF E5 DD 6E FC DD 66 FD ....n..f...n..f.
027250: E5 CD 4D 5C D1 DD 73 FE DD 72 FF C3 10 60 DD 6E ..M\..s..r...`.n
027260: FE DD 66 FF DD 75 04 DD 74 05 DD F9 DD E1 C9 DD ..f..u..t.......
027270: E5 DD 21 00 00 DD 39 E5 DD 6E 04 DD 66 05 ED 5B ..!...9..n..f..[
027280: A4 44 D5 22 A4 44 E5 FD E1 FD 6E 05 FD 66 06 5E .D.".D....n..f.^
027290: 23 56 EB ED 5B E0 15 B7 ED 52 C2 29 62 FD 6E 05 #V..[....R.)b.n.
0272A0: FD 66 06 11 08 00 19 EB 21 F8 FF 39 F9 EB 01 08 .f......!..9....
0272B0: 00 ED B0 FD 6E 07 FD 66 08 11 08 00 19 EB 21 F8 ....n..f......!.
0272C0: FF 39 F9 EB 01 08 00 ED B0 CD 1A 6A F2 DB 61 21 .9.........j..a!
0272D0: 04 00 DD 75 FE DD 74 FF C3 26 62 FD 2A A4 44 FD ...u..t..&b.*.D.
0272E0: 6E 05 FD 66 06 11 08 00 19 EB 21 F8 FF 39 F9 EB n..f......!..9..
0272F0: 01 08 00 ED B0 FD 6E 07 FD 66 08 11 08 00 19 EB ......n..f......
027300: 21 F8 FF 39 F9 EB 01 08 00 ED B0 CD 1A 6A C2 1D !..9.........j..
027310: 62 21 02 00 DD 75 FE DD 74 FF C3 26 62 21 01 00 b!...u..t..&b!..
027320: DD 75 FE DD 74 FF C3 9A 62 FD 2A A4 44 FD 6E 07 .u..t...b.*.D.n.
027330: FD 66 08 11 08 00 19 5E 23 56 EB E5 FD 6E 05 FD .f.....^#V...n..
027340: 66 06 11 08 00 19 5E 23 56 EB D1 B7 ED 52 F2 5D f.....^#V....R.]
027350: 62 21 04 00 DD 75 FE DD 74 FF C3 9A 62 FD 2A A4 b!...u..t...b.*.
027360: 44 FD 6E 07 FD 66 08 11 08 00 19 5E 23 56 EB E5 D.n..f.....^#V..
027370: FD 6E 05 FD 66 06 11 08 00 19 5E 23 56 EB D1 B7 .n..f.....^#V...
027380: ED 52 C2 91 62 21 02 00 DD 75 FE DD 74 FF C3 9A .R..b!...u..t...
027390: 62 21 01 00 DD 75 FE DD 74 FF FD 2A A4 44 FD 6E b!...u..t..*.D.n
0273A0: 05 FD 66 06 ED 5B DE 15 73 23 72 E5 DD 6E FE DD ..f..[..s#r..n..
0273B0: 66 FF E5 21 EF 44 FD 5E 02 16 00 19 5E 16 00 EB f..!.D.^....^...
0273C0: E5 CD 3D 6C E1 11 00 00 B7 ED 52 21 00 00 28 01 ..=l......R!..(.
0273D0: 23 26 00 E5 FD 2A A4 44 FD 6E 05 FD 66 06 11 08 #&...*.D.n..f...
0273E0: 00 19 D1 73 23 72 FD 6E 05 FD 66 06 11 04 00 19 ...s#r.n..f.....
0273F0: 11 00 00 73 23 72 FD 6E 05 FD 66 06 11 02 00 19 ...s#r.n..f.....
027400: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
027410: 21 00 00 00 02 09 4E E5 21 00 41 02 00 00 00 02 !.....N.!.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: 66 6C 6F 61 74 20 6F 76 65 72 66 6C 6F 77 0D 0A float overflow..
027510: 24 06 11 7C 4D 21 00 00 CB 2C CB 1D 1F CB 19 DA $..|M!...,......
027520: 39 6B 10 F4 18 18 CB 2C CB 1D 1F CB 19 D2 34 6B 9k.....,......4k
027530: 10 F4 18 0A 19 10 E1 18 05 3F ED 52 10 E8 C9 CD .........?.R....
027540: 11 6B 67 69 C9 01 00 00 AF 04 ED 52 FA 59 6B CB .kgi.......R.Yk.
027550: 2C CB 1D 1F CB 19 C3 49 6B 19 DA 6F 6B CB 21 17 ,......Ik..ok.!.
027560: CB 15 CB 14 10 F3 C3 79 6B B7 ED 52 DA 5D 6B CB .......yk..R.]k.
027570: 21 17 CB 15 CB 14 0C 10 F0 C9 CB 7C C2 8B 6B CB !..........|..k.
027580: 7A C2 9F 6B CD 45 6B 67 69 2B C9 D5 CD E6 6B D1 z..k.Ekgi+....k.
027590: CB 7A CA A6 6B EB D5 CD E6 6B D1 EB C3 84 6B EB .z..k....k....k.
0275A0: D5 CD E6 6B D1 EB CD 45 6B 67 69 2B CD E6 6B C9 ...k...Ekgi+..k.
0275B0: CB 7C C2 C2 6B CB 7A C2 D5 6B CD 45 6B CB 2C CB .|..k.z..k.Ek.,.
0275C0: 1D C9 D5 CD E6 6B D1 CB 7A CA DB 6B E5 CD E7 6B .....k..z..k...k
0275D0: D1 EB C3 BA 6B E5 CD E7 6B D1 EB CD 45 6B CB 2C ....k...k...Ek.,
0275E0: CB 1D CD E6 6B C9 EB 21 00 00 B7 ED 52 C9 CB 7C ....k..!....R..|
0275F0: C2 E6 6B C9 E1 C1 D1 FD E1 E5 21 01 00 AF B9 C2 ..k.......!.....
027600: 06 6C B8 CA 21 6C CB 38 CB 19 D2 14 6C C5 D5 CD .l..!l.8....l...
027610: 3F 6B D1 C1 E5 C5 62 6B CD 3F 6B EB C1 E1 C3 FD ?k....bk.?k.....
027620: 6B E3 E9 D1 E1 C1 26 00 3E 01 A5 6F E5 EB E9 E1 k.....&.>..o....
027630: D1 C1 78 2F A2 57 79 2F A3 5F C1 D5 E9 E1 D1 C1 ..x/.Wy/£_......
027640: 78 A2 57 79 A3 5F C1 D5 E9 E1 D1 C1 78 B2 57 79 x.Wy£_......x.Wy
027650: A3 5F C1 D5 E9 E1 FD E1 FD E5 E5 FD 7E 00 FD 4E £_..........~..N
027660: 02 FD 46 03 FD 5E 04 FD 56 05 FD 6E 06 FD 66 07 ..F..^..V..n..f.
027670: DD E5 CD 05 00 DD E1 E1 FD E1 FD 77 00 AF FD 77 ...........w...w
027680: 01 FD 71 02 FD 70 03 FD 73 04 FD 72 05 FD 75 06 ..q..p..s..r..u.
027690: FD 74 07 E9 79 48 47 FE 00 C2 9D 6C 0D 1A BE C0 .t..yHG....l....
0276A0: 13 23 10 F9 0D F2 9D 6C BF C9 FD E1 21 00 00 39 .#.....l....!..9
0276B0: ED B0 F9 FD E5 C9 00 00 00 00 00 00 DF 88 E1 D1 ................
0276C0: E5 CD 71 6D 21 00 00 22 B8 6C B7 ED 52 22 BA 6C ..qm!..".l..R".l
0276D0: 2A B6 6C 11 00 00 B7 ED 5A CA 1F 6D 5E 23 56 23 *.l.....Z..m^#V#
0276E0: E5 2A BA 6C 19 F2 F3 6C E1 22 B8 6C 5E 23 56 EB .*.l...l.".l^#V.
0276F0: C3 D3 6C CA 00 6D EB E1 2B 72 2B 73 19 C3 3B 6D ..l..m..+r+s..;m
027700: 29 44 4D 29 29 09 4F 06 00 09 EB C3 F3 74 E5 D5 )DM)).O......t..
027710: 21 9A 00 E5 CD 15 78 D1 E1 C3 9A 75 21 88 01 11 !.....x....u!...
027720: 00 00 7E 23 D6 30 FA 3D 75 FE 0A FA 30 75 D6 07 ..~#.0.=u...0u..
027730: EB 29 29 29 29 4F 06 00 09 EB C3 22 75 CD 9E 71 .))))O....."u..q
027740: FE 48 CA 9A 75 FE 68 CA 9A 75 C3 7D 75 21 88 01 .H..u.h..u.}u!..
027750: 11 00 00 7E 23 D6 30 FA 6B 75 FE 08 F2 6B 75 EB ...~#.0.ku...ku.
027760: 29 29 29 4F 06 00 09 EB C3 53 75 FE 12 CA 9A 75 )))O.....Su....u
027770: FE 13 28 09 21 87 00 D5 E5 CD 15 78 D1 AF BA CA ..(.!......x....
027780: 8B 75 D5 21 8E 00 E5 CD 15 78 D1 7B 11 D7 01 21 .u.!.....x.{...!
027790: 05 00 19 5D 54 77 23 C3 2E 71 42 4B ED 5B D4 15 ...]Tw#..qBK.[..
0277A0: 78 E6 80 CA AA 75 ED 5B DC 15 3E 02 32 87 01 21 x....u.[..>.2..!
0277B0: D7 01 AF 77 23 77 23 73 23 72 23 23 71 23 70 C9 ...w#w#s#r##q#p.
0277C0: F1 C3 CD 74 F5 E5 CD B5 71 F5 CD C7 72 F1 E1 FE ...t....q...r...
0277D0: 2E CA C0 75 F1 CD 46 04 C9 CD B5 71 32 A8 01 C9 ...u..F....q2...
0277E0: F5 85 6F D2 E7 75 24 EB F1 C9 2A 20 00 06 2B 20 ..o..u$...* ..+
0277F0: 00 07 2D 20 00 09 3D 20 00 10 2F 20 00 0B 29 20 ..- ..= ../ ..)
027800: 00 05 28 2A 01 00 28 20 00 04 7C 20 00 19 5B 20 ..(*..( ..| ..[
027810: 00 15 5D 20 00 16 2C 20 00 08 3B 20 00 0E 5E 20 ..] .., ..; ..^
027820: 00 17 3A 3D 00 0C 3A 20 00 0D 3C 3D 00 12 3C 3E ..:=..: ..<=..<>
027830: 00 14 3C 20 00 0F 3E 3D 00 13 3E 20 00 11 2E 2E ..< ..>=..> ....
027840: 00 18 2E 20 00 0A 7B 20 00 1A 7D 20 00 1B 23 20 ... ..{ ..} ..#
027850: 00 14 26 20 00 1C 22 20 02 00 7E 20 00 33 27 20 ..& .." ..~ .3'
027860: 02 00 20 20 00 00 2A D5 01 3A 9A 76 77 C9 2A BC .. ..*..:.vw.*.
027870: 6C AF 77 23 22 BC 6C C9 C1 3A 9A 76 5F 16 00 2A l.w#".l..:.v_..*
027880: BC 6C 19 23 22 BC 6C 2B D1 C5 3A 9A 76 77 2B 47 .l.#".l+..:.vw+G
027890: FE 00 C8 1A 77 2B 13 10 FA C9 00 C1 D1 E1 C5 E5 ....w+..........
0278A0: D5 06 20 3E 20 BE CA AC 76 23 10 F9 3E 20 90 32 .. > ...v#..> .2
0278B0: 9A 76 E1 D1 01 FF FF 3E FF BD C2 C1 76 BC CA FB .v.....>....v...
0278C0: 76 D5 E5 3A 9A 76 47 2B 7E E6 3F 2B B8 F2 D1 76 v..:.vG+~.?+...v
0278D0: 47 1A BE C2 FF 76 13 2B 10 F7 E1 E5 2B 7E E6 80 G....v.+....+~..
0278E0: CA F2 76 3A 8B 6D FE 00 CA FF 76 3A 9A 76 F6 80 ..v:.m....v:.v..
0278F0: 18 03 3A 9A 76 BE C2 FF 76 E1 D1 22 7E 01 C9 E1 ..:.v...v.."~...
027900: E1 E5 5E 23 56 2A B8 6C 01 00 00 09 CA 15 6D 73 ..^#V*.l......ms
027910: 23 72 C3 19 6D ED 53 B6 6C E1 2B 2B C3 3B 6D 2A #r..m.S.l.++.;m*
027920: BC 6C E5 ED 5B BA 6C B7 ED 52 22 BC 6C ED 5B BC .l..[.l..R".l.[.
027930: 6C 21 00 00 39 ED 52 DA 43 6D E1 C1 D1 C5 EB 73 l!..9.R.Cm.....s
027940: 23 72 C9 11 92 00 D5 CD 15 78 C3 43 6D 21 00 00 #r.......x.Cm!..
027950: 22 B6 6C D1 E1 E1 D5 5E 23 56 ED 53 BC 6C C9 D1 ".l....^#V.S.l..
027960: 21 B6 6C E5 D5 CD 00 00 C9 0E 09 CD 05 00 C3 00 !.l.............
027970: 00 7B E6 03 C8 13 C3 71 6D FD E1 C1 E1 D1 09 2B .{.....qm......+
027980: EB 09 2B ED B8 FD E5 C9 00 00 00 00 00 00 00 00 ..+.............
027990: 5B 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 [...............
0279A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0279B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 38 ...............8
0279C0: 7B 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 {...............
0279D0: 52 45 4C 00 00 00 00 00 00 00 00 00 00 00 00 00 REL.............
0279E0: 00 00 00 00 00 00 00 00 00 00 DD E5 CD 05 00 DD ................
0279F0: E1 C9 21 00 04 CD AF 6E 3A 80 00 47 21 81 00 7E ..!....n:..G!..~
027A00: FE 5B CA 0F 6E FE 2F CA 0F 6E 23 10 F2 18 49 23 .[..n./..n#...I#
027A10: 7E 11 BD 6D FE 54 CA 53 6E FE 4C CA 49 6E FE 53 ~..m.T.Sn.L.In.S
027A20: CA 3D 6E 11 88 6D FE 52 CA 53 6E 11 89 6D FE 55 .=n..m.R.Sn..m.U
027A30: CA 53 6E 11 C6 6D FE 45 CA 53 6E 18 08 E5 21 00 .Sn..m.E.Sn...!.
027A40: 01 CD AF 6E E1 10 C8 18 0F 3A 09 01 EE 01 32 09 ...n.....:....2.
027A50: 01 10 BC 3E 01 12 18 ED 11 C9 7D CD F4 79 11 1B ...>......}..y..
027A60: 77 CD E6 6E 32 C3 6D 21 68 00 AF 06 04 77 10 FD w..n2.m!h....w..
027A70: 21 5C 00 11 C7 6D 01 09 00 ED B0 3A 6C 00 FE 00 !\...m.....:l...
027A80: CA 86 6E 32 C7 6D 3A 6D 00 FE 20 CA A1 6E FE 2F ..n2.m:m.. ..n./
027A90: CA A1 6E 3A 75 00 21 6D 00 11 C8 6D 01 08 00 ED ..n:u.!m...m....
027AA0: B0 11 5C 00 21 27 7E CD D9 6E AF 32 7C 00 C9 11 ..\.!'~..n.2|...
027AB0: DF 88 E5 EB 19 3E 2E 77 23 22 34 7B 19 22 38 7B .....>.w#"4{."8{
027AC0: 22 BF 6D AF 77 23 22 BC 6C E1 7C 32 3A 7B 11 80 ".m.w#".l.|2:{..
027AD0: 00 EB B7 ED 52 22 36 7B C9 E5 0E 0F CD EA 6D D1 ....R"6{......m.
027AE0: FE FF CA FA 79 C9 21 03 01 7E FE FF CA 02 6F 12 ....y.!..~....o.
027AF0: E5 D5 0E 0F CD EA 6D D1 E1 23 FE FF CA E9 6E AF ......m..#....n.
027B00: 44 4D FA 07 77 23 23 22 80 01 5E 23 56 EB D1 C3 DM..w##"..^#V...
027B10: B7 76 D5 CD 15 78 0E 00 CD 05 00 00 45 52 52 4D .v...x......ERRM
027B20: 53 47 20 20 44 41 54 00 00 00 00 00 00 00 00 00 SG DAT.........
027B30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5E 0D ..............^.
027B40: 0A 45 52 52 4F 52 20 24 5E 0D 0A 57 41 52 4E 49 .ERROR $^..WARNI
027B50: 4E 47 20 24 0D 0A 20 28 4C 61 73 74 20 6E 6F 6E NG $.. (Last non
027B60: 2D 6D 61 72 6B 20 77 61 73 20 24 29 0D 0A 54 79 -mark was $)..Ty
027B70: 70 65 20 61 20 74 6F 20 61 62 6F 72 74 2C 20 65 pe a to abort, e
027B80: 20 74 6F 20 65 64 69 74 2C 20 69 20 74 6F 20 69 to edit, i to i
027B90: 67 6E 6F 72 65 20 73 70 61 63 65 20 74 6F 20 63 gnore space to c
027BA0: 6F 6E 74 69 6E 75 65 3A 24 E1 D1 E5 D5 CD 15 78 ontinue:$......x
027BB0: 3A 87 01 FE 0E C8 FE 27 C8 FE 25 C8 FE 3D C8 FE :......'..%..=..
027BC0: 24 C8 CD 0D 70 18 E9 20 20 20 20 20 24 11 C6 77 $...p.. $..w
027BD0: 01 E8 03 CD 06 78 01 64 00 CD 06 78 01 0A 00 CD .....x.d...x....
027BE0: 06 78 01 01 00 CD 06 78 FE 20 C2 F0 77 3E 30 12 .x.....x. ..w>0.
027BF0: 21 C7 77 06 03 7E FE 30 20 06 3E 20 77 23 10 F5 !.w..~.0 .> w#..
027C00: 11 C7 77 C3 F4 79 13 AF ED 42 38 03 3C 18 F9 09 ..w..y...B8.<...
027C10: C6 30 12 C9 00 3E 01 32 14 78 21 40 00 E5 CD 1C .0...>.2.x!@....
027C20: 6F 21 3E 77 C3 2A 78 21 48 77 E5 3A 09 01 FE 00 o!>w.*x!Hw.:....
027C30: C2 4C 78 2A BF 6D E5 3C 32 09 01 2A C1 6D 22 BF .Lx*.m.<2..*.m".
027C40: 6D 2B 22 C1 6D CD 34 72 E1 22 BF 6D 3A 5C 02 47 m+".m.4r.".m:\.G
027C50: 0E 02 1E 20 C5 CD EA 6D C1 10 F7 D1 CD F4 79 E1 ... ...m......y.
027C60: D1 E5 D5 2A 91 6D 3E 0A BD 28 15 23 22 91 6D 01 ...*.m>..(.#".m.
027C70: 8F 6D 29 29 09 73 23 72 23 ED 5B 8E 6D 73 23 72 .m)).s#r#.[.ms#r
027C80: E1 E5 CD CD 77 D1 3A C3 6D FE 00 CA D5 78 43 11 ....w.:.m....xC.
027C90: 00 00 AF 32 3B 77 0E 01 AF 83 5F 3E 00 8A 57 CD ...2;w...._>..W.
027CA0: 22 79 10 F5 47 14 7A CB 03 17 32 3B 77 0E 01 CD "y..G.z...2;w...
027CB0: 22 79 16 00 CB 3B 3E 81 93 4F 3E 80 83 6F 26 00 "y...;>..O>..o&.
027CC0: CD 22 79 C5 E5 5F 0E 02 CD EA 6D E1 C1 10 F1 11 ."y.._....m.....
027CD0: 90 7A CD F4 79 11 54 77 CD F4 79 21 88 01 06 20 .z..y.Tw..y!...
027CE0: 7E FE 20 CA F3 78 E5 C5 5F 0E 02 CD EA 6D C1 E1 ~. ..x.._....m..
027CF0: 23 10 ED 11 6B 77 CD 29 79 FE 41 CA 1C 79 FE 45 #...kw.)y.A..y.E
027D00: 3C C9 AF C9 0E 13 11 C7 6D D5 CD EA 6D 0E 16 D1 <.......m...m...
027D10: CD EA 6D FE FF 11 33 7E C0 C3 FA 79 2A 8C 6D 3A ..m...3~...y*.m:
027D20: 3A 7B BC C2 2C 6F CD 7A 6F 21 00 00 11 DF 88 1B :{..,o.zo!......
027D30: 23 22 8C 6D 19 C1 D1 73 C5 C9 C1 E1 D1 E5 C5 D5 #".m...s........
027D40: CD 1C 6F C3 1C 6F C1 E1 5C D5 C5 E5 CD 1C 6F C3 ..o..o..\.....o.
027D50: 1C 6F C1 E1 C5 AF 4F 06 08 E5 3E 20 BE CA 64 6F .o....O...> ..do
027D60: 23 0C 10 F8 C5 C5 CD 1C 6F C1 41 E1 7E C5 E5 4F #.......o.A.~..O
027D70: C5 CD 1C 6F E1 C1 23 10 F3 C9 3A 3A 7B 87 47 11 ...o..#...::{.G.
027D80: DF 88 3A D3 6D 32 C5 6D 3A E7 6D 32 C4 6D 3E 15 ..:.m2.m:.m2.m>.
027D90: 21 C7 6D CD 9F 6F FE 00 C8 11 52 00 C3 12 77 DD !.m..o....R...w.
027DA0: E5 C5 E5 D5 F5 0E 1A CD 05 00 F1 E1 D1 D5 E5 F5 ................
027DB0: 4F CD 05 00 FE 00 20 0F F1 E1 01 80 00 09 EB E1 O..... .........
027DC0: C1 10 DE AF DD E1 C9 E1 D1 E1 E1 DD E1 C9 2A 8C ..............*.
027DD0: 6D 11 7F 00 19 CB 15 CB 14 7C 47 FE 00 C4 7F 6F m........|G....o
027DE0: 0E 10 11 C7 6D CD EA 6D C9 3A 87 01 FE 0E 20 05 ....m..m.:.... .
027DF0: CD 0D 70 18 F4 3A 87 01 FE 26 C8 FE 25 C8 FE 27 ..p..:...&..%..'
027E00: C8 FE 19 C8 FE 40 C8 CD 00 00 C3 E9 6F CD B5 71 .....@......o..q
027E10: FE 20 CA 0D 70 FE 61 FA 22 70 FE 7B F2 30 70 C3 . ..p.a."p.{.0p.
027E20: 2C 70 FE 41 FA 30 70 FE 5B F2 30 70 CD 08 73 C9 ,p.A.0p.[.0p..s.
027E30: FE 30 FA 3E 70 FE 3A F2 3E 70 CD A0 74 C9 32 62 .0.>p.:.>p..t.2b
027E40: 76 21 EA 75 01 04 00 BE CA 4F 70 09 C3 47 70 23 v!.u.....Op..Gp#
027E50: 7E FE 20 CA 6D 70 CD 9E 71 5F 7E FE 20 CA 68 70 ~. .mp..q_~. .hp
027E60: BB CA 6D 70 09 C3 5A 70 E5 CD C7 72 E1 23 E5 5E ..mp..Zp...r.#.^
027E70: 16 00 6B 62 29 19 01 7B 70 09 E9 C3 84 70 C3 8B ..kb)..{p....p..
027E80: 70 C3 D9 70 E1 23 7E 32 87 01 C9 E1 CD B5 71 FE p..p.#~2......q.
027E90: 24 C2 D3 70 CD A8 71 FE 4C 21 09 01 CA C2 70 FE $..p..q.L!....p.
027EA0: 54 21 88 6D FE 52 CA C2 70 21 BD 6D CA C2 70 FE T!.m.R..p!.m..p.
027EB0: 41 C2 D3 70 CD B5 71 FE 20 20 01 AF 32 8A 6D C3 A..p..q. ..2.m.
027EC0: D3 70 CD 9E 71 1E 00 FE 2D CA D2 70 1C FE 2B C2 .p..q...-..p..+.
027ED0: D3 70 73 CD 59 71 C3 0D 70 E1 3A 62 76 32 03 71 .ps.Yq..p.:bv2.q
027EE0: 21 D7 01 11 05 00 19 E5 06 80 3A 8A 6D 4F E5 2A !.........:.mO.*
027EF0: BF 6D 7E E1 FE 0D 28 2E FE 0A 28 2A CD 9E 71 3A .m~...(...(*..q:
027F00: CA 5A 79 FE 49 20 0A 2A 91 6D 2B 22 91 6D C3 15 .Zy.I .*.m+".m..
027F10: 79 FE 00 20 DE 11 90 7A CD F4 79 C9 CD CE 6F C3 y.. ...z..y...o.
027F20: 00 00 0D CA 34 79 7E 23 C9 CD F4 79 0E 01 CD EA ....4y~#...y....
027F30: 6D E6 DF C9 C5 D5 11 80 00 21 1B 77 3E 14 06 01 m........!.w>...
027F40: CD 9F 6F D1 C1 0E 81 21 80 00 C3 22 79 0D 0A 6C ..o....!..."y..l
027F50: 6F 61 64 69 6E 67 20 6D 65 24 CD CE 6F 11 4D 79 oading me$..o.My
027F60: CD F4 79 11 81 00 21 5D 00 06 08 0E 30 3A 5C 00 ..y...!]....0:\.
027F70: FE 00 CA 7F 79 C6 40 12 0C 13 3E 3A 12 0C 13 7E ....y.@...>:...~
027F80: FE 20 CA 8B 79 12 23 13 0C 10 F4 79 32 80 00 3E . ..y.#....y2..>
027F90: 2E 12 13 21 65 00 01 03 00 ED B0 21 90 6D 01 2B ...!e......!.m.+
027FA0: 00 ED B0 11 5C 00 D5 21 78 7A 01 0C 00 ED B0 AF ....\..!xz......
027FB0: 32 68 00 32 7C 00 11 5C 00 D1 CD E6 6E 11 79 7A 2h.2|..\....n.yz
027FC0: FE 00 CA FA 79 21 F4 79 ED 5B 06 00 1B 01 1C 00 ....y!.y.[......
027FD0: ED B8 EB F9 23 11 00 01 E9 D5 0E 1A CD 05 00 11 ....#...........
027FE0: 5C 00 0E 14 CD 05 00 FE 00 C2 00 01 D1 21 80 00 \............!..
027FF0: 19 EB 18 E5 0E 09 CD EA 6D C9 CD F4 79 3A C6 6D ........m...y:.m
028000: FE 00 C2 5A 79 3A 91 6D FE 00 CA 1D 7A 11 28 7A ...Zy:.m....z.(z
028010: CD 29 79 FE 45 CA 5A 79 FE 00 C2 0D 7A 11 5F 7A .)y.E.Zy....z._z
028020: CD F4 79 0E 00 CD EA 6D 0D 0A 20 45 72 72 6F 72 ..y....m.. Error
028030: 73 20 69 6E 20 63 6F 6D 70 69 6C 65 20 2D 20 74 s in compile - t
028040: 79 70 65 20 65 20 74 6F 20 65 64 69 74 2C 20 73 ype e to edit, s
028050: 70 61 63 65 20 74 6F 20 65 78 69 74 20 3A 24 0D pace to exit :$.
028060: 0A 43 6F 6D 70 69 6C 61 74 69 6F 6E 20 43 6F 6D .Compilation Com
028070: 70 6C 65 74 65 0D 0A 24 00 4D 45 20 20 20 20 20 plete..$.ME
028080: 20 43 4F 4D 66 69 6C 65 20 6D 69 73 73 69 6E 67 COMfile missing
028090: 0D 0A 24 C1 E1 2B 7E F6 80 77 C5 C9 C1 E1 2B 7E ..$..+~..w....+~
0280A0: E6 3F 77 C5 C9 C1 E1 7C 32 D3 6D E5 C5 11 DF 88 .?w....|2.m.....
0280B0: 0E 1A CD EA 6D 11 C7 6D 21 DF 7A CD D9 6E C1 E1 ....m..m!.z..n..
0280C0: 7D 32 E7 6D E1 C5 F5 22 8C 6D 3A 3A 7B 87 47 3E }2.m...".m::{.G>
0280D0: 14 21 C7 6D 11 DF 88 CD 9F 6F F1 32 E7 6D C9 6E .!.m.....o.2.m.n
0280E0: 6F 20 52 45 4C 20 66 69 6C 65 0D 0A 24 C1 E1 ED o REL file..$...
0280F0: 5B C4 6D 73 23 72 E1 ED 5B 8C 6D 73 23 72 C5 C9 [.ms#r..[.ms#r..
028100: BE 6D FE 27 CA 2D 71 B9 CA 14 71 77 23 10 DF 21 .m.'.-q...qw#..!
028110: 8B 00 18 15 CD A8 71 FE 40 FA 0B 71 FE 5B F2 0B ......q.@..q.[..
028120: 71 D6 40 C3 0B 71 21 8C 00 E5 CD 15 78 D1 3E 03 q.@..q!.....x.>.
028130: 32 87 01 AF 77 ED 52 E5 AF 21 D7 01 77 23 77 23 2...w.R..!..w#w#
028140: 23 23 D1 73 E5 6B 26 00 E5 CD 72 03 CD 21 07 D1 ##.s.k&...r..!..
028150: 21 D7 01 23 23 73 23 72 C9 21 00 00 18 05 E5 CD !..##s#r.!......
028160: B5 71 E1 FE 1A CA 84 71 FE 2A C2 8B 71 E5 CD B5 .q.....q.*..q...
028170: 71 E1 FE 2A CA 6D 71 FE 29 C2 8B 71 2B 7C FE 00 q..*.mq.)..q+|..
028180: CA 5E 71 C9 21 54 00 E5 C3 12 77 FE 28 C2 5E 71 .^q.!T....w.(.^q
028190: E5 CD B5 71 E1 FE 2A C2 5E 71 23 C3 5E 71 E5 D5 ...q..*.^q#.^q..
0281A0: C5 CD B5 71 C1 D1 E1 C9 CD 9E 71 FE 61 F8 FE 7B ...q......q.a..{
0281B0: F0 D6 20 C9 01 21 5C 02 34 2A 8E 6D 23 22 8E 6D .. ..!\.4*.m#".m
0281C0: 2A BF 6D 7E 23 22 BF 6D 32 BE 6D FE 20 F0 FE 00 *.m~#".m2.m. ...
0281D0: CA 06 72 FE 09 C2 E5 71 3A 5C 02 C6 08 E6 F8 32 ..r....q:\.....2
0281E0: 5C 02 3E 20 C9 FE 0A CA F5 71 FE 1A CA 2E 72 FE \.> .....q....r.
0281F0: 0D C0 C3 E2 71 AF 32 5C 02 CD 34 72 2A BB 6D 23 ....q.2\..4r*.m#
028200: 22 BB 6D C3 B5 71 ED 5B 38 7B 13 EB B7 ED 52 C2 ".m..q.[8{....R.
028210: 2C 72 1B ED 53 BF 6D CD 8D 72 3A B4 71 FE 00 CA ,r..S.m..r:.q...
028220: C0 71 CD 34 72 AF 32 B4 71 C3 C0 71 AF C9 11 51 .q.4r.2.q..q...Q
028230: 00 C3 12 77 2A BF 6D ED 5B C1 6D 22 C1 6D E5 B7 ...w*.m.[.m".m..
028240: ED 52 E1 C8 3A 09 01 FE 00 C8 7E FE 1A C8 FE 0D .R..:.....~.....
028250: CA 7F 72 FE 0A CA 65 72 FE 00 CA 69 72 E5 5F 0E ..r...er...ir._.
028260: 02 CD EA 6D E1 23 C3 4A 72 E5 ED 5B 38 7B B7 ED ...m.#.Jr..[8{..
028270: 52 CA 78 72 E1 C3 4A 72 E1 CD 8D 72 C3 4A 72 5F R.xr..Jr...r.Jr_
028280: 0E 02 CD EA 6D 1E 0A 0E 02 CD EA 6D C9 2A 38 7B ....m......m.*8{
028290: 11 80 00 B7 ED 52 ED 5B 34 7B 01 80 00 ED B0 3A .....R.[4{.....:
0282A0: 3A 7B 87 3D 47 21 5C 00 3E 14 CD 9F 6F 2A BF 6D :{.=G!\.>...o*.m
0282B0: ED 5B 36 7B 19 22 BF 6D 2A C1 6D 19 22 C1 6D 2A .[6{.".m*.m.".m*
0282C0: 34 7B 11 80 00 19 C9 2A BF 6D 2B 22 BF 6D 2A 8E 4{.....*.m+".m*.
0282D0: 6D 2B 22 8E 6D 3A BF 6D 21 5C 02 35 C9 21 88 01 m+".m:.m!\.5.!..
0282E0: 3E 20 77 11 88 01 13 01 1F 00 ED B0 C9 CD DD 72 > w............r
0282F0: D1 E1 2B 7E E6 3F 32 9A 76 47 D5 FE 00 C8 11 88 ..+~.?2.vG......
028300: C1 E1 D1 2B 7E E6 80 CA 10 7B 21 01 00 C3 13 7B ...+~....{!....{
028310: 21 00 00 E5 C5 C9 ED 5F 6F ED 5B D7 6D 19 EB E1 !......_o.[.m...
028320: C1 D5 E9 C1 D1 E1 B7 ED 52 D1 11 00 00 D2 31 7B ........R.....1{
028330: 13 D5 C5 C9 00 00 00 00 00 00 00 00 DD E5 CD 05 ................
028340: 00 DD E1 C9 00 20 20 20 20 20 20 20 20 53 59 4D ..... SYM
028350: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028360: 00 00 00 00 00 00 00 00 53 59 4D 00 00 53 59 4D ........SYM..SYM
028370: 46 49 4C 45 53 4C 42 52 00 00 00 00 00 00 00 00 FILESLBR........
028380: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028390: 21 88 01 11 45 7B 06 08 7E FE 61 FA A5 7B FE 7B !...E{..~.a..{.{
0283A0: F2 A5 7B D6 20 12 23 13 10 EE 21 68 7B 06 03 7E ..{. .#...!h{..~
0283B0: 12 23 13 10 FA AF 21 50 7B 06 18 77 23 10 FC C9 .#....!P{..w#...
0283C0: CD 90 7B 2A BC 6C 22 6F 02 11 44 7B CD E6 6E FE ..{*.l"o..D{..n.
0283D0: 00 CA 0C 7C 21 44 7B 06 00 3E 14 ED 5B BC 6C ED ...|!D{..>..[.l.
0283E0: 53 EB 7C CD 9F 6F 2A BC 6C 01 00 00 B7 ED 52 CA S.|..o*.l.....R.
0283F0: AD 7C ED 53 BC 6C ED 53 ED 7C 01 01 00 2A 6F 02 .|.S.l.S.|...*o.
028400: 5E 16 00 19 23 23 22 6F 02 C3 AD 7C 3A 6B 7B 01 ^...##"o...|:k{.
028410: 00 00 FE 02 CA AD 7C FE 01 CA 41 7C 3E 02 32 6B ......|...A|>.2k
028420: 7B 11 6C 7B CD E6 6E 01 00 00 FE 00 CA AD 7C 3E {.l{..n.......|>
028430: 01 32 6B 7B 11 44 7D 21 6C 7B 06 10 3E 14 CD 9F .2k{.D}!l{..>...
028440: 6F 3A 52 7D 87 87 3D 47 21 64 7D 11 88 01 C5 E5 o:R}..=G!d}.....
028450: 06 08 23 1A FE 61 FA 60 7C FE 7B F2 60 7C D6 20 ..#..a.`|.{.`|.
028460: BE C2 6A 7C 13 10 EB C3 78 7C E1 11 20 00 19 C1 ..j|....x|.. ...
028470: 10 D9 01 00 00 C3 AD 7C D1 C1 21 0C 00 19 7E 47 .......|..!...~G
028480: E6 7F F5 AF 32 8C 7B 23 7E CB 10 17 32 78 7B E5 ....2.{#~...2x{.
028490: 11 6C 7B 0E 0F CD 3C 7B 01 00 00 FE FF E1 CA AD .l{...<{........
0284A0: 7C F1 32 8C 7B 23 46 21 6C 7B C3 D9 7B E1 D1 C5 |.2.{#F!l{..{...
0284B0: E9 CD 90 7B 3A 08 01 32 44 7B 0E 13 11 44 7B CD ...{:..2D{...D{.
0284C0: 3C 7B 0E 16 11 44 7B CD 3C 7B ED 5B D5 01 2A BC <{...D{.<{.[..*.
0284D0: 6C B7 ED 52 29 44 AF BD 28 01 04 21 44 7B 3E 15 l..R)D..(..!D{>.
0284E0: CD 9F 6F 11 44 7B 0E 10 C3 3C 7B 00 00 00 00 2A ..o.D{...<{....*
0284F0: EB 7C 22 0A 01 2A ED 7C 22 0C 01 C9 2A 0A 01 22 .|"..*.|"...*.."
028500: 01 2B 7E 12 13 10 FA C9 F5 CD DD 72 21 88 01 F1 .+~........r!...
028510: 32 88 01 AF 23 3C E5 F5 CD 9E 71 FE 5F CA 95 73 2...#<....q._..s
028520: FE 24 CA 95 73 FE 30 FA 43 73 FE 3A FA 95 73 FE .$..s.0.Cs.:..s.
028530: 41 FA 43 73 FE 5B FA 95 73 FE 61 FA 43 73 FE 7B A.Cs.[..s.a.Cs.{
028540: FA 95 73 CD C7 72 F1 E1 5F 16 00 7B D5 FE 0F F2 ..s..r.._..{....
028550: 8E 73 87 6F 26 00 11 80 74 19 5E 23 56 23 4E 23 .s.o&...t.^#V#N#
028560: 46 EB 7C B8 C2 6C 73 7D B9 CA 8E 73 D1 D5 E5 C5 F.|..ls}...s....
028570: 43 11 88 01 1A BE C2 85 73 23 13 10 F7 7E 32 87 C.......s#...~2.
028580: 01 E1 E1 E1 C9 C1 E1 D1 D5 19 23 C3 62 73 E1 3E ..........#.bs.>
028590: 01 32 87 01 C9 4F F1 E1 FE 21 F2 14 73 71 C3 14 .2...O...!..sq..
0285A0: 73 42 59 1F 44 4F 24 49 46 2C 49 4E 2F 4F 46 34 sBY.DO$IF,IN/OF4
0285B0: 4F 52 35 54 4F 3E 41 4E 44 1C 44 49 56 23 45 4E OR5TO>AND.DIV#EN
0285C0: 44 27 46 4F 52 2A 4D 4F 44 31 4E 4F 54 33 53 45 D'FOR*MOD1NOT3SE
0285D0: 54 3C 56 41 52 41 43 41 53 45 20 45 4C 53 45 25 T<VARACASE ELSE%
0285E0: 45 58 49 54 28 46 52 4F 4D 2B 4C 4F 4F 50 30 54 EXIT(FROM+LOOP0T
0285F0: 48 45 4E 3D 54 59 50 45 3F 57 49 54 48 43 41 52 HEN=TYPE?WITHCAR
028600: 52 41 59 1D 42 45 47 49 4E 1E 43 4F 4E 53 54 21 RAY.BEGIN.CONST!
028610: 45 4C 53 49 46 26 55 4E 54 49 4C 40 57 48 49 4C ELSIF&UNTIL@WHIL
028620: 45 42 45 58 50 4F 52 54 29 49 4D 50 4F 52 54 2E EBEXPORT)IMPORT.
028630: 4D 4F 44 55 4C 45 32 52 45 43 4F 52 44 39 52 45 MODULE2RECORD9RE
028640: 50 45 41 54 3A 52 45 54 55 52 4E 3B 50 4F 49 4E PEAT:RETURN;POIN
028650: 54 45 52 36 50 52 4F 43 45 44 55 52 45 37 51 55 TER6PROCEDURE7QU
028660: 41 4C 49 46 49 45 44 38 44 45 46 49 4E 49 54 49 ALIFIED8DEFINITI
028670: 4F 4E 22 49 4D 50 4C 45 4D 45 4E 54 41 54 49 4F ON"IMPLEMENTATIO
028680: 4E 2D A1 73 A1 73 B6 73 D6 73 FE 73 22 74 4C 74 N-.s.s.s.s.s"tLt
028690: 54 74 54 74 68 74 73 74 73 74 73 74 73 74 82 74 TtTthtstststst.t
0286A0: F5 CD DD 72 F1 21 88 01 77 23 CD A8 71 77 D6 30 ...r.!..w#..qw.0
0286B0: FA C2 74 FE 0A FA A9 74 D6 11 FA C2 74 FE 06 FA ..t....t....t...
0286C0: A9 74 7E FE 2E CA C4 75 FE 45 CA D5 75 F5 3E 20 .t~....u.E..u.>
0286D0: 77 E5 CD C7 72 E1 F1 FE 48 CA 1C 75 FE 58 CA 1C w...r...H..u.X..
0286E0: 75 2B 7E 21 88 01 11 00 00 FE 42 CA 4D 75 FE 43 u+~!......B.Mu.C
0286F0: CA 4D 75 7E 23 D6 30 FA 9A 75 FE 0A F2 0E 75 EB .Mu~#.0..u....u.
028700: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
028710: 22 00 00 00 02 09 4E E5 22 00 41 02 00 00 00 02 ".....N.".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: BC 6C E5 CD C0 7B D1 C9 CD 31 7D 11 16 7D 0E 09 .l...{...1}..}..
028810: CD 3C 7B C3 B1 7C 2A 2A 20 72 65 77 72 69 74 69 .<{..|** rewriti
028820: 6E 67 20 53 59 4D 20 66 69 6C 65 20 2A 2A 0D 0A ng SYM file **..
028830: 24 2A 0C 01 22 BC 6C 2A 0A 01 22 D5 01 AF BC C0 $*..".l*..".....
028840: BD C0 E1 C9 00 AF 18 02 3E 01 21 A2 7D C3 00 00 ........>.!.}...
028850: AF 18 22 3E 01 18 1E 3E 02 18 1A 3E 03 18 16 3E ..">...>...>...>
028860: 04 18 12 3E 05 18 0E 3E 06 18 0A 3E 07 18 06 3E ...>...>...>...>
028870: 08 18 02 3E 09 21 7B 7D C3 4E 7D 00 C9 7D 00 00 ...>.!{}.N}..}..
028880: 4D 32 4F 56 4C 20 20 20 30 30 30 00 00 00 00 00 M2OVL 000.....
028890: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0288A0: 00 00 00 C9 7D 01 00 4D 32 4F 56 4C 20 20 20 30 ....}..M2OVL 0
0288B0: 30 31 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01..............
0288C0: 00 00 00 00 00 00 00 00 00 46 54 4C 20 4D 6F 64 .........FTL Mod
0288D0: 75 6C 61 2D 32 20 56 31 2E 33 30 20 44 65 66 69 ula-2 V1.30 Defi
0288E0: 6E 69 74 69 6F 6E 20 4D 6F 64 75 6C 65 20 43 6F nition Module Co
0288F0: 6D 70 69 6C 65 72 20 0D 0A 43 6F 70 79 72 69 67 mpiler ..Copyrig
028900: 68 74 20 28 43 29 20 31 39 38 36 2C 20 31 39 38 ht (C) 1986, 198
028910: 37 2C 20 31 39 38 38 20 44 61 76 65 20 4D 6F 6F 7, 1988 Dave Moo
028920: 72 65 0D 0A 0D 0A 24 6E 6F 20 73 6F 75 72 63 65 re....$no source
028930: 0D 0A 24 52 45 4C 20 66 69 6C 65 20 65 72 72 6F ..$REL file erro
028940: 72 0D 0A 24 6E 6F 20 65 72 72 6F 72 20 66 69 6C r..$no error fil
028950: 65 0D 0A 24 00 00 00 00 00 00 00 00 00 00 00 00 e..$............
028960: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028970: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028980: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028990: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0289A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0289B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0289C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0289D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0289E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0289F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028A00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028A10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028A20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028A30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028A40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028A50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028A60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028A70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028A80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028A90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028AA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028AB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028AC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028AD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028AE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028AF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028B00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028B10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028B20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028B30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028B40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028B50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028B60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028B70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028B80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028B90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028BA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028BB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028BC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028BD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028BE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028BF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028C00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028C10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028C20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028C30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028C40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028C50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028C60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028C70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028C80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028C90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028CA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028CB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028CC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028CD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028CE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028CF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028D00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028D10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028D20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028D30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028D40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028D50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028D60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028D70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028D80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028D90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028DA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028DB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028DC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028DD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028DE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028DF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028E00: 01 00 23 00 00 2A 33 00 00 01 0A 00 00 0B 0F 00 ..#..*3.........
028E10: 00 1A 0D 00 00 27 03 00 00 00 00 00 00 00 00 00 .....'..........
028E20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028E30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028E40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028E50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028E60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028E70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028E80: 02 BC 9A 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
028E90: 00 00 00 00 00 00 00 05 06 12 1F 21 01 02 03 05 ...........!....
028EA0: 06 0C 18 19 16 14 15 17 02 03 0D 10 11 12 0E 13 ................
028EB0: 04 05 06 07 08 0F 14 15 16 17 1D 1E 20 01 02 07 ............ ...
028EC0: 18 19 1A 1B 1C 03 03 02 07 08 09 00 01 03 04 0A ................
028ED0: 04 01 05 04 06 DD E5 DD 21 00 00 DD 39 DD 6E 04 ........!...9.n.
028EE0: DD 66 05 E5 21 0A 00 E5 CD F6 97 DD 6E 04 DD 66 .f..!.......n..f
028EF0: 05 5E 23 56 EB ED 5B F2 99 D5 22 F2 99 E5 FD E1 .^#V..[...".....
028F00: 21 00 00 FD 75 03 21 00 00 FD 75 08 FD 74 09 DD !...u.!...u..t..
028F10: 6E 06 26 00 26 00 FD 75 04 FD 74 05 21 00 00 FD n.&.&..u..t.!...
028F20: 75 02 2A E4 0A 11 08 00 19 5E 23 56 FD 73 00 FD u.*......^#V.s..
028F30: 72 01 DD 6E 04 DD 66 05 5E 23 56 D5 2A E4 0A 11 r..n..f.^#V.*...
028F40: 08 00 19 D1 73 23 72 E1 22 F2 99 DD E1 E1 C1 C1 ....s#r.".......
028F50: E9 DD E5 DD 21 00 00 DD 39 E5 E5 21 C5 11 E5 21 ....!...9..!...!
028F60: 14 00 E5 CD F6 97 2A C5 11 ED 5B F0 99 D5 22 F0 ......*...[...".
028F70: 99 E5 FD E1 21 07 00 FD 75 0D FD 74 0E 21 01 00 ....!...u..t.!..
028F80: FD 75 00 FD 74 01 21 02 00 FD 75 02 FD 74 03 21 .u..t.!...u..t.!
028F90: 00 00 FD 75 06 21 00 00 FD 75 0B FD 74 0C 21 00 ...u.!...u..t.!.
028FA0: 00 FD 75 09 FD 74 0A E1 22 F0 99 21 C7 11 E5 21 ..u..t.."..!...!
028FB0: 14 00 E5 CD F6 97 2A C5 11 ED 5B C7 11 01 14 00 ......*...[.....
028FC0: ED B0 2A C7 11 11 02 00 19 11 01 00 73 23 72 21 ..*.........s#r!
028FD0: C9 11 E5 21 14 00 E5 CD F6 97 2A C9 11 ED 5B F0 ...!......*...[.
028FE0: 99 D5 22 F0 99 E5 FD E1 21 4D 00 FD 75 0D FD 74 ..".....!M..u..t
028FF0: 0E 21 01 00 CD 1E 97 FD 75 00 FD 74 01 21 00 00 .!......u..t.!..
029000: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029010: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0290A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0290B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0290C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0290D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0290E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0290F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0291A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0291B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0291C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0291D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0291E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0291F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029200: FD 75 06 21 00 00 FD 75 0B FD 74 0C 21 00 00 FD .u.!...u..t.!...
029210: 75 09 FD 74 0A E1 22 F0 99 21 C9 00 22 D1 11 E5 u..t.."..!.."...
029220: 11 53 9E 21 F8 FF 39 F9 EB 01 08 00 ED B0 CD 9F .S.!..9.........
029230: 12 21 E4 0A D1 73 23 72 2A E4 0A 11 0C 00 19 11 .!...s#r*.......
029240: 04 00 73 E5 11 5B 9E 21 F8 FF 39 F9 EB 01 08 00 ..s..[.!..9.....
029250: ED B0 CD 9F 12 21 E4 0A D1 73 23 72 2A E4 0A 11 .....!...s#r*...
029260: 0C 00 19 11 00 00 73 21 59 11 ED 5B E4 0A 73 23 ......s!Y..[..s#
029270: 72 21 10 00 11 01 00 B7 ED 52 FA 1F 9C D5 E5 DD r!.......R......
029280: 73 FE DD 72 FF 21 20 9A DD 5E FE DD 56 FF 19 5E s..r.! ..^..V..^
029290: 16 00 EB E5 21 0B 9A DD 5E FE DD 56 FF 19 5E 16 ....!...^..V..^.
0292A0: 00 EB 29 11 D3 11 19 E5 CD 40 9A E1 D1 13 2B CB ..)......@....+.
0292B0: 7C CA E8 9B 2A 3B 9A 26 00 E5 2A 36 9A 26 00 29 |...*;.&..*6.&.)
0292C0: 11 07 12 19 E5 CD 40 9A 21 05 00 11 01 00 B7 ED ......@.!.......
0292D0: 52 FA 7C 9C D5 E5 DD 73 FE DD 72 FF 21 01 9A DD R.|....s..r.!...
0292E0: 5E FE DD 56 FF 19 5E 16 00 EB E5 21 06 9A DD 5E ^..V..^....!...^
0292F0: FE DD 56 FF 19 5E 16 00 EB 29 E5 21 1D 12 11 FE ..V..^...).!....
029300: FF 19 D1 19 E5 CD 40 9A E1 D1 13 2B CB 7C CA 3F ......@....+.|.?
029310: 9C 21 08 00 E5 21 2F 12 E5 CD 40 9A 21 22 00 E5 .!...!/...@.!"..
029320: 21 53 01 E5 CD 40 9A 2A E4 0A 11 08 00 19 5E 23 !S...@.*......^#
029330: 56 D5 2A E4 0A 11 0F 00 19 D1 73 23 72 E5 11 63 V.*.......s#r..c
029340: 9E 21 F8 FF 39 F9 EB 01 08 00 ED B0 CD 9F 12 21 .!..9..........!
029350: E4 0A D1 73 23 72 2A E4 0A 22 E8 0A 21 59 11 ED ...s#r*.."..!Y..
029360: 5B E4 0A 73 23 72 21 05 00 11 01 00 B7 ED 52 FA [..s#r!.......R.
029370: 14 9D D5 E5 DD 73 FE DD 72 FF 21 30 9A DD 5E FE .....s..r.!0..^.
029380: DD 56 FF 19 5E 16 00 EB E5 21 1B 9A DD 5E FE DD .V..^....!...^..
029390: 56 FF 19 5E 16 00 EB 29 11 D3 11 19 E5 CD 40 9A V..^...)......@.
0293A0: E1 D1 13 2B CB 7C CA DD 9C 21 05 00 11 02 00 B7 ...+.|...!......
0293B0: ED 52 FA 57 9D D5 E5 DD 73 FE DD 72 FF 21 3A 9A .R.W....s..r.!:.
0293C0: DD 5E FE DD 56 FF 19 5E 16 00 EB E5 21 35 9A DD .^..V..^....!5..
0293D0: 5E FE DD 56 FF 19 5E 16 00 EB 29 11 07 12 19 E5 ^..V..^...).....
0293E0: CD 40 9A E1 D1 13 2B CB 7C CA 20 9D 21 0A 00 E5 .@....+.|. .!...
0293F0: 21 1D 12 11 06 00 19 E5 CD 40 9A 21 0B 00 E5 21 !........@.!...!
029400: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029410: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029420: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029430: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029440: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029450: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029480: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0294A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0294B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0294C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0294D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0294E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0294F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029500: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029510: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029520: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029530: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029540: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029550: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029560: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029570: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029580: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029590: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0295A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0295B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0295C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0295D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0295E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0295F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029600: 1D 12 11 0C 00 19 E5 CD 40 9A E5 11 68 9E 21 F8 ........@...h.!.
029610: FF 39 F9 EB 01 08 00 ED B0 CD 9F 12 21 E4 0A D1 .9..........!...
029620: 73 23 72 21 59 11 11 64 00 19 ED 5B E4 0A 73 23 s#r!Y..d...[..s#
029630: 72 E5 21 01 00 E5 21 32 00 E5 CD 0C 1D D1 DD 73 r.!...!2.......s
029640: FC DD 72 FD DD 6E FC DD 66 FD 11 02 00 19 11 01 ..r..n..f.......
029650: 00 73 DD 6E FC DD 66 FD 11 06 00 19 11 00 00 73 .s.n..f........s
029660: 23 72 2A E4 0A ED 5B F0 99 D5 22 F0 99 E5 FD E1 #r*...[...".....
029670: 21 02 00 FD 75 0C 21 00 00 FD 75 0D FD 74 0E 21 !...u.!...u..t.!
029680: 00 00 FD 75 19 FD 74 1A 21 00 00 FD 75 1B FD 74 ...u..t.!...u..t
029690: 1C E1 22 F0 99 2A F4 97 22 2D 12 2A D5 0B ED 5B .."..*.."-.*...[
0296A0: 80 00 16 00 B7 ED 52 F2 4B 9E 21 81 00 2B ED 5B ......R.K.!..+.[
0296B0: D5 0B 19 5E 16 00 EB 11 20 00 B7 ED 52 CA 41 9E ...^.... ...R.A.
0296C0: 21 81 00 2B ED 5B D5 0B 19 5E 16 00 EB 11 09 00 !..+.[...^......
0296D0: B7 ED 52 C2 4B 9E 2A D5 0B 23 22 D5 0B C3 06 9E ..R.K.*..#".....
0296E0: DD F9 DD E1 C9 C3 00 00 4C 4F 41 44 45 52 20 20 ........LOADER
0296F0: 53 59 53 54 45 4D 20 20 52 45 41 4C 24 20 20 20 SYSTEM REAL$
029700: 20 20 20 20 20 00 00 00 00 00 00 00 00 00 00 00 ...........
029710: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029720: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029730: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029740: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029750: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029760: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029770: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029780: 03 EF 9C 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029790: 00 00 00 00 00 00 00 00 00 05 4F 55 54 50 55 54 ..........OUTPUT
0297A0: 20 20 44 41 54 00 00 00 00 00 00 00 00 00 00 00 DAT...........
0297B0: 00 00 05 06 12 1F 21 01 02 03 05 06 0C 18 19 16 ......!.........
0297C0: 14 15 17 02 03 0D 10 11 12 0E 13 04 05 06 07 08 ................
0297D0: 0F 14 15 16 17 1D 1E 20 01 02 07 18 19 1A 1B 1C ....... ........
0297E0: 03 03 02 07 08 09 00 01 03 04 0A 04 01 05 04 06 ................
0297F0: 00 00 00 00 DD E5 DD 21 00 00 DD 39 E5 FD 2A EE .......!...9..*.
029800: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029810: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029820: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029830: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029840: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029850: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029860: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029870: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029880: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029890: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0298A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0298B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0298C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0298D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0298E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0298F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029900: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029910: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029920: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029930: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029940: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029950: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029960: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029970: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029980: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029990: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0299A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0299B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0299C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0299D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0299E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0299F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
029A00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
029A10: 23 00 00 00 02 09 4E E5 23 00 41 02 00 00 00 02 #.....N.#.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: 99 FD 6E FA FD 66 FB 11 08 00 19 5E 23 56 DD 73 ..n..f.....^#V.s
029B10: FE DD 72 FF DD 6E FE DD 66 FF 11 FF FF B7 ED 52 ..r..n..f......R
029B20: CA B9 9A DD 6E FE DD 66 FF 11 04 00 19 5E 23 56 ....n..f.....^#V
029B30: EB DD 5E 06 16 00 B7 ED 52 CA B9 9A DD 6E FE DD ..^.....R....n..
029B40: 66 FF 5E 23 56 DD 73 FE DD 72 FF C3 7F 9A DD 6E f.^#V.s..r.....n
029B50: FE DD 66 FF 11 FF FF B7 ED 52 CA DA 9A DD 6E 04 ..f......R....n.
029B60: DD 66 05 DD 5E FE DD 56 FF 73 23 72 C3 EF 9A 21 .f..^..V.s#r...!
029B70: 02 9A E5 CD F2 3C 21 35 A1 E5 21 0F 00 E5 CD 15 .....<!5..!.....
029B80: 3D CD E3 3C DD F9 DD E1 E1 C1 C1 E9 DD E5 DD 21 =..<...........!
029B90: 00 00 DD 39 E5 21 10 00 11 01 00 B7 ED 52 FA 43 ...9.!.......R.C
029BA0: 9B D5 E5 DD 73 FE DD 72 FF 21 3B 9A DD 5E FE DD ....s..r.!;..^..
029BB0: 56 FF 19 5E 16 00 EB E5 21 26 9A DD 5E FE DD 56 V..^....!&..^..V
029BC0: FF 19 5E 16 00 EB 29 11 D3 11 19 E5 CD 5F 9A E1 ..^...)......_..
029BD0: D1 13 2B CB 7C CA 0C 9B 2A 56 9A 26 00 E5 2A 51 ..+.|...*V.&..*Q
029BE0: 9A 26 00 29 11 07 12 19 E5 CD 5F 9A 21 06 00 11 .&.)......_.!...
029BF0: 01 00 B7 ED 52 FA 98 9B D5 E5 DD 73 FE DD 72 FF ....R......s..r.
029C00: 21 1C 9A DD 5E FE DD 56 FF 19 5E 16 00 EB E5 DD !...^..V..^.....
029C10: 6E FE DD 66 FF 29 E5 21 1D 12 11 FE FF 19 D1 19 n..f.).!........
029C20: E5 CD 5F 9A E1 D1 13 2B CB 7C CA 63 9B 21 08 00 .._....+.|.c.!..
029C30: E5 21 2F 12 E5 CD 5F 9A DD F9 DD E1 C9 DD E5 DD .!/..._.........
029C40: 21 00 00 DD 39 E5 21 05 00 11 01 00 B7 ED 52 FA !...9.!.......R.
029C50: F4 9B D5 E5 DD 73 FE DD 72 FF 21 4B 9A DD 5E FE .....s..r.!K..^.
029C60: DD 56 FF 19 5E 16 00 EB E5 21 36 9A DD 5E FE DD .V..^....!6..^..
029C70: 56 FF 19 5E 16 00 EB 29 11 D3 11 19 E5 CD 5F 9A V..^...)......_.
029C80: E1 D1 13 2B CB 7C CA BD 9B 21 05 00 11 02 00 B7 ...+.|...!......
029C90: ED 52 FA 37 9C D5 E5 DD 73 FE DD 72 FF 21 55 9A .R.7....s..r.!U.
029CA0: DD 5E FE DD 56 FF 19 5E 16 00 EB E5 21 50 9A DD .^..V..^....!P..
029CB0: 5E FE DD 56 FF 19 5E 16 00 EB 29 11 07 12 19 E5 ^..V..^...).....
029CC0: CD 5F 9A E1 D1 13 2B CB 7C CA 00 9C 21 0A 00 E5 ._....+.|...!...
029CD0: 21 1D 12 11 06 00 19 E5 CD 5F 9A DD F9 DD E1 C9 !........_......
029CE0: DD E5 DD 21 00 00 DD 39 21 FA FF 39 F9 2A D3 0B ...!...9!..9.*..
029CF0: DD 75 FA DD 74 FB 21 00 00 DD 75 FE DD 74 FF DD .u..t.!...u..t..
029D00: ED 7B 06 00 11 7C 02 CD 3A 01 21 80 00 7E B7 20 .{...|..:.!..~.
029D10: 0B 21 E0 02 11 5C 00 01 0C 00 ED B0 11 5C 00 D5 .!...\.......\..
029D20: DD E1 DD 7E 01 FE 20 20 16 D5 13 21 E1 02 01 0B ...~.. ...!....
029D30: 00 ED B0 D1 18 09 CD 3A 01 C7 0E 09 C3 05 00 AF .......:........
029D40: 32 EC 02 32 ED 02 1A 32 EE 02 0E 11 CD 05 00 3C 2..2...2.......<
029D50: 20 05 11 A6 02 18 DF F5 3A EE 02 B7 20 09 0E 19 .......:... ...
029D60: CD 05 00 3C 32 EE 02 21 00 00 47 37 CB 15 CB 14 ...<2..!..G7....
029D70: A7 10 F9 E5 0E 1D CD 05 00 D1 7D A3 6F 7C A2 B5 ..........}£o|..
029D80: 28 05 11 98 02 18 AF F1 3D 87 87 87 87 87 5F 16 (.......=....._.
029D90: 00 21 80 00 19 CD FB 01 0E 12 CD 05 00 3C 20 E8 .!...........< .
029DA0: 21 EF 02 E5 CD 24 02 3A ED 02 B7 20 1E 11 C9 02 !....$.:... ....
029DB0: CD 3A 01 0E 01 CD 05 00 F6 20 FE 71 28 3C FE 61 .:....... .q(<.a
029DC0: 20 05 32 ED 02 18 04 FE 79 20 03 CD 57 02 F5 11 .2.....y ..W...
029DD0: 95 02 CD 3A 01 F1 E1 FE 70 3A EC 02 28 0C 11 0C ...:....p:..(...
029DE0: 00 19 3D 28 15 32 EC 02 18 B9 11 F4 FF 19 11 EF ..=(.2..........
029DF0: 02 B7 ED 52 19 38 03 3C 18 EB C7 23 E5 11 0C 00 ...R.8.<...#....
029E00: 21 00 00 3A EC 02 B7 28 04 47 19 10 FD 11 EF 02 !..:...(.G......
029E10: 19 F5 3A EE 02 77 F1 23 D1 EB 01 0B 00 ED B0 3C ..:..w.#.......<
029E20: 32 EC 02 C9 7E 23 E5 C6 40 5F 0E 02 CD 05 00 1E 2...~#..@_......
029E30: 3A 0E 02 CD 05 00 E1 06 0B E5 C5 3E 03 B8 20 09 :..........>.. .
029E40: E5 1E 2E 0E 02 CD 05 00 E1 5E CB BB 0E 02 CD 05 .........^......
029E50: 00 C1 E1 23 10 E3 C9 D1 E1 E5 D5 11 5C 00 01 0C ...#........\...
029E60: 00 ED B0 11 5C 00 D5 DD E1 DD CB 09 7E 20 07 0E ....\.......~ ..
029E70: 13 CD 05 00 3C C0 11 B8 02 C3 3A 01 57 44 45 4C ....<.....:.WDEL
029E80: 20 56 32 2E 30 20 28 43 29 20 31 39 38 37 20 48 V2.0 (C) 1987 H
029E90: 69 53 6F 66 74 0D 0A 24 44 72 69 76 65 20 69 73 iSoft..$Drive is
029EA0: 20 52 2F 4F 21 24 4E 6F 20 6D 61 74 63 68 69 6E R/O!$No matchin
029EB0: 67 20 66 69 6C 65 73 24 20 20 43 61 6E 6E 6F 74 g files$ Cannot
029EC0: 20 64 65 6C 65 74 65 21 24 20 20 44 65 6C 65 74 delete!$ Delet
029ED0: 65 20 28 59 2F 4E 2F 41 2F 51 2F 50 29 3F 20 24 e (Y/N/A/Q/P)? $
029EE0: 00 3F 3F 3F 3F 3F 3F 3F 3F 3F 3F 3F 00 00 00 00 .???????????....
029EF0: FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 FF 00 ................
029F00: 2A 06 00 F9 11 00 FF 19 22 F9 04 11 51 11 A7 ED *......."...Q...
029F10: 52 7C 1F 1F E6 3F 3C F5 11 68 04 CD 42 03 CD 38 R|...?<..h..B..8
029F20: 04 F1 CD E9 03 3E 4B CD 47 03 11 8F 04 CD 42 03 .....>K.G.....B.
029F30: 3A 5C 00 B7 20 03 CD 68 01 32 F3 04 21 6C 00 7E :\.. ..h.2..!l.~
029F40: B7 20 1C 23 7E FE 2D 20 13 23 7E FE 51 28 04 FE . .#~.- .#~.Q(..
029F50: 42 20 09 23 7E FE 20 20 03 32 6D 00 CD 68 01 32 B .#~. .2m..h.2
029F60: F2 04 18 0B CD 42 03 C7 0E 19 CD 05 00 3C C9 11 .....B.......<..
029F70: 46 05 01 0B 00 21 6D 00 7E FE 20 20 03 21 E7 04 F....!m.~. .!..
029F80: ED B0 11 5C 00 D5 DD E1 DD 7E 01 FE 20 20 0B D5 ...\.....~.. ..
029F90: 13 21 E7 04 01 0B 00 ED B0 D1 0E 11 CD 05 00 3C .!.............<
029FA0: 20 05 11 92 04 18 BD 3D 87 87 87 87 87 5F 16 00 ......=....._..
029FB0: 21 80 00 19 3A F4 04 F5 E5 21 51 05 B7 28 07 47 !...:....!Q..(.G
029FC0: 11 0B 00 19 10 FD D1 13 01 0B 00 EB ED B0 F1 3C ...............<
029FD0: 32 F4 04 0E 12 CD 05 00 3C 20 CC 21 51 05 E5 CD 2.......< .!Q...
029FE0: 9B 02 21 FE 04 CD 4C 03 11 C1 04 CD 42 03 21 22 ..!...L.....B.!"
029FF0: 05 E5 CD 4C 03 E1 11 FE 04 06 0C 1A BE 23 13 20 ...L.........#.
02A000: 10 10 F8 11 C6 04 CD 42 03 3A FD 04 B7 28 3C 18 .......B.:...(<.
02A010: 5B 3A F7 04 B7 20 2D 11 CD 04 CD 42 03 0E 01 CD [:... -....B....
02A020: 05 00 F6 20 FE 71 CA 00 00 FE 61 20 05 32 F7 04 ... .q....a .2..
02A030: 18 0C FE 62 28 31 FE 77 28 2C FE 79 20 09 3A F5 ...b(1.w(,.y .:.
02A040: 04 32 F6 04 CD CC 02 FE 70 28 21 11 8F 04 CD 42 .2......p(!....B
02A050: 03 E1 11 0B 00 19 AF 32 FD 04 3A F4 04 3D 28 C6 .......2..:..=(.
02A060: 32 F4 04 C3 DE 01 AF 32 F6 04 18 D8 11 8F 04 CD 2......2........
02A070: 42 03 E1 11 F5 FF 19 01 51 05 B7 ED 42 09 DA 00 B.......Q...B...
02A080: 00 3E 01 32 FD 04 3A F4 04 3C 18 D4 01 23 00 E5 .>.2..:..<...#..
02A090: D5 62 6B 13 36 00 ED B0 D1 E1 C9 E5 11 FE 04 CD .bk.6...........
02A0A0: 8C 02 3A F3 04 12 13 01 0B 00 ED B0 11 22 05 CD ..:.........."..
02A0B0: 8C 02 3A F2 04 12 13 21 46 05 06 0B 7E FE 3F 23 ..:....!F...~.?#
02A0C0: E3 20 01 7E 23 E3 12 13 10 F2 E1 C9 11 FE 04 0E . .~#...........
02A0D0: 0F CD 05 00 3C 28 68 AF 32 1E 05 3A F6 04 B7 28 ....<(h.2..:...(
02A0E0: 34 21 2B 05 7E F5 36 42 23 5E 36 41 23 56 36 4B 4!+.~.6B#^6A#V6K
02A0F0: E5 D5 11 22 05 0E 13 CD 05 00 21 23 05 11 33 05 ..."......!#..3.
02A100: 02 1E 3A CD F5 02 E1 06 0B E5 C5 3E 03 B8 20 07 ..:........>.. .
02A110: E5 1E 2E CD F5 02 E1 5E CB BB 73 CD F5 02 C1 E1 .......^..s.....
02A120: 23 10 E6 C9 AF 32 98 04 67 6F 22 9B 04 11 F1 10 #....2..go".....
02A130: D5 0E 1A CD 05 00 11 9E 04 0E 14 CD 05 00 D1 A7 ................
02A140: 20 19 2A 9B 04 23 22 9B 04 21 80 00 19 ED 5B 99 .*..#"..!....[.
02A150: 04 EB ED 52 30 DA 3E 01 32 98 04 ED 4B 9B 04 78 ...R0.>.2...K..x
02A160: B1 28 23 11 F1 10 C5 D5 0E 1A CD 05 00 11 C2 04 .(#.............
02A170: 0E 15 CD 05 00 D1 C1 A7 28 02 AF C9 21 80 00 19 ........(...!...
02A180: EB 0B 78 B1 20 E0 3A 98 04 A7 20 98 11 C2 04 0E ..x. .:... .....
02A190: 10 CD 05 00 3C C9 4F AF 21 81 00 1E 02 D5 E5 11 ....<.O.!.......
02A1A0: 0A 00 21 00 00 06 10 CB 11 17 ED 6A ED 52 30 01 ..!........j.R0.
02A1B0: 19 3F 10 F3 CB 11 17 55 E1 72 2B D1 1D 20 DE 06 .?.....U.r+.. ..
02A1C0: 02 CB 81 78 FE 01 20 02 CB C1 23 7E B7 20 08 CB ...x.. ...#~. ..
02A1D0: 41 20 04 3E 20 18 04 CB C1 C6 30 E5 C5 CD F4 02 A .> .....0.....
02A1E0: C1 E1 10 DF C9 AF 32 97 04 32 96 04 47 3A 80 00 ......2..2..G:..
02A1F0: 4F 21 81 00 3E 2D ED B1 C0 3E 51 BE 20 F6 2B 2B O!..>-...>Q. .++
02A200: 3E 20 BE 28 03 23 18 EC 3E 01 32 97 04 C9 57 50 > .(.#..>.2...WP
02A210: 20 56 32 2E 32 20 28 43 29 20 31 39 38 37 20 48 V2.2 (C) 1987 H
02A220: 69 53 6F 66 74 0D 0A 42 75 66 66 65 72 20 73 69 iSoft..Buffer si
02A230: 7A 65 3A 20 24 0D 0A 24 4E 6F 20 66 69 6C 65 73 ze: $..$No files
02A240: 24 20 4F 70 65 6E 20 66 61 69 6C 65 64 24 20 44 $ Open failed$ D
02A250: 69 73 63 20 49 2F 4F 20 65 72 72 6F 72 20 28 46 isc I/O error (F
02A260: 75 6C 6C 20 3F 29 24 20 74 6F 20 24 20 20 53 61 ull ?)$ to $ Sa
02A270: 6D 65 24 20 20 43 6F 70 79 20 28 59 2F 4E 2F 41 me$ Copy (Y/N/A
02A280: 2F 51 2F 50 29 3F 20 24 00 3F 3F 3F 3F 3F 3F 3F /Q/P)? $.???????
02A290: 3F 3F 3F 3F 00 00 00 00 00 00 00 00 00 00 03 01 ????............
02A2A0: 08 00 08 0A 80 20 F1 FA 98 DB F9 86 0A 00 80 20 ..... .........
02A2B0: 00 00 01 01 08 00 05 00 02 FF 02 00 01 08 00 00 ................
02A2C0: 03 01 08 00 08 0B 81 63 28 1B 28 E7 FA DA 0B 00 .......c(.(.....
02A2D0: 81 63 00 00 01 01 08 00 05 00 02 FF 02 00 01 08 .c..............
02A2E0: 00 00 03 01 08 00 08 0C 83 08 DB E2 AD 47 A8 A2 .............G..
02A2F0: 0C 00 83 08 00 00 01 01 08 00 05 00 02 FF 02 00 ................
02A300: 01 0B 00 ED B0 D1 E1 72 2B 73 2B F1 77 0E 17 11 .......r+s+.w...
02A310: 22 05 CD 05 00 11 22 05 D5 0E 13 CD 05 00 D1 0E ".....".........
02A320: 16 CD 05 00 3C 28 18 CD 77 03 C0 11 22 05 D5 0E ....<(..w..."...
02A330: 10 CD 05 00 D1 0E 13 CD 05 00 11 A8 04 18 03 11 ................
02A340: 9B 04 0E 09 C3 05 00 5F 0E 02 18 F8 7E C6 40 23 ......._....~.@#
02A350: E5 CD 47 03 1E 3A CD 48 03 E1 06 0B E5 C5 3E 03 ..G..:.H......>.
02A360: B8 20 07 E5 1E 2E CD 48 03 E1 5E CB BB 73 CD 48 . .....H..^..s.H
02A370: 03 C1 E1 23 10 E6 C9 AF 32 F8 04 67 6F 22 FB 04 ...#....2..go"..
02A380: 11 51 11 D5 0E 1A CD 05 00 11 FE 04 0E 14 CD 05 .Q..............
02A390: 00 D1 A7 20 19 2A FB 04 23 22 FB 04 21 80 00 19 ... .*..#"..!...
02A3A0: ED 5B F9 04 EB ED 52 30 DA 3E 01 32 F8 04 ED 4B .[....R0.>.2...K
02A3B0: FB 04 78 B1 28 23 11 51 11 C5 D5 0E 1A CD 05 00 ..x.(#.Q........
02A3C0: 11 22 05 0E 15 CD 05 00 D1 C1 A7 28 02 AF C9 21 .".........(...!
02A3D0: 80 00 19 EB 0B 78 B1 20 E0 3A F8 04 A7 20 98 11 .....x. .:... ..
02A3E0: 22 05 0E 10 CD 05 00 3C C9 4F AF 21 81 00 1E 02 "......<.O.!....
02A3F0: D5 E5 11 0A 00 21 00 00 06 10 CB 11 17 ED 6A ED .....!........j.
02A400: 52 30 01 19 3F 10 F3 CB 11 17 55 E1 72 2B D1 1D R0..?.....U.r+..
02A410: 20 DE 06 02 CB 81 78 FE 01 20 02 CB C1 23 7E B7 .....x.. ...#~.
02A420: 20 08 CB 41 20 04 3E 20 18 04 CB C1 C6 30 E5 C5 ..A .> .....0..
02A430: CD 47 03 C1 E1 10 DF C9 AF 32 F7 04 32 F4 04 47 .G.......2..2..G
02A440: 3A 80 00 4F 21 81 00 3E 2D ED B1 C0 2B 2B 7E FE :..O!..>-...++~.
02A450: 20 23 23 20 F2 7E 23 FE 51 28 08 FE 42 C0 32 F5 ## .~#.Q(..B.2.
02A460: 04 18 F2 32 F7 04 18 ED 57 50 20 56 33 2E 30 20 ...2....WP V3.0
02A470: 28 43 29 20 31 39 38 37 20 48 69 53 6F 66 74 0D (C) 1987 HiSoft.
02A480: 0A 42 75 66 66 65 72 20 73 69 7A 65 3A 20 24 0D .Buffer size: $.
02A490: 0A 24 4E 6F 20 66 69 6C 65 73 24 20 4F 70 65 6E .$No files$ Open
02A4A0: 20 66 61 69 6C 65 64 24 20 44 69 73 63 20 49 2F failed$ Disc I/
02A4B0: 4F 20 65 72 72 6F 72 20 28 46 75 6C 6C 20 3F 29 O error (Full ?)
02A4C0: 24 20 74 6F 20 24 20 20 53 61 6D 65 24 20 20 43 $ to $ Same$ C
02A4D0: 6F 70 79 20 28 59 2F 4E 2F 41 2F 51 2F 50 2F 42 opy (Y/N/A/Q/P/B
02A4E0: 2F 57 29 3F 20 24 00 3F 3F 3F 3F 3F 3F 3F 3F 3F /W)? $.?????????
02A4F0: 3F 3F 00 00 00 00 00 00 00 00 00 00 00 00 20 4C ??............ L
02A500: 6E 04 DD 66 05 5E 23 56 EB E5 DD 6E FE DD 66 FF n..f.^#V...n..f.
02A510: 29 11 7E 0A 19 5E 23 56 EB D1 B7 ED 52 CA D9 9C ).~..^#V....R...
02A520: DD 6E FE DD 66 FF 23 DD 75 FE DD 74 FF DD 6E FA .n..f.#.u..t..n.
02A530: DD 66 FB 11 0A 00 19 5E 23 56 DD 73 FA DD 72 FB .f.....^#V.s..r.
02A540: DD 6E FA DD 66 FB 11 FF FF B7 ED 52 C2 D6 9C DD .n..f......R....
02A550: 6E 04 DD 66 05 5E 23 56 D5 DD 6E FE DD 66 FF 29 n..f.^#V..n..f.)
02A560: 11 7E 0A 19 D1 73 23 72 CD 97 12 C3 6A 9C DD 6E .~...s#r....j..n
02A570: 04 DD 66 05 DD 5E FA DD 56 FB 73 23 72 DD F9 DD ..f..^..V.s#r...
02A580: E1 E1 C1 E9 DD E5 2A EE 99 E5 ED 73 EE 99 DD 2A ......*....s...*
02A590: EE 99 21 F0 FF 39 F9 CD 20 4E 2A D7 0B DD 75 FC ..!..9.. N*...u.
02A5A0: DD 74 FD CD 20 4E 2A D7 0B DD 75 FE DD 74 FF 21 .t.. N*...u..t.!
02A5B0: 00 00 22 6B 0D 21 00 00 22 7C 0A DD 6E FE DD 66 .."k.!.."|..n..f
02A5C0: FF 11 04 00 B7 ED 52 FA 84 9D 21 58 0A E5 21 32 ......R...!X..!2
02A5D0: 06 E5 21 15 00 E5 21 FF 03 E5 CD A2 13 21 32 0A ..!...!......!2.
02A5E0: E5 21 32 06 E5 21 14 00 E5 21 FF 03 E5 CD A2 13 .!2..!...!......
02A5F0: DD 6E FE DD 66 FF 11 04 00 B7 ED 52 DD 75 FE DD .n..f......R.u..
02A600: 74 FF 2A 6B 0D 11 FF 03 19 22 6B 0D 2A 7C 0A 11 t.*k....."k.*|..
02A610: 08 00 19 22 7C 0A C3 26 9D 2A 7C 0A 11 07 00 19 ..."|..&.*|.....
02A620: 22 30 02 21 32 06 11 32 02 01 00 04 ED B0 DD 6E "0.!2..2.......n
02A630: FE DD 66 FF 29 29 29 29 29 29 29 29 DD 5E FC DD ..f.)))))))).^..
02A640: 56 FD 19 22 56 0A 2A 6B 0D ED 5B 56 0A 19 22 6B V.."V.*k..[V.."k
02A650: 0D 21 CD 11 E5 CD 61 4E CD 20 4E 2A D7 0B 11 00 .!....aN. N*....
02A660: 00 B7 ED 52 21 00 00 28 01 23 7D 32 74 12 21 75 ...R!..(.#}2t.!u
02A670: 12 E5 CD 61 4E CD 20 4E 2A D7 0B 11 00 00 B7 ED ...aN. N*.......
02A680: 52 21 00 00 28 01 23 7D 32 79 12 21 7B 12 E5 CD R!..(.#}2y.!{...
02A690: 61 4E 2A 6B 0D ED 5B 7B 12 19 22 6B 0D 2A 6B 0D aN*k..[{.."k.*k.
02A6A0: E5 CD 5B 18 21 FF 03 ED 5B 2A 02 B7 ED 52 FA 3B ..[.!...[*...R.;
02A6B0: 9E D5 E5 DD 73 FE DD 72 FF 21 32 02 DD 5E FE DD ....s..r.!2..^..
02A6C0: 56 FF 19 11 00 00 73 E1 D1 13 2B CB 7C CA 1C 9E V.....s...+.|...
02A6D0: 21 00 00 DD 75 FE DD 74 FF 21 7E 0A E5 CD 61 4E !...u..t.!~...aN
02A6E0: 21 FF FF DD 75 F8 DD 74 F9 21 FF FF 22 D3 0B 21 !...u..t.!.."..!
02A6F0: 01 00 CD 1E 97 E5 DD 6E FE DD 66 FF 29 11 7E 0A .......n..f.).~.
02A700: ED 7B 06 00 11 F3 03 CD 87 01 0E 19 CD 05 00 32 .{.............2
02A710: 5C 04 21 80 00 7E A7 20 0B 21 1F 04 11 5C 00 01 \.!..~. .!...\..
02A720: 0C 00 ED B0 AF 32 55 04 32 5F 04 11 5C 00 D5 DD .....2U.2_..\...
02A730: E1 DD 7E 01 FE 20 20 0B D5 13 21 20 04 01 0B 00 ..~.. ...! ....
02A740: ED B0 D1 1A B7 20 04 3A 5C 04 3C 3D 32 5D 04 5F ..... .:\.<=2]._
02A750: 0E 0E CD 05 00 0E 1F CD 05 00 22 56 04 23 23 23 .........."V.###
02A760: 23 7E 32 58 04 11 5C 00 DD 36 0C 3F 0E 11 CD 05 #~2X..\..6.?....
02A770: 00 3C 20 18 11 41 04 CD 87 01 CD 1B 03 3A 5C 04 .< ..A.......:\.
02A780: 5F 0E 0E CD 05 00 C7 0E 09 C3 05 00 3D 87 87 87 _...........=...
02A790: 87 87 5F 16 00 21 80 00 19 3A 5F 04 F5 E5 21 65 .._..!...:_...!e
02A7A0: 04 B7 28 07 47 11 10 00 19 10 FD D1 01 10 00 EB ..(.G...........
02A7B0: ED B0 F1 3C 32 5F 04 0E 12 CD 05 00 3C 20 CD CD ...<2_......< ..
02A7C0: 65 02 3A 5F 04 47 DD 21 65 04 C5 DD CB 00 7E CC e.:_.G.!e.....~.
02A7D0: DC 01 11 10 00 DD 19 C1 10 F0 18 98 CD 41 02 11 .............A..
02A7E0: 2E 04 DD CB 0A 7E 28 03 11 2B 04 CD 87 01 11 34 .....~(..+.....4
02A7F0: 04 DD CB 09 7E 28 03 11 31 04 CD 87 01 DD 6E 0F ....~(..1.....n.
02A800: DD 66 0E 7D B4 28 13 7D E6 07 20 01 2B CB 3C CB .f.}.(.}.. .+.<.
02A810: 1D CB 3C CB 1D CB 3C CB 1D 23 4D 7C CD A2 03 11 ..<...<..#M|....
02A820: 37 04 CD 87 01 DD 4E 0F DD 7E 0E CD A2 03 11 1A 7.....N..~......
02A830: 04 3A 55 04 EE 01 32 55 04 28 03 11 1D 04 C3 87 .:U...2U.(......
02A840: 01 DD E5 E1 06 0B 23 E5 C5 3E 03 B8 20 09 E5 1E ......#..>.. ...
02A850: 2E 0E 02 CD 05 00 E1 5E CB BB 0E 02 CD 05 00 C1 .......^........
02A860: E1 23 10 E3 C9 DD 21 65 04 3A 5F 04 47 C5 3A 58 .#....!e.:_.G.:X
02A870: 04 DD BE 0C 38 25 DD 7E 0F FE 80 20 1E CD CC 02 ....8%.~... ....
02A880: 28 19 FD CB 00 FE FD 6E 0F FD 66 0E DD 5E 0F DD (......n..f..^..
02A890: 56 0E 19 DD 75 0F DD 74 0E 18 E2 3A 58 04 B7 C4 V...u..t...:X...
02A8A0: AB 02 11 10 00 DD 19 C1 10 C3 C9 3C 5F DD 4E 0C ...........<_.N.
02A8B0: AF 57 CD DD 03 7D B7 C8 45 DD 6E 0F DD 66 0E 11 .W...}..E.n..f..
02A8C0: 80 00 19 10 FD DD 75 0F DD 74 0E C9 FD 21 65 04 ......u..t...!e.
02A8D0: C5 3A 5F 04 47 DD E5 FD E5 E1 D1 A7 ED 52 28 09 .:_.G........R(.
02A8E0: FD CB 00 7E CC 08 03 28 0A 11 10 00 FD 19 10 E5 ...~...(........
02A8F0: AF C1 C9 3A 58 04 B7 28 0B DD E5 FD E5 DD E1 CD ...:X..(........
02A900: 19 5E 23 56 EB D1 B7 ED 52 CA A7 A0 DD E5 E1 01 .^#V....R.......
02A910: FA FF 09 E5 21 1D 00 E5 CD F6 97 DD 6E F8 DD 66 ....!.......n..f
02A920: F9 11 FF FF B7 ED 52 CA AB 9E DD 6E F8 DD 66 F9 ......R....n..f.
02A930: 11 0A 00 19 DD 5E FA DD 56 FB 73 23 72 C3 B4 9E .....^..V.s#r...
02A940: DD 6E FA DD 66 FB 22 D3 0B DD 6E FA DD 66 FB DD .n..f."...n..f..
02A950: 75 F8 DD 74 F9 DD 6E FA DD 66 FB E5 21 1D 00 E5 u..t..n..f..!...
02A960: CD 74 90 DD 6E FA DD 66 FB 11 0C 00 19 5E 16 00 .t..n..f.....^..
02A970: EB 11 01 00 B7 ED 52 C2 F3 9E DD 6E FA DD 66 FB ......R....n..f.
02A980: 11 0C 00 19 11 00 00 73 DD 6E FA DD 66 FB 11 08 .......s.n..f...
02A990: 00 19 5E 23 56 DD 73 F6 DD 72 F7 21 FF FF DD 75 ..^#V.s..r.!...u
02A9A0: F4 DD 74 F5 DD 6E F6 DD 66 F7 11 FF FF B7 ED 52 ..t..n..f......R
02A9B0: CA 8D 9F DD E5 E1 01 F6 FF 09 E5 21 0A 00 E5 CD ...........!....
02A9C0: F6 97 DD 6E F6 DD 66 F7 E5 21 0A 00 E5 CD 74 90 ...n..f..!....t.
02A9D0: DD 6E F4 DD 66 F5 11 FF FF B7 ED 52 C2 60 9F DD .n..f......R.`..
02A9E0: 6E FA DD 66 FB 11 08 00 19 DD 5E F6 DD 56 F7 73 n..f......^..V.s
02A9F0: 23 72 C3 6F 9F DD 6E F4 DD 66 F5 DD 5E F6 DD 56 #r.o..n..f..^..V
02AA00: F7 73 23 72 DD 6E F6 DD 66 F7 DD 75 F4 DD 74 F5 .s#r.n..f..u..t.
02AA10: DD 6E F6 DD 66 F7 5E 23 56 DD 73 F6 DD 72 F7 C3 .n..f.^#V.s..r..
02AA20: 0F 9F DD 6E FA DD 66 FB 11 08 00 19 5E 23 56 D5 ...n..f.....^#V.
02AA30: DD 6E FA DD 66 FB 11 0F 00 19 D1 73 23 72 DD 6E .n..f......s#r.n
02AA40: FA DD 66 FB EB 21 44 A1 01 08 00 CD CC 97 C2 C2 ..f..!D.........
02AA50: 9F CD F7 9A C3 D8 9F DD 6E FA DD 66 FB EB 21 4C ........n..f..!L
02AA60: A1 01 08 00 CD CC 97 C2 D8 9F CD A8 9B DD 6E FA ..............n.
02AA70: DD 66 FB 11 17 00 19 5E 23 56 DD 73 F2 DD 72 F3 .f.....^#V.s..r.
02AA80: 21 FF FF DD 75 F0 DD 74 F1 DD 6E F2 DD 66 F3 11 !...u..t..n..f..
02AA90: FF FF B7 ED 52 CA 7A A0 DD E5 E1 01 F2 FF 09 E5 ....R.z.........
02AAA0: 21 06 00 E5 CD F6 97 DD 6E F2 DD 66 F3 E5 21 06 !.......n..f..!.
02AAB0: 00 E5 CD 74 90 DD 6E F0 DD 66 F1 11 FF FF B7 ED ...t..n..f......
02AAC0: 52 C2 45 A0 DD 6E FA DD 66 FB 11 17 00 19 DD 5E R.E..n..f......^
02AAD0: F2 DD 56 F3 73 23 72 C3 58 A0 DD 6E F0 DD 66 F1 ..V.s#r.X..n..f.
02AAE0: 11 02 00 19 DD 5E F2 DD 56 F3 73 23 72 DD 6E F2 .....^..V.s#r.n.
02AAF0: DD 66 F3 DD 75 F0 DD 74 F1 DD 6E F2 DD 66 F3 11 .f..u..t..n..f..
02AB00: AB 02 DD E1 F6 01 C1 C9 DD E5 FD E5 D1 E1 C5 06 ................
02AB10: 0B 23 13 1A BE 20 02 10 F8 C1 C9 0E 0C CD 05 00 .#... ..........
02AB20: FE 30 30 50 DD 2A 56 04 DD 6E 05 DD 66 06 22 59 .00P.*V..n..f."Y
02AB30: 04 DD 7E 02 D6 02 47 AF 37 17 10 FD 32 5B 04 0E ..~...G.7...2[..
02AB40: 1B CD 05 00 ED 4B 59 04 03 11 00 00 3E 08 32 5E .....KY.....>.2^
02AB50: 04 CB 16 38 01 13 0B 79 B0 28 09 3A 5E 04 3D 20 ...8...y.(.:^.=
02AB60: ED 23 18 E8 6B 62 3A 5B 04 47 05 28 03 19 10 FD .#..kb:[.G.(....
02AB70: 7C 4D 18 23 3A 5D 04 0E 2E 5F CD 05 00 06 03 DD |M.#:]..._......
02AB80: 21 80 00 DD CB 02 3E DD CB 01 1E DD CB 00 1E 10 !.....>.........
02AB90: F2 DD 7E 01 DD 4E 00 CD A2 03 3E 4B 5F 0E 02 C3 ..~..N....>K_...
02ABA0: 05 00 21 64 04 1E 05 D5 E5 11 0A 00 CD DD 03 55 ..!d...........U
02ABB0: E1 72 2B D1 1D 20 F0 06 05 CB 81 78 FE 01 20 02 .r+.. .....x.. .
02ABC0: CB C1 23 7E B7 20 08 CB 41 20 04 3E 20 18 04 CB ..#~. ..A .> ...
02ABD0: C1 C6 30 E5 C5 CD 9C 03 C1 E1 10 DF C9 21 00 00 ..0..........!..
02ABE0: 06 10 CB 11 17 ED 6A ED 52 30 01 19 3F 10 F3 CB ......j.R0..?...
02ABF0: 11 17 C9 53 44 20 56 31 2E 30 20 62 79 20 41 64 ...SD V1.0 by Ad
02AC00: 61 6D 20 44 65 6E 6E 69 6E 67 20 28 43 29 20 48 am Denning (C) H
02AC10: 69 53 6F 66 74 20 31 39 38 36 0D 0A 24 09 24 00 iSoft 1986..$.$.
02AC20: 3F 3F 3F 3F 3F 3F 3F 3F 3F 3F 3F 20 53 24 20 20 ??????????? S$
02AC30: 24 52 20 24 20 20 24 4B 20 20 52 65 63 73 3A 20 $R $ $K Recs:
02AC40: 24 0D 0A 44 69 73 63 20 66 72 65 65 20 73 70 61 $..Disc free spa
02AC50: 63 65 3A 20 24 66 75 6E 63 74 69 6F 6E F3 20 69 ce: $function. i
02AC60: EE 20 73 6F 75 72 63 E5 20 61 6E E4 20 4D 61 6E . sourc. an. Man
02AC70: F8 20 8D 0A 6C 69 62 72 61 72 F9 20 66 6F 72 6D . ..librar. form
02AC80: 69 64 20 64 72 69 76 65 20 64 65 73 69 67 6E 61 id drive designa
02AC90: 74 6F 72 20 20 0D 0A 24 11 79 0E 0E 09 CD 05 00 tor ..$.y......
02ACA0: 3E 01 32 17 0A C9 11 AC 0E C3 9B 0E 0D 0A 4C 69 >.2...........Li
02ACB0: 73 74 20 74 6F 6F 20 6C 6F 6E 67 0D 0A 24 E5 D5 st too long..$..
02ACC0: 0E 09 CD 05 00 11 99 0A 0E 0A CD 05 00 D1 E1 3A ...............:
02ACD0: 9B 0A FE 3F CA EA 0E E6 5F FE 59 CA E7 0E D6 4E ...?...._.Y....N
02ACE0: C8 11 F7 0E C3 BE 0E AF 3C C9 E5 D5 EB 0E 09 CD ........<.......
02ACF0: 05 00 D1 E1 C3 BE 0E 0D 0A 50 4C 45 41 53 45 20 .........PLEASE
02AD00: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
02AD10: 24 00 00 00 02 09 4E E5 24 00 41 02 00 00 00 02 $.....N.$.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: 02 00 19 5E 23 56 DD 73 F2 DD 72 F3 C3 F4 9F DD ...^#V.s..r.....
02AE10: 6E FE DD 66 FF 23 DD 75 FE DD 74 FF DD 6E FA DD n..f.#.u..t..n..
02AE20: 66 FB 11 0A 00 19 5E 23 56 D5 DD 6E FE DD 66 FF f.....^#V..n..f.
02AE30: 29 11 7E 0A 19 D1 73 23 72 C3 5A 9E 2A D3 0B DD ).~...s#r.Z.*...
02AE40: 75 FA DD 74 FB DD 6E FA DD 66 FB 11 FF FF B7 ED u..t..n..f......
02AE50: 52 CA 1B A1 DD 6E FA DD 66 FB 11 17 00 19 5E 23 R....n..f.....^#
02AE60: 56 DD 73 F2 DD 72 F3 DD 6E F2 DD 66 F3 11 FF FF V.s..r..n..f....
02AE70: B7 ED 52 CA 05 A1 DD 6E F2 DD 66 F3 11 04 00 19 ..R....n..f.....
02AE80: E5 CD 4B 9C DD 6E F2 DD 66 F3 11 02 00 19 5E 23 ..K..n..f.....^#
02AE90: 56 DD 73 F2 DD 72 F3 C3 D2 A0 DD 6E FA DD 66 FB V.s..r.....n..f.
02AEA0: 11 0A 00 19 5E 23 56 DD 73 FA DD 72 FB C3 B0 A0 ....^#V.s..r....
02AEB0: 2A F4 97 22 2B 12 2A F4 97 22 2D 12 ED 7B EE 99 *.."+.*.."-..{..
02AEC0: E1 22 EE 99 DD E1 C9 C3 00 00 65 72 72 6F 72 20 ."........error
02AED0: 69 6E 20 6D 6C 70 72 65 6C 53 59 53 54 45 4D 20 in mlprelSYSTEM
02AEE0: 20 52 45 41 4C 24 20 20 20 00 00 00 00 00 00 00 REAL$ .......
02AEF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02AF00: 04 E4 9E 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02AF10: 00 00 00 00 00 00 00 00 00 00 00 00 00 05 4F 55 ..............OU
02AF20: 54 50 55 54 20 20 44 41 54 00 00 00 00 00 00 00 TPUT DAT.......
02AF30: 00 00 00 00 00 00 DD E5 DD 21 00 00 DD 39 21 F3 .........!...9!.
02AF40: FF 39 F9 2A CE 0B 11 00 00 B7 ED 52 CA 44 9A 21 .9.*.......R.D.!
02AF50: 06 9A E5 CD F2 3C CD E3 3C 21 00 00 22 CE 0B 21 .....<..<!.."..!
02AF60: 06 9A E5 CD F2 3C 21 6D 9F E5 21 15 00 E5 CD 15 .....<!m..!.....
02AF70: 3D CD E3 3C E5 11 82 9F 21 F8 FF 39 F9 EB 01 08 =..<....!..9....
02AF80: 00 ED B0 CD 9F 12 21 E4 0A D1 73 23 72 21 01 00 ......!...s#r!..
02AF90: DD 75 F5 2A D3 0B DD 75 FE DD 74 FF 21 FF FF DD .u.*...u..t.!...
02AFA0: 75 FC DD 74 FD 21 FF FF DD 75 F8 DD 74 F9 DD 6E u..t.!...u..t..n
02AFB0: FE DD 66 FF DD 75 FA DD 74 FB DD 6E FE DD 66 FF ..f..u..t..n..f.
02AFC0: 11 FF FF B7 ED 52 CA 46 9B DD 6E FE DD 66 FF 11 .....R.F..n..f..
02AFD0: 15 00 19 5E 23 56 EB 11 00 00 B7 ED 52 CA 46 9B ...^#V......R.F.
02AFE0: DD 6E FE DD 66 FF 11 11 00 19 5E 23 56 EB 11 00 .n..f.....^#V...
02AFF0: 00 B7 ED 52 CA E8 9A 21 00 00 DD 75 F5 DD 6E FA ...R...!...u..n.
02B000: 00 B7 ED 52 CA 7B 88 21 05 00 E5 CD CB 82 C3 D3 ...R.{.!........
02B010: 88 FD 2A 71 87 FD 6E 0B 26 00 11 11 00 B7 ED 52 ..*q..n.&......R
02B020: C2 AB 88 FD 6E 0C FD 66 0D 11 02 00 B7 ED 52 C2 ....n..f......R.
02B030: AB 88 FD 6E 09 FD 66 0A DD 75 D6 DD 74 D7 C3 D3 ...n..f..u..t...
02B040: 88 FD 2A 71 87 FD 6E 0B 26 00 11 07 00 B7 ED 52 ..*q..n.&......R
02B050: C2 CC 88 FD 6E 0C FD 66 0D 11 02 00 B7 ED 52 CA ....n..f......R.
02B060: D3 88 21 05 00 E5 CD CB 82 E1 22 71 87 C3 E9 88 ..!......."q....
02B070: DD E5 E1 01 E0 FF 09 E5 21 04 00 E5 CD A2 09 2A ........!......*
02B080: 7E 01 11 08 00 19 11 08 00 73 2A 7E 01 22 83 87 ~........s*~."..
02B090: 2A 7E 01 DD 75 D8 DD 74 D9 E5 CD A0 98 D1 DD 73 *~..u..t.......s
02B0A0: DA DD 72 DB DD 6E DA DD 66 DB 11 FF FF B7 ED 52 ..r..n..f......R
02B0B0: CA 4A 89 DD 6E DA DD 66 DB 11 08 00 19 5E 16 00 .J..n..f.....^..
02B0C0: EB 11 08 00 B7 ED 52 C2 4A 89 DD 6E DA DD 66 DB ......R.J..n..f.
02B0D0: 11 09 00 19 5E 23 56 DD 73 DA DD 72 DB C3 0E 89 ....^#V.s..r....
02B0E0: 2A 83 87 11 FF FF B7 ED 52 CA 80 89 2A 83 87 11 *.......R...*...
02B0F0: 08 00 19 5E 16 00 EB 11 08 00 B7 ED 52 C2 80 89 ...^........R...
02B100: 2A 83 87 11 09 00 19 DD 5E DA DD 56 DB 73 23 72 *.......^..V.s#r
02B110: 21 FF FF 22 83 87 DD 6E D6 DD 66 D7 11 00 00 EB !.."...n..f.....
02B120: B7 ED 52 F2 F8 89 DD 6E DA DD 66 DB 11 09 00 19 ..R....n..f.....
02B130: 5E 23 56 EB DD 5E D6 DD 56 D7 B7 ED 52 CA F8 89 ^#V..^..V...R...
02B140: DD E5 E1 01 D3 FF 09 E5 21 06 00 E5 CD B3 71 DD ........!.....q.
02B150: 6E D3 DD 66 D4 11 04 00 19 ED 5B 6D 02 73 23 72 n..f......[m.s#r
02B160: DD 6E D3 DD 66 D4 22 6D 02 DD 6E DA DD 66 DB 11 .n..f."m..n..f..
02B170: 09 00 19 5E 23 56 D5 2A 6D 02 11 02 00 19 D1 73 ...^#V.*m......s
02B180: 23 72 2A 6D 02 DD 5E D8 DD 56 D9 73 23 72 DD 6E #r*m..^..V.s#r.n
02B190: D5 26 00 7D 32 5F 02 DD F9 DD E1 C9 DD E5 DD 21 .&.}2_.........!
02B1A0: 00 00 DD 39 2A 83 87 11 FF FF B7 ED 52 C2 2E 8A ...9*.......R...
02B1B0: CD 24 81 DD 6E 04 DD 66 05 E5 21 04 00 E5 CD 13 .$..n..f..!.....
02B1C0: 09 C3 3B 8A DD 6E 04 DD 66 05 ED 5B 83 87 73 23 ..;..n..f..[..s#
02B1D0: 72 DD 6E 04 DD 66 05 5E 23 56 EB ED 5B 71 87 D5 r.n..f.^#V..[q..
02B1E0: 22 71 87 E5 FD E1 21 04 00 FD 75 08 21 FF FF FD "q....!...u.!...
02B1F0: 75 06 FD 74 07 E1 22 71 87 21 FF FF 22 83 87 DD u..t.."q.!.."...
02B200: DD 66 FB 11 15 00 19 5E 23 56 EB E5 DD 6E FE DD .f.....^#V...n..
02B210: 66 FF 11 15 00 19 5E 23 56 EB D1 B7 ED 52 F2 24 f.....^#V....R.$
02B220: 9B DD 6E FC DD 66 FD DD 75 F8 DD 74 F9 DD 6E FE ..n..f..u..t..n.
02B230: DD 66 FF DD 75 FA DD 74 FB DD 6E FE DD 66 FF DD .f..u..t..n..f..
02B240: 75 FC DD 74 FD DD 6E FE DD 66 FF 11 0A 00 19 5E u..t..n..f.....^
02B250: 23 56 DD 73 FE DD 72 FF C3 A5 9A DD 6E F5 26 00 #V.s..r.....n.&.
02B260: CB 0D DA B9 9B DD 6E FE DD 66 FF 11 FF FF B7 ED ......n..f......
02B270: 52 C2 B6 9B 2A CE 0B 11 00 00 B7 ED 52 CA 75 9B R...*.......R.u.
02B280: 21 06 9A E5 CD F2 3C CD E3 3C 21 06 9A E5 CD F2 !.....<..<!.....
02B290: 3C 21 8A 9F E5 21 28 00 E5 CD 15 3D DD 6E FA DD <!...!(....=.n..
02B2A0: 66 FB E5 21 08 00 E5 CD 15 3D CD E3 3C 21 00 00 f..!.....=..<!..
02B2B0: 22 CE 0B DD 6E F8 DD 66 F9 DD 75 FC DD 74 FD DD "...n..f..u..t..
02B2C0: 6E FA DD 66 FB DD 75 FE DD 74 FF C3 CE 9B DD 6E n..f..u..t.....n
02B2D0: FE DD 66 FF 11 FF FF B7 ED 52 21 00 00 20 01 23 ..f......R!.. .#
02B2E0: DD 75 F5 DD 6E FE DD 66 FF 11 FF FF B7 ED 52 CA .u..n..f......R.
02B2F0: E6 9C DD 6E FE DD 66 FF 11 11 00 19 5E 23 56 EB ...n..f.....^#V.
02B300: 11 00 00 B7 ED 52 CA 41 9C 21 CD 00 E5 CD 93 19 .....R.A.!......
02B310: DD 6E FE DD 66 FF 11 11 00 19 5E 23 56 DD 73 F3 .n..f.....^#V.s.
02B320: DD 72 F4 DD 6E F3 26 00 E5 CD 93 19 DD 6E F4 26 .r..n.&......n.&
02B330: 00 E5 CD 93 19 21 00 00 E5 DD 6E FE DD 66 FF E5 .....!....n..f..
02B340: DD 6E FE DD 66 FF 11 11 00 19 5E 23 56 EB E5 21 .n..f.....^#V..!
02B350: 00 00 E5 CD 2C 30 DD 6E FE DD 66 FF 11 17 00 19 ....,0.n..f.....
02B360: 5E 23 56 DD 73 F6 DD 72 F7 DD 6E F6 DD 66 F7 11 ^#V.s..r..n..f..
02B370: FF FF B7 ED 52 CA A7 9C DD 6E F6 DD 66 F7 11 04 ....R....n..f...
02B380: 00 19 5E 23 56 EB 11 15 00 19 5E 23 56 EB 2B E5 ..^#V.....^#V.+.
02B390: DD 6E F6 DD 66 F7 11 04 00 19 5E 23 56 EB 11 15 .n..f.....^#V...
02B3A0: 00 19 D1 73 23 72 DD 6E F6 DD 66 F7 11 02 00 19 ...s#r.n..f.....
02B3B0: 5E 23 56 DD 73 F6 DD 72 F7 C3 54 9C DD 6E FC DD ^#V.s..r..T..n..
02B3C0: 66 FD 11 FF FF B7 ED 52 C2 CA 9C DD 6E FE DD 66 f......R....n..f
02B3D0: FF 11 0A 00 19 5E 23 56 ED 53 D3 0B C3 E6 9C DD .....^#V.S......
02B3E0: 6E FE DD 66 FF 11 0A 00 19 5E 23 56 D5 DD 6E FC n..f.....^#V..n.
02B3F0: DD 66 FD 11 0A 00 19 D1 73 23 72 DD 6E F5 26 00 .f......s#r.n.&.
02B400: E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 21 F9 FF 39 .......!...9!..9
02B410: F9 DD 6E 06 DD 66 07 11 00 00 B7 ED 52 C2 A6 8A ..n..f......R...
02B420: 21 1B 00 E5 2A 6B 02 E5 CD F0 79 DD 6E 04 DD 66 !...*k....y.n..f
02B430: 05 E5 CD FC 79 21 01 00 E5 CD D2 79 21 1C 00 E5 ....y!.....y!...
02B440: 2A 6B 02 E5 CD F0 79 DD 6E 06 DD 66 07 E5 CD FC *k....y.n..f....
02B450: 79 2A CF 01 DD 75 FE DD 74 FF 21 0A 00 CD 0E 71 y*...u..t.!....q
02B460: 22 CF 01 CD C3 7A 2A 87 01 26 00 11 15 00 B7 ED "....z*..&......
02B470: 52 C2 0E 8B CD C3 7A DD 6E 08 DD 66 09 11 0B 00 R.....z.n..f....
02B480: 19 5E 16 00 EB 11 04 00 B7 ED 52 C2 0B 8B DD 6E .^........R....n
02B490: 08 DD 66 09 11 0C 00 19 5E 23 56 DD 73 08 DD 72 ..f.....^#V.s..r
02B4A0: 09 C3 D0 8A DD 6E 08 DD 66 09 11 09 00 19 5E 23 .....n..f.....^#
02B4B0: 56 DD 73 FC DD 72 FD 2A 87 01 26 00 11 08 00 B7 V.s..r.*..&.....
02B4C0: ED 52 C2 32 8B CD C3 7A 2A 87 01 26 00 11 09 00 .R.2...z*..&....
02B4D0: B7 ED 52 21 00 00 20 01 23 DD 75 F9 DD 6E F9 26 ..R!.. .#.u..n.&
02B4E0: 00 CB 0D DA 5E 8B 2A 87 01 26 00 11 07 00 B7 ED ....^.*..&......
02B4F0: 52 C2 61 8B CD C3 7A 2A 87 01 26 00 11 01 00 B7 R.a...z*..&.....
02B500: ED 52 C2 88 8B CD 08 09 2A 7E 01 11 0B 00 19 5E .R......*~.....^
02B510: 23 56 D5 21 D7 01 11 05 00 19 D1 73 23 72 21 31 #V.!.......s#r!1
02B520: 00 E5 DD 6E FC DD 66 FD E5 CD F0 79 2A 87 01 26 ...n..f....y*..&
02B530: 00 11 03 00 B7 ED 52 CA B9 8B 21 D7 01 11 02 00 ......R...!.....
02B540: 19 5E 23 56 EB ED 5B 4A 1C B7 ED 52 C2 37 8C DD .^#V..[J...R.7..
02B550: 6E F9 26 00 CB 0D D2 FC 8B 21 D7 01 11 02 00 19 n.&......!......
02B560: 5E 23 56 EB ED 5B 4A 1C B7 ED 52 C2 FC 8B 21 D7 ^#V..[J...R...!.
02B570: 01 11 05 00 19 EB 21 F8 FF 39 F9 EB 01 08 00 ED ......!..9......
02B580: B0 CD 68 6B 21 D7 01 11 05 00 19 EB 01 08 00 CD ..hk!...........
02B590: 9F 71 DD 6E FC DD 66 FD 11 01 00 B7 ED 52 FA 34 .q.n..f......R.4
02B5A0: 8C D5 E5 DD 73 FA DD 72 FB 21 D7 01 11 04 00 19 ....s..r.!......
02B5B0: DD 5E FA DD 56 FB 19 5E 16 00 EB 26 00 E5 CD D2 .^..V..^...&....
02B5C0: 79 E1 D1 13 2B CB 7C CA 0B 8C C3 86 8C DD 6E FC y...+.|.......n.
02B5D0: DD 66 FD 11 01 00 B7 ED 52 C2 58 8C 21 D7 01 11 .f......R.X.!...
02B5E0: 05 00 19 5E 23 56 EB E5 CD D2 79 C3 86 8C DD 6E ...^#V....y....n
02B5F0: F9 26 00 CB 0D D2 77 8C 21 D7 01 11 05 00 19 5E .&....w.!......^
02B600: CB 0D D2 78 9A 21 C3 00 E5 CD 93 19 2A 7F 12 E5 ...x.!......*...
02B610: CD 07 1C 2A E4 0A 22 D3 0B 2A D3 0B 11 0A 00 19 ...*.."..*......
02B620: 11 FF FF 73 23 72 2A 79 12 26 00 CB 0D D2 36 9D ...s#r*y.&....6.
02B630: 2A 74 12 26 00 CB 0D DA 36 9D 2A D3 0B 11 0D 00 *t.&....6.*.....
02B640: 19 ED 5B 75 12 73 23 72 C3 44 9D 2A D3 0B 11 0D ..[u.s#r.D.*....
02B650: 00 19 ED 5B 6B 0D 73 23 72 21 06 9A E5 CD F2 3C ...[k.s#r!.....<
02B660: CD E3 3C 21 06 9A E5 CD F2 3C 21 B2 9F E5 21 0F ..<!.....<!...!.
02B670: 00 E5 CD 15 3D 2A 28 02 E5 CD 5C 3D CD E3 3C 21 ....=*(...\=..<!
02B680: 06 9A E5 CD F2 3C 21 C1 9F E5 21 0F 00 E5 CD 15 .....<!...!.....
02B690: 3D 2A 6B 0D ED 5B 26 02 B7 ED 52 E5 CD 5C 3D CD =*k..[&...R..\=.
02B6A0: E3 3C 21 06 9A E5 CD F2 3C 21 D0 9F E5 21 0F 00 .<!.....<!...!..
02B6B0: E5 CD 15 3D 2A 26 02 E5 CD 5C 3D CD E3 3C 21 06 ...=*&...\=..<!.
02B6C0: 9A E5 CD F2 3C 21 DF 9F E5 21 0F 00 E5 CD 15 3D ....<!...!.....=
02B6D0: 2A D3 0B 11 0D 00 19 5E 23 56 EB E5 CD 5C 3D CD *......^#V...\=.
02B6E0: E3 3C 2A D3 0B 11 0D 00 19 5E 23 56 D5 21 45 12 .<*......^#V.!E.
02B6F0: D1 73 23 72 21 45 12 5E 23 56 D5 21 45 12 11 02 .s#r!E.^#V.!E...
02B700: 00 19 D1 73 23 72 CD 89 39 DD F9 DD E1 C9 DD E5 ...s#r..9.......
02B710: DD 21 00 00 DD 39 21 FA FF 39 F9 2A D3 0B DD 75 .!...9!..9.*...u
02B720: FE DD 74 FF DD 6E FE DD 66 FF 11 FF FF B7 ED 52 ..t..n..f......R
02B730: CA DF 9E DD 6E FE DD 66 FF 11 17 00 19 5E 23 56 ....n..f.....^#V
02B740: DD 73 FA DD 72 FB DD 6E FA DD 66 FB 11 FF FF B7 .s..r..n..f.....
02B750: ED 52 CA C9 9E DD 6E FE DD 66 FF 11 13 00 19 5E .R....n..f.....^
02B760: 23 56 EB E5 DD 6E FA DD 66 FB 5E 23 56 EB D1 B7 #V...n..f.^#V...
02B770: ED 52 CA B3 9E DD 6E FE DD 66 FF 11 13 00 19 5E .R....n..f.....^
02B780: 23 56 EB 11 00 00 B7 ED 52 CA B3 9E CD 97 12 21 #V......R......!
02B790: 06 9A E5 CD F2 3C DD 6E FE DD 66 FF E5 21 08 00 .....<.n..f..!..
02B7A0: E5 CD 15 3D 21 EE 9F E5 21 12 00 E5 CD 15 3D DD ...=!...!.....=.
02B7B0: 6E FA DD 66 FB 11 04 00 19 5E 23 56 EB E5 21 08 n..f.....^#V..!.
02B7C0: 00 E5 CD 15 3D CD E3 3C DD 6E FA DD 66 FB 11 02 ....=..<.n..f...
02B7D0: 00 19 5E 23 56 DD 73 FA DD 72 FB C3 31 9E DD 6E ..^#V.s..r..1..n
02B7E0: FE DD 66 FF 11 0A 00 19 5E 23 56 DD 73 FE DD 72 ..f.....^#V.s..r
02B7F0: FF C3 0F 9E DD F9 DD E1 C9 2A 6B 0D 22 02 9A 2A .........*k."..*
02B800: 23 56 EB CD 0E 71 E5 CD FC 79 C3 86 8C 21 D7 01 #V...q...y...!..
02B810: 11 05 00 19 5E 23 56 EB E5 CD FC 79 2A 87 01 26 ....^#V....y*..&
02B820: 00 11 08 00 B7 ED 52 CA 97 8C CD C3 7A 2A 87 01 ......R.....z*..
02B830: 26 00 11 08 00 B7 ED 52 CA 21 8B 2A 87 01 26 00 &......R.!.*..&.
02B840: 11 16 00 B7 ED 52 C2 B9 8C CD C3 7A C3 A5 8C DD .....R.....z....
02B850: 6E FE DD 66 FF 22 CF 01 21 1C 00 E5 2A 6B 02 E5 n..f."..!...*k..
02B860: CD F0 79 DD 6E 06 DD 66 07 DD 5E 04 DD 56 05 19 ..y.n..f..^..V..
02B870: E5 CD FC 79 DD F9 DD E1 D1 21 06 00 39 F9 EB E9 ...y.....!..9...
02B880: 2A 87 01 26 00 11 0D 00 B7 ED 52 CA 1A 8D 2A 87 *..&......R...*.
02B890: 01 26 00 11 27 00 B7 ED 52 CA 1A 8D 2A 87 01 26 .&..'...R...*..&
02B8A0: 00 11 25 00 B7 ED 52 CA 1A 8D CD C3 7A C3 EA 8C ..%...R.....z...
02B8B0: 2A 87 01 26 00 11 0D 00 B7 ED 52 C2 2B 8D CD C3 *..&......R.+...
02B8C0: 7A C9 DD E5 DD 21 00 00 DD 39 E5 2A B1 71 DD 75 z....!...9.*.q.u
02B8D0: FE DD 74 FF E5 CD 23 50 D1 ED 53 8C 87 2A 8C 87 ..t...#P..S..*..
02B8E0: 11 03 00 19 5E 16 00 EB 11 03 00 B7 ED 52 CA 77 ....^........R.w
02B8F0: 8D 21 2A 00 E5 CD CB 82 2A 44 1C 22 86 87 21 00 .!*.....*D."..!.
02B900: 00 22 88 87 21 00 00 22 8A 87 C3 A4 8D 2A 8C 87 ."..!..".....*..
02B910: ED 5B 71 87 D5 22 71 87 E5 FD E1 FD 6E 00 FD 66 .[q.."q.....n..f
02B920: 01 22 86 87 FD 6E 04 FD 66 05 22 88 87 FD 6E 08 ."...n..f."...n.
02B930: FD 66 09 22 8A 87 E1 22 71 87 DD 6E FE DD 66 FF .f."..."q..n..f.
02B940: 22 B1 71 DD F9 DD E1 C9 DD E5 DD 21 00 00 DD 39 ".q........!...9
02B950: E5 21 01 00 E5 21 39 00 E5 CD 37 0B 21 88 01 E5 .!...!9...7.!...
02B960: 21 00 00 E5 CD A2 09 2A 7E 01 DD 75 FE DD 74 FF !......*~..u..t.
02B970: 21 10 00 E5 21 3A 00 E5 CD 37 0B CD 2C 8D DD 6E !...!:...7..,..n
02B980: FE DD 66 FF ED 5B 71 87 D5 22 71 87 E5 FD E1 21 ..f..[q.."q....!
02B990: 00 00 FD 75 0D 2A 86 87 FD 75 06 FD 74 07 2A 88 ...u.*...u..t.*.
02B9A0: 87 FD 75 09 FD 74 0A FD 6E 06 FD 66 07 ED 5B 4A ..u..t..n..f..[J
02B9B0: 1C B7 ED 52 C2 3A 8E 2A 8C 87 11 08 00 19 ED 5B ...R.:.*.......[
02B9C0: 71 87 01 0B 00 EB 09 EB 01 08 00 ED B0 C3 4E 8E q.............N.
02B9D0: 2A 8C 87 11 08 00 19 5E 23 56 FD 2A 71 87 FD 73 *......^#V.*q..s
02B9E0: 0B FD 72 0C E1 22 71 87 DD F9 DD E1 C9 FD 2A 73 ..r.."q.......*s
02B9F0: 87 FD 6E FE FD 66 FF 22 84 01 CD 92 8E FD 2A 73 ..n..f."......*s
02BA00: 7B 12 E5 CD 5B 18 21 C3 00 E5 CD 93 19 2A 02 9A {...[.!......*..
02BA10: E5 CD 07 1C 2A 02 9A 22 6B 0D 2A 6B 0D E5 CD 5B ....*.."k.*k...[
02BA20: 18 21 06 9A E5 CD F2 3C CD E3 3C CD F9 9D 2A 7D .!.....<..<...*}
02BA30: 12 11 00 00 B7 ED 52 CA 36 9F 21 21 00 E5 CD 93 ......R.6.!!....
02BA40: 19 2A 7D 12 E5 CD 07 1C C3 5F 9F 2A 74 12 26 00 .*}......_.*t.&.
02BA50: CB 0D D2 51 9F 21 21 00 E5 CD 93 19 2A 75 12 E5 ...Q.!!.....*u..
02BA60: CD 07 1C C3 5F 9F 21 2A 00 E5 CD 93 19 21 06 00 ...._.!*.....!..
02BA70: E5 CD 07 1C 21 12 00 E5 CD 19 1A CD 21 9A C9 C3 ....!.......!...
02BA80: 00 00 20 6D 61 69 6E 20 70 72 6F 67 72 61 6D 20 .. main program
02BA90: 6C 69 6E 6B 61 67 65 4C 4F 41 44 45 52 20 20 20 linkageLOADER
02BAA0: 63 69 72 63 75 6C 61 72 20 72 65 66 73 20 20 2D circular refs -
02BAB0: 20 61 72 62 69 74 72 61 72 69 6C 79 20 73 65 6C arbitrarily sel
02BAC0: 65 63 74 69 6E 67 20 20 44 61 74 61 20 53 69 7A ecting Data Siz
02BAD0: 65 20 20 20 3A 20 20 43 6F 64 65 20 53 69 7A 65 e : Code Size
02BAE0: 20 20 20 3A 20 20 44 61 74 61 20 69 6E 20 43 6F : Data in Co
02BAF0: 64 65 3A 20 20 54 6F 70 20 41 64 64 72 65 73 73 de: Top Address
02BB00: 20 3A 20 20 72 65 63 6F 6D 70 69 6C 65 64 20 73 : recompiled s
02BB10: 69 6E 63 65 20 00 00 00 00 00 00 00 00 00 00 00 ince ...........
02BB20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02BB30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02BB40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02BB50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02BB60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02BB70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02BB80: 05 02 9A 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02BB90: 00 00 00 00 00 00 00 DD E5 DD 21 00 00 DD 39 21 ..........!...9!
02BBA0: F8 FF 39 F9 2A 6B 0D DD 75 FE DD 74 FF 2A 7B 12 ..9.*k..u..t.*{.
02BBB0: E5 CD 5B 18 21 26 00 E5 CD 93 19 DD 6E FE DD 66 ..[.!&......n..f
02BBC0: FF ED 5B 7B 12 B7 ED 52 E5 CD 07 1C DD 6E FE DD ..[{...R.....n..
02BBD0: 66 FF 22 6B 0D 2A 6B 0D E5 CD 5B 18 2A CD 11 E5 f."k.*k...[.*...
02BBE0: CD 07 1C 2A 74 12 26 00 26 00 E5 CD 93 19 2A 75 ...*t.&.&.....*u
02BBF0: 12 E5 CD 07 1C 2A 79 12 26 00 26 00 E5 CD 93 19 .....*y.&.&.....
02BC00: 87 FD 6E FC FD 66 FD ED 5B 84 01 B7 ED 52 F2 84 ..n..f..[....R..
02BC10: 8E 2A 84 01 FD 75 FC FD 74 FD FD 2A 73 87 FD 6E .*...u..t..*s..n
02BC20: FC FD 66 FD 22 84 01 C9 DD E5 2A 73 87 E5 ED 73 ..f.".....*s...s
02BC30: 73 87 DD 2A 73 87 E5 E5 CD 93 87 2A 87 01 26 00 s..*s......*..&.
02BC40: 11 27 00 B7 ED 52 CA 27 90 2A 87 01 26 00 11 19 .'...R.'.*..&...
02BC50: 00 B7 ED 52 CA 27 90 2A 87 01 26 00 11 25 00 B7 ...R.'.*..&..%..
02BC60: ED 52 CA 27 90 2A 87 01 26 00 11 01 00 B7 ED 52 .R.'.*..&......R
02BC70: C2 E6 8E CD AE 9B CD 93 87 C3 21 90 2A 87 01 26 ..........!.*..&
02BC80: 00 11 20 00 B7 ED 52 C2 09 90 CD C3 7A 2A 87 01 .. ...R.....z*..
02BC90: 26 00 11 01 00 B7 ED 52 C2 7B 8F 21 88 01 E5 21 &......R.{.!...!
02BCA0: 03 00 E5 CD A2 09 2A 7E 01 FD 2A 71 87 FD 75 F3 ......*~..*q..u.
02BCB0: FD 74 F4 CD C3 7A 21 0D 00 E5 21 2B 00 E5 CD 37 .t...z!...!+...7
02BCC0: 0B FD 2A 71 87 FD 6E F3 FD 66 F4 ED 5B 75 87 D5 ..*q..n..f..[u..
02BCD0: 22 75 87 E5 FD E1 2A 84 01 FD 75 09 FD 74 0A E5 "u....*...u..t..
02BCE0: CD A0 98 D1 FD 2A 75 87 FD 73 06 FD 72 07 21 00 .....*u..s..r.!.
02BCF0: 00 FD 75 0C FD 6E 06 FD 66 07 11 09 00 19 5E 23 ..u..n..f.....^#
02BD00: 56 EB ED 5B 84 01 19 22 84 01 E1 22 75 87 C3 91 V..[..."..."u...
02BD10: 8F 21 0D 00 E5 21 2B 00 E5 CD 37 0B 21 01 00 E5 .!...!+...7.!...
02BD20: 21 3B 00 E5 CD 37 0B 2A 84 01 DD 75 FE DD 74 FF !;...7.*...u..t.
02BD30: 21 00 00 DD 75 FC DD 74 FD 21 34 00 E5 21 3C 00 !...u..t.!4..!<.
02BD40: E5 CD 37 0B CD EA 8C 2A 87 01 26 00 11 27 00 B7 ..7....*..&..'..
02BD50: ED 52 CA E7 8F 2A 87 01 26 00 11 25 00 B7 ED 52 .R...*..&..%...R
02BD60: CA E7 8F CD 57 8E 2A 87 01 26 00 11 19 00 B7 ED ....W.*..&......
02BD70: 52 C2 E4 8F CD C3 7A CD EA 8C C3 B1 8F 2A 87 01 R.....z......*..
02BD80: 26 00 11 25 00 B7 ED 52 C2 FB 8F CD C3 7A CD 57 &..%...R.....z.W
02BD90: 8E 21 27 00 E5 21 6C 00 E5 CD 37 0B C3 21 90 2A .!'..!l...7..!.*
02BDA0: 87 01 26 00 11 27 00 B7 ED 52 CA 21 90 21 67 00 ..&..'...R.!.!g.
02BDB0: E5 CD CB 82 CD C3 7A CD 93 87 C3 A5 8E ED 7B 73 ......z.......{s
02BDC0: 87 E1 22 73 87 DD E1 C9 DD E5 2A 71 87 E5 ED 73 .."s......*q...s
02BDD0: 71 87 DD 2A 71 87 21 F2 FF 39 F9 2A 86 01 26 00 q..*q.!..9.*..&.
02BDE0: DD 75 F5 21 01 00 7D 32 86 01 2A 5F 02 26 00 DD .u.!..}2..*_.&..
02BDF0: 75 F2 21 00 00 7D 32 5F 02 CD C3 7A 2A 84 01 DD u.!..}2_...z*...
02BE00: 2A 7B 12 E5 CD 07 1C 2A D3 0B DD 75 FC DD 74 FD *{.....*...u..t.
02BE10: DD 6E FC DD 66 FD E5 CD 07 1C DD 6E FC DD 66 FD .n..f......n..f.
02BE20: 11 FF FF B7 ED 52 CA 4C 9B DD 6E FC DD 66 FD ED .....R.L..n..f..
02BE30: 5B F0 99 D5 22 F0 99 E5 FD E1 DD 6E FC DD 66 FD [..."......n..f.
02BE40: E5 21 1D 00 E5 CD 62 90 FD 2A F0 99 FD 6E 08 FD .!....b..*...n..
02BE50: 66 09 DD 75 FA DD 74 FB DD 6E FA DD 66 FB 11 FF f..u..t..n..f...
02BE60: FF B7 ED 52 CA F2 9A DD 6E FA DD 66 FB E5 21 0A ...R....n..f..!.
02BE70: 00 E5 CD 62 90 DD 6E FA DD 66 FB 5E 23 56 DD 73 ...b..n..f.^#V.s
02BE80: FA DD 72 FB C3 C3 9A FD 2A F0 99 FD 6E 17 FD 66 ..r.....*...n..f
02BE90: 18 DD 75 F8 DD 74 F9 DD 6E F8 DD 66 F9 11 FF FF ..u..t..n..f....
02BEA0: B7 ED 52 CA 35 9B DD 6E F8 DD 66 F9 E5 21 06 00 ..R.5..n..f..!..
02BEB0: E5 CD 62 90 DD 6E F8 DD 66 F9 11 02 00 19 5E 23 ..b..n..f.....^#
02BEC0: 56 DD 73 F8 DD 72 F9 C3 02 9B FD 2A F0 99 FD 6E V.s..r.....*...n
02BED0: 0A FD 66 0B DD 75 FC DD 74 FD E1 22 F0 99 C3 85 ..f..u..t.."....
02BEE0: 9A DD F9 DD E1 C9 C3 00 00 00 00 00 00 00 00 00 ................
02BEF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02BF00: 01 E9 9E 06 8A 00 00 00 00 00 00 00 00 00 00 00 ................
02BF10: 00 00 00 00 00 00 00 00 00 FF FF 00 00 00 00 00 ................
02BF20: 00 00 00 00 00 00 00 00 00 2A 87 01 26 00 11 0E .........*..&...
02BF30: 00 B7 ED 52 C2 A7 87 CD C3 7A C3 93 87 C9 DD E5 ...R.....z......
02BF40: DD 21 00 00 DD 39 21 D3 FF 39 F9 21 01 00 E5 21 .!...9!..9.!...!
02BF50: 46 00 E5 CD 37 0B 21 88 01 DD E5 D1 01 E0 FF EB F...7.!.........
02BF60: 09 EB 01 20 00 ED B0 21 10 00 E5 21 48 00 E5 CD ... ...!...!H...
02BF70: 37 0B DD E5 E1 01 E0 FF 09 E5 2A 7C 01 29 11 59 7.........*|.).Y
02BF80: 01 19 5E 23 56 EB E5 CD 51 81 2A 5F 02 26 00 DD ..^#V...Q.*_.&..
02BF90: 75 D5 21 01 00 CD 0E 71 DD 75 D6 DD 74 D7 2A 7E u.!....q.u..t.*~
02BFA0: 01 11 FF FF B7 ED 52 CA DA 88 2A 7E 01 ED 5B 71 ......R...*~..[q
02BFB0: 87 D5 22 71 87 E5 FD E1 FD 6E 04 FD 66 05 11 FF .."q.....n..f...
02BFC0: FF B7 ED 52 CA 38 88 21 01 00 7D 32 5F 02 FD 2A ...R.8.!..}2_..*
02BFD0: 71 87 FD 6E 08 26 00 11 09 00 B7 ED 52 C2 5F 88 q..n.&......R._.
02BFE0: 21 04 00 FD 75 08 21 07 00 FD 75 0B 21 02 00 FD !...u.!...u.!...
02BFF0: 75 0C FD 74 0D FD 2A 71 87 FD 6E 08 26 00 11 04 u..t..*q..n.&...
02C000: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
02C010: 25 00 00 00 02 09 4E E5 25 00 41 02 00 00 00 02 %.....N.%.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: 75 F6 DD 74 F7 21 00 00 22 84 01 2A 7C 01 23 22 u..t.!.."..*|.#"
02C110: 7C 01 2A 7C 01 29 11 59 01 19 11 FF FF 73 23 72 |.*|.).Y.....s#r
02C120: DD E5 E1 01 F8 FF 09 E5 CD 06 8A CD 92 8E 21 27 ..............!'
02C130: 00 E5 21 67 00 E5 CD 37 0B DD 6E F2 26 00 7D 32 ..!g...7..n.&.}2
02C140: 5F 02 DD 6E F8 DD 66 F9 ED 5B 73 87 D5 22 73 87 _..n..f..[s.."s.
02C150: E5 FD E1 21 05 00 FD 75 0B 2A 84 01 FD 75 09 FD ...!...u.*...u..
02C160: 74 0A 2A 7C 01 29 11 59 01 19 5E 23 56 FD 73 0C t.*|.).Y..^#V.s.
02C170: FD 72 0D E1 22 73 87 2A 7C 01 2B 22 7C 01 DD 6E .r.."s.*|.+"|..n
02C180: F8 DD 66 F9 DD 75 06 DD 74 07 DD 6E F6 DD 66 F7 ..f..u..t..n..f.
02C190: 22 84 01 DD 6E F5 26 00 7D 32 86 01 ED 7B 71 87 "...n.&.}2...{q.
02C1A0: E1 22 71 87 DD E1 C9 DD E5 DD 21 00 00 DD 39 E5 ."q.......!...9.
02C1B0: E5 21 15 00 E5 21 43 00 E5 CD 37 0B DD E5 E1 01 .!...!C...7.....
02C1C0: FE FF 09 E5 CD 06 8A DD 6E FE DD 66 FF ED 5B 73 ........n..f..[s
02C1D0: 87 D5 22 73 87 E5 FD E1 CD 2C 8D 2A 86 87 11 0B .."s.....,.*....
02C1E0: 00 19 5E 16 00 EB 11 0A 00 B7 ED 52 C2 77 91 2A ..^........R.w.*
02C1F0: 86 87 11 09 00 19 5E 23 56 EB 11 01 00 B7 ED 52 ......^#V......R
02C200: CA 74 91 21 76 00 E5 CD CB 82 C3 92 91 2A 86 87 .t.!v........*..
02C210: 11 0B 00 19 5E 16 00 EB 11 01 00 B7 ED 52 C2 92 ....^........R..
02C220: 91 21 A1 00 E5 CD CB 82 DD 6E 04 DD 66 05 11 FF .!.......n..f...
02C230: FF B7 ED 52 C2 B1 91 2A 86 87 FD 2A 73 87 FD 75 ...R...*...*s..u
02C240: 10 FD 74 11 C3 C1 91 DD 6E 04 DD 66 05 FD 2A 73 ..t.....n..f..*s
02C250: 87 FD 75 10 FD 74 11 2A 8A 87 FD 2A 73 87 FD 75 ..u..t.*...*s..u
02C260: 0C FD 74 0D 21 18 00 E5 21 3E 00 E5 CD 37 0B CD ..t.!...!>...7..
02C270: 2C 8D 2A 8A 87 FD 2A 73 87 FD 75 0E FD 74 0F FD ,.*...*s..u..t..
02C280: 6E 10 FD 66 11 ED 5B 3E 1C B7 ED 52 C2 0F 92 2A n..f..[>...R...*
02C290: 86 87 ED 5B 46 1C B7 ED 52 C2 0F 92 2A 46 1C FD ...[F...R...*F..
02C2A0: 75 10 FD 74 11 E5 FD 2A 73 87 FD 6E 10 FD 66 11 u..t...*s..n..f.
02C2B0: E5 2A 86 87 E5 CD A5 72 E1 CB 0D DA 2F 92 21 3F .*.....r..../.!?
02C2C0: 00 E5 CD CB 82 FD 2A 73 87 FD 6E 10 FD 66 11 ED ......*s..n..f..
02C2D0: 5B 46 1C B7 ED 52 C2 5C 92 E5 FD 6E 0E FD 66 0F [F...R.\...n..f.
02C2E0: E5 FD 6E 0C FD 66 0D E5 CD D9 85 D1 DD 73 FD C3 ..n..f.......s..
02C2F0: 79 92 FD 2A 73 87 FD 6E 0E FD 66 0F FD 5E 0C FD y..*s..n..f..^..
02C300: 02 00 FD 75 09 FD 74 0A 21 08 00 FD 75 0B 2A 87 ...u..t.!...u.*.
02C310: 01 26 00 11 01 00 B7 ED 52 CA 98 9A E5 CD A0 98 .&......R.......
02C320: D1 FD 2A 71 87 FD 73 0C FD 72 0D C3 F9 9A 21 00 ..*q..s..r....!.
02C330: 00 E5 CD D4 07 2A 7E 01 11 FF FF B7 ED 52 C2 EA .....*~......R..
02C340: 9A 21 88 01 E5 21 04 00 E5 CD A2 09 2A 7E 01 ED .!...!......*~..
02C350: 5B 73 87 D5 22 73 87 E5 FD E1 21 07 00 FD 75 0B [s.."s....!...u.
02C360: 21 02 00 FD 75 0C FD 74 0D E1 22 73 87 CD C3 7A !...u..t.."s...z
02C370: 2A 7E 01 FD 2A 71 87 FD 75 0C FD 74 0D C3 F9 9A *~..*q..u..t....
02C380: E5 CD 06 93 D1 FD 2A 71 87 FD 73 0C FD 72 0D E1 ......*q..s..r..
02C390: 22 71 87 DD 6E F6 DD 66 F7 DD 75 04 DD 74 05 C3 "q..n..f..u..t..
02C3A0: 17 9B E5 CD 06 93 D1 DD 73 04 DD 72 05 DD F9 DD ........s..r....
02C3B0: E1 C9 DD E5 DD 21 00 00 DD 39 DD 6E 06 DD 66 07 .....!...9.n..f.
02C3C0: 5E 23 56 EB 11 64 00 B7 ED 52 C2 6B 9B 2A 60 02 ^#V..d...R.k.*`.
02C3D0: 11 0A 00 EB B7 ED 52 F2 4B 9B 21 80 00 E5 CD CB ......R.K.!.....
02C3E0: 82 DD 6E 06 DD 66 07 ED 5B 60 02 73 23 72 2A 60 ..n..f..[`.s#r*`
02C3F0: 02 23 22 60 02 DD 6E 04 DD 66 05 11 00 00 73 23 .#"`..n..f....s#
02C400: 72 DD E1 E1 C1 C1 E9 DD E5 DD 21 00 00 DD 39 2A r.........!...9*
02C410: 6F 01 ED 5B 7C 01 B7 ED 52 FA 90 9B 2A 77 02 26 o..[|...R...*w.&
02C420: 00 CB 0D D2 A3 9B DD 6E 04 DD 66 05 E5 CD CB 82 ....£..n..f.....
02C430: 21 00 00 DD 75 06 C3 A9 9B 21 01 00 DD 75 06 DD !...u....!...u..
02C440: E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 21 C9 FF 39 .......!...9!..9
02C450: F9 21 00 00 DD 75 D4 DD 74 D5 2A 87 01 26 00 11 .!...u..t.*..&..
02C460: 01 00 B7 ED 52 C2 95 9C DD 6E D4 DD 66 D5 11 14 ....R....n..f...
02C470: 00 EB B7 ED 52 FA 95 9C 21 88 01 E5 21 03 00 E5 ....R...!...!...
02C480: CD A2 09 DD 6E D4 DD 66 D5 29 DD E5 D1 01 D6 FF ....n..f.)......
02C490: EB 09 EB 19 ED 5B 7E 01 73 23 72 2A 7E 01 11 0C .....[~.s#r*~...
02C4A0: 00 19 11 00 00 73 CD C3 7A 2A 87 01 26 00 11 15 .....s..z*..&...
02C4B0: 00 B7 ED 52 C2 74 9C E5 21 94 00 E5 CD 71 9B D1 ...R.t..!....q..
02C4C0: DD 73 C9 2A 7E 01 11 0C 00 19 11 34 00 73 2A 7E .s.*~......4.s*~
02C4D0: 01 11 0B 00 19 11 00 00 73 CD C3 7A CD 2C 8D DD ........s..z.,..
02C4E0: 6E D4 DD 66 D5 29 DD E5 D1 01 D6 FF EB 09 EB 19 n..f.)..........
02C4F0: 5E 23 56 EB 11 09 00 19 ED 5B 8A 87 73 23 72 21 ^#V......[..s#r!
02C500: 56 0D B7 ED 52 CB 04 21 00 00 CB 15 DD 75 FD DD V...R..!.....u..
02C510: 6E FD 26 00 CB 0D D2 9A 92 21 40 00 E5 CD CB 82 n.&......!@.....
02C520: FD 2A 73 87 FD 6E 0C FD 66 0D FD 75 0E FD 74 0F .*s..n..f..u..t.
02C530: FD 2A 73 87 FD 6E 10 FD 66 11 11 0B 00 19 5E 16 .*s..n..f.....^.
02C540: 00 EB 11 0A 00 B7 ED 52 C2 BE 92 2A 4C 1C FD 75 .......R...*L..u
02C550: 10 FD 74 11 FD 2A 73 87 FD 6E 10 FD 66 11 11 09 ..t..*s..n..f...
02C560: 00 19 5E 23 56 D5 DD 6E FE DD 66 FF 11 09 00 19 ..^#V..n..f.....
02C570: D1 73 23 72 21 06 00 FD 75 0B 21 16 00 E5 21 44 .s#r!...u.!...!D
02C580: 00 E5 CD 37 0B DD 6E FE DD 66 FF DD 75 06 DD 74 ...7..n..f..u..t
02C590: 07 E1 22 73 87 DD F9 DD E1 E1 C1 E9 DD E5 DD 21 .."s...........!
02C5A0: 00 00 DD 39 21 FA FF 39 F9 2A 87 01 26 00 11 01 ...9!..9.*..&...
02C5B0: 00 B7 ED 52 C2 BF 93 CD 08 09 2A 7E 01 DD 75 FC ...R......*~..u.
02C5C0: DD 74 FD DD 6E FC DD 66 FD 11 FF FF B7 ED 52 CA .t..n..f......R.
02C5D0: BC 93 DD 6E FC DD 66 FD ED 5B 73 87 D5 22 73 87 ...n..f..[s.."s.
02C5E0: E5 FD E1 FD 6E 08 26 00 11 09 00 B7 ED 52 C2 70 ....n.&......R.p
02C5F0: 93 21 04 00 FD 75 08 21 07 00 FD 75 0B 21 02 00 .!...u.!...u.!..
02C600: FD 75 0C FD 74 0D FD 2A 73 87 FD 6E 08 26 00 11 .u..t..*s..n.&..
02C610: 04 00 B7 ED 52 C2 B1 93 DD 6E FC DD 66 FD DD 75 ....R....n..f..u
02C620: 04 DD 74 05 2A 87 01 26 00 11 15 00 B7 ED 52 C2 ..t.*..&......R.
02C630: AE 93 E5 DD 6E FC DD 66 FD E5 CD 11 91 D1 DD 73 ....n..f.......s
02C640: 04 DD 72 05 C3 B8 93 21 41 00 E5 CD CB 82 E1 22 ..r....!A......"
02C650: 73 87 C3 14 95 2A 87 01 26 00 11 15 00 B7 ED 52 s....*..&......R
02C660: C2 DF 93 E5 21 FF FF E5 CD 11 91 D1 DD 73 04 DD ....!........s..
02C670: 72 05 C3 14 95 2A 87 01 26 00 11 04 00 B7 ED 52 r....*..&......R
02C680: C2 0D 95 21 00 00 DD 75 FE DD 74 FF DD E5 E1 01 ...!...u..t.....
02C690: FA FF 09 E5 CD 06 8A DD 6E FA DD 66 FB ED 5B 73 ........n..f..[s
02C6A0: 87 D5 22 73 87 E5 FD E1 21 00 00 FD 75 0C FD 74 .."s....!...u..t
02C6B0: 0D 21 0E 00 FD 75 0B CD C3 7A 21 01 00 E5 21 39 .!...u...z!...!9
02C6C0: 00 E5 CD 37 0B 21 88 01 E5 21 00 00 E5 CD A2 09 ...7.!...!......
02C6D0: 2A 7E 01 ED 5B 75 87 D5 22 75 87 E5 FD E1 21 00 *~..[u.."u....!.
02C6E0: 00 FD 75 09 FD 74 0A DD 6E FE DD 66 FF FD 75 0B ..u..t..n..f..u.
02C6F0: FD 74 0C DD 6E FA DD 66 FB FD 75 06 FD 74 07 21 .t..n..f..u..t.!
02C700: 16 00 E5 21 44 00 E5 CD 37 0B DD 6E D4 DD 66 D5 ...!D...7..n..f.
02C710: 23 DD 75 D4 DD 74 D5 2A 87 01 26 00 11 08 00 B7 #.u..t.*..&.....
02C720: ED 52 C2 92 9C CD C3 7A C3 C4 9B 2A 87 01 26 00 .R.....z...*..&.
02C730: 11 01 00 B7 ED 52 C2 AA 9C 21 9B 00 E5 CD CB 82 .....R...!......
02C740: 2A 87 01 26 00 11 0D 00 B7 ED 52 CA 3B 9D 2A 87 *..&......R.;.*.
02C750: 01 26 00 11 02 00 B7 ED 52 CA 0C 9D 2A 87 01 26 .&......R...*..&
02C760: 00 11 03 00 B7 ED 52 CA 0C 9D 2A 87 01 26 00 11 ......R...*..&..
02C770: 04 00 B7 ED 52 CA 0C 9D 2A 87 01 26 00 11 39 00 ....R...*..&..9.
02C780: B7 ED 52 CA 0C 9D 2A 87 01 26 00 11 1D 00 B7 ED ..R...*..&......
02C790: 52 CA 0C 9D 2A 87 01 26 00 11 3C 00 B7 ED 52 C2 R...*..&..<...R.
02C7A0: 16 9D 21 49 00 E5 CD DD 82 C3 38 9D 2A 87 01 26 ..!I......8.*..&
02C7B0: 00 11 10 00 B7 ED 52 C2 31 9D 21 4A 00 E5 CD DD ......R.1.!J....
02C7C0: 82 CD C3 7A C3 38 9D 21 4B 00 E5 CD DD 82 C3 3E ...z.8.!K......>
02C7D0: 9D CD C3 7A E5 CD A0 98 D1 DD 73 CC DD 72 CD DD ...z......s..r..
02C7E0: 6E CC DD 66 CD 22 86 87 2A 87 01 26 00 11 10 00 n..f."..*..&....
02C7F0: B7 ED 52 C2 8B 9D E5 21 4C 00 E5 CD 71 9B E1 CB ..R....!L...q...
02C800: 0D D2 88 9D 21 6B 02 E5 21 67 02 E5 CD 1C 9B 2A ....!k..!g.....*
02C810: 67 02 22 84 01 2A 6B 02 DD 75 CA DD 74 CB C3 CB g."..*k..u..t...
02C820: 9D 2A 77 02 26 00 CB 0D DA BF 9D 2A 7C 01 ED 5B .*w.&......*|..[
02C830: 6F 01 B7 ED 52 C2 BF 9D 21 69 02 E5 21 65 02 E5 o...R...!i..!e..
02C840: CD 1C 9B 2A 69 02 DD 75 CA DD 74 CB 2A 65 02 22 ...*i..u..t.*e."
02C850: 84 01 C3 CB 9D 21 01 00 CD 0E 71 DD 75 CA DD 74 .....!....q.u..t
02C860: CB 2A 84 01 22 91 87 DD 6E D4 DD 66 D5 2B 11 00 .*.."...n..f.+..
02C870: 00 B7 ED 52 FA 8A 9E D5 E5 DD 73 D2 DD 72 D3 DD ...R......s..r..
02C880: 6E D2 DD 66 D3 29 DD E5 D1 01 D6 FF EB 09 EB 19 n..f.)..........
02C890: 5E 23 56 EB ED 5B 71 87 D5 22 71 87 E5 FD E1 DD ^#V..[q.."q.....
02C8A0: 6E CC DD 66 CD FD 75 06 FD 74 07 FD 6E 0C 26 00 n..f..u..t..n.&.
02C8B0: 11 34 00 B7 ED 52 CA 7D 9E DD 6E CA 26 00 FD 75 .4...R.}..n.&..u
02C8C0: 0B 2A 86 01 26 00 CB 0D D2 57 9E 2A 84 01 FD 75 .*..&....W.*...u
02C8D0: 09 FD 74 0A DD 6E CC DD 66 CD 11 09 00 19 5E 23 ..t..n..f.....^#
02C8E0: 56 EB ED 5B 84 01 19 22 84 01 C3 7D 9E DD 6E CC V..[..."...}..n.
02C8F0: DD 66 CD 11 09 00 19 5E 23 56 EB ED 5B 84 01 EB .f.....^#V..[...
02C900: 01 00 FD 75 0D E1 22 75 87 DD 6E FE DD 66 FF 23 ...u.."u..n..f.#
02C910: DD 75 FE DD 74 FF 2A 87 01 26 00 11 08 00 B7 ED .u..t.*..&......
02C920: 52 CA 21 94 DD 6E FE DD 66 FF 2B FD 2A 73 87 FD R.!..n..f.+.*s..
02C930: 75 0E FD 74 0F FD 6E 0E FD 66 0F 11 FF 00 EB B7 u..t..n..f......
02C940: ED 52 FA BB 94 2A 42 1C 11 FF FF B7 ED 52 C2 CB .R...*B......R..
02C950: 94 2A 46 1C FD 2A 73 87 FD 75 10 FD 74 11 C3 D8 .*F..*s..u..t...
02C960: 94 2A 42 1C FD 2A 73 87 FD 75 10 FD 74 11 FD 2A .*B..*s..u..t..*
02C970: 73 87 FD 6E 10 FD 66 11 11 09 00 19 5E 23 56 FD s..n..f.....^#V.
02C980: 73 09 FD 72 0A E1 22 73 87 21 05 00 E5 21 0F 00 s..r.."s.!...!..
02C990: E5 CD 37 0B DD 6E FA DD 66 FB DD 75 04 DD 74 05 ..7..n..f..u..t.
02C9A0: C3 14 95 21 3B 00 E5 CD CB 82 DD F9 DD E1 C9 DD ...!;...........
02C9B0: E5 DD 21 00 00 DD 39 E5 DD E5 E1 01 FE FF 09 E5 ..!...9.........
02C9C0: CD 06 8A CD C3 7A DD 6E FE DD 66 FF 11 0B 00 19 .....z.n..f.....
02C9D0: 11 04 00 73 2A 87 01 26 00 11 15 00 B7 ED 52 C2 ...s*..&......R.
02C9E0: 61 95 E5 CD 06 93 DD 6E FE DD 66 FF 11 0E 00 19 a......n..f.....
02C9F0: D1 73 23 72 C3 EC 95 2A 87 01 26 00 11 01 00 B7 .s#r...*..&.....
02CA00: ED 52 C2 E5 95 CD 08 09 DD 6E FE DD 66 FF 11 0E .R.......n..f...
02CA10: 00 19 ED 5B 7E 01 73 23 72 2A 7E 01 ED 5B 73 87 ...[~.s#r*~..[s.
02CA20: D5 22 73 87 E5 FD E1 FD 6E 08 26 00 11 04 00 B7 ."s.....n.&.....
02CA30: ED 52 C2 D7 95 FD 6E 0B 26 00 11 06 00 B7 ED 52 .R....n.&......R
02CA40: CA DE 95 FD 6E 0B 26 00 11 02 00 B7 ED 52 CA DE ....n.&......R..
02CA50: 95 FD 6E 0B 26 00 11 0E 00 B7 ED 52 CA DE 95 FD ..n.&......R....
02CA60: 6E 0B 26 00 11 03 00 B7 ED 52 CA DE 95 21 4E 00 n.&......R...!N.
02CA70: E5 CD CB 82 E1 22 73 87 C3 EC 95 21 74 00 E5 CD ....."s....!t...
02CA80: CB 82 DD 6E FE DD 66 FF ED 5B 73 87 D5 22 73 87 ...n..f..[s.."s.
02CA90: E5 FD E1 2A 87 01 26 00 11 08 00 B7 ED 52 C2 20 ...*..&......R.
02CAA0: 96 E5 CD 19 95 DD 6E FE DD 66 FF 11 0C 00 19 D1 ......n..f......
02CAB0: 73 23 72 C3 3A 96 21 34 00 E5 21 3C 00 E5 CD 37 s#r.:.!4..!<...7
02CAC0: 0B E5 CD A0 98 D1 FD 2A 73 87 FD 73 0C FD 72 0D .......*s..s..r.
02CAD0: FD 2A 73 87 FD 6E 0E FD 66 0F 11 FF FF B7 ED 52 .*s..n..f......R
02CAE0: C2 59 96 21 00 00 FD 75 09 FD 74 0A C3 98 96 FD .Y.!...u..t.....
02CAF0: 2A 73 87 FD 6E 0E FD 66 0F 11 0C 00 19 5E 23 56 *s..n..f.....^#V
02CB00: B7 ED 52 22 84 01 2A 84 01 FD 2A 71 87 FD 75 09 ..R"..*...*q..u.
02CB10: FD 74 0A E1 22 71 87 E1 D1 13 2B CB 7C CA E1 9D .t.."q....+.|...
02CB20: DD 6E CA DD 66 CB ED 5B 69 02 B7 ED 52 C2 A3 9E .n..f..[i...R.£.
02CB30: 2A 84 01 22 65 02 C3 B9 9E DD 6E CA DD 66 CB ED *.."e.....n..f..
02CB40: 5B 6B 02 B7 ED 52 C2 B9 9E 2A 84 01 22 67 02 DD [k...R...*.."g..
02CB50: F9 DD E1 C9 CD AE 9B 2A 87 01 26 00 11 10 00 B7 .......*..&.....
02CB60: ED 52 C2 E5 9E 2A 86 87 E5 2A 91 87 E5 2A 84 01 .R...*...*...*..
02CB70: ED 5B 91 87 B7 ED 52 E5 CD 6E 8A CD 93 87 C9 DD .[....R..n......
02CB80: E5 DD 21 00 00 DD 39 21 F8 FF 39 F9 2A 84 01 DD ..!...9!..9.*...
02CB90: 75 F8 DD 74 F9 21 01 00 7D 32 85 87 21 00 00 7D u..t.!..}2..!..}
02CBA0: 32 90 87 2A 85 87 26 00 CB 0D D2 68 A0 2A 87 01 2..*..&....h.*..
02CBB0: 26 00 11 32 00 B7 ED 52 C2 73 9F CD C3 7A 2A 7C &..2...R.s...z*|
02CBC0: 01 23 22 7C 01 2A 7C 01 29 11 59 01 19 11 FF FF .#"|.*|.).Y.....
02CBD0: 73 23 72 CD CA 18 2A 7C 01 2B 22 7C 01 2A 77 02 s#r...*|.+"|.*w.
02CBE0: 26 00 CB 0D D2 66 9F 21 71 01 ED 5B 7C 01 19 11 &....f.!q..[|...
02CBF0: 01 00 73 2A 84 01 DD 75 F8 DD 74 F9 21 01 00 7D ..s*...u..t.!..}
02CC00: 32 90 87 CD C3 7A C3 53 A0 2A 87 01 26 00 11 21 2....z.S.*..&..!
02CC10: 00 B7 ED 52 C2 A3 9F CD C3 7A CD B2 8D 21 0E 00 ...R.£...z...!..
02CC20: E5 21 06 00 E5 CD 37 0B 2A 87 01 26 00 11 01 00 .!....7.*..&....
02CC30: B7 ED 52 CA 84 9F C3 53 A0 2A 87 01 26 00 11 3F ..R....S.*..&..?
02CC40: 00 B7 ED 52 C2 CB 9F CD C3 7A CD A8 87 CD 93 87 ...R.....z......
02CC50: 2A 87 01 26 00 11 01 00 B7 ED 52 CA B4 9F C3 53 *..&......R....S
02CC60: A0 2A 87 01 26 00 11 41 00 B7 ED 52 C2 4C A0 CD .*..&..A...R.L..
02CC70: C3 7A 2A 77 02 26 00 CB 0D 3F CB 15 E5 2A 7C 01 .z*w.&...?...*|.
02CC80: ED 5B 6F 01 B7 ED 52 21 00 00 20 01 23 D1 7D A3 .[o...R!.. .#.}£
02CC90: 6F 7D 32 86 01 2A 64 02 26 00 CB 0D D2 26 A0 2A o}2..*d.&....&.*
02CCA0: 86 01 26 00 CB 0D D2 26 A0 21 00 00 7D 32 64 02 ..&....&.!..}2d.
02CCB0: 21 64 00 22 69 02 21 64 00 22 6B 02 DD 6E F8 DD !d."i.!d."k..n..
02CCC0: 66 F9 22 84 01 CD BE 9E 2A 87 01 26 00 11 01 00 f.".....*..&....
02CCD0: B7 ED 52 CA 2F A0 2A 84 01 DD 75 F8 DD 74 F9 C3 ..R./.*...u..t..
02CCE0: 53 A0 21 00 00 7D 32 85 87 2A 90 87 26 00 ED 5B S.!..}2..*..&..[
02CCF0: 85 87 16 00 7D B3 6F 7D 32 90 87 C3 0D 9F 2A 90 ....}.o}2.....*.
02CD00: EB E5 FD 6E 0E FD 66 0F 11 0E 00 19 5E 23 56 EB ...n..f.....^#V.
02CD10: D1 B7 ED 52 23 E5 FD 6E 0C FD 66 0D 11 09 00 19 ...R#..n..f.....
02CD20: 5E 23 56 EB D1 CD 67 70 FD 75 09 FD 74 0A E1 22 ^#V...gp.u..t.."
02CD30: 73 87 DD 6E FE DD 66 FF DD 75 04 DD 74 05 DD F9 s..n..f..u..t...
02CD40: DD E1 C9 FD 2A 71 87 FD 6E FA FD 66 FB 11 FF FF ....*q..n..f....
02CD50: B7 ED 52 C2 D6 96 FD 6E FE FD 66 FF 11 0C 00 19 ..R....n..f.....
02CD60: FD 5E FC FD 56 FD 73 23 72 C3 ED 96 FD 2A 71 87 .^..V.s#r....*q.
02CD70: FD 6E FA FD 66 FB 11 03 00 19 FD 5E FC FD 56 FD .n..f......^..V.
02CD80: 73 23 72 FD 2A 71 87 FD 6E FC FD 66 FD FD 75 FA s#r.*q..n..f..u.
02CD90: FD 74 FB C9 2A 71 87 01 FC FF 09 E5 21 06 00 E5 .t..*q......!...
02CDA0: CD B3 71 FD 2A 71 87 FD 6E FC FD 66 FD 11 00 00 ..q.*q..n..f....
02CDB0: 73 FD 6E FC FD 66 FD 23 ED 5B 44 1C 73 23 72 FD s.n..f.#.[D.s#r.
02CDC0: 6E FC FD 66 FD 11 03 00 19 11 FF FF 73 23 72 CD n..f........s#r.
02CDD0: AD 96 C9 DD E5 2A 71 87 E5 ED 73 71 87 DD 2A 71 .....*q...sq..*q
02CDE0: 87 21 F9 FF 39 F9 DD E5 E1 01 FE FF 09 E5 CD 06 .!..9...........
02CDF0: 8A DD 6E FE DD 66 FF ED 5B 73 87 D5 22 73 87 E5 ..n..f..[s.."s..
02CE00: FD E1 21 0D 00 FD 75 0B 21 FF FF FD 75 0C FD 74 ..!...u.!...u..t
02CE10: 0D 21 02 00 FD 75 09 FD 74 0A E1 22 73 87 21 FF .!...u..t.."s.!.
02CE20: FF DD 75 FA DD 74 FB CD C3 7A 2A 87 01 26 00 11 ..u..t...z*..&..
02CE30: 04 00 B7 ED 52 C2 89 98 CD C3 7A 2A 87 01 26 00 ....R.....z*..&.
02CE40: 11 05 00 B7 ED 52 CA 4A 98 DD E5 E1 01 FC FF 09 .....R.J........
02CE50: E5 21 06 00 E5 CD B3 71 DD 6E FC DD 66 FD ED 5B .!.....q.n..f..[
02CE60: 73 87 D5 22 73 87 E5 FD E1 2A 87 01 26 00 11 41 s.."s....*..&..A
02CE70: 00 B7 ED 52 C2 ED 97 21 01 00 FD 75 00 CD C3 7A ...R...!...u...z
02CE80: C3 F7 97 21 00 00 FD 2A 73 87 FD 75 00 21 FF FF ...!...*s..u.!..
02CE90: FD 2A 73 87 FD 75 03 FD 74 04 E5 2A 73 87 01 05 .*s..u..t..*s...
02CEA0: 00 09 E5 CD E7 0B D1 FD 2A 73 87 FD 73 01 FD 72 ........*s..s..r
02CEB0: 02 CD AD 96 FD 2A 73 87 FD 6E 05 26 00 CB 0D D2 .....*s..n.&....
02CEC0: 32 98 CD FE 96 CD FE 96 E1 22 73 87 2A 87 01 26 2........"s.*..&
02CED0: 00 11 08 00 B7 ED 52 C2 47 98 CD C3 7A C3 A5 97 ......R.G...z...
02CEE0: CD C3 7A 2A 87 01 26 00 11 0D 00 B7 ED 52 C2 89 ..z*..&......R..
02CEF0: 98 CD C3 7A E5 DD E5 E1 01 F9 FF 09 E5 CD E7 0B ...z............
02CF00: 87 26 00 CB 0D DA 7C A0 21 86 00 E5 CD CB 82 CD .&....|.!.......
02CF10: C3 7A DD 6E F8 DD 66 F9 22 84 01 DD F9 DD E1 C9 .z.n..f.".......
02CF20: C3 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02CF30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02CF40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02CF50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02CF60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02CF70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02CF80: 00 A3 95 E9 8F B7 94 6A 94 40 95 64 97 55 98 93 .£.....j.@.d.U..
02CF90: 98 A0 98 AC 98 00 00 00 00 00 00 00 00 00 00 00 ................
02CFA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02CFB0: 00 00 00 00 00 FF FF 00 00 00 00 00 00 00 00 00 ................
02CFC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02CFD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02CFE0: 00 00 00 00 00 00 00 00 2A CE 87 11 00 00 B7 ED ........*.......
02CFF0: 52 F2 EB 87 2A AC 87 11 00 00 EB B7 ED 52 FA F9 R...*........R..
02D000: 87 2A AC 87 ED 5B CE 87 EB B7 ED 52 FA 35 88 2A .*...[.....R.5.*
02D010: AC 87 11 00 00 B7 ED 52 CB 04 21 00 00 CB 15 E5 .......R..!.....
02D020: 2A CE 87 11 00 00 B7 ED 52 2B CB 04 21 00 00 3F *.......R+..!..?
02D030: CB 15 D1 7D A3 6F CB 0D DA 35 88 2A CE 87 ED 5B ...}£o...5.*...[
02D040: A8 87 B7 ED 52 22 CE 87 C3 42 88 2A CE 87 ED 5B ....R"...B.*...[
02D050: AA 87 B7 ED 52 22 CE 87 C9 DD E5 DD 21 00 00 DD ....R"......!...
02D060: 39 E5 DD 6E 04 DD 66 05 5E 23 56 EB 11 FF FF B7 9..n..f.^#V.....
02D070: ED 52 CA 7C 88 DD 6E 04 DD 66 05 5E 23 56 ED 53 .R.|..n..f.^#V.S
02D080: CE 87 CD D2 87 DD 6E 04 DD 66 05 ED 5B CE 87 73 ......n..f..[..s
02D090: 23 72 DD F9 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD #r..........!...
02D0A0: 39 DD 6E 04 DD 66 05 11 FF FF B7 ED 52 C2 A6 88 9.n..f......R...
02D0B0: 21 FF FF DD 75 06 DD 74 07 C3 BB 88 DD 6E 04 DD !...u..t.....n..
02D0C0: 66 05 22 CE 87 CD D2 87 2A CE 87 DD 75 06 DD 74 f.".....*...u..t
02D0D0: 07 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 2A A1 .........!...9*.
02D0E0: 87 26 00 CB 0D DA 8E 89 DD 6E 04 DD 66 05 ED 5B .&.......n..f..[
02D0F0: 81 87 D5 22 81 87 E5 FD E1 FD 6E 08 26 00 26 00 ..."......n.&.&.
02D100: DD 6E FE DD 66 FF 11 06 00 19 D1 73 23 72 DD 6E .n..f......s#r.n
02D110: F9 26 00 CB 0D D2 89 98 21 7B 00 E5 CD CB 82 DD .&......!{......
02D120: 6E FE DD 66 FF DD 75 06 DD 74 07 ED 7B 71 87 E1 n..f..u..t..{q..
02D130: 22 71 87 DD E1 C9 DD E5 DD 21 00 00 DD 39 21 F6 "q.......!...9!.
02D140: FF 39 F9 2A 87 01 26 00 26 00 EB 21 39 00 B7 ED .9.*..&.&..!9...
02D150: 52 C2 CC 98 E5 CD 32 90 D1 DD 73 04 DD 72 05 C3 R.....2...s..r..
02D160: 17 9B 21 37 00 B7 ED 52 C2 E3 98 E5 CD 3D 97 D1 ..!7...R.....=..
02D170: DD 73 04 DD 72 05 C3 17 9B 21 3C 00 B7 ED 52 C2 .s..r....!<...R.
02D180: 1F 9A DD E5 E1 01 F6 FF 09 E5 CD 06 8A CD C3 7A ...............z
02D190: 21 34 00 E5 21 42 00 E5 CD 37 0B DD 6E F6 DD 66 !4..!B...7..n..f
02D1A0: F7 11 0B 00 19 11 09 00 73 E5 CD 06 93 DD 6E F6 ........s.....n.
02D1B0: DD 66 F7 11 0C 00 19 D1 73 23 72 DD 6E F6 DD 66 .f......s#r.n..f
02D1C0: F7 ED 5B 71 87 D5 22 71 87 E5 FD E1 FD 6E 0C FD ..[q.."q.....n..
02D1D0: 66 0D ED 5B 4C 1C B7 ED 52 C2 52 99 21 20 00 FD f..[L...R.R.! ..
02D1E0: 75 09 FD 74 0A C3 0C 9A FD 2A 71 87 FD 6E 0C FD u..t.....*q..n..
02D1F0: 66 0D ED 5B 48 1C B7 ED 52 C2 72 99 21 01 00 FD f..[H...R.r.!...
02D200: 75 09 FD 74 0A C3 0C 9A FD 2A 71 87 FD 6E 0C FD u..t.....*q..n..
02D210: 66 0D ED 5B 73 87 D5 22 73 87 E5 FD E1 FD 6E 0B f..[s.."s.....n.
02D220: 26 00 11 06 00 B7 ED 52 CA A3 99 FD 6E 0B 26 00 &......R.£..n.&.
02D230: 11 0E 00 B7 ED 52 C2 01 9A FD 2A 73 87 FD 6E 0E .....R....*s..n.
02D240: FD 66 0F FD 5E 0C FD 56 0D B7 ED 52 11 08 00 19 .f..^..V...R....
02D250: 11 08 00 CD A2 70 E5 DD 6E F6 DD 66 F7 11 09 00 .....p..n..f....
02D260: 19 D1 73 23 72 DD 6E F6 DD 66 F7 11 09 00 19 5E ..s#r.n..f.....^
02D270: 23 56 EB 11 80 00 EB B7 ED 52 F2 FE 99 21 14 00 #V.......R...!..
02D280: E5 CD CB 82 DD 6E F6 DD 66 F7 11 09 00 19 11 80 .....n..f.......
02D290: 00 73 23 72 C3 08 9A 21 88 00 E5 CD CB 82 E1 22 .s#r...!......."
02D2A0: 73 87 E1 22 71 87 DD 6E F6 DD 66 F7 DD 75 04 DD s.."q..n..f..u..
02D2B0: 74 05 C3 17 9B 21 1D 00 B7 ED 52 C2 36 9A E5 CD t....!....R.6...
02D2C0: 19 95 D1 DD 73 04 DD 72 05 C3 17 9B 21 36 00 B7 ....s..r....!6..
02D2D0: ED 52 C2 0C 9B CD C3 7A 21 3E 00 E5 21 68 00 E5 .R.....z!>..!h..
02D2E0: CD 37 0B DD E5 E1 01 F6 FF 09 E5 CD 06 8A DD 6E .7.............n
02D2F0: F6 DD 66 F7 ED 5B 71 87 D5 22 71 87 E5 FD E1 21 ..f..[q.."q....!
02D300: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
02D310: 26 00 00 00 02 09 4E E5 26 00 41 02 00 00 00 02 &.....N.&.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: EB 21 00 00 B7 ED 52 C2 35 89 FD 6E 09 FD 66 0A .!....R.5..n..f.
02D410: 11 00 00 B7 ED 52 CA 32 89 FD 6E 06 FD 66 07 ED .....R.2..n..f..
02D420: 5B 4A 1C B7 ED 52 C2 1F 89 21 00 00 FD 75 09 FD [J...R...!...u..
02D430: 74 0A C3 32 89 2A D3 01 11 02 00 B7 ED 52 FD 2A t..2.*.......R.*
02D440: 81 87 FD 75 0B FD 74 0C C3 8A 89 21 03 00 B7 ED ...u..t....!....
02D450: 52 C2 5B 89 FD 2A 81 87 FD 6E 0C 26 00 11 34 00 R.[..*...n.&..4.
02D460: B7 ED 52 CA 58 89 2A D3 01 26 00 FD 75 0C C3 8A ..R.X.*..&..u...
02D470: 89 21 01 00 B7 ED 52 CA 6D 89 21 02 00 B7 ED 52 .!....R.m.!....R
02D480: C2 8A 89 2A D3 01 11 02 00 B7 ED 52 FD 2A 81 87 ...*.......R.*..
02D490: FD 75 0E DD 6E 04 DD 66 05 E5 CD A3 7D C3 8A 89 .u..n..f...£}...
02D4A0: E1 22 81 87 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD ."..........!...
02D4B0: 39 2A A6 87 11 FF FF B7 ED 52 CA 59 8B 2A A6 87 9*.......R.Y.*..
02D4C0: ED 5B 81 87 D5 22 81 87 E5 FD E1 DD 6E 04 26 00 .[..."......n.&.
02D4D0: CB 0D D2 C6 89 2A A6 87 E5 CD 49 85 2A 81 87 01 .....*....I.*...
02D4E0: 06 00 09 E5 CD 43 88 2A 81 87 E5 CD 43 88 2A 81 .....C.*....C.*.
02D4F0: 87 01 02 00 09 E5 CD 43 88 2A 81 87 01 04 00 09 .......C.*......
02D500: E5 CD 43 88 2A A6 87 E5 CD C0 88 FD 2A 81 87 FD ..C.*.......*...
02D510: 6E 08 26 00 26 00 EB 21 04 00 B7 ED 52 C2 2E 8B n.&.&..!....R...
02D520: FD 6E 0B 26 00 26 00 EB 21 04 00 B7 ED 52 C2 34 .n.&.&..!....R.4
02D530: 8A 2A 81 87 01 0C 00 09 E5 CD 43 88 2A 81 87 01 .*........C.*...
02D540: 0E 00 09 E5 CD 43 88 C3 2B 8B 21 05 00 B7 ED 52 .....C..+.!....R
02D550: C2 4B 8A 2A 81 87 01 0C 00 09 E5 CD 43 88 C3 2B .K.*........C..+
02D560: 8B 21 06 00 B7 ED 52 CA 5D 8A 21 0E 00 B7 ED 52 .!....R.].!....R
02D570: C2 6B 8A 2A 81 87 01 10 00 09 E5 CD 43 88 C3 2B .k.*........C..+
02D580: 8B 21 08 00 B7 ED 52 CA 7D 8A 21 09 00 B7 ED 52 .!....R.}.!....R
02D590: C2 8B 8A 2A 81 87 01 0C 00 09 E5 CD 43 88 C3 2B ...*........C..+
02D5A0: 8B 21 0D 00 B7 ED 52 C2 09 8B E5 FD 2A 81 87 FD .!....R.....*...
02D5B0: 6E 0C FD 66 0D E5 CD 83 88 D1 FD 2A 81 87 FD 73 n..f.......*...s
02D5C0: 0C FD 72 0D FD 6E 0C FD 66 0D 22 97 87 2A 97 87 ..r..n..f."..*..
02D5D0: 11 FF FF B7 ED 52 CA 06 8B 2A 97 87 ED 5B 83 87 .....R...*...[..
02D5E0: D5 22 83 87 E5 FD E1 2A 83 87 01 01 00 09 E5 CD .".....*........
02D5F0: 43 88 E5 FD 2A 83 87 FD 6E 03 FD 66 04 E5 CD 83 C...*...n..f....
02D600: 75 FC FD 74 FD 2A 82 01 29 11 59 01 19 5E 23 56 u..t.*..).Y..^#V
02D610: EB E5 CD 9D 91 CD C3 7A 2A 87 01 26 00 11 08 00 .......z*..&....
02D620: B7 ED 52 C2 13 93 CD C3 7A C3 68 92 21 0E 00 E5 ..R.....z.h.!...
02D630: 21 3D 00 E5 CD 37 0B C9 DD E5 DD 21 00 00 DD 39 !=...7.....!...9
02D640: E5 21 00 00 E5 CD D4 07 2A 7E 01 11 FF FF B7 ED .!......*~......
02D650: 52 CA 52 93 2A 7E 01 11 08 00 19 5E 16 00 EB 11 R.R.*~.....^....
02D660: 07 00 B7 ED 52 CA 5C 93 21 99 00 E5 CD 5F 82 C3 ....R.\.!...._..
02D670: 65 94 CD C3 7A 2A 7E 01 11 0D 00 19 5E 23 56 DD e...z*~.....^#V.
02D680: 73 FE DD 72 FF 21 2E 00 E5 21 5B 00 E5 CD 37 0B s..r.!...![...7.
02D690: 2A 87 01 26 00 11 01 00 B7 ED 52 C2 4A 94 21 88 *..&......R.J.!.
02D6A0: 01 11 AE 87 01 20 00 ED B0 21 88 01 E5 DD 6E FE ..... ...!....n.
02D6B0: DD 66 FF E5 CD 51 81 2A 7E 01 11 FF FF B7 ED 52 .f...Q.*~......R
02D6C0: C2 B7 93 21 5C 00 E5 CD CB 82 C3 33 94 2A 7E 01 ...!\......3.*~.
02D6D0: FD 2A 7F 87 FD 75 FE FD 74 FF 2A 7E 01 11 FF FF .*...u..t.*~....
02D6E0: B7 ED 52 CA 33 94 21 88 01 E5 21 08 00 E5 CD A2 ..R.3.!...!.....
02D6F0: 09 2A 7E 01 11 09 00 19 FD 2A 7F 87 FD 5E FE FD .*~......*...^..
02D700: 56 FF 73 23 72 FD 6E FE FD 66 FF 11 08 00 19 5E V.s#r.n..f.....^
02D710: 16 00 EB 11 04 00 B7 ED 52 C2 33 94 FD 6E FE FD ........R.3..n..
02D720: 66 FF 11 0B 00 19 5E 16 00 EB 11 0E 00 B7 ED 52 f.....^........R
02D730: C2 33 94 FD 6E FE FD 66 FF FD 75 FC FD 74 FD DD .3..n..f..u..t..
02D740: 6E FE DD 66 FF E5 CD 9D 91 CD C3 7A 2A 87 01 26 n..f.......z*..&
02D750: 00 11 08 00 B7 ED 52 C2 47 94 CD C3 7A C3 7A 93 ......R.G...z.z.
02D760: 2A 87 01 26 00 11 0E 00 B7 ED 52 C2 5E 94 CD C3 *..&......R.^...
02D770: 7A C3 65 94 21 60 00 E5 CD DD 82 DD F9 DD E1 C9 z.e.!`..........
02D780: DD E5 2A 7F 87 E5 ED 73 7F 87 DD 2A 7F 87 E5 E5 ..*....s...*....
02D790: 2A 87 01 26 00 11 2E 00 B7 ED 52 C2 8E 94 CD 65 *..&......R....e
02D7A0: 92 C3 AC 94 CD C3 7A 2A 87 01 26 00 11 01 00 B7 ......z*..&.....
02D7B0: ED 52 CA A9 94 21 39 00 E5 CD 5F 82 C3 AC 94 CD .R...!9..._.....
02D7C0: 22 93 ED 7B 7F 87 E1 22 7F 87 DD E1 C9 DD E5 DD "..{..."........
02D7D0: 21 00 00 DD 39 E5 E5 2A 5F 02 26 00 DD 75 FD 21 !...9..*_.&..u.!
02D7E0: 01 00 7D 32 5F 02 2A 87 01 26 00 11 01 00 B7 ED ..}2_.*..&......
02D7F0: 52 C2 00 95 21 88 01 E5 21 09 00 E5 CD A2 09 CD R...!...!.......
02D800: 88 D1 FD 2A 83 87 FD 73 03 FD 72 04 FD 6E 03 FD ...*...s..r..n..
02D810: 66 04 22 97 87 E1 22 83 87 C3 B7 8A C3 2B 8B 21 f."..."......+.!
02D820: 11 00 B7 ED 52 CA 1B 8B 21 07 00 B7 ED 52 C2 2B ....R...!....R.+
02D830: 8B 2A D3 01 FD 2A 81 87 FD 75 0C FD 74 0D C3 2B .*...*...u..t..+
02D840: 8B C3 45 8B 21 08 00 B7 ED 52 C2 45 8B 2A 81 87 ..E.!....R.E.*..
02D850: 01 09 00 09 E5 CD 43 88 C3 45 8B FD 2A 81 87 FD ......C..E..*...
02D860: 6E 04 FD 66 05 22 A6 87 E1 22 81 87 C3 9B 89 DD n..f."..."......
02D870: E1 E1 C1 E9 2A 9B 87 E5 CD A3 7D 21 88 01 E5 2A ....*....£}!...*
02D880: 7C 01 29 11 59 01 19 5E 23 56 EB E5 CD 51 81 2A |.).Y..^#V...Q.*
02D890: 9B 87 ED 5B 81 87 D5 22 81 87 E5 FD E1 2A 7E 01 ...[...".....*~.
02D8A0: 11 FF FF B7 ED 52 CA 9D 8B 21 05 00 E5 CD CB 82 .....R...!......
02D8B0: C3 E4 8B 21 FF FF FD 2A 81 87 FD 75 00 FD 74 01 ...!...*...u..t.
02D8C0: 21 FF FF FD 75 02 FD 74 03 2A 7C 01 29 11 59 01 !...u..t.*|.).Y.
02D8D0: 19 5E 23 56 EB 11 FF FF B7 ED 52 C2 DA 8B 2A 7C .^#V......R...*|
02D8E0: 01 29 11 59 01 19 ED 5B 9B 87 73 23 72 C3 E4 8B .).Y...[..s#r...
02D8F0: 2A 80 01 ED 5B 9B 87 73 23 72 E1 22 81 87 C9 DD *...[..s#r."....
02D900: E5 DD 21 00 00 DD 39 E5 2A 6F 02 11 0F 00 19 5E ..!...9.*o.....^
02D910: 23 56 ED 53 9B 87 2A 9B 87 11 FF FF B7 ED 52 CA #V.S..*.......R.
02D920: 8A 8C 2A 9B 87 ED 5B 81 87 D5 22 81 87 E5 FD E1 ..*...[...".....
02D930: 2A 9B 87 E5 CD A3 7D FD 2A 81 87 FD 6E 08 26 00 *....£}.*...n.&.
02D940: 11 00 00 B7 ED 52 C2 65 8C FD 6E 0D 26 00 CB 0D .....R.e..n.&...
02D950: D2 65 8C FD 6E 06 FD 66 07 ED 5B 4A 1C B7 ED 52 .e..n..f..[J...R
02D960: CA 65 8C E5 FD 6E 06 FD 66 07 E5 CD B6 85 E1 CB .e...n..f.......
02D970: 0D DA 65 8C 2A 9B 87 E5 CD 52 85 E5 2A 9B 87 E5 ..e.*....R..*...
02D980: CD B6 85 E1 CB 0D DA 76 8C CD 5E 8B FD 2A 81 87 .......v..^..*..
02D990: FD 6E 04 FD 66 05 22 9B 87 E1 22 81 87 C3 00 8C .n..f."...".....
02D9A0: DD F9 DD E1 C9 2A A6 87 11 0F 00 19 5E 23 56 ED .....*......^#V.
02D9B0: 53 A4 87 2A A4 87 11 FF FF B7 ED 52 CA B6 8D 2A S..*.......R...*
02D9C0: A4 87 E5 CD A3 7D 2A 9B 87 11 0F 00 19 5E 23 56 ....£}*......^#V
02D9D0: ED 53 A2 87 21 88 01 ED 5B 7F 87 01 E0 FF EB 09 .S..!...[.......
02D9E0: EB 01 20 00 ED B0 2A A2 87 11 FF FF B7 ED 52 CA .. ...*.......R.
02D9F0: E3 8C 2A A2 87 E5 CD A3 7D FD 2A 7F 87 FD 6E E0 ..*....£}.*...n.
02DA00: C3 7A 2A 87 01 26 00 11 08 00 B7 ED 52 C2 FD 94 .z*..&......R...
02DA10: CD C3 7A C3 D0 94 21 0E 00 E5 21 06 00 E5 CD 37 ..z...!...!....7
02DA20: 0B DD 6E FD 26 00 7D 32 5F 02 DD F9 DD E1 C9 2A ..n.&.}2_......*
02DA30: 71 02 22 9B 87 2A 9B 87 11 FF FF B7 ED 52 CA 3F q."..*.......R.?
02DA40: 95 CD 5E 8B 2A 9B 87 11 04 00 19 5E 23 56 ED 53 ..^.*......^#V.S
02DA50: 9B 87 C3 1F 95 C9 DD E5 DD 21 00 00 DD 39 DD 6E .........!...9.n
02DA60: 04 26 00 CB 0D D2 8D 95 2A 7C 01 29 11 59 01 19 .&......*|.).Y..
02DA70: 11 FF FF 73 23 72 CD 19 95 2A 7C 01 29 11 59 01 ...s#r...*|.).Y.
02DA80: 19 5E 23 56 D5 2A C9 01 11 0D 00 19 D1 73 23 72 .^#V.*.......s#r
02DA90: 2A 7C 01 2B 22 7C 01 2A C9 01 22 9B 87 CD 5E 8B *|.+"|.*.."...^.
02DAA0: C3 97 95 2A 7C 01 2B 22 7C 01 CD 19 95 2A 7C 01 ...*|.+"|....*|.
02DAB0: 23 22 7C 01 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD #"|.........!...
02DAC0: 39 E5 21 02 00 22 D3 01 21 00 00 7D 32 D0 87 21 9.!.."..!..}2..!
02DAD0: 00 00 7D 32 D1 87 E5 CD B7 8D E1 11 00 00 B7 ED ..}2............
02DAE0: 52 C2 D8 95 21 6D 00 E5 CD CB 82 C3 D8 96 2A 6F R...!m........*o
02DAF0: 02 ED 5B 81 87 D5 22 81 87 E5 FD E1 FD 6E 20 FD ..[..."......n .
02DB00: 66 21 E5 FD 6E 22 FD 66 23 E5 CD 5B 85 FD 2A 81 f!..n".f#..[..*.
02DB10: 87 FD 6E 1E FD 66 1F 22 D3 01 FD 6E 1C FD 66 1D ..n..f."...n..f.
02DB20: 22 D1 01 FD 6E 1A FD 66 1B 22 CF 01 FD 6E 18 FD "...n..f."...n..
02DB30: 66 19 22 60 02 2A 6F 02 11 0B 00 19 5E 23 56 ED f."`.*o.....^#V.
02DB40: 53 9F 87 2A 6F 02 22 A6 87 2A 6F 02 11 FF FF B7 S..*o."..*o.....
02DB50: ED 52 CA AC 96 2A 6F 02 E5 CD A3 7D 2A 6F 02 11 .R...*o...£}*o..
02DB60: 17 00 19 5E 16 00 EB CB 0D DA 5C 96 CD E9 8B C3 ...^......\.....
02DB70: 9B 96 2A 6F 02 22 9B 87 CD 5E 8B 2A 7C 01 23 22 ..*o."...^.*|.#"
02DB80: 7C 01 2A 7C 01 29 11 59 01 19 11 FF FF 73 23 72 |.*|.).Y.....s#r
02DB90: CD E9 8B 2A 7C 01 29 11 59 01 19 5E 23 56 D5 2A ...*|.).Y..^#V.*
02DBA0: 6F 02 11 0D 00 19 D1 73 23 72 2A 7C 01 2B 22 7C o......s#r*|.+"|
02DBB0: 01 2A 6F 02 11 0B 00 19 5E 23 56 ED 53 6F 02 C3 .*o.....^#V.So..
02DBC0: 33 96 2A A6 87 22 6F 02 2A A6 87 11 0F 00 19 5E 3.*.."o.*......^
02DBD0: 23 56 ED 53 75 02 2A A6 87 11 09 00 19 FD 2A 81 #V.Su.*.......*.
02DBE0: 87 FD 5E 09 FD 56 0A 73 23 72 E1 22 81 87 DD F9 ..^..V.s#r."....
02DBF0: DD E1 C9 C3 00 00 DD E5 CD 05 00 DD E1 C9 00 20 ...............
02DC00: 26 00 11 20 00 B7 ED 52 C2 FB 8C 21 FF FF 22 A2 &.. ...R...!..".
02DC10: 87 2A A2 87 11 FF FF B7 ED 52 CA 41 8D 21 88 01 .*.......R.A.!..
02DC20: ED 5B 7F 87 01 E0 FF EB 09 EB 01 20 00 CD 89 71 .[......... ...q
02DC30: CA 41 8D 2A A2 87 11 04 00 19 5E 23 56 ED 53 A2 .A.*......^#V.S.
02DC40: 87 2A A2 87 11 FF FF B7 ED 52 CA 3E 8D 2A A2 87 .*.......R.>.*..
02DC50: E5 CD A3 7D C3 FB 8C 2A A2 87 11 FF FF B7 ED 52 ..£}...*.......R
02DC60: CA 94 8D 2A A4 87 ED 5B 83 87 D5 22 83 87 E5 FD ...*...[..."....
02DC70: E1 21 08 00 FD 75 08 E5 2A A2 87 E5 CD 77 75 D1 .!...u..*....wu.
02DC80: FD 2A 83 87 FD 73 09 FD 72 0A FD 6E 09 FD 66 0A .*...s..r..n..f.
02DC90: 11 FF FF B7 ED 52 CA 8D 8D FD 6E 09 FD 66 0A E5 .....R....n..f..
02DCA0: CD C0 88 E1 22 83 87 C3 A5 8D 2A D0 87 26 00 CB ....".....*..&..
02DCB0: 0D D2 A5 8D 2A A4 87 E5 CD 49 85 2A A4 87 11 04 ....*....I.*....
02DCC0: 00 19 5E 23 56 ED 53 A4 87 C3 9D 8C C9 DD E5 2A ..^#V.S........*
02DCD0: 7F 87 E5 ED 73 7F 87 DD 2A 7F 87 21 DF FF 39 F9 ....s...*..!..9.
02DCE0: 2A B1 71 22 A8 87 E5 CD 64 97 E1 11 00 00 B7 ED *.q"....d.......
02DCF0: 52 C2 EA 8D 21 00 00 DD 75 06 DD 74 07 C3 DE 8F R...!...u..t....
02DD00: 21 21 00 E5 CD D2 79 21 88 01 E5 CD 08 7A 2A 6F !!....y!.....z*o
02DD10: 02 ED 5B 81 87 D5 22 81 87 E5 FD E1 FD 6E 1C FD ..[..."......n..
02DD20: 66 1D E5 CD FC 79 FD 2A 81 87 FD 6E 1A FD 66 1B f....y.*...n..f.
02DD30: E5 CD FC 79 FD 2A 81 87 FD 6E 09 FD 66 0A E5 CD ...y.*...n..f...
02DD40: FC 79 FD 2A 81 87 FD 6E 13 FD 66 14 22 AC 87 FD .y.*...n..f."...
02DD50: 6E 13 FD 66 14 ED 5B A8 87 B7 ED 52 22 A8 87 FD n..f..[....R"...
02DD60: 6E 15 FD 66 16 ED 5B 4E 1C B7 ED 52 22 AA 87 E1 n..f..[N...R"...
02DD70: 22 81 87 2A 6F 02 22 9B 87 2A D0 87 26 00 DD 75 "..*o."..*..&..u
02DD80: DF 21 00 00 7D 32 A1 87 2A 9B 87 11 FF FF B7 ED .!..}2..*.......
02DD90: 52 CA FA 8E 2A 9B 87 ED 5B 81 87 D5 22 81 87 E5 R...*...[..."...
02DDA0: FD E1 2A 81 87 01 0F 00 09 E5 CD 43 88 2A 81 87 ..*........C.*..
02DDB0: 01 11 00 09 E5 CD 43 88 FD 2A 81 87 FD 6E 0F FD ......C..*...n..
02DDC0: 66 10 22 A6 87 DD 6E DF 26 00 E5 CD 93 89 FD 2A f."...n.&......*
02DDD0: 81 87 FD 6E 11 FD 66 12 22 A6 87 21 00 00 E5 CD ...n..f."..!....
02DDE0: 93 89 2A 81 87 01 0B 00 09 E5 CD 43 88 FD 2A 81 ..*........C..*.
02DDF0: 87 FD 6E 0B FD 66 0C 22 9B 87 21 01 00 7D 32 A1 ..n..f."..!..}2.
02DE00: 20 20 20 20 20 20 20 53 59 4D 00 00 00 00 00 00 SYM......
02DE10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02DE20: 00 00 53 59 4D 00 00 53 59 4D 46 49 4C 45 53 4C ..SYM..SYMFILESL
02DE30: 42 52 00 00 00 00 00 00 00 00 00 00 00 00 00 00 BR..............
02DE40: 00 00 00 00 00 00 00 00 00 00 21 88 01 11 E9 96 ..........!.....
02DE50: 06 08 7E FE 61 FA 49 97 FE 7B F2 49 97 D6 20 12 ..~.a.I..{.I.. .
02DE60: 23 13 10 EE 21 0C 97 06 03 7E 12 23 13 10 FA AF #...!....~.#....
02DE70: 21 F4 96 06 18 77 23 10 FC C9 CD 34 97 2A B1 71 !....w#....4.*.q
02DE80: 22 6F 02 11 E8 96 CD 9C 79 FE 00 CA B0 97 21 E8 "o......y.....!.
02DE90: 96 06 00 3E 14 ED 5B B1 71 ED 53 8F 98 CD 55 7A ...>..[.q.S...Uz
02DEA0: 2A B1 71 01 00 00 B7 ED 52 CA 51 98 ED 53 B1 71 *.q.....R.Q..S.q
02DEB0: ED 53 91 98 01 01 00 2A 6F 02 5E 16 00 19 23 23 .S.....*o.^...##
02DEC0: 22 6F 02 C3 51 98 3A 0F 97 01 00 00 FE 02 CA 51 "o..Q.:........Q
02DED0: 98 FE 01 CA E5 97 3E 02 32 0F 97 11 10 97 CD 9C ......>.2.......
02DEE0: 79 01 00 00 FE 00 CA 51 98 3E 01 32 0F 97 11 E8 y......Q.>.2....
02DEF0: 98 21 10 97 06 10 3E 14 CD 55 7A 3A F6 98 87 87 .!....>..Uz:....
02DF00: 3D 47 21 08 99 11 88 01 C5 E5 06 08 23 1A FE 61 =G!.........#..a
02DF10: FA 04 98 FE 7B F2 04 98 D6 20 BE C2 0E 98 13 10 ....{.... ......
02DF20: EB C3 1C 98 E1 11 20 00 19 C1 10 D9 01 00 00 C3 ...... .........
02DF30: 51 98 D1 C1 21 0C 00 19 7E 47 E6 7F F5 AF 32 30 Q...!...~G....20
02DF40: 97 23 7E CB 10 17 32 1C 97 E5 11 10 97 0E 0F CD .#~...2.........
02DF50: E0 96 01 00 00 FE FF E1 CA 51 98 F1 32 30 97 23 .........Q..20.#
02DF60: 46 21 10 97 C3 7D 97 E1 D1 C5 E9 CD 34 97 3A 08 F!...}......4.:.
02DF70: 01 32 E8 96 0E 13 11 E8 96 CD E0 96 0E 16 11 E8 .2..............
02DF80: 96 CD E0 96 ED 5B D5 01 2A B1 71 B7 ED 52 29 44 .....[..*.q..R)D
02DF90: AF BD 28 01 04 21 E8 96 3E 15 CD 55 7A 11 E8 96 ..(..!..>..Uz...
02DFA0: 0E 10 C3 E0 96 00 00 00 00 2A 8F 98 22 0A 01 2A .........*.."..*
02DFB0: 91 98 22 0C 01 C9 2A 0A 01 22 B1 71 E5 CD 64 97 .."...*..".q..d.
02DFC0: D1 C9 CD D5 98 11 BA 98 0E 09 CD E0 96 C3 55 98 ..............U.
02DFD0: 2A 2A 20 72 65 77 72 69 74 69 6E 67 20 53 59 4D ** rewriting SYM
02DFE0: 20 66 69 6C 65 20 2A 2A 0D 0A 24 2A 0C 01 22 B1 file **..$*..".
02DFF0: 71 2A 0A 01 22 D5 01 AF BC C0 BD C0 E1 C9 00 00 q*.."...........
02E000: 87 2A D1 87 26 00 DD 75 DF E1 22 81 87 C3 72 8E .*..&..u.."...r.
02E010: 2A 6F 02 22 A6 87 21 00 00 7D 32 A1 87 2A A6 87 *o."..!..}2..*..
02E020: 11 FF FF B7 ED 52 CA D5 8F 2A A6 87 E5 CD A3 7D .....R...*....£}
02E030: 21 88 01 11 AE 87 01 20 00 ED B0 2A 9F 87 22 9B !...... ...*..".
02E040: 87 21 FF FF 22 A4 87 2A 9B 87 11 FF FF B7 ED 52 .!.."..*.......R
02E050: CA 8C 8F 2A 9B 87 E5 CD A3 7D 21 AE 87 11 88 01 ...*....£}!.....
02E060: 01 20 00 CD 89 71 C2 7B 8F 2A A6 87 11 09 00 19 . ...q.{.*......
02E070: 5E 23 56 EB E5 2A 9B 87 11 09 00 19 5E 23 56 EB ^#V..*......^#V.
02E080: D1 B7 ED 52 CA 78 8F 21 97 00 E5 CD DD 82 CD 8F ...R.x.!........
02E090: 8C 2A 9B 87 11 0B 00 19 5E 23 56 ED 53 9B 87 C3 .*......^#V.S...
02E0A0: 31 8F 2A A6 87 11 0B 00 19 5E 23 56 EB 11 FF FF 1.*......^#V....
02E0B0: B7 ED 52 C2 BD 8F 2A A6 87 11 0B 00 19 ED 5B 9F ..R...*.......[.
02E0C0: 87 73 23 72 2A 6F 02 22 9F 87 21 FF FF 22 A6 87 .s#r*o."..!.."..
02E0D0: C3 CB 8F 2A A6 87 11 0B 00 19 5E 23 56 ED 53 A6 ...*......^#V.S.
02E0E0: 87 21 01 00 7D 32 A1 87 C3 07 8F 21 01 00 DD 75 .!..}2.....!...u
02E0F0: 06 DD 74 07 ED 7B 7F 87 E1 22 7F 87 DD E1 C9 2A ..t..{...".....*
02E100: 87 01 26 00 11 2B 00 B7 ED 52 C2 F9 90 CD C3 7A ..&..+...R.....z
02E110: 21 01 00 7D 32 D0 87 21 01 00 7D 32 D1 87 E5 CD !..}2..!..}2....
02E120: B7 8D E1 11 00 00 B7 ED 52 C2 27 90 21 5A 00 E5 ........R.'.!Z..
02E130: CD CB 82 21 0E 00 E5 CD A3 07 C3 EF 90 CD C3 7A ...!....£......z
02E140: 21 2E 00 E5 21 5B 00 E5 CD 37 0B 21 FF FF 22 9B !...![...7.!..".
02E150: 87 2A 6F 02 11 17 00 19 11 00 00 73 2A 87 01 26 .*o........s*..&
02E160: 00 11 01 00 B7 ED 52 C2 E5 90 21 88 01 11 AE 87 ......R...!.....
02E170: 01 20 00 ED B0 2A 6F 02 11 0F 00 19 5E 23 56 ED . ...*o.....^#V.
02E180: 53 A6 87 2A A6 87 11 FF FF B7 ED 52 CA CE 90 2A S..*.......R...*
02E190: A6 87 E5 CD A3 7D 21 AE 87 11 88 01 01 20 00 CD ....£}!...... ..
02E1A0: 89 71 C2 9F 90 2A A6 87 E5 CD 52 85 21 FF FF 22 .q...*....R.!.."
02E1B0: A6 87 C3 CB 90 2A A6 87 11 04 00 19 5E 23 56 ED .....*......^#V.
02E1C0: 53 A6 87 2A A6 87 11 FF FF B7 ED 52 C2 CB 90 21 S..*.......R...!
02E1D0: AE 87 11 88 01 01 20 00 ED B0 21 5C 00 E5 CD CB ...... ...!\....
02E1E0: 82 C3 6D 90 CD C3 7A 2A 87 01 26 00 11 08 00 B7 ..m...z*..&.....
02E1F0: ED 52 C2 E2 90 CD C3 7A C3 46 90 CD E9 8B 2A D3 .R.....z.F....*.
02E200: 00 A3 95 E9 8F B7 94 6A 94 40 95 64 97 55 98 93 .£.....j.@.d.U..
02E210: 98 A0 98 AC 98 00 00 00 00 00 00 00 00 00 00 00 ................
02E220: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E230: 00 00 00 00 00 FF FF 00 00 00 00 00 00 00 00 00 ................
02E240: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E250: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02E260: 00 00 00 00 00 00 00 00 2A CE 87 11 00 00 B7 ED ........*.......
02E270: 52 F2 EB 87 2A AC 87 11 00 00 EB B7 ED 52 FA F9 R...*........R..
02E280: 87 2A AC 87 ED 5B CE 87 EB B7 ED 52 FA 35 88 2A .*...[.....R.5.*
02E290: AC 87 11 00 00 B7 ED 52 CB 04 21 00 00 CB 15 E5 .......R..!.....
02E2A0: 2A CE 87 11 00 00 B7 ED 52 2B CB 04 21 00 00 3F *.......R+..!..?
02E2B0: CB 15 D1 7D A3 6F CB 0D DA 35 88 2A CE 87 ED 5B ...}£o...5.*...[
02E2C0: A8 87 B7 ED 52 22 CE 87 C3 42 88 2A CE 87 ED 5B ....R"...B.*...[
02E2D0: AA 87 B7 ED 52 22 CE 87 C9 DD E5 DD 21 00 00 DD ....R"......!...
02E2E0: 39 E5 DD 6E 04 DD 66 05 5E 23 56 EB 11 FF FF B7 9..n..f.^#V.....
02E2F0: ED 52 CA 7C 88 DD 6E 04 DD 66 05 5E 23 56 ED 53 .R.|..n..f.^#V.S
02E300: CE 87 CD D2 87 DD 6E 04 DD 66 05 ED 5B CE 87 73 ......n..f..[..s
02E310: 23 72 DD F9 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD #r..........!...
02E320: 39 DD 6E 04 DD 66 05 11 FF FF B7 ED 52 C2 A6 88 9.n..f......R...
02E330: 21 FF FF DD 75 06 DD 74 07 C3 BB 88 DD 6E 04 DD !...u..t.....n..
02E340: 66 05 22 CE 87 CD D2 87 2A CE 87 DD 75 06 DD 74 f.".....*...u..t
02E350: 07 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD 39 2A A1 .........!...9*.
02E360: 87 26 00 CB 0D DA 8E 89 DD 6E 04 DD 66 05 ED 5B .&.......n..f..[
02E370: 81 87 D5 22 81 87 E5 FD E1 FD 6E 08 26 00 26 00 ..."......n.&.&.
02E380: EB 21 00 00 B7 ED 52 C2 35 89 FD 6E 09 FD 66 0A .!....R.5..n..f.
02E390: 11 00 00 B7 ED 52 CA 32 89 FD 6E 06 FD 66 07 ED .....R.2..n..f..
02E3A0: 5B 4A 1C B7 ED 52 C2 1F 89 21 00 00 FD 75 09 FD [J...R...!...u..
02E3B0: 74 0A C3 32 89 2A D3 01 11 02 00 B7 ED 52 FD 2A t..2.*.......R.*
02E3C0: 81 87 FD 75 0B FD 74 0C C3 8A 89 21 03 00 B7 ED ...u..t....!....
02E3D0: 52 C2 5B 89 FD 2A 81 87 FD 6E 0C 26 00 11 34 00 R.[..*...n.&..4.
02E3E0: B7 ED 52 CA 58 89 2A D3 01 26 00 FD 75 0C C3 8A ..R.X.*..&..u...
02E3F0: 89 21 01 00 B7 ED 52 CA 6D 89 21 02 00 B7 ED 52 .!....R.m.!....R
02E400: 01 23 22 D3 01 21 00 00 7D 32 D0 87 C3 91 91 CD .#"..!..}2......
02E410: C3 7A 21 01 00 7D 32 D1 87 2A 87 01 26 00 11 01 .z!..}2..*..&...
02E420: 00 B7 ED 52 C2 91 91 E5 CD B7 8D E1 11 00 00 B7 ...R............
02E430: ED 52 C2 29 91 21 5A 00 E5 CD CB 82 C3 7A 91 2A .R.).!Z......z.*
02E440: 6F 02 22 9B 87 2A 6F 02 11 17 00 19 11 01 00 73 o."..*o........s
02E450: CD 5E 8B 2A 7C 01 23 22 7C 01 2A 7C 01 29 11 59 .^.*|.#"|.*|.).Y
02E460: 01 19 11 FF FF 73 23 72 CD E9 8B 2A 7C 01 29 11 .....s#r...*|.).
02E470: 59 01 19 5E 23 56 D5 2A 6F 02 11 0D 00 19 D1 73 Y..^#V.*o......s
02E480: 23 72 2A 7C 01 2B 22 7C 01 2A D3 01 23 22 D3 01 #r*|.+"|.*..#"..
02E490: CD C3 7A 2A 87 01 26 00 11 08 00 B7 ED 52 C2 8E ..z*..&......R..
02E4A0: 91 CD C3 7A C3 03 91 21 0E 00 E5 21 06 00 E5 CD ...z...!...!....
02E4B0: 37 0B C9 DD E5 DD 21 00 00 DD 39 DD 6E 04 DD 66 7.....!...9.n..f
02E4C0: 05 11 FF FF B7 ED 52 CA 60 92 DD 6E 04 DD 66 05 ......R.`..n..f.
02E4D0: 5E 23 56 EB E5 CD 9D 91 DD 6E 04 DD 66 05 11 08 ^#V......n..f...
02E4E0: 00 19 5E 16 00 EB 11 00 00 B7 ED 52 C2 4A 92 DD ..^........R.J..
02E4F0: 6E 04 DD 66 05 11 0D 00 19 5E 16 00 CB 0B D2 4A n..f.....^.....J
02E500: 92 DD 6E 04 DD 66 05 11 06 00 19 5E 23 56 EB FD ..n..f.....^#V..
02E510: 2A 7F 87 FD 5E FC FD 56 FD B7 ED 52 C2 4A 92 DD *...^..V...R.J..
02E520: 6E 04 DD 66 05 E5 CD A3 7D 21 00 00 E5 CD D4 07 n..f...£}!......
02E530: 2A 7E 01 DD 75 04 DD 74 05 2A 7E 01 11 FF FF B7 *~..u..t.*~.....
02E540: ED 52 CA 4A 92 21 88 01 E5 21 08 00 E5 CD A2 09 .R.J.!...!......
02E550: 2A 7E 01 11 09 00 19 DD 5E 04 DD 56 05 73 23 72 *~......^..V.s#r
02E560: DD 6E 04 DD 66 05 11 02 00 19 5E 23 56 DD 73 04 .n..f.....^#V.s.
02E570: DD 72 05 C3 A5 91 DD E1 E1 C1 E9 CD C3 7A 2A 87 .r...........z*.
02E580: 01 26 00 11 01 00 B7 ED 52 C2 16 93 21 01 00 E5 .&......R...!...
02E590: CD D4 07 2A 7E 01 FD 2A 7F 87 FD 75 FE FD 74 FF ...*~..*...u..t.
02E5A0: 2A 7E 01 11 FF FF B7 ED 52 CA FF 92 21 88 01 E5 *~......R...!...
02E5B0: 21 08 00 E5 CD A2 09 2A 7E 01 11 09 00 19 FD 2A !......*~......*
02E5C0: 7F 87 FD 5E FE FD 56 FF 73 23 72 FD 6E FE FD 66 ...^..V.s#r.n..f
02E5D0: FF 11 08 00 19 5E 16 00 EB 11 04 00 B7 ED 52 C2 .....^........R.
02E5E0: FF 92 FD 6E FE FD 66 FF 11 0B 00 19 5E 16 00 EB ...n..f.....^...
02E5F0: 11 0E 00 B7 ED 52 C2 FF 92 FD 6E FE FD 66 FF FD .....R....n..f..
02E600: 54 72 61 63 6B 2D 49 6E 66 6F 0D 0A 00 00 00 00 Track-Info......
02E610: 27 00 00 00 02 09 4E E5 27 00 41 02 00 00 00 02 '.....N.'.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: C2 8A 89 2A D3 01 11 02 00 B7 ED 52 FD 2A 81 87 ...*.......R.*..
02E710: FD 75 0E DD 6E 04 DD 66 05 E5 CD A3 7D C3 8A 89 .u..n..f...£}...
02E720: E1 22 81 87 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD ."..........!...
02E730: 39 2A A6 87 11 FF FF B7 ED 52 CA 59 8B 2A A6 87 9*.......R.Y.*..
02E740: ED 5B 81 87 D5 22 81 87 E5 FD E1 DD 6E 04 26 00 .[..."......n.&.
02E750: CB 0D D2 C6 89 2A A6 87 E5 CD 49 85 2A 81 87 01 .....*....I.*...
02E760: 06 00 09 E5 CD 43 88 2A 81 87 E5 CD 43 88 2A 81 .....C.*....C.*.
02E770: 87 01 02 00 09 E5 CD 43 88 2A 81 87 01 04 00 09 .......C.*......
02E780: E5 CD 43 88 2A A6 87 E5 CD C0 88 FD 2A 81 87 FD ..C.*.......*...
02E790: 6E 08 26 00 26 00 EB 21 04 00 B7 ED 52 C2 2E 8B n.&.&..!....R...
02E7A0: FD 6E 0B 26 00 26 00 EB 21 04 00 B7 ED 52 C2 34 .n.&.&..!....R.4
02E7B0: 8A 2A 81 87 01 0C 00 09 E5 CD 43 88 2A 81 87 01 .*........C.*...
02E7C0: 0E 00 09 E5 CD 43 88 C3 2B 8B 21 05 00 B7 ED 52 .....C..+.!....R
02E7D0: C2 4B 8A 2A 81 87 01 0C 00 09 E5 CD 43 88 C3 2B .K.*........C..+
02E7E0: 8B 21 06 00 B7 ED 52 CA 5D 8A 21 0E 00 B7 ED 52 .!....R.].!....R
02E7F0: C2 6B 8A 2A 81 87 01 10 00 09 E5 CD 43 88 C3 2B .k.*........C..+
02E800: 8B 21 08 00 B7 ED 52 CA 7D 8A 21 09 00 B7 ED 52 .!....R.}.!....R
02E810: C2 8B 8A 2A 81 87 01 0C 00 09 E5 CD 43 88 C3 2B ...*........C..+
02E820: 8B 21 0D 00 B7 ED 52 C2 09 8B E5 FD 2A 81 87 FD .!....R.....*...
02E830: 6E 0C FD 66 0D E5 CD 83 88 D1 FD 2A 81 87 FD 73 n..f.......*...s
02E840: 0C FD 72 0D FD 6E 0C FD 66 0D 22 97 87 2A 97 87 ..r..n..f."..*..
02E850: 11 FF FF B7 ED 52 CA 06 8B 2A 97 87 ED 5B 83 87 .....R...*...[..
02E860: D5 22 83 87 E5 FD E1 2A 83 87 01 01 00 09 E5 CD .".....*........
02E870: 43 88 E5 FD 2A 83 87 FD 6E 03 FD 66 04 E5 CD 83 C...*...n..f....
02E880: 88 D1 FD 2A 83 87 FD 73 03 FD 72 04 FD 6E 03 FD ...*...s..r..n..
02E890: 66 04 22 97 87 E1 22 83 87 C3 B7 8A C3 2B 8B 21 f."..."......+.!
02E8A0: 11 00 B7 ED 52 CA 1B 8B 21 07 00 B7 ED 52 C2 2B ....R...!....R.+
02E8B0: 8B 2A D3 01 FD 2A 81 87 FD 75 0C FD 74 0D C3 2B .*...*...u..t..+
02E8C0: 8B C3 45 8B 21 08 00 B7 ED 52 C2 45 8B 2A 81 87 ..E.!....R.E.*..
02E8D0: 01 09 00 09 E5 CD 43 88 C3 45 8B FD 2A 81 87 FD ......C..E..*...
02E8E0: 6E 04 FD 66 05 22 A6 87 E1 22 81 87 C3 9B 89 DD n..f."..."......
02E8F0: E1 E1 C1 E9 2A 9B 87 E5 CD A3 7D 21 88 01 E5 2A ....*....£}!...*
02E900: 73 FE DD 72 FF 21 2E 00 E5 21 5B 00 E5 CD 37 0B s..r.!...![...7.
02E910: 2A 87 01 26 00 11 01 00 B7 ED 52 C2 4A 94 21 88 *..&......R.J.!.
02E920: 01 11 AE 87 01 20 00 ED B0 21 88 01 E5 DD 6E FE ..... ...!....n.
02E930: DD 66 FF E5 CD 51 81 2A 7E 01 11 FF FF B7 ED 52 .f...Q.*~......R
02E940: C2 B7 93 21 5C 00 E5 CD CB 82 C3 33 94 2A 7E 01 ...!\......3.*~.
02E950: FD 2A 7F 87 FD 75 FE FD 74 FF 2A 7E 01 11 FF FF .*...u..t.*~....
02E960: B7 ED 52 CA 33 94 21 88 01 E5 21 08 00 E5 CD A2 ..R.3.!...!.....
02E970: 09 2A 7E 01 11 09 00 19 FD 2A 7F 87 FD 5E FE FD .*~......*...^..
02E980: 56 FF 73 23 72 FD 6E FE FD 66 FF 11 08 00 19 5E V.s#r.n..f.....^
02E990: 16 00 EB 11 04 00 B7 ED 52 C2 33 94 FD 6E FE FD ........R.3..n..
02E9A0: 66 FF 11 0B 00 19 5E 16 00 EB 11 0E 00 B7 ED 52 f.....^........R
02E9B0: C2 33 94 FD 6E FE FD 66 FF FD 75 FC FD 74 FD DD .3..n..f..u..t..
02E9C0: 6E FE DD 66 FF E5 CD 9D 91 CD C3 7A 2A 87 01 26 n..f.......z*..&
02E9D0: 00 11 08 00 B7 ED 52 C2 47 94 CD C3 7A C3 7A 93 ......R.G...z.z.
02E9E0: 2A 87 01 26 00 11 0E 00 B7 ED 52 C2 5E 94 CD C3 *..&......R.^...
02E9F0: 7A C3 65 94 21 60 00 E5 CD DD 82 DD F9 DD E1 C9 z.e.!`..........
02EA00: DD E5 2A 7F 87 E5 ED 73 7F 87 DD 2A 7F 87 E5 E5 ..*....s...*....
02EA10: 2A 87 01 26 00 11 2E 00 B7 ED 52 C2 8E 94 CD 65 *..&......R....e
02EA20: 92 C3 AC 94 CD C3 7A 2A 87 01 26 00 11 01 00 B7 ......z*..&.....
02EA30: ED 52 CA A9 94 21 39 00 E5 CD 5F 82 C3 AC 94 CD .R...!9..._.....
02EA40: 22 93 ED 7B 7F 87 E1 22 7F 87 DD E1 C9 DD E5 DD "..{..."........
02EA50: 21 00 00 DD 39 E5 E5 2A 5F 02 26 00 DD 75 FD 21 !...9..*_.&..u.!
02EA60: 01 00 7D 32 5F 02 2A 87 01 26 00 11 01 00 B7 ED ..}2_.*..&......
02EA70: 52 C2 00 95 21 88 01 E5 21 09 00 E5 CD A2 09 CD R...!...!.......
02EA80: C3 7A 2A 87 01 26 00 11 08 00 B7 ED 52 C2 FD 94 .z*..&......R...
02EA90: CD C3 7A C3 D0 94 21 0E 00 E5 21 06 00 E5 CD 37 ..z...!...!....7
02EAA0: 0B DD 6E FD 26 00 7D 32 5F 02 DD F9 DD E1 C9 2A ..n.&.}2_......*
02EAB0: 71 02 22 9B 87 2A 9B 87 11 FF FF B7 ED 52 CA 3F q."..*.......R.?
02EAC0: 95 CD 5E 8B 2A 9B 87 11 04 00 19 5E 23 56 ED 53 ..^.*......^#V.S
02EAD0: 9B 87 C3 1F 95 C9 DD E5 DD 21 00 00 DD 39 DD 6E .........!...9.n
02EAE0: 04 26 00 CB 0D D2 8D 95 2A 7C 01 29 11 59 01 19 .&......*|.).Y..
02EAF0: 11 FF FF 73 23 72 CD 19 95 2A 7C 01 29 11 59 01 ...s#r...*|.).Y.
02EB00: 7C 01 29 11 59 01 19 5E 23 56 EB E5 CD 51 81 2A |.).Y..^#V...Q.*
02EB10: 9B 87 ED 5B 81 87 D5 22 81 87 E5 FD E1 2A 7E 01 ...[...".....*~.
02EB20: 11 FF FF B7 ED 52 CA 9D 8B 21 05 00 E5 CD CB 82 .....R...!......
02EB30: C3 E4 8B 21 FF FF FD 2A 81 87 FD 75 00 FD 74 01 ...!...*...u..t.
02EB40: 21 FF FF FD 75 02 FD 74 03 2A 7C 01 29 11 59 01 !...u..t.*|.).Y.
02EB50: 19 5E 23 56 EB 11 FF FF B7 ED 52 C2 DA 8B 2A 7C .^#V......R...*|
02EB60: 01 29 11 59 01 19 ED 5B 9B 87 73 23 72 C3 E4 8B .).Y...[..s#r...
02EB70: 2A 80 01 ED 5B 9B 87 73 23 72 E1 22 81 87 C9 DD *...[..s#r."....
02EB80: E5 DD 21 00 00 DD 39 E5 2A 6F 02 11 0F 00 19 5E ..!...9.*o.....^
02EB90: 23 56 ED 53 9B 87 2A 9B 87 11 FF FF B7 ED 52 CA #V.S..*.......R.
02EBA0: 8A 8C 2A 9B 87 ED 5B 81 87 D5 22 81 87 E5 FD E1 ..*...[...".....
02EBB0: 2A 9B 87 E5 CD A3 7D FD 2A 81 87 FD 6E 08 26 00 *....£}.*...n.&.
02EBC0: 11 00 00 B7 ED 52 C2 65 8C FD 6E 0D 26 00 CB 0D .....R.e..n.&...
02EBD0: D2 65 8C FD 6E 06 FD 66 07 ED 5B 4A 1C B7 ED 52 .e..n..f..[J...R
02EBE0: CA 65 8C E5 FD 6E 06 FD 66 07 E5 CD B6 85 E1 CB .e...n..f.......
02EBF0: 0D DA 65 8C 2A 9B 87 E5 CD 52 85 E5 2A 9B 87 E5 ..e.*....R..*...
02EC00: CD B6 85 E1 CB 0D DA 76 8C CD 5E 8B FD 2A 81 87 .......v..^..*..
02EC10: FD 6E 04 FD 66 05 22 9B 87 E1 22 81 87 C3 00 8C .n..f."...".....
02EC20: DD F9 DD E1 C9 2A A6 87 11 0F 00 19 5E 23 56 ED .....*......^#V.
02EC30: 53 A4 87 2A A4 87 11 FF FF B7 ED 52 CA B6 8D 2A S..*.......R...*
02EC40: A4 87 E5 CD A3 7D 2A 9B 87 11 0F 00 19 5E 23 56 ....£}*......^#V
02EC50: ED 53 A2 87 21 88 01 ED 5B 7F 87 01 E0 FF EB 09 .S..!...[.......
02EC60: EB 01 20 00 ED B0 2A A2 87 11 FF FF B7 ED 52 CA .. ...*.......R.
02EC70: E3 8C 2A A2 87 E5 CD A3 7D FD 2A 7F 87 FD 6E E0 ..*....£}.*...n.
02EC80: 26 00 11 20 00 B7 ED 52 C2 FB 8C 21 FF FF 22 A2 &.. ...R...!..".
02EC90: 87 2A A2 87 11 FF FF B7 ED 52 CA 41 8D 21 88 01 .*.......R.A.!..
02ECA0: ED 5B 7F 87 01 E0 FF EB 09 EB 01 20 00 CD 89 71 .[......... ...q
02ECB0: CA 41 8D 2A A2 87 11 04 00 19 5E 23 56 ED 53 A2 .A.*......^#V.S.
02ECC0: 87 2A A2 87 11 FF FF B7 ED 52 CA 3E 8D 2A A2 87 .*.......R.>.*..
02ECD0: E5 CD A3 7D C3 FB 8C 2A A2 87 11 FF FF B7 ED 52 ..£}...*.......R
02ECE0: CA 94 8D 2A A4 87 ED 5B 83 87 D5 22 83 87 E5 FD ...*...[..."....
02ECF0: E1 21 08 00 FD 75 08 E5 2A A2 87 E5 CD 77 75 D1 .!...u..*....wu.
02ED00: 19 5E 23 56 D5 2A C9 01 11 0D 00 19 D1 73 23 72 .^#V.*.......s#r
02ED10: 2A 7C 01 2B 22 7C 01 2A C9 01 22 9B 87 CD 5E 8B *|.+"|.*.."...^.
02ED20: C3 97 95 2A 7C 01 2B 22 7C 01 CD 19 95 2A 7C 01 ...*|.+"|....*|.
02ED30: 23 22 7C 01 DD E1 E1 C1 E9 DD E5 DD 21 00 00 DD #"|.........!...
02ED40: 39 E5 21 02 00 22 D3 01 21 00 00 7D 32 D0 87 21 9.!.."..!..}2..!
02ED50: 00 00 7D 32 D1 87 E5 CD B7 8D E1 11 00 00 B7 ED ..}2............
02ED60: 52 C2 D8 95 21 6D 00 E5 CD CB 82 C3 D8 96 2A 6F R...!m........*o
02ED70: 02 ED 5B 81 87 D5 22 81 87 E5 FD E1 FD 6E 20 FD ..[..."......n .
02ED80: 66 21 E5 FD 6E 22 FD 66 23 E5 CD 5B 85 FD 2A 81 f!..n".f#..[..*.
02ED90: 87 FD 6E 1E FD 66 1F 22 D3 01 FD 6E 1C FD 66 1D ..n..f."...n..f.
02EDA0: 22 D1 01 FD 6E 1A FD 66 1B 22 CF 01 FD 6E 18 FD "...n..f."...n..
02EDB0: 66 19 22 60 02 2A 6F 02 11 0B 00 19 5E 23 56 ED f."`.*o.....^#V.
02EDC0: 53 9F 87 2A 6F 02 22 A6 87 2A 6F 02 11 FF FF B7 S..*o."..*o.....
02EDD0: ED 52 CA AC 96 2A 6F 02 E5 CD A3 7D 2A 6F 02 11 .R...*o...£}*o..
02EDE0: 17 00 19 5E 16 00 EB CB 0D DA 5C 96 CD E9 8B C3 ...^......\.....
02EDF0: 9B 96 2A 6F 02 22 9B 87 CD 5E 8B 2A 7C 01 23 22 ..*o."...^.*|.#"
02EE00: 7C 01 2A 7C 01 29 11 59 01 19 11 FF FF 73 23 72 |.*|.).Y.....s#r
02EE10: CD E9 8B 2A 7C 01 29 11 59 01 19 5E 23 56 D5 2A ...*|.).Y..^#V.*
02EE20: 6F 02 11 0D 00 19 D1 73 23 72 2A 7C 01 2B 22 7C o......s#r*|.+"|
02EE30: 01 2A 6F 02 11 0B 00 19 5E 23 56 ED 53 6F 02 C3 .*o.....^#V.So..
02EE40: 33 96 2A A6 87 22 6F 02 2A A6 87 11 0F 00 19 5E 3.*.."o.*......^
02EE50: 23 56 ED 53 75 02 2A A6 87 11 09 00 19 FD 2A 81 #V.Su.*.......*.
02EE60: 87 FD 5E 09 FD 56 0A 73 23 72 E1 22 81 87 DD F9 ..^..V.s#r."....
02EE70: DD E1 C9 C3 00 00 DD E5 CD 05 00 DD E1 C9 00 20 ...............
02EE80: 20 20 20 20 20 20 20 53 59 4D 00 00 00 00 00 00 SYM......
02EE90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02EEA0: 00 00 53 59 4D 00 00 53 59 4D 46 49 4C 45 53 4C ..SYM..SYMFILESL
02EEB0: 42 52 00 00 00 00 00 00 00 00 00 00 00 00 00 00 BR..............
02EEC0: 00 00 00 00 00 00 00 00 00 00 21 88 01 11 E9 96 ..........!.....
02EED0: 06 08 7E FE 61 FA 49 97 FE 7B F2 49 97 D6 20 12 ..~.a.I..{.I.. .
02EEE0: 23 13 10 EE 21 0C 97 06 03 7E 12 23 13 10 FA AF #...!....~.#....
02EEF0: 21 F4 96 06 18 77 23 10 FC C9 CD 34 97 2A B1 71 !....w#....4.*.q
02EF00: FD 2A 83 87 FD 73 09 FD 72 0A FD 6E 09 FD 66 0A .*...s..r..n..f.
02EF10: 11 FF FF B7 ED 52 CA 8D 8D FD 6E 09 FD 66 0A E5 .....R....n..f..
02EF20: CD C0 88 E1 22 83 87 C3 A5 8D 2A D0 87 26 00 CB ....".....*..&..
02EF30: 0D D2 A5 8D 2A A4 87 E5 CD 49 85 2A A4 87 11 04 ....*....I.*....
02EF40: 00 19 5E 23 56 ED 53 A4 87 C3 9D 8C C9 DD E5 2A ..^#V.S........*
02EF50: 7F 87 E5 ED 73 7F 87 DD 2A 7F 87 21 DF FF 39 F9 ....s...*..!..9.
02EF60: 2A B1 71 22 A8 87 E5 CD 64 97 E1 11 00 00 B7 ED *.q"....d.......
02EF70: 52 C2 EA 8D 21 00 00 DD 75 06 DD 74 07 C3 DE 8F R...!...u..t....
02EF80: 21 21 00 E5 CD D2 79 21 88 01 E5 CD 08 7A 2A 6F !!....y!.....z*o
02EF90: 02 ED 5B 81 87 D5 22 81 87 E5 FD E1 FD 6E 1C FD ..[..."......n..
02EFA0: 66 1D E5 CD FC 79 FD 2A 81 87 FD 6E 1A FD 66 1B f....y.*...n..f.
02EFB0: E5 CD FC 79 FD 2A 81 87 FD 6E 09 FD 66 0A E5 CD ...y.*...n..f...
02EFC0: FC 79 FD 2A 81 87 FD 6E 13 FD 66 14 22 AC 87 FD .y.*...n..f."...
02EFD0: 6E 13 FD 66 14 ED 5B A8 87 B7 ED 52 22 A8 87 FD n..f..[....R"...
02EFE0: 6E 15 FD 66 16 ED 5B 4E 1C B7 ED 52 22 AA 87 E1 n..f..[N...R"...
02EFF0: 22 81 87 2A 6F 02 22 9B 87 2A D0 87 26 00 DD 75 "..*o."..*..&..u
02F000: DF 21 00 00 7D 32 A1 87 2A 9B 87 11 FF FF B7 ED .!..}2..*.......
02F010: 52 CA FA 8E 2A 9B 87 ED 5B 81 87 D5 22 81 87 E5 R...*...[..."...
02F020: FD E1 2A 81 87 01 0F 00 09 E5 CD 43 88 2A 81 87 ..*........C.*..
02F030: 01 11 00 09 E5 CD 43 88 FD 2A 81 87 FD 6E 0F FD ......C..*...n..
02F040: 66 10 22 A6 87 DD 6E DF 26 00 E5 CD 93 89 FD 2A f."...n.&......*
02F050: 81 87 FD 6E 11 FD 66 12 22 A6 87 21 00 00 E5 CD ...n..f."..!....
02F060: 93 89 2A 81 87 01 0B 00 09 E5 CD 43 88 FD 2A 81 ..*........C..*.
02F070: 87 FD 6E 0B FD 66 0C 22 9B 87 21 01 00 7D 32 A1 ..n..f."..!..}2.
02F080: 87 2A D1 87 26 00 DD 75 DF E1 22 81 87 C3 72 8E .*..&..u.."...r.
02F090: 2A 6F 02 22 A6 87 21 00 00 7D 32 A1 87 2A A6 87 *o."..!..}2..*..
02F0A0: 11 FF FF B7 ED 52 CA D5 8F 2A A6 87 E5 CD A3 7D .....R...*....£}
02F0B0: 21 88 01 11 AE 87 01 20 00 ED B0 2A 9F 87 22 9B !...... ...*..".
02F0C0: 87 21 FF FF 22 A4 87 2A 9B 87 11 FF FF B7 ED 52 .!.."..*.......R
02F0D0: CA 8C 8F 2A 9B 87 E5 CD A3 7D 21 AE 87 11 88 01 ...*....£}!.....
02F0E0: 01 20 00 CD 89 71 C2 7B 8F 2A A6 87 11 09 00 19 . ...q.{.*......
02F0F0: 5E 23 56 EB E5 2A 9B 87 11 09 00 19 5E 23 56 EB ^#V..*......^#V.
02F100: 22 6F 02 11 E8 96 CD 9C 79 FE 00 CA B0 97 21 E8 "o......y.....!.
02F110: 96 06 00 3E 14 ED 5B B1 71 ED 53 8F 98 CD 55 7A ...>..[.q.S...Uz
02F120: 2A B1 71 01 00 00 B7 ED 52 CA 51 98 ED 53 B1 71 *.q.....R.Q..S.q
02F130: ED 53 91 98 01 01 00 2A 6F 02 5E 16 00 19 23 23 .S.....*o.^...##
02F140: 22 6F 02 C3 51 98 3A 0F 97 01 00 00 FE 02 CA 51 "o..Q.:........Q
02F150: 98 FE 01 CA E5 97 3E 02 32 0F 97 11 10 97 CD 9C ......>.2.......
02F160: 79 01 00 00 FE 00 CA 51 98 3E 01 32 0F 97 11 E8 y......Q.>.2....
02F170: 98 21 10 97 06 10 3E 14 CD 55 7A 3A F6 98 87 87 .!....>..Uz:....
02F180: 3D 47 21 08 99 11 88 01 C5 E5 06 08 23 1A FE 61 =G!.........#..a
02F190: FA 04 98 FE 7B F2 04 98 D6 20 BE C2 0E 98 13 10 ....{.... ......
02F1A0: EB C3 1C 98 E1 11 20 00 19 C1 10 D9 01 00 00 C3 ...... .........
02F1B0: 51 98 D1 C1 21 0C 00 19 7E 47 E6 7F F5 AF 32 30 Q...!...~G....20
02F1C0: 97 23 7E CB 10 17 32 1C 97 E5 11 10 97 0E 0F CD .#~...2.........
02F1D0: E0 96 01 00 00 FE FF E1 CA 51 98 F1 32 30 97 23 .........Q..20.#
02F1E0: 46 21 10 97 C3 7D 97 E1 D1 C5 E9 CD 34 97 3A 08 F!...}......4.:.
02F1F0: 01 32 E8 96 0E 13 11 E8 96 CD E0 96 0E 16 11 E8 .2..............
02F200: 96 CD E0 96 ED 5B D5 01 2A B1 71 B7 ED 52 29 44 .....[..*.q..R)D
02F210: AF BD 28 01 04 21 E8 96 3E 15 CD 55 7A 11 E8 96 ..(..!..>..Uz...
02F220: 0E 10 C3 E0 96 00 00 00 00 2A 8F 98 22 0A 01 2A .........*.."..*
02F230: 91 98 22 0C 01 C9 2A 0A 01 22 B1 71 E5 CD 64 97 .."...*..".q..d.
02F240: D1 C9 CD D5 98 11 BA 98 0E 09 CD E0 96 C3 55 98 ..............U.
02F250: 2A 2A 20 72 65 77 72 69 74 69 6E 67 20 53 59 4D ** rewriting SYM
02F260: 20 66 69 6C 65 20 2A 2A 0D 0A 24 2A 0C 01 22 B1 file **..$*..".
02F270: 71 2A 0A 01 22 D5 01 AF BC C0 BD C0 E1 C9 00 00 q*.."...........
02F280: 20 20 20 20 20 20 20 53 59 4D 00 00 00 00 00 00 SYM......
02F290: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
02F2A0: 00 00 53 59 4D 00 00 53 59 4D 46 49 4C 45 53 4C ..SYM..SYMFILESL
02F2B0: 42 52 00 00 00 00 00 00 00 00 00 00 00 00 00 00 BR..............
02F2C0: 00 00 00 00 00 00 00 00 00 00 21 88 01 11 E9 96 ..........!.....
02F2D0: 06 08 7E FE 61 FA 49 97 FE 7B F2 49 97 D6 20 12 ..~.a.I..{.I.. .
02F2E0: 23 13 10 EE 21 0C 97 06 03 7E 12 23 13 10 FA AF #...!....~.#....
02F2F0: 21 F4 96 06 18 77 23 10 FC C9 CD 34 97 2A B1 71 !....w#....4.*.q
02F300: D1 B7 ED 52 CA 78 8F 21 97 00 E5 CD DD 82 CD 8F ...R.x.!........
02F310: 8C 2A 9B 87 11 0B 00 19 5E 23 56 ED 53 9B 87 C3 .*......^#V.S...
02F320: 31 8F 2A A6 87 11 0B 00 19 5E 23 56 EB 11 FF FF 1.*......^#V....
02F330: B7 ED 52 C2 BD 8F 2A A6 87 11 0B 00 19 ED 5B 9F ..R...*.......[.
02F340: 87 73 23 72 2A 6F 02 22 9F 87 21 FF FF 22 A6 87 .s#r*o."..!.."..
02F350: C3 CB 8F 2A A6 87 11 0B 00 19 5E 23 56 ED 53 A6 ...*......^#V.S.
02F360: 87 21 01 00 7D 32 A1 87 C3 07 8F 21 01 00 DD 75 .!..}2.....!...u
02F370: 06 DD 74 07 ED 7B 7F 87 E1 22 7F 87 DD E1 C9 2A ..t..{...".....*
02F380: 87 01 26 00 11 2B 00 B7 ED 52 C2 F9 90 CD C3 7A ..&..+...R.....z
02F390: 21 01 00 7D 32 D0 87 21 01 00 7D 32 D1 87 E5 CD !..}2..!..}2....
02F3A0: B7 8D E1 11 00 00 B7 ED 52 C2 27 90 21 5A 00 E5 ........R.'.!Z..
02F3B0: CD CB 82 21 0E 00 E5 CD A3 07 C3 EF 90 CD C3 7A ...!....£......z
02F3C0: 21 2E 00 E5 21 5B 00 E5 CD 37 0B 21 FF FF 22 9B !...![...7.!..".
02F3D0: 87 2A 6F 02 11 17 00 19 11 00 00 73 2A 87 01 26 .*o........s*..&
02F3E0: 00 11 01 00 B7 ED 52 C2 E5 90 21 88 01 11 AE 87 ......R...!.....
02F3F0: 01 20 00 ED B0 2A 6F 02 11 0F 00 19 5E 23 56 ED . ...*o.....^#V.
02F400: 53 A6 87 2A A6 87 11 FF FF B7 ED 52 CA CE 90 2A S..*.......R...*
02F410: A6 87 E5 CD A3 7D 21 AE 87 11 88 01 01 20 00 CD ....£}!...... ..
02F420: 89 71 C2 9F 90 2A A6 87 E5 CD 52 85 21 FF FF 22 .q...*....R.!.."
02F430: A6 87 C3 CB 90 2A A6 87 11 04 00 19 5E 23 56 ED .....*......^#V.
02F440: 53 A6 87 2A A6 87 11 FF FF B7 ED 52 C2 CB 90 21 S..*.......R...!
02F450: AE 87 11 88 01 01 20 00 ED B0 21 5C 00 E5 CD CB ...... ...!\....
02F460: 82 C3 6D 90 CD C3 7A 2A 87 01 26 00 11 08 00 B7 ..m...z*..&.....
02F470: ED 52 C2 E2 90 CD C3 7A C3 46 90 CD E9 8B 2A D3 .R.....z.F....*.
02F480: 01 23 22 D3 01 21 00 00 7D 32 D0 87 C3 91 91 CD .#"..!..}2......
02F490: C3 7A 21 01 00 7D 32 D1 87 2A 87 01 26 00 11 01 .z!..}2..*..&...
02F4A0: 00 B7 ED 52 C2 91 91 E5 CD B7 8D E1 11 00 00 B7 ...R............
02F4B0: ED 52 C2 29 91 21 5A 00 E5 CD CB 82 C3 7A 91 2A .R.).!Z......z.*
02F4C0: 6F 02 22 9B 87 2A 6F 02 11 17 00 19 11 01 00 73 o."..*o........s
02F4D0: CD 5E 8B 2A 7C 01 23 22 7C 01 2A 7C 01 29 11 59 .^.*|.#"|.*|.).Y
02F4E0: 01 19 11 FF FF 73 23 72 CD E9 8B 2A 7C 01 29 11 .....s#r...*|.).
02F4F0: 59 01 19 5E 23 56 D5 2A 6F 02 11 0D 00 19 D1 73 Y..^#V.*o......s
02F500: 74 3E 3D 48 49 47 48 28 50 72 65 63 29 20 54 48 t>=HIGH(Prec) TH
02F510: 45 4E 0D 0A 09 09 45 72 72 6F 72 45 78 69 74 28 EN....ErrorExit(
02F520: 27 20 50 72 65 63 20 74 61 62 6C 65 20 6F 76 65 ' Prec table ove
02F530: 72 66 6C 6F 77 27 29 3B 0D 0A 09 09 45 4E 44 3B rflow');....END;
02F540: 0D 0A 09 50 72 65 63 5B 50 72 65 63 43 6F 75 6E ...Prec[PrecCoun
02F550: 74 2B 31 5D 2E 4E 61 6D 65 3A 3D 4E 61 6D 65 3B t+1].Name:=Name;
02F560: 0D 0A 09 50 72 65 63 5B 50 72 65 63 43 6F 75 6E ...Prec[PrecCoun
02F570: 74 2B 31 5D 2E 44 65 66 4D 6F 64 75 6C 65 3A 3D t+1].DefModule:=
02F580: 49 73 44 45 46 3B 0D 0A 09 69 3A 3D 31 3B 0D 0A IsDEF;...i:=1;..
02F590: 09 57 48 49 4C 45 20 28 50 72 65 63 5B 69 5D 2E .WHILE (Prec[i].
02F5A0: 4E 61 6D 65 3C 3E 4E 61 6D 65 29 20 4F 52 20 28 Name<>Name) OR (
02F5B0: 50 72 65 63 5B 69 5D 2E 44 65 66 4D 6F 64 75 6C Prec[i].DefModul
02F5C0: 65 3C 3E 49 73 44 45 46 29 20 44 4F 20 49 4E 43 e<>IsDEF) DO INC
02F5D0: 28 69 29 20 45 4E 44 3B 0D 0A 09 49 46 20 69 3E (i) END;...IF i>
02F5E0: 50 72 65 63 43 6F 75 6E 74 20 54 48 45 4E 0D 0A PrecCount THEN..
02F5F0: 09 09 50 72 65 63 43 6F 75 6E 74 3A 3D 69 3B 0D ..PrecCount:=i;.
02F600: 0A 09 09 57 49 54 48 20 50 72 65 63 5B 50 72 65 ...WITH Prec[Pre
02F610: 63 43 6F 75 6E 74 5D 20 44 4F 0D 0A 09 09 09 44 cCount] DO.....D
02F620: 65 66 4D 6F 64 75 6C 65 3A 3D 49 73 44 45 46 3B efModule:=IsDEF;
02F630: 0D 0A 09 09 09 49 6D 70 6F 72 74 43 6F 75 6E 74 .....ImportCount
02F640: 3A 3D 30 3B 0D 0A 09 09 09 45 4E 44 3B 0D 0A 09 :=0;.....END;...
02F650: 09 45 4E 44 3B 28 2A 49 46 20 69 2A 29 0D 0A 09 .END;(*IF i*)...
02F660: 52 45 54 55 52 4E 20 69 0D 0A 09 45 4E 44 20 46 RETURN i...END F
02F670: 69 6E 64 4D 6F 64 75 6C 65 3B 0D 0A 50 52 4F 43 indModule;..PROC
02F680: 45 44 55 52 45 20 43 6F 6D 70 61 72 28 61 2C 62 EDURE Compar(a,b
02F690: 3A 41 44 44 52 45 53 53 29 3A 42 4F 4F 4C 45 41 :ADDRESS):BOOLEA
02F6A0: 4E 3B 0D 0A 56 41 52 09 70 2C 71 3A 50 46 69 6C N;..VAR.p,q:PFil
02F6B0: 65 4E 61 6D 65 3B 0D 0A 42 45 47 49 4E 0D 0A 09 eName;..BEGIN...
02F6C0: 70 3A 3D 50 46 69 6C 65 4E 61 6D 65 28 61 29 3B p:=PFileName(a);
02F6D0: 0D 0A 09 71 3A 3D 50 46 69 6C 65 4E 61 6D 65 28 ...q:=PFileName(
02F6E0: 62 29 3B 0D 0A 09 52 45 54 55 52 4E 20 70 5E 3E b);...RETURN p^>
02F6F0: 71 5E 0D 0A 09 45 4E 44 20 43 6F 6D 70 61 72 3B q^...END Compar;
02F700: 23 72 2A 7C 01 2B 22 7C 01 2A D3 01 23 22 D3 01 #r*|.+"|.*..#"..
02F710: CD C3 7A 2A 87 01 26 00 11 08 00 B7 ED 52 C2 8E ..z*..&......R..
02F720: 91 CD C3 7A C3 03 91 21 0E 00 E5 21 06 00 E5 CD ...z...!...!....
02F730: 37 0B C9 DD E5 DD 21 00 00 DD 39 DD 6E 04 DD 66 7.....!...9.n..f
02F740: 05 11 FF FF B7 ED 52 CA 60 92 DD 6E 04 DD 66 05 ......R.`..n..f.
02F750: 5E 23 56 EB E5 CD 9D 91 DD 6E 04 DD 66 05 11 08 ^#V......n..f...
02F760: 00 19 5E 16 00 EB 11 00 00 B7 ED 52 C2 4A 92 DD ..^........R.J..
02F770: 6E 04 DD 66 05 11 0D 00 19 5E 16 00 CB 0B D2 4A n..f.....^.....J
02F780: 92 DD 6E 04 DD 66 05 11 06 00 19 5E 23 56 EB FD ..n..f.....^#V..
02F790: 2A 7F 87 FD 5E FC FD 56 FD B7 ED 52 C2 4A 92 DD *...^..V...R.J..
02F7A0: 6E 04 DD 66 05 E5 CD A3 7D 21 00 00 E5 CD D4 07 n..f...£}!......
02F7B0: 2A 7E 01 DD 75 04 DD 74 05 2A 7E 01 11 FF FF B7 *~..u..t.*~.....
02F7C0: ED 52 CA 4A 92 21 88 01 E5 21 08 00 E5 CD A2 09 .R.J.!...!......
02F7D0: 2A 7E 01 11 09 00 19 DD 5E 04 DD 56 05 73 23 72 *~......^..V.s#r
02F7E0: DD 6E 04 DD 66 05 11 02 00 19 5E 23 56 DD 73 04 .n..f.....^#V.s.
02F7F0: DD 72 05 C3 A5 91 DD E1 E1 C1 E9 CD C3 7A 2A 87 .r...........z*.
02F800: 01 26 00 11 01 00 B7 ED 52 C2 16 93 21 01 00 E5 .&......R...!...
02F810: CD D4 07 2A 7E 01 FD 2A 7F 87 FD 75 FE FD 74 FF ...*~..*...u..t.
02F820: 2A 7E 01 11 FF FF B7 ED 52 CA FF 92 21 88 01 E5 *~......R...!...
02F830: 21 08 00 E5 CD A2 09 2A 7E 01 11 09 00 19 FD 2A !......*~......*
02F840: 7F 87 FD 5E FE FD 56 FF 73 23 72 FD 6E FE FD 66 ...^..V.s#r.n..f
02F850: FF 11 08 00 19 5E 16 00 EB 11 04 00 B7 ED 52 C2 .....^........R.
02F860: FF 92 FD 6E FE FD 66 FF 11 0B 00 19 5E 16 00 EB ...n..f.....^...
02F870: 11 0E 00 B7 ED 52 C2 FF 92 FD 6E FE FD 66 FF FD .....R....n..f..
02F880: 75 FC FD 74 FD 2A 82 01 29 11 59 01 19 5E 23 56 u..t.*..).Y..^#V
02F890: EB E5 CD 9D 91 CD C3 7A 2A 87 01 26 00 11 08 00 .......z*..&....
02F8A0: B7 ED 52 C2 13 93 CD C3 7A C3 68 92 21 0E 00 E5 ..R.....z.h.!...
02F8B0: 21 3D 00 E5 CD 37 0B C9 DD E5 DD 21 00 00 DD 39 !=...7.....!...9
02F8C0: E5 21 00 00 E5 CD D4 07 2A 7E 01 11 FF FF B7 ED .!......*~......
02F8D0: 52 CA 52 93 2A 7E 01 11 08 00 19 5E 16 00 EB 11 R.R.*~.....^....
02F8E0: 07 00 B7 ED 52 CA 5C 93 21 99 00 E5 CD 5F 82 C3 ....R.\.!...._..
02F8F0: 65 94 CD C3 7A 2A 7E 01 11 0D 00 19 5E 23 56 DD e...z*~.....^#V.
RESULT OF SEARCH :
PRO=118 CHEA=2 COD=27 MUSI=0 COP=9 GRA=25 WRIT=123 198=19 199=2 STARTER=0 KBI=0 CAAV=0 L.TOURNIER=0
EXTENDED CPC DSK File CPDRead v3.24) NAFBGCHDIE NAFBGCHDIE NAFBGCHDIEASMFI
LESLBRQ RMODFILESLBR MODFILESLBR !"#$%&'()*SDEFFILESLBR+,-./0123456789DEFFILESLB
RABCDEFGHIJDEFFILESLBR)KLMNlmLIST MODPQZMODFILESLBRTUVWXYabcdeMODFILESLBR.fgh
ijkMODXTRCTSUBnDEFXTRCTSUBoASMXTRCTSUBpHITHERE MODOWP COMMD COMqrstuvw
xyzMD COMlocates itself just below BDOS2/ loads £ file3/ reloads £ stack p
ointer from address 64/ calls £ Remark - this will not work for programs which e
xit with a ret instruction, rather than a bdos call 0 or a JMP 0If you know enou
gh about CP/M have comprehended £ above, certainly create your own version o
f£ labelldde,(6)bottom /Mdecpophlthrow away return get fcbbc,36addMD C
OMSD COMWD COMM2OVL OVR£M2OVL OVR#,lddrmove h,dl,eincsp, (patc
h1-2), addresses (2-2),,endadr-startadr+20(20 bytes space),+19ex,jp()execute
£ ,01c,15open 5 ,100hcp255z,0looppushc,265 dma ,02c,205read next record,128,,0jr
z,on ok,0 100h endInterface to CPMBdos and BIOS callsPick up definition module
for name mappinglabelBDOSpophlreturn addressdebcpushixcall5perform functionremo
ve allocation value from stacklde,ad,0 jp()BDOSHL 5 HL retendlabelBIOSl
diy,bios1jpdirectdo call1popixhlreturn addressderemove spacee,ad,0push()BIOSHL
,22bcret ex(sp),replace , get codedecd,he,ladd,,3*(-1),(1) of second entry jump
table, ()end CHAIN ASMCPM ASMCPMBIOS ASMFASTMOVEASMINTLOGICAS
MPORTIO ASM-README!ASM#EXCHANGEASM)OPSASM DAT.# P# Chain t
o another programLow memory must be set up as required by the£ called This code1
/ re NAFBGCHDIEfast data move£ and swap routinesused by the editor sortlabelM
oveup(a,b,len)£ from a to bpopiyreturnaddressbclengthhldestinationdesourcepushca
llcheckzretzdecadd,ex,,inclddrMovedn(a,b,)£ a bzldir(a,b,)loopbit7,bnzlda,()af
a,()(),a! y Ry!Ry.RyRWy*Wy!Exchange process with current labelpushafbcdeixsave c
allers on stackiyand hlld,0add,spex,,14,address of exchange packetc,()inch,()l
,cc,()(),eb,()(),d pointersh,bl,c,callee's now in placewe correct the to ge(
),ajplookup start z,look1a,espace for resultcpir1lookdown z,2a,e cpdr2check z
eroxoracpbcendSome integer logic routineslabelIANDpophlreturn addressbcfirst ope
randde2ndt rid parameter for this procedure,12,return pop register valuec,()(),
eb,()(),d(),c(),bret endADC ADD AND CCF CP CPD CPDR
CPI CPI CPIR CPL /DAA 'DEC 5DEC +DEC +DI +E
I +EI lda,eandce,aa,dbd,aspace for resultpushjp()all that, just an !
IOR 2 a,eorce,aa,dbd,a () , !IXOR 2 a,exorce,aa,dbd,a () , !endPortio
support routines - see .def (C) Dave Moore Sept 1986labelinpophlreturn addressEX
+EX EX EX EX EXX HALT vIM FIM IM
VIM INC 4INC #INC #IND INDR INI INI INIR OU
TDR OUTIR OTDR OTIR OUTD OUTI £JP £JP JP JP
LD LD LD LD LD WLD LD bcport numberdecut b
ack result areae,(c)get byteldd,0clear high pushjp()Out value to out (c),e()Disa
ble InterruptsdiretEnable eiset mode2 base a,di,a interrupts endFTL Modula-2 A
ssembler Update Note The assembler "MA.COM" is no longer supplied. Instead
we supply "ASM.COM", a much suLD GLD OLD OLD LD LDD
LDDR LDI LDI LDIR NEG DNOP DOR DOUTD OUTDR OU
TI £OUTIR OUTIR POP POP PUSH PUSH RET RET RET R
ET RET RET RET RET RET RET RETI MRETN ERL
RL perior assembler. You may rename "ASM.COM" to "MA.COM" if you like. T
o run .SUB files which calls the assembler, you will indeed want to. We have n
ot renamed it to keep it separate. If you would like more information and exa
mples of assembly linkage to Modula-2, the Assembler ToolKit is available. Ple
ase contact Workman & Associates or your dealer for details. Happy Assemblin
g! NAFBGCHDIERLA RLC RLCA RLD oRR RRA RRC RRCA
RRCA RRD gSBC gSCF 7gSLA &SRA .SRL SUB XOR
XOR CALL CALL CALL CALL CALL CALL CALL CALL CALL
CALL JP JP JP JP JP JP JP JP SUB
XOR SBC #SUB !SUB "SUB #XOR !XOR "XOR XOR #
ADC ADD AND CP OR SUB XOR XOR ADC !ADC
"ADC #ADD !ADD "ADD #AND !AND "AND AND #CP
!CP "CP #SBC SBC !SBC "SBC #SBC JP JP L
D 2LD CLD SLD "SLD "LD "LD LD sLD s
LD *LD !LD *LD !DEC !IN IN INC LD FA
DC !ADC "ADC #ADD !ADD "ADD #ADD AND !AND "A
ND #CP !CP "CP #DEC !5DEC "5DEC BUILDS
UBMODCOMMAND MOD$CONVERSIMOD+DEBUG MOD1FILES MODOGETFILESMODiINOUT MODr 'L
IST MODMATHS MOD,PRECEDENMODPROCESSEMOD%(QUICKSTRMOD REALINOUMOD #)(SETUPCA
LMODCSMALLIO MODJ INC !4INC "4OR !OR "OR #OUT #SBC
!SBC "SBC SBC #SUB !SUB "SUB #XOR !XOR "XOR
#LD !#6LD LD "#6LD !pLD "pRL !RL "RLC !
RLC "RR !RR RR "RRC !RRC "SLA !&SLA "&SRA
!.SRA ".SRL !SRL SOLVE MODSSORT MODaSTORAGE MODj STREAMS MODw*
.STRINGS MODTERMINALMOD£%& (*Last modified 20 March 86 *) B
uildSub(*Generate a submit file for recompilationsSystem call dest module names
Parameter 1 to receive 2 upto 10files recompile optional flag i - SRL "
BIT $FRES $RST $SET $BIT $!FBIT $"FRES $!RES RES
$"SET $!SET $"BIT $RES $SET $ADC %JADD %JADD
DEC %JINC %JPOP &JPUSH &JSBC %BADC BADD BAND
BAND CP BLD pBOR BRL RLC RR RRC SBC S
BC include given in e.g. temp.substorage.modNote that this program will
not handle modules with cycles*) SYSTEM £ ,,TSIZE,WORD Command £ ,Parclass,GetP
arams Files £ FileName,FILE,Lookup,Create Streams £ Connect,Disconnect,STREAM,in
put,output,WriteChar,ReadChar,ReadWord,ReadRec,WriteWord,WriteRec,EOS GetFiles £
GetNames £ ,,ErrorExit Sort £ SortRecordsFF0cxTAB09xLF0axSLA SRA (SRL
8SUB 8XOR 8LD !FLD "FLD #FLD LD FLD %
KLD %KLD *KADD 'ADD (OUT AIN #AIN JR )8AJR
)0AJR ) AJR )(AJR )ADJNZ )ALD #6ARET ARET A
DC AADD AAND ACP AEX AEX EX OR OR NA
FBGCHDIECR0dxMaxImports20(*max imports allowed by a *)MaxModules100 PFileName r
eplyi,jkcInsInfch(*look ahead character *)IncludeIdent1..8 PrecTableNameDefMo
duleImportCount0..Imports0.. Prec1.. PrecCountRecomp,ParamMod1.. CurrentModul
e(*Module being examined*)PrecFPrecSIdSubFSubSBaseName is *) i1 i i. j(i.,
)j OutputRecompsi,j TryToOutput(* a or need wait compiled*)j i
j(,) j (i)i (**) (* compilations requests*)i1 i i (i) (i) (,) .Exten
sionCompilers 'M2','MD'Extensions '.','.DEF' PutName(ModNo)(*Output a compil
ation line the name*)i (,(),3,)i1 (i()) (i' ') (,i)INC(i)(,(),4,)(,0)(,0) (*
*) FindModule(IsDEF)(*Find a , enter it if found*)i () (' table overflow')+1.
+1.i1 (i.) (IMPLEMENTATION Command(* line processor*) Storage £ ALLOCATE SYSTE
M£ i,j,k GetParams( p Parameter count) Build(lenchcParclass)ad(,+4)p p j(CommL
ength) Terminator0dx LengthClassc k0 -1 CharskCommTexti+k0x+1 (*crack the comm
and *)i00 (p) (i()) (i' ') INC(i) i() i i.) (i) i i 0(* i*) i SplitUp
Name( )(*split up a into its base and extension*)i,j''''i0 (i()) (i'.') (i
' ') (i0c) i+1i(i) (i'.') j0(i) (i()) (i'.') (i' ') (i0c) j+1i(j)(i) GetEx
istingTable(*Load an existing precedence clear none *)w(,'PRECEDEN.DAT ','','/
'(*Option found*)(i)(()-i,0,option)'"',"'"ji+1 (ij) (j()) (j)(i)(j-i,i-1,string
)(j)ji+1 (j' ') (j',') (j'')(j'/') (j()) (j)(j-i,j,name)(*case*)ij i',' (i) (*
*) .IMPLEMENTATION Conversions SYSTEM £ , IntLogic £ IANDchars0..15 '01234567
89ABCDEF'i,lt,rb) 0 (' . ')(,,)(,w)w(,(),()*,)(,) Dependant(current)(*check
uses a which must be recompiled*)j j0 .-1 .j (**) MarkRecompsParam 0..1
0 CountiClosed GetName( p )i,j''jp.Length j() j() i0 j ip.Charsi (,) -1
Classoption CAP(REAL CardToString(c,base T used)i(T)tc rc-*tTirctii-1 (c0) (
i0)(T)-i ii 0 -1 Ti' ' IntToString(v T ) neg v0 v-v((v),,T,) T(T)-'-'+
1 MakeWord(High,LowBYTE)WORDaa(i)aa((a)+1)a i HighByte(w)aa(((w))+1) a LowByt
e(w)0)'I'DEC() (**) 0 (' Usage compile')(*open *)(0)(,,) 0 (' disc full')(
,,)(*now set *) i1 ii 0 i1 (-1) (i)()j(,'')jj (*Now close *) i1 i i
(i) i (**) i1 i i (* implementation any definition NAFBGCHDIEaa(
w) a .IMPLEMENTATION DEBUG(*This is a debug moduleUpdated Jan 26 85 to add com
mand interface Aug 10 86 bounds error traps and overflow ,also end of proced
ure codeThe released version will trace calls line numbers.When a compiled w
ith the flag on() () 'L'(' ')'P'(' ') ('')(**)'X'(' Continuing') ('Commands A
E D X')(**)(**)(* *)(*0*) DisplayName 0x () (()+1) TraceBack 0 -1 0 (
' near ')(,4) Trace(* actually does tracing*)i(*pick up return address if i
t were a required (eitherby using M2 name/T, or else (*$t+*), linked /T ,
each statement preceded an int 6followed several bytes in formtop bits0 c
all11 number ( )(max 3fff16383)100 1010 trap1011 remaining 15 a word
give a a () . performs two functions1/ Outputs information2/ Allows contro
l output*)SYSTEM £ ,BYTESmallIO £ WriteCard £ ,,Writeinternal knowledge comp
iler's operation stack look like (2 )old ix value(2 )i(2 )*)(((i))+4)()(* *)
() ((ORD(),0c0h))0c0h (*Its a *)+2(* 2 *)256*((),03fh)(()+1)+() (' Line ')
(,5) ((),80h)0 (* *) (' Procedure ') () 1 ()-1 +1+1()INC() ()+1 (((),
0e,BusyRead,ClearCharBuffer,ReadIntLogic £ IANDIntNumber6(*Number interupt used
(eg RST 6)If other than 6 , be sure use /tn link*)FreqCount100(* between t
ests for attention character. not checked time round because that makes eve
rything run too slow*)MaxDepth20(*Max depth can tracked*)pCHAR pCARDINAL
LineTraceProcTraceCountDownpRe0h))080h (* *)()+1 ('exit ') 0 0 () ((()
,0f0h))0a0h (' ')HALT (' Value out ')(* Tracing*) JumpOpcodeAddressIntJump8*(
*Main - set jump *).0c3h.() .IMPLEMENTATION files(*File system implementat
ion for CP/M 80Dave Moore Dec 1984*) SYSTEM £ ,BYTE CPM £ tpCardpCharjProcStack
1.. ProcLine 1.. ProcTop0LastLineAttentionCharacter01x(* types get into
mode. means performing routine . you are , this cause conflictsas De
bug characters wanted. To overcome , have change so rejected return
ed another caller. *)(*Check found, then interpret commandsEach BDOS,BDOSHL,
opnfc,clsfc,delfc,makfc,rsrfc,wsrfc,sdafc,renfc,exten £ ,pFILE FILEDevices De
vicetypei,jBytesTransferredresponse ConvertFileName( ffcbfn )i0j0 f fcbdn0fcb
fn''fcbft''(*Extract basename possibly device/disc indicator*) (i()) (i' ')
(iCHR(0)) (i'.') (i'') (i1) ORD(1)-(('A')-1)1' 'j0 i'*' one (possibly par
ameter) Ax xDxdisable x (xL P proceduresanything both)Ex x XContinue
debugging*) CheckForControlchDEC() (0) () (' Command')() CAP() 'A'(' Chan
ge ')() 0x'D'('isable ')() () 'L'('ine ')'P'('roc ') ('Both')(**)'E'('nable ')
NAFBGCHDIE jj+1 () j'' j() INC(j)jCAP(i) (*i'' *)ii+1 (**)(*look extension*
) i'.' ii+1j0(i()) (i' ') (i(0)) i'*' jj+1 () j'' j() (j) j(i)ii+1(**)(*i
'.'*)fcbex0fcbcr0cpmres0fcbrc0fcbrn.loworder0.highorder0 (**) convertname( fl
) (f,).eoff.'CON' dev)(* *)(f,)(f,,,) .IMPLEMENTATION GetFiles CPM £ BDO
S,BDOSHL,sfofc,snofc,fcb,sdafc CPMBIOS £ directory SYSTEM £ Files £ ConvertFile
Name(*Get a list of file names meeting a wildcard description*)i,j,kfnameFileNam
eDevCharWildCard GetNames(Pattern Count)dma 0..3 SearchFotypecon f.'RDR'
rdr f.'PUN' pun f.'LST' lst (* f.f*) Lookup( f reply)(f,)0 f. i(,(f.f)) i
255 -2 f. , -1 Create( f )(f,)0 f. i(,(f.f))i(,(f.f)) i255 -2 f. -1 Del
ete( f )(f,)i(,(f.f))-1 f. i255 -2 0 ClorFileNames(f,) f.fcbdn0 ' ' CHR(O
RD(f.)+(('A')-1)) (*Now scan for matching *)i(,())(*set buffer address*)i(,(f))
(*start search*)0 i255 j0 ' ' 01''j2 i k1 (k(dirfn)) (k' ') jkINC(j)(k)j'.'k1(j
) (k(dirft)) (k' ') jk(j)(k) (* DMA*) jj () j' ' ()i(,(f))(*go to next*) (*se
( f)i(,(f.f)) Release( f)(f)i(,(f.f)) Rename( fnew,old )p(f,)i(,(f.f))p(((f)
)+16)(*Note****Overwriting FCB as required by rename function*)p.f.f.f.p.f.f.f.(
f,)i(,(f.f)) i255 -2 0 MakeBAK( f )pp(((f))+16)p.f.f.f.p.f.'BAK'p.f.f.f.i(,(p
.f))i(,(f.f))f.f.0f.f.0i(,(f.f)) i i255*)i(,80H)(*reset default*) (* Convert
a *)j() j() j() i0 j ii (i'*') (i'') ii+1 () i' ' 10 .IMPLEMENTAT
ION InOut(* as defined by N Wirth in 'Programming Modula-2' (C) Dave Moore FT
L -2 1986Modifications*************3 June 1986Removed assumption that open array
parameterscould not be used a255 -2(* the file back again This could still b
e improved upon since with this code, goes away Of course, now that you have
read , will know a sneaky way of getting around directory full message in e
ditor*)p.f.f.f.f.f.''i(,(f.f)) 0 SetBlock( fblknr)ii 128 f.f.(i) j(,(f.f))f.f
.(i)j(,(f.f)) j255 j(,(f.f))f.f.-128*i SeqReadBlock( fctual value. (This was
a restriction the earlyversions (pre-release) of compiler)Improved handling
variable Done OpenInput and Openoutput - entrying no name when prompted for a f
ile nowcauses a return with 10 Oct 86SkipBlanks numeric input routines changed
to useRead from Inout instead ReadChar Streams directlyReadString zero byt
e terminated string blank filled (but ReadLine left bufferbytecount )(*Set blo
ck number if needed*)127j0 () (j0) j(,)j(,(f.f)) j0 +128 (()+128) j0 f. -127
SeqWriteBlock( f )(* *)127 j(,)j(,(f.f)) j0 +128(()+128)-127 ReadBlock
( f, )(* *)(f,)(f,,,) WriteBlock( f, NAFBGCHDIE is.Handling '' impro
ved*) Files £ FILE,Create,Lookup,Close,FileName £ Direction,,output,Connect,Dis
connect,,BufferAhead,WriteChar,EOS Conversions £ CardToString,IntToString£ MaxDe
pth3StreamArray1.. STREAMInTopInStreamsOutTopOutStreamsConsFileInFile,OutFile2.
. filenameich GetFileName(defext )..().ReadBuffer() ' '0' i+1 () () i6- 5
(i) WriteCard(c)(c,10,,) WriteHex(c)(c,16,,) WriteOct(c)(c,8,,) WriteInt(
c)1..6 (c,10,,) i+1 () (' ') i7- 6 (i) SwitchInStream(p) () .(' ')+1p
SwitchOutStream(p) () .(' ')+1p PopIni0.() 0dx i() iCAP() INC(i) ii ()
i' ' ( ) () .ErrorExit('Input Stack overflow ')() 1' ' +1(,,i) i0 ..('Fi
le found').()DEC() (**) (**)(,,) OpenOutput( ) () .('Output OutOut')() 1'
' +1(,,i) i0 Stream 1 -1 PopOutStream 1 -1 (*Mainline*)00(,'CON',)1(1,,)
1(1,,) .(**) x-x Write() (,0)0 List(* one of more filesDave Moore FTL Modu
la-2C/O Workman and Associates112 Marion DrivePasadena California 91106(Ph) (818
) 796 4401This is a module provided with the system. You may hack it use for wh
atever purp..('Could create ')() (**) (**)(,,) CloseInput 1 -1 CloseOutput
1 (,)-1 ( ) AlwaysBuffer (,) () EosCH(,) eolch EOL ignorech (**) (*S
kip leading spaces*)() (' ') (09x) ( s )(,) i0 i(oses you wish. Call LIS
T(wild card) file name,.... (output o) Where optional (defaults to printer
device)BugsOverwrites without checking if OK*)£Debug SYSTEM £ ,,TSIZE Command
£ Parameter,Parclass,GetParams Files £ FileName,FILE,Lookup,Create Streams £ Co
nnect,Disconnect,STREAM,input,,WriteChar,ReadChar,EOS GetFiles £ GetNames £ , S
ort £ SortRecordsFF0cxTAs) ' ' siii+1() (**)termCH i(s) si0x SkipEOL()
(**) ( s )(,)i0 i(s) () si(i) (**) ii (s) si' ' Re
adCard( c)c0(,) ('0') ('9') c10*c+(ORD()-('0'))()(**) B09xLF0axCR0dxTABS20
x PFileName ListFreplyi,jInsInfchbuffer0..4095 bufflen(*I characters on si
nce I have a whichstops printing whenever anything appears interface. Toget
run at speed, must hit a full 'a time'*) FlushBufferi 0 i0 -1 (,i) 0 B
ufferOut() () +1 Compar(a,b) ReadInt( x)neg(,) '-' ('-') ('+') () x0 (
'0') ('9') x10*x+(()-('0'))()(**) x-x Write() (,0)0ax(,) (0)(0) (s )i0
(i(s)) (si0x) (,si)(i) WriteCardInGivenBase(c,baseplaceszerosuppress)text1..5
(c,,,) ' NAFBGCHDIEp,qp(a)q(b) pq Usage(' ,,...')('or ,,..., o')(' where
a list a ')(' example *.DEF')HALT ListitParam 0..10 CountNames 0..1
00 NameCount Counter Cnter (,) 1 0 -1.Classoption DEC() 0 (-1.Chars,,)
(,0,) 0 (' Could not create ')() 0 y1.0e150 y1.0/(x) y(x) -y y LN(A)bi(
* 2705this is a poor choice, since the use of hex normalisationmeans that just
standardising exponent not enough ensure value falls range 1/SQRT(2),(2),
but a with desired was availableAlso, it should be possible a log derivati
on (base 2) without anyfloating operations at all (except end for ), usinga n
(,'LST',)(,,) i0 -1 (i.,,) 1 ((),(),(),) j0 -1 (,j,) 0 (' open ')(j)(' List
ing')(j) 1()(,,) () (,) 80x CHR(ORD()-80h)(* character control code*) ((' ')
('')) () () () () (,) 0(,) .on-restoring divide operation divisor replaced
by a table logs*) A0.0 ('error ve0.0 ')HALTb.xAORD(b.)-80h(* power 16*)b.80h
(*b now 1/32..1/2*)i0zb.x z(1.0/1.4142135623) INC(i)z2.0*z(* improved - shif
ts etc*)z(z-1.0)/(z+1.0)yz*zyz*(((4.210873712179797145e-1*y-9.637690933686865932
4)*y+3.0957292821537650062264e1)*y-2.40139179559210509868484e1)/(((y-8.911109027
9378312337)*y+1.948096607008897305IMPLEMENTATION Maths £ ,SYSTEM £ BYTE(*Some m
athematical functionsMethods and approximations are taken from HART et al, Compu
ter Approximations, SIAM Series in Applied Mathematics,John Wiley Sons, New Yor
k*)RealByByte xREALexpmantissa1..7 x,y,zChangeSignshift SIN(A)(*Hart function
no 3369 *) A0.0 x-AxA x(2.0*PI) xx-2.0* (*multiples prob1623e1)*y-1.20069589779
605254717525e1)(* factor back fact ln(2n*x)(2n)+(x)n*(2)+(x) *) y+(*4-i)*0.
6931471805599453094172321 EXP(A)(* 1801*)b A0.0 b.x-A b.x370.0 0.0 b.xA A370
.0 (' large ')(b.)-7fh 0 b.7(*b.x 0,1/32*)0yb.x*b.xz2.00011141589964568935
4e1*y+8.400668525364832394067033e2y1.0+(2.0*b.x*z)/(((y+1.8001337040739002280539
e2)*ably rare*) x xx- x(*0.5) x-xx2.0*OneOnPI*xyx*xy x*(((((-2.2767796598876761
9763e-3*y+2.5738460983116019960182e-1)*y-1.23945830531878262699847e1)*y+2.834856
820677127243576284e2)*y-2.7077267533847327687911294e3)*y+7.024830256747977897438
5358e3)/((y+1.153038712361456119397242e2)*y+4.4721458389717958397152926e3) -y
y COS(A) (A+/2.0)(*can do better - eg 3843*) TAN(A) Approx(A)xy+1.68013370
50729664841446817e3)-b.x*z) 4* 1 -1 yy*y y1.0/y y (A)b A0.0 A A0.0 ('
- - ')b.xA(b.)-80hb.80h ODD() +1b.7(*b.x 0..1/2*)xb.xy((((2.97530391*x)+2.02
772463)*x+1.09542405e-1)*x+3.16235e-4)/(((x+3.46399556)*x+6.41225367e-1)*x+9.408
909e-3)(* our first guess a result*)z0.5*(x/y-y)yy+z ABS(z)1.0e-15(* add size
*) 0 4.0/*Ayx*xy x*((((3.386638642677172096076369e-5*y+3.422554387241003435328
470489e-2)*y-1.550685653483266376941705728e1)*y+1.055970901714953193602353981e3)
*y-1.306820264754825668269611177e4)/(((y-1.555033164031709966900124574e2)*y+4.76
5751362916483698926655581e3)*y-1.663895238947119001851464661e4) y (* 4285*) A0.
0 x-AxA (x) xx- x(/2.0) x-x x(/4.0) x(/2.0-x) x1.0e-140 (' too close to /2'
) N A F B G C H D I Eb.xyb. 2+(b.) b.x y (*This evaluation ARCTAN follows
algorithm 5076Read also design section on page 125We s2X0(0)X1(/8)X2(/4) (1.
0)X3(/2.0) (infinity)x2(/4)x3(/2.0) () *) (A)(* Function ARCTN 5076 *) (x)(*The
polynomial approximation 0../8 *)yx*x x*((((0.1589740288482307048*y+6.6605790
1700926265753)*y+40.969264832102256374186)*y+77.477687719204208616481)*y+44.5413
400onnect,STREAM,input,output,WriteChar,ReadChar,ReadWord,ReadRec,WriteWord,Writ
eRec,EOS GetFiles £ GetNames £ ,,ErrorExit Sort £ SortRecordsFF0cxTAB09xLF0axCR
0dxMaxImports20(*max imports allowed by a module*)MaxModules100 PFileName reply
i,jkcInsInfch(*look ahead character *)Ident1..8 PrecTableNameDefModuleImportC
ount0..592906803197511)/((((y+15.50397755142198752523)*y+62.83593051103237683326
7)*y+92.324801072300974840693)*y+44.5413400592906804445995)(*Alternative greate
r accuracy - tested x*((((((0.09762721591717633036983*y+11.322159411676465523
6245)*y+192.5792014481559613474286)*y+1114.1290728455183546172942)*y+2761.719824
6138834959053784)*y+3031.0745956115083044212807)*y+1209.7470017580907217240715)/
((((((y+39.9178842486537981501999)*y+423.0716464809047804524206)*y+1821.60033929
18464941509225)*y+Imports0.. CharSet 1.. PrecCountCurrentModule(*Module being
examined*)PrecFPrecSIdStopWords0..6 '','','','','PROCEDUR','' DisplayResultsi
i1 i ()('') ('.DEF ') ('. ') k16 j0 -1 k75 ('')k10(j.)('')kk+10(* j*)(**)
(* i*) GetExistingTable(*Load an existing cl3664.5449563283749893504796)*y+3
434.3235961975351716547069)*y+1209.7470017580907287514197)*) A0.0 A-A(*Because
small values cause trouble followingformulae, because slope 1 origin,
A we let (A)A *) A1.0E-70 (*Reduce 0..(/8)*) A1.0 A/4.0 A1.0 A/2.0-(1.0
/A) A0.4142135623730950488 (*(/8)*) A/4.0-(2.0/(1.0+A)-1.0)A(A) -A A 2(Y,X
)Quadrant ear if none found*)w(,'PRECEDEN.DAT ',) 0 0(,,)(,w)w(,(),()*,)(,) W
riteTable(,'. ',) 0 (' disc full') (,,)(,)(,(),()*,)(,) StopWord()i()i0 i INC
(i) i() SkipComment () (,) '*' (,) ')' '(' (,) '*' (*'*'*) GetId(*Read
nex (X0.0) Y0.0 1Y-Y4X-X Y0.0 2Y-Y3(*Check if division will overflowIf ,
set /2.0 than 2(0.0,0.0)/2.0*) X1.0E-150*Y x/2.0 x(Y/X) 1 x2 -x3 +x4 2.0
*-x 2 ENTIER(x)signx0.0x(x) x32767.0+() (' Real ') -TRUNC(x) (x) .t
id Only eight characters are kept, since that is most in a name, and upper
case used*)ii0'' ( 'A'..'Z','0'..'9') () (,)CAP() '(' (,) '*' ( 'A'..'
Z','0'..'9') () (i) i() i (,)() SkipToSemiColon ('') () FindModule(IsDE
F)(*Find a , enter it not *)i () (' overflow(*Last modified 20 march 86 *) P
recedence(*Generate a precedence table of modulesSystem callPreceden dest file
wild cards...Parameter 1 to receive 2 upto 10wildcards for files searche.g
. Prec.dat b*.mod b*.def*)(*This program was hacked from the LIST *) SYSTEM £ ,,
TSIZE,WORD Command £ ,Parclass,GetParams Files £ FileName,FILE,Lookup,Create St
reams £ Connect,Disc NAFBGCHDIE')+1.+1.i1 (i.) (i.) (i) i i 0(* i*) i Comp
ar(a,b)p,qp(a)q(b) pq ScanNexti,ji(,)(* because we only import defs*) () ('
')()(' has too many ')ij0 ji (j) j ()(' Warning - ')()(' ')()(' more than
once') (* *)(* *) (**) S COMMAND DEFCONVERSIDEFCPM DEFCPMBIOS
DEF" DEBUG DEF/EXCHANGEDEF3FASTMOVEDEF4FILES DEFGETFILESDEFVINOUT DEFINTLO
GICDEFvLOADER DEFwMATHS DEFzPROCESSEDEFQUICKSTRDEFcanFilesParam 0..10 Count
Names0..100 NameCountl(,) 0 (' Usage ') i0 -1 (i.Chars,,) 1 ((),(),(),) j0
-1 (,j,) 0 (' Could open ')(j)(' Scanning')(j)k0l1'' j1'' k2 (jk'.') (jk' ')
(k()) ljk(k)(l)(,.f.fcbft'').0(,,)(,)() (REALINOUDEFSETUPCALDEFSMALLIO DEFSOLV
E DEFSORT DEFSTORAGE DEFSTREAMS DEFSTRINGS DEFTERMINALDEF PORTIO DEFCHAIN
DEFSCREENIODEF Command(* line processor*) SYSTEM £ BYTEParclass(name,string,
option)(* is a best g) () '' '£' () ('')(* *) (**)(,)(* *)(* j*)(* i*)
.IMPLEMENTATION Processes,(*, module+ as* per Wirth)D. Moore 4 Jan 84*) STORA
GE £ ALLOCATE(, DEALLOCATE £ , Exchange' £ 'SYSTEM £ BYTE&,,WORD%,TSIZE$(*' is
# an" assembly language + whichuess style of thingIf the parameter in quotes it
a follows a '' or a '/' an (there only ever one . It always last, and c
ontains everything from / onwardsEverything else a (no validity checking pe
rformed*)TextLength(*returns bytes *)Terminator(* next character, delimiter for
strings*)Class(*class *) FilePosErrorNoChars0..127 (* - terminated bya zero
byte, but that ! swaps the PC/IX/SP values from current task to/ givenWAI
TER record*)SIGNAL ProcPROCESSNextPPROC PROCInterruptStub(*interrupt stub mak
e exchange *)pushhl&ldhl&procvaraddr%exhlsp &call&exchangeaddr%ret &SuspendedNIL
Newtask,Thistask(*list of processes suspended * result a StartProcesnotinclu
ded length*)Parameter GetParams( p count)(*crack command *)CommLength80hC
ommText81h0..126 . Conversions SYSTEM £ WORD,BYTE CardToString(c,base T us
ed) IntToString(c T )(*Convert a Cardinal (Integer) to a stringc is the value,
useT returns left justifies*)WorkSpace Restart(* after a process falls o
ut bottom its procedureThe return address # first element on *).'() TRA
NSFER( source,destination)(* First set pointers control blocks for each *)(*
must be already up byNEWPROCESS*)(*Copy descriptor into . ' will repla
ce NAFBGCHDIEd gives number of sig digits*) MakeWord(High,Low)(*Combin
e two bytes into a word *) HighByte(w) LowByte(w)(*Return () order byte a Not
e that, following usual 8080 convention, first low *) . CPM(*Opcodes for C
P/M Bdos and Bios callsMnemonics taken from System Programming under /M80with st
atus *)conin3(*read character from *)conout4(*write to *)list5(* *)punch6(*
*)reader7(* *)home8(* current disc*)seldsc9(*select *)settrk10(*set track*)set
sec11(* sector*)setdma12(* dma address*)readdisc13(* a *)writedisc14(* a *)lists
t15(*return *)sectrn16(*translate *)interlace1..26 pinterlace parametersspt(*
se additions in the same style omitted valuesBy Lawrence E Hughes*) SYSTEM £ BY
TE,WORD(*constants use BDOS BDOSHL*)resfc0 (*reset (reboot ccp)*)rccfc1(*read
console character*)wccfc2(*write *)rrdfc3(* reader*)wpufc4(* punch*)wlcfc5(* l
ist *)diofc6(*direct io*)wcbfc9(* buffer*)rcbfc10(* *)rcsfc11(* status*)selfc
14(*select disc drive*)opnfc15(*open file*)clsctors per *)bsh(*block shift facto
r*)blm(* mask*)exm(*extent *)dsm(*max allocation groups*)drm(* directory entries
*)al0 0..1 (* *)cks(*check size*)off(*system tracks*)filler0..2 pparameters
pdirectory dirun(*or 0E5h if deleted*)dirfn(*file name*)dirft(* type*)direx(* n
umber*)dirres(*reserved *)dirrc(* count *)dirdm(* map *)pfc16(*close *)sfofc1
7(*search first match dir*)snofc18(* next*)delfc19(*delete *)rsrfc20(*sequent
ial *)wsrfc21(* *)makfc22(*make *)renfc23(*rename *)sdafc26(*set Address*)gavf
c27(*get allocation vector address*)gdpfc31(* parameter block addr*)gucfc32(*/
user number*)rrrfc33(* random *)wrrfc34(* *)cfsfc35(*Compute size*)srrfc36(*
pointer*)rsdfc37(* *)wralloc alloc0..10 pcheck 0..10 pdischeader discheade
rscratch0..2 (codebcde) (*Result is A value*) ()(* HL *) . DEBUG(*This is th
e definition module for debugAt present, it does not contain any definitions,zfc
40(* zero fill*)(*Layouts various areas BIOS Cerenkof Modula IIDave Moore Oc
t 84 are book (op sit)*)alfa1..8 exten1..3 discmap (*depending on groups*
)8bytes0..15 16words0..7 int3loworderhighorderfcbfcbdn(* *)fcbfn(* name (blank
)*)fcbft(* extension*)fcbex(*extent opened*)cpmres(*reserved by /M*)fcbrc(* cou
nt*)fcbdm(* map though you may, of course add some. must be imported by which
compiled and linked with /T (or using (*$t+*) flagso that main program linkage
comes out in right order (obviously, initialised first as sets up interupt
low memory used other modules to call No, Hortense, compile this mode (/
T) selected *) . Exchange SYSTEM £ (p)(* porcess at p with current one*) . *)f
cbcr(*current *)fcbrn3(*/M 2.2 *) (codede)(*Result is A value*) ()(* HL *) .
CPMBIOSSYSTEM £ BYTE,WORDCPM £ alfa,exten,discmap(*mnemonics for direct bdos cal
ls using the jump vector table (use BIOS and BIOSHL)*)cboot0(*cold boot*)wboot1(
*warm *)consta2(*console N A F B G C H D I E FastMove(*Assembly language rout
ines to do fast memory moves/exchangesusing LDIR and LDDR If the are non -overl
apping, you can use either Moveupor Movedown they overlap destination address
is lower than source , else length zero, nothing moved*) SYSTEM £ (,len)
(,) Swap(a,b) Searchup(chstart) Searchdown()(*look for a character in th , )(
*Read(Write) a block () a f- ( check - address - .Blocks 128 byt
es eachIn early versions compiler, parameter was ignored zero. replaced
routinesSeqReadBlock SeqWriteBlock- Byte transfer ( difference 11 define
s a . a case more portable, since -11 defined SIZE TSIZE be size word
s, would totally silly a oriented )** careful * find number of bytes ex
amine (if 0 64k searched)returns matched byte, one past end none*) . Fil
es(* definition for CP/MCerenkof Modula IINote also the module RT11 which provid
es 11compatibility. That uses this one*)(*Caution *******This differs from 11
in certain waysTh* should a multiple 128 even its , a 128 alwaystransfe
rred. - 0 Actual number BYTES 0 represents EOF. A partial will occur at end
(never extent)Only less than on writes Remark hard we get back .
One way overcome cold bootjump location 0. do , coursehave modify
appropriatelly. Also Direct Bios call code altered, as instruction p
ick upe original is very machine specific. It hastherefore been deemed accepti
ble to change it CPM.If you want independant IO, use streams differences areSo
me parameters passed by instead of valueblknr paramater handled differentlybyt
e count not word used buffer lengthsNot all 11 error codes make sense under
Channel numbers! *) SYSTEM £ ,WORD £ fcb(* that Rad50name and Radi BIOS table.
Changing Cold Boot supported - either us or Digital Research!Deuxieme remar
k others devices STREAMS*) ( f ) ( f )(* ( V1.03) perform Parameters
except there *) ( f,old )(*Changes File , must accessed until re-o
penedafter Any with same deleted*) MakeBAK( f )(* named FCB a BAK *)
SetBlock( f)(*c50 omitted *)(*ProcedureBDOS requestfunctionLookupopnfcopen Crea
tedelfc/makfcdelete any existing create newDelete fileRelease extentsCloseclsf
cclose WriteBlockwsrfc(sequential) writeReadBlockrsrfc() readRenamerenfc *) Devi
cetype(con,rdr,lst,pun,disc)FILEdevtypefeofFileName0..13 (*e.g. bfilename.dat*
) ConvertFileName( ffn )(*Convert a into Position a a exist already
- most next added because routine performs a 1 compatible sequence,
rather extended introduced /M 2.2. (Its probably faster too) *) . GetFiles(*
Get a list of file names meeting a wildcard description*) Files £ FileName GetNa
mes(Pattern count)(* is a pattern to use for the search returns a matching
nan may include wild cards (but no search matching files performed*) ( f
reply)(* returns 0 if ok (note- length)-1 output only device specified-2
found*) ( f )(* 0, OK -1 input -2, directory full*) ( f )(* Reply
- 0 -2,non such*) ( f)(* *) ( f)(* *) ( f,bytecount ) ( f NAFBGCHDIEame (wit
h no device on front) number returned in If given contains wild card, it
always as only match, whether exists or not While this means that routine ca
nnot be used check existence a , can convert a parameter a filename requ
ired by module *) . InOut Streams £ STREAM(* module as per Wirth's bookIn add
ition, there are a few extra called, one , , a . a , use b
ackspace, control P, Uetc. want a (even ), *) ReadLine( s )(* a
text. longer than s, remainder discarded*) SkipEOL(*Skip rest *) ReadIn
t( x)(* integer Number may have leading sign , separators tabs A non-num
eric *) ReadCard( x)(* a cardinal*) ()(* a *) (* a separator*) (sroutines to al
low you temporarilly switch a new streamThis is the fill version of inout that
allows switching streams and redirection (see also CommandLine)There another
SmallIO, which only supports standard console*)EOL1ex(* End line markerNote
uses 1eh Record seperatorThe requirement characterdoes not occur in midd
le a If this symbol output by Write, it will be )(* a . Terminated length or
null *) WriteInt(xplaces)(* x least number right justified. more spaces
required , field expanded. case, no *) WriteCard(x,) WriteHex(x,) Wri
teOct(x,)(*Other cardinaloutput . To write hex, (Cardinal(integervalue),4 (*
say*)) -1 print FFFF*)(*See RealInOut Real IO*) SwitchInStream(p)(*Switch
given existing open identifier translated carriage return/ feed*)EosCH
0x(* at EOF *)Done(* 'like a dinner' variable used for all sorts status ret
urns procedure definitions details*)termCH(*String terminating after read Read
String*)ignorech(*0ax*)(*Normally *) eolch(*0dx*)(* *)AlwaysBuffer(**)(* - se
t true forcebuffered *) OpenInput(defext )(*Open a file. Set input devi
ce created *) SwitchOutStream(p)(* Output*) PopInStream(*Return aprevio
us *) PopOutStream(* *) . *) ReadLine( s )(* a text. longer than s,
remainder disc IntLogic(*Some integer logic operations*) IAND(i,j) IOR(i,j
) IXOR(i,j) . LOADER(*This is a dummy moduleIt always loaded last. The address
of itsone symbol, therefore, t a prompt display on request name precedin
g pushed onto a stack, default two entries deep. overflows, program aborts
with message 'Stack overflow ' if was opened successfully*) OpenOutput( )
(* a - *) CloseInput(*Close . Restores previous value*) CloseOutput(
* , retaining information*) Read( ch)(* next . Line Feeds normally ignored
You can chanhe top load (note - ,not contents)Do recompile this .*)TOP
(*or anything, as it never gets allocated*) . Maths(*Some mathematical functio
ns (C) Dave Moore, FTL Modula-2 1986CP/M 80 version of a generic module5 Jan 87
- Added Entier function*)PI3.14159265358979323OneOnPI0.31830988618379067e2.71828
182845904523(*Stge altering a found*) ( s )(* a string. When reading
from command interact a special way routine buffer wheras .However,
call remains , . delimiter acts a terminator .Any termina
te a . , when , end alwaysterminates a .Leading blanks . a subtlety invo
lving . retains an . empty NAFBGCHDIEandard trigonometric .All tr
ig work in Radians,not degrees. *) SIN(AREAL) COS(A) TAN(A)(*Natural logorithm
and exponential Note that LOG10(A)LN(A)*0.43429448190325182 ab (a to the power
b) is EXP(b*(a))but if b integer, there a faster way - use atoi from RealInOu
t *) (A) (A)(*Square root *) SQRT(A)(*Inverse - given What angle *) ARCTAN(
A) 2(A,B)(*2 returns matically!*) (pan q)(*Generate a q starts p has a work
space size n address a memory Do yet (thats done )You probably wonder
ing what a good way calculate required So we. used stack p ( ca
lls turn) As an approach would think a number double , then again. rea
ly want - here some numbersFor each , 6 , plus parameters(2 var, ( r
adians) with tangent A/B2(A,B)(A/B)Also, 2 a value range 0 2* Whereas
-/2../2This means 2 can be used directly for rectangular polar co-ordinates. I
n addition, 2 works when B0.0*) ENTIER(x)(*convert a real an . differs TRUNC
because only positive values*) .n of a generic module5 J Processes(* module a
s per WirthD. Moore 4 Jan 84Revamped 2 Sept 86 so that PROCESS is t parameter
value (min 2), 6 open array , 6+ , a few loops, statments, tempora
ries, etc *) ( p,q)(*Transfer q saving current p *) IOTRANSFER( p,qva w)(*Pe
rform - PROCESSE. lots discussion. extra , w. a area a stub transfer
out interrupt. *)(*********************NOTE******************** follows st
andards down far possible. hack improve response the same and to su
pport mode 2 interrupts. This should not affect yourprograms all changes are i
nvisible.Note - NEWPROCESS TRANSFER in this , SYSTEM, .*)(*****************
*******************************************LIMITATIONIf more than one copy of an
y process within a given canbe running at time, display will retainedbetwe
en suspension a procedure its re-imes a little setting separately. *)(*Se
e also PORTIO other useful routines. *) . $b QuickStr(*Quick open routine f
or streams( in the sense of coding time saved)Dave MooreCerenkof Computing29 Sep
85This module is not manual because it post-dates .It designed to reduce wo
rk you have do using command line parameters allows one or more files
either activation. removed V1.19 means a routine which suspends must conta
in up level addressing. (That references variables procedures suspending
nested). Nor mayit call itself have you multiple processes, best us
e /P linker flag - see manual for details limitation could overcome by taking
a whenever states switched. I shall if I do next release*) £ SIGNAL
interface will also return a set options foundTo call , up an array type Str
eamRecordEach entry points a file a stream which be opened.A default name
can given. If no ( give , null string), and parameter , *) Streams £
STREAM,DirectionFiles£ FileName,FILEpSTREAM pFILE OptionsSet 'A'..'Z'OpenedMu
stSupply (* true if absence InterruptStubMode2(**) (*set 2 *) StartProces
s(pPROCn)(*Start a concurrent with program P a workspace n bytes a standard t
ype representing a parameterless The storage got from heap *) SEND( s)(* first
(longest waiting) on s restarted*) WAIT( s)(*Wait a signal - beware Boston
Subway*) Awaited(s)(*Returns something *) Init( s)(*Initialise a - Simula 67
auto NAFBGCHDIE error *) IsStream FileStreamDefaultNameDir (*input outpu
t*)LookupFirst (* , lookup rather than create . Useful Input-Output *) OpenStr
eams( StreamList Options)(*Open a For each , a pointer variable, a , a
direction ( ), are passed there any on , they returned *) VeryQuick( In,
Out)(*Automatically Attach as . omitted,attach c charactersremain,
shaved, moves size remains same. still wont fit, extra £
a terminated £*) WriteRealOct(xn)(* octal debugging purposes*) WriteRea
lHex(xn) WriteRealFixed(x,) ( £ x,)(* a fixed use decimals too
large , reverted small, prints £ procedure value Tex, a *)
atoionsoleBoth functions *) Quickstr. RealInOut(*Real input outputas per
Wirth with extensions (C) Dave Moore, FTL Modula-2 1986A generic moduleModified
July 1987, There are now two new routines that support codinga real number int
o a text array. These WriteRealText andWriteRealFixedText. Also, ReadRealFixed
allows you to read in numbers(ai)(*Raise a integer powerThis Conversiion
s, which was a veryinnapproprate place . whollyappropriate, one , prob
ablyalso *) . (* octal debugging purposes*) WriteRealHex(xn) SetUpCall(* U
p call parameters for a program and chain to itThis module is used by the editor
calling compilers.The second parameter fcb file which be compiledIt will
set up on command from stringsI could claim I did this because some people
had asked for it,but the reason is made easier write a test .*)Scale(*0*
)(*scale factor WriteReal*)Engineering(**) (*if true, engineering exponents us
ed always multiplesof 3*)Leadingplaces(*2*) (* places leave before dotuseful
particularly formatwhen should be set at least 4*)ForceExponent(*line as a
. followed /E an option.If this too clever your requirements, you could us
e 'Chain' directly.*) CPM £ ,alfa MakeCall(progname f) . SmallIO(*This is th
e small version of InOut which only supportsi-o from console*)EOL0dx(*0DH carr
iage returnNote that Wirth uses 1eh Record seperatorThe requirement charact
erdoes not oc*) (* false not zero on floating point*) ReadReal( xREAL) Read
RealText( Text£ AtPos x)(*Read a forms +!-d*.d*e+!-d+eg1.02.3E3Termination
character returned termCH INOUT (since effectively an extension InOut)The
routine a a string. index first (starts 0). It returns after*
) (xn) ( £ xn)(*Write a cur in middle a line*)Done(*as 'like a dinner' va
riable used for all sorts status returnssee procedure definitions details*)ter
mCH(*String terminating after readby ReadString*)ignorech(*0ax*)(*Normally fee
d*)eolch(*0*)(* *)delimiter(*' '*) (* Blank any this delimits a string*)Alway
sBuffer(**)(* - set true to forcebuffered *) ReadInt( x)(*Read an integer va
lue Number may hav mantissa + exponent form example, 10 will 0.1E2 variable
, +ve, cause . shifted right negative, 1, 10 print 1.0E2If , scale
d, then rounded a multiple 3 ( digits reducedso, 10 0.01E3 ( 0,1)10.
0E0( 2,3,4) 10000.0E-3 ( 5,6,7) etc layout follows rightmost 5 columns field
reserved there must sigdigits+1 (or +2 ) positions left . insufficien
t NAFBGCHDIEe leading sign Leading blanks, separators and tabs are ignored A n
on-numeric terminates*) ReadCard( x)(* a cardinal*) WriteInt(xplaces)(*Write x
at least number right justified. If more spaces required than there , fie
ld expanded. In case, no *) WriteCard(x,) WriteHex(x,) WriteOct(x,)(*Other
cardinaloutput routines. To write hex, use (Cardinal(integervalue),4 (*say*))
-1 will print FFFF*)(*See moich returns if is found, or the character EO
F (1ax) .The allows use streams binary files 30 Nov 861/ Writes now check
disk and setseof flag . You can do (s) after awrite full. must testst
raight - other operations change status .2/ Random input-output with recor
ds that span blocks supported.3/ There a procedure SetBuffers you dule Real
InOut Real IO*) . separators and tabs are ignored A non-numeric terminates*) R
eadCard( x)(* Solve(* a set of equations by gaussian elimination*)COLUMN1..10
REAL Gauss( Matrix depth,len)(* a for an arbitrary number righthand sides.
matrix is array columns which make up the elements in each column. The fi
rst rows are used to a square *) .set number buffers a . also a ChangeD
irection changes direction a .4/ Reset no longer makes a an .*) SYSTEM £ WOR
D, Files £ FILE Direction(,) Connect( s fdir)(* stream s f may be open closed
, but before accessing it via Note difference third parameterIn , this
a word , aBYTE . version, BYTEs WORDs intermixed a , inform Sort
(*Internal sort of fixed length records*)(*uses Quicksort*) SYSTEM £ KeyProc (,)
SortRecords(tableelements,elementsizeCompar)(* the is data to number in
bytes each element a routine whoch returns if passed as parameters are
out order*) . STORAGE(*Heap allocation/deallocationD.Moore 29 Dec 84Changed 30
Jan 85The FullUp procedure may return ( ) More than one connected a *
) Disconnect( sclosefile)(* optionally close Actually, false, only effect
flush any buffer (1ah) always written*) WriteWord(sw)(*Output two bytes wi
thout conversion*) WriteChar(sw)(* a *) EndWrite(s)(*Flush , required*) Rea
dWord(s w) ReadChar(s w)(*Read words charactersThese routines not know about e
ofs defined bycontrol to ALLOCATEIf it does so, the will be tried again. fails
, then called - ad infinitum, Your routine must do something useful (like H
ALT)*) SYSTEM £ ( Pointersize)(*Allocate memory from heap*) RELEASE(NewTop)(*Fr
ee up all of above (inclusive) *) DEALLOCATE( )(*Deallocate some *) FreeSpace(
)(*Amount space left between top and stack in bytes*)PROC(*Procedure call pa
rticular (eg 1 e5h)( knows 1) *) (s)(*Returns true at ()End either
detection 1*) (s)(*Sets back beginningOn list device, does a page throw*)
SetPos(shigh,low) GetPos(s ,)(*Get/ current position Only works disc !*) Buf
ferAhead(sforce)(*If console , read aheadUse when reading stillwant CP/M edi
ttingIgnored devices produce independence*) ReadRec(sRec when fullDefaults
a Storage which prints message stopsStore address a you want execute
is this variable*) . Streams(* module as in Wirth's book. (C) Dave Moore, FT
L Modula-2 1986Modified 11 Feb 86 A new function , PhysicalEOS, checks for physi
cal end of file on a STREAM. This contrasts to EOS wh NAFBGCHDIEBytes reply) Wr
iteRec(s ) (s)(* *) (Count) (sDir) . Strings(*String match routines are
terminated by zero bytes or length*)0..80 (*here for compatibilty only*) Pos(
Match,Search Start)(*Returns number of characters precedd)*) Read( b)(* charac
ter. If buffer, returnedOtherwise a wait bdos call issued*) ReadBuffer(f
orce)(*Buffer ahead.Reads another if empty or trueDuring , all CP/M contro
l codes be *) BusyRead( b)(* a console waitingThis ignores contents retur
ns null has been *) ReadAgain(*causes last backed up overUseful lexical a
nalysers. You only back beginning a lineing firstoccurrence MATCH gives
to£ skip at beginning ()+1 if not found*) Insert(substr dest inx)(* the
substring into positiongiven *) Concat(s1,s2 s3 )(*Concatenate two strin
gs £ create a thirdresult string is byte truncated won't fit*) Length(s1 )(
*Return in *) Assign(s1 s2 )(* s1 £ s2. Add a null terminator requireOnly
works on buffered input*) Write(B) (* a carriage return feed pair*) (s ) Erro
rExit(s ) ReadString( s ) ClearCharBuffer(*Overcome /M bug , present
eda second time then an ordinary a To overcome , just before exitting w
hen switch one other*) .l has been *) PortIO(*Support PORT IO (In and Ou
t) realted stuff (C) Dave Moore Sept 1986 *)SYSTEM £ WORD,d*) StoS(Source De
st BlankFill)(*New function Version 1.2Converts source £ a If Blankfill
true, destination blank filled, otherwise, it with a ( there room)Copying
stops end either array encountered, a inputThe returns actually c
opied, including fill ( any).*) Delete( str ,len)(* from starting char
acter *) Copy( , (PortAddress) (Val)(*do an or OUT. returns INed value as
fundtion result *) DisableInterrupts EnableInterrupts SetMode2Base(a)(*Set base
address for mode 2 interrupts Must be on a 256 byte boundary (ie, low 8 bits ze
ro)*) . Chain(* to another programLow memory must be set up ready for the calle
d (as if from CCP) )(* . Result , *)(*Note Well*********Inx st
arts , 1 - a . *) . SYSTEM £ BYTE(* IO routinesThese are seperated fro
m Streams because that is theway it done in Wirth, and you may want touse this
module directly any caseSee also, ScreenIO which d*)CPM £ fcb LoadAndExecute
( f)(*The parameter is an file loaded*) .DEFINITION MODULE ScreenIO (*Sc
reen handling routines for cursor position, attribute etc Specific to this co
mpiler*) FROMSYSTEM IMPORT BYTE FROMFiles IMPORT FileName TYPEEdits(Dim,Bri
ght,Normal,Inverse,Blink,StartGraph,EndGraph, DelChar,DelLine,InsChar,InsLine,D
elEol,DelEos,ClearScreen, Horizontal,Vertical,CornerLL,CornerUL,CornerUR,Corner
LR, Startxy,Mioes things with cursor etc*)CharWrit()(*The next four variables
used by 'pinch' lowest level of terminal output provide a blink facility ro
utine sets rather than importing so can runwithout being present. Of cours
e, there nothing stop using these entry points foryour own modules*)CharRoutin
eCharEnabledBlinkRoutinePROCBlinkEnabledStringLen(*length read string (characte
rs actually entere NAFBGCHDIEddleXY,EndXY,RingBell,MoveLeft,MoveRight, MoveDow
n,MoveUp) (*The editting mnemonics have the following meaning Dim,Bright,
Normal,Inverse,Blink Enter the given mode. Modes should not be combined as t
oo much variation exists between terminals in this area StartGraph,EndGraph
Enter and exit graphic character set mode Used for drawing bars around windo
ws If your terminal can do this with ordinary characters, set these sequences
empty and put the required MODULE HiThere FROM Terminal IMPORT WriteString,Wr
iteLn BEGIN WriteString('Hi There')WriteLn END HiThere. characters in the se
quences below DelChar,DelLine,InsChar,InsLine,DelEol,DelEos,ClearScreen Pe
rform the various editting sequences DelEol deletes from under cursor to end of
line DelEos deletes from under cursor to end of screen Clearscreen homes the
cursor as well (to top left) Horizontal,Vertical,CornerLL,CornerUL,CornerUR,C
ornerLR Character sequences to draw horizontal and vertical bars around wind
ows and to do the corners (lower left, upper left, upper right,lowr 1986 by G M
urray MIAP 13 Feb 87 Name changed and incorporated into main library - Dave Nu
tkins, HiSoft *) FROM SYSTEM IMPORT BYTE,WORD CONST (* Constants that
give mnemonics of BIOS jump block *) cboot0(* Cold boot *) wboot1(* Warm boo
t *) const 2(* Console status *) conin3(* Read character from console *) cono
ut4(* Write console character out *) list5(* Write list character out *) auxou
t6(* Write auxiliary character *) auxin7(* Reer right) Startxy,MiddleXY,EndX
Y The character sequences to start a cursor address command, for between the
co-ordinates and after the cursor address command. MoveLeft,MoveRight,MoveD
own,MoveUp Cursor move commands *) (*You should not need to use the next fe
w type declarations They are included here for use by the configuration program
*) PROCEDURE Gotoxy(x,yCARDINAL) (*Position to given coordinates top le
ft is always 0,0, which means that the biggerMODULE List (*List one of more
files Dave Moore FTL Modula-2 C/O Workman and Associates 1925 East Mountain
Street Pasadena, CA 91104 (818) 791-7979 This is a module provided with th
e system. You may hack it and use it for whatever purposes you wish. Call i
s LIST (wild card) file name,.... (output file nameo) Where the output fil
e name is optional (defaults to printer device) Bugs Overwrites output fil
e without checking if OK *) IMPORTDebug FROM SYSTEM I y is, the further dow
n the screen x is column, y is row A 'Standard' Screen is 80 by 24. The li
mit is set by the terminal definition file*) PROCEDURE LoadTermCode(filename
FileName) (*Load the terminal definition for the current terminal filename
is the name of the file to read Normally, when the program is loaded, the fi
le 'TERMINAL.COD' is loaded from the logged in disc This routine only needs to
be used if that file is not the one to use (eg, to swap screens*) MPORT ADDRE
SS,ADR,TSIZE FROM Command IMPORT Parameter,Parclass,GetParams FROM Files IMPOR
T FileName,FILE,Lookup,Create FROM Streams IMPORT Connect,Disconnect,STREAM,inp
ut,output,WriteChar, ReadChar,EOS FROM GetFiles IMPORT GetNames FROM Terminal
IMPORT WriteString,WriteLn FROM Sort IMPORT SortRecords CONSTFF0cx TAB09x L
F0ax CR0dx TABS20x TYPE PFileNamePOINTER TO FileName VARListSTREAM
ListFFILE replyINTEGER i,jINTEGER InsSTREAM InfFILE PROCEDURE Screen
Control(sEdits) (*Perform a screen control operation*) PROCEDURE DrawBox(
x1,y1,x2,y2CARDINAL) (*draw a box for a window on the screen x1,y1 is the
lower left corner x2,y2 is upper right corner*) PROCEDURE Clip(x1,y1,x2,y2CA
RDINAL) (*Set clip boundaries used by Windows when drawing boxes so that only
the parts of the boxes masked are re-drawn has no effect except in DrawBox*)
VARScreenDepth,ScreenWidthCARDINAL MadeChangeBOOLEAN (* NAFBGCHDIE chCHAR
bufferARRAY0..4095 OF CHAR bufflenCARDINAL (*I buffer the characters on outp
ut since I have a printer which stops printing whenever anything appears on the
interface. To get it to run at speed, you must hit it with a buffer full 'at
a time'*) PROCEDURE FlushBuffer VARiCARDINAL BEGIN IF bufflen0 THEN FOR i0
TO bufflen-1 DO WriteChar(List,bufferi) END END bufflen0 END FlushBuffer PR
OCEDURE BufferOut(chCHAR) BEGIN IF bufflenHIGH(buffer) THEN numbers * follows
int no (decimal)RST 00 18 216 324 432 540 648 This and next usually free 756
under CP/M 80In mode 1, only 7 # used, so you can use 1 *if were a 0 . 2
, " vector placed anywhere memory. With V1.18, 2 support has been added.To
2 interrupts, variable 2 . 2, # that # linked . " , ! #
# started wi FlushBuffer END bufferbufflench bufflenbufflen+1 END Buffer
Out PROCEDURE Compar(a,bADDRESS)BOOLEAN VARp,qPFileName BEGIN pPFileName(a
) qPFileName(b) RETURN pq END Compar PROCEDURE Usage BEGIN WriteString('Us
age is LIST file,file,...')WriteLn WriteString(' or LIST file,file,..
.,output fileo')WriteLn WriteString(' where file is a file to list or a wild ca
rd for files to list')WriteLn WriteLn WriteString(' for example LIST *.DEF')t
h(InteruptRout,(),SIZE(),PRO)(CON,) need initialised - # done Followed (in
side InterruptRout, ! # now being)(,, ) sends back statement .When "
, (s) # returned # again. *)PROCADR ()pWORD %wpjmp(* *)
(* *)(* . ' *)(* routineSBC SBC XOR
#ADC ADD AND CP OR SUB XOR XOR ADC !AD
C "ADC #ADD !ADD "ADD #AND !AND "AND AND #CP
!CP "CP #SBC SBC !SBC "SBC #SBC Note tas
ks stored therefore, , we have ' *) w 0e5h21h() 0e3h0cdh' 0c9h 2 ()(+
1)()0c3h(w)'(())(*We get here . . put NewTask int
errupted *) (*Halted # a " ". entireprogram # stopped (* required
)'s book)*) (' !/!!!9nf"!"*RH*"*Ws* #VS*W*#VS9! 9!9!9nf#V"*Rn& v/!9!nfnfs#rn
f s#r*RnfVs#r*W* Vs#r*Vs#rnf"!9!9nf"V!Rn&R! ,&ut"!R*exited - halt')HALT (pan n
ew)RegSaveiy%ix%hl%de%bc%af% % pRegSave pr((a)+n-$()). (* , stops message
*)((a)+n-$()-4). p.0(*clear flags *) (pn)(*Start a concurrent P a workspac
e n bytes # a standard type representing a parameterless storage # got heap
this may fall without termwhen it activates *)'(()) IOTRANSFER( ,va
w)(*Perform " Input-Output TransferCaution - following code # not at all nice.
******* # called " occurs. two parameters are * . third # recei
ve a jump instruction! executed .For example, in Interrupt Mode 0 (See A O
sborne, An Introduction Microcomputers, Vol II - Some Real Devices - SYBEX), co
rresponds NAFBGCHDIEinating . They simply cease exist, system gets pr
ocessing any remaining *)((,n)NEW()(p,,n,.).(*reset they don't stop *)'()(*cal
ls 't until terminates or waits *) SEND( s)(* (longest waiting)
s # restarted*)q,r,ttsrq t qrrttt. r q s q. r.r'(r) WAITIMPLEMENTATION Rea
lInOut(*The new stuff for read and write reals has been added in two ways old Wr
iteReal WriteRealFixed routines now call the Text then do a . ReadReal routin
e readsboth types of number but Read character differentiatesbetween forms
input *) INOUT £ ,Write,WriteOct,WriteHex,WriteInt,,,termCH,AlwaysBuffer,DoneSYS
TEM £ ,(* foillowing imports can be used instea( s)(*Wait a signal - everythin
g , dies *)t (' System locked ')t.t.sst'(t) Awaited(s)(*Returns somethin
g # *) s Init( s)s 2 ,. SEND( s)(* (longest waiting) s # restarted*)q,r,t
tsrIMPLEMENTATION QuickStrCommand £ Parameter,Parclass,GetParams £ ,,WriteStora
ge £ ALLOCATEFiles d import fromInOut to produce smaller programs - you will
only able IO console £ ,,, SmallIO £ ,,,,,*)IntLogic £ IANDtab09xSigDigit
s15tchnegchs1..15 a,bREALi,j,k,lwholeplacesrval,sval atoi(ai)bb1.0 i0 i-ia1/al
1 (i,l)0 bb*a li aa*all+l b TextAddrTextLenTextPos WriteCH(ch£ Lookup,Create
STREAMS £ ConnectSYSTEM £ DirText Direction,1..7 'find','create ' OpenStreams(
StreamList StreamRecord OptionsOptionsSet)Pars1..6 countifpFILEreply i0 () i
.Opened (,)(*First, see if there are any options*) Classoption i0 ORD(Length
-1) CAP(Charsi) 'A'..'Z' INCL(,(i))('Invalid Option ')(i) INC()() SetUp(
)()()0 ReadCH( ) 0 () ' '() CHR(0) () ReadRealNumber( val)SaveBuffReadO
Knege() (' ') () () '-' () '+' ()0.0 ('0') ('9') 10.0*+(ORD()-('0'))()
'.' ()1.) DEC() (*class*) (* *)(*Now process file names*) i1 ()+1 i (i) (n
ame) (' Name parameter expected ')() i-1 (0) (i) MustSupply (' Required om
itted ') DefaultNameFileName() IsStream NEW(f) fFile 1 (Dirinput) LookupFirst
(f,,) (output) (0) (f,(),) 0 (' Could not ')0 ('0') ('9') 10.0*+(()-('0'))10.
0*()/ ('e') ('E') i0()'-' ('-') ('+') () ('0') ('9') i3000 i10*i+(()-(
'0'))() /(10.0,i) *(10.0,i) - ( a)0(a) ReadRealText( AtPos r)() () (
()' ') ()() r0 (r) PreScale()() (Stream,f,) (()+1) (' Too many parameter
s at ')(.) VeryQuick( In,OutSTREAM)(*Open a stream for and a *)S1..2 o S
1 'CON'() S2 ''() (S,o) . NAFBGCHDIEWriteLn HALT END Usage PROCEDURE Listit
VARParamARRAY 0..10 OF Parameter CountINTEGER NamesARRAY 0..100 OF FileNam
e NameCount INTEGER Counter INTEGER Cnter INTEGER BEGIN GetParams(Para
m,Count) Counter 1 IF Count0 THEN Usage END IF ParamCount-1.
Classoption THEN DEC(Count) IF Count0 THEN Usage END GetNames(ParamCount-1.Ch
ars,Names,NameCount) Create(ListF,Names0,reply) IF reply0 THEN WriteString('
Could n(* engineering form if requiredThis code does so by shifting more fron
t dotIf want shift other way, change signson numbers*) Engineering (i 3
)0 ii-1+1-(5+3)(* contains precede decimal point*)j(Leadingplaces)- jj
1 -1 (' ') j0 ('-') (' ') 2 2 (* out *) (* this happen format *)aa+(0
.1,)*0.5 TRUNC(a)9 aa/10.0ii+1ot create list file') WriteLn HALT END DEC(Cou
nt) IF Count0 THEN Usage END ELSE Create(ListF,'LST',reply) END Connect(Lis
t,ListF,output) FOR i0 TO Count-1 DO GetNames(Parami.Chars,Names,NameCount) I
F NameCount1 THEN SortRecords(ADR(Names),CARDINAL(NameCount), TSIZE(FileName),
Compar) END FOR j0 TO NameCount-1 DO Lookup(Inf,Namesj,reply) IF reply0 THEN
WriteString(' Could not open ') WriteString(Namesj) Wr(j) k(a) k9 k9a10.0 k
0 WriteRealHex(a,14)(k,4)((k+('0')))a10.0*(a-k) a0.0 a0 j ('.') jj+1 (i0) F
orceExponent ('e') i0 ('-')i-i ('+') k1 3 ji 10li-10*jk(l+('0'))ij k3 1 -1 (
k) ((0)) (c)0..30 (,c,)() WriteRealOct(xn)aia(((x))+7) i8 1 -1 (a,3)(' ')a(
(a)iteLn ELSE WriteString(' Listing') WriteString(Namesj) WriteLn Counter
1 BufferOut(FF) Connect(Ins,Inf,input) WHILE NOT EOS(Ins) DO ReadChar(Ins,ch
) IF ch80x THEN chCHR(ORD(ch)-80h) END (*output character if not control cod
e*) IF ((ch' ') AND (ch'')) OR (chTAB) OR (chCR) OR (chLF) THEN Buff
erOut(ch) END END Disconnect(Ins,TRUE) END END-1) (xn)aia(((x))+7) i8
1 -1 (a,2) n16 (' ') a((a)-1) WriteRealFixedText( x,)(* a *)()ax(*add half
place after least sig digit*)--1 -1 (*space fill field*) i0 1aABS(x)i0 i+1
j+()-1 j j aa+(0.1,j)*0.5 j (' ') ('-') j1 k(a) k9 k9 ((k+('0')))a10.
0*(a-k) a0. END END Listit BEGIN bufflen0 Listit FlushBuffer Disconnect(L
ist,TRUE) END List. mACUSTOMIZEXEmAFINDP COM5-ARC EXEf l) END (*output
character if not control code*) IF ((ch' ') AND (ch'')) OR (chTAB) OR (c
hCR) OR (chLF) THEN BufferOut(ch) END END Disconnect(Ins,TRUE) END
END0 a0.0 ('.') j1 () k(a) k9 k9a10.0 (* (k0) (k9) ('k')(k,6)(a,14)*)((k+('0
')))a10.0*(a-k) a0.0 a0.0 ((0)) (x,)0..30 (,x,,)() 02 .fill field*) i0 1aABS
(x)i0 i+1 j+()-1 j j aa+IMPLEMENTATION SetUpCall(* Up call parameters for a pr
ogram and chain to it*)Chain £ LoadAndExecuteSYSTEM £(*Convert range 1 10
(unless zero)i returns places shifted process*)a0.0 a-a (*calculate whole di
gits size*)i0 a0.0 a1.0e14 aa/1.0e14ii+14 a10.0 aa/10.0ii+1 a1.0e-14 (*(' ')
*)a1.0e14*aii-14 a1.0 (*(' ')*)a10.0*aii-1 WriteRealText( c)(*output a real
*)sigdigitsplacesbeforedot()acScaleii-() NAFBGCHDIE BYTE(*Low core variables*)f
cb15ch26commandlen80hcommand81h0..80 i,j MakeCall(progname f) 1f2.fcbdn02.fcb
fn1' '(*set up line*)i0j1 1.0 iCHR(ORD(1.)+('A')-1)INC(i)i''(i) (j8) (1.j' ')
i1.j(i)(j)j1i'.'(i) (j3) (f.fcbftj' ') i1.j(i)(j)j0 (j()) (j'') (j) (j 1..10
(*()*) PivotNoMaxElement,HeadElementi,j,ka,btempc,d,e(* all pivots false*) i1
i i1 -1 (*choose a pivot*)0.00 j1 j (i-1j) (' trying ')(j,5)j(i-1j)(*
*) 0 (' Singular ')HALTi(' next ')(,5)(,14)(*b*)1.0/(*(1.0/,b,1)*) j1 j *
i-1j(*(i-1j,/,()) i''(i)ij+1(i)if.'' i0 j-1 f.i+1if.'COM'f.0f.fcbex0f.fcbcr0(f
) .IMPLEMENTATION SmallIO Conversions £ CardToString,IntToString £ Read,Write
,,ReadBufferMaxDepth3 SkipBlanks( ch) () ' ' ReadCard( c)c0()() ('0') ('9') 2)
*)i-1j0.0 ki+1 bk-1jk-1jk-1j-k-1*(*(,(b-k-1j)/k-1,3)*)(**)(* *) (* j*) (*tria
ngularisation*) (* now upper triangular, but permuted as given *)(*solve
*)k1 k INC(k) k k+1 k-1(* *) i 1 -1 i(*row produce result*)a ji+1 baa
a-j-1*k-1j(* k-1j0.0 ((b-a)/k-1j,j-1,4)*)c10*c+(ORD()-('0'))()(**)termCH ReadIn
t( x)neg()() '-' ('-') ('+') () x0 ('0') ('9') x10*x+(()-('0'))()(**) x-
x WriteCardInGivenBase(c,baseplaceszerosuppress)text1..5 usedi(c,,,) ' ' '0
' i+1 () () i6- 5 (i) WriteCard(c)(c,10,,k-1ia/i-1(*(a,k-1i*i-1,5)*) .I
MPLEMENTATION Sort(*Internal sort of fixed length records*) FastMove £ Swap(*us
es quick *)i,jsorted SortRecords(tableelements,elementsizeComparKeyProc)ela,b,c
0 5 (*use bubble for small number *)j-1a i1 j b((a)+) (a,b) (a,b,)) Write
Hex(c)(c,16,,) WriteOct(c)(c,8,,) WriteInt(c)1..6 i(c,10,,) i+1 () (' ') i
7- 6 (i) ignorech0axeolch0dxdelimiter' ' AlwaysBuffer .versions £ CardToStrin
g,IntToString £ Read,Write,,ReadBufferMaxDepthIMPLEMENTATION Solve(* a set of
equations by gaussian elimination*) £ ,InOut £ WriteCard Rab(**)jj-1 (* more
*)(*select a pivot*)a(()+*( 2))c(()+*(-1))(* middle element*) (,a) (*a*) (c,)
b (a,c) babc (*a*) (c,a) ba (,c) b bc (*b is now *)a ((a)(c)) ((a)(c)) (a
,b) a((a)+) ((a)(c)) (b,c) c((c)-)-1 ((a)(c)) (a,c,)(*if has been moved, r
eposition pointer to it*) ab bc cb ba ealInOut £ WriteReal,WriteRealHex(* Che
ck(a,bREALAt) ABS(a-b)(1.0e-14*(a+b)) (' at ')(,5)('a b dif')(a,20)(b,20)(a-b,20
) *) Gauss( Matrix COLUMNdepth,len)(* a for an arbitrary number righthand s
ides.matrix is array columns which make up the elements in each column. T
he first rows are used to a square *)Pivots1..10(*()*) Pivoted NAFBGCHDIE (1)
(a,b) (a,b,) (a,b) DEC() -1 c((c)+) (,,,)(c,-,,)(*5 *) .IMPLEMENTATION
STORAGE(*Heap allocation/deallocationD.Moore 29 Dec 84*) SYSTEM £ IntLogic £ I
AND LOADER £ TOP £ ,HeadRoom512(*min headroom between stack and heap*)Frame(*Fr
ee list frame*)nexDirectionoutputfcb(* use for output input*)BufferSize(* size
*)CharsRead(* *)Buffer0..-1 (*The is only used files and console may b
e increased at will*)iBuffers Connect( s fdir)(s,SIZE(s)+*(-1)) s ((f))* 0 +1
.f BufferOut(s)i s .f(,(),,i) i .eof tsizePFrame FreeListTopOfHeapLast,LastBu
tOne,,Next ALLOCATE( Pointer)(*Allocate memory from *)(+3,0fffch) (*make multipl
e of 4 bytes*)(*try to find If not found, call MemFull again if Memfullreturns
*)NIL () (.) . (* free *)..- .0 . .. (()+.)(*allocate top *)0.f Buffer
In(s)i s .f(,(),,i).i0i0 WriteChar(sw) s .devtype (w)i(,WORD(w)) i(,(w))wINC(
) (s) (s) (*Case *) (* s*) Disconnect( sclosefile)SaveSize s (s,)(*
*)(*fill up 128 boundary*)*(( )+1) -1 (*m()+ ((())-) -FullUp MemIsFull(
' Out ')HALT RELEASE(NewTop)(* up all above (inclusive) *) DEALLOCATE( )(*
Deallocate some *)(+3,0FFFCH) (()()) () .(*see adjoins area in *)().. ()(()+
) (*merge with following is 0ffffh, so joining implies nil*).+.ust *)(s) (
) (s,(s)+-) WriteWord(sw)(s,(w))(s,(w)) EndWrite(s) s (.) (0) (s) ReadChar(
s w) s . (w)w((,0)) (s) w() (* *) (* s*) ReadWord(s w)lowbyte,highbyte(s,)(
s,)w((),()) EOS(s) s, (s) (.. (()+.)() (* Join preceding *).
.+.... (**)(* at end *) (()+.) () . FreeSpace()i ((i))- (*Initialisa
tion*)() .IMPLEMENTATION Streams SYSTEM £ ,BYTE Files £ SeqReadBlock,SeqWriteBl
ock,Close,Devicetype,con ,**)(**) PhysicalEOS(s) (s) s.. Reset(s) s, ()f.f
cbex0f.fcbcr0i(,(f))+1f () i(,0dh)i(,0ch) (*page eject*) SetPos(shigh,low)
Extent s, (s) 4*() 16383 -16384()(*open the required extent*) ORD(f.) ()f.i(,
(f)) i255 +1 rdr,lst,pun ,disc Conversions £ LowByte,HighByte,MakeWord CPM £ BD
OS,wpufc,wlcfc,rrdfc,opnfc,fcb £ Write,ReadBuffer,Read, STORAGE £ ALLOCATE,DEAL
LOCATEEOF1ax(*end of file character*)BlockSize128(*characters in a block*)STREAM
StreamRecordFilePointer FILEConnectFileUpdated(* if buffer written to*)Pos(*N
ext byte *)Dir NAFBGCHDIE f.(s)-* ReadRec(sRecBytes reply)ii0(*bytes read*) i
(s,) s.. ()()ii+1(i) WriteRec(s )ii0(* *)s.. (i) s..(s,())()ii+1(i) Get
Pos(s ,)i s, +*(f.)i(f.)i 4+16384*(i-4*) (* pointers are ahead position*) (
) DEC( k- i k- ii+ ik- i() i0x Copy( , £ )i (£) (£) i() (i) (0) £00x
(+)i i- i +-1 £i-i (£) £0x .i0 (i(s1)) (s1i0c) (i) i StoS(Source Dest
BlaIMPLEMENTATION (*Low level terminal supportDave Moore 24 dec 84*) CPM £ BD
OS,rccfc,wccfc,rcbfc,rcsfc,)+(MAX()-())-()-1 BufferAhead(sforce) s.. () Set
Buffers(Count) 1 1 8 (*purely arbitrary limit*) 8 ChangeDirection(s)(*I am
not sure this code. Have I missed doing anything*)s. 1 .) GetPos(s ,)iIMPLEMEN
TATION Strings(*String match routines are terminated by zero bytes or length*)
Pos(Matcdiofc SYSTEM £ ,WORDConsoleBuffer0..128 BYTEPositionijch Write(b)i(*ne
eded to avoid conflict with global*) CharEnabled CharRoutine(b) i(,(b)) ReadBu
ffer(force) ((-1)1) 0()-1i(,())1 Read( b) 1 b+1+1 (-1)1 b0Dx(*carriage retur
n*)+1i(,0ah)i(,0)bCHR(i) b0dx i(,0) h,Search Start)(*Returns number of charact
ers preceding firstoccurrence MATCH gives to skip at beginning ()+1 if no
t found*)i,j,kkLength()-()i (ik) j0 (j()) (j0c) i (ji+j) INC(j)(i) ()+1 C
oncat(s1,s2 s3 )(*Concatenate two strings create a thirdresult£ string is b
yte £ truncated won't fit*)i,j,kj BusyRead( b)(*there is a problem wiuth CP/M
when these calls areintermixed . This results in some characters being recei
ved twice*)i(,255)b(i) BlinkEnabled BlinkRoutine ClearCharBuffer(*overcome bu
g mentioned above*)i(,0) i0 i(,0) ReadAgain 1 -1 (0)(0ax) OutString( s )
i0 i(s) si0c (si)ii+1 (**) (s )(s)(s3) j(s1) j(s1) i0 (ij) (s1i0c) s3is
1i(i) i(s3) j(s2) j((s3)-i) j(s3)-i k0 (kj) (s2k0c) s3is2k(i)(k) i(s3) s3i0
x (s1 )(*Return in *)ii0 (i(s1)) (s1i0c) (i) i StoS(Source Dest Blan
kFill)i,j,k,li0 (i()) (i()) (i0x) ii(i)li(*save for return value*) ErrorExit(
s )(s)i(0,0) ReadString( s )()StringLen0 (s) () ' ' s+1 (**) (s) s0x 10
129 .oH #come bug mentioned above*)i(,0) i0 i(,0) ReadAgain 1 -1 (0)(0ax)
OutString( s )i0 i(s) si0c (si)ii+1 (**) (s )(s) ii () i' ' i()+1 i
() i0x l Assign(s1 s2 )ii(s1,s2,) Insert(substr dest inx)i,j,kk()j()(*tr
uncate £ too large *) k(SIZE()-()) k()- (j+k)() j()-k (*move up rest *) ij-
1 () -1 i+ki i0 k-1 i+()i Delete( str ,len)i,j,kk() k (+)k NAFBGCH
DIEControl is the current control code set for the terminal MadeChange is TRU
E on return from ScreenControl if the required code is implemented, else false
EditDisp contains code to simulate some codes when they are not implemented
*) (*New routines added at version 1.02 These routines move the resposibil
ty for scrolling within a window from EditStat to ScreenIO This is done so t
hat, when working with the memory mapped version of ScreenIO, The Bars need not
jump up and down whenite(s) s (.) (0) (s) ReadChar(s w) s . (w)w((,0)) (
s) w() (* *) (* s*) ReadWord(s w)lowbyte,highbyte(s,)(s,)w((),()) EOS(s) s,
(s) (**)(**) PhysicalEOS(s) (s) s.. Reset(s) s, ( a window is
scrolled*) PROCEDURE ScrollWindowUp(StartLine,EndLineCARDINAL) PROCEDURE Scro
llWindowDown(StartLine,EndLineCARDINAL) PROCEDURE OutputToScreen(TurnOnBOOLEAN)
(*Call this routine with FALSE to prevent output going to the screen. This
allows you to suppress output while large amounts of screen alterations are bei
ng made to speed up a program. Of course, you must re-enable screen output and
then re-draw the screen later. This is used by the editor to suppress screen a
lteratiomlu deffiles.lbr e COMMAND.DEF e CONVERSI.DEF e CPM.DEF e CPMBIOS.D
EF e DEBUG.DEF e EXCHANGE.DEF e FASTMOVE.DEF e FILES.DEF e GETFILES.DEF e
INOUT.DEF e INTLOGIC.DEF e LOADER.DEF e MATHS.DEF e PROCESSE.DEF e QUICKSTR
.DEF e REALINOU.DEF e SETUPCAL.DEF e SMALLIO.DEF e SOLVE.DEF e SORT.DEF e
STORAGE.DEF e STREAMS.DEF e STRINGS.DEF e TERMINAL.DEF e PORTIO.DEF e CHAIN
.DEF e SCREENIO.DEF f e SORT.DEF e STORAGE.DEF e STREAMS.DEF e STRINGS.DEF
e TEns during execution of repeats *) END ScreenIO. DINAL) PROCEDURE Output
ToScreen(TurnOnBOOLEAN) (*Call this routine with FALSE to prevent output goin
g to the screen. This allows you to suppress output while large amounts of scr
een alterations are being made to speed up a program. Of course, you must re-en
able screen output and then re-draw the screen later. This is used by the edito
r to suppress screen alteratioad*) i (s,) s.. ()()ii+1(i) WriteRec(s )ii0(
* *)s.. (i) s..(s,())()ii+1(i) GetPos(s ,)i s, +*(f.)i(f.)i 4+16384*(i-4*)
(* pointers are ahead position*) () DEC()+(MAX()-())-()-1 BufferAhead(sforce
) s.. () SetBuff(* *)Buffer0..-1 (*The is only used files and console
may be increased at will*)iBuffers1 Connect( s fdir)(s,SIZE(s)+*(-1)) s ((f))*
0 +1 .f BufferOut(s)i s .f(,(),,i) i .eof 0.f BufferIn(s)i s .f(,(),,i).i0i
0 mlu asmfiles.lbr e CHAIN.ASM e CPM.ASM e CPMBIOS.ASM e FASTMOVE.ASM e I
NTLOGIC.ASM e PORTIO.ASM e -README.ASM e EXCHANGE.ASM e OPSASM.DAT f EXCHA
NGE.ASM e OPSASM.DAT f mlu modfiles.lbr e BUILDSUB.MOD e COMMAND.MOD e CO
NVERSI.MOD e DEBUG.MOD e FILES.MOD e GETFILES.MOD e INOUT.MOD e PLUSBIOS.MO
D e MATHS.MOD e PRECEDEN.MOD e PROCESSE.MOD e QUICKSTR.MOD e REALINOU.MOD
e SETUPCAL.MOD e SMALLIO.MOD e SOLVE.MOD e SORT.MOD e STORAGE.MOD e STREAMS
.MOD e STRINGS.MOD e TERMINAL.MOD f SETUPCAL.MOD e SMALLIO. NAFBGCHDIE gi
ves to skip at beginning ()+1 if not found*)kLength()-()i (ik) j0 (j())
(j0c) i (ji+j) INC(j)(i) ()+1 Concat(s1,s2 s3 )(*Concatenate two strings
create a thirdresult£ string is byte £ truncated won't fit*)j(s3) j(s1) j(s
1) i0 (ij) (s1i0c) s3is1i(i) i(s3) j(s2) j((s3)-i) j(s3 !!9nfn&nf#V"!ut!ut!u
t*& *qutnf#VSq*s*utnf#VSs"!9nf*)Y#Vv*R*R!(#u9 nfxv!n&!u*)Y#VR/ *)Ys#r9 *s#rn& M
!xZ *s!9nf"nfR,nfR !ut *nf#Vsr*#"**ut!"*utn&unfR 9STANDARD
dd!9*s#rnfs#r*#"!9!5onfFo!9!"!6n&o*nfo*n&n&u%*n&unfzku""!9*&Rnfx p!9!ut*utnfs*
&Rnfs p!4!)7nf"!u!ut!ut "*&R!x*RnfR+*utenfs#r*#Vknfs#rnfut*R!Nx*!l*nfVnfVs#rnf#s
#rnfsnfsnfut*s*!&R4sr*V&o+"*#"*RX!x*"*!"*R*&R!"!9nf#VR!2nf#V2nf#VS!2nfs#r!9!9
!g!0&*&&Rfqfl!9!9!fl!fl!ut!V0R!V9R!V2nf#ut!V.Ru*&0Rg*9!"b!u*&u!2nf"!ut ! u!ut "!
ut!ut!ut!ut*&R p*&R*&AR p!u !u*&R !x*&R!!n& *s*snf)s#rnf#ut!lnfVs#rnfutnfsnf#s#
r p*&R p*& R!x ! !O7esrn& £ooun& n& !ut&9Rgnf#ut!Vs!9!9!glu*&eR*&ERr!E2!9!9gl*&E
R*&eRu*&-R! #u*&-R *&+Ru!ut*&0Rb*&9Rb!0&*&&Rnf kutur! fln& !9!9gl!V+Rsr!9!9!gl/n
f#VsrnfR/!utnfutnfRnf##VRj!utnfsnf#Vs#rn& nf#VsrnfVRnf)#VSnfVRut*"nfut nfutn& mn
&Rc!lnfbs#rnfs#rnf"b!*u"n& nfRutnf#ut*&R p*&R!'x p!VRutnfutnfRnf#!2*"!2!9nfRF*u
t*&u!2nf"! unfut "n&2nfut!9*&R*&R p!9*#"!"*oR *R *+"!*)Y#Vv*R7!*Yv*RWn& T!x*R*#V
SW p*R! *R*& R p*&R!9x!* #Vv*R!x p! NAFBGCHDIE+utnf)#VS*#VV*s#r!utnfRnf#VsrnfVs
#rnfutnfutInfVs#rnfs#r!ut*& R!'x*& R penfs#rn& !x!!7nf"!unfut n&unfut"n&2"!9!9*&
'RL*&7R/*&7RI!2X p!!7!*)Y#Vv*R!!*s*!"3n&2!9*3Rnvnf!Inf3s#rnf#V!"!!u!ut"!!"3!9!9n
fR!*konfFo!o!*konfFo*ut! k" p*&R pnfRnf#Vsrnf#Vsr*&R p*&R! #un& l*&Ro p*&R*#V!s#
r!1nfo*&R!#VREn& !#VR !!9f!s*x!x*ut*#"*)Ys#r**+" p!9!9*#"*)Ys#r*out*"o*ut*qut!
*l"*l#"l p*&R!x! !*)Y#Vv!xvfv!!$l*s*s#r*s#r!"q p!!7*&)Rl!'x*&Ri pU p*&.R*&+RO9l!
u*eR!*io*eFo!o!o*Fo*Fo"C*&R!x! l!flnfRBsr!V&o+nfRf!#Von& !#VkFo!#VFo*&R p*&R/*&R
pnf"!*konfVFo!9*& R(*&'R(*&%R( p*& R9 p!9*lutcS*R!*x*"6!"8!"*!"!nf"6nf"8nf""!nf
"l!9!!97!!*ut!!7nf!x pnf"o*"lnf"qnf" *+*l"*"Ymo p*&"Rk!jx!2!2 p!"*&2R! xV*& R!x!
ooyPB$DHGIHRHCNAELOOB-SBADTESTIB0LANIDRACoPACRAHCLCXECEDESOPSIDTAOLFESLAFTLAHD"!
!u *6ut*8ut nfRH*!*#V*!sr"!*#nf"*#nfR*ut*#nf"*#s#*#C*&'R5!*&R5!*&%R5!*&R,C/!*& R
! p*&R !!**!ut p! !+7*!nf%"%*ut )*%sr!unf#V""% ! !+7!!7*ut!ut!4!7*&'R *&%R e*&R
p *&%RROREGETNI/NCNILCNILINnWENRDDOEURTCORP LAERsLAVCNURTTESTIB$SBA NIMbXAM EZI
S 2 $$*l"ls#rn&n&w#DMR+*l#utSl+w+! pe!'!l7/!*&'R/!!gx pC#"#*!s!*!!9*&u!2*&u!2 p
*ut!"*#"*)Ys#r!'!g7n&2nf#"#!u*ut *)Y#Vsr "#*+"nfutnf"n&2!"!!9!!C7nf#"#*6 R"*6#VR
"!vx"*6R"!xnfR"*6*#ut"nf*#ut**#ut !!7**#utnf #VRs#r*&RW pC!9!9!!7! *&R!!*s#r*s*)
Y#Vv*ut*&unfRF*R*#VR!xnf#VR!2nf"3o!*"3*ut*s!!H7)srnfRnfRnf#Vsr *3R*3R*3Vs#r NAF
BGCHDIER#*6R#*ut*#nf*6JG #!x*#nfRj#nfnf #s#*#nfV R!un& #!x*#nf ut*#nf R#*ut*#nf#
Vnfs#r!u!!D7nfut"#!9!9*&R$*utnfR£$nf#"#n&R$nfut*&R$nf"sr$!Ax"#%*&R$!"sr%*&R%!utn
f#"#!uR-!X,s*4s*s pnf)#Vs#r!!D7nf#ut*&Ry- p,*&R-!x*& R".*&R-*&R-*&R-*&9R-*&R-*&R
-!I'x.*&R.!J'x p.!K'x%. p)srnf"6*&Rr.!LX, o.!k!g,*g"*kut.*w& .*oR.!i!e,*iut*e".!
kut*"nf+Rq/srnf)#V!"!nfutn&t !u p!!97!!*%"%!ut nfutnfut!u "%nf#ut*&R%nf+*#utnfR%
*R%**#ut%**#ut*#nf#Vsr "#!!7nfut%!x!9 pnfs*&RH&$nfs#r&*&R&nfs#r*#"#n&R&n&R&n&R&n
&R&n&R&!Nx"#&!txnf#"#*&R'&nf4Rd/n&u*& /*ut nf#V"d/nf#VR"**!ut "!+.nfiR/*"e/nfkR/
*"g,*&R/*6**RC!9!9*ut!25!2B*5& 0*&!R.0 p!!7*&R00*&Rd0 pX*&RS0 p*&R00*&AR0 p*R! #
2nf"/*&R0*ut0!25*B& 0!x p!2B/nf"s#r!'!4!7)*#sr *#nfR'!ut '*#nf#Vnf#VR#nf #Vkut "
#nfut*!nfR'nfVs#r'*!nfVs#r*!nfut*!!l*!nfsnf#s#rnfs#r'*!s!*!!9nf#"#! u!ut !ut "#!
ut p*&Rp) p*&R1)!lnf#"#*&AR(!u p(!*#u!*#ut*#e*#s*31RQ1*1R1*131R1*1R!*31R+!£o 1*3
1 1R"311*311R"31!9nf#VR1nf#VS3181nf31s#r!9nfR2!ut!2nf"3181*31ut!9*1& 2nf0"0n&&!R
2nf R2nfR2!ut 2*R*0ut2!R2*0n&4R2*&u2!R2!R2*R*0unfr2"0!r'*#n& )''"#*&R.) p( p*& R
p) penfs#rn& p)!xnfut!"!!9!9*&&!9R)!sr+!7R)$(sr+!R+ p!4!B7nfs$nfs#rnf!"!nf R9*!
ut **!nf RY*!ut **!nf #"#n&R*n&R**#nfV Rzknfs#rnf#VR*!xnfs#r*!x"#"!nfu9*1R4*10"0
n& ,3*1z*01*01*01*01*1&2*0n&&!R4n&&!R3*01*014!R3*014!R3!R3*014!R3!R3*014! Ro4*0n
f 1*0sr nf "0*0Rl4*00"0*01*0nf1*0srnf"0"044!R4!R4**0ut 44!R4*014*0nf"1"03*1r!*)Y
#Vv*10"0*R5!xt+!R+&sr+!6R+ p!!h7nf!"!!ut !u*&R+)*!sr +!*R+!!*#"#!u!ut "# p**!ut
+$*!sr "!nfut+$sr!9nf#VdRR,* R2,!xnfs#r*#"nfs#r!9*oRw,*w& ,nfx!u,!u!9!9!ut*&R-nf
R-!!nf)s#r*s p*& NAFBGCHDIEJ5!*0ut!ut*)Y#VR5*)Y1s#rJ5*1s#r"0!9*o#VS1*1R5*10"0*1
r*0n&R5n & 5nfR5nf 5*1z*1 54*0nf"1"0f5*1#VS1*1R7*1r*1#VS1!0 *1RI6*1r*0n& Ra6!"1*
1R6!0 l6*1#VS1*1R6*1ra6*1R6*10"0!u*1R*0sr nf R6nf &2"07*61&*l"*l#"l*!1*1rfv*1$*1
"*q"1*1"q*s"1*1"s*1ut!"1nfRnf#VS1nf1s#rnf#VS1nf1s#rnf!1nf1$nf#Vsr*11s#r*1"1c*q"1
*s"1*1utnfRknf#VS1nf#VS1nf#Vsr!9nfRnf nf!251nfRnf#Vsr!utx!9nfRAn 7*1z*1#VS16*0s0
*0!9*l" 1RP7!utD9!!o!Ro*o0"0nfFo*0nfFo*0nf Fo*0nf"1nf 1R" 1nfR"1"0*o"1*61&u!21*1
R8*10"0*01*01*0nf"1n&2*0nf"1!2*01*0nf"1!21*71&u"07*o"1!21*1R9*1r!1 *1"1!"1*1R8*1
r!1 l8*1#V*1#VR8!'x5*1#VS18*1#Vfpnf#Vpnf#Vnf#Vsr!9*1RC*10"0*1o A*1p*1 C*1r*0n&RA
nfp*0n&&!RAnfRAnfRAnfpC!RBC!RB!RBC!RC*0n&&!RUBnf p*0nfpC!RoB*0nf C!RB!RB*0nfpC!R
B!RB*0nf pC! RC*0nf "0*0RC*00"0nfp*0nf"0"0R#9*11s#r*o"1!"119*1#VS1!21m8!ut0"0*&+
R p!261!2717R9!Zx!£U p!.!7!"1*os*&RK!1 *o#VS1*1R4*1r!1 l*1z!"11*1#VS1*1R1!1 !x9
p*&RH p9O5*#"!261 p!271*&R7R!Zx*o"1*os4*#"*)Ys#rO5*)Y#V*o s#r*+"*#" p*&R pi!!BCC
*0nf"1"0KA!9!251*q"1!CA*s"1!CA*1utnfRCnf#VS1!CAnf#VS1!CAnf#VsrVC*51& ,Csr!onfFo*
0"0!o*Fo*Fo*)Y#V*0s r*qut*sut*utnfut *ut*1ut*0 *0"z**0ut*ut*ut*ut!u"0! !97!9!9!
"1!"1*1RO*1 *1!1*11s#r*1"1*1R*1 R*1#Vsr!utnfR!lnfVnfR*1Vs#rnfVs#rnf#Vsrnfut%!"1*
1s*11s#r*1#VS1!"1*1R*1#VS1*11s#r*1"1*1"1U!9nfRnfRnf#Vsrnfut!9!"1*1Rnfx*&$R! #*&R
! #*&%R! #*&'R! #*&R! #oooo E pE!9!unfREnfR! #uDGnfDFnfRF!uDGnfR8Fnf#VR! #uDGnfR
oFnf#VR! #uDGnfRFnf#VR! #nf R! #£ouDGnf RDGnfRDGnf#V*10"0nf*0srnf*0srnf*0srn&&!R
k!Rn!R!R!R*0n&&!Rnf *0sr nf*0sr!R*0nf *0sr !R!R%*0nf*0sr!R7!RT*0nf *0sr ! R*0nf
utnfRnf##Vnf#s#rnf#Vsrm!R*0nf *0sr *1"1*0nf"1"0!9 NAFBGCHDIER! #nf#Vnf#VR! #£ou
!9!unfVRsG!uInfRGnfRHnf#Vnf#VRGnf#Vnf#VRHnfRHnfRHnfRFHnf#VsrHnfRsHnf#VsrFHnfVR!
#uInf RHnf RHnf#Vnf#VR! #uInfRcIRQ*ut4Q*DnfR4Q!yxQ!RkQD!9fDlQ!RQ*Dn& uQ"DQ!lnfD"
Dnfut!un&unfutnfs"Dnfu t!9!9nfR!R!uNRnfRNRnf#Vsr!Rnf#VR! #nf R! #£onfR! #nfR! #n
fDooou!9nfRSnfnfRcInf#VR! #nf#Vnf#VR! #£ouInfnfEnfnfEou!9!unfnfJG I!uoLnfRInf*JG
I!uoLnfRlJnfRlJnf#Vnf#VRoLnf#Vnf#VRoLnfRJnf#VsrlJnfRJnf#VsrJnfRKnf RKnf#RSnf#Vs
rRnfut!9nfROS!uSnfRSnf#VRsrOSnfDs!9!unf#VR S!uSnf#VRS!x!9n fSsnfSsn&R6Tn&£o Tn&u
n& bT!n f*Ps rn& T!nf*PsrTn&un&n fnfn f#VuLsr !9!9!lnfD"D!u!utVRK!uoLnfRKnf#VRKn
f RKnf#Vnf#VR+!uoLnfRKnf#VR+!uoLnfRLnf#VRLnfRLnf#Vnf#VR! #uoLnfDnfD£ou!9nfRPnfRP
n & RPnfutn &&!RMnf#Vnf#Vnfnfut*ut"Dnfut!9nf!lnf#VD"Dnf#Vsr!unfRU!xUnfRU!*Dunf#V
srnfD"D!9!lnfD"D!u!#Vsr!D!#Vsr"Dnfut!9!9nf+Unf#VRsrnfut!9*RV*VsrV!ut!9nfzk#utns#
rP!REMnf#Vnf#VRnfs#rP!RMnf#Vnf#Vknfs#rP!RMnf#VRM!xxMnf#Vnf#Vzknfs#rP!RNnf#VRN!xx
8Nnf#Vnf#Vknfs#rP!RNnf!9nf!9qfnflP!RNnf!9nf!9ifnflP!RSOnf!98f!9f!lsr!DV*DmV*DmVs
c*DsrnfD"D*Dnf*DnfI W!xuX*Dn&R6Xnf*DVRWnf*DVRW!x*Dnf*Dut3X*Dnf*DVR*DutnfR3X!ut!x
uX*DnfRuX!nfnf*DnfuL*Dsr"D!9!*DnfnfnfuL*DsrgnfRXnfuut*DsD*D!g9!ut!jO!xxPOnf!9nf!
9gnflP!ROnf!9nf!9!gnflP! ROnfnfonfsP!RPnfnf£onfsPrP!lnfD"Dnfut!un &unfutnfut!u"D
nfut !9!9nfRQn&RQnfutnfD"Dn&&!R7Qnfkutnf N A F B G C H D I EgutnfD"Dn&R4Y!x*Dn
f utnf#Vsrnf#VsrnfRYnfTsr*Dnf RY!RYsrmVs+Y p*&RY*&RY*&RZLW*&RZ pnfutLWnfRZnfRZnf
#Vnf#VRZsrnfV+pZZ!nfnfnfuLzXZnfRZnf#VVZnfzX*&RZ pYsnfut"D*DsD*D!9£sr*&/Rdc*&Rf*&
Rf*&u p£srnfutnf#Vsrn&/Rcnfnf#V#VJG c!&x!nfnf*uLsrf!unfD"DnfR ,d*Dn&Rdnfnf!!Ssrn
fs#re*Dn&Rdn&Rdn&Rdn&Rdn&Rd!ud!'xe*Dn&Rdn& Rd! ue*Dn&Rd!ue!(i!Vs#r!*DsUsrgnfRbnf
utgnfVs#r!!7nfut"DD"D!9nf#VR!x!9nf#VRn&nfnfnf#VuLsrCnfnfn &n&Ssr! 9!9**Dutnfnfn&
nfnf*uLs r!9!9!9*&R9 psrnf#VR!nf*Psr6nx"Dn&Ren&nfnf*uLsrnf#Vnf#VJG ae!&xnfsnfD"D
!+Res*Dn&#u#e*DnfRfnfRfnf#VR fnf#VRfnfoasr"D9cnfutD"D!9Dw+bfDw+4#g/w+fqf!9ffiwfD
i+Nwffwiwwijijgf#V/S /!nf*Psr6! xU*&RJ psr*&R*&R*&5R!*&u psrn&5R! nfnfMsr*&R!!!n
fnfsr!!!nfnfsrUnfut!9!9*&u*&3RX p*&Rx*Xsr#*&R*&RUsr p#*&R pcsr!!!7#*&R*R*Rg,MD!9
i!g2gjjjw#wj!9g!9gytg!g+qgig#!g#9!9ggkjg! 9jj2g!gi!gg!gDf! 9!gj!9j!gjjw#w2ij! 92
gw#g!9!92g#w#!g"i2i!B9!g.izhph!!!qh9i.ihwUih9iihUi!g#2ghhkjg!gDf!gig!B9h!B9j!9*+
U!"x#!#xn&3RK!nf*Psrnfut!9nf#V/S nf#V/S nf#Vnf#VJG n&nfnfnf#VuLs r!$xnfu t!9!9!9
2sr*&RV*&RV*&1RV*&RV*&#Ra*&u p2srn&R!!!nfnfsran&Rnfnf!!Ssran&1Ra!nfnfsr#*iw+iG&i
w++ii+iGMiRiiuiiSii2i82iiC'iiiiCo+iwjjj/i#ig#ORG+Ajj!9Jjbjpjjjjjjjjjjjj!#jjjj!9w
#!9! Cf!WCf2gj/0 $an&#R0a!nfnfsran&Ra!nfnfMsrnfut!9nfD"Dnf#VR)bnf!9nf!9ja!ut&b*
Dnf!9nf!9jb!ut&b!utb*Dnf#Vnf#VRb!utb*Dnf#Vnf#VRb!utb!ut*Dnfs#rnf!DlR!(#&*Dnfs#rn
fs#rnf !N!A!F!B!G!C!H!D!I!Efloat overflow $M!,9k,4k RkgiRYk,Ikok!ykRk!kzkEkgi+
kzkkkkEkgi+kkzkEk,kzkkkkEk,k!Rk!l!l8lkbkkk&ox/Wy/£xWy£xWy£NFVnfwwqpsrutyHGl # l!
9qm!"lR"l*lZm#V#*ll"l#Vlm+r+sm)DM))Ot!xu!#0u 0u))))O"uqHuhuu!#0kuku)))OSuu(!xu!x
!Tw#.qBKxu2!w#w#s#r##q#ptqr.uFq2ou$* + - / ) (*( , ... # & " 3'
*vw*lw#"lv*l#"l+vw+Gw+ v# 2vvvvG++vGv++vmvvvv"#V*lms#rmSl++m*llR"ll!9RCms#rxCm!
"l#VSl!lqm++8REL!nG!n/n#I#mTSnLInSnmRSnmUSnmESn!n2ywn2m!hw!mln2mm n/nu!mm!'n2.w#
"4"8"mw#"l2R"6my!om#nDMw##"#VvxERRMSG DAT ERROR $ WARNING $ (Last non-mark
was $) Type a to abort, e to edit, i to ignore space to continue$x'%$ p $wx
dx xx w0!w0 w#wyB802x!o!w*x!HwLx*m2*m"m+"m4r"mG my*m (#"mm))s#r#ms#rwmxC2wW"yGz
2w"yOo&"ymzyTwy! xm#kw)yAyEmmm3y*m,ozo!#"msooooO do#oAOo#Gm2mm2m!moRwO *mGomm
p&%'oq pa"p0p,pA0p0ps0ppt2bv!uOpGp# mpq hpmpZpr#kb)pppp#2q$pqL!pT!mRp!mpApq 2m
pq-p+psYq pbv2q!mO*m (. (*qZyI *m+"my zyo 4y#ym!wo!"y loading me$oMyy!0y y#y2.
!e!m+!xz2h2nyzy!y#!mymZymz(z)yEZy zzym Errors in compile - type e to edit, spa
ce to exit $ Compilation Complete $ME COMfile missing $+w+w2mmm!zn2m"mG!
mo2mno REL file $ms#rms#rm'-qqw#!qqqq!x2wR!w#w###sk&r!!##s#r!qq*qq*mq)q+q!Tw(qq
*q#qqqa !4*m#"m*m#"m2m rq2 q.r q24r*m#"mq8R,rSmrqq4r2qqQw*mm"mR r erirm#Jr8RxrJ
rrJrm m*8R4G!o*m6"m*m"m*4*m+"m*m+"mm!5! wr+2vG+!!omR1 SYMSYMSYMFILESLBR!E
a #!h#!Pw#*l"oDn!DlSo*lRSlS*o##"okA2kln2kD!loRG!d#a jx !G2#2xl2#F!l2DDD*lR)D(!Do
D*" *"* "+r!2#qs$s0CssACssaCssrso&t#V#N#FlssCs#2#bs2O!sqsBYDO$IF,IN/OF4OR5TOANDD
IV#END'FOR*MOD1NOT3SETVARACASE ELSE%EXIT(FROM+LOOP0THENTYPEWITHCARRAYBEGINCONST!
ELSIF&UNTILWHILEBEXPORT)IMPORT.MODULE2RECORD9REPEATRETURNPOINTER6PROCEDURE7QUALI
FIED8DEFINITION"IMPLEMENTATION-sssss"tLtTtTthtststststtr!w#qw0t ttt.uEu wrHuXu+!
BMuCMu#0u u "N"A"F"B"G"C"H"D"I"El1** rewriting SYM file ** $*"l* "!" !NM2OVL
000M2OVL 001FTL Modula-2 V1.30 Definition Module Compiler Copyright (C) 198
6, 1987, 1988 Dave Moore $no source $REL file error $no error file $#*3 '
! !9nf! nf#V"!u!utn&&ut!u* #Vsrnf#V* s#r"!9!!*"!u t!ut!ut!u!ut!ut "!!**s#r!!*"
!Mu t!ut!u!ut!ut "!"S!9! s#r* s!9! s#r* s!Y s#r!Rsr! V!V)+*&*6&)!Rsr!V!V)!+!!/!"
!S* #V* s#rc!9! s#r* " !Y s#r!Rsr!0V!V)+!RWsr!V!5V)+ ! !!!h!9! s#r!Yd s#r!!2srnf
snfs#r* "!u!u t!ut!ut"*"-*RK!+ RA!+RK*#"LOADER SYSTEM REAL$ OUTPUT DAT
! !9* #N#A#F#B#G#C#H#D#I#Enf#VsrnfRnf#VRnf#VsrnfRnfVs#r!!5!!9!RCsr!V!&V)+*V&*
Q&)!Rsr!Vnf)!+c!!/!9!Rsr!KV!6V)+!R7sr!UV!PV)+! !!9!9*ut!ut! ! !222 2!G7£o(! !$
q(a 2y Wp((2R8#!(Gw#2# .# WDEL V2.0 (C) 1987 HiSoft $Drive is R/O!$No matchin
g files$ Cannot delete!$ Delete (Y/N/A/Q/P) $*"QRhB8KGB h2!l #- #Q(B # 2mh2BF
!m ! ! !!Q(G2 !Q!LB!"L# B( -B qa 2b(1w(,y 2p(!B2(22BQB2#bk6"!F# #(h2(4!+6B#6A#
V6K"!#3 .s#2go" *#"!R02Kx(#(!x O! !jR0Ur+ x # A 022GO!-Q ++ (#2WP V2.2 (C) 198
7 HiSoft Buffer size $ $No files$ Open failed$ Disc I/O error (Full )$ to $ S
ame$ Copy (Y/N/A/Q/P) $ c((cGr+s+w""(w"#GH .HsH#2go"Q *#"!R02Kx(#Q"(!x "O!
!jR0Ur+ x # A 0G22GO!-++ ## #Q(B22WP V3.0 (C) 1987 HiSoft Buffer size $ $No f
iles$ Open failed$ Disc I/O error (Full )$ to $ Same$ Copy (Y/N/A/Q/P/B/W) $ L
nf#Vnf) #VRnf#utnf #VsrnfRnf#Vnf) s#rjnfVs#r*s*!9 N*ut N*ut!"k !" nfR!X !2!!!2 !
2!!nfRut*k "k * " &* "0!22nf))))))))V"V *k V "k !aN N*R!(#2t!uaN N*R!(#2y!aN*k "
k *k !*Rsr!2Vs+!ut! aN!ut!"!nf) 2! !2U2 ! 2"V####2X6 A!!e(G2 eG!eA. (+4(1nf( +
#M7NU2U(# .#!eGX8% (nfVutXNWEnfut!eGR(( X(#VR!nfRnf Vs#rnf"nfutnf!tnfRnfsnf#Vsr!
utnfR! nf! tnfRnfVs#ronfVs#rnfutnf#Vsrnf#Vnfs#rnf!Dnf!Lnf#Vsr!utnfRz!nf!tnfREnfV
s#rXnfVs#rnfutnf# 00P*Vnf"YG72KY28y( #kbG(M#.!NK!d Ur+ x # A 0!jR0SD V1.0 by Ad
am Denning (C) HiSoft 1986 $$ S$ $R $ $K Recs $ Disc free space $function i
sourc an Man librar formid drive designator $y2 List too long $ YN PL
EASE $N$A$F$B$G$C$H$D$I$E#Vsrnf#utnf #Vnf) s#rZ*utnfRnf#VsrnfRnfKnf#Vsrnf #Vsr
*"+*"-"error in mlprelSYSTEM REAL$ OUTPUT DAT!9!9*RD!!"!!m!!9! s#r!u*ut!ut!u
tnfutnfRFnf#VRFnf#VR!unR!*qn&Rnf Rnf ut*qn&Rnf R!"q!*s*"*utsrnfRJnfRJnf#Vsr*R*R*
Vs#r!"nfRnf#VVR!qnfms#rnf"mnf#V*ms#r*mVs#rn&2!9*R.$nf!nfs#rnf#Vq"q!u!ut"q!"f#Vnf
#VR$nfutnfutnfutnf #Vsrn& nfR*Ru!!!!(nf!!"nfutnfutnfR! #unfRnf#VRA!nf#Vsrn&n&!nf
nf#V!,0nf#VsrnfRnf#V#V+nf#Vs#rnf#VsrTnfRnf #VSnf #Vnf s#rn&!9!9nfR!*kynfy!y!*kyn
fy*ut! q"z*&RznfRnf#Vsrnf#Vsr*&R2z*&R! #un& *&Raz*&R*#V!s#r!1nfy*&R!#VJR7n& !#VJ
R!!9hk!qnfR4sr!V&y+nfRX!#Vyn& w! x!** "* s#r*y& 6*t& 6* us#rD* k s#r!!!!*(!!!*k
&R!!!*&!!!* #V* #V!Es#r!E#V!Es#r9!9!9*utnfRnf#VsrnfRnf#Vnf#VRnf#VR!nf!!!nf#V!nf#
Vsr1nf #Vsr*k "*#Vqy!#Vy*&Rz*&R!*&Rznf"!*kynfVy!9*& R*&'R*&%Rz*& R+z!9*qut#PS*Rw
!**D"!"!"*q"qnf"nf"nf""qnf"q!9!!97!!*ut!!7,nfq"q!u *ut*ut nfJR*qN*#V*qsr"q*snf"*
s!**"k *k !*R6!!**t& Q!!*u!*!!! main program linkageLOADER circular refs - ar
bitrarily selecting Data Size Code Size Data in Code Top Address rec
ompiled since !9!9*k ut*!&nfRnf"k *k **t&&*u*y&&nfR*ut*snf"*sss*s*&'R'*&R'*&%R'*
&R!*& Rz*&R!!**qutz! !+7*qnfu"u*ut *usr!unf#V""u! !+7!!7*ut!ut!4!7*&'R*&%RW*&Rz*
&%RzW!'!l7!*&'R!!gzs"s*qsq*q!9*&u!2*&u!2z***utnfnfRLnf"nf!b*nfutnfRnf! bnf#Vsr*n
futnfR5nf!bnf#Vsr*n fut"*&Rz!9!9!!F7! !!H7*)Y#VQ*&u!qut*R*q"qnfR8!2*qn&R!u!u!ut
*qn& %N%A%F%B%G%C%H%D%I%Eut!"*#"*)Ys#r!'!g7n&2nfs"s!u*ut *)Y#Vsr "s*+"nfutnf"n&
2q"q!9!!C7nfs"s,* Rw*#VRt!v*R!nfR**sutnf*sut**sut !!7,**sutnfR*FR*Fut*snf*r /!*s
nfFRnfnf sy*snfut !u*&R*qsr !*R!!*s"s!u!ut "sz**qut *qsr "qnfutsr!9nf#VdRk* RK!n
fs#r*#"nfs#r!9*oR*w& £nf!u!u!9!9!ut*&RnfR!!nf)s#r*sz*&Rt!qs*4s*sz,nf)#Vs#r!V R!u
n& !*snf ut*snf R*Lut*snf#Vnfs#r!u!!D7nfut"s!9!9*&R*utnfRnfs"sn&Rp!u!u!ut *sn&Rn
fut*&Rnfsr!A"s*&R!sr*&R !utnfs"s!ut !uz!!97!!*u"u!ut nfutnfut!!D7nf#ut*&Rz*&R!*&
R*&R*&R*&R*&9R*&R*&R!I8*&R1!Jz8!Kzsrnf"*&R!Lq !k!g*g"*kut*w& *oR!i!e*iut*e"!qut
*"nf+Rsrnf)#Vq"qnfutn&4Rn&u*& W*ut nf#V"nf#Vu "unf#ut*&R!nf+*sutnfR*BR*F*sut*B*s
ut*snf#Vsr "s!!7nfut!!9znfs*&Ranfs#r*&Rnfs#r*s"sn&Rn&Rn&Rn&Rn&R!N"s!tnfs"s*&R nf
s#r!4!7*ssr *snfRY!ut *snf#VR"**qut "q+nfiR£*"enfkR*"g*&R***Rn!9!9*ut!2!2*& h*&2
Rsz*#"*)Ys#r*+"*w& f!qs*ut!2zS*&!R£z!!7*&RS*&Rz*&RS*&ARLz*w& *oR! #£o2*d& &*& &!
2d!d"i!d"knf"*&R/*utS!2*&o2 *nf#VR#nf #Vgput "snfut*qnfRnfVs#r*qnfVs#r*qnfut*q!q
*qnfsnf#Ds#rnfs#r*qsq*q!9nfs"s! u!ut !ut "s!utz*&Rz*&RJ!qnfs"s*&AR!uz!*su!*sut*s
*ssr*sn& 2"s*&RGzz*& Rz& !znf"£jdU*R*R*R5*R!*R+!£o 5*R"B*R"!9nf#VRnf#VSnfs#r!9nf
R!utnf"*ut!9*& nf"n&&nfs#rn& !nfutq"q!9!9*&&!9R2sr!7Rsr!Rz!4!B7nfsnfs#rnfq"qnf L
RR! ut *qnf HRr!ut *qnf s"sn&R£n&R*snfV Rpnfs#rnf#VR!nfs#r!"s"qnfut!R6sr!6Rz!!h7
nfq"q! &N&A&F&B&G&C&H&D&I&E!R5nf R2nfJR!ut 2*R*ut!R*n&4RX*&u!Rm!R*R*unf£"!9*RY*
"n& *I*C*C*C*C**n&&!R.n&&!R4*C*C+!RK*C+!R!Rk*C+!R!R*C+! R*nf *sr nf "*R*"*C*nfut
*)Y#Vz*&Rzh!!7!9!*RR*R!ez* #Vsr!.!7*&RJ! !nfQ*R!3**ut*R3!!**Vs#rnfR3nfR3nfutnfz*
&RGzz*&Rze!*s**&.Rez*&R!9""!9*&u!2*&R!!*srnf""+!R!R+**ut +E!RE*CE*nf""*£!*)Y#VQ*
"*R!!*ut!ut*)Y#VR*)Ys#r*s#r"!9*o#VS*R*"*£*n&Ren & enfJRenf e*R* v*nf""*#VS*R*£*#
VS! *R*£*nz*&Rz!!7n&2*q"*R*#VS!9n& *)Ys#r*)Y#V* s#r*+"*"*+"*#"!9!"!2!2R!m*o"n f!
n"f#*nf"nf"nf"nf"*o#VS*o"*oR*o£*o *o"*#"*)Ys#r*)Y#V*o s#r*+"*o#VSo3*"o*#VSu**V s
#r" & R!"*RA! qA*#VS*R*£*R*"!u*wu*sr nf Rnf "*& *I*#VS*s*!9*q"dR!ut!!y!z*o"nfy*n
fy*nf y*nf"nfR"nfNR""*o"*&u!2*R*"*C*C*nf"n&*nf"!*C*nf"!2 SYMSYMSYMFILESLBR
!aII #!#!w#4*q"oy!qSUz*qRQSqS*o##"oQQ2yQ2!UzG!#a Q!G20#2Q20#F!42*qR)D(!Uz*" *"*
"qdU** rewriting SYM file ** $*"q* "*&u"r*o"!2*R*£! *"!"*R*£! q*#V*#VRx!*#VS1*
#VR*s#r*o"!"*#VS!2!ut"*&+Rz!2!2R'!Z!£z!.!7!"*os*&R! *o#VS*R*£! q*R!"*#VS*R! !mz*
&RzF*£jdU*R*R*R5*R!*R+!£o 5*R"B*R"!9nf#VRnf#VSnfs#r!9nfR!utnf"*ut!9*& nf"n&&!R5n
f R2nfJR!ut 2*R*ut!R*n&4RX*&u!Rm!R#"!2z!2*&RR)!Zz*o"*os*#"*)Ys#r*)Y#V*o s#r*+"*#
"z*&Rz!!7!9nfRnf#VnfRJnf Jnf#V*VRJnf£!*ut*RJ!!*Vs#rnf#Vsrz*&R!**ut*R!!**Vs#rnfRn
fRnf 'N'A'F'B'G'C'H'D'I'E*R*unf£"!9*RY*"n& *I*C*C*C*C**n&&!R.n&&!R4*C*C+!RK*C+!
R!Rk*C+!R!R*C+! R*nf *sr nf "*R*"*C*nf*srnf""+!R!R+**ut +E!RE*CE*nf""*£!*sr!.!7*
&RJ! !nfQ*R!3**ut*R3!!**Vs#rnfR3nfR3nfutnfz*&RGzz*&Rze!*s**&.Rez*&R!9""!9*&u!2*&
R!!z*&Rz!!7n&2*q"*R*#VS!9n& *)Ys#r*)Y)Y#VQ*"*R!!*ut!ut*)Y#VR*)Ys#r*s#r"!9*o#VS*R
*"*£*n&Ren & enfJRenf e*R* v*nf""*#VS*R*£*#VS! *R*£*n& R!"*RA! qA*#VS*R*£*R*"!u*
wu#V* s#r*+"*"*+"*#"!9!"!2!2R!m*o"n f!n"f#*nf"nf"nf"nf"*o#VS*o"*oR*o£*o *o"*#"*)
Ys#r*)Y#V*o s#r*+"*o#VSo3*"o*#VSu**V s#r" SYMSYMSYMFILESLBR!aII #!#!w#4*q
*sr nf Rnf "*& *I*#VS*s*!9*q"dR!ut!!y!z*o"nfy*nfy*nf y*nf"nfR"nfNR""*o"*&u!2*R*"
*C*C*nf"n&*nf"!*C*nf"!2*&u"r*o"!2*R*£! *"!"*R*£! q*#V*#V"oy!qSUz*qRQSqS*o##"oQQ2
yQ2!UzG!#a Q!G20#2Q20#F!42*qR)D(!Uz*" *"* "qdU** rewriting SYM file ** $*"q* "
SYMSYMSYMFILESLBR!aII #!#!w#4*qRx!*#VS1*#VR*s#r*o"!"*#VS!2!ut"*&+Rz!2!2R'
!Z!£z!.!7!"*os*&R! *o#VS*R*£! q*R!"*#VS*R! !mz*&RzF*#"!2z!2*&RR)!Zz*o"*os*#"*)Ys
#r*)Y#V*o stHIGH(Prec) THEN ErrorExit(' Prec table overflow') END PrecPrecCou
nt+1.NameName PrecPrecCount+1.DefModuleIsDEF i1 WHILE (Preci.NameName) OR (Pr
eci.DefModuleIsDEF) DO INC(i) END IF iPrecCount THEN PrecCounti WITH PrecPrec
Count DO DefModuleIsDEF ImportCount0 END END(*IF i*) RETURN i END FindModu
le PROCEDURE Compar(a,bADDRESS)BOOLEAN VARp,qPFileName BEGIN pPFileName(a)
qPFileName(b) RETURN pq END Compar#r*+"*#"z*&Rz!!7!9nfRnf#VnfRJnf Jnf#V*VRJnf£
!*ut*RJ!!*Vs#rnf#Vsrz*&R!**ut*R!!**Vs#rnfRnfRnfut*)Y#Vz*&Rzh!!7!9!*RR*R!ez* #V