DataMuseum.dk

top - metrics

    Length: 1228800 (0x12c000)
    Description: Bits:30010498 DVBS1.SW2103.src.1.8-1 Pascal TOOLS JTAS 1989-04-26 LEIF NIELSEN E.d.
    Types: 5¼" Floppy Disk, ImdContainer
    Notes: FatFS

FatFS

FatFS

0x000000…000040 (0, 0, 1)   BiosParamBlock {
0x000000…000040               bsJmp = eb3490	// 0x0 @0x0 
0x000000…000040               bsOem = »IBM  3.3«	// 0x3 @0x3 
0x000000…000040               bsBytesPerSec = 0x0200	// 0xb @0xb 
0x000000…000040               bsSectPerClust = 0x01	// 0xd @0xd 
0x000000…000040               bsResSectors = 0x0001	// 0xe @0xe 
0x000000…000040               bsFATS = 0x02	// 0x10 @0x10 
0x000000…000040               bsRootDirEnts = 0x00e0	// 0x11 @0x11 
0x000000…000040               bsSectors = 0x0960	// 0x13 @0x13 
0x000000…000040               bsMedia = 0xf9	// 0x15 @0x15 
0x000000…000040               bsFATsecs = 0x0007	// 0x16 @0x16 
0x000000…000040               bsSectPerTrack = 0x000f	// 0x18 @0x18 
0x000000…000040               bsHeads = 0x0002	// 0x1a @0x1a 
0x000000…000040               bsHiddenSecs = 0x00000000	// 0x1c @0x1c 
0x000000…000040               bpbHugeSectors = 0x00000000	// 0x20 @0x20 
0x000000…000040               bsBigFATsecs = 0x00000000	// 0x24 @0x24 
0x000000…000040               bsExtFlags = 0x0000	// 0x28 @0x28 
0x000000…000040               bsFsInfo = 0x0000	// 0x2a @0x2a 
0x000000…000040               bsRootClust = 0x12000000	// 0x2c @0x2c 
0x000000…000040               bsFSVers = 0x0000	// 0x30 @0x30 
0x000000…000040               bsBackup = 0x0000	// 0x32 @0x32 
0x000000…000040               bsReserved = »  Щ3└јл╝ |  «	// 0x34 @0x34 
0x000000…000040             }
0x000040…000060             bb 78 00 36 c5 37 1e 56 16 53 bf 2b 7c b9 0b 00 fc ac 26 80 3d 00 74 03 26 8a 05 aa 8a c4 e2 f1   ┆╗x 6┼7 V S┐+|╣  Чг&ђ= t &і фі─Ры┆
0x000060…000080             06 1f 89 47 02 c7 07 2b 7c fb cd 13 72 67 a0 10 7c 98 f7 26 16 7c 03 06 1c 7c 03 06 0e 7c a3 3f   ┆  ЅG К +|ч═ rgа |ўэ& |   |   |Б?┆
0x000080…0000a0             7c a3 37 7c b8 20 00 f7 26 11 7c 8b 1e 0b 7c 03 c3 48 f7 f3 01 06 37 7c bb 00 05 a1 3f 7c e8 9f   ┆|Б7|И  э& |І  | ├Hэз  7|╗  А?|УЪ┆
0x0000a0…0000c0             00 b8 01 02 e8 b3 00 72 19 8b fb b9 0b 00 be d4 7d f3 a6 75 0d 8d 7f 20 be df 7d b9 0b 00 f3 a6   ┆ И  У│ r Іч╣  Йн}здu Ї  Й▀}╣  зд┆
0x0000c0…0000e0             74 18 be 77 7d e8 6a 00 32 e4 cd 16 5e 1f 8f 04 8f 44 02 cd 19 be ba 7d eb eb a1 1c 05 33 d2 f7   ┆t Йw}Уj 2С═ ^ Ј ЈD ═ Й║}ввА  3мэ┆
0x0000e0…000100             36 0b 7c fe c0 a2 3c 7c a1 37 7c a3 3d 7c bb 00 07 a1 37 7c e8 49 00 a1 18 7c 2a 06 3b 7c 40 38   ┆6 |■└б<|А7|Б=|╗  А7|УI А |* ;|@8┆
0x000100…000120             06 3c 7c 73 03 a0 3c 7c 50 e8 4e 00 58 72 c6 28 06 3c 7c 74 0c 01 06 37 7c f7 26 0b 7c 03 d8 eb   ┆ <|s а<|PУN Xrк( <|t   7|э& | пв┆
0x000120…000140             d0 8a 2e 15 7c 8a 16 fd 7d 8b 1e 3d 7c ea 00 00 70 00 ac 0a c0 74 22 b4 0e bb 07 00 cd 10 eb f2   ┆лі. |і §}І =|Ж  p г └t"┤ ╗  ═ вЫ┆
0x000140…000160             33 d2 f7 36 18 7c fe c2 88 16 3b 7c 33 d2 f7 36 1a 7c 88 16 2a 7c a3 39 7c c3 b4 02 8b 16 39 7c   ┆3мэ6 |■┬ѕ ;|3мэ6 |ѕ *|Б9|├┤ І 9|┆
0x000160…000180             b1 06 d2 e6 0a 36 3b 7c 8b ca 86 e9 8a 16 fd 7d 8a 36 2a 7c cd 13 c3 0d 0a 44 69 73 6b 66 65 6a   ┆▒ мТ 6;|І╩єжі §}і6*|═ ├  Diskfej┆
0x000180…0001a0             6c 20 65 6c 6c 65 72 20 6d 61 6e 67 6c 65 6e 64 65 20 44 4f 53 0d 0a 41 6e 76 65 6e 64 20 44 4f   ┆l eller manglende DOS  Anvend DO┆
0x0001a0…0001c0             53 20 64 69 73 6b 20 6f 67 20 74 72 79 6b 20 70 86 20 45 4e 54 45 52 0d 0a 00 0d 0a 46 65 6a 6c   ┆S disk og tryk pє ENTER     Fejl┆
0x0001c0…0001e0             20 76 65 64 20 73 74 61 72 74 20 61 66 20 44 4f 53 0d 0a 00 49 42 4d 42 49 4f 20 20 43 4f 4d 49   ┆ ved start af DOS   IBMBIO  COMI┆
0x0001e0…000200             42 4d 44 4f 53 20 20 43 4f 4d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 55 aa   ┆BMDOS  COM                    Uф┆
0x000200…001000 (0, 0, 2)   ff9,fff,003,004,005,006,007,fff,009,fff,00b,00c,00d,00e,00f,010 // [0x0]
0x000200…001000             011,012,013,014,015,016,017,018,019,01a,01b,01c,01d,01e,01f,020 // [0x10]
0x000200…001000             021,022,023,024,025,026,027,028,029,02a,03f,02c,02d,02e,02f,030 // [0x20]
0x000200…001000             031,032,033,034,035,036,037,038,039,03a,fff,03c,03d,03e,fff,040 // [0x30]
0x000200…001000             041,042,043,fff,045,046,047,048,049,04a,04b,04c,04d,04e,04f,050 // [0x40]
0x000200…001000             051,052,053,054,055,056,057,058,059,fff,05b,05c,05d,05e,05f,064 // [0x50]
0x000200…001000             061,062,063,fff,065,066,067,068,0d8,000,000,06c,06d,06e,06f,070 // [0x60]
0x000200…001000             071,072,073,074,075,076,077,078,079,07a,07b,07c,fff,07e,07f,080 // [0x70]
0x000200…001000             081,082,fff,084,085,086,087,088,089,08a,08b,08c,08d,08e,08f,090 // [0x80]
0x000200…001000             091,092,093,094,095,096,097,098,099,09a,09b,09c,09d,09e,09f,0a0 // [0x90]
0x000200…001000             0a1,0a2,0a3,0a4,0a5,0a6,0a7,0a8,0a9,0aa,0ab,0ac,0ad,0ae,0af,0b0 // [0xa0]
0x000200…001000             0b1,0b2,0b3,0b4,0b5,0b6,0b7,0b8,0b9,0ba,0bb,0bc,0bd,0be,0bf,0c0 // [0xb0]
0x000200…001000             0c1,0c2,0c3,0c4,0c5,0c6,0c7,0c8,fff,0ca,0cb,0cc,0cd,0ce,0cf,0d0 // [0xc0]
0x000200…001000             0d1,0d2,0d3,0d4,0d5,0d6,0d7,fff,0d9,0da,fff,0dc,0dd,0de,0df,0e0 // [0xd0]
0x000200…001000             0e1,0e2,0e3,0e4,0e5,fff,0e7,fff,0e9,fff,fff,000,000,000,000,000 // [0xe0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0xf0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x100]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x110]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x120]
0x000200…001000             000,000,000,000,000,136,137,fff,000,000,000,000,000,000,000,000 // [0x130]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,14b,14c,14d,14e,14f,fff // [0x140]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x150]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x160]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x170]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x180]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,19d,19e,19f,1a0 // [0x190]
0x000200…001000             1a1,1a2,1a3,1a4,1a5,1a6,1a7,1a8,1a9,1aa,1ab,1ac,1ad,1ae,1af,1b0 // [0x1a0]
0x000200…001000             1b1,1b2,1b3,1b4,1b5,1b6,1b7,1b8,1b9,1ba,1bb,1bc,1bd,1be,1bf,1c0 // [0x1b0]
0x000200…001000             1c1,1c2,1c3,1c4,1c5,1c6,1c7,1c8,1c9,1ca,1cb,1cc,1cd,1ce,1cf,1d0 // [0x1c0]
0x000200…001000             1d1,1d2,1d3,1d4,1d5,1d6,1d7,1d8,1d9,1da,1db,1dc,1dd,1de,1df,1e0 // [0x1d0]
0x000200…001000             1e1,1e2,1e3,1e4,1e5,fff,000,000,000,000,000,000,000,000,000,000 // [0x1e0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x1f0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x200]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x210]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x220]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x230]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x240]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x250]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,26c,26d,26e,26f,270 // [0x260]
0x000200…001000             271,272,273,274,275,276,277,278,279,27a,27b,27c,27d,27e,27f,280 // [0x270]
0x000200…001000             281,282,283,284,285,286,287,288,289,28a,28b,28c,28d,28e,28f,fff // [0x280]
0x000200…001000             291,292,293,294,295,296,297,298,299,29a,29b,29c,29d,29e,29f,fff // [0x290]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x2a0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x2b0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x2c0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x2d0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x2e0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x2f0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,30f,310 // [0x300]
0x000200…001000             311,312,313,314,fff,316,317,318,319,31a,31b,31c,fff,31e,31f,320 // [0x310]
0x000200…001000             321,322,323,324,325,326,327,328,329,32a,32b,32c,32d,32e,32f,330 // [0x320]
0x000200…001000             331,332,333,334,335,336,337,338,339,33a,33b,33c,33d,33e,33f,340 // [0x330]
0x000200…001000             341,342,343,344,345,346,347,348,349,34a,34b,34c,34d,34e,34f,350 // [0x340]
0x000200…001000             351,352,353,354,355,356,357,fff,359,35a,35b,35c,35d,35e,35f,360 // [0x350]
0x000200…001000             361,362,363,364,fff,000,000,000,000,000,fff,000,000,36e,36f,370 // [0x360]
0x000200…001000             371,372,373,374,375,376,377,378,379,37a,37b,fff,37d,37e,fff,000 // [0x370]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x380]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x390]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x3a0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x3b0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x3c0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x3d0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x3e0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x3f0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x400]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x410]
0x000200…001000             000,000,000,424,425,426,427,428,429,42a,42b,42c,42d,42e,42f,430 // [0x420]
0x000200…001000             431,432,433,434,435,436,437,438,439,43a,43b,43c,43d,43e,43f,440 // [0x430]
0x000200…001000             441,442,443,444,445,446,447,448,449,44a,44b,fff,44d,44e,44f,450 // [0x440]
0x000200…001000             451,452,453,454,455,456,457,458,459,45a,45b,45c,45d,45e,45f,460 // [0x450]
0x000200…001000             461,462,463,464,465,466,467,fff,469,46a,46b,46c,46d,46e,46f,470 // [0x460]
0x000200…001000             471,472,473,474,475,476,477,478,479,47a,47b,47c,fff,47e,47f,480 // [0x470]
0x000200…001000             481,482,483,484,485,486,487,488,489,48a,48b,48c,48d,48e,48f,490 // [0x480]
0x000200…001000             491,492,493,494,495,496,497,498,499,49a,49b,49c,49d,49e,49f,4a0 // [0x490]
0x000200…001000             4a1,fff,4a3,4a4,4a5,4a6,4a7,4a8,4a9,4aa,4ab,4ac,4ad,4ae,4af,4b0 // [0x4a0]
0x000200…001000             4b1,4b2,4b3,4b4,4b5,4b6,4b7,4b8,4b9,4ba,4bb,4bc,4bd,4be,4bf,4c0 // [0x4b0]
0x000200…001000             4c1,4c2,4c3,4c4,4c5,4c6,4c7,4c8,4c9,4ca,4cb,4cc,4cd,4ce,4cf,4d0 // [0x4c0]
0x000200…001000             4d1,4d2,4d3,4d4,4d5,4d6,4d7,4d8,4d9,4da,4db,4dc,4dd,4de,4df,4e0 // [0x4d0]
0x000200…001000             4e1,4e2,4e3,4e4,4e5,4e6,4e7,4e8,4e9,4ea,4eb,4ec,4ed,4ee,4ef,4f0 // [0x4e0]
0x000200…001000             4f1,4f2,4f3,4f4,4f5,4f6,4f7,4f8,4f9,4fa,4fb,fff,4fd,4fe,4ff,500 // [0x4f0]
0x000200…001000             501,502,503,504,505,506,507,508,509,50a,50b,50c,50d,50e,50f,510 // [0x500]
0x000200…001000             511,512,513,514,515,516,517,518,519,51a,51b,51c,51d,51e,51f,520 // [0x510]
0x000200…001000             521,522,523,524,525,526,527,528,529,52a,52b,52c,52d,52e,52f,530 // [0x520]
0x000200…001000             531,532,533,534,535,536,537,538,539,53a,53b,53c,53d,53e,53f,540 // [0x530]
0x000200…001000             541,542,543,544,545,546,547,548,549,54a,54b,54c,54d,54e,54f,550 // [0x540]
0x000200…001000             551,552,553,554,555,556,557,558,559,55a,55b,55c,55d,55e,55f,560 // [0x550]
0x000200…001000             561,562,563,564,fff,566,567,568,569,56a,56b,56c,56d,56e,56f,570 // [0x560]
0x000200…001000             571,572,573,574,575,576,577,578,579,57a,57b,57c,57d,57e,57f,580 // [0x570]
0x000200…001000             581,582,583,584,585,586,587,588,589,58a,58b,58c,58d,58e,58f,590 // [0x580]
0x000200…001000             591,592,593,594,595,596,597,598,599,59a,59b,59c,59d,59e,59f,5a0 // [0x590]
0x000200…001000             5a1,5a2,5a3,5a4,5a5,5a6,5a7,5a8,5a9,5aa,5ab,5ac,5ad,5ae,5af,5b0 // [0x5a0]
0x000200…001000             5b1,5b2,5b3,5b4,5b5,5b6,5b7,5b8,5b9,5ba,5bb,5bc,5bd,5be,5bf,5c0 // [0x5b0]
0x000200…001000             5c1,5c2,5c3,5c4,5c5,5c6,5c7,5c8,5c9,5ca,5cb,5cc,5cd,5ce,5cf,5d0 // [0x5c0]
0x000200…001000             5d1,5d2,5d3,5d4,5d5,5d6,5d7,fff,5d9,5da,5db,5dc,5dd,5de,5df,5e0 // [0x5d0]
0x000200…001000             5e1,5e2,5e3,5e4,5e5,5e6,5e7,5e8,5e9,5ea,5eb,5ec,5ed,fff,000,000 // [0x5e0]
0x000200…001000             000,000,000,5f4,5f5,5f6,5f7,5f8,5f9,5fa,5fb,5fc,5fd,5fe,5ff,600 // [0x5f0]
0x000200…001000             601,602,603,604,605,606,607,608,609,60a,60b,60c,60d,60e,60f,610 // [0x600]
0x000200…001000             611,612,613,614,615,616,617,618,619,61a,61b,61c,61d,61e,61f,620 // [0x610]
0x000200…001000             621,622,623,624,625,fff,627,628,629,62a,62b,62c,62d,62e,62f,630 // [0x620]
0x000200…001000             631,632,633,634,635,636,637,638,639,63a,63b,63c,63d,63e,63f,640 // [0x630]
0x000200…001000             641,642,643,644,645,646,647,648,649,64a,64b,64c,64d,64e,64f,650 // [0x640]
0x000200…001000             651,652,653,654,655,656,657,658,fff,000,000,000,000,000,000,000 // [0x650]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x660]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x670]
0x000200…001000             000,000,000,000,000,686,687,688,689,68a,68b,68c,68d,68e,68f,690 // [0x680]
0x000200…001000             691,692,693,694,695,696,697,698,699,69a,69b,69c,69d,69e,69f,6a0 // [0x690]
0x000200…001000             6a1,6a2,6a3,6a4,6a5,6a6,6a7,6a8,6a9,6aa,6ab,6ac,6ad,6ae,6af,6b0 // [0x6a0]
0x000200…001000             6b1,6b2,6b3,6b4,6b5,6b6,6b7,fff,6b9,6ba,6bb,6bc,6bd,6be,6bf,6c0 // [0x6b0]
0x000200…001000             6c1,6c2,6c3,6c4,6c5,6c6,6c7,6c8,6c9,6ca,6cb,6cc,6cd,6ce,6cf,6d0 // [0x6c0]
0x000200…001000             6d1,6d2,6d3,6d4,6d5,6d6,6d7,6d8,6d9,6da,6db,6dc,6dd,6de,6df,6e0 // [0x6d0]
0x000200…001000             6e1,6e2,6e3,6e4,6e5,6e6,6e7,6e8,6e9,6ea,6eb,6ec,6ed,6ee,6ef,6f0 // [0x6e0]
0x000200…001000             6f1,6f2,6f3,6f4,6f5,6f6,6f7,6f8,6f9,6fa,6fb,6fc,6fd,6fe,6ff,700 // [0x6f0]
0x000200…001000             701,fff,703,704,705,706,707,708,709,70a,70b,70c,70d,70e,70f,710 // [0x700]
0x000200…001000             711,712,713,714,715,716,717,718,719,71a,71b,71c,71d,71e,71f,720 // [0x710]
0x000200…001000             721,722,723,724,725,726,727,728,729,72a,72b,72c,72d,72e,72f,730 // [0x720]
0x000200…001000             731,732,733,734,735,736,737,738,739,73a,73b,73c,73d,73e,73f,740 // [0x730]
0x000200…001000             741,742,743,744,745,746,747,748,749,74a,74b,74c,74d,74e,74f,750 // [0x740]
0x000200…001000             751,752,753,754,755,756,757,758,759,75a,75b,75c,75d,75e,75f,760 // [0x750]
0x000200…001000             761,762,763,764,765,766,767,fff,769,76a,76b,76c,76d,76e,76f,770 // [0x760]
0x000200…001000             771,772,773,774,775,776,777,778,779,77a,77b,77c,77d,77e,77f,780 // [0x770]
0x000200…001000             781,782,783,784,785,786,787,788,789,78a,78b,78c,78d,78e,78f,790 // [0x780]
0x000200…001000             791,792,793,794,795,796,797,798,799,79a,79b,79c,79d,79e,79f,7a0 // [0x790]
0x000200…001000             7a1,7a2,7a3,7a4,7a5,7a6,7a7,7a8,7a9,7aa,fff,7ac,7ad,7ae,7af,7b0 // [0x7a0]
0x000200…001000             7b1,7b2,7b3,7b4,7b5,7b6,7b7,7b8,7b9,7ba,7bb,7bc,7bd,7be,7bf,7c0 // [0x7b0]
0x000200…001000             7c1,7c2,7c3,7c4,7c5,7c6,7c7,7c8,7c9,7ca,7cb,7cc,7cd,7ce,7cf,7d0 // [0x7c0]
0x000200…001000             7d1,7d2,7d3,7d4,7d5,7d6,7d7,7d8,7d9,7da,7db,7dc,7dd,7de,7df,7e0 // [0x7d0]
0x000200…001000             7e1,7e2,7e3,7e4,7e5,7e6,7e7,7e8,7e9,7ea,7eb,7ec,fff,000,000,000 // [0x7e0]
0x000200…001000             fff,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x7f0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x800]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x810]
0x000200…001000             821,822,823,824,825,826,827,828,829,82a,82b,82c,82d,82e,82f,830 // [0x820]
0x000200…001000             831,832,833,834,835,836,837,838,839,83a,83b,83c,83d,83e,83f,840 // [0x830]
0x000200…001000             841,842,843,844,845,846,847,848,849,84a,84b,fff,000,000,000,000 // [0x840]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x850]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x860]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x870]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x880]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x890]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x8a0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x8b0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x8c0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x8d0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x8e0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x8f0]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x900]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x910]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x920]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x930]
0x000200…001000             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x940]
0x000200…001000             000,000,000,000,000,f90 // [0x950]
0x001000…001e00 (0, 0, 9)   ff9,fff,003,004,005,006,007,fff,009,fff,00b,00c,00d,00e,00f,010 // [0x0]
0x001000…001e00             011,012,013,014,015,016,017,018,019,01a,01b,01c,01d,01e,01f,020 // [0x10]
0x001000…001e00             021,022,023,024,025,026,027,028,029,02a,03f,02c,02d,02e,02f,030 // [0x20]
0x001000…001e00             031,032,033,034,035,036,037,038,039,03a,fff,03c,03d,03e,fff,040 // [0x30]
0x001000…001e00             041,042,043,fff,045,046,047,048,049,04a,04b,04c,04d,04e,04f,050 // [0x40]
0x001000…001e00             051,052,053,054,055,056,057,058,059,fff,05b,05c,05d,05e,05f,064 // [0x50]
0x001000…001e00             061,062,063,fff,065,066,067,068,0d8,000,000,06c,06d,06e,06f,070 // [0x60]
0x001000…001e00             071,072,073,074,075,076,077,078,079,07a,07b,07c,fff,07e,07f,080 // [0x70]
0x001000…001e00             081,082,fff,084,085,086,087,088,089,08a,08b,08c,08d,08e,08f,090 // [0x80]
0x001000…001e00             091,092,093,094,095,096,097,098,099,09a,09b,09c,09d,09e,09f,0a0 // [0x90]
0x001000…001e00             0a1,0a2,0a3,0a4,0a5,0a6,0a7,0a8,0a9,0aa,0ab,0ac,0ad,0ae,0af,0b0 // [0xa0]
0x001000…001e00             0b1,0b2,0b3,0b4,0b5,0b6,0b7,0b8,0b9,0ba,0bb,0bc,0bd,0be,0bf,0c0 // [0xb0]
0x001000…001e00             0c1,0c2,0c3,0c4,0c5,0c6,0c7,0c8,fff,0ca,0cb,0cc,0cd,0ce,0cf,0d0 // [0xc0]
0x001000…001e00             0d1,0d2,0d3,0d4,0d5,0d6,0d7,fff,0d9,0da,fff,0dc,0dd,0de,0df,0e0 // [0xd0]
0x001000…001e00             0e1,0e2,0e3,0e4,0e5,fff,0e7,fff,0e9,fff,fff,000,000,000,000,000 // [0xe0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0xf0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x100]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x110]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x120]
0x001000…001e00             000,000,000,000,000,136,137,fff,000,000,000,000,000,000,000,000 // [0x130]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,14b,14c,14d,14e,14f,fff // [0x140]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x150]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x160]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x170]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x180]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,19d,19e,19f,1a0 // [0x190]
0x001000…001e00             1a1,1a2,1a3,1a4,1a5,1a6,1a7,1a8,1a9,1aa,1ab,1ac,1ad,1ae,1af,1b0 // [0x1a0]
0x001000…001e00             1b1,1b2,1b3,1b4,1b5,1b6,1b7,1b8,1b9,1ba,1bb,1bc,1bd,1be,1bf,1c0 // [0x1b0]
0x001000…001e00             1c1,1c2,1c3,1c4,1c5,1c6,1c7,1c8,1c9,1ca,1cb,1cc,1cd,1ce,1cf,1d0 // [0x1c0]
0x001000…001e00             1d1,1d2,1d3,1d4,1d5,1d6,1d7,1d8,1d9,1da,1db,1dc,1dd,1de,1df,1e0 // [0x1d0]
0x001000…001e00             1e1,1e2,1e3,1e4,1e5,fff,000,000,000,000,000,000,000,000,000,000 // [0x1e0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x1f0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x200]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x210]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x220]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x230]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x240]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x250]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,26c,26d,26e,26f,270 // [0x260]
0x001000…001e00             271,272,273,274,275,276,277,278,279,27a,27b,27c,27d,27e,27f,280 // [0x270]
0x001000…001e00             281,282,283,284,285,286,287,288,289,28a,28b,28c,28d,28e,28f,fff // [0x280]
0x001000…001e00             291,292,293,294,295,296,297,298,299,29a,29b,29c,29d,29e,29f,fff // [0x290]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x2a0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x2b0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x2c0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x2d0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x2e0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x2f0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,30f,310 // [0x300]
0x001000…001e00             311,312,313,314,fff,316,317,318,319,31a,31b,31c,fff,31e,31f,320 // [0x310]
0x001000…001e00             321,322,323,324,325,326,327,328,329,32a,32b,32c,32d,32e,32f,330 // [0x320]
0x001000…001e00             331,332,333,334,335,336,337,338,339,33a,33b,33c,33d,33e,33f,340 // [0x330]
0x001000…001e00             341,342,343,344,345,346,347,348,349,34a,34b,34c,34d,34e,34f,350 // [0x340]
0x001000…001e00             351,352,353,354,355,356,357,fff,359,35a,35b,35c,35d,35e,35f,360 // [0x350]
0x001000…001e00             361,362,363,364,fff,000,000,000,000,000,fff,000,000,36e,36f,370 // [0x360]
0x001000…001e00             371,372,373,374,375,376,377,378,379,37a,37b,fff,37d,37e,fff,000 // [0x370]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x380]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x390]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x3a0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x3b0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x3c0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x3d0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x3e0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x3f0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x400]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x410]
0x001000…001e00             000,000,000,424,425,426,427,428,429,42a,42b,42c,42d,42e,42f,430 // [0x420]
0x001000…001e00             431,432,433,434,435,436,437,438,439,43a,43b,43c,43d,43e,43f,440 // [0x430]
0x001000…001e00             441,442,443,444,445,446,447,448,449,44a,44b,fff,44d,44e,44f,450 // [0x440]
0x001000…001e00             451,452,453,454,455,456,457,458,459,45a,45b,45c,45d,45e,45f,460 // [0x450]
0x001000…001e00             461,462,463,464,465,466,467,fff,469,46a,46b,46c,46d,46e,46f,470 // [0x460]
0x001000…001e00             471,472,473,474,475,476,477,478,479,47a,47b,47c,fff,47e,47f,480 // [0x470]
0x001000…001e00             481,482,483,484,485,486,487,488,489,48a,48b,48c,48d,48e,48f,490 // [0x480]
0x001000…001e00             491,492,493,494,495,496,497,498,499,49a,49b,49c,49d,49e,49f,4a0 // [0x490]
0x001000…001e00             4a1,fff,4a3,4a4,4a5,4a6,4a7,4a8,4a9,4aa,4ab,4ac,4ad,4ae,4af,4b0 // [0x4a0]
0x001000…001e00             4b1,4b2,4b3,4b4,4b5,4b6,4b7,4b8,4b9,4ba,4bb,4bc,4bd,4be,4bf,4c0 // [0x4b0]
0x001000…001e00             4c1,4c2,4c3,4c4,4c5,4c6,4c7,4c8,4c9,4ca,4cb,4cc,4cd,4ce,4cf,4d0 // [0x4c0]
0x001000…001e00             4d1,4d2,4d3,4d4,4d5,4d6,4d7,4d8,4d9,4da,4db,4dc,4dd,4de,4df,4e0 // [0x4d0]
0x001000…001e00             4e1,4e2,4e3,4e4,4e5,4e6,4e7,4e8,4e9,4ea,4eb,4ec,4ed,4ee,4ef,4f0 // [0x4e0]
0x001000…001e00             4f1,4f2,4f3,4f4,4f5,4f6,4f7,4f8,4f9,4fa,4fb,fff,4fd,4fe,4ff,500 // [0x4f0]
0x001000…001e00             501,502,503,504,505,506,507,508,509,50a,50b,50c,50d,50e,50f,510 // [0x500]
0x001000…001e00             511,512,513,514,515,516,517,518,519,51a,51b,51c,51d,51e,51f,520 // [0x510]
0x001000…001e00             521,522,523,524,525,526,527,528,529,52a,52b,52c,52d,52e,52f,530 // [0x520]
0x001000…001e00             531,532,533,534,535,536,537,538,539,53a,53b,53c,53d,53e,53f,540 // [0x530]
0x001000…001e00             541,542,543,544,545,546,547,548,549,54a,54b,54c,54d,54e,54f,550 // [0x540]
0x001000…001e00             551,552,553,554,555,556,557,558,559,55a,55b,55c,55d,55e,55f,560 // [0x550]
0x001000…001e00             561,562,563,564,fff,566,567,568,569,56a,56b,56c,56d,56e,56f,570 // [0x560]
0x001000…001e00             571,572,573,574,575,576,577,578,579,57a,57b,57c,57d,57e,57f,580 // [0x570]
0x001000…001e00             581,582,583,584,585,586,587,588,589,58a,58b,58c,58d,58e,58f,590 // [0x580]
0x001000…001e00             591,592,593,594,595,596,597,598,599,59a,59b,59c,59d,59e,59f,5a0 // [0x590]
0x001000…001e00             5a1,5a2,5a3,5a4,5a5,5a6,5a7,5a8,5a9,5aa,5ab,5ac,5ad,5ae,5af,5b0 // [0x5a0]
0x001000…001e00             5b1,5b2,5b3,5b4,5b5,5b6,5b7,5b8,5b9,5ba,5bb,5bc,5bd,5be,5bf,5c0 // [0x5b0]
0x001000…001e00             5c1,5c2,5c3,5c4,5c5,5c6,5c7,5c8,5c9,5ca,5cb,5cc,5cd,5ce,5cf,5d0 // [0x5c0]
0x001000…001e00             5d1,5d2,5d3,5d4,5d5,5d6,5d7,fff,5d9,5da,5db,5dc,5dd,5de,5df,5e0 // [0x5d0]
0x001000…001e00             5e1,5e2,5e3,5e4,5e5,5e6,5e7,5e8,5e9,5ea,5eb,5ec,5ed,fff,000,000 // [0x5e0]
0x001000…001e00             000,000,000,5f4,5f5,5f6,5f7,5f8,5f9,5fa,5fb,5fc,5fd,5fe,5ff,600 // [0x5f0]
0x001000…001e00             601,602,603,604,605,606,607,608,609,60a,60b,60c,60d,60e,60f,610 // [0x600]
0x001000…001e00             611,612,613,614,615,616,617,618,619,61a,61b,61c,61d,61e,61f,620 // [0x610]
0x001000…001e00             621,622,623,624,625,fff,627,628,629,62a,62b,62c,62d,62e,62f,630 // [0x620]
0x001000…001e00             631,632,633,634,635,636,637,638,639,63a,63b,63c,63d,63e,63f,640 // [0x630]
0x001000…001e00             641,642,643,644,645,646,647,648,649,64a,64b,64c,64d,64e,64f,650 // [0x640]
0x001000…001e00             651,652,653,654,655,656,657,658,fff,000,000,000,000,000,000,000 // [0x650]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x660]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x670]
0x001000…001e00             000,000,000,000,000,686,687,688,689,68a,68b,68c,68d,68e,68f,690 // [0x680]
0x001000…001e00             691,692,693,694,695,696,697,698,699,69a,69b,69c,69d,69e,69f,6a0 // [0x690]
0x001000…001e00             6a1,6a2,6a3,6a4,6a5,6a6,6a7,6a8,6a9,6aa,6ab,6ac,6ad,6ae,6af,6b0 // [0x6a0]
0x001000…001e00             6b1,6b2,6b3,6b4,6b5,6b6,6b7,fff,6b9,6ba,6bb,6bc,6bd,6be,6bf,6c0 // [0x6b0]
0x001000…001e00             6c1,6c2,6c3,6c4,6c5,6c6,6c7,6c8,6c9,6ca,6cb,6cc,6cd,6ce,6cf,6d0 // [0x6c0]
0x001000…001e00             6d1,6d2,6d3,6d4,6d5,6d6,6d7,6d8,6d9,6da,6db,6dc,6dd,6de,6df,6e0 // [0x6d0]
0x001000…001e00             6e1,6e2,6e3,6e4,6e5,6e6,6e7,6e8,6e9,6ea,6eb,6ec,6ed,6ee,6ef,6f0 // [0x6e0]
0x001000…001e00             6f1,6f2,6f3,6f4,6f5,6f6,6f7,6f8,6f9,6fa,6fb,6fc,6fd,6fe,6ff,700 // [0x6f0]
0x001000…001e00             701,fff,703,704,705,706,707,708,709,70a,70b,70c,70d,70e,70f,710 // [0x700]
0x001000…001e00             711,712,713,714,715,716,717,718,719,71a,71b,71c,71d,71e,71f,720 // [0x710]
0x001000…001e00             721,722,723,724,725,726,727,728,729,72a,72b,72c,72d,72e,72f,730 // [0x720]
0x001000…001e00             731,732,733,734,735,736,737,738,739,73a,73b,73c,73d,73e,73f,740 // [0x730]
0x001000…001e00             741,742,743,744,745,746,747,748,749,74a,74b,74c,74d,74e,74f,750 // [0x740]
0x001000…001e00             751,752,753,754,755,756,757,758,759,75a,75b,75c,75d,75e,75f,760 // [0x750]
0x001000…001e00             761,762,763,764,765,766,767,fff,769,76a,76b,76c,76d,76e,76f,770 // [0x760]
0x001000…001e00             771,772,773,774,775,776,777,778,779,77a,77b,77c,77d,77e,77f,780 // [0x770]
0x001000…001e00             781,782,783,784,785,786,787,788,789,78a,78b,78c,78d,78e,78f,790 // [0x780]
0x001000…001e00             791,792,793,794,795,796,797,798,799,79a,79b,79c,79d,79e,79f,7a0 // [0x790]
0x001000…001e00             7a1,7a2,7a3,7a4,7a5,7a6,7a7,7a8,7a9,7aa,fff,7ac,7ad,7ae,7af,7b0 // [0x7a0]
0x001000…001e00             7b1,7b2,7b3,7b4,7b5,7b6,7b7,7b8,7b9,7ba,7bb,7bc,7bd,7be,7bf,7c0 // [0x7b0]
0x001000…001e00             7c1,7c2,7c3,7c4,7c5,7c6,7c7,7c8,7c9,7ca,7cb,7cc,7cd,7ce,7cf,7d0 // [0x7c0]
0x001000…001e00             7d1,7d2,7d3,7d4,7d5,7d6,7d7,7d8,7d9,7da,7db,7dc,7dd,7de,7df,7e0 // [0x7d0]
0x001000…001e00             7e1,7e2,7e3,7e4,7e5,7e6,7e7,7e8,7e9,7ea,7eb,7ec,fff,000,000,000 // [0x7e0]
0x001000…001e00             fff,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x7f0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x800]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x810]
0x001000…001e00             821,822,823,824,825,826,827,828,829,82a,82b,82c,82d,82e,82f,830 // [0x820]
0x001000…001e00             831,832,833,834,835,836,837,838,839,83a,83b,83c,83d,83e,83f,840 // [0x830]
0x001000…001e00             841,842,843,844,845,846,847,848,849,84a,84b,fff,000,000,000,000 // [0x840]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x850]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x860]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x870]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x880]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x890]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x8a0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x8b0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x8c0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x8d0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x8e0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x8f0]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x900]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x910]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x920]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x930]
0x001000…001e00             000,000,000,000,000,000,000,000,000,000,000,000,000,000,000,000 // [0x940]
0x001000…001e00             000,000,000,000,000,550 // [0x950]
0x001e00…001e20 (0, 1, 1)   DirEnt {name=»UNITS      «, attr=0x10, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x73b1, mdate=0x129a, cluster=0x036a, length=0x00000000}
0x001e20…001e40             DirEnt {name=»CHRCONV EXE«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x74c3, mdate=0x129a, cluster=0x05f3, length=0x000065b0}
0x001e40…001e60             DirEnt {name=»CHRCONV HLP«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x9325, mdate=0x1299, cluster=0x0002, length=0x00000c00}
0x001e60…001e80             DirEnt {name=»CHRCONV PAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x73fa, mdate=0x129a, cluster=0x0423, length=0x000050af}
0x001e80…001ea0             DirEnt {name=»COMPARE DOC«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x68ac, mdate=0x129a, cluster=0x002b, length=0x00001f80}
0x001ea0…001ec0             DirEnt {name=»COMPARE EXE«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x74dd, mdate=0x129a, cluster=0x0685, length=0x00006410}
0x001ec0…001ee0             DirEnt {name=»COMPARE HLP«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x6c43, mdate=0x1299, cluster=0x003b, length=0x00000680}
0x001ee0…001f00             DirEnt {name=»COMPARE PAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x742a, mdate=0x129a, cluster=0x047d, length=0x0000494b}
0x001f00…001f20             DirEnt {name=»COUNTCH EXE«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x74cb, mdate=0x129a, cluster=0x0626, length=0x000064c0}
0x001f20…001f40             DirEnt {name=»COUNTCH HLP«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x9b2c, mdate=0x1292, cluster=0x0060, length=0x00000700}
0x001f40…001f60             DirEnt {name=»COUNTCH PAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x7406, mdate=0x129a, cluster=0x044c, length=0x000037ee}
0x001f60…001f80             DirEnt {name=»CROSS   EXE«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x74f9, mdate=0x129a, cluster=0x0702, length=0x0000cb90}
0x001f80…001fa0             DirEnt {name=»CROSS   HLP«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x69c5, mdate=0x1299, cluster=0x007d, length=0x00000a80}
0x001fa0…001fc0             DirEnt {name=»CROSS   ORG«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x658b, mdate=0x1170, cluster=0x0083, length=0x00008c00}
0x001fc0…001fe0             DirEnt {name=»CROSS   PAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x744b, mdate=0x129a, cluster=0x04fc, length=0x0000d138}
0x001fe0…002000             DirEnt {name=»FILEDUMPEXE«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x759a, mdate=0x129a, cluster=0x0820, length=0x000057b0}
0x002000…002020 (0, 1, 2)   DirEnt {name=»FILEDUMPHLP«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0xa183, mdate=0x1292, cluster=0x0135, length=0x00000600}
0x002020…002040             DirEnt {name=»FILEDUMPPAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x7415, mdate=0x129a, cluster=0x0468, length=0x00002892}
0x002040…002060             DirEnt {name=»FRC8    CHT«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0xa2b0, mdate=0x1292, cluster=0x00e8, length=0x0000021d}
0x002060…002080             DirEnt {name=»INDENT  EXE«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x74ec, mdate=0x129a, cluster=0x06b8, length=0x000093c0}
0x002080…0020a0             DirEnt {name=»INDENT  HLP«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x6920, mdate=0x1299, cluster=0x014a, length=0x00000b80}
0x0020a0…0020c0             DirEnt {name=»INDENT  ORG«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x64ab, mdate=0x1170, cluster=0x019c, length=0x00009400}
0x0020c0…0020e0             DirEnt {name=»INDENT  PAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x743a, mdate=0x129a, cluster=0x04a2, length=0x0000b359}
0x0020e0…002100             DirEnt {name=»PASCF1  PAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x7478, mdate=0x129a, cluster=0x05d8, length=0x00002ab2}
0x002100…002120             DirEnt {name=»PASCFORMDOC«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x65f0, mdate=0x129a, cluster=0x026b, length=0x00004980}
0x002120…002140             DirEnt {name=»PASCFORMEXE«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x750f, mdate=0x129a, cluster=0x0768, length=0x00008580}
0x002140…002160             DirEnt {name=»PASCFORMHLP«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0xa761, mdate=0x1299, cluster=0x0290, length=0x00002000}
0x002160…002180             DirEnt {name=»PASCFORMPAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x746e, mdate=0x129a, cluster=0x0565, length=0x0000e587}
0x002180…0021a0             DirEnt {name=»PASCROSSDOC«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0xa8b6, mdate=0x1299, cluster=0x030e, length=0x00000d80}
0x0021a0…0021c0             DirEnt {name=»PASCROSSEXE«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x7518, mdate=0x129a, cluster=0x07ab, length=0x00008360}
0x0021c0…0021e0             DirEnt {name=»PASCROSSHLP«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x9f19, mdate=0x1299, cluster=0x0315, length=0x00000f80}
0x0021e0…002200             DirEnt {name=»PASCROSSPAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x4f70, mdate=0x129a, cluster=0x031d, length=0x00007539}
0x002200…002220 (0, 1, 3)   DirEnt {name=»TOOLS   DOC«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x65ac, mdate=0x129a, cluster=0x0358, length=0x00001880}
0x002220…002240             DirEnt {name=»TPC     CFG«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x7577, mdate=0x129a, cluster=0x07f0, length=0x0000000e}
0x002240…002260             DirEnt {name=»TRC8    CHT«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0xa278, mdate=0x1292, cluster=0x00ea, length=0x0000019c}
0x002260…002280             DirEnt {name=»UCC     CHT«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0xa2db, mdate=0x1292, cluster=0x00e6, length=0x0000025b}
0x002280…0022a0             DirEnt {name=»тANONISKWS «, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x78e2, mdate=0x1177, cluster=0x023e, length=0x00000400}
0x0022a0…0022c0             DirEnt {name=»тEYW    TXT«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0xa5e9, mdate=0x126c, cluster=0x0240, length=0x000016d9}
0x0022c0…0022e0             DirEnt {name=»тOK7REL WS «, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x83c1, mdate=0x1177, cluster=0x024c, length=0x00000680}
0x0022e0…002300             DirEnt {name=»тOOKSTRPPAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x9a9a, mdate=0x122c, cluster=0x0250, length=0x00000c70}
0x002300…002320             DirEnt {name=»тP5     PCK«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x74b7, mdate=0x129a, cluster=0x05f0, length=0x000004b1}
0x002320…002340             DirEnt {name=»тPC     BAK«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x4b13, mdate=0x1048, cluster=0x05ee, length=0x00000024}
0x002340…002360             DirEnt {name=»тPC     CFG«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x74b4, mdate=0x129a, cluster=0x05ef, length=0x00000010}
0x002360…002380             DirEnt {name=»тOV     INC«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x7a50, mdate=0x1298, cluster=0x0368, length=0x00000075}
0x002380…0023a0             DirEnt {name=»тOV     PAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x7e1b, mdate=0x1298, cluster=0x0369, length=0x00000085}
0x0023a0…0023c0             DirEnt {name=»           «, attr=0x00, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x0000, mdate=0x0000, cluster=0x0000, length=0x00000000}
                            […0xb2…]
0x003a00…003c00 (0, 1, 15)  Cluster(CHRCONV HLP)
                            […0x5…]
0x004600…004800 (1, 0, 6)   Cluster(BYTEIO  PAS)
                            […0x1…]
0x004a00…004c00 (1, 0, 8)   Cluster(DOSUTIL PAS)
                            […0x20…]
0x008c00…008e00 (2, 0, 11)  Cluster(COMPARE DOC)
                            […0xf…]
0x00ac00…00ae00 (2, 1, 12)  Cluster(COMPARE HLP)
                            […0x3…]
0x00b400…00b600 (3, 0, 1)   Cluster(DOSUTIL PAS)
                            […0x4…]
0x00be00…00c000 (3, 0, 6)   Cluster(DOSUTIL TPU)
                            […0x15…]
0x00ea00…00ec00 (3, 1, 13)  Cluster(PARAM   TPU)
                            […0x5…]
0x00f600…00f800 (4, 0, 4)   Cluster(COUNTCH HLP)
                            […0x3…]
0x00fe00…010000 (4, 0, 8)   Cluster(PARAM   TPU)
                            […0x4…]
0x010800…010820 (4, 0, 13)  20 20 55 4e 49 54 20 46 69 6c 65 4e 61 6d 65 3b 0d 0a 20 0d 0a 20 20 55 53 45 53 0d 0a 20 20 20   ┆  UNIT FileName;       USES     ┆
0x010820…010840             20 44 6f 73 2c 0d 0a 20 20 20 20 44 6f 73 55 74 69 6c 3b 0d 0a 20 0d 0a 20 20 20 20 49 4e 54 45   ┆ Dos,      DosUtil;         INTE┆
0x010840…010860             52 46 41 43 45 0d 0a 20 0d 0a 20 20 54 59 50 45 0d 0a 20 20 20 20 53 70 65 63 54 79 70 65 20 3d   ┆RFACE       TYPE      SpecType =┆
0x010860…010880             20 28 46 75 6c 6c 53 70 65 63 2c 20 57 69 6c 64 43 61 72 64 2c 20 55 6e 53 70 65 63 29 3b 0d 0a   ┆ (FullSpec, WildCard, UnSpec);  ┆
0x010880…0108a0             20 20 20 20 4e 61 6d 65 54 79 70 65 20 3d 20 52 45 43 4f 52 44 0d 0a 20 20 20 20 20 20 20 20 20   ┆    NameType = RECORD           ┆
0x0108a0…0108c0             20 20 20 20 20 20 20 20 20 44 72 69 76 65 4e 61 6d 65 20 3a 20 63 68 61 72 3b 0d 0a 20 20 20 20   ┆         DriveName : char;      ┆
0x0108c0…0108e0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 72 69 76 65 53 70 65 63 20 3a 20 53 70 65 63 54 79   ┆              DriveSpec : SpecTy┆
0x0108e0…010900             70 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 61 74 68 4e 61 6d 65 20   ┆pe;                    PathName ┆
0x010900…010920             3a 20 53 54 52 49 4e 47 5b 36 33 5d 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆: STRING[63];                   ┆
0x010920…010940             20 50 61 74 68 53 70 65 63 20 3a 20 53 70 65 63 54 79 70 65 3b 0d 0a 20 20 20 20 20 20 20 20 20   ┆ PathSpec : SpecType;           ┆
0x010940…010960             20 20 20 20 20 20 20 20 20 46 69 6c 65 4e 61 6d 65 20 3a 20 53 54 52 49 4e 47 5b 38 5d 3b 0d 0a   ┆         FileName : STRING[8];  ┆
0x010960…010980             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 69 6c 65 53 70 65 63 20 3a 20 53 70 65   ┆                  FileSpec : Spe┆
0x010980…0109a0             63 54 79 70 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 78 74 4e 61 6d   ┆cType;                    ExtNam┆
0x0109a0…0109c0             65 20 3a 20 53 54 52 49 4e 47 5b 33 5d 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆e : STRING[3];                  ┆
0x0109c0…0109e0             20 20 45 78 74 54 79 70 65 20 3a 20 53 70 65 63 54 79 70 65 3b 0d 0a 20 20 20 20 20 20 20 20 20   ┆  ExtType : SpecType;           ┆
0x0109e0…010a00             20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 0d 0a 20 20 46 55 4e 43 54 49 4f 4e 20 46 69 6c 65 4e 61   ┆      END;       FUNCTION FileNa┆
0x010a00…010a20 (4, 0, 14)  6d 65 41 6e 61 6c 79 73 65 28 20 49 6e 4e 61 6d 65 20 3a 20 53 54 52 49 4e 47 3b 20 56 41 52 20   ┆meAnalyse( InName : STRING; VAR ┆
0x010a20…010a40             52 65 73 20 3a 20 4e 61 6d 65 54 79 70 65 20 29 20 3a 20 62 6f 6f 6c 65 61 6e 3b 0d 0a 20 20 20   ┆Res : NameType ) : boolean;     ┆
0x010a40…010a60             20 20 20 7b 20 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 61 6e 61 6c 79 73 65 73 20 61 6e 20 69 6e   ┆   { The function analyses an in┆
0x010a60…010a80             70 75 74 20 73 74 72 69 6e 67 20 22 49 6e 4e 61 6d 65 22 20 74 6f 20 64 65 74 65 63 74 20 77 68   ┆put string "InName" to detect wh┆
0x010a80…010aa0             65 74 68 65 72 20 69 74 20 69 73 20 7d 0d 0a 20 20 20 20 20 20 7b 20 61 20 76 61 6c 69 64 20 66   ┆ether it is }        { a valid f┆
0x010aa0…010ac0             69 6c 65 6e 61 6d 65 20 73 70 65 63 69 66 69 63 61 74 69 6f 6e 2c 20 61 63 63 6f 72 64 69 6e 67   ┆ilename specification, according┆
0x010ac0…010ae0             20 74 6f 20 74 68 65 20 72 75 6c 65 73 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d   ┆ to the rules:                } ┆
0x010ae0…010b00             0a 20 0d 0a 20 0d 0a 9b c4 49 9d e4 49 9f 04 4a a1 f4 ff a3 44 4a a5 64 4a a7 84 4a a9 a4 4a ab   ┆       Џ─IЮСIЪ JАЗ БDJЦdJДёJЕцJФ┆
0x010b00…010b20             c4 4a ad e4 4a af 04 4b b1 24 4b b3 44 4b b5 64 4b b7 84 4b b9 a4 4b bb c4 4b bd e4 4b bf 04 4c   ┆─JГСJ» K▒$K│DKхdKиёK╣цK╗─KйСK┐ L┆
0x010b20…010b40             c1 24 4c c3 44 4c c5 64 4c c7 84 4c c9 a4 4c cb c4 4c cd e4 4c cf 04 4d d1 24 4d d3 44 4d d5 64   ┆┴$L├DL┼dLКёL╔цL╦─L═СL¤ MЛ$MМDMНd┆
0x010b40…010b60             4d d7 84 4d d9 a4 4d db c4 4d dd e4 4d df 04 4e e1 24 4e e3 44 4e e5 64 4e e7 84 4e e9 a4 4e eb   ┆MОёM┘цM█─MПСM▀ Nр$NсDNтdNуёNжцNв┆
0x010b60…010b80             c4 4e ed e4 4e ef 04 4f f1 24 4f f3 44 4f f5 64 4f f7 84 4f f9 a4 4f fb f4 ff fd e4 4f ff 04 50   ┆─NьСN№ Oы$OзDOшdOэёOщцOчЗ §СO  P┆
0x010b80…010ba0             01 25 50 03 45 50 05 65 50 07 85 50 09 a5 50 0b c5 50 0d e5 50 0f 05 51 11 25 51 13 45 51 15 65   ┆ %P EP eP ЁP ЦP ┼P тP  Q %Q EQ e┆
0x010ba0…010bc0             51 17 85 51 19 a5 51 1b c5 51 1d e5 51 1f 05 52 21 25 52 23 45 52 25 65 52 27 85 52 29 a5 52 2b   ┆Q ЁQ ЦQ ┼Q тQ  R!%R#ER%eR'ЁR)ЦR+┆
0x010bc0…010be0             c5 52 2d e5 52 2f 05 53 31 25 53 33 45 53 35 65 53 37 85 53 39 a5 53 3b c5 53 3d e5 53 3f 05 54   ┆┼R-тR/ S1%S3ES5eS7ЁS9ЦS;┼S=тS? T┆
0x010be0…010c00             41 25 54 43 45 54 45 65 54 47 85 54 49 a5 54 4b c5 54 4d e5 54 4f 05 55 51 25 55 53 45 55 55 65   ┆A%TCETEeTGЁTIЦTK┼TMтTO UQ%USEUUe┆
0x010c00…010e00 (4, 0, 15)  Cluster(PARAM   PAS)
                            […0x11…]
0x013000…013200 (5, 0, 3)   Cluster(CROSS   HLP)
                            […0x5…]
0x013c00…013e00 (5, 0, 9)   Cluster(CROSS   ORG)
                            […0x45…]
0x01c800…01ca00 (7, 1, 4)   Cluster(HELP    PAS)
                            […0xe…]
0x01e600…01e800 (8, 0, 4)   Cluster(PARAM   TPU)
                            […0x2…]
0x01ec00…01ee00 (8, 0, 7)   Cluster(HELP    TPU)
                            […0xa…]
0x020200…020400 (8, 1, 3)   Cluster(UCC     CHT)
                            […0x1…]
0x020600…020800 (8, 1, 5)   Cluster(FRC8    CHT)
                            […0x1…]
0x020a00…020c00 (8, 1, 7)   Cluster(TRC8    CHT)
0x020c00…020c20 (8, 1, 8)   45 58 54 45 52 4e 41 4c 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b   ┆EXTERNAL '; i := i + 1;        k┆
0x020c20…020c40             65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 46 4f 52 20 20 20 20 20 20 27 3b 20 69 20 3a 3d 20 69   ┆ey_tab[i] := 'FOR      '; i := i┆
0x020c40…020c60             20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 46 4f 52 57   ┆ + 1;        key_tab[i] := 'FORW┆
0x020c60…020c80             41 52 44 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74   ┆ARD  '; i := i + 1;        key_t┆
0x020c80…020ca0             61 62 5b 69 5d 20 3a 3d 20 27 46 55 4e 43 54 49 4f 4e 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31   ┆ab[i] := 'FUNCTION '; i := i + 1┆
0x020ca0…020cc0             3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 47 4f 54 4f 20 20 20 20   ┆;        key_tab[i] := 'GOTO    ┆
0x020cc0…020ce0             20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69   ┆ '; i := i + 1;        key_tab[i┆
0x020ce0…020d00             5d 20 3a 3d 20 27 49 46 20 20 20 20 20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20   ┆] := 'IF       '; i := i + 1;   ┆
0x020d00…020d20             20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 49 4e 20 20 20 20 20 20 20 27 3b 20   ┆     key_tab[i] := 'IN       '; ┆
0x020d20…020d40             69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d   ┆i := i + 1;        key_tab[i] :=┆
0x020d40…020d60             20 27 49 4e 53 50 45 43 54 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20   ┆ 'INSPECT  '; i := i + 1;       ┆
0x020d60…020d80             20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 4c 4f 43 4b 20 20 20 20 20 27 3b 20 69 20 3a 3d   ┆ key_tab[i] := 'LOCK     '; i :=┆
0x020d80…020da0             20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 4c 4f   ┆ i + 1;        key_tab[i] := 'LO┆
0x020da0…020dc0             43 4b 42 55 46 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79   ┆CKBUF  '; i := i + 1;        key┆
0x020dc0…020de0             5f 74 61 62 5b 69 5d 20 3a 3d 20 27 4c 4f 43 4b 44 41 54 41 20 27 3b 20 69 20 3a 3d 20 69 20 2b   ┆_tab[i] := 'LOCKDATA '; i := i +┆
0x020de0…020e00             20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 4c 4f 43 4b 4d 45   ┆ 1;        key_tab[i] := 'LOCKME┆
0x020e00…020e20 (8, 1, 9)   53 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62   ┆S  '; i := i + 1;        key_tab┆
0x020e20…020e40             5b 69 5d 20 3a 3d 20 27 4c 4f 4f 50 20 20 20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d   ┆[i] := 'LOOP     '; i := i + 1; ┆
0x020e40…020e60             0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 4d 4f 44 20 20 20 20 20 20 27   ┆       key_tab[i] := 'MOD      '┆
0x020e60…020e80             3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20   ┆; i := i + 1;        key_tab[i] ┆
0x020e80…020ea0             3a 3d 20 27 4e 4f 54 20 20 20 20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20   ┆:= 'NOT      '; i := i + 1;     ┆
0x020ea0…020ec0             20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 4f 46 20 20 20 20 20 20 20 27 3b 20 69 20   ┆   key_tab[i] := 'OF       '; i ┆
0x020ec0…020ee0             3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27   ┆:= i + 1;        key_tab[i] := '┆
0x020ee0…020f00             4f 52 20 20 20 20 20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b   ┆OR       '; i := i + 1;        k┆
0x020f00…020f20             65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 4f 54 48 45 52 57 49 53 45 27 3b 20 69 20 3a 3d 20 69   ┆ey_tab[i] := 'OTHERWISE'; i := i┆
0x020f20…020f40             20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 50 41 43 4b   ┆ + 1;        key_tab[i] := 'PACK┆
0x020f40…020f60             45 44 20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74   ┆ED   '; i := i + 1;        key_t┆
0x020f60…020f80             61 62 5b 69 5d 20 3a 3d 20 27 50 52 4f 43 45 44 55 52 45 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31   ┆ab[i] := 'PROCEDURE'; i := i + 1┆
0x020f80…020fa0             3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 50 52 4f 47 52 41 4d 20   ┆;        key_tab[i] := 'PROGRAM ┆
0x020fa0…020fc0             20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69   ┆ '; i := i + 1;        key_tab[i┆
0x020fc0…020fe0             5d 20 3a 3d 20 27 52 45 43 4f 52 44 20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20   ┆] := 'RECORD   '; i := i + 1;   ┆
0x020fe0…021000             20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 52 45 47 49 4f 4e 20 20 20 27 3b 20   ┆     key_tab[i] := 'REGION   '; ┆
0x021000…021020 (8, 1, 10)  69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d   ┆i := i + 1;        key_tab[i] :=┆
0x021020…021040             20 27 52 45 50 45 41 54 20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20   ┆ 'REPEAT   '; i := i + 1;       ┆
0x021040…021060             20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 53 45 54 20 20 20 20 20 20 27 3b 20 69 20 3a 3d   ┆ key_tab[i] := 'SET      '; i :=┆
0x021060…021080             20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 53 48   ┆ i + 1;        key_tab[i] := 'SH┆
0x021080…0210a0             41 52 45 44 20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79   ┆ARED   '; i := i + 1;        key┆
0x0210a0…0210c0             5f 74 61 62 5b 69 5d 20 3a 3d 20 27 53 48 49 46 54 20 20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b   ┆_tab[i] := 'SHIFT    '; i := i +┆
0x0210c0…0210e0             20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 54 48 45 4e 20 20   ┆ 1;        key_tab[i] := 'THEN  ┆
0x0210e0…021100             20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62   ┆   '; i := i + 1;        key_tab┆
0x021100…021120             5b 69 5d 20 3a 3d 20 27 54 4f 20 20 20 20 20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d   ┆[i] := 'TO       '; i := i + 1; ┆
0x021120…021140             0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 54 59 50 45 20 20 20 20 20 27   ┆       key_tab[i] := 'TYPE     '┆
0x021140…021160             3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20   ┆; i := i + 1;        key_tab[i] ┆
0x021160…021180             3a 3d 20 27 55 4e 54 49 4c 20 20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20   ┆:= 'UNTIL    '; i := i + 1;     ┆
0x021180…0211a0             20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 56 41 52 20 20 20 20 20 20 27 3b 20 69 20   ┆   key_tab[i] := 'VAR      '; i ┆
0x0211a0…0211c0             3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27   ┆:= i + 1;        key_tab[i] := '┆
0x0211c0…0211e0             57 48 49 4c 45 20 20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b   ┆WHILE    '; i := i + 1;        k┆
0x0211e0…021200             65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 57 49 54 48 20 20 20 20 20 27 3b 20 69 20 3a 3d 20 69   ┆ey_tab[i] := 'WITH     '; i := i┆
0x021200…021220 (8, 1, 11)  20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 6b 65 79 5f 74 61 62 5b 69 5d 20 3a 3d 20 27 58 4f 52 20   ┆ + 1;        key_tab[i] := 'XOR ┆
0x021220…021240             20 20 20 20 20 27 3b 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a 20 0d 0a 20 20 20 20 20 20 46 4f   ┆     '; i := i + 1;           FO┆
0x021240…021260             52 20 69 20 3a 3d 20 6e 75 6d 5f 6b 65 79 77 20 44 4f 57 4e 54 4f 20 31 20 44 4f 0d 0a 20 20 20   ┆R i := num_keyw DOWNTO 1 DO     ┆
0x021260…021280             20 20 20 20 20 69 6e 73 65 72 74 5f 6b 65 79 77 28 20 6b 65 79 5f 74 61 62 5b 69 5d 20 29 3b 0d   ┆     insert_keyw( key_tab[i] ); ┆
0x021280…0212a0             0a 20 0d 0a 20 20 20 20 20 20 6b 65 79 77 6f 72 64 74 6f 70 20 3a 3d 20 74 6f 70 3b 0d 0a 20 20   ┆          keywordtop := top;    ┆
0x0212a0…0212c0             20 20 20 20 74 6f 70 20 3a 3d 20 68 61 73 68 73 69 7a 65 3b 0d 0a 20 0d 0a 20 20 20 20 20 20 6c   ┆    top := hashsize;           l┆
0x0212c0…0212e0             61 6e 67 75 61 67 65 20 3a 3d 20 52 54 50 5f 32 38 36 3b 0d 0a 20 20 20 20 45 4e 44 3b 0d 0a 20   ┆anguage := RTP_286;      END;   ┆
0x0212e0…021300             0d 0a 20 0d 0a 20 20 20 20 50 52 4f 43 45 44 55 52 45 20 69 6e 69 74 3b 0d 0a 20 20 20 20 54 59   ┆         PROCEDURE init;      TY┆
0x021300…021320             50 45 0d 0a 20 20 20 20 20 20 73 74 72 69 6e 67 34 30 20 3d 20 50 41 43 4b 45 44 20 41 52 52 41   ┆PE        string40 = PACKED ARRA┆
0x021320…021340             59 20 5b 31 2e 2e 34 30 5d 20 4f 46 20 63 68 61 72 3b 0d 0a 20 0d 0a 20 20 20 20 56 41 52 0d 0a   ┆Y [1..40] OF char;         VAR  ┆
0x021340…021360             20 20 20 20 20 20 6f 70 74 3a 20 6f 70 74 69 6f 6e 73 3b 0d 0a 20 20 20 20 20 20 69 6e 70 75 74   ┆      opt: options;        input┆
0x021360…021380             5f 6d 65 74 3a 20 62 6f 6f 6c 65 61 6e 3b 0d 0a 20 20 20 20 20 20 69 6e 74 2c 20 69 6e 74 31 2c   ┆_met: boolean;        int, int1,┆
0x021380…0213a0             20 73 79 73 2c 20 73 79 73 31 2c 20 70 61 72 61 6d 6e 6f 2c 20 28 2a 20 76 61 72 69 61 62 6c 65   ┆ sys, sys1, paramno, (* variable┆
0x0213a0…0213c0             73 20 66 6f 72 20 63 61 6c 6c 20 69 6e 74 65 72 70 72 65 74 61 74 69 6f 6e 20 2a 29 0d 0a 20 20   ┆s for call interpretation *)    ┆
0x0213c0…0213e0             20 20 20 20 73 74 65 70 2c 20 69 69 2c 20 69 2c 20 6a 3a 20 69 6e 74 65 67 65 72 3b 0d 0a 20 20   ┆    step, ii, i, j: integer;    ┆
0x0213e0…021400             20 20 20 20 69 64 2c 20 69 64 31 3a 20 61 6c 66 61 3b 0d 0a 20 20 20 20 20 20 74 61 69 6c 3a 20   ┆    id, id1: alfa;        tail: ┆
0x021400…021420 (8, 1, 12)  41 52 52 41 59 20 5b 31 2e 2e 31 30 5d 20 4f 46 20 69 6e 74 65 67 65 72 3b 20 28 2a 20 66 6f 72   ┆ARRAY [1..10] OF integer; (* for┆
0x021420…021440             20 74 68 65 20 65 6e 74 72 79 20 74 61 69 6c 20 2a 29 0d 0a 20 0d 0a 20 20 20 20 20 20 50 52 4f   ┆ the entry tail *)           PRO┆
0x021440…021460             43 45 44 55 52 45 20 64 61 74 65 5f 61 6e 64 5f 74 69 6d 65 28 56 41 52 20 64 61 74 65 5f 61 6c   ┆CEDURE date_and_time(VAR date_al┆
0x021460…021480             66 61 2c 20 74 69 6d 65 5f 61 6c 66 61 3a 20 61 6c 66 61 29 3b 0d 0a 20 20 20 20 20 20 56 41 52   ┆fa, time_alfa: alfa);        VAR┆
0x021480…0214a0             0d 0a 20 20 20 20 20 20 20 20 79 72 2c 20 6d 6f 2c 20 64 61 2c 20 64 61 5f 6f 66 5f 77 2c 20 68   ┆          yr, mo, da, da_of_w, h┆
0x0214a0…0214c0             72 2c 20 6d 69 2c 20 73 63 2c 20 73 63 31 30 30 3a 20 77 6f 72 64 3b 0d 0a 20 0d 0a 20 20 20 20   ┆r, mi, sc, sc100: word;         ┆
0x0214c0…0214e0             20 20 20 20 46 55 4e 43 54 49 4f 4e 20 73 74 72 77 7a 65 72 6f 28 20 69 3a 20 6c 6f 6e 67 69 6e   ┆    FUNCTION strwzero( i: longin┆
0x0214e0…021500             74 3b 20 73 69 7a 65 2c 20 62 61 73 65 3a 20 69 6e 74 65 67 65 72 20 29 3a 20 53 54 52 49 4e 47   ┆t; size, base: integer ): STRING┆
0x021500…021520             3b 0d 0a 20 20 20 20 20 20 20 20 56 41 52 0d 0a 20 20 20 20 20 20 20 20 20 20 6b 2c 20 6c 2c 20   ┆;          VAR            k, l, ┆
0x021520…021540             6d 2c 20 6c 6f 77 20 3a 20 6c 6f 6e 67 69 6e 74 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 74 65 6d   ┆m, low : longint;            tem┆
0x021540…021560             70 3a 20 53 54 52 49 4e 47 5b 33 33 5d 3b 0d 0a 20 20 20 20 20 20 20 20 43 4f 4e 53 54 0d 0a 20   ┆p: STRING[33];          CONST   ┆
0x021560…021580             20 20 20 20 20 20 20 20 20 64 69 67 69 74 3a 20 41 52 52 41 59 20 5b 20 30 2e 2e 31 35 20 5d 20   ┆         digit: ARRAY [ 0..15 ] ┆
0x021580…0215a0             4f 46 20 63 68 61 72 20 3d 0d 0a 20 20 20 20 20 20 20 20 20 20 20 28 20 27 30 27 2c 20 27 31 27   ┆OF char =             ( '0', '1'┆
0x0215a0…0215c0             2c 20 27 32 27 2c 20 27 33 27 2c 20 27 34 27 2c 20 27 35 27 2c 20 27 36 27 2c 20 27 37 27 2c 20   ┆, '2', '3', '4', '5', '6', '7', ┆
0x0215c0…0215e0             27 38 27 2c 20 27 39 27 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 20 27 41 27 2c 20 27 42 27 2c 20   ┆'8', '9',             'A', 'B', ┆
0x0215e0…021600             27 43 27 2c 20 27 44 27 2c 20 27 45 27 2c 20 27 46 27 20 29 3b 0d 0a 20 20 20 20 20 20 20 20 42   ┆'C', 'D', 'E', 'F' );          B┆
0x021600…021620 (8, 1, 13)  45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 74 65 6d 70 5b 30 5d 20 3a 3d 20 63 68 72 28 73   ┆EGIN            temp[0] := chr(s┆
0x021620…021640             69 7a 65 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 46 4f 52 20 6b 20 3a 3d 20 31 20 54 4f 20 73   ┆ize);            FOR k := 1 TO s┆
0x021640…021660             69 7a 65 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 74 65 6d 70 5b 6b 5d 20 3a 3d 20 27   ┆ize DO              temp[k] := '┆
0x021660…021680             30 27 3b 0d 0a 20 0d 0a 20 20 20 20 20 20 20 20 20 20 6b 20 3a 3d 20 61 62 73 28 69 29 3b 0d 0a   ┆0';               k := abs(i);  ┆
0x021680…0216a0             20 20 20 20 20 20 20 20 20 20 49 46 20 69 20 3c 20 20 30 20 54 48 45 4e 0d 0a 20 20 20 20 20 20   ┆          IF i <  0 THEN        ┆
0x0216a0…0216c0             20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6c 6f 77 20 3a   ┆      BEGIN                low :┆
0x0216c0…0216e0             3d 20 32 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 65 6d 70 5b 31 5d 20 3a 3d 20 27   ┆= 2;                temp[1] := '┆
0x0216e0…021700             2d 27 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 0d 0a 20 20 20 20 20 20 20 20 20 20   ┆-';              END            ┆
0x021700…021720             45 4c 53 45 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 6c 6f 77 20 3a 3d 20 31 3b 0d 0a 20 0d 0a   ┆ELSE              low := 1;     ┆
0x021720…021740             20 20 20 20 20 20 20 20 20 20 6c 20 3a 3d 20 73 69 7a 65 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20   ┆          l := size + 1;        ┆
0x021740…021760             20 20 20 20 57 48 49 4c 45 20 28 20 6b 20 3c 3e 20 30 20 29 20 20 41 4e 44 20 28 20 6c 20 3e 20   ┆    WHILE ( k <> 0 )  AND ( l > ┆
0x021760…021780             6c 6f 77 20 29 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20   ┆low ) DO              BEGIN     ┆
0x021780…0217a0             20 20 20 20 20 20 20 20 20 20 20 6c 20 3a 3d 20 6c 20 2d 20 31 3b 0d 0a 20 20 20 20 20 20 20 20   ┆           l := l - 1;          ┆
0x0217a0…0217c0             20 20 20 20 20 20 74 65 6d 70 5b 6c 5d 20 3a 3d 20 64 69 67 69 74 5b 20 6b 20 4d 4f 44 20 62 61   ┆      temp[l] := digit[ k MOD ba┆
0x0217c0…0217e0             73 65 20 5d 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6b 20 3a 3d 20 6b 20 44 49 56 20   ┆se ];                k := k DIV ┆
0x0217e0…021800             62 61 73 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 20 20 20   ┆base;              END;         ┆
0x021800…021820 (8, 1, 14)  20 20 20 49 46 20 6b 20 3c 3e 20 30 20 54 48 45 4e 20 20 7b 20 6f 76 65 72 66 6c 6f 77 20 7d 0d   ┆   IF k <> 0 THEN  { overflow } ┆
0x021820…021840             0a 20 20 20 20 20 20 20 20 20 20 20 20 74 65 6d 70 5b 6c 6f 77 5d 20 3a 3d 20 27 2a 27 3b 0d 0a   ┆             temp[low] := '*';  ┆
0x021840…021860             20 20 20 20 20 20 20 20 20 20 73 74 72 77 7a 65 72 6f 20 3a 3d 20 74 65 6d 70 3b 0d 0a 20 20 20   ┆          strwzero := temp;     ┆
0x021860…021880             20 20 20 20 20 45 4e 44 3b 0d 0a 20 0d 0a 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20   ┆     END;           BEGIN       ┆
0x021880…0218a0             20 20 20 47 65 74 44 61 74 65 28 79 72 2c 20 6d 6f 2c 20 64 61 2c 20 64 61 5f 6f 66 5f 77 29 3b   ┆   GetDate(yr, mo, da, da_of_w);┆
0x0218a0…0218c0             0d 0a 20 20 20 20 20 20 20 20 47 65 74 54 69 6d 65 28 68 72 2c 20 6d 69 2c 20 73 63 2c 20 73 63   ┆          GetTime(hr, mi, sc, sc┆
0x0218c0…0218e0             31 30 30 29 3b 0d 0a 20 0d 0a 20 20 20 20 20 20 20 20 64 61 74 65 5f 61 6c 66 61 20 3a 3d 20 73   ┆100);             date_alfa := s┆
0x0218e0…021900             74 72 77 7a 65 72 6f 28 79 72 2c 20 34 2c 20 31 30 29 20 2b 20 27 2d 27 20 2b 20 73 74 72 77 7a   ┆trwzero(yr, 4, 10) + '-' + strwz┆
0x021900…021920             65 72 6f 28 6d 6f 2c 20 32 2c 20 31 30 29 20 2b 0d 0a 20 20 20 20 20 20 20 20 20 20 27 2d 27 20   ┆ero(mo, 2, 10) +            '-' ┆
0x021920…021940             2b 20 73 74 72 77 7a 65 72 6f 28 64 61 2c 20 32 2c 20 31 30 29 20 2b 20 27 20 20 27 3b 0d 0a 20   ┆+ strwzero(da, 2, 10) + '  ';   ┆
0x021940…021960             20 20 20 20 20 20 20 74 69 6d 65 5f 61 6c 66 61 20 3a 3d 20 73 74 72 77 7a 65 72 6f 28 68 72 2c   ┆       time_alfa := strwzero(hr,┆
0x021960…021980             20 32 2c 20 31 30 29 20 2b 20 27 3a 27 20 2b 20 73 74 72 77 7a 65 72 6f 28 6d 69 2c 20 32 2c 20   ┆ 2, 10) + ':' + strwzero(mi, 2, ┆
0x021980…0219a0             31 30 29 20 2b 0d 0a 20 20 20 20 20 20 20 20 20 20 27 20 20 27 3b 0d 0a 20 0d 0a 20 20 20 20 20   ┆10) +            '  ';          ┆
0x0219a0…0219c0             20 45 4e 44 3b 20 28 2a 20 64 61 74 65 20 61 6e 64 20 74 69 6d 65 20 2a 29 0d 0a 20 0d 0a 20 0d   ┆ END; (* date and time *)       ┆
0x0219c0…0219e0             0a 20 20 20 20 42 45 47 49 4e 0d 0a 20 0d 0a 20 20 20 20 20 20 64 61 74 65 5f 61 6e 64 5f 74 69   ┆     BEGIN           date_and_ti┆
0x0219e0…021a00             6d 65 28 63 75 72 72 65 6e 74 5f 64 61 74 65 2c 20 63 75 72 72 65 6e 74 5f 74 69 6d 65 29 3b 20   ┆me(current_date, current_time); ┆
0x021a00…021a20 (8, 1, 15)  28 2a 20 67 65 74 20 63 75 72 72 65 6e 74 20 64 61 74 65 20 61 6e 64 20 74 69 6d 65 20 2a 29 0d   ┆(* get current date and time *) ┆
0x021a20…021a40             0a 20 0d 0a 20 0d 0a 20 20 20 20 20 20 20 20 28 2a 20 69 6e 69 74 69 61 6c 69 7a 65 20 67 6c 6f   ┆               (* initialize glo┆
0x021a40…021a60             62 61 6c 20 76 61 72 69 61 62 6c 65 73 20 2a 29 0d 0a 20 20 20 20 20 20 69 6e 73 69 64 65 5f 69   ┆bal variables *)        inside_i┆
0x021a60…021a80             6e 63 6c 75 73 69 6f 6e 20 3a 3d 20 66 61 6c 73 65 3b 0d 0a 20 20 20 20 20 20 6c 69 6e 65 5f 6c   ┆nclusion := false;        line_l┆
0x021a80…021aa0             67 74 68 20 3a 3d 20 30 3b 0d 0a 20 20 20 20 20 20 6c 69 6e 65 5f 70 6f 73 20 3a 3d 20 31 3b 0d   ┆gth := 0;        line_pos := 1; ┆
0x021aa0…021ac0             0a 20 20 20 20 20 20 69 6e 63 6c 5f 6c 69 6e 65 5f 6c 67 74 68 20 3a 3d 20 30 3b 0d 0a 20 20 20   ┆       incl_line_lgth := 0;     ┆
0x021ac0…021ae0             20 20 20 69 6e 63 6c 5f 6c 69 6e 65 5f 70 6f 73 20 3a 3d 20 31 3b 0d 0a 20 20 20 20 20 20 62 72   ┆   incl_line_pos := 1;        br┆
0x021ae0…021b00             61 63 6b 63 6f 75 6e 74 20 3a 3d 20 30 3b 0d 0a 20 20 20 20 20 20 62 6c 6f 63 6b 63 6f 75 6e 74   ┆ackcount := 0;        blockcount┆
0x021b00…021b20             20 3a 3d 20 30 3b 0d 0a 20 20 20 20 20 20 6f 74 68 65 72 63 6f 75 6e 74 20 3a 3d 20 30 3b 0d 0a   ┆ := 0;        othercount := 0;  ┆
0x021b20…021b40             20 20 20 20 20 20 70 61 73 6c 69 6e 65 20 3a 3d 20 30 3b 0d 0a 20 20 20 20 20 20 70 61 67 65 6e   ┆      pasline := 0;        pagen┆
0x021b40…021b60             75 6d 62 65 72 20 3a 3d 20 30 3b 0d 0a 20 20 20 20 20 20 6e 65 77 69 64 20 3a 3d 20 62 6c 61 6e   ┆umber := 0;        newid := blan┆
0x021b60…021b80             6b 3b 20 20 28 2a 20 62 65 20 72 65 61 64 79 20 66 6f 72 20 61 20 6e 65 77 20 6e 61 6d 65 20 2a   ┆k;  (* be ready for a new name *┆
0x021b80…021ba0             29 0d 0a 20 20 20 20 20 20 69 64 6c 65 6e 67 74 68 20 3a 3d 20 30 3b 20 28 2a 20 63 75 72 72 65   ┆)        idlength := 0; (* curre┆
0x021ba0…021bc0             6e 74 20 6e 61 6d 65 20 69 73 20 65 6d 70 74 79 20 2a 29 0d 0a 20 20 20 20 20 20 63 75 72 72 65   ┆nt name is empty *)        curre┆
0x021bc0…021be0             6e 74 5f 6e 61 6d 65 20 3a 3d 20 4e 49 4c 3b 20 20 28 2a 20 20 6e 6f 20 63 68 75 6e 6b 73 20 61   ┆nt_name := NIL;  (*  no chunks a┆
0x021be0…021c00             72 65 20 69 6e 20 75 73 65 20 2a 29 0d 0a 20 20 20 20 20 20 73 74 61 72 74 6f 66 63 75 72 72 65   ┆re in use *)        startofcurre┆
0x021c00…029000 (9, 0, 1)   […elided…]
0x029000…029020 (10, 1, 14) 20 20 20 62 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46   ┆   begin                      IF┆
0x029020…029040             20 66 69 6c 65 45 78 69 73 74 28 69 6e 63 6c 5f 70 61 74 68 29 20 54 48 45 4e 0d 0a 20 20 20 20   ┆ fileExist(incl_path) THEN      ┆
0x029040…029060             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 45 47 49 4e 20 28 2a 20 73 74 61 72 74   ┆                  BEGIN (* start┆
0x029060…029080             20 6f 66 20 61 6c 74 65 72 6e 61 74 69 76 65 20 69 6e 70 75 74 20 66 69 6c 65 20 2a 29 0d 0a 20   ┆ of alternative input file *)   ┆
0x029080…0290a0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 72 69 74 65 6c 6e 28 4f   ┆                       writeln(O┆
0x0290a0…0290c0             75 74 70 75 74 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆utput);                         ┆
0x0290c0…0290e0             20 77 72 69 74 65 28 4f 75 74 70 75 74 2c 20 27 7b 24 49 20 27 2c 20 69 6e 63 6c 5f 70 61 74 68   ┆ write(Output, '{$I ', incl_path┆
0x0290e0…029100             2c 20 27 20 7d 20 20 2d 20 20 20 27 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆, ' }  -   ');                  ┆
0x029100…029120             20 20 20 20 20 20 20 20 61 73 73 69 67 6e 28 69 6e 63 6c 75 64 65 5f 66 69 6c 65 2c 20 69 6e 63   ┆        assign(include_file, inc┆
0x029120…029140             6c 5f 70 61 74 68 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆l_path);                        ┆
0x029140…029160             20 20 53 65 74 54 65 78 74 42 75 66 28 69 6e 63 6c 75 64 65 5f 66 69 6c 65 2c 20 49 43 5f 62 75   ┆  SetTextBuf(include_file, IC_bu┆
0x029160…029180             66 66 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65   ┆ff);                          re┆
0x029180…0291a0             73 65 74 28 69 6e 63 6c 75 64 65 5f 66 69 6c 65 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20   ┆set(include_file);              ┆
0x0291a0…0291c0             20 20 20 20 20 20 20 20 20 20 20 20 69 6e 73 69 64 65 5f 69 6e 63 6c 75 73 69 6f 6e 20 3a 3d 20   ┆            inside_inclusion := ┆
0x0291c0…0291e0             74 72 75 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44   ┆true;                        END┆
0x0291e0…029200             20 28 2a 20 66 69 6c 65 20 65 78 69 73 74 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ (* file exist *)               ┆
0x029200…029220 (10, 1, 15) 20 20 20 20 20 20 20 45 4c 53 45 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆       ELSE                     ┆
0x029220…029240             20 20 20 77 72 69 74 65 6c 6e 28 4f 75 74 70 75 74 2c 20 27 69 6e 63 6c 75 64 65 28 27 2c 20 69   ┆   writeln(Output, 'include(', i┆
0x029240…029260             6e 63 6c 5f 70 61 74 68 2c 20 27 29 20 6e 6f 74 20 70 6f 73 73 69 62 6c 65 27 29 3b 0d 0a 20 20   ┆ncl_path, ') not possible');    ┆
0x029260…029280             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6e 64 3b 0d 0a 20 0d 0a 20 20 20 20 20 20 20   ┆                end;            ┆
0x029280…0292a0             20 20 20 20 20 20 20 45 4e 44 20 28 2a 20 63 6f 6d 6d 65 6e 74 20 2a 29 0d 0a 20 20 20 20 20 20   ┆       END (* comment *)        ┆
0x0292a0…0292c0             20 20 20 20 20 20 45 4c 53 45 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 62 72 61   ┆      ELSE                IF bra┆
0x0292c0…0292e0             63 6b 63 6f 75 6e 74 20 3d 20 30 20 54 48 45 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ckcount = 0 THEN                ┆
0x0292e0…029300             20 20 6c 61 73 74 71 75 65 75 65 64 20 3a 3d 20 30 3b 20 28 2a 20 6d 61 72 6b 20 74 68 65 20 71   ┆  lastqueued := 0; (* mark the q┆
0x029300…029320             75 65 75 65 20 61 73 20 6f 74 68 65 72 75 73 65 20 2a 29 0d 0a 20 0d 0a 20 20 20 20 20 20 20 20   ┆ueue as otheruse *)             ┆
0x029320…029340             20 20 45 4e 44 3b 20 28 2a 20 6c 65 66 74 20 62 72 61 63 65 20 2a 29 0d 0a 20 0d 0a 20 20 20 20   ┆  END; (* left brace *)         ┆
0x029340…029360             20 20 20 20 27 2d 27 3a 20 28 2a 20 70 72 65 70 61 72 65 20 63 6f 6d 6d 65 6e 74 20 20 2a 29 0d   ┆    '-': (* prepare comment  *) ┆
0x029360…029380             0a 20 20 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 0d 0a 20 20 20 20 20 20 20 20 20 20 20   ┆           BEGIN                ┆
0x029380…0293a0             20 49 46 20 28 6c 6f 6f 6b 61 68 65 61 64 20 3d 20 27 2d 27 29 20 41 4e 44 20 28 6c 61 6e 67 75   ┆ IF (lookahead = '-') AND (langu┆
0x0293a0…0293c0             61 67 65 20 3c 3e 20 54 75 72 62 6f 5f 70 61 73 63 61 6c 20 29 20 54 48 45 4e 0d 0a 20 20 20 20   ┆age <> Turbo_pascal ) THEN      ┆
0x0293c0…0293e0             20 20 20 20 20 20 20 20 20 20 20 20 28 2a 20 63 6f 6d 6d 65 6e 74 20 2a 29 0d 0a 20 20 20 20 20   ┆            (* comment *)       ┆
0x0293e0…029400             20 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆         BEGIN                  ┆
0x029400…029420 (11, 0, 1)  6c 69 6e 65 5f 70 6f 73 20 3a 3d 20 6c 69 6e 65 5f 6c 67 74 68 20 2b 20 31 3b 0d 0a 20 0d 0a 20   ┆line_pos := line_lgth + 1;      ┆
0x029420…029440             20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 20 28 2a 20 63 6f 6d 6d 65 6e 74 20 2a 29 0d 0a   ┆             END (* comment *)  ┆
0x029440…029460             20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆            ELSE                ┆
0x029460…029480             49 46 20 62 72 61 63 6b 63 6f 75 6e 74 20 3d 20 30 20 54 48 45 4e 0d 0a 20 20 20 20 20 20 20 20   ┆IF brackcount = 0 THEN          ┆
0x029480…0294a0             20 20 20 20 20 20 20 20 6c 61 73 74 71 75 65 75 65 64 20 3a 3d 20 30 3b 20 28 2a 20 6d 61 72 6b   ┆        lastqueued := 0; (* mark┆
0x0294a0…0294c0             20 74 68 65 20 71 75 65 75 65 20 61 73 20 6f 74 68 65 72 75 73 65 20 2a 29 0d 0a 20 0d 0a 20 20   ┆ the queue as otheruse *)       ┆
0x0294c0…0294e0             20 20 20 20 20 20 20 20 45 4e 44 3b 20 28 2a 20 20 2d 2d 20 20 63 6f 6d 6d 65 6e 74 20 20 20 2a   ┆        END; (*  --  comment   *┆
0x0294e0…029500             29 0d 0a 20 0d 0a 20 20 20 20 20 20 20 20 27 29 27 2c 20 27 5d 27 3a 20 28 2a 20 62 75 74 20 6e   ┆)             ')', ']': (* but n┆
0x029500…029520             6f 74 20 27 3e 27 20 6f 72 20 27 7d 27 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 2a   ┆ot '>' or '}' *)              (*┆
0x029520…029540             20 75 6e 73 74 61 63 6b 20 62 72 61 63 6b 65 74 20 6c 65 76 65 6c 20 2a 29 0d 0a 20 20 20 20 20   ┆ unstack bracket level *)       ┆
0x029540…029560             20 20 20 20 20 62 72 61 63 6b 63 6f 75 6e 74 20 3a 3d 20 62 72 61 63 6b 63 6f 75 6e 74 2d 31 3b   ┆     brackcount := brackcount-1;┆
0x029560…029580             0d 0a 20 0d 0a 20 20 20 20 20 20 20 20 27 3b 27 3a 20 28 2a 20 73 79 6e 74 61 78 20 63 68 65 63   ┆             ';': (* syntax chec┆
0x029580…0295a0             6b 20 61 6e 64 20 72 65 63 6f 76 65 72 79 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 28   ┆k and recovery *)              (┆
0x0295a0…0295c0             2a 20 69 66 20 6e 6f 74 20 64 65 63 6c 61 72 61 74 69 6f 6e 20 70 61 72 74 20 74 68 65 6e 20 62   ┆* if not declaration part then b┆
0x0295c0…0295e0             72 61 63 6b 63 6f 75 6e 74 20 6d 75 73 74 20 62 65 20 20 30 20 2a 29 0d 0a 20 20 20 20 20 20 20   ┆rackcount must be  0 *)         ┆
0x0295e0…029600             20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 63 68 65 63 6b 62 72 61 63 6b   ┆   BEGIN              checkbrack┆
0x029600…029620 (11, 0, 2)  65 74 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 6c 61 73 74 71 75 65 75 65 64 20 3a 3d 20 30   ┆et;              lastqueued := 0┆
0x029620…029640             3b 20 28 2a 20 65 6d 70 74 79 20 74 68 65 20 71 75 65 75 65 2c 20 74 68 65 20 65 6c 65 6d 65 6e   ┆; (* empty the queue, the elemen┆
0x029640…029660             74 73 20 61 72 65 20 6d 61 72 6b 65 64 20 61 73 20 6f 74 68 65 72 75 73 65 20 2a 29 0d 0a 20 20   ┆ts are marked as otheruse *)    ┆
0x029660…029680             20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 0d 0a 20 20 20 20 20 20 45 4c 53 45 0d 0a 20 20 20   ┆        END;           ELSE     ┆
0x029680…0296a0             20 20 20 20 20 20 20 28 2a 20 61 6e 79 74 68 69 6e 67 20 65 6c 73 65 20 2a 29 0d 0a 20 20 20 20   ┆       (* anything else *)      ┆
0x0296a0…0296c0             20 20 20 20 20 20 28 2a 20 65 6d 70 74 79 20 74 68 65 20 71 75 65 75 65 2c 20 74 68 65 20 65 6c   ┆      (* empty the queue, the el┆
0x0296c0…0296e0             65 6d 65 6e 74 73 20 61 72 65 20 6d 61 72 6b 65 64 20 61 73 20 6f 74 68 65 72 75 73 65 20 2a 29   ┆ements are marked as otheruse *)┆
0x0296e0…029700             0d 0a 20 20 20 20 20 20 20 20 49 46 20 62 72 61 63 6b 63 6f 75 6e 74 20 3d 20 30 20 54 48 45 4e   ┆          IF brackcount = 0 THEN┆
0x029700…029720             0d 0a 20 20 20 20 20 20 20 20 20 20 6c 61 73 74 71 75 65 75 65 64 20 3a 3d 20 30 3b 0d 0a 20 20   ┆            lastqueued := 0;    ┆
0x029720…029740             20 20 45 4e 44 3b 20 28 2a 20 63 61 73 65 20 2a 29 0d 0a 20 0d 0a 20 20 55 4e 54 49 4c 20 28 20   ┆  END; (* case *)       UNTIL ( ┆
0x029740…029760             6c 69 6e 65 5f 70 6f 73 20 3e 3d 20 6c 69 6e 65 5f 6c 67 74 68 20 29 20 41 4e 44 20 65 6f 66 28   ┆line_pos >= line_lgth ) AND eof(┆
0x029760…029780             69 6e 66 69 6c 29 3b 0d 0a 20 0d 0a 20 20 73 6f 72 74 5f 74 61 62 6c 65 3b 0d 0a 20 20 70 72 69   ┆infil);       sort_table;    pri┆
0x029780…0297a0             6e 74 5f 74 61 62 6c 65 3b 0d 0a 20 0d 0a 20 20 63 6c 6f 73 65 28 6f 75 74 70 75 74 66 69 6c 29   ┆nt_table;       close(outputfil)┆
0x0297a0…0297c0             3b 0d 0a 20 20 63 6c 6f 73 65 28 69 6e 66 69 6c 29 3b 0d 0a 20 0d 0a 20 20 77 72 69 74 65 6c 6e   ┆;    close(infil);       writeln┆
0x0297c0…0297e0             28 4f 75 74 70 75 74 29 3b 0d 0a 20 20 49 46 20 74 61 62 6c 65 5f 66 75 6c 6c 5f 61 74 5f 6c 69   ┆(Output);    IF table_full_at_li┆
0x0297e0…029800             6e 65 20 3c 3e 20 2d 31 20 54 48 45 4e 0d 0a 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20   ┆ne <> -1 THEN      BEGIN        ┆
0x029800…029820 (11, 0, 3)  77 72 69 74 65 6c 6e 28 6f 75 74 70 75 74 29 3b 20 77 72 69 74 65 6c 6e 28 6f 75 74 70 75 74 29   ┆writeln(output); writeln(output)┆
0x029820…029840             3b 20 77 72 69 74 65 6c 6e 28 6f 75 74 70 75 74 29 3b 0d 0a 20 20 20 20 20 20 77 72 69 74 65 6c   ┆; writeln(output);        writel┆
0x029840…029860             6e 28 4f 75 74 70 75 74 2c 20 27 2a 2a 2a 2a 2a 20 77 61 72 6e 69 6e 67 3a 20 68 61 73 68 20 74   ┆n(Output, '***** warning: hash t┆
0x029860…029880             61 62 6c 65 20 6f 76 65 72 66 6c 6f 77 20 61 74 20 6c 69 6e 65 3a 20 27 0d 0a 20 20 20 20 20 20   ┆able overflow at line: '        ┆
0x029880…0298a0             2c 20 74 61 62 6c 65 5f 66 75 6c 6c 5f 61 74 5f 6c 69 6e 65 3a 31 20 29 3b 0d 0a 20 20 20 20 45   ┆, table_full_at_line:1 );      E┆
0x0298a0…0298c0             4e 44 3b 0d 0a 20 0d 0a 20 20 69 66 20 74 65 73 74 5f 72 65 71 75 65 73 74 65 64 20 74 68 65 6e   ┆ND;       if test_requested then┆
0x0298c0…0298e0             0d 0a 20 20 20 20 77 72 69 74 65 6c 6e 28 27 20 48 65 61 70 20 73 74 6f 72 61 67 65 20 75 73 65   ┆      writeln(' Heap storage use┆
0x0298e0…029900             64 3a 20 27 2c 20 49 6e 69 74 69 61 6c 46 72 65 65 20 2d 20 4d 61 78 41 76 61 69 6c 3a 30 2c 20   ┆d: ', InitialFree - MaxAvail:0, ┆
0x029900…029920             27 20 62 79 74 65 73 2e 20 20 27 2c 0d 0a 20 20 20 20 4d 61 78 41 76 61 69 6c 3a 30 2c 20 27 20   ┆' bytes.  ',      MaxAvail:0, ' ┆
0x029920…029940             72 65 6d 61 69 6e 69 6e 67 2e 20 27 29 3b 0d 0a 20 20 45 4e 44 2e 0d 0a 1a 10 4b 0b 00 00 00 00   ┆remaining. ');    END.    K     ┆
0x029940…029960             50 41 58 46 45 4a 4c 20 20 20 20 10 00 00 00 00 00 00 00 00 00 00 a1 5d 45 10 60 1f 00 00 00 00   ┆PAXFEJL               А]E `     ┆
0x029960…029980             52 43 39 30 30 20 20 20 20 20 20 10 00 00 00 00 00 00 00 00 00 00 a3 5d 45 10 6b 1f 00 00 00 00   ┆RC900                 Б]E k     ┆
0x029980…0299a0             52 43 49 4e 44 45 4e 54 20 20 20 10 00 00 00 00 00 00 00 00 00 00 a5 5d 45 10 78 1f 00 00 00 00   ┆RCINDENT              Ц]E x     ┆
0x0299a0…0299c0             e5 45 46 45 52 41 54 45 20 20 20 10 00 00 00 00 00 00 00 00 00 00 a8 5d 45 10 bc 1f 00 00 00 00   ┆тEFERATE              е]E ╝     ┆
0x0299c0…0299e0             52 54 50 20 20 20 20 20 20 20 20 10 00 00 00 00 00 00 00 00 00 00 a9 5d 45 10 c0 1f 00 00 00 00   ┆RTP                   Е]E └     ┆
0x0299e0…029a00             53 41 58 20 20 20 20 20 20 20 20 10 00 00 00 00 00 00 00 00 00 00 c7 5d 45 10 e2 20 00 00 00 00   ┆SAX                   К]E Р     ┆
0x029a00…029a20 (11, 0, 4)  52 45 4d 20 62 61 74 63 68 20 66 69 6c 20 74 69 6c 20 61 74 20 6c 61 76 65 20 49 4e 44 45 4e 54   ┆REM batch fil til at lave INDENT┆
0x029a20…029a40             20 6f 67 20 43 52 4f 53 53 20 72 65 66 65 72 65 6e 63 65 20 70 86 0d 0a 52 45 4d 20 54 55 52 42   ┆ og CROSS reference pє  REM TURB┆
0x029a40…029a60             4f 20 50 61 73 63 61 6c 20 73 6f 75 72 63 65 20 66 69 6c 65 72 2e 0d 0a 63 3a 5c 74 70 35 5c 74   ┆O Pascal source filer.  c:\tp5\t┆
0x029a60…029a80             6f 6f 6c 73 5c 70 61 73 63 66 6f 72 6d 2e 65 78 65 20 20 3c 25 31 2e 70 61 73 20 3e 65 3a 25 31   ┆ools\pascform.exe  <%1.pas >e:%1┆
0x029a80…029aa0             2e 69 6e 64 20 20 20 2f 76 65 72 73 3a 34 0d 0a 63 3a 5c 74 70 35 5c 74 6f 6f 6c 73 5c 70 61 73   ┆.ind   /vers:4  c:\tp5\tools\pas┆
0x029aa0…029ac0             63 72 6f 73 73 2e 65 78 65 20 20 65 3a 25 31 2e 69 6e 64 20 25 31 2e 70 72 74 20 2f 76 65 72 73   ┆cross.exe  e:%1.ind %1.prt /vers┆
0x029ac0…029ae0             3a 34 20 2f 78 72 65 66 3a 6f 6e 20 2f 64 65 76 3a 25 32 1a 00 00 ff ff 6d 1f ff ff ff ff ff ff   ┆:4 /xref:on /dev:%2     m       ┆
0x029ae0…029b00             71 1f 72 1f ff ff 74 1f ff ff ff ff 77 1f ff ff ff ff 7a 1f 7b 1f 7c 1f 7d 1f 7e 1f 7f 1f 80 1f   ┆q r   t     w     z { | } ~   ђ ┆
0x029b00…029b20             81 1f 82 1f 83 1f 84 1f 85 1f 86 1f 87 1f 88 1f 89 1f 8a 1f 8b 1f ff ff 8d 1f 8e 1f 8f 1f 90 1f   ┆Ђ ѓ Ѓ ё Ё є Є ѕ Ѕ і І   Ї ј Ј љ ┆
0x029b20…029b40             91 1f 92 1f 93 1f 94 1f 95 1f 96 1f 97 1f 98 1f 99 1f 9a 1f 9b 1f 9c 1f 9d 1f ff ff 9f 1f a0 1f   ┆Љ њ Њ ћ Ћ ќ Ќ ў Ў џ Џ ю Ю   Ъ а ┆
0x029b40…029b60             a1 1f a2 1f a3 1f a4 1f a5 1f a6 1f a7 1f a8 1f a9 1f aa 1f ab 1f ac 1f ad 1f ae 1f af 1f b0 1f   ┆А б Б ц Ц д Д е Е ф Ф г Г « » ░ ┆
0x029b60…029b80             b1 1f b2 1f b3 1f b4 1f b5 1f b6 1f b7 1f b8 1f ff ff ba 1f bb 1f ff ff 00 00 00 00 00 00 00 00   ┆▒ ▓ │ ┤ х Х и И   ║ ╗           ┆
0x029b80…029ba0             ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x029ba0…029bc0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x2…]
0x029c00…029c20 (11, 0, 5)  52 45 4d 20 62 61 74 63 68 20 66 69 6c 20 74 69 6c 20 61 74 20 6c 61 76 65 20 49 4e 44 45 4e 54   ┆REM batch fil til at lave INDENT┆
0x029c20…029c40             20 6f 67 20 43 52 4f 53 53 20 72 65 66 65 72 65 6e 63 65 20 70 86 0d 0a 52 45 4d 20 54 55 52 42   ┆ og CROSS reference pє  REM TURB┆
0x029c40…029c60             4f 20 50 61 73 63 61 6c 20 73 6f 75 72 63 65 20 66 69 6c 65 72 2e 0d 0a 63 3a 5c 6c 65 69 5c 72   ┆O Pascal source filer.  c:\lei\r┆
0x029c60…029c80             74 70 5c 69 6e 64 65 6e 74 2e 65 78 65 20 20 25 31 2e 70 61 73 20 65 3a 25 31 2e 69 6e 64 20 20   ┆tp\indent.exe  %1.pas e:%1.ind  ┆
0x029c80…029ca0             2f 6d 20 2f 6b 3a 75 63 0d 0a 63 3a 5c 74 70 35 5c 74 6f 6f 6c 73 5c 70 61 73 63 72 6f 73 73 2e   ┆/m /k:uc  c:\tp5\tools\pascross.┆
0x029ca0…029cc0             65 78 65 20 20 65 3a 25 31 2e 69 6e 64 20 25 31 2e 70 72 74 20 2f 76 65 72 3a 34 20 2f 78 72 65   ┆exe  e:%1.ind %1.prt /ver:4 /xre┆
0x029cc0…029ce0             66 3a 6f 6e 20 2f 49 6e 3a 6f 6e 20 2f 64 65 76 3a 25 32 1a 00 00 72 4f 9a 12 ef 12 a0 82 00 00   ┆f:on /In:on /dev:%2   rOџ № аѓ  ┆
0x029ce0…029d00             50 41 53 43 52 4f 53 53 48 4c 50 20 00 00 00 00 00 00 00 00 00 00 19 9f 99 12 68 0a 80 0f 00 00   ┆PASCROSSHLP            ЪЎ h ђ   ┆
0x029d00…029d20             50 41 53 43 52 4f 53 53 50 41 53 20 00 00 00 00 00 00 00 00 00 00 70 4f 9a 12 00 13 39 75 00 00   ┆PASCROSSPAS           pOџ   9u  ┆
0x029d20…029d40             e5 4f 4f 4c 53 20 20 20 42 41 4b 20 00 00 00 00 00 00 00 00 00 00 75 5d 9a 12 0f 13 00 18 00 00   ┆тOOLS   BAK           u]џ       ┆
0x029d40…029d60             54 4f 4f 4c 53 20 20 20 44 4f 43 20 00 00 00 00 00 00 00 00 00 00 ac 65 9a 12 12 13 80 18 00 00   ┆TOOLS   DOC           гeџ   ђ   ┆
0x029d60…029d80             54 50 35 20 20 20 20 20 50 43 4b 20 00 00 00 00 00 00 00 00 00 00 f5 78 94 12 31 13 b1 04 00 00   ┆TP5     PCK           шxћ 1 ▒   ┆
0x029d80…029da0             56 4f 56 20 20 20 20 20 49 4e 43 20 00 00 00 00 00 00 00 00 00 00 50 7a 98 12 96 13 75 00 00 00   ┆VOV     INC           Pzў ќ u   ┆
0x029da0…029dc0             56 4f 56 20 20 20 20 20 50 41 53 20 00 00 00 00 00 00 00 00 00 00 1b 7e 98 12 d3 0a 85 00 00 00   ┆VOV     PAS            ~ў М Ё   ┆
0x029dc0…029de0             e5 41 53 43 46 4f 52 4d 24 41 24 20 00 00 00 00 00 00 00 00 00 00 c7 68 9a 12 00 00 00 00 00 00   ┆тASCFORM$A$           Кhџ       ┆
0x029de0…029e00             e5 41 53 43 46 4f 52 4d 24 42 24 20 00 00 00 00 00 00 00 00 00 00 c7 68 9a 12 00 00 00 00 00 00   ┆тASCFORM$B$           Кhџ       ┆
0x029e00…029e20 (11, 0, 6)  52 45 4d 20 62 61 74 63 68 20 66 69 6c 20 74 69 6c 20 61 74 20 6c 61 76 65 20 49 4e 44 45 4e 54   ┆REM batch fil til at lave INDENT┆
0x029e20…029e40             20 6f 67 20 43 52 4f 53 53 20 72 65 66 65 72 65 6e 63 65 20 70 86 0d 0a 52 45 4d 20 20 50 61 73   ┆ og CROSS reference pє  REM  Pas┆
0x029e40…029e60             63 61 6c 20 20 73 6f 75 72 63 65 20 66 69 6c 65 72 2e 0d 0a 63 3a 5c 6c 65 69 5c 72 74 70 5c 69   ┆cal  source filer.  c:\lei\rtp\i┆
0x029e60…029e80             6e 64 65 6e 74 2e 65 78 65 20 20 25 31 2e 72 74 70 20 20 65 3a 25 31 2e 69 6e 64 20 20 2f 70 61   ┆ndent.exe  %1.rtp  e:%1.ind  /pa┆
0x029e80…029ea0             73 3a 52 54 50 38 20 2f 6b 3a 75 63 20 2f 6d 0d 0a 63 3a 5c 6c 65 69 5c 72 74 70 5c 63 72 6f 73   ┆s:RTP8 /k:uc /m  c:\lei\rtp\cros┆
0x029ea0…029ec0             73 2e 65 78 65 20 20 20 65 3a 25 31 2e 69 6e 64 20 20 25 31 2e 70 72 74 20 20 2f 70 61 73 3a 52   ┆s.exe   e:%1.ind  %1.prt  /pas:R┆
0x029ec0…029ee0             54 50 38 20 2f 68 65 61 64 3a 6f 66 66 20 2f 50 41 47 3a 36 35 1a 00 00 00 00 00 00 00 00 00 00   ┆TP8 /head:off /PAG:65           ┆
0x029ee0…029f00             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x8…]
0x02a000…02a200 (11, 0, 7)  Cluster(FILEDUMPHLP)
                            […0x2…]
0x02a600…02a620 (11, 0, 10) 7b 5b 41 3d 32 30 2c 49 3d 32 2c 4c 3d 34 2c 45 3d 33 2c 57 3d 31 2d 31 30 30 5d 20 20 50 41 53   ┆{[A=20,I=2,L=4,E=3,W=1-100]  PAS┆
0x02a620…02a640             43 46 4f 52 4d 20 64 69 72 65 63 74 69 76 65 20 7d 0d 0a 70 72 6f 67 72 61 6d 20 66 69 6c 65 64   ┆CFORM directive }  program filed┆
0x02a640…02a660             75 6d 70 3b 0d 0a 7b 20 44 75 6d 70 20 63 6f 6e 74 65 6e 74 68 20 6f 66 20 66 69 6c 65 0d 0a 0d   ┆ump;  { Dump contenth of file   ┆
0x02a660…02a680             0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆ -------------------------------┆
0x02a680…02a6a0             2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆--------------------------------┆
0x02a6a0…02a6c0             2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0d 0a 20 20 20 44 61 74 65 2e 20 20 20 20 49 6e 69 74 2e   ┆-------------     Date.    Init.┆
0x02a6c0…02a6e0             20 56 65 72 73 2e 20 45 78 70 6c 61 6e 61 74 69 6f 6e 2e 0d 0a 0d 0a 20 31 39 38 38 2d 31 32 2d   ┆ Vers. Explanation.     1988-12-┆
0x02a6e0…02a700             32 31 20 20 4c 45 49 20 20 30 2e 31 20 20 4f 72 69 67 69 6e 61 6c 20 76 65 72 73 69 6f 6e 20 62   ┆21  LEI  0.1  Original version b┆
0x02a700…02a720             79 20 4c 65 69 66 20 4e 69 65 6c 73 65 6e 0d 0a 20 31 39 38 39 2d 30 31 2d 32 37 20 20 4c 45 49   ┆y Leif Nielsen   1989-01-27  LEI┆
0x02a720…02a740             20 20 31 2e 31 20 20 4e 65 77 20 70 61 72 61 6d 20 54 50 55 20 66 6f 72 6d 61 74 0d 0a 2d 2d 2d   ┆  1.1  New param TPU format  ---┆
0x02a740…02a760             2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆--------------------------------┆
                            […0x1…]
0x02a780…02a7a0             2d 2d 2d 2d 2d 2d 2d 2d 2d 7d 0d 0a 0d 0a 55 73 65 73 0d 0a 20 20 44 6f 73 2c 0d 0a 20 20 44 6f   ┆---------}    Uses    Dos,    Do┆
0x02a7a0…02a7c0             73 55 74 69 6c 2c 0d 0a 20 20 48 65 6c 70 2c 0d 0a 20 20 50 61 72 61 6d 3b 0d 0a 0d 0a 43 4f 4e   ┆sUtil,    Help,    Param;    CON┆
0x02a7c0…02a7e0             53 54 0d 0a 20 20 56 65 72 73 69 6f 6e 20 3d 20 28 27 31 2e 31 27 20 29 3b 0d 0a 20 20 4d 61 78   ┆ST    Version = ('1.1' );    Max┆
0x02a7e0…02a800             50 61 72 61 6d 20 20 3d 20 32 3b 0d 0a 20 20 4d 61 78 4f 70 74 69 6f 6e 20 3d 20 35 3b 0d 0a 20   ┆Param  = 2;    MaxOption = 5;   ┆
0x02a800…02a820 (11, 0, 11) 20 4d 61 78 5f 4c 69 6e 65 20 3d 20 31 35 3b 0d 0a 0d 0a 20 20 50 61 72 61 6d 4c 69 73 74 20 3a   ┆ Max_Line = 15;      ParamList :┆
0x02a820…02a840             20 41 52 52 41 59 5b 31 2e 2e 4d 61 78 50 61 72 61 6d 5d 20 4f 46 20 50 61 72 61 6d 52 65 63 20   ┆ ARRAY[1..MaxParam] OF ParamRec ┆
0x02a840…02a860             3d 0d 0a 20 20 28 28 4b 69 6e 64 3a 4b 6e 6f 77 6e 46 69 6c 65 3b 20 44 65 66 69 6e 65 64 3a 46   ┆=    ((Kind:KnownFile; Defined:F┆
0x02a860…02a880             41 4c 53 45 3b 20 4b 65 79 57 6f 72 64 3a 27 49 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78   ┆ALSE; KeyWord:'I'; NumVal:0; Tex┆
0x02a880…02a8a0             74 56 61 6c 3a 27 27 29 2c 0d 0a 20 20 20 28 4b 69 6e 64 3a 46 69 6c 65 54 79 70 65 3b 20 20 44   ┆tVal:''),     (Kind:FileType;  D┆
0x02a8a0…02a8c0             65 66 69 6e 65 64 3a 46 41 4c 53 45 3b 20 4b 65 79 57 6f 72 64 3a 27 4f 27 3b 20 4e 75 6d 56 61   ┆efined:FALSE; KeyWord:'O'; NumVa┆
0x02a8c0…02a8e0             6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a 27 27 29 29 3b 0d 0a 0d 0a 20 20 4f 70 74 69 6f 6e 4c 69   ┆l:0; TextVal:''));      OptionLi┆
0x02a8e0…02a900             73 74 20 3a 20 41 52 52 41 59 5b 31 2e 2e 4d 61 78 4f 70 74 69 6f 6e 5d 20 4f 46 20 50 61 72 61   ┆st : ARRAY[1..MaxOption] OF Para┆
0x02a900…02a920             6d 52 65 63 20 3d 0d 0a 20 20 28 28 4b 69 6e 64 3a 4e 75 6d 65 72 69 63 3b 20 20 44 65 66 69 6e   ┆mRec =    ((Kind:Numeric;  Defin┆
0x02a920…02a940             65 64 3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f 72 64 3a 27 4e 55 4d 42 45 52 27 3b 20 4e 75 6d 56   ┆ed:FALSE ;KeyWord:'NUMBER'; NumV┆
0x02a940…02a960             61 6c 3a 20 4d 61 78 5f 4c 69 6e 65 2a 31 30 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆al: Max_Line*10;                ┆
0x02a960…02a980             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                ┆
0x02a980…02a9a0             20 20 20 20 20 20 20 20 20 54 65 78 74 56 61 6c 3a 27 27 29 2c 20 28 2a 6e 75 6d 62 65 72 20 6f   ┆         TextVal:''), (*number o┆
0x02a9a0…02a9c0             66 20 62 79 74 65 73 2a 29 0d 0a 20 20 20 28 4b 69 6e 64 3a 4e 75 6d 65 72 69 63 3b 20 20 44 65   ┆f bytes*)     (Kind:Numeric;  De┆
0x02a9c0…02a9e0             66 69 6e 65 64 3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f 72 64 3a 27 53 4b 49 50 27 3b 20 4e 75 6d   ┆fined:FALSE ;KeyWord:'SKIP'; Num┆
0x02a9e0…02aa00             56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a 27 27 29 2c 20 28 2a 62 79 74 65 73 20 74 6f 20 73   ┆Val:0; TextVal:''), (*bytes to s┆
0x02aa00…02aa20 (11, 0, 12) 6b 69 70 2a 29 0d 0a 20 20 20 28 4b 69 6e 64 3a 4f 6e 4f 66 66 3b 20 20 20 20 44 65 66 69 6e 65   ┆kip*)     (Kind:OnOff;    Define┆
0x02aa20…02aa40             64 3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f 72 64 3a 27 43 48 41 52 53 27 3b 20 4e 75 6d 56 61 6c   ┆d:FALSE ;KeyWord:'CHARS'; NumVal┆
0x02aa40…02aa60             3a 30 3b 20 54 65 78 74 56 61 6c 3a 27 4f 4e 27 29 2c 20 28 2a 63 68 61 72 73 2a 29 0d 0a 20 20   ┆:0; TextVal:'ON'), (*chars*)    ┆
0x02aa60…02aa80             20 28 4b 69 6e 64 3a 54 65 78 74 54 79 70 65 3b 20 44 65 66 69 6e 65 64 3a 46 41 4c 53 45 20 3b   ┆ (Kind:TextType; Defined:FALSE ;┆
0x02aa80…02aaa0             4b 65 79 57 6f 72 64 3a 27 46 4f 52 4d 41 54 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74   ┆KeyWord:'FORMAT'; NumVal:0; Text┆
0x02aaa0…02aac0             56 61 6c 3a 27 48 45 58 27 29 2c 20 28 2a 66 6f 72 6d 61 74 2a 29 0d 0a 20 20 20 28 4b 69 6e 64   ┆Val:'HEX'), (*format*)     (Kind┆
0x02aac0…02aae0             3a 4f 6e 4f 66 66 3b 20 20 20 20 44 65 66 69 6e 65 64 3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f 72   ┆:OnOff;    Defined:FALSE ;KeyWor┆
0x02aae0…02ab00             64 3a 27 54 45 53 54 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a 27 4f 46 46   ┆d:'TEST'; NumVal:0; TextVal:'OFF┆
0x02ab00…02ab20             27 29 20 29 3b 20 28 2a 74 65 73 74 2a 29 0d 0a 0d 0a 0d 0a 76 61 72 0d 0a 20 20 53 6f 75 72 63   ┆') ); (*test*)      var    Sourc┆
0x02ab20…02ab40             65 3a 20 46 49 4c 45 3b 0d 0a 0d 0a 63 6f 6e 73 74 0d 0a 20 20 52 65 63 53 69 7a 65 20 3d 20 31   ┆e: FILE;    const    RecSize = 1┆
0x02ab40…02ab60             32 38 3b 0d 0a 20 20 42 75 66 53 69 7a 65 20 3d 20 31 36 30 3b 0d 0a 20 20 42 75 66 50 6f 73 3a   ┆28;    BufSize = 160;    BufPos:┆
0x02ab60…02ab80             20 77 6f 72 64 20 3d 20 52 65 63 53 69 7a 65 3b 0d 0a 20 20 42 75 66 4e 6f 3a 20 77 6f 72 64 20   ┆ word = RecSize;    BufNo: word ┆
0x02ab80…02aba0             3d 20 42 75 66 53 69 7a 65 3b 0d 0a 20 20 52 65 63 73 52 65 61 64 3a 20 77 6f 72 64 20 3d 20 31   ┆= BufSize;    RecsRead: word = 1┆
0x02aba0…02abc0             3b 0d 0a 20 20 42 79 74 65 50 6f 73 3a 20 6c 6f 6e 67 69 6e 74 20 3d 20 30 3b 0d 0a 20 20 4c 67   ┆;    BytePos: longint = 0;    Lg┆
0x02abc0…02abe0             74 5f 73 6f 75 72 63 65 5f 66 69 6c 65 3a 20 6c 6f 6e 67 69 6e 74 20 3d 20 2d 32 3b 0d 0a 0d 0a   ┆t_source_file: longint = -2;    ┆
0x02abe0…02ac00             76 61 72 0d 0a 20 20 49 6e 70 75 74 42 75 66 66 65 72 3a 20 61 72 72 61 79 20 5b 31 2e 2e 42 75   ┆var    InputBuffer: array [1..Bu┆
0x02ac00…02ac20 (11, 0, 13) 66 53 69 7a 65 2c 20 31 2e 2e 52 65 63 53 69 7a 65 5d 20 6f 66 20 62 79 74 65 3b 0d 0a 0d 0a 20   ┆fSize, 1..RecSize] of byte;     ┆
0x02ac20…02ac40             20 6e 61 6d 65 3a 20 73 74 72 69 6e 67 5b 38 30 5d 3b 20 7b 20 78 78 78 20 49 6e 64 74 69 6c 20   ┆ name: string[80]; { xxx Indtil ┆
0x02ac40…02ac60             76 69 64 65 72 65 20 68 65 72 2c 20 73 65 6c 76 20 6f 6d 20 64 65 74 20 69 6b 6b 65 20 65 72 20   ┆videre her, selv om det ikke er ┆
0x02ac60…02ac80             6b 9b 6e 74 20 7d 0d 0a 0d 0a 0d 0a 46 75 6e 63 74 69 6f 6e 20 47 65 74 46 69 6c 65 53 69 7a 65   ┆kЏnt }      Function GetFileSize┆
0x02ac80…02aca0             28 20 6e 61 6d 65 3a 20 73 74 72 69 6e 67 29 3a 20 6c 6f 6e 67 69 6e 74 3b 0d 0a 76 61 72 0d 0a   ┆( name: string): longint;  var  ┆
0x02aca0…02acc0             20 20 66 3a 20 66 69 6c 65 20 6f 66 20 62 79 74 65 3b 0d 0a 0d 0a 62 65 67 69 6e 0d 0a 20 20 41   ┆  f: file of byte;    begin    A┆
0x02acc0…02ace0             73 73 69 67 6e 28 66 2c 20 6e 61 6d 65 29 3b 0d 0a 20 20 7b 24 49 2d 7d 0d 0a 20 20 52 65 73 65   ┆ssign(f, name);    {$I-}    Rese┆
0x02ace0…02ad00             74 28 66 29 3b 0d 0a 20 20 7b 24 49 2b 7d 0d 0a 20 20 69 66 20 49 4f 52 65 73 75 6c 74 20 3c 3e   ┆t(f);    {$I+}    if IOResult <>┆
0x02ad00…02ad20             20 30 20 74 68 65 6e 0d 0a 20 20 20 20 47 65 74 46 69 6c 65 53 69 7a 65 20 3a 3d 20 2d 31 0d 0a   ┆ 0 then      GetFileSize := -1  ┆
0x02ad20…02ad40             20 20 65 6c 73 65 20 62 65 67 69 6e 0d 0a 20 20 20 20 47 65 74 46 69 6c 65 53 69 7a 65 20 3a 3d   ┆  else begin      GetFileSize :=┆
0x02ad40…02ad60             20 46 69 6c 65 53 69 7a 65 28 66 29 3b 0d 0a 20 20 20 20 43 6c 6f 73 65 28 66 29 3b 0d 0a 20 20   ┆ FileSize(f);      Close(f);    ┆
0x02ad60…02ad80             65 6e 64 20 7b 69 66 7d 3b 0d 0a 65 6e 64 20 28 2a 20 47 65 74 46 69 6c 65 53 69 7a 65 20 2a 29   ┆end {if};  end (* GetFileSize *)┆
0x02ad80…02ada0             3b 0d 0a 0d 0a 50 72 6f 63 65 64 75 72 65 20 4f 70 65 6e 42 79 74 65 46 69 6c 65 28 6e 61 6d 65   ┆;    Procedure OpenByteFile(name┆
0x02ada0…02adc0             3a 20 73 74 72 69 6e 67 29 3b 0d 0a 62 65 67 69 6e 0d 0a 20 20 61 73 73 69 67 6e 28 73 6f 75 72   ┆: string);  begin    assign(sour┆
0x02adc0…02ade0             63 65 2c 20 6e 61 6d 65 29 3b 0d 0a 20 20 72 65 73 65 74 28 73 6f 75 72 63 65 2c 20 52 65 63 53   ┆ce, name);    reset(source, RecS┆
0x02ade0…02ae00             69 7a 65 29 3b 0d 0a 0d 0a 20 20 4c 67 74 5f 53 6f 75 72 63 65 5f 66 69 6c 65 20 3a 3d 20 47 65   ┆ize);      Lgt_Source_file := Ge┆
0x02ae00…02ae20 (11, 0, 14) 74 46 69 6c 65 53 69 7a 65 28 6e 61 6d 65 29 3b 0d 0a 20 20 42 75 66 50 6f 73 20 3a 3d 20 31 3b   ┆tFileSize(name);    BufPos := 1;┆
0x02ae20…02ae40             0d 0a 20 20 42 75 66 4e 6f 20 3a 3d 20 31 3b 0d 0a 20 20 42 6c 6f 63 6b 52 65 61 64 28 53 6f 75   ┆    BufNo := 1;    BlockRead(Sou┆
0x02ae40…02ae60             72 63 65 2c 20 49 6e 70 75 74 42 75 66 66 65 72 2c 20 42 75 66 53 69 7a 65 2c 20 52 65 63 73 52   ┆rce, InputBuffer, BufSize, RecsR┆
0x02ae60…02ae80             65 61 64 29 3b 0d 0a 20 20 42 79 74 65 50 6f 73 20 3a 3d 20 30 3b 0d 0a 0d 0a 65 6e 64 3b 20 28   ┆ead);    BytePos := 0;    end; (┆
0x02ae80…02aea0             2a 20 4f 70 65 6e 42 79 74 65 46 69 6c 65 20 2a 29 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 47 65   ┆* OpenByteFile *)    function Ge┆
0x02aea0…02aec0             74 42 79 74 65 28 76 61 72 20 42 79 74 3a 20 62 79 74 65 29 3a 20 62 6f 6f 6c 65 61 6e 3b 0d 0a   ┆tByte(var Byt: byte): boolean;  ┆
0x02aec0…02aee0             62 65 67 69 6e 0d 0a 20 20 42 79 74 20 3a 3d 20 49 6e 70 75 74 42 75 66 66 65 72 5b 20 42 75 66   ┆begin    Byt := InputBuffer[ Buf┆
0x02aee0…02af00             4e 6f 2c 20 42 75 66 50 6f 73 20 5d 3b 0d 0a 20 20 42 79 74 65 50 6f 73 20 3a 3d 20 42 79 74 65   ┆No, BufPos ];    BytePos := Byte┆
0x02af00…02af20             50 6f 73 20 2b 20 31 3b 0d 0a 20 20 47 65 74 42 79 74 65 20 3a 3d 20 4c 67 74 5f 53 6f 75 72 63   ┆Pos + 1;    GetByte := Lgt_Sourc┆
0x02af20…02af40             65 5f 66 69 6c 65 20 3e 3d 20 42 79 74 65 50 6f 73 3b 0d 0a 20 20 42 75 66 50 6f 73 20 3a 3d 20   ┆e_file >= BytePos;    BufPos := ┆
0x02af40…02af60             42 75 66 50 6f 73 20 2b 20 31 3b 0d 0a 20 20 69 66 20 42 75 66 50 6f 73 20 3e 20 52 65 63 53 69   ┆BufPos + 1;    if BufPos > RecSi┆
0x02af60…02af80             7a 65 20 74 68 65 6e 0d 0a 20 20 20 62 65 67 69 6e 0d 0a 20 20 20 20 20 42 75 66 50 6f 73 20 3a   ┆ze then     begin       BufPos :┆
0x02af80…02afa0             3d 20 31 3b 0d 0a 20 20 20 20 20 42 75 66 4e 6f 20 3a 3d 20 42 75 66 4e 6f 20 2b 20 31 3b 0d 0a   ┆= 1;       BufNo := BufNo + 1;  ┆
0x02afa0…02afc0             20 20 20 20 20 69 66 20 42 75 66 4e 6f 20 3e 20 42 75 66 53 69 7a 65 20 74 68 65 6e 0d 0a 20 20   ┆     if BufNo > BufSize then    ┆
0x02afc0…02afe0             20 20 20 20 62 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 42 75 66 4e 6f 20 3a 3d 20 31 3b 0d 0a   ┆    begin          BufNo := 1;  ┆
0x02afe0…02b000             20 20 20 20 20 20 20 20 69 66 20 52 65 63 73 52 65 61 64 20 3e 20 30 20 74 68 65 6e 0d 0a 20 20   ┆        if RecsRead > 0 then    ┆
0x02b000…02b020 (11, 0, 15) 20 20 20 20 20 20 20 20 20 42 6c 6f 63 6b 52 65 61 64 28 53 6f 75 72 63 65 2c 20 49 6e 70 75 74   ┆         BlockRead(Source, Input┆
0x02b020…02b040             42 75 66 66 65 72 2c 20 42 75 66 53 69 7a 65 2c 20 52 65 63 73 52 65 61 64 29 3b 0d 0a 20 20 20   ┆Buffer, BufSize, RecsRead);     ┆
0x02b040…02b060             20 20 20 65 6e 64 3b 0d 0a 20 20 20 65 6e 64 3b 0d 0a 65 6e 64 3b 20 28 2a 20 47 65 74 42 79 74   ┆   end;     end;  end; (* GetByt┆
0x02b060…02b080             65 20 2a 29 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 4c 6f 6f 6b 41 68 65 61 64 28 76 61 72 20 42   ┆e *)    function LookAhead(var B┆
0x02b080…02b0a0             79 74 3a 20 62 79 74 65 29 3a 20 62 6f 6f 6c 65 61 6e 3b 0d 0a 62 65 67 69 6e 0d 0a 20 20 69 66   ┆yt: byte): boolean;  begin    if┆
0x02b0a0…02b0c0             20 4c 67 74 5f 53 6f 75 72 63 65 5f 66 69 6c 65 20 3e 3d 20 42 79 74 65 50 6f 73 20 74 68 65 6e   ┆ Lgt_Source_file >= BytePos then┆
0x02b0c0…02b0e0             0d 0a 20 20 62 65 67 69 6e 0d 0a 20 20 20 20 4c 6f 6f 6b 41 68 65 61 64 20 3a 3d 20 74 72 75 65   ┆    begin      LookAhead := true┆
0x02b0e0…02b100             3b 0d 0a 20 20 20 20 42 79 74 20 3a 3d 20 49 6e 70 75 74 42 75 66 66 65 72 5b 20 42 75 66 4e 6f   ┆;      Byt := InputBuffer[ BufNo┆
0x02b100…02b120             2c 20 42 75 66 50 6f 73 20 5d 3b 0d 0a 20 20 65 6e 64 0d 0a 20 20 65 6c 73 65 0d 0a 20 20 62 65   ┆, BufPos ];    end    else    be┆
0x02b120…02b140             67 69 6e 0d 0a 20 20 20 20 6c 6f 6f 6b 41 68 65 61 64 20 3a 3d 20 66 61 6c 73 65 3b 0d 0a 20 20   ┆gin      lookAhead := false;    ┆
0x02b140…02b160             20 20 62 79 74 20 3a 3d 20 30 3b 0d 0a 20 20 65 6e 64 3b 0d 0a 65 6e 64 3b 20 28 2a 20 4c 6f 6f   ┆  byt := 0;    end;  end; (* Loo┆
0x02b160…02b180             6b 41 68 65 61 64 20 2a 29 0d 0a 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 73 74 72 77 7a 65 72 6f   ┆kAhead *)      function strwzero┆
0x02b180…02b1a0             28 20 69 3a 20 6c 6f 6e 67 69 6e 74 3b 20 73 69 7a 65 2c 20 62 61 73 65 3a 20 69 6e 74 65 67 65   ┆( i: longint; size, base: intege┆
0x02b1a0…02b1c0             72 20 29 3a 20 73 74 72 69 6e 67 3b 0d 0a 76 61 72 0d 0a 20 20 6b 2c 20 6c 2c 20 6d 2c 20 6c 6f   ┆r ): string;  var    k, l, m, lo┆
0x02b1c0…02b1e0             77 20 3a 20 6c 6f 6e 67 69 6e 74 3b 0d 0a 20 20 74 65 6d 70 3a 20 73 74 72 69 6e 67 5b 33 34 5d   ┆w : longint;    temp: string[34]┆
0x02b1e0…02b200             3b 0d 0a 63 6f 6e 73 74 0d 0a 20 20 64 69 67 69 74 3a 20 61 72 72 61 79 20 5b 20 30 2e 2e 31 35   ┆;  const    digit: array [ 0..15┆
0x02b200…02b220 (11, 1, 1)  20 5d 20 6f 66 20 63 68 61 72 20 3d 0d 0a 20 20 20 20 20 20 20 20 20 28 20 27 30 27 2c 20 27 31   ┆ ] of char =           ( '0', '1┆
0x02b220…02b240             27 2c 20 27 32 27 2c 20 27 33 27 2c 20 27 34 27 2c 20 27 35 27 2c 20 27 36 27 2c 20 27 37 27 2c   ┆', '2', '3', '4', '5', '6', '7',┆
0x02b240…02b260             20 27 38 27 2c 20 27 39 27 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 20 27 41 27 2c 20 27 42 27 2c   ┆ '8', '9',             'A', 'B',┆
0x02b260…02b280             20 27 43 27 2c 20 27 44 27 2c 20 27 45 27 2c 20 27 46 27 20 29 3b 0d 0a 62 65 67 69 6e 0d 0a 20   ┆ 'C', 'D', 'E', 'F' );  begin   ┆
0x02b280…02b2a0             20 74 65 6d 70 5b 30 5d 20 3a 3d 20 63 68 72 28 73 69 7a 65 29 3b 0d 0a 20 20 66 6f 72 20 6b 20   ┆ temp[0] := chr(size);    for k ┆
0x02b2a0…02b2c0             3a 3d 20 31 20 74 6f 20 73 69 7a 65 20 64 6f 0d 0a 20 20 20 20 74 65 6d 70 5b 6b 5d 20 3a 3d 20   ┆:= 1 to size do      temp[k] := ┆
0x02b2c0…02b2e0             27 30 27 3b 0d 0a 0d 0a 20 20 6b 20 3a 3d 20 61 62 73 28 69 29 3b 0d 0a 20 20 69 66 20 69 20 3c   ┆'0';      k := abs(i);    if i <┆
0x02b2e0…02b300             20 30 20 74 68 65 6e 0d 0a 20 20 20 20 62 65 67 69 6e 0d 0a 20 20 20 20 6c 6f 77 20 3a 3d 20 32   ┆ 0 then      begin      low := 2┆
0x02b300…02b320             3b 0d 0a 20 20 20 20 74 65 6d 70 5b 31 5d 20 3a 3d 20 27 2d 27 3b 0d 0a 20 20 20 20 65 6e 64 0d   ┆;      temp[1] := '-';      end ┆
0x02b320…02b340             0a 20 20 65 6c 73 65 0d 0a 20 20 20 20 6c 6f 77 20 3a 3d 20 31 3b 0d 0a 0d 0a 20 20 6c 20 3a 3d   ┆   else      low := 1;      l :=┆
0x02b340…02b360             20 73 69 7a 65 20 2b 20 31 3b 0d 0a 20 20 77 68 69 6c 65 20 28 20 6b 20 3c 3e 20 30 20 29 20 20   ┆ size + 1;    while ( k <> 0 )  ┆
0x02b360…02b380             61 6e 64 20 28 20 6c 20 3e 20 6c 6f 77 20 29 20 64 6f 0d 0a 20 20 62 65 67 69 6e 0d 0a 20 20 20   ┆and ( l > low ) do    begin     ┆
0x02b380…02b3a0             20 6c 20 3a 3d 20 6c 20 2d 20 31 3b 0d 0a 20 20 20 20 74 65 6d 70 5b 6c 5d 20 3a 3d 20 64 69 67   ┆ l := l - 1;      temp[l] := dig┆
0x02b3a0…02b3c0             69 74 5b 20 6b 20 6d 6f 64 20 62 61 73 65 20 5d 3b 0d 0a 20 20 20 20 6b 20 3a 3d 20 6b 20 64 69   ┆it[ k mod base ];      k := k di┆
0x02b3c0…02b3e0             76 20 62 61 73 65 3b 0d 0a 20 20 65 6e 64 3b 0d 0a 20 20 69 66 20 6b 20 3c 3e 20 30 20 74 68 65   ┆v base;    end;    if k <> 0 the┆
0x02b3e0…02b400             6e 20 20 7b 20 6f 76 65 72 66 6c 6f 77 20 7d 0d 0a 20 20 20 20 74 65 6d 70 5b 6c 6f 77 5d 20 3a   ┆n  { overflow }      temp[low] :┆
0x02b400…02b420 (11, 1, 2)  3d 20 27 2a 27 3b 0d 0a 20 20 73 74 72 77 7a 65 72 6f 20 3a 3d 20 74 65 6d 70 3b 0d 0a 65 6e 64   ┆= '*';    strwzero := temp;  end┆
0x02b420…02b440             3b 0d 0a 0d 0a 70 72 6f 63 65 64 75 72 65 20 50 72 69 6e 74 44 61 74 65 28 76 61 72 20 66 3a 20   ┆;    procedure PrintDate(var f: ┆
0x02b440…02b460             74 65 78 74 29 3b 0d 0a 76 61 72 0d 0a 20 20 64 2c 20 6d 2c 20 79 2c 20 64 6f 77 3a 20 77 6f 72   ┆text);  var    d, m, y, dow: wor┆
0x02b460…02b480             64 3b 0d 0a 0d 0a 62 65 67 69 6e 0d 0a 20 20 47 65 74 44 61 74 65 28 79 2c 20 6d 2c 20 64 2c 20   ┆d;    begin    GetDate(y, m, d, ┆
0x02b480…02b4a0             64 6f 77 29 3b 0d 0a 20 20 77 72 69 74 65 28 66 2c 20 73 74 72 77 7a 65 72 6f 28 20 79 2c 20 34   ┆dow);    write(f, strwzero( y, 4┆
0x02b4a0…02b4c0             2c 20 31 30 29 2c 20 27 2d 27 2c 20 73 74 72 77 7a 65 72 6f 28 20 6d 2c 20 32 2c 20 31 30 29 20   ┆, 10), '-', strwzero( m, 2, 10) ┆
0x02b4c0…02b4e0             29 3b 0d 0a 20 20 77 72 69 74 65 28 66 2c 20 27 2d 27 2c 20 73 74 72 77 7a 65 72 6f 28 20 64 2c   ┆);    write(f, '-', strwzero( d,┆
0x02b4e0…02b500             20 32 2c 20 31 30 29 20 29 3b 0d 0a 0d 0a 65 6e 64 20 7b 50 72 69 6e 74 44 61 74 65 7d 3b 0d 0a   ┆ 2, 10) );    end {PrintDate};  ┆
0x02b500…02b520             0d 0a 70 72 6f 63 65 64 75 72 65 20 50 72 69 6e 74 54 69 6d 65 28 76 61 72 20 66 3a 20 74 65 78   ┆  procedure PrintTime(var f: tex┆
0x02b520…02b540             74 29 3b 0d 0a 76 61 72 0d 0a 20 20 68 2c 20 6d 2c 20 73 2c 20 64 73 3a 20 77 6f 72 64 3b 0d 0a   ┆t);  var    h, m, s, ds: word;  ┆
0x02b540…02b560             0d 0a 62 65 67 69 6e 0d 0a 20 20 47 65 74 54 69 6d 65 28 68 2c 20 6d 2c 20 73 2c 20 64 73 29 3b   ┆  begin    GetTime(h, m, s, ds);┆
0x02b560…02b580             0d 0a 20 20 77 72 69 74 65 28 66 2c 20 73 74 72 77 7a 65 72 6f 28 20 68 2c 20 32 2c 20 31 30 29   ┆    write(f, strwzero( h, 2, 10)┆
0x02b580…02b5a0             2c 20 27 3a 27 2c 20 73 74 72 77 7a 65 72 6f 28 20 6d 2c 20 32 2c 20 31 30 29 20 29 3b 0d 0a 7b   ┆, ':', strwzero( m, 2, 10) );  {┆
0x02b5a0…02b5c0             20 77 72 69 74 65 28 66 2c 20 27 3a 27 2c 20 73 74 72 77 7a 65 72 6f 28 20 64 2c 20 32 2c 20 31   ┆ write(f, ':', strwzero( d, 2, 1┆
0x02b5c0…02b5e0             30 29 20 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a 65 6e 64 20 7b 50 72 69   ┆0) );                }  end {Pri┆
0x02b5e0…02b600             6e 74 54 69 6d 65 7d 3b 0d 0a 0d 0a 0d 0a 0d 0a 63 6f 6e 73 74 0d 0a 20 20 6e 6c 20 3d 20 31 30   ┆ntTime};        const    nl = 10┆
0x02b600…02b620 (11, 1, 3)  3b 0d 0a 20 20 68 65 78 5f 64 69 67 69 74 3a 20 61 72 72 61 79 20 5b 30 2e 2e 31 35 5d 20 6f 66   ┆;    hex_digit: array [0..15] of┆
0x02b620…02b640             20 63 68 61 72 20 3d 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 20 27 30 27 2c 20 27 31   ┆ char =                ( '0', '1┆
0x02b640…02b660             27 2c 20 27 32 27 2c 20 27 33 27 2c 20 27 34 27 2c 20 27 35 27 2c 20 27 36 27 2c 20 27 37 27 2c   ┆', '2', '3', '4', '5', '6', '7',┆
0x02b660…02b680             20 27 38 27 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 39 27 2c 20 27 41 27 2c   ┆ '8',                  '9', 'A',┆
0x02b680…02b6a0             20 27 42 27 2c 20 27 43 27 2c 20 27 44 27 2c 20 27 45 27 2c 20 27 46 27 20 29 3b 0d 0a 0d 0a 76   ┆ 'B', 'C', 'D', 'E', 'F' );    v┆
0x02b6a0…02b6c0             61 72 0d 0a 20 20 75 6e 69 71 75 65 2c 20 73 6b 69 70 70 65 64 2c 20 6e 6f 74 5f 65 6f 66 3a 20   ┆ar    unique, skipped, not_eof: ┆
0x02b6c0…02b6e0             62 6f 6f 6c 65 61 6e 3b 0d 0a 20 20 6e 65 78 74 5f 6c 69 6e 65 2c 20 70 72 65 76 5f 6c 69 6e 65   ┆boolean;    next_line, prev_line┆
0x02b6e0…02b700             3a 20 61 72 72 61 79 20 5b 31 2e 2e 6d 61 78 5f 6c 69 6e 65 5d 20 6f 66 20 62 79 74 65 3b 0d 0a   ┆: array [1..max_line] of byte;  ┆
0x02b700…02b720             20 20 62 79 74 3a 20 62 79 74 65 3b 0d 0a 20 20 69 2c 20 6a 2c 20 72 65 73 75 6c 74 2c 20 70 61   ┆  byt: byte;    i, j, result, pa┆
0x02b720…02b740             72 5f 63 6f 75 6e 74 3a 20 69 6e 74 65 67 65 72 3b 0d 0a 20 20 61 64 72 2c 20 66 69 72 73 74 5f   ┆r_count: integer;    adr, first_┆
0x02b740…02b760             61 64 72 3a 20 6c 6f 6e 67 69 6e 74 3b 0d 0a 20 20 70 61 72 5f 73 74 72 3a 20 73 74 72 69 6e 67   ┆adr: longint;    par_str: string┆
0x02b760…02b780             5b 34 30 5d 3b 0d 0a 20 20 50 5f 73 74 72 3a 20 50 61 74 68 53 74 72 3b 0d 0a 20 20 44 5f 73 74   ┆[40];    P_str: PathStr;    D_st┆
0x02b780…02b7a0             72 3a 20 44 69 72 53 74 72 3b 0d 0a 20 20 4e 5f 73 74 72 3a 20 4e 61 6d 65 53 74 72 3b 0d 0a 20   ┆r: DirStr;    N_str: NameStr;   ┆
0x02b7a0…02b7c0             20 45 5f 73 74 72 3a 20 45 78 74 53 74 72 3b 0d 0a 20 20 63 68 5f 6e 61 6d 65 3a 20 61 72 72 61   ┆ E_str: ExtStr;    ch_name: arra┆
0x02b7c0…02b7e0             79 20 5b 30 2e 2e 32 35 35 5d 20 6f 66 20 73 74 72 69 6e 67 5b 33 5d 3b 0d 0a 0d 0a 20 20 62 79   ┆y [0..255] of string[3];      by┆
0x02b7e0…02b800             74 65 5f 63 6f 75 6e 74 2c 20 73 6b 69 70 5f 63 6f 75 6e 74 3a 20 6c 6f 6e 67 69 6e 74 3b 0d 0a   ┆te_count, skip_count: longint;  ┆
0x02b800…02b820 (11, 1, 4)  20 20 53 68 6f 77 5f 63 68 61 72 2c 20 54 65 73 74 5f 72 65 71 75 65 73 74 65 64 3a 20 62 6f 6f   ┆  Show_char, Test_requested: boo┆
0x02b820…02b840             6c 65 61 6e 3b 0d 0a 20 20 6e 75 6d 5f 6d 6f 64 65 3a 20 69 6e 74 65 67 65 72 3b 0d 0a 20 20 6f   ┆lean;    num_mode: integer;    o┆
0x02b840…02b860             75 74 70 66 69 6c 65 3a 20 73 74 72 69 6e 67 5b 36 30 5d 3b 0d 0a 20 20 4f 5f 62 75 66 66 3a 20   ┆utpfile: string[60];    O_buff: ┆
0x02b860…02b880             61 72 72 61 79 5b 31 2e 2e 34 30 39 36 5d 20 6f 66 20 62 79 74 65 3b 0d 0a 0d 0a 70 72 6f 63 65   ┆array[1..4096] of byte;    proce┆
0x02b880…02b8a0             64 75 72 65 20 77 72 69 74 65 5f 68 65 78 28 62 3a 20 62 79 74 65 29 3b 0d 0a 76 61 72 0d 0a 20   ┆dure write_hex(b: byte);  var   ┆
0x02b8a0…02b8c0             20 69 2c 20 6a 3a 20 69 6e 74 65 67 65 72 3b 0d 0a 62 65 67 69 6e 0d 0a 20 20 69 20 3a 3d 20 62   ┆ i, j: integer;  begin    i := b┆
0x02b8c0…02b8e0             20 64 69 76 20 31 36 3b 0d 0a 20 20 6a 20 3a 3d 20 62 20 6d 6f 64 20 31 36 3b 0d 0a 20 20 77 72   ┆ div 16;    j := b mod 16;    wr┆
0x02b8e0…02b900             69 74 65 28 68 65 78 5f 64 69 67 69 74 5b 69 5d 3a 31 2c 20 68 65 78 5f 64 69 67 69 74 5b 6a 5d   ┆ite(hex_digit[i]:1, hex_digit[j]┆
0x02b900…02b920             3a 31 29 3b 0d 0a 65 6e 64 20 7b 77 72 69 74 65 5f 68 65 78 7d 3b 0d 0a 0d 0a 70 72 6f 63 65 64   ┆:1);  end {write_hex};    proced┆
0x02b920…02b940             75 72 65 20 70 61 72 61 6d 5f 65 72 72 6f 72 28 73 74 72 3a 20 73 74 72 69 6e 67 29 3b 0d 0a 62   ┆ure param_error(str: string);  b┆
0x02b940…02b960             65 67 69 6e 0d 0a 20 20 77 72 69 74 65 6c 6e 28 27 2a 2a 2a 20 45 52 52 4f 52 20 2a 2a 2a 20 27   ┆egin    writeln('*** ERROR *** '┆
0x02b960…02b980             2c 20 73 74 72 29 3b 0d 0a 20 20 68 61 6c 74 3b 0d 0a 65 6e 64 3b 0d 0a 0d 0a 70 72 6f 63 65 64   ┆, str);    halt;  end;    proced┆
0x02b980…02b9a0             75 72 65 20 72 65 61 64 5f 63 61 6c 6c 70 61 72 61 6d 65 74 65 72 73 3b 0d 0a 76 61 72 0d 0a 20   ┆ure read_callparameters;  var   ┆
0x02b9a0…02b9c0             20 69 2c 20 6b 3a 20 69 6e 74 65 67 65 72 3b 0d 0a 20 20 6b 65 79 5f 74 65 78 74 3a 20 73 74 72   ┆ i, k: integer;    key_text: str┆
0x02b9c0…02b9e0             69 6e 67 3b 0d 0a 20 20 64 69 72 5f 73 74 3a 20 44 69 72 53 74 72 3b 0d 0a 20 20 6e 61 6d 65 5f   ┆ing;    dir_st: DirStr;    name_┆
0x02b9e0…02ba00             73 74 3a 20 4e 61 6d 65 53 74 72 3b 0d 0a 20 20 65 78 74 5f 73 74 3a 20 45 78 74 53 74 72 3b 0d   ┆st: NameStr;    ext_st: ExtStr; ┆
0x02ba00…02ba20 (11, 1, 5)  0a 0d 0a 62 65 67 69 6e 0d 0a 0d 0a 20 20 69 66 20 50 61 72 61 6d 43 6f 75 6e 74 20 3d 20 30 20   ┆   begin      if ParamCount = 0 ┆
0x02ba20…02ba40             74 68 65 6e 0d 0a 20 20 20 20 62 65 67 69 6e 20 7b 20 54 68 65 20 75 73 65 72 20 6d 75 73 74 20   ┆then      begin { The user must ┆
0x02ba40…02ba60             67 69 76 65 20 61 74 20 6c 65 61 73 74 20 74 68 65 20 69 6e 70 75 74 20 66 69 6c 65 20 61 73 20   ┆give at least the input file as ┆
0x02ba60…02ba80             70 61 72 61 6d 65 74 65 72 20 7d 0d 0a 20 20 20 20 20 20 53 68 6f 77 68 65 6c 70 3b 0d 0a 20 20   ┆parameter }        Showhelp;    ┆
0x02ba80…02baa0             20 20 20 20 48 61 6c 74 3b 0d 0a 20 20 20 20 65 6e 64 3b 0d 0a 0d 0a 20 20 47 65 74 50 61 72 61   ┆    Halt;      end;      GetPara┆
0x02baa0…02bac0             6d 73 28 20 50 61 72 61 6d 6c 69 73 74 2c 20 4d 61 78 50 61 72 61 6d 2c 20 4f 70 74 69 6f 6e 4c   ┆ms( Paramlist, MaxParam, OptionL┆
0x02bac0…02bae0             69 73 74 2c 20 4d 61 78 4f 70 74 69 6f 6e 29 3b 0d 0a 0d 0a 20 20 62 79 74 65 5f 63 6f 75 6e 74   ┆ist, MaxOption);      byte_count┆
0x02bae0…02bb00             20 3a 3d 20 4f 70 74 69 6f 6e 4c 69 73 74 5b 31 5d 2e 4e 75 6d 56 61 6c 3b 0d 0a 0d 0a 20 20 73   ┆ := OptionList[1].NumVal;      s┆
0x02bb00…02bb20             6b 69 70 5f 63 6f 75 6e 74 20 3a 3d 20 20 4f 70 74 69 6f 6e 4c 69 73 74 5b 32 5d 2e 4e 75 6d 56   ┆kip_count :=  OptionList[2].NumV┆
0x02bb20…02bb40             61 6c 3b 0d 0a 0d 0a 20 20 73 68 6f 77 5f 63 68 61 72 20 3a 3d 20 20 4f 70 74 69 6f 6e 4c 69 73   ┆al;      show_char :=  OptionLis┆
0x02bb40…02bb60             74 5b 33 5d 2e 54 65 78 74 56 61 6c 20 3d 20 27 4f 4e 27 3b 0d 0a 0d 0a 20 20 69 66 20 28 20 6e   ┆t[3].TextVal = 'ON';      if ( n┆
0x02bb60…02bb80             6f 74 20 73 68 6f 77 5f 63 68 61 72 20 29 20 61 6e 64 20 28 20 6e 6f 74 20 4f 70 74 69 6f 6e 4c   ┆ot show_char ) and ( not OptionL┆
0x02bb80…02bba0             69 73 74 5b 31 5d 2e 44 65 66 69 6e 65 64 20 29 20 74 68 65 6e 0d 0a 20 20 20 20 20 62 79 74 65   ┆ist[1].Defined ) then       byte┆
0x02bba0…02bbc0             5f 63 6f 75 6e 74 20 3a 3d 20 62 79 74 65 5f 63 6f 75 6e 74 20 2a 20 32 3b 0d 0a 0d 0a 20 20 63   ┆_count := byte_count * 2;      c┆
0x02bbc0…02bbe0             61 73 65 0d 0a 20 20 20 20 4d 61 74 63 68 4f 70 74 69 6f 6e 53 74 72 28 20 4f 70 74 69 6f 6e 4c   ┆ase      MatchOptionStr( OptionL┆
0x02bbe0…02bc00             69 73 74 5b 34 5d 2e 54 65 78 74 56 61 6c 2c 20 34 2c 20 27 48 45 58 20 4f 43 54 20 44 45 43 20   ┆ist[4].TextVal, 4, 'HEX OCT DEC ┆
0x02bc00…02bc20 (11, 1, 6)  27 29 20 6f 66 0d 0a 0d 0a 20 20 2d 31 3a 20 50 61 72 61 6d 5f 45 72 72 6f 72 28 27 20 4f 70 74   ┆') of      -1: Param_Error(' Opt┆
0x02bc20…02bc40             69 6f 6e 20 6e 6f 74 20 75 6e 69 71 75 65 20 27 29 3b 0d 0a 0d 0a 20 20 20 30 3a 20 50 61 72 61   ┆ion not unique ');       0: Para┆
0x02bc40…02bc60             6d 5f 45 72 72 6f 72 28 27 20 4f 70 74 69 6f 6e 20 6e 6f 74 20 76 61 6c 69 64 20 27 29 3b 0d 0a   ┆m_Error(' Option not valid ');  ┆
0x02bc60…02bc80             0d 0a 20 20 20 31 3a 20 6e 75 6d 5f 6d 6f 64 65 20 3a 3d 20 31 36 3b 0d 0a 0d 0a 20 20 20 32 3a   ┆     1: num_mode := 16;       2:┆
0x02bc80…02bca0             20 6e 75 6d 5f 6d 6f 64 65 20 3a 3d 20 20 38 3b 0d 0a 0d 0a 20 20 20 33 3a 20 6e 75 6d 5f 6d 6f   ┆ num_mode :=  8;       3: num_mo┆
0x02bca0…02bcc0             64 65 20 3a 3d 20 31 30 3b 0d 0a 0d 0a 20 20 65 6e 64 20 28 2a 63 61 73 65 20 2a 29 3b 0d 0a 0d   ┆de := 10;      end (*case *);   ┆
0x02bcc0…02bce0             0a 20 20 74 65 73 74 5f 72 65 71 75 65 73 74 65 64 20 3a 3d 20 20 4f 70 74 69 6f 6e 4c 69 73 74   ┆   test_requested :=  OptionList┆
0x02bce0…02bd00             5b 35 5d 2e 54 65 78 74 56 61 6c 20 3d 20 27 4f 4e 27 3b 0d 0a 0d 0a 0d 0a 20 20 6e 61 6d 65 20   ┆[5].TextVal = 'ON';        name ┆
0x02bd00…02bd20             3a 3d 20 50 61 72 61 6d 4c 69 73 74 5b 31 5d 2e 54 65 78 74 56 61 6c 3b 0d 0a 0d 0a 20 20 69 66   ┆:= ParamList[1].TextVal;      if┆
0x02bd20…02bd40             20 50 61 72 61 6d 4c 69 73 74 5b 32 5d 2e 44 65 66 69 6e 65 64 20 74 68 65 6e 0d 0a 20 20 20 20   ┆ ParamList[2].Defined then      ┆
0x02bd40…02bd60             6f 75 74 70 66 69 6c 65 20 3a 3d 20 50 61 72 61 6d 4c 69 73 74 5b 32 5d 2e 54 65 78 74 56 61 6c   ┆outpfile := ParamList[2].TextVal┆
0x02bd60…02bd80             0d 0a 20 20 65 6c 73 65 0d 0a 20 20 20 20 6f 75 74 70 66 69 6c 65 20 3a 3d 20 27 27 3b 0d 0a 0d   ┆    else      outpfile := '';   ┆
0x02bd80…02bda0             0a 20 20 46 69 6c 65 4d 6f 64 65 20 3a 3d 20 46 4d 5f 52 65 61 64 4f 6e 6c 79 3b 0d 0a 20 20 4f   ┆   FileMode := FM_ReadOnly;    O┆
0x02bda0…02bdc0             70 65 6e 42 79 74 65 46 69 6c 65 28 20 6e 61 6d 65 29 3b 0d 0a 0d 0a 20 20 46 69 6c 65 4d 6f 64   ┆penByteFile( name);      FileMod┆
0x02bdc0…02bde0             65 20 3a 3d 20 46 4d 5f 52 65 61 64 57 72 69 74 65 3b 0d 0a 20 20 61 73 73 69 67 6e 28 6f 75 74   ┆e := FM_ReadWrite;    assign(out┆
0x02bde0…02be00             70 75 74 2c 20 6f 75 74 70 66 69 6c 65 29 3b 0d 0a 20 20 53 65 74 54 65 78 74 42 75 66 28 4f 75   ┆put, outpfile);    SetTextBuf(Ou┆
0x02be00…02be20 (11, 1, 7)  74 70 75 74 2c 20 4f 5f 62 75 66 66 29 3b 0d 0a 20 20 72 65 77 72 69 74 65 28 6f 75 74 70 75 74   ┆tput, O_buff);    rewrite(output┆
0x02be20…02be40             29 3b 0d 0a 0d 0a 65 6e 64 20 28 2a 20 52 45 41 44 5f 43 41 4c 4c 50 41 52 41 4d 53 20 2a 29 3b   ┆);    end (* READ_CALLPARAMS *);┆
0x02be40…02be60             0d 0a 0d 0a 0d 0a 70 72 6f 63 65 64 75 72 65 20 77 72 69 74 65 5f 6c 69 6e 65 28 6e 63 68 3a 20   ┆      procedure write_line(nch: ┆
0x02be60…02be80             69 6e 74 65 67 65 72 29 3b 0d 0a 76 61 72 0d 0a 20 20 69 3a 20 69 6e 74 65 67 65 72 3b 0d 0a 0d   ┆integer);  var    i: integer;   ┆
0x02be80…02bea0             0a 62 65 67 69 6e 0d 0a 20 20 70 72 65 76 5f 6c 69 6e 65 20 3a 3d 20 6e 65 78 74 5f 6c 69 6e 65   ┆ begin    prev_line := next_line┆
0x02bea0…02bec0             3b 0d 0a 20 20 69 66 20 73 6b 69 70 70 65 64 20 74 68 65 6e 0d 0a 20 20 20 20 77 72 69 74 65 6c   ┆;    if skipped then      writel┆
0x02bec0…02bee0             6e 28 27 20 2d 20 41 62 6f 76 65 20 6c 69 6e 65 20 72 65 70 65 61 74 65 64 20 2d 20 27 29 3b 0d   ┆n(' - Above line repeated - '); ┆
0x02bee0…02bf00             0a 0d 0a 20 20 77 72 69 74 65 28 61 64 72 3a 38 2c 20 27 3a 27 29 3b 0d 0a 20 20 69 66 20 6e 75   ┆     write(adr:8, ':');    if nu┆
0x02bf00…02bf20             6d 5f 6d 6f 64 65 20 3c 3d 20 31 30 20 74 68 65 6e 20 77 72 69 74 65 28 27 20 27 29 3b 0d 0a 0d   ┆m_mode <= 10 then write(' ');   ┆
0x02bf20…02bf40             0a 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 74 6f 20 6e 63 68 20 64 6f 0d 0a 20 20 63 61 73 65 20   ┆   for i := 1 to nch do    case ┆
0x02bf40…02bf60             6e 75 6d 5f 6d 6f 64 65 20 6f 66 0d 0a 20 20 38 2c 20 31 30 3a 0d 0a 20 20 62 65 67 69 6e 0d 0a   ┆num_mode of    8, 10:    begin  ┆
0x02bf60…02bf80             20 20 20 20 77 72 69 74 65 28 27 20 27 2c 20 73 74 72 77 7a 65 72 6f 28 20 6e 65 78 74 5f 6c 69   ┆    write(' ', strwzero( next_li┆
0x02bf80…02bfa0             6e 65 5b 69 5d 2c 20 33 2c 20 6e 75 6d 5f 6d 6f 64 65 29 20 29 3b 0d 0a 20 20 65 6e 64 3b 0d 0a   ┆ne[i], 3, num_mode) );    end;  ┆
0x02bfa0…02bfc0             0d 0a 20 20 31 36 3a 0d 0a 20 20 62 65 67 69 6e 0d 0a 20 20 20 20 77 72 69 74 65 28 27 20 20 27   ┆    16:    begin      write('  '┆
0x02bfc0…02bfe0             29 3b 0d 0a 20 20 20 20 77 72 69 74 65 5f 68 65 78 28 20 6e 65 78 74 5f 6c 69 6e 65 5b 69 5d 20   ┆);      write_hex( next_line[i] ┆
0x02bfe0…02c000             29 3b 0d 0a 20 20 65 6e 64 3b 0d 0a 0d 0a 20 20 65 6e 64 20 7b 63 61 73 65 20 7d 3b 0d 0a 20 20   ┆);    end;      end {case };    ┆
0x02c000…02c020 (11, 1, 8)  77 72 69 74 65 6c 6e 3b 0d 0a 0d 0a 20 20 69 66 20 53 68 6f 77 5f 63 68 61 72 20 74 68 65 6e 0d   ┆writeln;      if Show_char then ┆
0x02c020…02c040             0a 20 20 62 65 67 69 6e 0d 0a 20 20 20 20 77 72 69 74 65 28 27 20 20 20 20 20 20 20 20 20 20 27   ┆   begin      write('          '┆
0x02c040…02c060             29 3b 0d 0a 20 20 20 20 66 6f 72 20 69 20 3a 3d 20 31 20 74 6f 20 6e 63 68 20 64 6f 0d 0a 20 20   ┆);      for i := 1 to nch do    ┆
0x02c060…02c080             20 20 20 20 77 72 69 74 65 28 63 68 5f 6e 61 6d 65 5b 6e 65 78 74 5f 6c 69 6e 65 5b 69 5d 5d 3a   ┆    write(ch_name[next_line[i]]:┆
0x02c080…02c0a0             34 29 3b 0d 0a 20 20 20 20 77 72 69 74 65 6c 6e 3b 0d 0a 20 20 65 6e 64 3b 0d 0a 0d 0a 65 6e 64   ┆4);      writeln;    end;    end┆
0x02c0a0…02c0c0             20 7b 77 72 69 74 65 5f 6c 69 6e 65 7d 3b 0d 0a 0d 0a 62 65 67 69 6e 0d 0a 20 72 65 61 64 5f 63   ┆ {write_line};    begin   read_c┆
0x02c0c0…02c0e0             61 6c 6c 50 61 72 61 6d 65 74 65 72 73 3b 0d 0a 0d 0a 20 20 20 77 72 69 74 65 28 27 20 46 49 4c   ┆allParameters;       write(' FIL┆
0x02c0e0…02c100             45 44 55 4d 50 20 76 2e 20 27 2c 20 56 65 72 73 69 6f 6e 2c 20 27 20 20 20 20 20 20 20 20 41 74   ┆EDUMP v. ', Version, '        At┆
0x02c100…02c120             3a 20 27 29 3b 0d 0a 20 20 20 50 72 69 6e 74 44 61 74 65 28 6f 75 74 70 75 74 29 3b 20 77 72 69   ┆: ');     PrintDate(output); wri┆
0x02c120…02c140             74 65 28 27 20 20 27 29 3b 20 50 72 69 6e 74 54 69 6d 65 28 6f 75 74 70 75 74 29 3b 20 77 72 69   ┆te('  '); PrintTime(output); wri┆
0x02c140…02c160             74 65 6c 6e 3b 0d 0a 20 20 20 77 72 69 74 65 6c 6e 28 27 20 20 20 20 4f 66 20 66 69 6c 65 3a 20   ┆teln;     writeln('    Of file: ┆
0x02c160…02c180             27 2c 20 46 45 78 70 61 6e 64 28 6e 61 6d 65 29 20 29 3b 0d 0a 0d 0a 20 66 6f 72 20 69 20 3a 3d   ┆', FExpand(name) );     for i :=┆
0x02c180…02c1a0             20 30 20 74 6f 20 32 35 35 20 64 6f 0d 0a 20 62 65 67 69 6e 0d 0a 20 20 20 63 68 5f 6e 61 6d 65   ┆ 0 to 255 do   begin     ch_name┆
0x02c1a0…02c1c0             5b 69 5d 20 3a 3d 20 63 68 72 28 69 29 20 2b 20 27 20 20 27 3b 0d 0a 20 65 6e 64 3b 0d 0a 20 63   ┆[i] := chr(i) + '  ';   end;   c┆
0x02c1c0…02c1e0             68 5f 6e 61 6d 65 5b 20 20 30 5d 20 3a 3d 20 27 4e 55 4c 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b   ┆h_name[  0] := 'NUL';   ch_name[┆
0x02c1e0…02c200             20 20 31 5d 20 3a 3d 20 27 53 4f 48 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 20 32 5d 20 3a 3d   ┆  1] := 'SOH';   ch_name[  2] :=┆
0x02c200…02c220 (11, 1, 9)  20 27 53 54 58 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 20 33 5d 20 3a 3d 20 27 45 54 58 27 3b   ┆ 'STX';   ch_name[  3] := 'ETX';┆
0x02c220…02c240             0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 20 34 5d 20 3a 3d 20 27 45 4f 54 27 3b 0d 0a 20 63 68 5f 6e   ┆   ch_name[  4] := 'EOT';   ch_n┆
0x02c240…02c260             61 6d 65 5b 20 20 35 5d 20 3a 3d 20 27 45 4e 51 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 20 36   ┆ame[  5] := 'ENQ';   ch_name[  6┆
0x02c260…02c280             5d 20 3a 3d 20 27 41 43 4b 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 20 37 5d 20 3a 3d 20 27 42   ┆] := 'ACK';   ch_name[  7] := 'B┆
0x02c280…02c2a0             45 4c 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 20 38 5d 20 3a 3d 20 27 42 53 20 27 3b 0d 0a 20   ┆EL';   ch_name[  8] := 'BS ';   ┆
0x02c2a0…02c2c0             63 68 5f 6e 61 6d 65 5b 20 20 39 5d 20 3a 3d 20 27 48 54 20 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65   ┆ch_name[  9] := 'HT ';   ch_name┆
0x02c2c0…02c2e0             5b 20 31 30 5d 20 3a 3d 20 27 4c 46 20 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 31 31 5d 20 3a   ┆[ 10] := 'LF ';   ch_name[ 11] :┆
0x02c2e0…02c300             3d 20 27 56 54 20 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 31 32 5d 20 3a 3d 20 27 46 46 20 27   ┆= 'VT ';   ch_name[ 12] := 'FF '┆
0x02c300…02c320             3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 31 33 5d 20 3a 3d 20 27 43 52 20 27 3b 0d 0a 20 63 68 5f   ┆;   ch_name[ 13] := 'CR ';   ch_┆
0x02c320…02c340             6e 61 6d 65 5b 20 31 34 5d 20 3a 3d 20 27 53 4f 20 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 31   ┆name[ 14] := 'SO ';   ch_name[ 1┆
0x02c340…02c360             35 5d 20 3a 3d 20 27 53 49 20 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 31 36 5d 20 3a 3d 20 27   ┆5] := 'SI ';   ch_name[ 16] := '┆
0x02c360…02c380             44 4c 45 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 31 37 5d 20 3a 3d 20 27 44 43 31 27 3b 0d 0a   ┆DLE';   ch_name[ 17] := 'DC1';  ┆
0x02c380…02c3a0             20 63 68 5f 6e 61 6d 65 5b 20 31 38 5d 20 3a 3d 20 27 44 43 32 27 3b 0d 0a 20 63 68 5f 6e 61 6d   ┆ ch_name[ 18] := 'DC2';   ch_nam┆
0x02c3a0…02c3c0             65 5b 20 31 39 5d 20 3a 3d 20 27 44 43 33 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 32 30 5d 20   ┆e[ 19] := 'DC3';   ch_name[ 20] ┆
0x02c3c0…02c3e0             3a 3d 20 27 44 43 34 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 32 31 5d 20 3a 3d 20 27 4e 41 4b   ┆:= 'DC4';   ch_name[ 21] := 'NAK┆
0x02c3e0…02c400             27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 32 32 5d 20 3a 3d 20 27 53 59 4e 27 3b 0d 0a 20 63 68   ┆';   ch_name[ 22] := 'SYN';   ch┆
0x02c400…02c420 (11, 1, 10) 5f 6e 61 6d 65 5b 20 32 33 5d 20 3a 3d 20 27 45 54 42 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20   ┆_name[ 23] := 'ETB';   ch_name[ ┆
0x02c420…02c440             32 34 5d 20 3a 3d 20 27 43 41 4e 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 32 35 5d 20 3a 3d 20   ┆24] := 'CAN';   ch_name[ 25] := ┆
0x02c440…02c460             27 45 4d 20 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 32 36 5d 20 3a 3d 20 27 53 55 42 27 3b 0d   ┆'EM ';   ch_name[ 26] := 'SUB'; ┆
0x02c460…02c480             0a 20 63 68 5f 6e 61 6d 65 5b 20 32 37 5d 20 3a 3d 20 27 45 53 43 27 3b 0d 0a 20 63 68 5f 6e 61   ┆  ch_name[ 27] := 'ESC';   ch_na┆
0x02c480…02c4a0             6d 65 5b 20 32 38 5d 20 3a 3d 20 27 46 53 20 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 32 39 5d   ┆me[ 28] := 'FS ';   ch_name[ 29]┆
0x02c4a0…02c4c0             20 3a 3d 20 27 47 53 20 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 33 30 5d 20 3a 3d 20 27 52 53   ┆ := 'GS ';   ch_name[ 30] := 'RS┆
0x02c4c0…02c4e0             20 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b 20 33 31 5d 20 3a 3d 20 27 55 53 20 27 3b 0d 0a 20 63   ┆ ';   ch_name[ 31] := 'US ';   c┆
0x02c4e0…02c500             68 5f 6e 61 6d 65 5b 20 33 32 5d 20 3a 3d 20 27 53 50 20 27 3b 0d 0a 20 63 68 5f 6e 61 6d 65 5b   ┆h_name[ 32] := 'SP ';   ch_name[┆
0x02c500…02c520             31 32 37 5d 20 3a 3d 20 27 44 45 4c 27 3b 0d 0a 0d 0a 20 69 20 3a 3d 20 30 3b 0d 0a 20 66 69 72   ┆127] := 'DEL';     i := 0;   fir┆
0x02c520…02c540             73 74 5f 61 64 72 20 3a 3d 20 73 6b 69 70 5f 63 6f 75 6e 74 20 2b 20 31 3b 0d 0a 20 61 64 72 20   ┆st_adr := skip_count + 1;   adr ┆
0x02c540…02c560             3a 3d 20 66 69 72 73 74 5f 61 64 72 3b 0d 0a 20 73 6b 69 70 70 65 64 20 3a 3d 20 66 61 6c 73 65   ┆:= first_adr;   skipped := false┆
0x02c560…02c580             3b 0d 0a 20 6e 6f 74 5f 65 6f 66 20 3a 3d 20 74 72 75 65 3b 0d 0a 0d 0a 20 77 68 69 6c 65 20 28   ┆;   not_eof := true;     while (┆
0x02c580…02c5a0             20 6e 6f 74 5f 65 6f 66 20 29 20 61 6e 64 20 28 20 73 6b 69 70 5f 63 6f 75 6e 74 20 3e 20 30 20   ┆ not_eof ) and ( skip_count > 0 ┆
0x02c5a0…02c5c0             29 20 64 6f 0d 0a 20 62 65 67 69 6e 0d 0a 20 20 20 6e 6f 74 5f 65 6f 66 20 3a 3d 20 47 65 74 42   ┆) do   begin     not_eof := GetB┆
0x02c5c0…02c5e0             79 74 65 28 62 79 74 29 3b 0d 0a 20 20 20 73 6b 69 70 5f 63 6f 75 6e 74 20 3a 3d 20 73 6b 69 70   ┆yte(byt);     skip_count := skip┆
0x02c5e0…02c600             5f 63 6f 75 6e 74 20 2d 20 31 3b 0d 0a 20 65 6e 64 3b 0d 0a 0d 0a 20 77 68 69 6c 65 20 28 20 47   ┆_count - 1;   end;     while ( G┆
0x02c600…02c620 (11, 1, 11) 65 74 42 79 74 65 28 62 79 74 29 20 29 20 61 6e 64 20 28 20 62 79 74 65 5f 63 6f 75 6e 74 20 3e   ┆etByte(byt) ) and ( byte_count >┆
0x02c620…02c640             20 30 20 29 20 64 6f 0d 0a 20 62 65 67 69 6e 0d 0a 20 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0d 0a   ┆ 0 ) do   begin    i := i + 1;  ┆
0x02c640…02c660             20 20 6e 65 78 74 5f 6c 69 6e 65 5b 69 5d 20 3a 3d 20 62 79 74 3b 0d 0a 20 20 69 66 20 69 20 3e   ┆  next_line[i] := byt;    if i >┆
0x02c660…02c680             3d 20 6d 61 78 5f 6c 69 6e 65 20 74 68 65 6e 0d 0a 20 20 62 65 67 69 6e 0d 0a 20 20 20 20 62 79   ┆= max_line then    begin      by┆
0x02c680…02c6a0             74 65 5f 63 6f 75 6e 74 20 3a 3d 20 62 79 74 65 5f 63 6f 75 6e 74 20 2d 20 6d 61 78 5f 6c 69 6e   ┆te_count := byte_count - max_lin┆
0x02c6a0…02c6c0             65 3b 0d 0a 20 20 20 20 75 6e 69 71 75 65 20 3a 3d 20 61 64 72 20 3d 20 66 69 72 73 74 5f 61 64   ┆e;      unique := adr = first_ad┆
0x02c6c0…02c6e0             72 3b 20 20 7b 20 41 6c 77 61 79 73 20 70 72 69 6e 74 20 66 69 72 73 74 20 6c 69 6e 65 20 7d 0d   ┆r;  { Always print first line } ┆
0x02c6e0…02c700             0a 20 20 20 20 6a 20 3a 3d 20 30 3b 0d 0a 20 20 20 20 77 68 69 6c 65 20 28 20 6e 6f 74 20 75 6e   ┆     j := 0;      while ( not un┆
0x02c700…02c720             69 71 75 65 20 29 20 61 6e 64 20 28 20 6a 20 3c 20 6d 61 78 5f 6c 69 6e 65 29 20 64 6f 0d 0a 20   ┆ique ) and ( j < max_line) do   ┆
0x02c720…02c740             20 20 20 62 65 67 69 6e 0d 0a 20 20 20 20 20 20 6a 20 3a 3d 20 6a 20 2b 20 31 3b 0d 0a 20 20 20   ┆   begin        j := j + 1;     ┆
0x02c740…02c760             20 20 20 75 6e 69 71 75 65 20 3a 3d 20 20 70 72 65 76 5f 6c 69 6e 65 5b 6a 5d 20 3c 3e 20 6e 65   ┆   unique :=  prev_line[j] <> ne┆
0x02c760…02c780             78 74 5f 6c 69 6e 65 5b 6a 5d 3b 0d 0a 20 20 20 20 65 6e 64 3b 0d 0a 0d 0a 20 20 20 20 69 66 20   ┆xt_line[j];      end;        if ┆
0x02c780…02c7a0             75 6e 69 71 75 65 20 74 68 65 6e 0d 0a 20 20 20 20 20 20 62 65 67 69 6e 0d 0a 20 20 20 20 20 20   ┆unique then        begin        ┆
0x02c7a0…02c7c0             77 72 69 74 65 5f 6c 69 6e 65 28 6d 61 78 5f 6c 69 6e 65 29 3b 0d 0a 20 20 20 20 20 20 73 6b 69   ┆write_line(max_line);        ski┆
0x02c7c0…02c7e0             70 70 65 64 20 3a 3d 20 66 61 6c 73 65 3b 0d 0a 20 20 20 20 20 20 65 6e 64 0d 0a 20 20 20 20 65   ┆pped := false;        end      e┆
0x02c7e0…02c800             6c 73 65 0d 0a 20 20 20 20 20 20 73 6b 69 70 70 65 64 20 3a 3d 20 74 72 75 65 3b 0d 0a 20 20 20   ┆lse        skipped := true;     ┆
0x02c800…02c820 (11, 1, 12) 20 61 64 72 20 3a 3d 20 61 64 72 20 2b 20 6d 61 78 5f 6c 69 6e 65 3b 0d 0a 20 20 20 20 69 20 3a   ┆ adr := adr + max_line;      i :┆
0x02c820…02c840             3d 20 30 3b 0d 0a 20 20 65 6e 64 3b 0d 0a 20 65 6e 64 3b 0d 0a 0d 0a 20 69 66 20 62 79 74 65 5f   ┆= 0;    end;   end;     if byte_┆
0x02c840…02c860             63 6f 75 6e 74 20 3e 20 30 20 74 68 65 6e 0d 0a 20 62 65 67 69 6e 0d 0a 20 20 69 66 20 69 20 3e   ┆count > 0 then   begin    if i >┆
0x02c860…02c880             20 30 20 74 68 65 6e 0d 0a 20 20 20 20 77 72 69 74 65 5f 6c 69 6e 65 28 69 29 3b 0d 0a 20 20 77   ┆ 0 then      write_line(i);    w┆
0x02c880…02c8a0             72 69 74 65 6c 6e 28 27 20 2d 2d 2d 20 45 4f 46 20 2d 2d 2d 20 27 29 3b 0d 0a 20 65 6e 64 0d 0a   ┆riteln(' --- EOF --- ');   end  ┆
0x02c8a0…02c8c0             20 65 6c 73 65 0d 0a 20 20 20 69 66 20 73 6b 69 70 70 65 64 20 74 68 65 6e 0d 0a 20 20 20 20 20   ┆ else     if skipped then       ┆
0x02c8c0…02c8e0             77 72 69 74 65 6c 6e 28 27 20 2d 20 41 62 6f 76 65 20 6c 69 6e 65 20 72 65 70 65 61 74 65 64 20   ┆writeln(' - Above line repeated ┆
0x02c8e0…02c900             2d 20 27 29 3b 0d 0a 0d 0a 20 63 6c 6f 73 65 28 53 6f 75 72 63 65 29 3b 0d 0a 0d 0a 65 6e 64 2e   ┆- ');     close(Source);    end.┆
0x02c900…02c920             0d 0a 0d 0a 1a af 00 0b b1 20 0b b3 40 0b b5 60 0b b7 80 0b ff ff ff bb f0 ff bd f0 ff bf 00 0c   ┆     »  ▒  │@ х` иђ    ╗  й  ┐  ┆
0x02c920…02c940             c1 20 0c c3 40 0c c5 60 0c c7 80 0c c9 f0 ff cb c0 0c cd e0 0c cf 00 0d d1 20 0d d3 40 0d d5 f0   ┆┴  ├@ ┼` Кђ ╔  ╦└ ═Я ¤  Л  М@ Н ┆
0x02c940…02c960             ff d7 80 0d d9 a0 0d db c0 0d dd e0 0d df 00 0e e1 20 0e e3 40 0e e5 60 0e e7 80 0e e9 a0 0e eb   ┆ Ођ ┘а █└ ПЯ ▀  р  с@ т` уђ жа в┆
0x02c960…02c980             c0 0e ed e0 0e ef 00 0f f1 20 0f f3 40 0f f5 60 0f ff cf 18 f9 f0 ff fb f0 ff fd e0 0f ff 00 10   ┆└ ьЯ №  ы  з@ ш`  ¤ щ  ч  §Я    ┆
0x02c980…02c9a0             01 21 10 03 41 10 05 61 10 07 81 10 09 a1 10 0b c1 10 0d e1 10 0f 01 11 11 21 11 13 41 11 15 61   ┆ !  A  a  Ђ  А  ┴  р     !  A  a┆
0x02c9a0…02c9c0             11 17 81 11 19 a1 11 1b c1 11 1d e1 11 1f 01 12 21 21 12 23 41 12 25 61 12 27 81 12 29 a1 12 2b   ┆  Ђ  А  ┴  р    !! #A %a 'Ђ )А +┆
0x02c9c0…02c9e0             c1 12 ff ff ff 2f 01 13 31 f1 ff 33 41 13 35 61 13 37 f1 ff 39 a1 13 3b c1 13 3d e1 13 3f 01 14   ┆┴    /  1ы 3A 5a 7ы 9А ;┴ =р ?  ┆
0x02c9e0…02ca00             41 21 14 43 41 14 45 61 14 47 81 14 49 a1 14 4b c1 14 4d e1 14 ff 0f 15 51 21 15 53 41 15 55 f1   ┆A! CA Ea GЂ IА K┴ Mр    Q! SA Uы┆
0x02ca00…02cc00 (11, 1, 13) Cluster(INDENT  HLP)
                            […0x5…]
0x02d600…02d620 (12, 0, 4)  7b 5b 41 3d 32 30 2c 49 3d 32 2c 4c 3d 34 2c 45 3d 33 2c 57 3d 31 2d 31 30 30 5d 20 50 41 53 43   ┆{[A=20,I=2,L=4,E=3,W=1-100] PASC┆
0x02d620…02d640             46 4f 52 4d 20 64 69 72 65 63 74 69 76 65 20 7d 0d 0a 70 72 6f 67 72 61 6d 20 69 6e 64 65 6e 74   ┆FORM directive }  program indent┆
0x02d640…02d660             3b 0d 0a 28 2a 20 49 6e 64 65 6e 74 20 50 61 73 63 61 6c 20 70 72 6f 67 72 61 6d 73 2c 20 61 6e   ┆;  (* Indent Pascal programs, an┆
0x02d660…02d680             64 20 61 6c 73 6f 20 6f 70 74 69 6f 6e 61 6c 79 20 63 68 61 6e 67 65 20 6b 65 79 77 6f 72 64 73   ┆d also optionaly change keywords┆
0x02d680…02d6a0             20 61 6e 64 20 76 61 72 69 61 62 6c 65 73 20 74 6f 0d 0a 20 20 20 63 6f 6d 6d 6f 6e 20 63 61 73   ┆ and variables to     common cas┆
0x02d6a0…02d6c0             65 20 28 20 75 70 70 65 72 2d 63 61 73 65 20 6f 72 20 6c 6f 77 65 72 2d 63 61 73 65 20 29 2e 0d   ┆e ( upper-case or lower-case ). ┆
0x02d6c0…02d6e0             0a 0d 0a 20 57 61 73 20 6f 72 69 67 69 6e 61 6c 79 20 61 20 52 43 38 30 30 30 20 50 61 73 63 61   ┆    Was originaly a RC8000 Pasca┆
0x02d6e0…02d700             6c 20 70 72 6f 67 72 61 6d 2e 20 43 68 61 6e 67 65 64 20 74 6f 20 52 54 50 38 36 20 50 61 73 63   ┆l program. Changed to RTP86 Pasc┆
0x02d700…02d720             61 6c 20 62 79 20 52 43 20 2a 29 0d 0a 28 2a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆al by RC *)  (*-----------------┆
0x02d720…02d740             2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆--------------------------------┆
0x02d740…02d760             2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0d 0a 20 44 61   ┆---------------------------   Da┆
0x02d760…02d780             74 65 2e 20 20 20 20 20 49 6e 69 74 2e 20 56 65 72 73 2e 20 45 78 70 6c 61 6e 61 74 69 6f 6e 2e   ┆te.     Init. Vers. Explanation.┆
0x02d780…02d7a0             0d 0a 0d 0a 20 31 39 38 39 2d 30 31 2d 31 39 20 4c 45 49 20 20 31 2e 31 20 20 43 68 61 6e 67 65   ┆     1989-01-19 LEI  1.1  Change┆
0x02d7a0…02d7c0             64 20 74 6f 20 54 75 72 62 6f 20 50 61 73 63 61 6c 20 35 2e 30 20 62 79 20 4c 65 69 66 20 4e 69   ┆d to Turbo Pascal 5.0 by Leif Ni┆
0x02d7c0…02d7e0             65 6c 73 65 6e 20 4a 54 41 53 0d 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆elsen JTAS  --------------------┆
0x02d7e0…02d800             2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆--------------------------------┆
0x02d800…02d820 (12, 0, 5)  2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2a 29 0d 0a 0d 0a 7b   ┆-------------------------*)    {┆
0x02d820…02d840             24 52 2b 2c 53 2b 20 7d 0d 0a 0d 0a 55 53 45 53 0d 0a 20 20 20 44 6f 73 2c 0d 0a 20 20 20 44 6f   ┆$R+,S+ }    USES     Dos,     Do┆
0x02d840…02d860             73 55 74 69 6c 2c 0d 0a 20 20 20 48 65 6c 70 2c 0d 0a 20 20 20 50 61 72 61 6d 3b 0d 0a 0d 0a 43   ┆sUtil,     Help,     Param;    C┆
0x02d860…02d880             4f 4e 53 54 0d 0a 20 20 76 65 72 73 69 6f 6e 3a 20 73 74 72 69 6e 67 20 3d 20 28 27 31 2e 31 27   ┆ONST    version: string = ('1.1'┆
0x02d880…02d8a0             29 3b 0d 0a 0d 0a 20 20 4d 61 78 50 61 72 61 6d 20 20 3d 20 32 3b 0d 0a 20 20 4d 61 78 4f 70 74   ┆);      MaxParam  = 2;    MaxOpt┆
0x02d8a0…02d8c0             69 6f 6e 20 3d 20 38 3b 0d 0a 0d 0a 20 20 50 61 72 61 6d 4c 69 73 74 20 3a 20 41 52 52 41 59 5b   ┆ion = 8;      ParamList : ARRAY[┆
0x02d8c0…02d8e0             31 2e 2e 4d 61 78 50 61 72 61 6d 5d 20 4f 46 20 50 61 72 61 6d 52 65 63 20 3d 0d 0a 20 20 28 28   ┆1..MaxParam] OF ParamRec =    ((┆
0x02d8e0…02d900             4b 69 6e 64 3a 4b 6e 6f 77 6e 46 69 6c 65 3b 20 44 65 66 69 6e 65 64 3a 46 41 4c 53 45 3b 20 4b   ┆Kind:KnownFile; Defined:FALSE; K┆
0x02d900…02d920             65 79 57 6f 72 64 3a 27 49 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a 27 2e   ┆eyWord:'I'; NumVal:0; TextVal:'.┆
0x02d920…02d940             52 54 50 27 29 2c 0d 0a 20 20 20 28 4b 69 6e 64 3a 46 69 6c 65 54 79 70 65 3b 20 20 44 65 66 69   ┆RTP'),     (Kind:FileType;  Defi┆
0x02d940…02d960             6e 65 64 3a 46 41 4c 53 45 3b 20 4b 65 79 57 6f 72 64 3a 27 4f 27 3b 20 4e 75 6d 56 61 6c 3a 30   ┆ned:FALSE; KeyWord:'O'; NumVal:0┆
0x02d960…02d980             3b 20 54 65 78 74 56 61 6c 3a 27 27 29 29 3b 0d 0a 0d 0a 20 20 4f 70 74 69 6f 6e 4c 69 73 74 20   ┆; TextVal:''));      OptionList ┆
0x02d980…02d9a0             3a 20 41 52 52 41 59 5b 31 2e 2e 4d 61 78 4f 70 74 69 6f 6e 5d 20 4f 46 20 50 61 72 61 6d 52 65   ┆: ARRAY[1..MaxOption] OF ParamRe┆
0x02d9a0…02d9c0             63 20 3d 0d 0a 20 20 28 28 4b 69 6e 64 3a 4f 6e 4f 66 66 3b 20 20 20 20 44 65 66 69 6e 65 64 3a   ┆c =    ((Kind:OnOff;    Defined:┆
0x02d9c0…02d9e0             46 41 4c 53 45 20 3b 4b 65 79 57 6f 72 64 3a 27 4e 55 4d 42 45 52 53 27 3b 20 4e 75 6d 56 61 6c   ┆FALSE ;KeyWord:'NUMBERS'; NumVal┆
0x02d9e0…02da00             3a 30 3b 20 54 65 78 74 56 61 6c 3a 27 4f 46 46 27 29 2c 20 28 2a 6c 69 6e 65 20 6e 75 6d 62 65   ┆:0; TextVal:'OFF'), (*line numbe┆
0x02da00…02da20 (12, 0, 6)  72 73 2a 29 0d 0a 20 20 20 28 4b 69 6e 64 3a 4f 6e 4f 66 66 3b 20 20 20 20 44 65 66 69 6e 65 64   ┆rs*)     (Kind:OnOff;    Defined┆
0x02da20…02da40             3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f 72 64 3a 27 4d 41 52 4b 27 3b 20 4e 75 6d 56 61 6c 3a 30   ┆:FALSE ;KeyWord:'MARK'; NumVal:0┆
0x02da40…02da60             3b 20 54 65 78 74 56 61 6c 3a 27 4f 46 46 27 29 2c 20 28 2a 6d 61 72 6b 2a 29 0d 0a 20 20 20 28   ┆; TextVal:'OFF'), (*mark*)     (┆
0x02da60…02da80             4b 69 6e 64 3a 4f 6e 4f 66 66 3b 20 20 20 20 44 65 66 69 6e 65 64 3a 46 41 4c 53 45 20 3b 4b 65   ┆Kind:OnOff;    Defined:FALSE ;Ke┆
0x02da80…02daa0             79 57 6f 72 64 3a 27 4c 49 53 54 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a   ┆yWord:'LIST'; NumVal:0; TextVal:┆
0x02daa0…02dac0             27 4f 46 46 27 29 2c 20 28 2a 6c 69 73 74 2a 29 0d 0a 20 20 20 28 4b 69 6e 64 3a 54 65 78 74 54   ┆'OFF'), (*list*)     (Kind:TextT┆
0x02dac0…02dae0             79 70 65 3b 20 44 65 66 69 6e 65 64 3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f 72 64 3a 27 49 4e 44   ┆ype; Defined:FALSE ;KeyWord:'IND┆
0x02dae0…02db00             45 4e 54 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a 27 4f 4e 27 20 29 2c 20   ┆ENT'; NumVal:0; TextVal:'ON' ), ┆
0x02db00…02db20             28 2a 69 6e 64 65 6e 74 2a 29 0d 0a 20 20 20 28 4b 69 6e 64 3a 54 65 78 74 54 79 70 65 3b 20 44   ┆(*indent*)     (Kind:TextType; D┆
0x02db20…02db40             65 66 69 6e 65 64 3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f 72 64 3a 27 4b 45 59 57 4f 52 44 53 27   ┆efined:FALSE ;KeyWord:'KEYWORDS'┆
0x02db40…02db60             3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a 27 4f 57 4e 27 29 2c 20 28 2a 6b 65   ┆; NumVal:0; TextVal:'OWN'), (*ke┆
0x02db60…02db80             79 77 6f 72 64 73 2a 29 0d 0a 20 20 20 28 4b 69 6e 64 3a 54 65 78 74 54 79 70 65 3b 20 44 65 66   ┆ywords*)     (Kind:TextType; Def┆
0x02db80…02dba0             69 6e 65 64 3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f 72 64 3a 27 56 41 52 49 41 42 4c 45 27 3b 20   ┆ined:FALSE ;KeyWord:'VARIABLE'; ┆
0x02dba0…02dbc0             4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a 27 4f 57 4e 27 29 2c 20 28 2a 76 61 72 69   ┆NumVal:0; TextVal:'OWN'), (*vari┆
0x02dbc0…02dbe0             61 62 6c 65 73 2a 29 0d 0a 20 20 20 28 4b 69 6e 64 3a 54 65 78 74 54 79 70 65 3b 20 44 65 66 69   ┆ables*)     (Kind:TextType; Defi┆
0x02dbe0…02dc00             6e 65 64 3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f 72 64 3a 27 50 41 53 43 41 4c 27 3b 20 4e 75 6d   ┆ned:FALSE ;KeyWord:'PASCAL'; Num┆
0x02dc00…02dc20 (12, 0, 7)  56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a 27 27 29 2c 20 28 2a 50 61 73 63 61 6c 20 76 65 72   ┆Val:0; TextVal:''), (*Pascal ver┆
0x02dc20…02dc40             2e 2a 29 0d 0a 20 20 20 28 4b 69 6e 64 3a 4f 6e 4f 66 66 3b 20 20 20 20 44 65 66 69 6e 65 64 3a   ┆.*)     (Kind:OnOff;    Defined:┆
0x02dc40…02dc60             46 41 4c 53 45 20 3b 4b 65 79 57 6f 72 64 3a 27 54 45 53 54 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b   ┆FALSE ;KeyWord:'TEST'; NumVal:0;┆
0x02dc60…02dc80             20 54 65 78 74 56 61 6c 3a 27 4f 46 46 27 29 20 29 3b 20 28 2a 74 65 73 74 2a 29 0d 0a 0d 0a 0d   ┆ TextVal:'OFF') ); (*test*)     ┆
0x02dc80…02dca0             0a 43 4f 4e 53 54 0d 0a 20 20 62 6c 61 6e 6b 3d 20 27 20 27 3b 0d 0a 20 20 6c 73 69 7a 65 3d 20   ┆ CONST    blank= ' ';    lsize= ┆
0x02dca0…02dcc0             32 34 30 3b 20 28 2a 20 4c 4f 4e 47 45 53 54 20 4c 49 4e 45 2a 29 0d 0a 20 20 73 73 69 7a 65 3d   ┆240; (* LONGEST LINE*)    ssize=┆
0x02dcc0…02dce0             20 39 30 3b 20 28 2a 20 44 45 45 50 45 53 54 20 53 54 41 43 4b 20 4c 4f 41 44 2a 29 0d 0a 20 20   ┆ 90; (* DEEPEST STACK LOAD*)    ┆
0x02dce0…02dd00             6b 73 69 7a 65 3d 20 35 37 3b 20 28 2a 20 45 4e 54 49 52 45 20 4e 4f 20 4f 46 20 4b 45 59 57 4f   ┆ksize= 57; (* ENTIRE NO OF KEYWO┆
0x02dd00…02dd20             52 44 53 2a 29 0d 0a 20 20 74 73 69 7a 65 3d 20 33 31 3b 20 20 20 28 2a 20 4e 4f 20 4f 46 20 49   ┆RDS*)    tsize= 31;   (* NO OF I┆
0x02dd20…02dd40             4e 54 45 52 45 53 54 49 4e 47 20 4b 45 59 57 4f 52 44 53 20 2a 29 0d 0a 20 20 6b 65 79 6e 75 6d   ┆NTERESTING KEYWORDS *)    keynum┆
0x02dd40…02dd60             73 69 7a 65 3d 20 31 33 3b 0d 0a 20 20 74 6f 70 6c 65 6e 67 74 68 3d 20 31 32 3b 20 20 28 2a 20   ┆size= 13;    toplength= 12;  (* ┆
0x02dd60…02dd80             6c 6f 6e 67 65 73 74 20 69 64 65 6e 74 69 66 69 65 72 20 2a 29 0d 0a 0d 0a 20 20 61 6c 66 61 6c   ┆longest identifier *)      alfal┆
0x02dd80…02dda0             65 6e 67 74 68 3d 20 31 32 3b 0d 0a 20 20 46 69 6c 65 5f 62 75 66 66 5f 73 69 7a 65 20 3d 20 32   ┆ength= 12;    File_buff_size = 2┆
0x02dda0…02ddc0             30 34 38 3b 0d 0a 0d 0a 20 20 73 70 61 63 65 3d 20 33 32 3b 0d 0a 20 20 6f 72 64 6f 66 74 61 62   ┆048;      space= 32;    ordoftab┆
0x02ddc0…02dde0             3d 20 39 3b 0d 0a 0d 0a 20 20 4c 46 3d 20 31 30 3b 0d 0a 20 20 46 46 3d 20 31 32 3b 0d 0a 20 20   ┆= 9;      LF= 10;    FF= 12;    ┆
0x02dde0…02de00             43 52 3d 20 31 33 3b 0d 0a 0d 0a 0d 0a 54 59 50 45 0d 0a 20 20 61 6c 66 61 3d 20 73 74 72 69 6e   ┆CR= 13;      TYPE    alfa= strin┆
0x02de00…02de20 (12, 0, 8)  67 5b 61 6c 66 61 6c 65 6e 67 74 68 5d 3b 0d 0a 0d 0a 20 20 6f 70 74 69 6f 6e 73 20 3d 20 28 69   ┆g[alfalength];      options = (i┆
0x02de20…02de40             6e 64 5f 2c 20 6e 6f 69 6e 64 5f 2c 20 6f 77 6e 69 6e 64 5f 2c 20 6c 63 69 64 5f 2c 20 75 63 69   ┆nd_, noind_, ownind_, lcid_, uci┆
0x02de40…02de60             64 5f 2c 20 6f 77 6e 69 64 5f 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 6c 63 6b 65 79 77   ┆d_, ownid_,               lckeyw┆
0x02de60…02de80             5f 2c 20 75 63 6b 65 79 77 5f 2c 20 6f 77 6e 6b 65 79 77 5f 20 29 3b 0d 0a 0d 0a 20 20 73 74 61   ┆_, uckeyw_, ownkeyw_ );      sta┆
0x02de80…02dea0             63 6b 65 6c 65 6d 65 6e 74 3d 20 52 45 43 4f 52 44 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ckelement= RECORD               ┆
0x02dea0…02dec0             20 20 20 20 20 70 72 69 6f 72 2c 20 69 6e 64 65 6e 74 3a 20 69 6e 74 65 67 65 72 0d 0a 20 20 20   ┆     prior, indent: integer     ┆
0x02dec0…02dee0             20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 20 20 74 61 62 6c 65 6c 65 6d 65   ┆             END;      tableleme┆
0x02dee0…02df00             6e 74 3d 20 52 45 43 4f 52 44 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 78 74   ┆nt= RECORD                   txt┆
0x02df00…02df20             5f 73 74 72 3a 20 61 6c 66 61 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 31   ┆_str: alfa;                   p1┆
0x02df20…02df40             2c 20 70 32 2c 20 73 70 61 63 69 6e 67 3a 20 69 6e 74 65 67 65 72 0d 0a 20 20 20 20 20 20 20 20   ┆, p2, spacing: integer          ┆
0x02df40…02df60             20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 0d 0a 20 20 56 41 52 0d 0a 20 20 20 20 6f 75 74 70   ┆       END;        VAR      outp┆
0x02df60…02df80             66 69 6c 65 2c 20 69 6e 70 66 69 6c 65 3a 20 73 74 72 69 6e 67 3b 0d 0a 20 20 20 20 69 6e 70 2c   ┆file, inpfile: string;      inp,┆
0x02df80…02dfa0             20 6f 75 74 70 3a 20 74 65 78 74 3b 0d 0a 20 20 20 20 49 5f 62 75 66 66 2c 20 4f 5f 62 75 66 66   ┆ outp: text;      I_buff, O_buff┆
0x02dfa0…02dfc0             3a 20 61 72 72 61 79 5b 31 2e 2e 46 69 6c 65 5f 62 75 66 66 5f 73 69 7a 65 5d 20 6f 66 20 62 79   ┆: array[1..File_buff_size] of by┆
0x02dfc0…02dfe0             74 65 3b 0d 0a 0d 0a 0d 0a 20 20 20 20 65 6f 6c 3a 20 62 6f 6f 6c 65 61 6e 3b 20 20 20 28 2a 2a   ┆te;          eol: boolean;   (**┆
0x02dfe0…02e000             20 66 61 6c 73 65 20 75 6e 74 69 6c 20 45 4e 44 2d 4f 46 2d 4c 49 4e 45 20 69 73 20 6d 65 74 20   ┆ false until END-OF-LINE is met ┆
0x02e000…02e020 (12, 0, 9)  2a 2a 29 0d 0a 0d 0a 20 20 20 20 61 6c 66 61 6e 75 6d 3a 20 53 45 54 20 4f 46 20 63 68 61 72 3b   ┆**)        alfanum: SET OF char;┆
0x02e020…02e040             20 28 2a 48 4f 4c 44 53 20 53 45 54 20 4f 46 20 41 4c 50 48 41 4e 55 4d 45 52 49 43 20 53 59 4d   ┆ (*HOLDS SET OF ALPHANUMERIC SYM┆
0x02e040…02e060             42 4f 4c 53 20 2a 29 0d 0a 20 20 20 20 64 75 6d 6d 79 5f 6c 69 6e 65 3a 20 73 74 72 69 6e 67 3b   ┆BOLS *)      dummy_line: string;┆
0x02e060…02e080             0d 0a 20 20 20 20 6c 69 6e 65 3a 20 73 74 72 69 6e 67 5b 6c 73 69 7a 65 5d 3b 20 20 20 20 28 2a   ┆      line: string[lsize];    (*┆
0x02e080…02e0a0             20 4c 49 4e 45 20 4c 45 46 54 20 4a 55 53 54 49 46 49 45 44 2a 29 0d 0a 20 20 20 20 6c 69 6e 65   ┆ LINE LEFT JUSTIFIED*)      line┆
0x02e0a0…02e0c0             5f 61 66 74 65 72 5f 66 66 3a 20 73 74 72 69 6e 67 5b 6c 73 69 7a 65 5d 3b 20 28 2a 20 53 74 6f   ┆_after_ff: string[lsize]; (* Sto┆
0x02e0c0…02e0e0             72 65 20 72 65 73 74 20 6f 66 20 6c 69 6e 65 20 72 65 61 64 20 2a 29 0d 0a 20 20 20 20 6c 69 6e   ┆re rest of line read *)      lin┆
0x02e0e0…02e100             65 5f 74 6f 6f 5f 6c 6f 6e 67 3a 20 69 6e 74 65 67 65 72 3b 20 28 2a 20 63 6f 75 6e 74 20 6e 75   ┆e_too_long: integer; (* count nu┆
0x02e100…02e120             6d 62 65 72 20 6f 66 20 74 6f 6f 20 6c 6f 6e 67 20 6c 69 6e 65 73 20 2a 29 0d 0a 20 20 20 20 63   ┆mber of too long lines *)      c┆
0x02e120…02e140             5f 70 6f 73 3a 20 69 6e 74 65 67 65 72 3b 20 20 20 20 20 20 20 20 20 28 2a 20 50 4f 49 4e 54 45   ┆_pos: integer;         (* POINTE┆
0x02e140…02e160             52 20 54 4f 20 43 55 52 52 45 4e 54 20 43 48 41 52 41 43 54 45 52 2a 29 0d 0a 20 20 20 20 6c 61   ┆R TO CURRENT CHARACTER*)      la┆
0x02e160…02e180             73 74 70 6f 73 3a 20 69 6e 74 65 67 65 72 3b 20 20 20 20 20 28 2a 20 4c 41 53 54 20 50 4f 53 49   ┆stpos: integer;     (* LAST POSI┆
0x02e180…02e1a0             54 49 4f 4e 20 4f 4e 20 43 55 52 52 45 4e 54 20 4c 49 4e 45 2a 29 0d 0a 20 20 20 20 6c 69 6e 65   ┆TION ON CURRENT LINE*)      line┆
0x02e1a0…02e1c0             70 6f 73 3a 20 69 6e 74 65 67 65 72 3b 20 20 20 20 20 28 2a 20 50 4f 49 4e 54 45 52 20 54 4f 20   ┆pos: integer;     (* POINTER TO ┆
0x02e1c0…02e1e0             4c 41 53 54 20 55 53 45 44 20 50 52 49 4e 54 50 4f 53 2a 29 0d 0a 20 20 20 20 6c 69 6e 65 6e 6f   ┆LAST USED PRINTPOS*)      lineno┆
0x02e1e0…02e200             3a 20 69 6e 74 65 67 65 72 3b 20 20 20 20 20 28 2a 20 4c 49 4e 45 20 4e 55 4d 42 45 52 20 4f 46   ┆: integer;     (* LINE NUMBER OF┆
0x02e200…02e220 (12, 0, 10) 20 43 55 52 52 45 4e 54 20 4c 49 4e 45 20 2a 29 0d 0a 20 20 20 20 63 75 72 72 65 6e 74 2c 20 63   ┆ CURRENT LINE *)      current, c┆
0x02e220…02e240             68 3a 20 63 68 61 72 3b 20 20 20 20 20 28 2a 20 43 48 20 49 53 20 46 49 52 53 54 20 43 48 41 52   ┆h: char;     (* CH IS FIRST CHAR┆
0x02e240…02e260             20 4f 4e 20 4e 45 58 54 20 4c 49 4e 45 2a 29 0d 0a 20 20 20 20 66 72 65 73 68 3a 20 62 6f 6f 6c   ┆ ON NEXT LINE*)      fresh: bool┆
0x02e260…02e280             65 61 6e 3b 20 20 20 20 20 20 20 28 2a 20 4c 49 4e 45 20 52 45 41 44 2c 20 4e 4f 54 20 59 45 54   ┆ean;       (* LINE READ, NOT YET┆
0x02e280…02e2a0             20 50 52 49 4e 54 45 44 2a 29 0d 0a 20 20 20 20 6d 61 72 67 69 6e 3a 20 69 6e 74 65 67 65 72 3b   ┆ PRINTED*)      margin: integer;┆
0x02e2a0…02e2c0             20 20 20 20 20 20 28 2a 20 48 41 4e 44 4c 45 53 20 49 4e 44 45 4e 54 49 4f 4e 2a 29 0d 0a 20 20   ┆      (* HANDLES INDENTION*)    ┆
0x02e2c0…02e2e0             20 20 6f 6c 64 70 6f 73 3a 20 69 6e 74 65 67 65 72 3b 20 20 20 20 20 20 28 2a 20 55 53 45 44 20   ┆  oldpos: integer;      (* USED ┆
0x02e2e0…02e300             54 4f 20 48 4f 4c 44 20 50 4f 53 49 54 49 4f 4e 53 20 49 4e 20 52 45 43 4f 52 44 53 2a 29 0d 0a   ┆TO HOLD POSITIONS IN RECORDS*)  ┆
0x02e300…02e320             20 20 20 20 73 74 61 74 65 3a 20 28 73 70 75 62 6c 69 63 2c 20 64 65 63 6c 61 72 65 2c 20 73 74   ┆    state: (spublic, declare, st┆
0x02e320…02e340             61 74 65 6d 65 6e 74 29 3b 0d 0a 20 20 20 20 73 6b 69 70 65 72 72 6f 72 2c 20 66 6f 72 6d 66 65   ┆atement);      skiperror, formfe┆
0x02e340…02e360             65 64 2c 20 6d 79 69 6e 64 2c 0d 0a 20 20 20 20 62 65 66 6f 72 65 5f 70 72 6f 67 72 61 6d 2c 20   ┆ed, myind,      before_program, ┆
0x02e360…02e380             20 28 2a 20 66 61 6c 73 65 20 75 6e 74 69 6c 20 46 49 4c 45 2c 20 4d 4f 44 55 4c 45 2c 20 53 48   ┆ (* false until FILE, MODULE, SH┆
0x02e380…02e3a0             41 52 45 44 2c 20 4c 4f 43 4b 2c 20 4c 4f 43 4b 42 55 46 2c 20 6f 72 20 41 53 20 6d 65 74 2c 0d   ┆ARED, LOCK, LOCKBUF, or AS met, ┆
0x02e3a0…02e3c0             0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 2e 65 2e 20 75 6e 74 69 6c   ┆                      i.e. until┆
0x02e3c0…02e3e0             20 69 74 20 63 61 6e 20 62 65 20 64 65 63 69 64 65 64 20 77 68 65 74 68 65 72 20 69 6e 70 75 74   ┆ it can be decided whether input┆
0x02e3e0…02e400             20 69 73 20 61 20 50 41 53 43 41 4c 38 36 2d 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ is a PASCAL86-                 ┆
0x02e400…02e420 (12, 0, 11) 20 20 20 20 20 20 70 72 6f 67 72 61 6d 20 6f 72 20 61 20 52 54 50 38 36 2d 70 72 6f 67 72 61 6d   ┆      program or a RTP86-program┆
0x02e420…02e440             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 29 0d 0a 20 20 20 20 6e 6f 69 6e 64 2c 20   ┆                 *)      noind, ┆
0x02e440…02e460             66 65 77 65 6e 64 73 3a 20 62 6f 6f 6c 65 61 6e 3b 0d 0a 20 20 20 20 6c 69 6e 65 73 6d 6f 64 65   ┆fewends: boolean;      linesmode┆
0x02e460…02e480             2c 20 6d 61 72 6b 6d 6f 64 65 3a 20 62 6f 6f 6c 65 61 6e 3b 0d 0a 0d 0a 20 20 20 20 69 64 6d 6f   ┆, markmode: boolean;        idmo┆
0x02e480…02e4a0             64 65 2c 0d 0a 20 20 20 20 76 61 72 6d 6f 64 65 2c 0d 0a 20 20 20 20 72 65 73 6b 65 79 6d 6f 64   ┆de,      varmode,      reskeymod┆
0x02e4a0…02e4c0             65 3a 20 62 79 74 65 3b 0d 0a 0d 0a 20 20 20 20 74 65 73 74 5f 72 65 71 75 65 73 74 65 64 2c 20   ┆e: byte;        test_requested, ┆
0x02e4c0…02e4e0             20 20 20 20 20 20 28 2a 20 67 6f 76 65 72 6e 65 64 20 62 79 20 70 61 72 61 6d 65 74 65 72 20 6f   ┆      (* governed by parameter o┆
0x02e4e0…02e500             70 74 69 6f 6e 20 2a 29 0d 0a 0d 0a 20 20 20 20 73 6b 69 70 74 65 6b 73 74 3a 20 62 6f 6f 6c 65   ┆ption *)        skiptekst: boole┆
0x02e500…02e520             61 6e 3b 20 20 20 28 2a 55 53 45 44 20 49 4e 20 53 48 49 46 54 43 41 53 45 2a 29 0d 0a 20 20 20   ┆an;   (*USED IN SHIFTCASE*)     ┆
0x02e520…02e540             20 65 6e 64 63 6f 6d 6d 65 6e 74 2c 20 20 20 20 28 2a 20 20 27 3e 27 20 6f 72 20 27 29 27 20 64   ┆ endcomment,    (*  '>' or ')' d┆
0x02e540…02e560             65 70 65 6e 64 69 6e 67 20 6f 6e 20 74 68 65 20 73 74 61 72 74 20 6f 66 20 74 68 65 20 63 6f 6d   ┆epending on the start of the com┆
0x02e560…02e580             6d 65 6e 74 20 2a 29 0d 0a 20 20 20 20 73 6b 69 70 63 68 61 72 3a 20 63 68 61 72 3b 20 20 20 20   ┆ment *)      skipchar: char;    ┆
0x02e580…02e5a0             20 20 20 28 2a 55 53 45 44 20 49 4e 20 53 48 49 46 54 43 41 53 45 20 2a 29 0d 0a 0d 0a 20 20 20   ┆   (*USED IN SHIFTCASE *)       ┆
0x02e5a0…02e5c0             20 6d 61 72 6b 73 74 61 63 6b 3a 20 41 52 52 41 59 5b 2d 31 30 2e 2e 6c 73 69 7a 65 5d 20 4f 46   ┆ markstack: ARRAY[-10..lsize] OF┆
0x02e5c0…02e5e0             20 69 6e 74 65 67 65 72 3b 0d 0a 20 20 20 20 6d 61 72 6b 70 6f 69 6e 74 65 72 2c 20 6e 65 78 74   ┆ integer;      markpointer, next┆
0x02e5e0…02e600             6d 61 72 6b 3a 20 69 6e 74 65 67 65 72 3b 0d 0a 0d 0a 0d 0a 0d 0a 20 20 20 20 73 74 61 63 6b 3a   ┆mark: integer;            stack:┆
0x02e600…035e00 (12, 0, 12) […elided…]
0x035e00…035e20 (14, 0, 12) 5f 70 6f 73 3a 3d 20 31 3b 20 63 75 72 72 65 6e 74 3a 3d 20 6c 69 6e 65 5b 63 5f 70 6f 73 5d 3b   ┆_pos:= 1; current:= line[c_pos];┆
0x035e20…035e40             0d 0a 20 20 20 20 20 20 20 20 57 48 49 4c 45 20 63 5f 70 6f 73 3c 3d 6c 61 73 74 70 6f 73 20 44   ┆          WHILE c_pos<=lastpos D┆
0x035e40…035e60             4f 0d 0a 20 20 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20   ┆O            BEGIN              ┆
0x035e60…035e80             49 46 20 28 63 75 72 72 65 6e 74 3e 3d 27 61 27 29 20 41 4e 44 20 28 63 75 72 72 65 6e 74 3c 3d   ┆IF (current>='a') AND (current<=┆
0x035e80…035ea0             27 7a 27 29 20 54 48 45 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 75 72 72 65 6e 74   ┆'z') THEN                current┆
0x035ea0…035ec0             3a 3d 20 63 68 72 28 6f 72 64 28 63 75 72 72 65 6e 74 29 2d 33 32 29 3b 0d 0a 20 20 20 20 20 20   ┆:= chr(ord(current)-32);        ┆
0x035ec0…035ee0             20 20 20 20 20 20 49 46 20 20 28 63 75 72 72 65 6e 74 20 49 4e 20 5b 27 41 27 2e 2e 27 5a 27 5d   ┆      IF  (current IN ['A'..'Z']┆
0x035ee0…035f00             29 20 20 54 48 45 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 61 73 69 64 65 6e 74 69   ┆)  THEN                pasidenti┆
0x035f00…035f20             66 69 65 72 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 0d 0a 20 20 20 20 20 20 20 20   ┆fier              ELSE          ┆
0x035f20…035f40             20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 53   ┆      BEGIN                  CAS┆
0x035f40…035f60             45 20 63 75 72 72 65 6e 74 20 4f 46 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆E current OF                    ┆
0x035f60…035f80             27 3b 27 3a 20 73 65 6d 69 63 6f 6c 6f 6e 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆';': semicolon;                 ┆
0x035f80…035fa0             20 20 20 27 28 27 2c 20 27 3c 27 3a 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20   ┆   '(', '<': BEGIN              ┆
0x035fa0…035fc0             20 20 20 20 20 20 20 20 20 20 49 46 20 6c 69 6e 65 5b 63 5f 70 6f 73 2b 31 5d 3d 27 2a 27 20 54   ┆          IF line[c_pos+1]='*' T┆
0x035fc0…035fe0             48 45 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 45 47   ┆HEN                          BEG┆
0x035fe0…036000             49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46   ┆IN                            IF┆
0x036000…036020 (14, 0, 13) 20 63 5f 70 6f 73 3d 31 20 28 2a 20 69 2e 65 2e 20 69 6e 20 66 72 6f 6e 74 20 6f 66 20 74 68 65   ┆ c_pos=1 (* i.e. in front of the┆
0x036020…036040             20 6c 69 6e 65 20 2a 29 20 54 48 45 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ line *) THEN                   ┆
0x036040…036060             20 20 20 20 20 20 20 20 20 20 20 70 75 73 68 69 6e 64 65 6e 74 28 34 2c 20 32 29 20 20 28 2a 20   ┆           pushindent(4, 2)  (* ┆
0x036060…036080             69 6e 64 65 6e 74 20 32 20 6d 6f 72 65 20 70 6f 73 69 74 69 6f 6e 73 20 2a 29 0d 0a 20 20 20 20   ┆indent 2 more positions *)      ┆
0x036080…0360a0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 0d 0a 20 20 20 20   ┆                      ELSE      ┆
0x0360a0…0360c0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 75 73 68 69 6e 64 65   ┆                        pushinde┆
0x0360c0…0360e0             6e 74 28 34 2c 20 63 5f 70 6f 73 20 2d 20 31 29 3b 20 28 2a 20 6e 6f 20 66 75 72 74 68 65 72 20   ┆nt(4, c_pos - 1); (* no further ┆
0x0360e0…036100             69 6e 64 65 6e 74 69 6f 6e 20 63 61 75 73 65 64 20 62 79 20 63 6f 6d 6d 65 6e 74 20 2a 29 0d 0a   ┆indention caused by comment *)  ┆
0x036100…036120             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 63 75 72   ┆                          IF cur┆
0x036120…036140             72 65 6e 74 3d 27 28 27 20 54 48 45 4e 20 65 6e 64 63 6f 6d 6d 65 6e 74 3a 3d 20 27 29 27 0d 0a   ┆rent='(' THEN endcomment:= ')'  ┆
0x036140…036160             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 65   ┆                          ELSE e┆
0x036160…036180             6e 64 63 6f 6d 6d 65 6e 74 3a 3d 20 27 3e 27 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ndcomment:= '>';                ┆
0x036180…0361a0             20 20 20 20 20 20 20 20 20 20 20 20 52 45 50 45 41 54 20 73 6b 69 70 28 27 2a 27 29 20 55 4e 54   ┆            REPEAT skip('*') UNT┆
0x0361a0…0361c0             49 4c 20 6c 69 6e 65 5b 63 5f 70 6f 73 2b 31 5d 3d 65 6e 64 63 6f 6d 6d 65 6e 74 3b 0d 0a 20 20   ┆IL line[c_pos+1]=endcomment;    ┆
0x0361c0…0361e0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 5f 70 6f 73 3a 3d 20   ┆                        c_pos:= ┆
0x0361e0…036200             63 5f 70 6f 73 2b 31 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆c_pos+1;                        ┆
0x036200…036220 (14, 0, 14) 20 20 20 20 70 6f 70 69 6e 64 65 6e 74 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆    popindent;                  ┆
0x036220…036240             20 20 20 20 20 20 20 20 45 4e 44 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆        END                     ┆
0x036240…036260             20 20 20 45 4c 53 45 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆   ELSE                         ┆
0x036260…036280             20 49 46 20 73 74 61 74 65 3c 3e 73 74 61 74 65 6d 65 6e 74 20 54 48 45 4e 0d 0a 20 20 20 20 20   ┆ IF state<>statement THEN       ┆
0x036280…0362a0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 63 75 72 72 65 6e 74 3d   ┆                     IF current=┆
0x0362a0…0362c0             27 3c 27 20 54 48 45 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆'<' THEN                        ┆
0x0362c0…0362e0             20 20 20 20 20 20 73 6b 69 70 28 27 3e 27 29 20 28 2a 20 76 61 6c 75 65 20 69 6e 69 74 69 61 6c   ┆      skip('>') (* value initial┆
0x0362e0…036300             69 7a 61 74 69 6f 6e 20 6f 66 20 61 72 72 61 79 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20   ┆ization of array *)             ┆
0x036300…036320             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 0d 0a 20 20 20 20 20 20 20 20 20 20 20   ┆               ELSE             ┆
0x036320…036340             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 75 73 68 69 6e 64 65 6e 74 28 34 2c 20 63   ┆                 pushindent(4, c┆
0x036340…036360             5f 70 6f 73 29 3b 20 28 2a 20 49 4e 44 45 4e 54 49 4f 4e 20 4f 46 20 53 43 41 4c 41 52 20 54 59   ┆_pos); (* INDENTION OF SCALAR TY┆
0x036360…036380             50 45 53 20 41 4e 44 20 56 41 52 49 41 4e 54 20 46 49 45 4c 44 53 20 49 4e 20 52 45 43 4f 52 44   ┆PES AND VARIANT FIELDS IN RECORD┆
0x036380…0363a0             53 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a   ┆S *)                      END;  ┆
0x0363a0…0363c0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 29 27 3a 20 42 45 47 49 4e 0d 0a 20 20   ┆                  ')': BEGIN    ┆
0x0363c0…0363e0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 73 74 61 74 65 3c 3e 73 74   ┆                    IF state<>st┆
0x0363e0…036400             61 74 65 6d 65 6e 74 20 54 48 45 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆atement THEN                    ┆
0x036400…036420 (14, 0, 15) 20 20 20 20 20 20 42 45 47 49 4e 28 2a 55 4e 53 54 41 43 4b 20 49 4e 44 45 4e 54 49 4f 4e 20 4f   ┆      BEGIN(*UNSTACK INDENTION O┆
0x036420…036440             46 20 53 43 41 4c 41 52 20 54 59 50 45 53 20 41 4e 44 20 56 41 52 49 41 4e 54 20 50 41 52 54 53   ┆F SCALAR TYPES AND VARIANT PARTS┆
0x036440…036460             20 49 4e 20 52 45 43 4f 52 44 53 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ IN RECORDS*)                   ┆
0x036460…036480             20 20 20 20 20 20 20 20 20 70 6f 70 69 6e 64 65 6e 74 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20   ┆         popindent;             ┆
0x036480…0364a0             20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆             END;               ┆
0x0364a0…0364c0             20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27   ┆       END;                    '┆
0x0364c0…0364e0             3a 27 3a 20 49 46 20 49 6e 57 69 74 68 3d 66 61 6c 73 65 20 54 48 45 4e 0d 0a 20 20 20 20 20 20   ┆:': IF InWith=false THEN        ┆
0x0364e0…036500             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 6c 69 6e 65 5b 63 5f 70 6f 73 2b 31 5d   ┆                IF line[c_pos+1]┆
0x036500…036520             3c 3e 27 3d 27 20 54 48 45 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆<>'=' THEN                      ┆
0x036520…036540             20 20 20 20 49 46 20 73 74 61 74 65 3d 73 74 61 74 65 6d 65 6e 74 20 54 48 45 4e 0d 0a 20 20 20   ┆    IF state=statement THEN     ┆
0x036540…036560             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 45 47 49 4e 20 28 2a 49   ┆                       BEGIN (*I┆
0x036560…036580             4e 44 45 4e 54 49 4f 4e 20 4f 46 20 43 41 53 45 4c 41 42 45 4c 53 20 2a 29 0d 0a 20 20 20 20 20   ┆NDENTION OF CASELABELS *)       ┆
0x036580…0365a0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 65 6d 69 63 6f 6c 6f 6e   ┆                       semicolon┆
0x0365a0…0365c0             3b 28 2a 50 4f 50 20 50 52 45 56 49 4f 55 53 20 53 54 41 43 4b 45 44 20 43 41 53 45 4c 41 42 45   ┆;(*POP PREVIOUS STACKED CASELABE┆
0x0365c0…0365e0             4c 53 20 41 4e 44 20 49 46 53 54 41 54 45 4d 45 4e 54 53 20 2a 29 0d 0a 20 20 20 20 20 20 20 20   ┆LS AND IFSTATEMENTS *)          ┆
0x0365e0…036600             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 75 73 68 69 6e 64 65 6e 74 28 35   ┆                    pushindent(5┆
0x036600…036620 (14, 1, 1)  2c 20 6f 6c 64 70 6f 73 20 2b 20 32 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆, oldpos + 2);                  ┆
0x036620…036640             20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆          END;                  ┆
0x036640…036660             20 20 20 20 27 2d 27 3a 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66   ┆    '-':                      if┆
0x036660…036680             20 6c 69 6e 65 5b 20 63 5f 70 6f 73 20 2b 20 31 20 5d 3d 27 2d 27 20 74 68 65 6e 20 28 2a 20 52   ┆ line[ c_pos + 1 ]='-' then (* R┆
0x036680…0366a0             54 50 38 36 20 63 6f 6d 6d 65 6e 74 20 2d 20 73 6b 69 70 20 74 6f 20 65 6f 6c 20 2a 29 0d 0a 20   ┆TP86 comment - skip to eol *)   ┆
0x0366a0…0366c0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 63 5f 70 6f 73 3d 31 20   ┆                     IF c_pos=1 ┆
0x0366c0…0366e0             28 2a 20 69 2e 65 2e 20 69 6e 20 66 72 6f 6e 74 20 6f 66 20 74 68 65 20 6c 69 6e 65 20 2a 29 20   ┆(* i.e. in front of the line *) ┆
0x0366e0…036700             54 48 45 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 65   ┆THEN                          be┆
0x036700…036720             67 69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70   ┆gin                            p┆
0x036720…036740             75 73 68 69 6e 64 65 6e 74 28 34 2c 20 32 29 3b 20 20 28 2a 20 69 6e 64 65 6e 74 20 32 20 6d 6f   ┆ushindent(4, 2);  (* indent 2 mo┆
0x036740…036760             72 65 20 70 6f 73 69 74 69 6f 6e 73 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆re positions *)                 ┆
0x036760…036780             20 20 20 20 20 20 20 20 20 20 20 70 72 69 6e 74 6c 69 6e 65 3b 0d 0a 20 20 20 20 20 20 20 20 20   ┆           printline;           ┆
0x036780…0367a0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 6f 70 69 6e 64 65 6e 74 3b 0d 0a 20 20 20   ┆                 popindent;     ┆
0x0367a0…0367c0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 5f 70 6f 73 3a 3d 20 6c   ┆                       c_pos:= l┆
0x0367c0…0367e0             61 73 74 70 6f 73 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆astpos;                         ┆
0x0367e0…036800             20 65 6e 64 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6c 73 65   ┆ end                        else┆
0x036800…036820 (14, 1, 2)  0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 5f 70 6f 73 3a   ┆                          c_pos:┆
0x036820…036840             3d 20 6c 61 73 74 70 6f 73 3b 20 20 28 2a 2a 20 69 2e 65 2e 3a 20 73 6b 69 70 20 72 65 73 74 20   ┆= lastpos;  (** i.e.: skip rest ┆
0x036840…036860             6f 66 20 6c 69 6e 65 20 2a 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆of line **)                     ┆
0x036860…036880             20 28 2a 2a 2a 20 65 6e 64 20 52 54 50 38 36 20 63 6f 6d 6d 65 6e 74 20 2a 2a 2a 29 0d 0a 0d 0a   ┆ (*** end RTP86 comment ***)    ┆
0x036880…0368a0             0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 27 27 27 3a 20 73 6b 69 70 28 27   ┆                    '''': skip('┆
0x0368a0…0368c0             27 27 27 29 3b 20 28 2a 20 74 65 78 74 20 73 74 72 69 6e 67 20 2a 29 0d 0a 0d 0a 20 20 20 20 20   ┆'''); (* text string *)         ┆
0x0368c0…0368e0             20 20 20 20 20 20 20 20 20 20 20 20 20 27 22 27 3a 20 73 6b 69 70 28 27 22 27 29 3b 20 28 2a 20   ┆             '"': skip('"'); (* ┆
0x0368e0…036900             74 65 78 74 20 73 74 72 69 6e 67 20 2a 29 0d 0a 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆text string *)                  ┆
0x036900…036920             20 20 20 20 27 7b 27 3a 20 73 6b 69 70 28 27 7d 27 29 3b 20 28 2a 20 54 75 72 62 6f 20 50 61 73   ┆    '{': skip('}'); (* Turbo Pas┆
0x036920…036940             63 61 6c 20 54 65 78 74 20 73 74 72 69 6e 67 20 2a 29 0d 0a 0d 0a 20 20 20 20 20 20 20 20 20 20   ┆cal Text string *)              ┆
0x036940…036960             20 20 20 20 20 20 20 20 27 24 27 3a 20 62 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20   ┆        '$': begin              ┆
0x036960…036980             20 20 20 20 20 20 20 20 20 20 6f 6c 64 70 6f 73 3a 3d 20 6d 61 72 67 69 6e 3b 0d 0a 20 20 20 20   ┆          oldpos:= margin;      ┆
0x036980…0369a0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6d 61 72 67 69 6e 3a 3d 20 31 3b 0d 0a 20   ┆                  margin:= 1;   ┆
0x0369a0…0369c0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 66 72 65 73 68 20 74 68   ┆                     if fresh th┆
0x0369c0…0369e0             65 6e 20 70 72 69 6e 74 6c 69 6e 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆en printline;                   ┆
0x0369e0…036a00             20 20 20 20 20 6d 61 72 67 69 6e 3a 3d 20 6f 6c 64 70 6f 73 3b 0d 0a 20 20 20 20 20 20 20 20 20   ┆     margin:= oldpos;           ┆
0x036a00…036a20 (14, 1, 3)  20 20 20 20 20 20 20 20 20 20 20 20 20 63 5f 70 6f 73 3a 3d 20 6c 61 73 74 70 6f 73 3b 0d 0a 20   ┆             c_pos:= lastpos;   ┆
0x036a20…036a40             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6e 64 3b 0d 0a 0d 0a 20 20 20 20 20   ┆                   end;         ┆
0x036a40…036a60             20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 3b 20 28 2a 20 41 4c 4c 20 4f 54 48 45 52   ┆             ELSE ; (* ALL OTHER┆
0x036a60…036a80             20 41 52 45 20 42 4c 49 4e 44 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e   ┆ ARE BLIND*)                  EN┆
0x036a80…036aa0             44 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 5f 70 6f 73 3a 3d 20 63 5f 70 6f   ┆D;                  c_pos:= c_po┆
0x036aa0…036ac0             73 2b 31 3b 20 63 75 72 72 65 6e 74 3a 3d 20 6c 69 6e 65 5b 63 5f 70 6f 73 5d 3b 0d 0a 20 20 20   ┆s+1; current:= line[c_pos];     ┆
0x036ac0…036ae0             20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20   ┆           END;              IF ┆
0x036ae0…036b00             66 72 65 73 68 20 54 48 45 4e 20 70 72 69 6e 74 6c 69 6e 65 0d 0a 20 20 20 20 20 20 20 20 20 20   ┆fresh THEN printline            ┆
0x036b00…036b20             45 4e 44 20 28 2a 20 53 43 41 4e 20 4f 46 20 4c 49 4e 45 2a 29 3b 0d 0a 20 20 20 20 20 20 20 20   ┆END (* SCAN OF LINE*);          ┆
0x036b20…036b40             49 46 20 66 72 65 73 68 20 54 48 45 4e 20 70 72 69 6e 74 6c 69 6e 65 3b 0d 0a 20 20 20 20 20 20   ┆IF fresh THEN printline;        ┆
0x036b40…036b60             45 4e 44 20 28 2a 20 53 43 41 4e 20 4f 46 20 49 4e 50 55 54 20 46 49 4c 45 20 2a 29 3b 0d 0a 20   ┆END (* SCAN OF INPUT FILE *);   ┆
0x036b60…036b80             20 20 20 49 46 20 66 65 77 65 6e 64 73 20 54 48 45 4e 20 77 72 69 74 65 6c 6e 28 4f 75 74 70 75   ┆   IF fewends THEN writeln(Outpu┆
0x036b80…036ba0             74 2c 20 27 20 2a 2a 20 57 41 52 4e 49 4e 47 2c 20 45 4e 44 28 53 29 20 4d 49 53 53 49 4e 47 2e   ┆t, ' ** WARNING, END(S) MISSING.┆
0x036ba0…036bc0             27 29 3b 0d 0a 20 20 20 20 49 46 20 73 6b 69 70 65 72 72 6f 72 20 54 48 45 4e 0d 0a 20 20 20 20   ┆');      IF skiperror THEN      ┆
0x036bc0…036be0             20 20 77 72 69 74 65 6c 6e 28 4f 75 74 70 75 74 2c 20 27 20 2a 2a 20 70 72 65 6d 61 74 75 72 65   ┆  writeln(Output, ' ** premature┆
0x036be0…036c00             20 65 6e 64 20 6f 66 20 66 69 6c 65 20 20 27 29 3b 0d 0a 20 20 20 20 49 66 20 6c 69 6e 65 5f 74   ┆ end of file  ');      If line_t┆
0x036c00…036c20 (14, 1, 4)  6f 6f 5f 6c 6f 6e 67 20 3e 20 30 20 54 48 45 4e 0d 0a 20 20 20 20 20 20 77 72 69 74 65 6c 6e 28   ┆oo_long > 0 THEN        writeln(┆
0x036c20…036c40             4f 75 74 70 75 74 2c 20 6c 69 6e 65 5f 74 6f 6f 5f 6c 6f 6e 67 3a 31 2c 20 27 20 6c 69 6e 65 73   ┆Output, line_too_long:1, ' lines┆
0x036c40…036c60             20 74 72 75 6e 63 61 74 65 64 20 61 66 74 65 72 20 27 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 20   ┆ truncated after ',             ┆
0x036c60…036c80             20 20 20 20 20 20 20 20 20 20 20 6c 73 69 7a 65 3a 31 2c 27 20 63 68 61 72 61 63 74 65 72 73 2e   ┆           lsize:1,' characters.┆
0x036c80…036ca0             27 29 3b 0d 0a 0d 0a 20 20 20 20 43 6c 6f 73 65 28 69 6e 70 29 3b 0d 0a 20 20 20 20 43 6c 6f 73   ┆');        Close(inp);      Clos┆
0x036ca0…036cc0             65 28 6f 75 74 70 29 3b 0d 0a 20 20 45 4e 44 2e 0d 0a 0d 0a 1a 65 79 20 77 65 72 65 20 6e 6f 74   ┆e(outp);    END.     ey were not┆
0x036cc0…036ce0             20 63 6f 6d 70 61 72 65 64 20 70 61 73 74 20 74 68 61 74 20 70 6f 69 6e 74 2e 27 29 3b 0d 0a 20   ┆ compared past that point.');   ┆
0x036ce0…036d00             20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 69 66 20 54 65 73 74 5f 72 65 71 75 65 73 74 65 64 20 74   ┆   END;      if Test_requested t┆
0x036d00…036d20             68 65 6e 0d 0a 20 20 20 20 20 20 77 72 69 74 65 6c 6e 28 27 20 48 65 61 70 20 73 74 6f 72 61 67   ┆hen        writeln(' Heap storag┆
0x036d20…036d40             65 20 75 73 65 64 3a 20 27 2c 20 49 6e 69 74 69 61 6c 46 72 65 65 20 2d 20 4d 61 78 41 76 61 69   ┆e used: ', InitialFree - MaxAvai┆
0x036d40…036d60             6c 3a 30 20 2c 20 27 20 62 79 74 65 73 2e 20 20 20 27 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 20   ┆l:0 , ' bytes.   ',             ┆
0x036d60…036d80             20 20 20 20 4d 61 78 41 76 61 69 6c 3a 30 2c 20 27 20 62 79 74 65 73 20 72 65 6d 61 69 6e 69 6e   ┆    MaxAvail:0, ' bytes remainin┆
0x036d80…036da0             67 2e 20 27 29 3b 0d 0a 20 20 45 4e 44 3b 0d 0a 45 4e 44 2e 0d 0a 0d 0a 1a 00 00 00 00 00 00 00   ┆g. ');    END;  END.            ┆
0x036da0…036dc0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x2…]
0x036e00…037000 (14, 1, 5)  Cluster(INDENT  ORG)
                            […0x49…]
0x040200…040220 (17, 0, 4)  20 20 20 7b 5b 41 3d 32 30 2c 49 3d 32 2c 4c 3d 34 2c 45 3d 33 2c 57 3d 31 2d 31 30 30 5d 20 50   ┆   {[A=20,I=2,L=4,E=3,W=1-100] P┆
0x040220…040240             41 53 43 46 4f 52 4d 20 64 69 72 65 63 74 69 76 65 20 7d 0d 0a 20 20 50 52 4f 47 52 41 4d 20 69   ┆ASCFORM directive }    PROGRAM i┆
0x040240…040260             6e 64 65 6e 74 3b 0d 0a 20 20 20 20 20 20 28 2a 20 49 6e 64 65 6e 74 20 50 61 73 63 61 6c 20 70   ┆ndent;        (* Indent Pascal p┆
0x040260…040280             72 6f 67 72 61 6d 73 2c 20 61 6e 64 20 61 6c 73 6f 20 6f 70 74 69 6f 6e 61 6c 79 20 63 68 61 6e   ┆rograms, and also optionaly chan┆
0x040280…0402a0             67 65 20 6b 65 79 77 6f 72 64 73 20 61 6e 64 20 76 61 72 69 61 62 6c 65 73 20 74 6f 0d 0a 20 20   ┆ge keywords and variables to    ┆
0x0402a0…0402c0             20 20 20 20 63 6f 6d 6d 6f 6e 20 63 61 73 65 20 28 20 75 70 70 65 72 2d 63 61 73 65 20 6f 72 20   ┆    common case ( upper-case or ┆
0x0402c0…0402e0             6c 6f 77 65 72 2d 63 61 73 65 20 29 2e 0d 0a 0d 0a 20 20 20 20 20 20 57 61 73 20 6f 72 69 67 69   ┆lower-case ).          Was origi┆
0x0402e0…040300             6e 61 6c 79 20 61 20 52 43 38 30 30 30 20 50 61 73 63 61 6c 20 70 72 6f 67 72 61 6d 2e 20 43 68   ┆naly a RC8000 Pascal program. Ch┆
0x040300…040320             61 6e 67 65 64 20 74 6f 20 52 54 50 38 36 20 50 61 73 63 61 6c 20 62 79 20 52 43 20 2a 29 0d 0a   ┆anged to RTP86 Pascal by RC *)  ┆
0x040320…040340             20 20 20 20 20 20 28 2a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆      (*------------------------┆
0x040340…040360             2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆--------------------------------┆
0x040360…040380             2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0d 0a 20 20 20 20 20 20 44 61 74 65   ┆--------------------        Date┆
0x040380…0403a0             2e 20 20 20 20 20 49 6e 69 74 2e 20 56 65 72 73 2e 20 45 78 70 6c 61 6e 61 74 69 6f 6e 2e 0d 0a   ┆.     Init. Vers. Explanation.  ┆
0x0403a0…0403c0             0d 0a 20 20 20 20 20 20 31 39 38 39 2d 30 31 2d 31 39 20 4c 45 49 20 20 31 2e 31 20 20 43 68 61   ┆        1989-01-19 LEI  1.1  Cha┆
0x0403c0…0403e0             6e 67 65 64 20 74 6f 20 54 75 72 62 6f 20 50 61 73 63 61 6c 20 35 2e 30 20 62 79 20 4c 65 69 66   ┆nged to Turbo Pascal 5.0 by Leif┆
0x0403e0…040400             20 4e 69 65 6c 73 65 6e 20 4a 54 41 53 0d 0a 20 20 20 20 20 20 31 39 38 39 2d 30 33 2d 32 32 20   ┆ Nielsen JTAS        1989-03-22 ┆
0x040400…040420 (17, 0, 5)  4c 45 49 20 20 31 2e 32 20 20 4e 65 77 20 6c 61 6e 67 75 61 67 65 73 20 69 6e 73 65 72 74 65 64   ┆LEI  1.2  New languages inserted┆
0x040420…040440             2e 0d 0a 20 20 20 20 20 20 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆.        -----------------------┆
0x040440…040460             2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆--------------------------------┆
0x040460…040480             2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2a 29 0d 0a 0d 0a 20 20 20 20   ┆----------------------*)        ┆
0x040480…0404a0             20 20 7b 24 52 2b 2c 53 2b 20 7d 0d 0a 0d 0a 20 20 55 53 45 53 0d 0a 20 20 20 20 44 6f 73 2c 0d   ┆  {$R+,S+ }      USES      Dos, ┆
0x0404a0…0404c0             0a 20 20 20 20 44 6f 73 55 74 69 6c 2c 0d 0a 20 20 20 20 48 65 6c 70 2c 0d 0a 20 20 20 20 50 61   ┆     DosUtil,      Help,      Pa┆
0x0404c0…0404e0             72 61 6d 3b 0d 0a 0d 0a 20 20 43 4f 4e 53 54 0d 0a 20 20 20 20 76 65 72 73 69 6f 6e 3a 20 53 54   ┆ram;      CONST      version: ST┆
0x0404e0…040500             52 49 4e 47 20 3d 20 28 27 31 2e 32 27 29 3b 0d 0a 0d 0a 20 20 20 20 4d 61 78 50 61 72 61 6d 20   ┆RING = ('1.2');        MaxParam ┆
0x040500…040520             20 3d 20 32 3b 0d 0a 20 20 20 20 4d 61 78 4f 70 74 69 6f 6e 20 3d 20 38 3b 0d 0a 0d 0a 20 20 20   ┆ = 2;      MaxOption = 8;       ┆
0x040520…040540             20 50 61 72 61 6d 4c 69 73 74 20 3a 20 41 52 52 41 59 5b 31 2e 2e 4d 61 78 50 61 72 61 6d 5d 20   ┆ ParamList : ARRAY[1..MaxParam] ┆
0x040540…040560             4f 46 20 50 61 72 61 6d 52 65 63 20 3d 0d 0a 20 20 20 20 20 28 28 4b 69 6e 64 3a 4b 6e 6f 77 6e   ┆OF ParamRec =       ((Kind:Known┆
0x040560…040580             46 69 6c 65 3b 20 44 65 66 69 6e 65 64 3a 46 41 4c 53 45 3b 20 4b 65 79 57 6f 72 64 3a 27 49 27   ┆File; Defined:FALSE; KeyWord:'I'┆
0x040580…0405a0             3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a 27 2e 52 54 50 27 29 2c 0d 0a 20 20   ┆; NumVal:0; TextVal:'.RTP'),    ┆
0x0405a0…0405c0             20 20 20 20 28 4b 69 6e 64 3a 46 69 6c 65 54 79 70 65 3b 20 20 44 65 66 69 6e 65 64 3a 46 41 4c   ┆    (Kind:FileType;  Defined:FAL┆
0x0405c0…0405e0             53 45 3b 20 4b 65 79 57 6f 72 64 3a 27 4f 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74 56   ┆SE; KeyWord:'O'; NumVal:0; TextV┆
0x0405e0…040600             61 6c 3a 27 27 29 29 3b 0d 0a 0d 0a 20 20 20 20 4f 70 74 69 6f 6e 4c 69 73 74 20 3a 20 41 52 52   ┆al:''));        OptionList : ARR┆
0x040600…040620 (17, 0, 6)  41 59 5b 31 2e 2e 4d 61 78 4f 70 74 69 6f 6e 5d 20 4f 46 20 50 61 72 61 6d 52 65 63 20 3d 0d 0a   ┆AY[1..MaxOption] OF ParamRec =  ┆
0x040620…040640             20 20 20 20 20 28 28 4b 69 6e 64 3a 4f 6e 4f 66 66 3b 20 20 20 20 44 65 66 69 6e 65 64 3a 46 41   ┆     ((Kind:OnOff;    Defined:FA┆
0x040640…040660             4c 53 45 20 3b 4b 65 79 57 6f 72 64 3a 27 4e 55 4d 42 45 52 53 27 3b 20 4e 75 6d 56 61 6c 3a 30   ┆LSE ;KeyWord:'NUMBERS'; NumVal:0┆
0x040660…040680             3b 20 54 65 78 74 56 61 6c 3a 27 4f 46 46 27 29 2c 20 28 2a 6c 69 6e 65 20 6e 75 6d 62 65 72 73   ┆; TextVal:'OFF'), (*line numbers┆
0x040680…0406a0             2a 29 0d 0a 20 20 20 20 20 20 28 4b 69 6e 64 3a 4f 6e 4f 66 66 3b 20 20 20 20 44 65 66 69 6e 65   ┆*)        (Kind:OnOff;    Define┆
0x0406a0…0406c0             64 3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f 72 64 3a 27 4d 41 52 4b 27 3b 20 4e 75 6d 56 61 6c 3a   ┆d:FALSE ;KeyWord:'MARK'; NumVal:┆
0x0406c0…0406e0             30 3b 20 54 65 78 74 56 61 6c 3a 27 4f 46 46 27 29 2c 20 28 2a 6d 61 72 6b 2a 29 0d 0a 20 20 20   ┆0; TextVal:'OFF'), (*mark*)     ┆
0x0406e0…040700             20 20 20 28 4b 69 6e 64 3a 4f 6e 4f 66 66 3b 20 20 20 20 44 65 66 69 6e 65 64 3a 46 41 4c 53 45   ┆   (Kind:OnOff;    Defined:FALSE┆
0x040700…040720             20 3b 4b 65 79 57 6f 72 64 3a 27 4c 49 53 54 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74   ┆ ;KeyWord:'LIST'; NumVal:0; Text┆
0x040720…040740             56 61 6c 3a 27 4f 46 46 27 29 2c 20 28 2a 6c 69 73 74 2a 29 0d 0a 20 20 20 20 20 20 28 4b 69 6e   ┆Val:'OFF'), (*list*)        (Kin┆
0x040740…040760             64 3a 54 65 78 74 54 79 70 65 3b 20 44 65 66 69 6e 65 64 3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f   ┆d:TextType; Defined:FALSE ;KeyWo┆
0x040760…040780             72 64 3a 27 49 4e 44 45 4e 54 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a 27   ┆rd:'INDENT'; NumVal:0; TextVal:'┆
0x040780…0407a0             4f 4e 27 20 29 2c 20 28 2a 69 6e 64 65 6e 74 2a 29 0d 0a 20 20 20 20 20 20 28 4b 69 6e 64 3a 54   ┆ON' ), (*indent*)        (Kind:T┆
0x0407a0…0407c0             65 78 74 54 79 70 65 3b 20 44 65 66 69 6e 65 64 3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f 72 64 3a   ┆extType; Defined:FALSE ;KeyWord:┆
0x0407c0…0407e0             27 4b 45 59 57 4f 52 44 53 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a 27 4f   ┆'KEYWORDS'; NumVal:0; TextVal:'O┆
0x0407e0…040800             57 4e 27 29 2c 20 28 2a 6b 65 79 77 6f 72 64 73 2a 29 0d 0a 20 20 20 20 20 20 28 4b 69 6e 64 3a   ┆WN'), (*keywords*)        (Kind:┆
0x040800…040820 (17, 0, 7)  54 65 78 74 54 79 70 65 3b 20 44 65 66 69 6e 65 64 3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f 72 64   ┆TextType; Defined:FALSE ;KeyWord┆
0x040820…040840             3a 27 56 41 52 49 41 42 4c 45 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a 27   ┆:'VARIABLE'; NumVal:0; TextVal:'┆
0x040840…040860             4f 57 4e 27 29 2c 20 28 2a 76 61 72 69 61 62 6c 65 73 2a 29 0d 0a 20 20 20 20 20 20 28 4b 69 6e   ┆OWN'), (*variables*)        (Kin┆
0x040860…040880             64 3a 54 65 78 74 54 79 70 65 3b 20 44 65 66 69 6e 65 64 3a 46 41 4c 53 45 20 3b 4b 65 79 57 6f   ┆d:TextType; Defined:FALSE ;KeyWo┆
0x040880…0408a0             72 64 3a 27 50 41 53 43 41 4c 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c 3a 27   ┆rd:'PASCAL'; NumVal:0; TextVal:'┆
0x0408a0…0408c0             54 55 52 42 4f 27 29 2c 20 28 2a 50 61 73 63 61 6c 20 76 65 72 2e 2a 29 0d 0a 20 20 20 20 20 20   ┆TURBO'), (*Pascal ver.*)        ┆
0x0408c0…0408e0             28 4b 69 6e 64 3a 4f 6e 4f 66 66 3b 20 20 20 20 44 65 66 69 6e 65 64 3a 46 41 4c 53 45 20 3b 4b   ┆(Kind:OnOff;    Defined:FALSE ;K┆
0x0408e0…040900             65 79 57 6f 72 64 3a 27 58 52 41 59 27 3b 20 4e 75 6d 56 61 6c 3a 30 3b 20 54 65 78 74 56 61 6c   ┆eyWord:'XRAY'; NumVal:0; TextVal┆
0x040900…040920             3a 27 4f 46 46 27 29 20 29 3b 20 28 2a 74 65 73 74 2a 29 0d 0a 0d 0a 0d 0a 20 20 43 4f 4e 53 54   ┆:'OFF') ); (*test*)        CONST┆
0x040920…040940             0d 0a 20 20 20 20 62 6c 61 6e 6b 20 3d 20 27 20 27 3b 0d 0a 20 20 20 20 6c 73 69 7a 65 20 3d 20   ┆      blank = ' ';      lsize = ┆
0x040940…040960             32 34 30 3b 20 28 2a 20 4c 4f 4e 47 45 53 54 20 4c 49 4e 45 2a 29 0d 0a 20 20 20 20 73 73 69 7a   ┆240; (* LONGEST LINE*)      ssiz┆
0x040960…040980             65 20 3d 20 39 30 3b 20 28 2a 20 44 45 45 50 45 53 54 20 53 54 41 43 4b 20 4c 4f 41 44 2a 29 0d   ┆e = 90; (* DEEPEST STACK LOAD*) ┆
0x040980…0409a0             0a 20 20 20 20 74 73 69 7a 65 20 3d 20 37 37 3b 20 20 20 28 2a 20 4e 4f 20 4f 46 20 49 4e 54 45   ┆     tsize = 77;   (* NO OF INTE┆
0x0409a0…0409c0             52 45 53 54 49 4e 47 20 4b 45 59 57 4f 52 44 53 20 2a 29 0d 0a 20 20 20 20 74 6f 70 6c 65 6e 67   ┆RESTING KEYWORDS *)      topleng┆
0x0409c0…0409e0             74 68 20 3d 20 31 34 3b 20 20 28 2a 20 6c 6f 6e 67 65 73 74 20 69 64 65 6e 74 69 66 69 65 72 20   ┆th = 14;  (* longest identifier ┆
0x0409e0…040a00             2a 29 0d 0a 0d 0a 20 20 20 20 61 6c 66 61 6c 65 6e 67 74 68 20 3d 20 31 34 3b 0d 0a 20 20 20 20   ┆*)        alfalength = 14;      ┆
0x040a00…040a20 (17, 0, 8)  46 69 6c 65 5f 62 75 66 66 5f 73 69 7a 65 20 3d 20 32 30 34 38 3b 0d 0a 20 20 20 20 6b 65 79 5f   ┆File_buff_size = 2048;      key_┆
0x040a20…040a40             70 74 72 73 69 7a 65 20 3d 20 32 37 20 28 2a 20 41 2e 2e 5a 20 2b 20 31 20 2a 29 3b 0d 0a 20 20   ┆ptrsize = 27 (* A..Z + 1 *);    ┆
0x040a40…040a60             20 20 73 70 61 63 65 20 3d 20 33 32 3b 0d 0a 20 20 20 20 6f 72 64 6f 66 74 61 62 20 3d 20 39 3b   ┆  space = 32;      ordoftab = 9;┆
0x040a60…040a80             0d 0a 0d 0a 20 20 20 20 4c 46 20 3d 20 31 30 3b 0d 0a 20 20 20 20 46 46 20 3d 20 31 32 3b 0d 0a   ┆        LF = 10;      FF = 12;  ┆
0x040a80…040aa0             20 20 20 20 43 52 20 3d 20 31 33 3b 0d 0a 0d 0a 0d 0a 20 20 54 59 50 45 0d 0a 20 20 20 20 61 6c   ┆    CR = 13;        TYPE      al┆
0x040aa0…040ac0             66 61 20 3d 20 53 54 52 49 4e 47 5b 61 6c 66 61 6c 65 6e 67 74 68 5d 3b 0d 0a 0d 0a 20 20 20 20   ┆fa = STRING[alfalength];        ┆
0x040ac0…040ae0             6f 70 74 69 6f 6e 73 20 3d 20 28 69 6e 64 5f 2c 20 6e 6f 69 6e 64 5f 2c 20 6f 77 6e 69 6e 64 5f   ┆options = (ind_, noind_, ownind_┆
0x040ae0…040b00             2c 20 6c 63 69 64 5f 2c 20 75 63 69 64 5f 2c 20 6f 77 6e 69 64 5f 2c 0d 0a 20 20 20 20 20 20 20   ┆, lcid_, ucid_, ownid_,         ┆
0x040b00…040b20             20 20 20 20 20 20 20 20 6c 63 6b 65 79 77 5f 2c 20 75 63 6b 65 79 77 5f 2c 20 6f 77 6e 6b 65 79   ┆        lckeyw_, uckeyw_, ownkey┆
0x040b20…040b40             77 5f 20 29 3b 0d 0a 0d 0a 20 20 20 20 6c 61 6e 67 75 61 67 65 5f 74 79 70 65 20 3d 20 28 20 4e   ┆w_ );        language_type = ( N┆
0x040b40…040b60             6f 74 5f 69 6d 70 6c 65 6d 65 6e 74 65 64 2c 20 54 75 72 62 6f 5f 70 61 73 63 61 6c 2c 20 50 61   ┆ot_implemented, Turbo_pascal, Pa┆
0x040b60…040b80             73 63 61 6c 5f 38 36 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43   ┆scal_86,                       C┆
0x040b80…040ba0             6f 6d 6d 6f 6e 5f 52 54 50 2c 20 52 54 50 5f 38 30 30 30 2c 20 52 54 50 5f 32 38 36 20 29 3b 0d   ┆ommon_RTP, RTP_8000, RTP_286 ); ┆
0x040ba0…040bc0             0a 0d 0a 20 20 20 20 73 74 61 63 6b 65 6c 65 6d 65 6e 74 20 3d 20 52 45 43 4f 52 44 0d 0a 20 20   ┆       stackelement = RECORD    ┆
0x040bc0…040be0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 72 69 6f 72 2c 20 69 6e 64 65 6e 74   ┆                   prior, indent┆
0x040be0…040c00             3a 20 69 6e 74 65 67 65 72 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44   ┆: integer                    END┆
0x040c00…040c20 (17, 0, 9)  3b 0d 0a 0d 0a 20 20 20 20 74 61 62 6c 65 6c 65 6d 65 6e 74 20 3d 20 52 45 43 4f 52 44 0d 0a 20   ┆;        tablelement = RECORD   ┆
0x040c20…040c40             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 78 74 5f 73 74 72 3a 20 61 6c 66 61   ┆                   txt_str: alfa┆
0x040c40…040c60             3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 31 2c 20 70 32 2c 20 73   ┆;                      p1, p2, s┆
0x040c60…040c80             70 61 63 69 6e 67 3a 20 69 6e 74 65 67 65 72 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆pacing: integer                 ┆
0x040c80…040ca0             20 20 45 4e 44 3b 0d 0a 0d 0a 0d 0a 20 20 56 41 52 0d 0a 20 20 20 20 6f 75 74 70 66 69 6c 65 2c   ┆  END;        VAR      outpfile,┆
0x040ca0…040cc0             20 69 6e 70 66 69 6c 65 3a 20 53 54 52 49 4e 47 3b 0d 0a 20 20 20 20 69 6e 70 2c 20 6f 75 74 70   ┆ inpfile: STRING;      inp, outp┆
0x040cc0…040ce0             3a 20 74 65 78 74 3b 0d 0a 20 20 20 20 49 5f 62 75 66 66 2c 20 4f 5f 62 75 66 66 3a 20 41 52 52   ┆: text;      I_buff, O_buff: ARR┆
0x040ce0…040d00             41 59 5b 31 2e 2e 46 69 6c 65 5f 62 75 66 66 5f 73 69 7a 65 5d 20 4f 46 20 62 79 74 65 3b 0d 0a   ┆AY[1..File_buff_size] OF byte;  ┆
0x040d00…040d20             0d 0a 0d 0a 20 20 20 20 65 6f 6c 3a 20 62 6f 6f 6c 65 61 6e 3b 20 20 20 28 2a 2a 20 66 61 6c 73   ┆        eol: boolean;   (** fals┆
0x040d20…040d40             65 20 75 6e 74 69 6c 20 45 4e 44 2d 4f 46 2d 4c 49 4e 45 20 69 73 20 6d 65 74 20 2a 2a 29 0d 0a   ┆e until END-OF-LINE is met **)  ┆
0x040d40…040d60             0d 0a 20 20 20 20 61 6c 66 61 6e 75 6d 3a 20 53 45 54 20 4f 46 20 63 68 61 72 3b 20 28 2a 48 4f   ┆      alfanum: SET OF char; (*HO┆
0x040d60…040d80             4c 44 53 20 53 45 54 20 4f 46 20 41 4c 50 48 41 4e 55 4d 45 52 49 43 20 53 59 4d 42 4f 4c 53 20   ┆LDS SET OF ALPHANUMERIC SYMBOLS ┆
0x040d80…040da0             2a 29 0d 0a 20 20 20 20 64 75 6d 6d 79 5f 6c 69 6e 65 3a 20 53 54 52 49 4e 47 3b 0d 0a 20 20 20   ┆*)      dummy_line: STRING;     ┆
0x040da0…040dc0             20 6c 69 6e 65 3a 20 53 54 52 49 4e 47 5b 6c 73 69 7a 65 5d 3b 20 20 20 20 28 2a 20 4c 49 4e 45   ┆ line: STRING[lsize];    (* LINE┆
0x040dc0…040de0             20 4c 45 46 54 20 4a 55 53 54 49 46 49 45 44 2a 29 0d 0a 20 20 20 20 6c 69 6e 65 5f 61 66 74 65   ┆ LEFT JUSTIFIED*)      line_afte┆
0x040de0…040e00             72 5f 66 66 3a 20 53 54 52 49 4e 47 5b 6c 73 69 7a 65 5d 3b 20 28 2a 20 53 74 6f 72 65 20 72 65   ┆r_ff: STRING[lsize]; (* Store re┆
0x040e00…040e20 (17, 0, 10) 73 74 20 6f 66 20 6c 69 6e 65 20 72 65 61 64 20 2a 29 0d 0a 20 20 20 20 6c 69 6e 65 5f 74 6f 6f   ┆st of line read *)      line_too┆
0x040e20…040e40             5f 6c 6f 6e 67 3a 20 69 6e 74 65 67 65 72 3b 20 28 2a 20 63 6f 75 6e 74 20 6e 75 6d 62 65 72 20   ┆_long: integer; (* count number ┆
0x040e40…040e60             6f 66 20 74 6f 6f 20 6c 6f 6e 67 20 6c 69 6e 65 73 20 2a 29 0d 0a 20 20 20 20 63 5f 70 6f 73 3a   ┆of too long lines *)      c_pos:┆
0x040e60…040e80             20 69 6e 74 65 67 65 72 3b 20 20 20 20 20 20 20 20 20 28 2a 20 50 4f 49 4e 54 45 52 20 54 4f 20   ┆ integer;         (* POINTER TO ┆
0x040e80…040ea0             43 55 52 52 45 4e 54 20 43 48 41 52 41 43 54 45 52 2a 29 0d 0a 20 20 20 20 6c 61 73 74 70 6f 73   ┆CURRENT CHARACTER*)      lastpos┆
0x040ea0…040ec0             3a 20 69 6e 74 65 67 65 72 3b 20 20 20 20 20 28 2a 20 4c 41 53 54 20 50 4f 53 49 54 49 4f 4e 20   ┆: integer;     (* LAST POSITION ┆
0x040ec0…040ee0             4f 4e 20 43 55 52 52 45 4e 54 20 4c 49 4e 45 2a 29 0d 0a 20 20 20 20 6c 69 6e 65 70 6f 73 3a 20   ┆ON CURRENT LINE*)      linepos: ┆
0x040ee0…040f00             69 6e 74 65 67 65 72 3b 20 20 20 20 20 28 2a 20 50 4f 49 4e 54 45 52 20 54 4f 20 4c 41 53 54 20   ┆integer;     (* POINTER TO LAST ┆
0x040f00…040f20             55 53 45 44 20 50 52 49 4e 54 50 4f 53 2a 29 0d 0a 20 20 20 20 6c 69 6e 65 6e 6f 3a 20 69 6e 74   ┆USED PRINTPOS*)      lineno: int┆
0x040f20…040f40             65 67 65 72 3b 20 20 20 20 20 28 2a 20 4c 49 4e 45 20 4e 55 4d 42 45 52 20 4f 46 20 43 55 52 52   ┆eger;     (* LINE NUMBER OF CURR┆
0x040f40…040f60             45 4e 54 20 4c 49 4e 45 20 2a 29 0d 0a 20 20 20 20 63 75 72 72 65 6e 74 2c 20 63 68 3a 20 63 68   ┆ENT LINE *)      current, ch: ch┆
0x040f60…040f80             61 72 3b 20 20 20 20 20 28 2a 20 43 48 20 49 53 20 46 49 52 53 54 20 43 48 41 52 20 4f 4e 20 4e   ┆ar;     (* CH IS FIRST CHAR ON N┆
0x040f80…040fa0             45 58 54 20 4c 49 4e 45 2a 29 0d 0a 20 20 20 20 66 72 65 73 68 3a 20 62 6f 6f 6c 65 61 6e 3b 20   ┆EXT LINE*)      fresh: boolean; ┆
0x040fa0…040fc0             20 20 20 20 20 20 28 2a 20 4c 49 4e 45 20 52 45 41 44 2c 20 4e 4f 54 20 59 45 54 20 50 52 49 4e   ┆      (* LINE READ, NOT YET PRIN┆
0x040fc0…040fe0             54 45 44 2a 29 0d 0a 20 20 20 20 6d 61 72 67 69 6e 3a 20 69 6e 74 65 67 65 72 3b 20 20 20 20 20   ┆TED*)      margin: integer;     ┆
0x040fe0…041000             20 28 2a 20 48 41 4e 44 4c 45 53 20 49 4e 44 45 4e 54 49 4f 4e 2a 29 0d 0a 20 20 20 20 6f 6c 64   ┆ (* HANDLES INDENTION*)      old┆
0x041000…041020 (17, 0, 11) 70 6f 73 3a 20 69 6e 74 65 67 65 72 3b 20 20 20 20 20 20 28 2a 20 55 53 45 44 20 54 4f 20 48 4f   ┆pos: integer;      (* USED TO HO┆
0x041020…041040             4c 44 20 50 4f 53 49 54 49 4f 4e 53 20 49 4e 20 52 45 43 4f 52 44 53 2a 29 0d 0a 20 20 20 20 6d   ┆LD POSITIONS IN RECORDS*)      m┆
0x041040…041060             61 78 5f 6b 65 79 77 5f 69 6e 64 65 78 2c 0d 0a 20 20 20 20 6b 65 79 77 5f 69 6e 64 65 78 3a 20   ┆ax_keyw_index,      keyw_index: ┆
0x041060…041080             69 6e 74 65 67 65 72 3b 0d 0a 20 20 20 20 73 74 61 74 65 2c 20 6f 6c 64 5f 73 74 61 74 65 3a 20   ┆integer;      state, old_state: ┆
0x041080…0410a0             28 73 70 75 62 6c 69 63 2c 20 64 65 63 6c 61 72 65 2c 20 73 74 61 74 65 6d 65 6e 74 29 3b 0d 0a   ┆(spublic, declare, statement);  ┆
0x0410a0…0410c0             20 20 20 20 73 6b 69 70 65 72 72 6f 72 2c 20 66 6f 72 6d 66 65 65 64 2c 20 6d 79 69 6e 64 2c 0d   ┆    skiperror, formfeed, myind, ┆
0x0410c0…0410e0             0a 20 20 20 20 6e 6f 69 6e 64 2c 20 66 65 77 65 6e 64 73 3a 20 62 6f 6f 6c 65 61 6e 3b 0d 0a 20   ┆     noind, fewends: boolean;   ┆
0x0410e0…041100             20 20 20 6c 69 6e 65 73 6d 6f 64 65 2c 20 6d 61 72 6b 6d 6f 64 65 3a 20 62 6f 6f 6c 65 61 6e 3b   ┆   linesmode, markmode: boolean;┆
0x041100…041120             0d 0a 0d 0a 20 20 20 20 69 64 6d 6f 64 65 2c 0d 0a 20 20 20 20 76 61 72 6d 6f 64 65 2c 0d 0a 20   ┆        idmode,      varmode,   ┆
0x041120…041140             20 20 20 72 65 73 6b 65 79 6d 6f 64 65 3a 20 62 79 74 65 3b 0d 0a 0d 0a 20 20 20 20 6c 61 6e 67   ┆   reskeymode: byte;        lang┆
0x041140…041160             75 61 67 65 3a 20 6c 61 6e 67 75 61 67 65 5f 74 79 70 65 3b 0d 0a 0d 0a 20 20 20 20 74 65 73 74   ┆uage: language_type;        test┆
0x041160…041180             5f 72 65 71 75 65 73 74 65 64 2c 20 20 20 20 20 20 20 28 2a 20 67 6f 76 65 72 6e 65 64 20 62 79   ┆_requested,       (* governed by┆
0x041180…0411a0             20 70 61 72 61 6d 65 74 65 72 20 6f 70 74 69 6f 6e 20 2a 29 0d 0a 0d 0a 20 20 20 20 73 6b 69 70   ┆ parameter option *)        skip┆
0x0411a0…0411c0             74 65 6b 73 74 3a 20 62 6f 6f 6c 65 61 6e 3b 20 20 20 28 2a 55 53 45 44 20 49 4e 20 53 48 49 46   ┆tekst: boolean;   (*USED IN SHIF┆
0x0411c0…0411e0             54 43 41 53 45 2a 29 0d 0a 20 20 20 20 73 6b 69 70 63 68 61 72 3a 20 63 68 61 72 3b 20 20 20 20   ┆TCASE*)      skipchar: char;    ┆
0x0411e0…041200             20 20 20 28 2a 55 53 45 44 20 49 4e 20 53 48 49 46 54 43 41 53 45 20 2a 29 0d 0a 0d 0a 20 20 20   ┆   (*USED IN SHIFTCASE *)       ┆
0x041200…04fc00 (17, 0, 12) […elided…]
0x04fc00…04fc20 (21, 0, 9)  3d 20 27 52 45 43 4f 52 44 20 20 20 20 27 3b 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 38 5d   ┆= 'RECORD    ';  PascalSymbol[8]┆
0x04fc20…04fc40             20 3a 3d 20 27 43 41 53 45 20 20 20 20 20 20 27 3b 0d 0a 20 20 20 20 50 61 73 63 61 6c 53 79 6d   ┆ := 'CASE      ';      PascalSym┆
0x04fc40…04fc60             62 6f 6c 5b 39 5d 20 3a 3d 20 27 49 46 20 20 20 20 20 20 20 20 27 3b 20 20 50 61 73 63 61 6c 53   ┆bol[9] := 'IF        ';  PascalS┆
0x04fc60…04fc80             79 6d 62 6f 6c 5b 31 30 5d 20 3a 3d 20 27 54 48 45 4e 20 20 20 20 20 20 27 3b 0d 0a 20 20 20 20   ┆ymbol[10] := 'THEN      ';      ┆
0x04fc80…04fca0             50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 31 31 5d 20 3a 3d 20 27 45 4c 53 45 20 20 20 20 20 20 27   ┆PascalSymbol[11] := 'ELSE      '┆
0x04fca0…04fcc0             3b 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 31 32 5d 20 3a 3d 20 27 44 4f 20 20 20 20 20 20   ┆;  PascalSymbol[12] := 'DO      ┆
0x04fcc0…04fce0             20 20 27 3b 0d 0a 20 20 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 31 33 5d 20 3a 3d 20 27 4f   ┆  ';      PascalSymbol[13] := 'O┆
0x04fce0…04fd00             46 20 20 20 20 20 20 20 20 27 3b 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 31 34 5d 20 3a 3d   ┆F        ';  PascalSymbol[14] :=┆
0x04fd00…04fd20             20 27 46 4f 52 20 20 20 20 20 20 20 27 3b 0d 0a 20 20 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c   ┆ 'FOR       ';      PascalSymbol┆
0x04fd20…04fd40             5b 31 35 5d 20 3a 3d 20 27 57 48 49 4c 45 20 20 20 20 20 27 3b 20 20 50 61 73 63 61 6c 53 79 6d   ┆[15] := 'WHILE     ';  PascalSym┆
0x04fd40…04fd60             62 6f 6c 5b 31 36 5d 20 3a 3d 20 27 57 49 54 48 20 20 20 20 20 20 27 3b 0d 0a 20 20 20 20 50 61   ┆bol[16] := 'WITH      ';      Pa┆
0x04fd60…04fd80             73 63 61 6c 53 79 6d 62 6f 6c 5b 31 37 5d 20 3a 3d 20 27 52 45 50 45 41 54 20 20 20 20 27 3b 20   ┆scalSymbol[17] := 'REPEAT    '; ┆
0x04fd80…04fda0             20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 31 38 5d 20 3a 3d 20 27 55 4e 54 49 4c 20 20 20 20 20   ┆ PascalSymbol[18] := 'UNTIL     ┆
0x04fda0…04fdc0             27 3b 0d 0a 20 20 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 31 39 5d 20 3a 3d 20 27 50 52 4f   ┆';      PascalSymbol[19] := 'PRO┆
0x04fdc0…04fde0             43 45 44 55 52 45 20 27 3b 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 32 30 5d 20 3a 3d 20 27   ┆CEDURE ';  PascalSymbol[20] := '┆
0x04fde0…04fe00             46 55 4e 43 54 49 4f 4e 20 20 27 3b 0d 0a 20 20 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 32   ┆FUNCTION  ';      PascalSymbol[2┆
0x04fe00…04fe20 (21, 0, 10) 31 5d 20 3a 3d 20 27 4c 41 42 45 4c 20 20 20 20 20 27 3b 20 20 50 61 73 63 61 6c 53 79 6d 62 6f   ┆1] := 'LABEL     ';  PascalSymbo┆
0x04fe20…04fe40             6c 5b 32 32 5d 20 3a 3d 20 27 49 4e 20 20 20 20 20 20 20 20 27 3b 0d 0a 20 20 20 20 50 61 73 63   ┆l[22] := 'IN        ';      Pasc┆
0x04fe40…04fe60             61 6c 53 79 6d 62 6f 6c 5b 32 33 5d 20 3a 3d 20 27 4d 4f 44 20 20 20 20 20 20 20 27 3b 20 20 50   ┆alSymbol[23] := 'MOD       ';  P┆
0x04fe60…04fe80             61 73 63 61 6c 53 79 6d 62 6f 6c 5b 32 34 5d 20 3a 3d 20 27 44 49 56 20 20 20 20 20 20 20 27 3b   ┆ascalSymbol[24] := 'DIV       ';┆
0x04fe80…04fea0             0d 0a 20 20 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 32 35 5d 20 3a 3d 20 27 41 4e 44 20 20   ┆      PascalSymbol[25] := 'AND  ┆
0x04fea0…04fec0             20 20 20 20 20 27 3b 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 32 36 5d 20 3a 3d 20 27 4f 52   ┆     ';  PascalSymbol[26] := 'OR┆
0x04fec0…04fee0             20 20 20 20 20 20 20 20 27 3b 0d 0a 20 20 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 32 37 5d   ┆        ';      PascalSymbol[27]┆
0x04fee0…04ff00             20 3a 3d 20 27 4e 4f 54 20 20 20 20 20 20 20 27 3b 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b   ┆ := 'NOT       ';  PascalSymbol[┆
0x04ff00…04ff20             32 38 5d 20 3a 3d 20 27 41 52 52 41 59 20 20 20 20 20 27 3b 0d 0a 20 20 20 20 50 61 73 63 61 6c   ┆28] := 'ARRAY     ';      Pascal┆
0x04ff20…04ff40             53 79 6d 62 6f 6c 5b 32 39 5d 20 3a 3d 20 27 55 4e 49 54 20 20 20 20 20 20 27 3b 20 20 50 61 73   ┆Symbol[29] := 'UNIT      ';  Pas┆
0x04ff40…04ff60             63 61 6c 53 79 6d 62 6f 6c 5b 33 30 5d 20 3a 3d 20 27 55 53 45 53 20 20 20 20 20 20 27 3b 0d 0a   ┆calSymbol[30] := 'USES      ';  ┆
0x04ff60…04ff80             20 20 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 33 31 5d 20 3a 3d 20 27 49 4d 50 4c 45 4d 45   ┆    PascalSymbol[31] := 'IMPLEME┆
0x04ff80…04ffa0             4e 54 41 27 3b 0d 0a 20 20 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 33 32 5d 20 3a 3d 20 27   ┆NTA';      PascalSymbol[32] := '┆
0x04ffa0…04ffc0             4c 4f 4f 50 20 20 20 20 20 20 27 3b 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 33 33 5d 20 3a   ┆LOOP      ';  PascalSymbol[33] :┆
0x04ffc0…04ffe0             3d 20 27 45 4e 44 4c 4f 4f 50 20 20 20 27 3b 0d 0a 20 20 20 20 50 61 73 63 61 6c 53 79 6d 62 6f   ┆= 'ENDLOOP   ';      PascalSymbo┆
0x04ffe0…050000             6c 5b 33 34 5d 20 3a 3d 20 27 4c 4f 43 4b 20 20 20 20 20 20 27 3b 20 20 50 61 73 63 61 6c 53 79   ┆l[34] := 'LOCK      ';  PascalSy┆
0x050000…050020 (21, 0, 11) 6d 62 6f 6c 5b 33 35 5d 20 3a 3d 20 27 4c 4f 43 4b 4d 45 53 20 20 20 27 3b 0d 0a 20 20 20 20 50   ┆mbol[35] := 'LOCKMES   ';      P┆
0x050020…050040             61 73 63 61 6c 53 79 6d 62 6f 6c 5b 33 36 5d 20 3a 3d 20 27 50 52 4f 43 45 53 53 20 20 20 27 3b   ┆ascalSymbol[36] := 'PROCESS   ';┆
0x050040…050060             20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 33 37 5d 20 3a 3d 20 27 50 4f 4f 4c 20 20 20 20 20   ┆  PascalSymbol[37] := 'POOL     ┆
0x050060…050080             20 27 3b 0d 0a 20 20 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 33 38 5d 20 3a 3d 20 27 45 58   ┆ ';      PascalSymbol[38] := 'EX┆
0x050080…0500a0             50 4f 52 54 20 20 20 20 27 3b 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b 33 39 5d 20 3a 3d 20   ┆PORT    ';  PascalSymbol[39] := ┆
0x0500a0…0500c0             27 4f 54 48 45 52 57 49 53 45 20 27 3b 0d 0a 20 20 20 20 50 61 73 63 61 6c 53 79 6d 62 6f 6c 5b   ┆'OTHERWISE ';      PascalSymbol[┆
0x0500c0…0500e0             34 30 5d 20 3a 3d 20 27 4e 4f 53 59 4d 42 4f 4c 20 20 27 3b 0d 0a 20 20 20 20 50 61 73 63 53 79   ┆40] := 'NOSYMBOL  ';      PascSy┆
0x0500e0…050100             6d 62 6f 6c 4e 61 6d 65 5b 31 5d 20 3a 3d 20 50 72 6f 67 53 79 6d 62 6f 6c 3b 20 20 20 50 61 73   ┆mbolName[1] := ProgSymbol;   Pas┆
0x050100…050120             63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 32 5d 20 3a 3d 20 42 65 67 69 6e 53 79 6d 62 6f 6c 3b 0d 0a   ┆cSymbolName[2] := BeginSymbol;  ┆
0x050120…050140             20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 33 5d 20 3a 3d 20 45 6e 64 53 79 6d 62   ┆    PascSymbolName[3] := EndSymb┆
0x050140…050160             6f 6c 20 3b 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 34 5d 20 3a 3d 20 43 6f 6e 73   ┆ol ;   PascSymbolName[4] := Cons┆
0x050160…050180             74 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 35 5d 20   ┆tSymbol;      PascSymbolName[5] ┆
0x050180…0501a0             3a 3d 20 54 79 70 65 53 79 6d 62 6f 6c 3b 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b   ┆:= TypeSymbol;   PascSymbolName[┆
0x0501a0…0501c0             36 5d 20 3a 3d 20 56 61 72 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c   ┆6] := VarSymbol;      PascSymbol┆
0x0501c0…0501e0             4e 61 6d 65 5b 37 5d 20 3a 3d 20 52 65 63 6f 72 64 53 79 6d 62 6f 6c 3b 20 20 20 50 61 73 63 53   ┆Name[7] := RecordSymbol;   PascS┆
0x0501e0…050200             79 6d 62 6f 6c 4e 61 6d 65 5b 38 5d 20 3a 3d 20 43 61 73 65 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20   ┆ymbolName[8] := CaseSymbol;     ┆
0x050200…050220 (21, 0, 12) 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 39 5d 20 3a 3d 20 49 46 53 79 6d 62 6f 6c 3b 20   ┆ PascSymbolName[9] := IFSymbol; ┆
0x050220…050240             20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 31 30 5d 20 3a 3d 20 54 68 65 6e 53 79 6d 62   ┆  PascSymbolName[10] := ThenSymb┆
0x050240…050260             6f 6c 3b 0d 0a 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 31 31 5d 20 3a 3d 20 45   ┆ol;      PascSymbolName[11] := E┆
0x050260…050280             6c 73 65 53 79 6d 62 6f 6c 3b 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 31 32 5d 20   ┆lseSymbol;   PascSymbolName[12] ┆
0x050280…0502a0             3a 3d 20 44 6f 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65   ┆:= DoSymbol;      PascSymbolName┆
0x0502a0…0502c0             5b 31 33 5d 20 3a 3d 20 4f 66 53 79 6d 62 6f 6c 3b 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61   ┆[13] := OfSymbol;   PascSymbolNa┆
0x0502c0…0502e0             6d 65 5b 31 34 5d 20 3a 3d 20 46 6f 72 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 50 61 73 63 53 79   ┆me[14] := ForSymbol;      PascSy┆
0x0502e0…050300             6d 62 6f 6c 4e 61 6d 65 5b 31 35 5d 20 3a 3d 20 57 68 69 6c 65 53 79 6d 62 6f 6c 3b 20 20 20 50   ┆mbolName[15] := WhileSymbol;   P┆
0x050300…050320             61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 31 36 5d 20 3a 3d 20 57 69 74 68 53 79 6d 62 6f 6c 3b   ┆ascSymbolName[16] := WithSymbol;┆
0x050320…050340             0d 0a 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 31 37 5d 20 3a 3d 20 52 65 70 65   ┆      PascSymbolName[17] := Repe┆
0x050340…050360             61 74 53 79 6d 62 6f 6c 3b 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 31 38 5d 20 3a   ┆atSymbol;   PascSymbolName[18] :┆
0x050360…050380             3d 20 55 6e 74 69 6c 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61   ┆= UntilSymbol;      PascSymbolNa┆
0x050380…0503a0             6d 65 5b 31 39 5d 20 3a 3d 20 50 72 6f 63 53 79 6d 62 6f 6c 3b 20 20 20 50 61 73 63 53 79 6d 62   ┆me[19] := ProcSymbol;   PascSymb┆
0x0503a0…0503c0             6f 6c 4e 61 6d 65 5b 32 30 5d 20 3a 3d 20 46 75 6e 63 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 50   ┆olName[20] := FuncSymbol;      P┆
0x0503c0…0503e0             61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 32 31 5d 20 3a 3d 20 4c 61 62 65 6c 53 79 6d 62 6f 6c   ┆ascSymbolName[21] := LabelSymbol┆
0x0503e0…050400             3b 0d 0a 20 20 20 20 46 6f 72 20 49 20 3a 3d 20 32 32 20 74 6f 20 32 38 20 44 4f 20 50 61 73 63   ┆;      For I := 22 to 28 DO Pasc┆
0x050400…050420 (21, 0, 13) 53 79 6d 62 6f 6c 4e 61 6d 65 5b 49 5d 20 3a 3d 20 41 6c 70 68 61 4f 70 65 72 61 74 6f 72 3b 0d   ┆SymbolName[I] := AlphaOperator; ┆
0x050420…050440             0a 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 32 39 5d 20 3a 3d 20 55 6e 69 74 53   ┆     PascSymbolName[29] := UnitS┆
0x050440…050460             79 6d 62 6f 6c 3b 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 33 30 5d 20 3a 3d 20 55   ┆ymbol;   PascSymbolName[30] := U┆
0x050460…050480             73 65 73 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 33   ┆sesSymbol;      PascSymbolName[3┆
0x050480…0504a0             31 5d 20 3a 3d 20 49 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20   ┆1] := ImplementationSymbol;     ┆
0x0504a0…0504c0             20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 33 32 5d 20 3a 3d 20 4c 6f 6f 70 53 79 6d 62 6f   ┆ PascSymbolName[32] := LoopSymbo┆
0x0504c0…0504e0             6c 3b 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 33 33 5d 20 3a 3d 20 45 6e 64 6c   ┆l;    PascSymbolName[33] := Endl┆
0x0504e0…050500             6f 6f 70 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 33   ┆oopSymbol;      PascSymbolName[3┆
0x050500…050520             34 5d 20 3a 3d 20 4c 6f 63 6b 53 79 6d 62 6f 6c 3b 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e   ┆4] := LockSymbol;    PascSymbolN┆
0x050520…050540             61 6d 65 5b 33 35 5d 20 3a 3d 20 4c 6f 63 6b 6d 65 73 73 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20   ┆ame[35] := LockmessSymbol;      ┆
0x050540…050560             50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 33 36 5d 20 3a 3d 20 50 72 6f 63 65 73 73 53 79 6d   ┆PascSymbolName[36] := ProcessSym┆
0x050560…050580             62 6f 6c 3b 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 33 37 5d 20 3a 3d 20 50 6f   ┆bol;    PascSymbolName[37] := Po┆
0x050580…0505a0             6f 6c 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 33 38   ┆olSymbol;      PascSymbolName[38┆
0x0505a0…0505c0             5d 20 3a 3d 20 45 78 70 6f 72 74 53 79 6d 62 6f 6c 3b 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61   ┆] := ExportSymbol;  PascSymbolNa┆
0x0505c0…0505e0             6d 65 5b 33 39 5d 20 3a 3d 20 4f 74 68 65 72 77 69 73 65 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20   ┆me[39] := OtherwiseSymbol;      ┆
0x0505e0…050600             50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 34 30 5d 20 3a 3d 20 49 64 65 6e 74 69 66 69 65 72   ┆PascSymbolName[40] := Identifier┆
0x050600…050620 (21, 0, 14) 3b 0d 0a 20 20 20 20 69 66 20 6e 6f 74 20 28 46 72 65 65 44 65 63 6c 61 72 61 74 69 6f 6e 20 49   ┆;      if not (FreeDeclaration I┆
0x050620…050640             4e 20 4c 61 6e 67 75 61 67 65 29 20 54 68 65 6e 0d 0a 20 20 20 20 42 65 67 69 6e 0d 0a 20 20 20   ┆N Language) Then      Begin     ┆
0x050640…050660             20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 32 39 5d 20 3a 3d 20 49 64 65 6e 74 69 66 69 65   ┆ PascSymbolName[29] := Identifie┆
0x050660…050680             72 3b 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 33 30 5d 20 3a 3d 20 49 64 65 6e 74   ┆r;   PascSymbolName[30] := Ident┆
0x050680…0506a0             69 66 69 65 72 3b 0d 0a 20 20 20 20 45 6e 64 3b 0d 0a 20 20 20 20 49 66 20 6e 6f 74 20 28 55 6e   ┆ifier;      End;      If not (Un┆
0x0506a0…0506c0             69 74 73 20 49 6e 20 4c 61 6e 67 75 61 67 65 29 20 74 68 65 6e 0d 0a 20 20 20 20 50 61 73 63 53   ┆its In Language) then      PascS┆
0x0506c0…0506e0             79 6d 62 6f 6c 4e 61 6d 65 5b 33 31 5d 20 3a 3d 20 49 64 65 6e 74 69 66 69 65 72 3b 0d 0a 20 20   ┆ymbolName[31] := Identifier;    ┆
0x0506e0…050700             20 20 49 66 20 6e 6f 74 28 4c 6f 6f 70 73 20 49 6e 20 4c 61 6e 67 75 61 67 65 29 20 74 68 65 6e   ┆  If not(Loops In Language) then┆
0x050700…050720             0d 0a 20 20 20 20 42 65 67 69 6e 0d 0a 20 20 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d   ┆      Begin        PascSymbolNam┆
0x050720…050740             65 5b 33 32 5d 20 3a 3d 20 49 64 65 6e 74 69 66 69 65 72 3b 20 20 20 20 50 61 73 63 53 79 6d 62   ┆e[32] := Identifier;    PascSymb┆
0x050740…050760             6f 6c 4e 61 6d 65 5b 33 33 5d 20 3a 3d 20 49 64 65 6e 74 69 66 69 65 72 3b 0d 0a 20 20 20 20 45   ┆olName[33] := Identifier;      E┆
0x050760…050780             6e 64 3b 0d 0a 20 20 20 20 49 66 20 6e 6f 74 28 4c 6f 63 6b 73 20 49 6e 20 4c 61 6e 67 75 61 67   ┆nd;      If not(Locks In Languag┆
0x050780…0507a0             65 29 20 74 68 65 6e 0d 0a 20 20 20 20 42 65 67 69 6e 0d 0a 20 20 20 20 20 20 50 61 73 63 53 79   ┆e) then      Begin        PascSy┆
0x0507a0…0507c0             6d 62 6f 6c 4e 61 6d 65 5b 33 34 5d 20 3a 3d 20 49 64 65 6e 74 69 66 69 65 72 3b 20 20 20 20 50   ┆mbolName[34] := Identifier;    P┆
0x0507c0…0507e0             61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 33 35 5d 20 3a 3d 20 49 64 65 6e 74 69 66 69 65 72 3b   ┆ascSymbolName[35] := Identifier;┆
0x0507e0…050800             0d 0a 20 20 20 20 45 6e 64 3b 0d 0a 20 20 20 20 49 66 20 6e 6f 74 20 28 50 72 6f 63 65 73 73 65   ┆      End;      If not (Processe┆
0x050800…050820 (21, 0, 15) 73 20 49 6e 20 4c 61 6e 67 75 61 67 65 29 20 74 68 65 6e 0d 0a 20 20 20 20 50 61 73 63 53 79 6d   ┆s In Language) then      PascSym┆
0x050820…050840             62 6f 6c 4e 61 6d 65 5b 33 36 5d 20 3a 3d 20 49 64 65 6e 74 69 66 69 65 72 3b 0d 0a 20 20 20 20   ┆bolName[36] := Identifier;      ┆
0x050840…050860             49 66 20 6e 6f 74 20 28 50 6f 6f 6c 73 20 49 6e 20 4c 61 6e 67 75 61 67 65 29 20 74 68 65 6e 0d   ┆If not (Pools In Language) then ┆
0x050860…050880             0a 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 33 37 5d 20 3a 3d 20 49 64 65 6e 74   ┆     PascSymbolName[37] := Ident┆
0x050880…0508a0             69 66 69 65 72 3b 0d 0a 20 20 20 20 49 66 20 6e 6f 74 20 28 45 78 70 6f 72 74 73 20 49 6e 20 4c   ┆ifier;      If not (Exports In L┆
0x0508a0…0508c0             61 6e 67 75 61 67 65 29 20 74 68 65 6e 0d 0a 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d   ┆anguage) then      PascSymbolNam┆
0x0508c0…0508e0             65 5b 33 38 5d 20 3a 3d 20 49 64 65 6e 74 69 66 69 65 72 3b 0d 0a 20 20 20 20 49 66 20 6e 6f 74   ┆e[38] := Identifier;      If not┆
0x0508e0…050900             20 28 4f 74 68 65 72 77 69 73 65 49 6e 43 61 73 65 20 49 6e 20 4c 61 6e 67 75 61 67 65 29 20 74   ┆ (OtherwiseInCase In Language) t┆
0x050900…050920             68 65 6e 0d 0a 20 20 20 20 50 61 73 63 53 79 6d 62 6f 6c 4e 61 6d 65 5b 33 39 5d 20 3a 3d 20 49   ┆hen      PascSymbolName[39] := I┆
0x050920…050940             64 65 6e 74 69 66 69 65 72 3b 0d 0a 20 20 20 20 46 6f 72 20 53 79 6d 62 6f 6c 4e 61 6d 65 20 3a   ┆dentifier;      For SymbolName :┆
0x050940…050960             3d 20 50 72 6f 67 53 79 6d 62 6f 6c 20 74 6f 20 41 6c 70 68 61 4f 70 65 72 61 74 6f 72 20 44 4f   ┆= ProgSymbol to AlphaOperator DO┆
0x050960…050980             0d 0a 20 20 20 20 20 20 53 74 61 74 65 6d 65 6e 74 54 79 70 65 4f 66 5b 53 79 6d 62 6f 6c 4e 61   ┆        StatementTypeOf[SymbolNa┆
0x050980…0509a0             6d 65 5d 20 3a 3d 20 4f 74 68 65 72 53 74 61 74 65 6d 65 6e 74 3b 0d 0a 20 20 20 20 53 74 61 74   ┆me] := OtherStatement;      Stat┆
0x0509a0…0509c0             65 6d 65 6e 74 54 79 70 65 4f 66 5b 42 65 67 69 6e 53 79 6d 62 6f 6c 5d 20 3a 3d 20 43 6f 6d 70   ┆ementTypeOf[BeginSymbol] := Comp┆
0x0509c0…0509e0             6f 75 6e 64 53 74 61 74 65 6d 65 6e 74 3b 0d 0a 20 20 20 20 53 74 61 74 65 6d 65 6e 74 54 79 70   ┆oundStatement;      StatementTyp┆
0x0509e0…050a00             65 4f 66 5b 43 61 73 65 53 79 6d 62 6f 6c 5d 20 3a 3d 20 43 61 73 65 53 74 61 74 65 6d 65 6e 74   ┆eOf[CaseSymbol] := CaseStatement┆
0x050a00…050a20 (21, 1, 1)  3b 0d 0a 20 20 20 20 53 74 61 74 65 6d 65 6e 74 54 79 70 65 4f 66 5b 49 66 53 79 6d 62 6f 6c 5d   ┆;      StatementTypeOf[IfSymbol]┆
0x050a20…050a40             20 3a 3d 20 49 66 53 74 61 74 65 6d 65 6e 74 3b 0d 0a 20 20 20 20 53 74 61 74 65 6d 65 6e 74 54   ┆ := IfStatement;      StatementT┆
0x050a40…050a60             79 70 65 4f 66 5b 46 6f 72 53 79 6d 62 6f 6c 5d 20 3a 3d 20 46 6f 72 57 69 74 68 57 68 69 6c 65   ┆ypeOf[ForSymbol] := ForWithWhile┆
0x050a60…050a80             53 74 61 74 65 6d 65 6e 74 3b 0d 0a 20 20 20 20 53 74 61 74 65 6d 65 6e 74 54 79 70 65 4f 66 5b   ┆Statement;      StatementTypeOf[┆
0x050a80…050aa0             57 68 69 6c 65 53 79 6d 62 6f 6c 5d 20 3a 3d 20 46 6f 72 57 69 74 68 57 68 69 6c 65 53 74 61 74   ┆WhileSymbol] := ForWithWhileStat┆
0x050aa0…050ac0             65 6d 65 6e 74 3b 0d 0a 20 20 20 20 53 74 61 74 65 6d 65 6e 74 54 79 70 65 4f 66 5b 57 69 74 68   ┆ement;      StatementTypeOf[With┆
0x050ac0…050ae0             53 79 6d 62 6f 6c 5d 20 3a 3d 20 46 6f 72 57 69 74 68 57 68 69 6c 65 53 74 61 74 65 6d 65 6e 74   ┆Symbol] := ForWithWhileStatement┆
0x050ae0…050b00             3b 0d 0a 20 20 20 20 53 74 61 74 65 6d 65 6e 74 54 79 70 65 4f 66 5b 4c 6f 63 6b 53 79 6d 62 6f   ┆;      StatementTypeOf[LockSymbo┆
0x050b00…050b20             6c 5d 20 3a 3d 20 46 6f 72 57 69 74 68 57 68 69 6c 65 53 74 61 74 65 6d 65 6e 74 3b 0d 0a 20 20   ┆l] := ForWithWhileStatement;    ┆
0x050b20…050b40             20 20 53 74 61 74 65 6d 65 6e 74 54 79 70 65 4f 66 5b 4c 6f 63 6b 6d 65 73 73 53 79 6d 62 6f 6c   ┆  StatementTypeOf[LockmessSymbol┆
0x050b40…050b60             5d 20 3a 3d 20 46 6f 72 57 69 74 68 57 68 69 6c 65 53 74 61 74 65 6d 65 6e 74 3b 0d 0a 20 20 20   ┆] := ForWithWhileStatement;     ┆
0x050b60…050b80             20 53 74 61 74 65 6d 65 6e 74 54 79 70 65 4f 66 5b 52 65 70 65 61 74 53 79 6d 62 6f 6c 5d 20 3a   ┆ StatementTypeOf[RepeatSymbol] :┆
0x050b80…050ba0             3d 20 52 65 70 65 61 74 53 74 61 74 65 6d 65 6e 74 3b 0d 0a 20 20 20 20 53 74 61 74 65 6d 65 6e   ┆= RepeatStatement;      Statemen┆
0x050ba0…050bc0             74 54 79 70 65 4f 66 5b 4c 6f 6f 70 53 79 6d 62 6f 6c 5d 20 3a 3d 20 4c 6f 6f 70 53 74 61 74 65   ┆tTypeOf[LoopSymbol] := LoopState┆
0x050bc0…050be0             6d 65 6e 74 3b 0d 0a 20 20 45 4e 44 20 7b 43 6f 6e 73 74 61 6e 74 49 6e 69 74 69 61 6c 69 7a 61   ┆ment;    END {ConstantInitializa┆
0x050be0…050c00             74 69 6f 6e 7d 3b 0d 0a 1a 42 24 20 00 00 00 00 00 00 00 00 00 00 c7 68 9a 12 00 00 00 00 00 00   ┆tion};   B$           Кhџ       ┆
0x050c00…050e00 (21, 1, 2)  Cluster(PASCFORMDOC)
                            […0x24…]
0x055600…055800 (22, 1, 9)  Cluster(PASCFORMHLP)
                            […0xf…]
0x057600…057620 (23, 0, 10) 7b 5b 41 3d 32 30 2c 42 2b 2c 52 3d 31 2d 31 34 30 2c 49 3d 32 2c 53 3d 32 2c 57 3d 31 2d 38 30   ┆{[A=20,B+,R=1-140,I=2,S=2,W=1-80┆
0x057620…057640             5d 20 46 4f 52 4d 41 54 54 45 52 44 49 52 45 43 54 49 56 45 53 2e 20 7d 0d 0a 0d 0a 7b 24 52 2d   ┆] FORMATTERDIRECTIVES. }    {$R-┆
0x057640…057660             2c 53 2d 2c 49 2b 2c 46 2d 2c 56 2b 2c 42 2d 2c 4e 2d 2c 4c 2b 20 7d 0d 0a 70 72 6f 67 72 61 6d   ┆,S-,I+,F-,V+,B-,N-,L+ }  program┆
0x057660…057680             20 46 6f 72 6d 61 74 28 49 6e 70 75 74 2c 20 4f 75 74 70 75 74 29 3b 0d 0a 7b 0d 0a 20 20 20 2a   ┆ Format(Input, Output);  {     *┆
0x057680…0576a0             2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a   ┆********************************┆
0x0576a0…0576c0             2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 20 20   ┆****************************    ┆
0x0576c0…0576e0             20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ *                              ┆
0x0576e0…057700             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0d 0a   ┆                             *  ┆
0x057700…057720             20 20 20 2a 20 20 20 20 20 20 50 20 41 20 53 20 43 20 41 20 4c 20 20 20 50 20 52 20 4f 20 47 20   ┆   *      P A S C A L   P R O G ┆
0x057720…057740             52 20 41 20 4d 20 20 20 46 20 4f 20 52 20 4d 20 41 20 54 20 54 20 45 20 52 20 20 20 20 20 20 2a   ┆R A M   F O R M A T T E R      *┆
0x057740…057760             0d 0a 20 20 20 2a 20 20 20 20 20 20 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆     *      --------------------┆
0x057760…057780             2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 20 20 20 20 20   ┆---------------------------     ┆
0x057780…0577a0             20 2a 0d 0a 20 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ *     *                        ┆
0x0577a0…0577c0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                ┆
0x0577c0…0577e0             20 20 20 2a 0d 0a 20 20 20 2a 20 20 20 20 41 75 74 68 6f 72 3a 20 4d 69 63 68 61 6c 20 4e 2e 20   ┆   *     *    Author: Michal N. ┆
0x0577e0…057800             43 6f 6e 64 69 63 74 2c 20 31 39 37 35 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆Condict, 1975.                  ┆
0x057800…057820 (23, 0, 11) 20 20 20 20 20 2a 0d 0a 20 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 4c 65 68 69 67 68 20 55   ┆     *     *            Lehigh U┆
0x057820…057840             6e 69 76 65 72 73 69 74 79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆niversity                       ┆
0x057840…057860             20 20 20 20 20 20 20 2a 0d 0a 20 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆       *     *                  ┆
0x057860…057880             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                ┆
0x057880…0578a0             20 20 20 20 20 20 20 20 20 2a 0d 0a 20 20 20 2a 20 20 20 20 55 70 64 61 74 65 64 3a 20 41 75 67   ┆         *     *    Updated: Aug┆
0x0578a0…0578c0             75 73 74 20 31 39 37 38 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ust 1978.                       ┆
0x0578c0…0578e0             20 20 20 20 20 20 20 20 20 20 20 2a 0d 0a 20 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 41   ┆           *     *             A┆
0x0578e0…057900             75 67 75 73 74 20 31 39 38 38 20 62 79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ugust 1988 by                   ┆
0x057900…057920             20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0d 0a 20 20 20 2a 20 20 20 20 20 20 20 20 20 20 20 20   ┆             *     *            ┆
0x057920…057940             20 48 61 6e 73 20 4a 2e 20 4a 61 6b 6f 62 73 65 6e 2c 20 41 61 72 68 75 73 2c 20 44 65 6e 6d 61   ┆ Hans J. Jakobsen, Aarhus, Denma┆
0x057940…057960             72 6b 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0d 0a 20 20 20 2a 20 20 20 20 20 20 20 20 20 20   ┆rk             *     *          ┆
0x057960…057980             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                ┆
0x057980…0579a0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0d 0a 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a   ┆                 *     *********┆
0x0579a0…0579c0             2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a   ┆********************************┆
0x0579c0…0579e0             2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 0d 0a 20 44 61 74 65 3a 20 20   ┆********************     Date:  ┆
0x0579e0…057a00             20 20 49 6e 69 74 2e 20 20 56 65 72 2e 20 20 45 78 70 6c 61 6e 61 74 69 6f 6e 2e 0d 0a 0d 0a 0d   ┆  Init.  Ver.  Explanation.     ┆
0x057a00…057a20 (23, 0, 12) 0a 20 31 39 38 38 2d 31 30 2d 31 39 20 4c 45 49 20 20 31 2e 34 20 20 20 50 61 72 61 6d 65 74 65   ┆  1988-10-19 LEI  1.4   Paramete┆
0x057a20…057a40             72 20 70 72 6f 63 65 73 73 69 6e 67 20 6d 61 64 65 20 62 79 20 4c 65 69 66 20 4e 69 65 6c 73 65   ┆r processing made by Leif Nielse┆
0x057a40…057a60             6e 2c 20 4a 54 41 53 0d 0a 20 31 39 38 39 2d 30 32 2d 30 36 20 48 4a 4a 20 20 31 2e 35 20 20 20   ┆n, JTAS   1989-02-06 HJJ  1.5   ┆
0x057a60…057a80             53 6b 69 70 20 63 6f 6e 74 72 6f 6c 20 63 68 61 72 61 63 74 65 72 73 20 28 20 6f 72 64 28 63 68   ┆Skip control characters ( ord(ch┆
0x057a80…057aa0             29 20 3c 20 33 32 20 29 3b 0d 0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆) < 32 );  ---------------------┆
0x057aa0…057ac0             2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆--------------------------------┆
0x057ac0…057ae0             2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 7d 0d 0a 0d 0a 55 53   ┆-------------------------}    US┆
0x057ae0…057b00             45 53 0d 0a 20 20 50 61 72 61 6d 2c 0d 0a 20 20 44 6f 73 75 74 69 6c 2c 0d 0a 20 20 48 65 6c 70   ┆ES    Param,    Dosutil,    Help┆
0x057b00…057b20             3b 0d 0a 7b 24 4d 20 31 36 33 38 34 2c 20 30 2c 20 36 35 35 33 36 30 20 7d 0d 0a 0d 0a 43 4f 4e   ┆;  {$M 16384, 0, 655360 }    CON┆
0x057b20…057b40             53 54 0d 0a 20 20 20 56 65 72 73 69 6f 6e 20 3d 20 28 27 31 2e 35 27 29 3b 0d 0a 20 20 20 46 69   ┆ST     Version = ('1.5');     Fi┆
0x057b40…057b60             6c 65 5f 42 75 66 66 5f 73 69 7a 65 20 3d 20 32 30 34 38 3b 0d 0a 0d 0a 7b 24 49 20 70 61 73 63   ┆le_Buff_size = 2048;    {$I pasc┆
0x057b60…057b80             66 31 2e 70 61 73 7d 0d 0a 0d 0a 50 72 6f 63 65 64 75 72 65 20 57 72 69 74 65 41 28 43 68 61 72   ┆f1.pas}    Procedure WriteA(Char┆
0x057b80…057ba0             61 63 74 65 72 3a 20 43 68 61 72 29 3b 0d 0a 0d 0a 20 20 56 61 72 0d 0a 20 20 20 20 49 3a 20 57   ┆acter: Char);      Var      I: W┆
0x057ba0…057bc0             69 64 74 68 3b 0d 0a 20 20 20 20 54 65 73 74 4e 6f 3a 20 49 6e 74 65 67 65 72 3b 0d 0a 0d 0a 20   ┆idth;      TestNo: Integer;     ┆
0x057bc0…057be0             20 42 65 67 69 6e 0d 0a 20 20 20 20 43 68 61 72 43 6f 75 6e 74 20 3a 3d 20 43 68 61 72 43 6f 75   ┆ Begin      CharCount := CharCou┆
0x057be0…057c00             6e 74 20 2b 20 31 3b 20 4f 6c 64 65 73 74 20 3a 3d 20 28 4f 6c 64 65 73 74 20 2b 31 29 20 4d 6f   ┆nt + 1; Oldest := (Oldest +1) Mo┆
0x057c00…057c20 (23, 0, 13) 64 20 42 75 66 66 65 72 53 69 7a 65 3b 7b 20 4f 6c 64 65 73 74 20 3a 3d 20 43 68 61 72 63 6f 75   ┆d BufferSize;{ Oldest := Charcou┆
0x057c20…057c40             6e 74 20 6d 6f 64 20 42 75 66 66 65 72 53 69 7a 65 3b 7d 0d 0a 20 20 20 20 57 69 74 68 20 55 6e   ┆nt mod BufferSize;}      With Un┆
0x057c40…057c60             57 72 69 74 74 65 6e 5b 4f 6c 64 65 73 74 5d 20 64 6f 0d 0a 20 20 20 20 20 20 42 65 67 69 6e 0d   ┆Written[Oldest] do        Begin ┆
0x057c60…057c80             0a 20 20 20 20 20 20 20 20 49 66 20 43 68 61 72 43 6f 75 6e 74 20 3e 20 42 75 66 66 53 7a 50 31   ┆         If CharCount > BuffSzP1┆
0x057c80…057ca0             0d 0a 20 20 20 20 20 20 20 20 54 68 65 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 42 65 67 69 6e 0d   ┆          Then            Begin ┆
0x057ca0…057cc0             0a 20 20 20 20 20 20 20 20 20 20 20 20 49 66 20 43 68 49 73 45 6e 64 4c 69 6e 65 0d 0a 20 20 20   ┆             If ChIsEndLine     ┆
0x057cc0…057ce0             20 20 20 20 20 20 20 20 20 54 68 65 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 65 67   ┆         Then                Beg┆
0x057ce0…057d00             69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 66 20 49 6e 64 65 6e 74 41 66 74   ┆in                  If IndentAft┆
0x057d00…057d20             65 72 45 4f 4c 20 3c 20 30 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 65 6e 0d   ┆erEOL < 0                  Then ┆
0x057d20…057d40             0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 65 67 69 6e 0d 0a 20 20 20 20 20 20   ┆                   Begin        ┆
0x057d40…057d60             20 20 20 20 20 20 20 20 20 20 20 20 20 7b 20 57 72 69 74 65 28 27 28 3a 20 27 2c 49 6e 64 65 6e   ┆             { Write('(: ',Inden┆
0x057d60…057d80             74 41 66 74 65 72 45 4f 4c 2c 27 20 3a 29 27 29 3b 7d 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20   ┆tAfterEOL,' :)');}              ┆
0x057d80…057da0             20 20 20 20 20 20 20 20 57 72 69 74 65 28 27 20 27 3a 20 2d 49 6e 64 65 6e 74 41 66 74 65 72 45   ┆        Write(' ': -IndentAfterE┆
0x057da0…057dc0             4f 4c 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 75 74 70 75 74   ┆OL);                      Output┆
0x057dc0…057de0             43 6f 6c 20 3a 3d 20 4f 75 74 70 75 74 43 6f 6c 20 2d 20 49 6e 64 65 6e 74 41 66 74 65 72 45 4f   ┆Col := OutputCol - IndentAfterEO┆
0x057de0…057e00             4c 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 6e 64 0d 0a 20 20 20 20 20   ┆L;                    End       ┆
0x057e00…057e20 (23, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 45 6c 73 65 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆           Else                 ┆
0x057e20…057e40             20 20 20 42 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 66   ┆   Begin                      If┆
0x057e40…057e60             20 49 6e 63 72 65 6d 65 6e 74 20 3c 20 30 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ Increment < 0                  ┆
0x057e60…057e80             20 20 20 20 54 68 65 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆    Then                        ┆
0x057e80…057ea0             42 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49   ┆Begin                          I┆
0x057ea0…057ec0             20 3a 3d 20 57 72 69 74 65 52 69 67 68 74 43 6f 6c 20 2d 20 4f 75 74 70 75 74 43 6f 6c 20 2b 20   ┆ := WriteRightCol - OutputCol + ┆
0x057ec0…057ee0             31 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 66 20 49   ┆1;                          If I┆
0x057ee0…057f00             20 3e 20 30 20 20 74 68 65 6e 20 57 72 69 74 65 28 27 20 27 3a 20 49 29 3b 0d 0a 20 20 20 20 20   ┆ > 0  then Write(' ': I);       ┆
0x057f00…057f20             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 65 73 74 4e 6f 20 3a 3d 20 4c 69 6e   ┆                   TestNo := Lin┆
0x057f20…057f40             65 4e 75 6d 62 65 72 3b 20 20 49 20 3a 3d 20 30 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆eNumber;  I := 0;               ┆
0x057f40…057f60             20 20 20 20 20 20 20 20 20 20 20 52 65 70 65 61 74 20 54 65 73 74 4e 6f 20 3a 3d 20 54 65 73 74   ┆           Repeat TestNo := Test┆
0x057f60…057f80             4e 6f 20 44 69 76 20 31 30 3b 20 49 20 3a 3d 20 49 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 20 20   ┆No Div 10; I := I + 1;          ┆
0x057f80…057fa0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 6e 74 69 6c 20 54 65 73 74 4e 6f 20 3d 20 30   ┆                Until TestNo = 0┆
0x057fa0…057fc0             3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 54   ┆;                          for T┆
0x057fc0…057fe0             65 73 74 4e 6f 20 3a 3d 20 31 20 74 6f 20 28 36 2d 49 29 20 64 6f 20 57 72 69 74 65 28 27 30 27   ┆estNo := 1 to (6-I) do Write('0'┆
0x057fe0…058000             29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 72 69 74   ┆);                          Writ┆
0x058000…058020 (23, 0, 15) 65 28 4c 69 6e 65 4e 75 6d 62 65 72 3a 49 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆e(LineNumber:I);                ┆
0x058020…058040             20 20 20 20 20 20 20 20 20 20 4c 69 6e 65 4e 75 6d 62 65 72 20 3a 3d 20 4c 69 6e 65 4e 75 6d 62   ┆          LineNumber := LineNumb┆
0x058040…058060             65 72 20 2d 20 49 6e 63 72 65 6d 65 6e 74 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆er - Increment;                 ┆
0x058060…058080             20 20 20 20 20 20 20 20 20 49 66 20 4c 69 6e 65 4e 75 6d 62 65 72 20 3e 20 39 39 39 39 0d 0a 20   ┆         If LineNumber > 9999   ┆
0x058080…0580a0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 68 65 6e 20 4c 69 6e 65   ┆                       then Line┆
0x0580a0…0580c0             4e 75 6d 62 65 72 20 3a 3d 20 4c 69 6e 65 4e 75 6d 62 65 72 20 2d 20 31 30 30 30 30 3b 0d 0a 20   ┆Number := LineNumber - 10000;   ┆
0x0580c0…0580e0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 72 69 74 65 6c 6e 3b 0d   ┆                       Writeln; ┆
0x0580e0…058100             0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 6e 64 0d 0a 20 20 20 20   ┆                       End      ┆
0x058100…058120             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 6c 73 65 0d 0a 20 20 20 20 20 20 20 20 20 20   ┆                Else            ┆
0x058120…058140             20 20 20 20 20 20 20 20 20 20 20 20 42 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆            Begin               ┆
0x058140…058160             20 20 20 20 20 20 20 20 20 20 20 57 72 69 74 65 4c 6e 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20   ┆           WriteLn;             ┆
0x058160…058180             20 20 20 20 20 20 20 20 20 20 20 20 20 49 66 20 49 6e 63 72 65 6d 65 6e 74 20 3e 20 30 0d 0a 20   ┆             If Increment > 0   ┆
0x058180…0581a0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 65 6e 0d 0a 20 20 20   ┆                       Then     ┆
0x0581a0…0581c0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 65 67 69 6e 0d 0a 20 20   ┆                       Begin    ┆
0x0581c0…0581e0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 72 69 74 65 28   ┆                          Write(┆
0x0581e0…058200             4c 69 6e 65 4e 75 6d 62 65 72 3a 20 34 2c 20 27 20 27 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20   ┆LineNumber: 4, ' ');            ┆
0x058200…058220 (23, 1, 1)  20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 69 6e 65 4e 75 6d 62 65 72 20 3a 3d 20   ┆                  LineNumber := ┆
0x058220…058240             4c 69 6e 65 4e 75 6d 62 65 72 20 2b 20 49 6e 63 72 65 6d 65 6e 74 3b 0d 0a 20 20 20 20 20 20 20   ┆LineNumber + Increment;         ┆
0x058240…058260             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 6e 64 3b 0d 0a 20 20 20 20 20 20 20   ┆                   End;         ┆
0x058260…058280             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 6e 64 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20   ┆               End;             ┆
0x058280…0582a0             20 20 20 20 20 20 20 20 20 49 66 20 49 6e 64 65 6e 74 41 66 74 65 72 45 4f 4c 20 3e 20 30 0d 0a   ┆         If IndentAfterEOL > 0  ┆
0x0582a0…0582c0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 65 6e 20 57 72 69 74 65 28 27   ┆                    Then Write('┆
0x0582c0…0582e0             20 27 3a 20 49 6e 64 65 6e 74 41 66 74 65 72 45 4f 4c 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20   ┆ ': IndentAfterEOL);            ┆
0x0582e0…058300             20 20 20 20 20 20 20 20 20 20 4f 75 74 70 75 74 43 6f 6c 20 3a 3d 20 49 6e 64 65 6e 74 41 66 74   ┆          OutputCol := IndentAft┆
0x058300…058320             65 72 45 4f 4c 20 2b 20 31 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 6e   ┆erEOL + 1;                    En┆
0x058320…058340             64 20 7b 45 6c 73 65 20 7d 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 68 49 73   ┆d {Else };                  ChIs┆
0x058340…058360             45 6e 64 4c 69 6e 65 20 3a 3d 20 46 61 6c 73 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆EndLine := False;               ┆
0x058360…058380             20 45 6e 64 20 7b 49 66 20 43 68 49 73 45 6e 64 4c 69 6e 65 20 7d 0d 0a 20 20 20 20 20 20 20 20   ┆ End {If ChIsEndLine }          ┆
0x058380…0583a0             20 20 20 20 45 6c 73 65 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 65 67 69 6e 20 57 72   ┆    Else                Begin Wr┆
0x0583a0…0583c0             69 74 65 28 63 68 29 3b 20 4f 75 74 70 75 74 43 6f 6c 20 3a 3d 20 4f 75 74 70 75 74 43 6f 6c 20   ┆ite(ch); OutputCol := OutputCol ┆
0x0583c0…0583e0             2b 20 31 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 6e 64 20 7b 45 6c 73 65 7d 3b 0d   ┆+ 1;                End {Else}; ┆
0x0583e0…058400             0a 20 20 20 20 20 20 20 20 20 20 45 6e 64 20 7b 49 66 20 43 68 61 72 63 6f 75 6e 74 20 3e 7d 3b   ┆           End {If Charcount >};┆
0x058400…058420 (23, 1, 2)  0d 0a 20 20 20 20 20 20 20 20 43 68 20 3a 3d 20 43 68 61 72 61 63 74 65 72 3b 20 57 72 69 74 65   ┆          Ch := Character; Write┆
0x058420…058440             43 6f 6c 75 6d 6e 20 3a 3d 20 57 72 69 74 65 43 6f 4c 75 6d 6e 20 2b 20 31 3b 0d 0a 20 20 20 20   ┆Column := WriteCoLumn + 1;      ┆
0x058440…058460             20 20 45 6e 64 20 7b 57 69 74 68 7d 3b 0d 0a 20 20 45 6e 64 20 7b 57 72 69 74 65 41 7d 3b 0d 0a   ┆  End {With};    End {WriteA};  ┆
0x058460…058480             0d 0a 0d 0a 50 72 6f 63 65 64 75 72 65 20 46 6c 75 73 68 55 6e 77 72 69 74 74 65 6e 42 75 66 66   ┆    Procedure FlushUnwrittenBuff┆
0x058480…0584a0             65 72 3b 0d 0a 0d 0a 20 20 42 65 67 69 6e 0d 0a 20 20 20 20 57 72 69 74 65 41 28 27 20 27 29 3b   ┆er;      Begin      WriteA(' ');┆
0x0584a0…0584c0             0d 0a 20 20 20 20 57 69 74 68 20 55 6e 57 72 69 74 74 65 6e 5b 4f 6c 64 65 73 74 5d 20 64 6f 0d   ┆      With UnWritten[Oldest] do ┆
0x0584c0…0584e0             0a 20 20 20 20 20 20 42 65 67 69 6e 20 43 68 49 73 45 6e 64 4c 69 6e 65 20 3a 3d 20 54 72 75 65   ┆       Begin ChIsEndLine := True┆
0x0584e0…058500             3b 20 20 49 6e 64 65 6e 74 41 66 74 65 72 45 4f 4c 20 3a 3d 20 30 3b 20 45 6e 64 3b 0d 0a 20 20   ┆;  IndentAfterEOL := 0; End;    ┆
0x058500…058520             20 20 57 72 69 74 65 43 6f 6c 75 6d 6e 20 3a 3d 20 30 3b 20 20 46 6f 72 20 49 20 3a 3d 20 30 20   ┆  WriteColumn := 0;  For I := 0 ┆
0x058520…058540             54 4f 20 42 75 66 66 53 7a 4d 31 20 44 6f 20 57 72 69 74 65 41 28 27 20 27 29 3b 0d 0a 20 20 45   ┆TO BuffSzM1 Do WriteA(' ');    E┆
0x058540…058560             4e 44 20 7b 46 6c 75 73 68 55 6e 77 72 69 74 74 65 6e 42 75 66 66 65 72 7d 3b 0d 0a 0d 0a 0d 0a   ┆ND {FlushUnwrittenBuffer};      ┆
0x058560…058580             50 72 6f 63 65 64 75 72 65 20 53 74 61 72 74 4e 65 77 4c 69 6e 65 41 6e 64 49 6e 64 65 6e 74 3b   ┆Procedure StartNewLineAndIndent;┆
0x058580…0585a0             0d 0a 0d 0a 20 20 42 65 67 69 6e 0d 0a 20 20 20 20 49 66 20 50 61 63 6b 65 72 49 73 4f 66 66 20   ┆      Begin      If PackerIsOff ┆
0x0585a0…0585c0             41 6e 64 20 44 69 73 70 6c 61 79 49 73 4f 6e 0d 0a 20 20 20 20 54 68 65 6e 0d 0a 20 20 20 20 20   ┆And DisplayIsOn      Then       ┆
0x0585c0…0585e0             20 42 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 57 72 69 74 65 41 28 27 20 27 29 3b 20 20 4c 61   ┆ Begin          WriteA(' ');  La┆
0x0585e0…058600             73 74 53 79 6d 62 6f 6c 20 3a 3d 20 50 65 72 69 6f 64 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 20   ┆stSymbol := PeriodSymbol;       ┆
0x058600…064200 (23, 1, 3)  […elided…]
0x064200…064220 (26, 1, 7)  4c 6f 63 6b 6d 65 73 73 53 79 6d 62 6f 6c 2c 0d 0a 20 20 20 20 20 20 20 50 72 6f 63 65 73 73 53   ┆LockmessSymbol,         ProcessS┆
0x064220…064240             79 6d 62 6f 6c 2c 20 50 6f 6f 6c 53 79 6d 62 6f 6c 2c 20 45 78 70 6f 72 74 53 79 6d 62 6f 6c 2c   ┆ymbol, PoolSymbol, ExportSymbol,┆
0x064240…064260             20 4f 74 68 65 72 77 69 73 65 53 79 6d 62 6f 6c 2c 0d 0a 20 20 20 20 20 20 20 41 6c 70 68 61 4f   ┆ OtherwiseSymbol,         AlphaO┆
0x064260…064280             70 65 72 61 74 6f 72 5d 3b 0d 0a 20 20 20 20 69 66 20 46 72 65 65 44 65 63 6c 61 72 61 74 69 6f   ┆perator];      if FreeDeclaratio┆
0x064280…0642a0             6e 20 69 6e 20 4c 61 6e 67 75 61 67 65 20 74 68 65 6e 0d 0a 20 20 20 20 20 20 42 65 67 69 6e 0d   ┆n in Language then        Begin ┆
0x0642a0…0642c0             0a 20 20 20 20 20 20 20 20 45 6e 64 55 73 65 73 20 3a 3d 20 5b 4c 61 62 65 6c 73 79 6d 62 6f 6c   ┆         EndUses := [Labelsymbol┆
0x0642c0…0642e0             2c 20 43 6f 6e 73 74 53 79 6d 62 6f 6c 2c 20 54 79 70 65 53 79 6d 62 6f 6c 2c 20 56 61 72 53 79   ┆, ConstSymbol, TypeSymbol, VarSy┆
0x0642e0…064300             6d 62 6f 6c 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 20 50 72 6f 63 53 79 6d 62 6f 6c 2c 20 46 75   ┆mbol,             ProcSymbol, Fu┆
0x064300…064320             6e 63 53 79 6d 62 6f 6c 2c 20 42 65 67 69 6e 53 79 6d 62 6f 6c 5d 3b 0d 0a 20 20 20 20 20 20 20   ┆ncSymbol, BeginSymbol];         ┆
0x064320…064340             20 45 6e 64 4c 61 62 65 6c 20 3a 3d 20 45 6e 64 55 73 65 73 3b 0d 0a 20 20 20 20 20 20 20 20 45   ┆ EndLabel := EndUses;          E┆
0x064340…064360             6e 64 43 6f 6e 73 74 20 3a 3d 20 45 6e 64 4c 61 62 65 6c 3b 0d 0a 20 20 20 20 20 20 20 20 45 6e   ┆ndConst := EndLabel;          En┆
0x064360…064380             64 54 79 70 65 20 3a 3d 20 45 6e 64 43 6f 6e 73 74 3b 0d 0a 20 20 20 20 20 20 20 20 45 6e 64 56   ┆dType := EndConst;          EndV┆
0x064380…0643a0             61 72 20 3a 3d 20 45 6e 64 54 79 70 65 3b 0d 0a 20 20 20 20 20 20 45 6e 64 0d 0a 20 20 20 20 45   ┆ar := EndType;        End      E┆
0x0643a0…0643c0             6c 73 65 0d 0a 20 20 20 20 20 20 42 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 45 6e 64 55 73 65   ┆lse        Begin          EndUse┆
0x0643c0…0643e0             73 20 3a 3d 20 5b 4c 61 62 65 6c 73 79 6d 62 6f 6c 2c 20 43 6f 6e 73 74 53 79 6d 62 6f 6c 2c 20   ┆s := [Labelsymbol, ConstSymbol, ┆
0x0643e0…064400             54 79 70 65 53 79 6d 62 6f 6c 2c 20 56 61 72 53 79 6d 62 6f 6c 2c 0d 0a 20 20 20 20 20 20 20 20   ┆TypeSymbol, VarSymbol,          ┆
0x064400…064420 (26, 1, 8)  20 20 20 50 72 6f 63 53 79 6d 62 6f 6c 2c 20 46 75 6e 63 53 79 6d 62 6f 6c 2c 20 42 65 67 69 6e   ┆   ProcSymbol, FuncSymbol, Begin┆
0x064420…064440             53 79 6d 62 6f 6c 5d 3b 0d 0a 20 20 20 20 20 20 20 20 45 6e 64 4c 61 62 65 6c 20 3a 3d 20 45 6e   ┆Symbol];          EndLabel := En┆
0x064440…064460             64 55 73 65 73 20 2d 20 5b 4c 61 62 65 6c 53 79 6d 62 6f 6c 5d 3b 0d 0a 20 20 20 20 20 20 20 20   ┆dUses - [LabelSymbol];          ┆
0x064460…064480             45 6e 64 43 6f 6e 73 74 20 3a 3d 20 45 6e 64 4c 61 62 65 6c 20 2d 20 5b 43 6f 6e 73 74 53 79 6d   ┆EndConst := EndLabel - [ConstSym┆
0x064480…0644a0             62 6f 6c 5d 3b 0d 0a 20 20 20 20 20 20 20 20 45 6e 64 54 79 70 65 20 3a 3d 20 45 6e 64 43 6f 6e   ┆bol];          EndType := EndCon┆
0x0644a0…0644c0             73 74 20 2d 20 5b 54 79 70 65 53 79 6d 62 6f 6c 5d 3b 0d 0a 20 20 20 20 20 20 20 20 45 6e 64 56   ┆st - [TypeSymbol];          EndV┆
0x0644c0…0644e0             61 72 20 3a 3d 20 45 6e 64 54 79 70 65 20 2d 20 5b 56 61 72 53 79 6d 62 6f 6c 5d 3b 0d 0a 20 20   ┆ar := EndType - [VarSymbol];    ┆
0x0644e0…064500             20 20 20 20 45 6e 64 3b 0d 0a 0d 0a 20 20 20 20 7b 49 6e 69 74 69 61 6c 69 7a 65 20 43 6f 6c 75   ┆    End;        {Initialize Colu┆
0x064500…064520             6d 6e 20 64 61 74 61 7d 0d 0a 20 20 20 20 57 72 69 74 65 43 6f 6c 75 6d 6e 20 3a 3d 20 30 3b 20   ┆mn data}      WriteColumn := 0; ┆
0x064520…064540             20 4c 65 66 74 4d 61 72 67 69 6e 20 3a 3d 20 30 3b 20 20 41 63 74 75 61 6c 4c 65 66 74 4d 61 72   ┆ LeftMargin := 0;  ActualLeftMar┆
0x064540…064560             67 69 6e 20 3a 3d 20 30 3b 0d 0a 20 20 20 20 4f 75 74 70 75 74 43 6f 6c 20 3a 3d 20 31 3b 20 20   ┆gin := 0;      OutputCol := 1;  ┆
0x064560…064580             52 65 61 64 4c 65 66 74 43 6f 6c 20 3a 3d 20 31 3b 20 20 52 65 61 64 52 69 67 68 74 43 6f 6c 20   ┆ReadLeftCol := 1;  ReadRightCol ┆
0x064580…0645a0             3a 3d 20 4d 61 78 52 65 61 64 52 69 67 68 74 43 6f 6c 3b 0d 0a 20 20 20 20 57 72 69 74 65 4c 65   ┆:= MaxReadRightCol;      WriteLe┆
0x0645a0…0645c0             66 74 43 6f 6c 20 3a 3d 20 31 3b 20 20 57 72 69 74 65 52 69 67 68 74 43 6f 6c 20 3a 3d 20 4d 61   ┆ftCol := 1;  WriteRightCol := Ma┆
0x0645c0…0645e0             78 57 72 69 74 65 52 69 67 68 74 43 4f 6c 3b 20 20 4f 6c 64 65 73 74 20 3a 3d 31 3b 0d 0a 20 20   ┆xWriteRightCOl;  Oldest :=1;    ┆
0x0645e0…064600             20 20 43 68 61 72 43 6f 75 6e 74 20 3a 3d 20 31 3b 20 20 4c 69 6e 65 4e 75 6d 62 65 72 20 3a 3d   ┆  CharCount := 1;  LineNumber :=┆
0x064600…064620 (26, 1, 9)  20 30 3b 20 20 49 6e 63 72 65 6d 65 6e 74 20 3a 3d 20 30 3b 0d 0a 0d 0a 20 20 20 20 7b 49 6e 69   ┆ 0;  Increment := 0;        {Ini┆
0x064620…064640             74 69 61 6c 69 7a 65 20 42 6f 6f 6c 65 61 6e 20 50 61 72 61 6d 65 74 65 72 73 7d 0d 0a 20 20 20   ┆tialize Boolean Parameters}     ┆
0x064640…064660             20 50 61 63 6b 65 72 49 73 4f 66 66 20 3a 3d 20 54 72 75 65 3b 20 20 42 75 6e 63 68 57 61 6e 74   ┆ PackerIsOff := True;  BunchWant┆
0x064660…064680             65 64 20 3a 3d 20 46 61 6c 73 65 3b 20 20 44 69 73 70 6c 61 79 49 73 4f 6e 20 3a 3d 20 54 72 75   ┆ed := False;  DisplayIsOn := Tru┆
0x064680…0646a0             65 3b 0d 0a 20 20 20 20 50 72 6f 63 4e 61 6d 65 73 57 61 6e 74 65 64 20 3a 3d 20 74 72 75 65 3b   ┆e;      ProcNamesWanted := true;┆
0x0646a0…0646c0             20 20 45 6e 64 43 6f 6d 6d 65 6e 74 73 57 61 6e 74 65 64 20 3a 3d 20 74 72 75 65 3b 0d 0a 20 20   ┆  EndCommentsWanted := true;    ┆
0x0646c0…0646e0             20 20 4e 6f 66 6f 72 6d 61 74 74 69 6e 67 20 3a 3d 20 66 61 6c 73 65 3b 0d 0a 0d 0a 20 20 20 20   ┆  Noformatting := false;        ┆
0x0646e0…064700             7b 49 6e 69 74 69 61 6c 69 7a 65 20 4e 75 6d 65 72 69 63 20 70 61 72 61 6d 65 74 65 72 73 20 7d   ┆{Initialize Numeric parameters }┆
0x064700…064720             0d 0a 20 20 20 20 49 6e 64 65 6e 74 49 6e 64 65 78 20 3a 3d 20 33 3b 20 20 4c 6f 6e 67 4c 69 6e   ┆      IndentIndex := 3;  LongLin┆
0x064720…064740             65 49 6e 64 65 6e 74 20 3a 3d 20 33 3b 20 20 50 72 6f 63 73 65 70 61 72 61 74 69 6f 6e 20 3a 3d   ┆eIndent := 3;  Procseparation :=┆
0x064740…064760             20 32 3b 0d 0a 20 20 20 20 53 79 6d 62 6f 6c 47 61 70 20 3a 3d 20 31 3b 20 20 53 74 61 74 6d 74   ┆ 2;      SymbolGap := 1;  Statmt┆
0x064760…064780             53 65 70 61 72 61 74 69 6f 6e 20 3a 3d 20 33 3b 20 44 65 63 6c 61 72 41 6c 69 67 6e 6d 65 6e 74   ┆Separation := 3; DeclarAlignment┆
0x064780…0647a0             20 3a 3d 20 30 3b 0d 0a 0d 0a 20 20 20 20 7b 49 6e 69 74 69 61 6c 69 7a 65 20 49 6e 70 75 74 20   ┆ := 0;        {Initialize Input ┆
0x0647a0…0647c0             43 6f 6e 74 65 78 74 20 64 61 74 61 3a 20 7d 0d 0a 20 20 20 20 52 65 61 64 43 6f 6c 75 6d 6e 20   ┆Context data: }      ReadColumn ┆
0x0647c0…0647e0             3a 3d 20 31 3b 20 20 43 68 49 73 45 4f 4c 20 3a 3d 20 46 61 6c 73 65 3b 20 20 4e 65 78 74 43 68   ┆:= 1;  ChIsEOL := False;  NextCh┆
0x0647e0…064800             49 73 45 4f 4c 20 3a 3d 20 46 61 6c 73 65 3b 0d 0a 20 20 20 20 46 6f 72 20 49 20 3a 3d 20 30 20   ┆IsEOL := False;      For I := 0 ┆
0x064800…064820 (26, 1, 10) 54 6f 20 42 75 66 66 65 72 53 69 7a 65 20 44 6f 20 53 79 6d 62 6f 6c 5b 49 5d 20 3a 3d 20 27 20   ┆To BufferSize Do Symbol[I] := ' ┆
0x064820…064840             27 3b 0d 0a 20 20 20 20 4c 61 73 74 53 79 6d 62 6f 6c 20 3a 3d 20 50 65 72 69 6f 64 53 79 6d 62   ┆';      LastSymbol := PeriodSymb┆
0x064840…064860             6f 6c 3b 20 20 4c 61 73 74 50 72 6f 67 50 61 72 74 57 61 73 42 6f 64 79 20 3a 3d 20 46 61 6c 73   ┆ol;  LastProgPartWasBody := Fals┆
0x064860…064880             65 3b 0d 0a 0d 0a 20 20 20 20 7b 53 70 65 63 69 61 6c 20 54 75 72 62 6f 20 50 61 73 63 61 6c 3a   ┆e;        {Special Turbo Pascal:┆
0x064880…0648a0             7d 0d 0a 20 20 20 20 49 6e 70 75 74 50 74 72 20 3a 3d 20 27 20 27 3b 0d 0a 20 20 45 6e 64 20 7b   ┆}      InputPtr := ' ';    End {┆
0x0648a0…0648c0             49 6e 69 74 69 61 6c 69 7a 65 7d 3b 0d 0a 0d 0a 0d 0a 42 45 47 49 4e 20 20 7b 4d 61 69 6e 50 72   ┆Initialize};      BEGIN  {MainPr┆
0x0648c0…0648e0             6f 67 72 61 6d 7d 0d 0a 20 20 47 65 74 50 61 72 61 6d 65 74 65 72 73 3b 0d 0a 20 20 53 65 74 75   ┆ogram}    GetParameters;    Setu┆
0x0648e0…064900             70 4c 61 6e 67 75 61 67 65 3b 0d 0a 20 20 43 6f 6e 73 74 61 6e 74 73 49 6e 69 74 69 61 6c 69 7a   ┆pLanguage;    ConstantsInitializ┆
0x064900…064920             61 74 69 6f 6e 3b 20 20 49 6e 69 74 69 61 6c 69 7a 65 3b 0d 0a 20 20 49 66 20 45 6f 66 28 49 6e   ┆ation;  Initialize;    If Eof(In┆
0x064920…064940             70 75 74 29 20 54 68 65 6e 20 57 72 69 74 65 4c 6e 28 27 20 2a 2a 2a 20 4e 6f 20 50 72 6f 67 72   ┆put) Then WriteLn(' *** No Progr┆
0x064940…064960             61 6d 20 66 6f 75 6e 64 20 74 6f 20 66 6f 72 6d 61 74 2e 27 29 0d 0a 20 20 45 6c 73 65 0d 0a 20   ┆am found to format.')    Else   ┆
0x064960…064980             20 20 20 42 65 67 69 6e 0d 0a 20 20 20 20 20 20 52 65 61 64 41 63 68 61 72 61 63 74 65 72 3b 20   ┆   Begin        ReadAcharacter; ┆
0x064980…0649a0             20 52 65 61 64 73 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 20 20 53 74 61 72 74 53 79 6d 62 6f 6c 20   ┆ Readsymbol;        StartSymbol ┆
0x0649a0…0649c0             3a 3d 20 53 79 6d 62 6f 6c 4e 61 6d 65 3b 0d 0a 20 20 20 20 20 20 49 66 20 6e 6f 74 20 28 53 79   ┆:= SymbolName;        If not (Sy┆
0x0649c0…0649e0             6d 62 6f 6c 4e 61 6d 65 20 69 6e 20 5b 20 50 72 6f 67 53 79 6d 62 6f 6c 2c 20 55 6e 69 74 53 79   ┆mbolName in [ ProgSymbol, UnitSy┆
0x0649e0…064a00             6d 62 6f 6c 2c 20 50 72 6f 63 65 73 73 53 79 6d 62 6f 6c 5d 29 0d 0a 20 20 20 20 20 20 54 68 65   ┆mbol, ProcessSymbol])        The┆
0x064a00…064a20 (26, 1, 11) 6e 0d 0a 20 20 20 20 20 20 20 20 49 66 20 28 53 79 6d 62 6f 6c 4e 61 6d 65 20 49 6e 20 28 5b 4c   ┆n          If (SymbolName In ([L┆
0x064a20…064a40             61 62 65 6c 53 79 6d 62 6f 6c 5d 2b 45 6e 64 4c 61 62 65 6c 29 20 29 20 61 6e 64 0d 0a 20 20 20   ┆abelSymbol]+EndLabel) ) and     ┆
0x064a40…064a60             20 20 20 20 20 20 20 20 28 50 72 6f 67 72 61 6d 4e 6f 74 4e 65 65 64 65 64 20 49 6e 20 4c 61 6e   ┆        (ProgramNotNeeded In Lan┆
0x064a60…064a80             67 75 61 67 65 29 0d 0a 20 20 20 20 20 20 20 20 54 68 65 6e 0d 0a 20 20 20 20 20 20 20 20 20 20   ┆guage)          Then            ┆
0x064a80…064aa0             42 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 4d 61 69 6e 5b 30 20 2b 20 31 5d 20 3a   ┆Begin              Main[0 + 1] :┆
0x064aa0…064ac0             3d 20 27 4d 41 49 4e 20 20 20 20 20 20 27 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 4d 61 69   ┆= 'MAIN      ';              Mai┆
0x064ac0…064ae0             6e 4e 6d 4c 65 6e 67 74 68 20 3a 3d 20 34 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 44 6f 42   ┆nNmLength := 4;              DoB┆
0x064ae0…064b00             6c 6f 63 6b 28 4d 61 69 6e 2c 20 4d 61 69 6e 4e 6d 4c 65 6e 67 74 68 29 3b 0d 0a 20 20 20 20 20   ┆lock(Main, MainNmLength);       ┆
0x064b00…064b20             20 20 20 20 20 20 20 57 72 69 74 65 41 28 27 2e 27 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20   ┆       WriteA('.');             ┆
0x064b20…064b40             20 46 6c 75 73 68 55 6e 77 72 69 74 74 65 6e 42 75 66 66 65 72 3b 0d 0a 20 20 20 20 20 20 20 20   ┆ FlushUnwrittenBuffer;          ┆
0x064b40…064b60             20 20 45 6e 64 0d 0a 20 20 20 20 20 20 20 20 45 6c 73 65 20 57 72 69 74 65 4c 6e 28 27 20 2a 2a   ┆  End          Else WriteLn(' **┆
0x064b60…064b80             2a 20 22 50 72 6f 67 72 61 6d 22 20 65 78 70 65 63 74 65 64 2e 27 29 0d 0a 20 20 20 20 20 20 45   ┆* "Program" expected.')        E┆
0x064b80…064ba0             6c 73 65 0d 0a 20 20 20 20 20 20 20 20 42 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 50 72   ┆lse          Begin            Pr┆
0x064ba0…064bc0             6f 67 72 61 6d 54 65 78 74 20 3a 3d 20 53 79 6d 62 6f 6c 4e 61 6d 65 20 20 3c 3e 20 55 6e 69 74   ┆ogramText := SymbolName  <> Unit┆
0x064bc0…064be0             53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 53 74 61 72 74 4e 65 77 4c 69 6e 65 41   ┆Symbol;            StartNewLineA┆
0x064be0…064c00             6e 64 49 6e 64 65 6e 74 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 57 72 69 74 65 53 79 6d 62 6f 6c   ┆ndIndent;            WriteSymbol┆
0x064c00…064c20 (26, 1, 12) 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 52 65 61 64 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 20 20   ┆;            ReadSymbol;        ┆
0x064c20…064c40             20 20 20 20 46 6f 72 20 49 20 3a 3d 20 30 20 54 6f 20 28 4c 65 6e 67 74 68 20 2d 20 31 29 20 44   ┆    For I := 0 To (Length - 1) D┆
0x064c40…064c60             69 76 20 41 6c 66 61 4c 65 6e 67 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 50 61 63 6b   ┆iv AlfaLeng DO              Pack┆
0x064c60…064c80             28 53 79 6d 62 6f 6c 2c 20 28 49 20 2a 20 41 6c 66 61 4c 65 6e 67 20 2b 20 31 29 2c 20 4d 61 69   ┆(Symbol, (I * AlfaLeng + 1), Mai┆
0x064c80…064ca0             6e 5b 49 20 2b 20 31 5d 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 4d 61 69 6e 4e 6d 4c 65 6e 67   ┆n[I + 1]);            MainNmLeng┆
0x064ca0…064cc0             74 68 20 3a 3d 20 4c 65 6e 67 74 68 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 49 66 20 53 74 61 72   ┆th := Length;            If Star┆
0x064cc0…064ce0             74 53 79 6d 62 6f 6c 20 3d 20 50 72 6f 63 65 73 73 53 79 6d 62 6f 6c 20 54 68 65 6e 0d 0a 20 20   ┆tSymbol = ProcessSymbol Then    ┆
0x064ce0…064d00             20 20 20 20 20 20 20 20 42 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 57 72 69 74 65   ┆        Begin              Write┆
0x064d00…064d20             53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 52 65 61 64 53 79 6d 62 6f 6c 3b   ┆Symbol;              ReadSymbol;┆
0x064d20…064d40             0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 49 66 20 53 79 6d 62 6f 6c 4e 61 6d 65 20 3d 20 4c 65   ┆              If SymbolName = Le┆
0x064d40…064d60             66 74 50 61 72 65 6e 74 68 20 54 68 65 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 44 6f 44 65   ┆ftParenth Then              DoDe┆
0x064d60…064d80             63 6c 61 72 61 74 69 6f 6e 55 6e 74 69 6c 28 5b 52 69 67 68 74 50 61 72 65 6e 74 68 5d 29 3b 0d   ┆clarationUntil([RightParenth]); ┆
0x064d80…064da0             0a 20 20 20 20 20 20 20 20 20 20 20 20 57 72 69 74 65 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 20   ┆             WriteSymbol;       ┆
0x064da0…064dc0             20 20 20 20 20 20 20 52 65 61 64 53 79 6d 62 6f 6c 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 45 6e   ┆       ReadSymbol;            En┆
0x064dc0…064de0             64 0d 0a 20 20 20 20 20 20 20 20 20 20 45 6c 73 65 0d 0a 20 20 20 20 20 20 20 20 20 20 52 65 70   ┆d            Else            Rep┆
0x064de0…064e00             65 61 74 20 57 72 69 74 65 53 79 6d 62 6f 6c 3b 20 52 65 61 64 53 79 6d 62 6f 6c 3b 20 55 6e 74   ┆eat WriteSymbol; ReadSymbol; Unt┆
0x064e00…064e20 (26, 1, 13) 69 6c 20 53 79 6d 62 6f 6c 4e 61 6d 65 20 3d 20 53 65 6d 69 43 6f 6c 6f 6e 3b 0d 0a 20 20 20 20   ┆il SymbolName = SemiColon;      ┆
0x064e20…064e40             20 20 20 20 20 20 57 72 69 74 65 53 79 6d 62 6f 6c 3b 20 20 52 65 61 64 53 79 6d 62 6f 6c 3b 20   ┆      WriteSymbol;  ReadSymbol; ┆
0x064e40…064e60             20 53 74 61 72 74 4e 65 77 4c 69 6e 65 41 6e 64 49 6e 64 65 6e 74 3b 0d 0a 20 20 20 20 20 20 20   ┆ StartNewLineAndIndent;         ┆
0x064e60…064e80             20 20 20 49 66 20 20 6e 6f 74 20 50 72 6f 67 72 61 6d 54 65 78 74 20 54 68 65 6e 0d 0a 20 20 20   ┆   If  not ProgramText Then     ┆
0x064e80…064ea0             20 20 20 20 20 20 20 42 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 7b 20 52 65 61 64   ┆       Begin              { Read┆
0x064ea0…064ec0             20 49 4e 54 45 52 46 41 43 45 20 7d 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 57 72 69 74 65 53   ┆ INTERFACE }              WriteS┆
0x064ec0…064ee0             79 6d 62 6f 6c 3b 20 20 52 65 61 64 53 79 6d 62 6f 6c 3b 20 20 53 74 61 72 74 4e 65 77 4c 69 6e   ┆ymbol;  ReadSymbol;  StartNewLin┆
0x064ee0…064f00             65 41 6e 64 49 6e 64 65 6e 74 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 45 6e 64 3b 0d 0a 20 20 20   ┆eAndIndent;            End;     ┆
0x064f00…064f20             20 20 20 20 20 20 20 49 66 20 53 79 6d 62 6f 6c 4e 61 6d 65 20 3d 20 55 73 65 73 53 79 6d 62 6f   ┆       If SymbolName = UsesSymbo┆
0x064f20…064f40             6c 20 54 68 65 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 44 6f 44 65 63 6c 61 72 61 74 69 6f 6e   ┆l Then             DoDeclaration┆
0x064f40…064f60             55 6e 74 69 6c 28 45 6e 64 55 73 65 73 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 49 66 20 50 72   ┆Until(EndUses);            If Pr┆
0x064f60…064f80             6f 67 72 61 6d 54 65 78 74 20 54 68 65 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 44 6f 42 6c 6f 63   ┆ogramText Then            DoBloc┆
0x064f80…064fa0             6b 28 4d 61 69 6e 2c 20 4d 61 69 6e 4e 6d 4c 65 6e 67 74 68 29 0d 0a 20 20 20 20 20 20 20 20 20   ┆k(Main, MainNmLength)           ┆
0x064fa0…064fc0             20 45 6c 73 65 0d 0a 20 20 20 20 20 20 20 20 20 20 44 6f 55 6e 69 74 28 4d 61 69 6e 2c 20 4d 61   ┆ Else            DoUnit(Main, Ma┆
0x064fc0…064fe0             69 6e 4e 6d 4c 65 6e 67 74 68 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 57 72 69 74 65 41 28 27   ┆inNmLength);            WriteA('┆
0x064fe0…065000             2e 27 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 46 6c 75 73 68 55 6e 77 72 69 74 74 65 6e 42 75   ┆.');            FlushUnwrittenBu┆
0x065000…065020 (26, 1, 14) 66 66 65 72 3b 0d 0a 20 20 20 20 20 20 20 20 45 6e 64 3b 0d 0a 20 20 20 20 45 6e 64 3b 0d 0a 45   ┆ffer;          End;      End;  E┆
0x065020…065040             4e 44 20 7b 4d 61 69 6e 50 72 6f 67 72 61 6d 7d 2e 0d 0a 1a 67 3a 31 2c 20 27 20 6c 69 6e 65 73   ┆ND {MainProgram}.   g:1, ' lines┆
0x065040…065060             20 74 72 75 6e 63 61 74 65 64 20 61 66 74 65 72 20 27 2c 0d 0a 20 20 20 20 20 20 20 20 20 20 20   ┆ truncated after ',             ┆
0x065060…065080             20 20 20 20 20 20 20 20 20 20 20 6c 73 69 7a 65 3a 31 2c 27 20 63 68 61 72 61 63 74 65 72 73 2e   ┆           lsize:1,' characters.┆
0x065080…0650a0             27 29 3b 0d 0a 0d 0a 20 20 20 20 43 6c 6f 73 65 28 69 6e 70 29 3b 0d 0a 20 20 20 20 43 6c 6f 73   ┆');        Close(inp);      Clos┆
0x0650a0…0650c0             65 28 6f 75 74 70 29 3b 0d 0a 20 20 45 4e 44 2e 0d 0a 0d 0a 1a 65 66 61 75 6c 74 20 2f 78 3a 6f   ┆e(outp);    END.     efault /x:o┆
0x0650c0…0650e0             66 66 0d 0a 0d 0a 0d 0a 0d 0a 2a 2a 2a 2a 2a 2a 20 45 4e 44 20 4f 46 20 54 4f 44 41 59 20 48 45   ┆ff        ****** END OF TODAY HE┆
0x0650e0…065100             4c 50 20 46 49 4c 45 20 2a 2a 2a 0d 0a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a   ┆LP FILE ***                     ┆
0x065100…065120             e5 49 4e 4b 20 20 20 20 45 58 45 00 00 00 00 00 00 00 00 00 00 00 01 00 46 11 5a 23 d4 ab 00 00   ┆тINK    EXE             F Z#нФ  ┆
0x065120…065140             e5 41 4d 44 52 49 56 45 53 59 53 00 00 00 00 00 00 00 00 00 00 00 04 00 46 11 70 23 2b 20 00 00   ┆тAMDRIVESYS             F p#+   ┆
0x065140…065160             e5 4d 41 52 54 44 52 56 53 59 53 00 00 00 00 00 00 00 00 00 00 00 04 00 46 11 75 23 f0 27 00 00   ┆тMARTDRVSYS             F u# '  ┆
0x065160…065180             e5 4d 41 32 45 4d 53 20 53 59 53 00 00 00 00 00 00 00 00 00 00 00 04 00 46 11 7a 23 1b 72 00 00   ┆тMA2EMS SYS             F z# r  ┆
0x065180…0651a0             e5 52 41 50 48 49 43 53 50 52 4f 00 00 00 00 00 00 00 00 00 00 00 04 00 46 11 89 23 b5 24 00 00   ┆тRAPHICSPRO             F Ѕ#х$  ┆
0x0651a0…0651c0             e5 49 4d 45 4d 20 20 20 53 59 53 00 00 00 00 00 00 00 00 00 00 00 04 00 46 11 8e 23 75 18 00 00   ┆тIMEM   SYS             F ј#u   ┆
0x0651c0…0651e0             e5 32 30 38 20 20 20 20 43 50 49 00 00 00 00 00 00 00 00 00 00 00 04 00 46 11 92 23 d0 02 00 00   ┆т208    CPI             F њ#л   ┆
0x0651e0…065200             e5 45 41 44 4d 45 20 20 54 58 54 00 00 00 00 00 00 00 00 00 00 00 a0 a9 4c 11 93 23 44 37 00 00   ┆тEADME  TXT           аЕL Њ#D7  ┆
0x065200…065400 (26, 1, 15) Cluster(PASCROSSDOC)
                            […0x6…]
0x066000…066200 (27, 0, 7)  Cluster(PASCROSSHLP)
                            […0x7…]
0x067000…067200 (27, 0, 15) Cluster(PASCROSSPAS)
                            […0x3a…]
0x06e600…06e800 (29, 0, 14) Cluster(TOOLS   DOC)
                            […0xc…]
0x070000…070020 (29, 1, 12) 54 75 72 62 6f 20 50 61 73 63 61 6c 20 50 69 63 6b 20 4c 69 73 74 20 46 69 6c 65 20 1a 00 01 0d   ┆Turbo Pascal Pick List File     ┆
0x070020…070040             12 17 01 1a 00 02 01 01 00 e2 02 f9 3f 43 3a 5c 4c 45 49 5c 52 54 50 5c 43 52 4f 53 53 2e 50 41   ┆         Р щ?C:\LEI\RTP\CROSS.PA┆
0x070040…070060             53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆S                               ┆
0x070060…070080             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ac 00 43   ┆                             г C┆
0x070080…0700a0             3a 5c 4c 45 49 5c 52 54 50 5c 56 4f 56 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆:\LEI\RTP\VOV.PAS               ┆
0x0700a0…0700c0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x0700c0…0700e0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 43 3a 5c 4c 45 49 5c 52 54 50 5c 43 52 53 50   ┆                 C:\LEI\RTP\CRSP┆
0x0700e0…070100             41 53 2e 42 41 54 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆AS.BAT                          ┆
0x070100…070120             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x070120…070140             00 b9 00 43 3a 5c 4c 45 49 5c 52 54 50 5c 43 52 53 52 54 50 2e 42 41 54 00 00 00 00 00 00 00 00   ┆ ╣ C:\LEI\RTP\CRSRTP.BAT        ┆
0x070140…070160             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x070160…070180             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 56 4e 43 3a 5c 4c 45 49 5c 52 54 50 5c   ┆                   VNC:\LEI\RTP\┆
0x070180…0701a0             49 4e 44 45 4e 54 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆INDENT.PAS                      ┆
0x0701a0…0701c0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0xa…]
0x070300…070320             00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 12 00 04 00 03 00 02 00 00 00 01 00 05 00 06 00 07   ┆                                ┆
0x070320…070340             00 08 00 03 00 99 00 00 65 3e 19 00 00 00 00 00 00 00 00 00 21 49 64 49 00 00 00 00 00 22 00 22   ┆     Ў  e>          !IdI     " "┆
0x070340…070360             00 22 00 22 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 28 00 00   ┆ " "                         (  ┆
0x070360…070380             00 00 00 00 00 00 00 00 00 bf 00 00 d5 4c 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆         ┐  НL*                 ┆
0x070380…0703a0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x0703c0…0703e0             04 00 36 00 10 00 16 76 94 12 00 00 d7 6c 94 12 00 00 e8 7b 76 12 10 00 42 78 94 12 00 00 f4 78   ┆  6    vћ   Оlћ   У{v   Bxћ   Зx┆
0x0703e0…070400             94 12 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 64 00 0c 00 0a 02   ┆ћ                         d     ┆
0x070400…070420 (29, 1, 14) 67 75 00 00 00 00 00 00 00 00 65 00 01 00 00 66 00 20 00 04 20 76 2e 20 00 61 62 5f 74 79 00 00   ┆gu        e    f     v.  ab_ty  ┆
0x070420…070440             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 67 00 20 00 07 41 52 52 41 59 20 5b 00   ┆                   g    ARRAY [ ┆
0x070440…070460             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 68 00 50 00 43 52 53 50 41   ┆                       h P CRSPA┆
0x070460…070480             53 2e 42 41 54 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆S.BAT                           ┆
0x070480…0704a0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x0704a0…0704c0             00 00 00 00 00 00 00 00 00 00 00 ff ff 02 00 1a 00 0b 5a 0b 5b 0b 5c 0b 5d 0b 5e 0b 5f 0b 60 0b   ┆                  Z [ \ ] ^ _ ` ┆
0x0704c0…0704e0             61 0b 62 0b 63 0b 64 0b 65 0b 66 0b 67 0b 68 0b 69 0b 6a 0b 6b 0b 6c 0b 6d 0b 6e 0b ff ff ff ff   ┆a b c d e f g h i j k l m n     ┆
0x0704e0…070500             ff ff 72 0b 73 0b 74 0b 75 0b 76 0b 77 0b ff ff 79 0b 7a 0b 7b 0b ff ff ff ff ff ff ff ff 80 0b   ┆  r s t u v w   y z {         ђ ┆
0x070500…070520             81 0b ff ff 83 0b 84 0b ff ff 86 0b 87 0b 88 0b 89 0b 8a 0b 8b 0b 8c 0b 8d 0b ff ff ff ff ff ff   ┆Ђ   Ѓ ё   є Є ѕ Ѕ і І ї Ї       ┆
0x070520…070540             ff ff 92 0b 93 0b 94 0b 95 0b 96 0b 97 0b 98 0b 99 0b 9a 0b 9b 0b 9c 0b 9d 0b ff ff ff ff ff ff   ┆  њ Њ ћ Ћ ќ Ќ ў Ў џ Џ ю Ю       ┆
0x070540…070560             a1 0b ff ff a3 0b a4 0b a5 0b a6 0b a7 0b ff ff a9 0b ff ff ff ff ac 0b ad 0b ae 0b af 0b ff ff   ┆А   Б ц Ц д Д   Е     г Г « »   ┆
0x070560…070580             b1 0b b2 0b b3 0b ff ff b5 0b b6 0b ff ff ff ff b9 0b ff ff ff ff bc 0b bd 0b be 0b bf 0b c0 0b   ┆▒ ▓ │   х Х     ╣     ╝ й Й ┐ └ ┆
0x070580…0705a0             c1 0b c2 0b c3 0b c4 0b c5 0b c6 0b c7 0b c8 0b c9 0b ff ff cb 0b ff ff ff ff ff ff cf 0b ff ff   ┆┴ ┬ ├ ─ ┼ к К ╚ ╔   ╦       ¤   ┆
0x0705a0…0705c0             d1 0b d2 0b d3 0b d4 0b d5 0b d6 0b d7 0b ff ff ff ff ff ff dd 0b ff ff ff ff de 0b df 0b e0 0b   ┆Л м М н Н о О       П     я ▀ Я ┆
0x0705c0…0705e0             e1 0b e6 0b 00 00 00 00 00 00 00 00 ea 0b e8 0b e9 0b 0f 0c eb 0b ec 0b f0 0b ee 0b ef 0b ff ff   ┆р Т         Ж У ж   в В   Ь №   ┆
0x0705e0…070600             f1 0b f2 0b f3 0b f4 0b f5 0b f6 0b f7 0b f8 0b f9 0b fa 0b fb 0b fd 0b 00 00 fe 0b ff 0b 00 0c   ┆ы Ы з З ш Ш э Э щ Щ ч §   ■     ┆
0x070600…070620 (29, 1, 15) 76 61 72 0d 0a 70 69 70 2c 20 70 61 70 2c 20 70 75 70 2c 20 70 65 70 20 3a 20 6c 6f 6e 67 69 6e   ┆var  pip, pap, pup, pep : longin┆
0x070620…070640             74 3b 0d 0a 74 79 70 65 0d 0a 66 79 20 3d 20 72 65 63 6f 72 64 0d 0a 20 20 20 20 20 20 66 3a 20   ┆t;  type  fy = record        f: ┆
0x070640…070660             69 6e 74 65 67 65 72 3b 0d 0a 20 20 20 20 20 20 67 3a 20 62 79 74 65 3b 0d 0a 20 20 20 20 20 20   ┆integer;        g: byte;        ┆
0x070660…070680             68 3a 20 72 65 61 6c 3b 0d 0a 20 20 20 20 20 20 65 6e 64 3b 1a ff 3c 0e 3d 0e 3e 0e 3f 0e 40 0e   ┆h: real;        end;  < = > ? @ ┆
0x070680…0706a0             41 0e 42 0e 43 0e 44 0e 45 0e 46 0e 47 0e 48 0e 49 0e 4a 0e 4b 0e 4c 0e 4d 0e 5d 0e 4f 0e 50 0e   ┆A B C D E F G H I J K L M ] O P ┆
0x0706a0…0706c0             51 0e 52 0e ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 b4 0e 5f 0e bb 0e   ┆Q R                       ┤ _ ╗ ┆
0x0706c0…0706e0             00 00 00 00 63 0e 64 0e 65 0e 66 0e 67 0e 68 0e 69 0e 6a 0e 6b 0e 6c 0e 6d 0e 6e 0e 6f 0e 70 0e   ┆    c d e f g h i j k l m n o p ┆
0x0706e0…070700             71 0e 72 0e 73 0e 74 0e ff ff 76 0e 77 0e 78 0e 79 0e 7a 0e 7b 0e 7c 0e 7d 0e 7e 0e 7f 0e 80 0e   ┆q r s t   v w x y z { | } ~   ђ ┆
0x070700…070720             81 0e 82 0e 83 0e 84 0e 85 0e 86 0e 87 0e 88 0e 89 0e ff ff ff ff ff ff 8d 0e 8e 0e ff ff ff ff   ┆Ђ ѓ Ѓ ё Ё є Є ѕ Ѕ       Ї ј     ┆
0x070720…070740             91 0e 92 0e ff ff 94 0e ff ff ff ff ff ff ff ff ff ff ff ff 9b 0e ff ff ff ff 9e 0e 9f 0e a0 0e   ┆Љ њ   ћ             Џ     ъ Ъ а ┆
0x070740…070760             a1 0e a2 0e a3 0e a4 0e a5 0e a6 0e a7 0e a8 0e a9 0e aa 0e ab 0e ac 0e ad 0e ae 0e af 0e b0 0e   ┆А б Б ц Ц д Д е Е ф Ф г Г « » ░ ┆
0x070760…070780             ff ff 00 00 00 00 00 00 b5 0e b6 0e ba 0e 00 00 00 00 00 00 bc 0e 83 0f bd 0e be 0e bf 0e c0 0e   ┆        х Х ║       ╝ Ѓ й Й ┐ └ ┆
0x070780…0707a0             c1 0e c2 0e c3 0e c4 0e c5 0e c6 0e c7 0e 78 0f ff ff ca 0e ff ff cc 0e cd 0e ce 0e cf 0e d0 0e   ┆┴ ┬ ├ ─ ┼ к К x   ╩   ╠ ═ ╬ ¤ л ┆
0x0707a0…0707c0             d1 0e d2 0e d3 0e d4 0e d5 0e d6 0e d7 0e d8 0e d9 0e da 0e db 0e dc 0e dd 0e de 0e df 0e e0 0e   ┆Л м М н Н о О п ┘ ┌ █ ▄ П я ▀ Я ┆
0x0707c0…0707e0             e1 0e e2 0e e3 0e e4 0e e5 0e e6 0e e7 0e e8 0e e9 0e ea 0e eb 0e ec 0e ed 0e ee 0e ef 0e f0 0e   ┆р Р с С т Т у У ж Ж в В ь Ь №   ┆
0x0707e0…070800             ff ff f2 0e f3 0e ff ff ff ff f6 0e f7 0e f8 0e ff ff ff ff ff ff ff ff fd 0e fe 0e ff 0e 00 0f   ┆  Ы з     Ш э Э         § ■     ┆
0x070800…070820 (30, 0, 1)  70 72 6f 67 72 61 6d 20 66 75 70 3b 0d 0a 63 6f 6e 73 74 0d 0a 76 75 66 20 3d 20 31 33 3b 0d 0a   ┆program fup;  const  vuf = 13;  ┆
0x070820…070840             28 2a 24 69 20 76 6f 76 2e 69 6e 63 2c 20 72 2b 2a 29 0d 0a 62 65 67 69 6e 0d 0a 6d 69 6a 61 75   ┆(*$i vov.inc, r+*)  begin  mijau┆
0x070840…070860             20 3a 3d 20 6f 65 66 20 2b 20 76 75 66 3b 0d 0a 28 2a 24 72 2b 20 2a 29 0d 0a 6f 65 66 20 3a 3d   ┆ := oef + vuf;  (*$r+ *)  oef :=┆
0x070860…070880             20 33 3b 0d 0a 28 2a 69 6e 63 6c 75 64 65 20 65 72 20 73 6a 6f 76 74 20 2a 29 0d 0a 0d 0a 65 6e   ┆ 3;  (*include er sjovt *)    en┆
0x070880…0708a0             64 2e 0d 0a 1a 53 79 6d 62 6f 6c 5d 20 3a 3d 20 46 6f 72 57 69 74 68 57 68 69 6c 65 53 74 61 74   ┆d.   Symbol] := ForWithWhileStat┆
0x0708a0…0708c0             65 6d 65 6e 74 3b 0d 0a 20 20 20 20 53 74 61 74 65 6d 65 6e 74 54 79 70 65 4f 66 5b 57 69 74 68   ┆ement;      StatementTypeOf[With┆
0x0708c0…0708e0             53 79 6d 62 6f 6c 5d 20 3a 3d 20 46 6f 72 57 69 74 68 57 68 69 6c 65 53 74 61 74 65 6d 65 6e 74   ┆Symbol] := ForWithWhileStatement┆
0x0708e0…070900             3b 0d 0a 20 20 20 20 53 74 61 74 65 6d 65 6e 74 54 79 70 65 4f 66 5b 4c 6f 63 6b 53 79 6d 62 6f   ┆;      StatementTypeOf[LockSymbo┆
0x070900…070920             6c 5d 20 3a 3d 20 46 6f 72 57 69 74 68 57 68 69 6c 65 53 74 61 74 65 6d 65 6e 74 3b 0d 0a 20 20   ┆l] := ForWithWhileStatement;    ┆
0x070920…070940             20 20 53 74 61 74 65 6d 65 6e 74 54 79 70 65 4f 66 5b 4c 6f 63 6b 6d 65 73 73 53 79 6d 62 6f 6c   ┆  StatementTypeOf[LockmessSymbol┆
0x070940…070960             5d 20 3a 3d 20 46 6f 72 57 69 74 68 57 68 69 6c 65 53 74 61 74 65 6d 65 6e 74 3b 0d 0a 20 20 20   ┆] := ForWithWhileStatement;     ┆
0x070960…070980             20 53 74 61 74 65 6d 65 6e 74 54 79 70 65 4f 66 5b 52 65 70 65 61 74 53 79 6d 62 6f 6c 5d 20 3a   ┆ StatementTypeOf[RepeatSymbol] :┆
0x070980…0709a0             3d 20 52 65 70 65 61 74 53 74 61 74 65 6d 65 6e 74 3b 0d 0a 20 20 20 20 53 74 61 74 65 6d 65 6e   ┆= RepeatStatement;      Statemen┆
0x0709a0…0709c0             74 54 79 70 65 4f 66 5b 4c 6f 6f 70 53 79 6d 62 6f 6c 5d 20 3a 3d 20 4c 6f 6f 70 53 74 61 74 65   ┆tTypeOf[LoopSymbol] := LoopState┆
0x0709c0…0709e0             6d 65 6e 74 3b 0d 0a 20 20 45 4e 44 20 7b 43 6f 6e 73 74 61 6e 74 49 6e 69 74 69 61 6c 69 7a 61   ┆ment;    END {ConstantInitializa┆
0x0709e0…070a00             74 69 6f 6e 7d 3b 0d 0a 1a 42 24 20 00 00 00 00 00 00 00 00 00 00 c7 68 9a 12 00 00 00 00 00 00   ┆tion};   B$           Кhџ       ┆
0x070a00…070a20 (30, 0, 2)  DirEnt {name=».          «, attr=0x10, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x73b1, mdate=0x129a, cluster=0x036a, length=0x00000000}
0x070a20…070a40             DirEnt {name=»..         «, attr=0x10, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x73b1, mdate=0x129a, cluster=0x0000, length=0x00000000}
0x070a40…070a60             DirEnt {name=»BYTEIO  PAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x775a, mdate=0x129a, cluster=0x0008, length=0x000003dc}
0x070a60…070a80             DirEnt {name=»DOSUTIL ASM«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x149d, mdate=0x122d, cluster=0x036d, length=0x00001d80}
0x070a80…070aa0             DirEnt {name=»DOSUTIL OBJ«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x736c, mdate=0x129a, cluster=0x037c, length=0x000004bc}
0x070aa0…070ac0             DirEnt {name=»DOSUTIL PAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x78c2, mdate=0x129a, cluster=0x000a, length=0x00004b6d}
0x070ac0…070ae0             DirEnt {name=»DOSUTIL TPU«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x78d7, mdate=0x129a, cluster=0x0044, length=0x00002a60}
0x070ae0…070b00             DirEnt {name=»тNANAL  PAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x7774, mdate=0x129a, cluster=0x0069, length=0x000002e7}
0x070b00…070b20             DirEnt {name=»HELP    PAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x7805, mdate=0x129a, cluster=0x00c9, length=0x00001c3a}
0x070b20…070b40             DirEnt {name=»HELP    TPU«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x78e3, mdate=0x129a, cluster=0x00db, length=0x000014b0}
0x070b40…070b60             DirEnt {name=»PARAM   PAS«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x777c, mdate=0x129a, cluster=0x006b, length=0x00002392}
0x070b60…070b80             DirEnt {name=»PARAM   TPU«, attr=0x20, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x78dd, mdate=0x129a, cluster=0x005a, length=0x00001b10}
0x070b80…070ba0             DirEnt {name=»           «, attr=0x00, locase=0x00, ctime=0x000000, cdate=0x0000, adate=0x0000, hicl=0x0000, mtime=0x0000, mdate=0x0000, cluster=0x0000, length=0x00000000}
                            […0x3…]
0x070c00…070c20 (30, 0, 3)  75 6e 69 74 20 42 79 74 65 49 4f 3b 0d 0a 69 6e 74 65 72 66 61 63 65 0d 0a 76 61 72 0d 0a 20 20   ┆unit ByteIO;  interface  var    ┆
0x070c20…070c40             53 6f 75 72 63 65 2c 20 44 65 73 74 69 6e 61 74 69 6f 6e 20 3a 20 46 49 4c 45 3b 0d 0a 0d 0a 66   ┆Source, Destination : FILE;    f┆
0x070c40…070c60             75 6e 63 74 69 6f 6e 20 47 65 74 42 79 74 65 3a 20 62 79 74 65 3b 0d 0a 7b 20 47 65 74 42 79 74   ┆unction GetByte: byte;  { GetByt┆
0x070c60…070c80             65 20 72 65 74 72 69 65 76 73 20 6f 6e 65 20 62 79 74 65 20 66 72 6f 6d 20 74 68 65 20 75 6e 74   ┆e retrievs one byte from the unt┆
0x070c80…070ca0             79 70 65 64 20 66 69 6c 65 20 53 6f 75 72 63 65 2e 20 7d 0d 0a 0d 0a 7b 3d 3d 3d 3d 3d 3d 3d 3d   ┆yped file Source. }    {========┆
0x070ca0…070cc0             3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d   ┆================================┆
                            […0x1…]
0x070ce0…070d00             3d 3d 3d 3d 7d 0d 0a 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 0d 0a 63 6f 6e 73 74 0d 0a 20 20   ┆====}  implementation  const    ┆
0x070d00…070d20             52 65 63 53 69 7a 65 20 3d 20 31 32 38 3b 0d 0a 20 20 42 75 66 53 69 7a 65 20 3d 20 31 36 30 3b   ┆RecSize = 128;    BufSize = 160;┆
0x070d20…070d40             0d 0a 20 20 42 75 66 50 6f 73 20 3a 20 77 6f 72 64 20 3d 20 52 65 63 53 69 7a 65 3b 0d 0a 20 20   ┆    BufPos : word = RecSize;    ┆
0x070d40…070d60             42 75 66 4e 6f 20 3a 20 77 6f 72 64 20 3d 20 42 75 66 53 69 7a 65 3b 0d 0a 20 20 52 65 63 73 52   ┆BufNo : word = BufSize;    RecsR┆
0x070d60…070d80             65 61 64 20 3a 20 77 6f 72 64 20 3d 20 31 3b 0d 0a 76 61 72 0d 0a 20 20 49 6e 70 75 74 42 75 66   ┆ead : word = 1;  var    InputBuf┆
0x070d80…070da0             66 65 72 20 3a 20 61 72 72 61 79 20 5b 31 2e 2e 42 75 66 53 69 7a 65 2c 20 31 2e 2e 52 65 63 53   ┆fer : array [1..BufSize, 1..RecS┆
0x070da0…070dc0             69 7a 65 5d 20 6f 66 20 62 79 74 65 3b 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 47 65 74 42 79 74   ┆ize] of byte;    function GetByt┆
0x070dc0…070de0             65 3a 20 62 79 74 65 3b 0d 0a 62 65 67 69 6e 0d 0a 20 20 42 75 66 50 6f 73 20 3a 3d 20 42 75 66   ┆e: byte;  begin    BufPos := Buf┆
0x070de0…070e00             50 6f 73 20 2b 20 31 3b 0d 0a 20 20 69 66 20 42 75 66 50 6f 73 20 3e 20 52 65 63 53 69 7a 65 20   ┆Pos + 1;    if BufPos > RecSize ┆
0x070e00…070e20 (30, 0, 4)  74 68 65 6e 0d 0a 20 20 20 62 65 67 69 6e 0d 0a 20 20 20 20 20 42 75 66 50 6f 73 20 3a 3d 20 31   ┆then     begin       BufPos := 1┆
0x070e20…070e40             3b 0d 0a 20 20 20 20 20 42 75 66 4e 6f 20 3a 3d 20 42 75 66 4e 6f 20 2b 20 31 3b 0d 0a 20 20 20   ┆;       BufNo := BufNo + 1;     ┆
0x070e40…070e60             20 20 69 66 20 42 75 66 4e 6f 20 3e 20 42 75 66 53 69 7a 65 20 74 68 65 6e 0d 0a 20 20 20 20 20   ┆  if BufNo > BufSize then       ┆
0x070e60…070e80             20 62 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 42 75 66 4e 6f 20 3a 3d 20 31 3b 0d 0a 20 20 20   ┆ begin          BufNo := 1;     ┆
0x070e80…070ea0             20 20 20 20 20 69 66 20 52 65 63 73 52 65 61 64 20 3e 20 30 20 74 68 65 6e 20 42 6c 6f 63 6b 52   ┆     if RecsRead > 0 then BlockR┆
0x070ea0…070ec0             65 61 64 28 53 6f 75 72 63 65 2c 49 6e 70 75 74 42 75 66 66 65 72 2c 42 75 66 53 69 7a 65 2c 52   ┆ead(Source,InputBuffer,BufSize,R┆
0x070ec0…070ee0             65 63 73 52 65 61 64 29 3b 0d 0a 20 20 20 20 20 20 20 20 69 66 20 52 65 63 73 52 65 61 64 20 3c   ┆ecsRead);          if RecsRead <┆
0x070ee0…070f00             3d 20 30 20 74 68 65 6e 20 49 6e 70 75 74 42 75 66 66 65 72 5b 31 2c 31 5d 20 3a 3d 20 32 36 3b   ┆= 0 then InputBuffer[1,1] := 26;┆
0x070f00…070f20             0d 0a 20 20 20 20 20 20 65 6e 64 3b 0d 0a 20 20 20 65 6e 64 3b 0d 0a 20 20 47 65 74 42 79 74 65   ┆        end;     end;    GetByte┆
0x070f20…070f40             20 3a 3d 20 49 6e 70 75 74 42 75 66 66 65 72 5b 20 42 75 66 4e 6f 2c 20 42 75 66 50 6f 73 20 5d   ┆ := InputBuffer[ BufNo, BufPos ]┆
0x070f40…070f60             3b 0d 0a 65 6e 64 3b 20 7b 20 47 65 74 42 79 74 65 20 7d 0d 0a 0d 0a 65 6e 64 2e 1a 00 00 00 00   ┆;  end; { GetByte }    end.     ┆
0x070f60…070f80             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x4…]
0x071000…071200 (30, 0, 5)  Cluster(DOSUTIL ASM)
                            […0xe…]
0x072e00…073000 (30, 1, 5)  Cluster(DOSUTIL OBJ)
                            […0x2…]
0x073400…073420 (30, 1, 8)  7b 24 52 2d 7d 20 20 20 20 7b 52 61 6e 67 65 20 63 68 65 63 6b 69 6e 67 20 6f 66 66 7d 0d 0a 7b   ┆{$R-}    {Range checking off}  {┆
0x073420…073440             24 42 2b 7d 20 20 20 20 7b 42 6f 6f 6c 65 61 6e 20 63 6f 6d 70 6c 65 74 65 20 65 76 61 6c 75 61   ┆$B+}    {Boolean complete evalua┆
0x073440…073460             74 69 6f 6e 20 6f 6e 7d 0d 0a 7b 24 53 2b 7d 20 20 20 20 7b 53 74 61 63 6b 20 63 68 65 63 6b 69   ┆tion on}  {$S+}    {Stack checki┆
0x073460…073480             6e 67 20 6f 6e 7d 0d 0a 7b 24 49 2b 7d 20 20 20 20 7b 49 2f 4f 20 63 68 65 63 6b 69 6e 67 20 6f   ┆ng on}  {$I+}    {I/O checking o┆
0x073480…0734a0             6e 7d 0d 0a 7b 24 4e 2d 7d 20 20 20 20 7b 4e 6f 20 6e 75 6d 65 72 69 63 20 63 6f 70 72 6f 63 65   ┆n}  {$N-}    {No numeric coproce┆
0x0734a0…0734c0             73 73 6f 72 7d 0d 0a 0d 0a 55 6e 69 74 20 44 6f 73 55 74 69 6c 3b 0d 0a 0d 0a 49 6e 74 65 72 66   ┆ssor}    Unit DosUtil;    Interf┆
0x0734c0…0734e0             61 63 65 0d 0a 0d 0a 55 73 65 73 0d 0a 20 20 43 72 74 2c 0d 0a 20 20 44 6f 73 3b 0d 0a 0d 0a 74   ┆ace    Uses    Crt,    Dos;    t┆
0x0734e0…073500             79 70 65 0d 0a 20 20 43 6f 6d 70 61 72 65 52 65 73 75 6c 74 20 3d 20 28 4c 54 2c 20 45 51 2c 20   ┆ype    CompareResult = (LT, EQ, ┆
0x073500…073520             47 54 29 3b 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 43 6f 6d 70 53 74 72 28 76 61 72 20 53 74 31   ┆GT);    function CompStr(var St1┆
0x073520…073540             2c 20 53 74 32 20 3a 20 73 74 72 69 6e 67 3b 20 4b 65 79 50 6f 73 2c 20 4b 65 79 4c 6e 67 20 3a   ┆, St2 : string; KeyPos, KeyLng :┆
0x073540…073560             20 62 79 74 65 29 20 3a 20 43 6f 6d 70 61 72 65 52 65 73 75 6c 74 3b 0d 0a 0d 0a 70 72 6f 63 65   ┆ byte) : CompareResult;    proce┆
0x073560…073580             64 75 72 65 20 53 65 74 43 6f 6c 6c 61 74 65 53 65 71 28 43 6f 6c 20 3a 20 73 74 72 69 6e 67 29   ┆dure SetCollateSeq(Col : string)┆
0x073580…0735a0             3b 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 47 65 74 43 6f 6c 6c 61 74 65 53 65 71 28 43 68 20 3a   ┆;    function GetCollateSeq(Ch :┆
0x0735a0…0735c0             20 63 68 61 72 29 20 3a 20 63 68 61 72 3b 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 42 69 6e 42 79   ┆ char) : char;    function BinBy┆
0x0735c0…0735e0             74 65 28 56 20 3a 20 73 68 6f 72 74 69 6e 74 29 20 3a 20 73 74 72 69 6e 67 3b 0d 0a 20 20 7b 20   ┆te(V : shortint) : string;    { ┆
0x0735e0…073600             54 68 65 20 66 75 6e 63 74 69 6f 6e 20 42 69 6e 42 79 74 65 20 63 6f 6e 76 65 72 74 73 20 61 6e   ┆The function BinByte converts an┆
0x073600…073620 (30, 1, 9)  20 62 79 74 65 20 76 61 6c 75 65 20 28 38 20 62 69 74 29 20 74 6f 20 61 20 74 65 78 74 20 7d 0d   ┆ byte value (8 bit) to a text } ┆
0x073620…073640             0a 20 20 7b 20 73 74 72 69 6e 67 20 28 74 79 70 65 20 73 74 72 69 6e 67 29 2c 20 77 68 69 63 68   ┆   { string (type string), which┆
0x073640…073660             20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20 74 65 78 74 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f   ┆ contains the text representatio┆
0x073660…073680             6e 20 20 7d 0d 0a 20 20 7b 20 6f 66 20 74 68 65 20 62 79 74 65 20 76 61 6c 75 65 20 74 6f 20 62   ┆n  }    { of the byte value to b┆
0x073680…0736a0             65 20 64 69 73 70 6c 61 79 65 64 20 61 73 20 61 20 62 69 74 20 73 74 72 69 6e 67 20 28 38 20 64   ┆e displayed as a bit string (8 d┆
0x0736a0…0736c0             69 67 69 74 73 29 20 20 7d 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 42 69 6e 57 6f 72 64 28 56 20   ┆igits)  }    function BinWord(V ┆
0x0736c0…0736e0             3a 20 69 6e 74 65 67 65 72 29 20 3a 20 73 74 72 69 6e 67 3b 0d 0a 20 20 7b 20 54 68 65 20 66 75   ┆: integer) : string;    { The fu┆
0x0736e0…073700             6e 63 74 69 6f 6e 20 42 69 6e 57 6f 72 64 20 63 6f 6e 76 65 72 74 73 20 61 6e 20 77 6f 72 64 20   ┆nction BinWord converts an word ┆
0x073700…073720             76 61 6c 75 65 20 28 31 36 20 62 69 74 29 20 74 6f 20 61 20 74 65 78 74 20 7d 0d 0a 20 20 7b 20   ┆value (16 bit) to a text }    { ┆
0x073720…073740             73 74 72 69 6e 67 20 28 74 79 70 65 20 73 74 72 69 6e 67 29 2c 20 77 68 69 63 68 20 63 6f 6e 74   ┆string (type string), which cont┆
0x073740…073760             61 69 6e 73 20 74 68 65 20 74 65 78 74 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 20 20 20 7d   ┆ains the text representation   }┆
0x073760…073780             0d 0a 20 20 7b 20 6f 66 20 74 68 65 20 77 6f 72 64 20 76 61 6c 75 65 20 74 6f 20 62 65 20 64 69   ┆    { of the word value to be di┆
0x073780…0737a0             73 70 6c 61 79 65 64 20 61 73 20 61 20 62 69 74 20 73 74 72 69 6e 67 20 28 31 36 20 64 69 67 69   ┆splayed as a bit string (16 digi┆
0x0737a0…0737c0             74 73 29 20 20 7d 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 48 65 78 42 79 74 65 28 56 20 3a 20 62   ┆ts)  }    function HexByte(V : b┆
0x0737c0…0737e0             79 74 65 29 20 3a 20 73 74 72 69 6e 67 3b 0d 0a 20 20 7b 20 54 68 65 20 66 75 6e 63 74 69 6f 6e   ┆yte) : string;    { The function┆
0x0737e0…073800             20 48 65 78 42 79 74 65 20 63 6f 6e 76 65 72 74 73 20 61 6e 20 62 79 74 65 20 76 61 6c 75 65 20   ┆ HexByte converts an byte value ┆
0x073800…073820 (30, 1, 10) 28 38 20 62 69 74 29 20 74 6f 20 61 20 74 65 78 74 20 20 7d 0d 0a 20 20 7b 20 73 74 72 69 6e 67   ┆(8 bit) to a text  }    { string┆
0x073820…073840             20 28 74 79 70 65 20 73 74 72 69 6e 67 29 2c 20 77 68 69 63 68 20 63 6f 6e 74 61 69 6e 73 20 74   ┆ (type string), which contains t┆
0x073840…073860             68 65 20 74 65 78 74 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 20 20 20 7d 0d 0a 20 20 7b 20   ┆he text representation   }    { ┆
0x073860…073880             6f 66 20 74 68 65 20 62 79 74 65 20 76 61 6c 75 65 20 74 6f 20 62 65 20 64 69 73 70 6c 61 79 65   ┆of the byte value to be displaye┆
0x073880…0738a0             64 20 61 73 20 61 20 68 65 78 61 64 65 63 69 6d 61 6c 20 28 32 20 64 69 67 69 74 73 29 20 20 7d   ┆d as a hexadecimal (2 digits)  }┆
0x0738a0…0738c0             0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 48 65 78 57 6f 72 64 28 56 20 3a 20 77 6f 72 64 29 20 3a   ┆    function HexWord(V : word) :┆
0x0738c0…0738e0             20 73 74 72 69 6e 67 3b 0d 0a 20 20 7b 20 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 48 65 78 57 6f   ┆ string;    { The function HexWo┆
0x0738e0…073900             72 64 20 63 6f 6e 76 65 72 74 73 20 61 6e 20 77 6f 72 64 20 76 61 6c 75 65 20 28 31 36 20 62 69   ┆rd converts an word value (16 bi┆
0x073900…073920             74 29 20 74 6f 20 61 20 74 65 78 74 20 7d 0d 0a 20 20 7b 20 73 74 72 69 6e 67 20 28 74 79 70 65   ┆t) to a text }    { string (type┆
0x073920…073940             20 73 74 72 69 6e 67 29 2c 20 77 68 69 63 68 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20 74 65 78   ┆ string), which contains the tex┆
0x073940…073960             74 20 72 65 70 72 65 73 65 6e 74 61 74 69 6f 6e 20 20 20 7d 0d 0a 20 20 7b 20 6f 66 20 74 68 65   ┆t representation   }    { of the┆
0x073960…073980             20 77 6f 72 64 20 76 61 6c 75 65 20 74 6f 20 62 65 20 64 69 73 70 6c 61 79 65 64 20 61 73 20 61   ┆ word value to be displayed as a┆
0x073980…0739a0             20 68 65 78 61 64 65 63 69 6d 61 6c 20 28 34 20 64 69 67 69 74 73 29 20 20 7d 0d 0a 0d 0a 66 75   ┆ hexadecimal (4 digits)  }    fu┆
0x0739a0…0739c0             6e 63 74 69 6f 6e 20 46 69 6c 65 45 78 69 73 74 28 46 69 6c 65 4e 61 6d 65 20 3a 20 73 74 72 69   ┆nction FileExist(FileName : stri┆
0x0739c0…0739e0             6e 67 29 3a 20 62 6f 6f 6c 65 61 6e 3b 0d 0a 7b 20 66 75 6e 63 74 69 6f 6e 20 46 69 6c 65 45 78   ┆ng): boolean;  { function FileEx┆
0x0739e0…073a00             69 73 74 20 72 65 74 75 72 6e 73 20 61 20 62 6f 6f 6c 65 61 6e 20 76 61 6c 75 65 20 69 6e 64 69   ┆ist returns a boolean value indi┆
0x073a00…073a20 (30, 1, 11) 63 61 74 69 6e 67 20 74 68 65 20 65 78 69 73 74 65 6e 63 65 20 7d 0d 0a 7b 20 6f 66 20 61 20 66   ┆cating the existence }  { of a f┆
0x073a20…073a40             69 6c 65 20 77 68 6f 73 65 20 6e 61 6d 65 20 69 73 20 70 61 73 73 65 64 20 61 73 20 61 20 70 61   ┆ile whose name is passed as a pa┆
0x073a40…073a60             72 61 6d 61 74 65 72 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d   ┆ramater.                      } ┆
0x073a60…073a80             0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 55 70 43 61 73 65 28 20 43 68 20 3a 20 63 68 61 72 29 20 3a   ┆   function UpCase( Ch : char) :┆
0x073a80…073aa0             20 63 68 61 72 3b 0d 0a 7b 20 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 55 70 43 61 73 65 20 63 6f   ┆ char;  { The function UpCase co┆
0x073aa0…073ac0             6e 76 65 72 74 73 20 74 68 65 20 69 6e 70 75 74 20 63 68 61 72 61 63 74 65 72 20 74 6f 20 75 70   ┆nverts the input character to up┆
0x073ac0…073ae0             70 65 72 20 63 61 73 65 20 61 63 63 6f 72 64 69 6e 67 20 7d 0d 0a 7b 20 74 6f 20 74 68 65 20 72   ┆per case according }  { to the r┆
0x073ae0…073b00             75 6c 65 73 20 61 70 70 6c 79 69 6e 67 20 74 6f 20 74 68 65 20 64 61 6e 69 73 68 2f 6e 6f 72 77   ┆ules applying to the danish/norw┆
0x073b00…073b20             65 67 69 61 6e 20 49 42 4d 20 63 68 61 72 61 63 74 65 72 20 73 65 74 20 20 20 20 20 20 20 20 20   ┆egian IBM character set         ┆
0x073b20…073b40             20 7d 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 4c 6f 43 61 73 65 28 20 43 68 20 3a 20 63 68 61 72   ┆ }    function LoCase( Ch : char┆
0x073b40…073b60             29 20 3a 20 63 68 61 72 3b 0d 0a 7b 20 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 55 70 43 61 73 65   ┆) : char;  { The function UpCase┆
0x073b60…073b80             20 63 6f 6e 76 65 72 74 73 20 74 68 65 20 69 6e 70 75 74 20 63 68 61 72 61 63 74 65 72 20 74 6f   ┆ converts the input character to┆
0x073b80…073ba0             20 6c 6f 77 65 72 20 63 61 73 65 20 61 63 63 6f 72 64 69 6e 67 20 7d 0d 0a 7b 20 74 6f 20 74 68   ┆ lower case according }  { to th┆
0x073ba0…073bc0             65 20 72 75 6c 65 73 20 61 70 70 6c 79 69 6e 67 20 74 6f 20 74 68 65 20 64 61 6e 69 73 68 2f 6e   ┆e rules applying to the danish/n┆
0x073bc0…073be0             6f 72 77 65 67 69 61 6e 20 49 42 4d 20 63 68 61 72 61 63 74 65 72 20 73 65 74 20 20 20 20 20 20   ┆orwegian IBM character set      ┆
0x073be0…073c00             20 20 20 20 7d 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 55 70 70 65 72 53 74 72 28 20 53 74 20 3a   ┆    }    function UpperStr( St :┆
0x073c00…073c20 (30, 1, 12) 20 73 74 72 69 6e 67 29 20 3a 20 73 74 72 69 6e 67 3b 0d 0a 7b 20 54 68 65 20 66 75 6e 63 74 69   ┆ string) : string;  { The functi┆
0x073c20…073c40             6f 6e 20 55 70 70 65 72 53 74 72 20 63 6f 6e 76 65 72 74 73 20 61 6c 6c 20 74 68 65 20 63 68 61   ┆on UpperStr converts all the cha┆
0x073c40…073c60             72 61 63 74 65 72 73 20 69 6e 20 74 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e 67 20 74 6f 20 7d   ┆racters in the input string to }┆
0x073c60…073c80             0d 0a 7b 20 75 70 70 65 72 20 63 61 73 65 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 74 68 65 20   ┆  { upper case according to the ┆
0x073c80…073ca0             72 75 6c 65 73 20 61 70 70 6c 79 69 6e 67 20 74 6f 20 74 68 65 20 64 61 6e 69 73 68 2f 6e 6f 72   ┆rules applying to the danish/nor┆
0x073ca0…073cc0             77 65 67 69 61 6e 20 49 42 4d 20 20 20 7d 0d 0a 7b 20 63 68 61 72 61 63 74 65 72 20 73 65 74 20   ┆wegian IBM   }  { character set ┆
0x073cc0…073ce0             28 63 6f 64 65 70 61 67 65 20 38 35 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆(codepage 850)                  ┆
0x073ce0…073d00             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a 0d 0a   ┆                           }    ┆
0x073d00…073d20             66 75 6e 63 74 69 6f 6e 20 4c 6f 77 65 72 53 74 72 28 20 53 74 20 3a 20 73 74 72 69 6e 67 29 20   ┆function LowerStr( St : string) ┆
0x073d20…073d40             3a 20 73 74 72 69 6e 67 3b 0d 0a 7b 20 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 55 70 70 65 72 53   ┆: string;  { The function UpperS┆
0x073d40…073d60             74 72 20 63 6f 6e 76 65 72 74 73 20 61 6c 6c 20 74 68 65 20 63 68 61 72 61 63 74 65 72 73 20 69   ┆tr converts all the characters i┆
0x073d60…073d80             6e 20 74 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e 67 20 74 6f 20 7d 0d 0a 7b 20 6c 6f 77 65 72   ┆n the input string to }  { lower┆
0x073d80…073da0             20 63 61 73 65 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 74 68 65 20 72 75 6c 65 73 20 61 70 70   ┆ case according to the rules app┆
0x073da0…073dc0             6c 79 69 6e 67 20 74 6f 20 74 68 65 20 64 61 6e 69 73 68 2f 6e 6f 72 77 65 67 69 61 6e 20 49 42   ┆lying to the danish/norwegian IB┆
0x073dc0…073de0             4d 20 20 20 7d 0d 0a 7b 20 63 68 61 72 61 63 74 65 72 20 73 65 74 20 28 63 6f 64 65 70 61 67 65   ┆M   }  { character set (codepage┆
0x073de0…073e00             20 38 35 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ 850)                           ┆
0x073e00…073e20 (30, 1, 13) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20   ┆                  }    function ┆
0x073e20…073e40             53 74 72 69 70 42 6c 61 6e 6b 73 28 20 53 74 20 3a 20 73 74 72 69 6e 67 29 20 3a 20 73 74 72 69   ┆StripBlanks( St : string) : stri┆
0x073e40…073e60             6e 67 3b 0d 0a 7b 20 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 53 74 72 69 70 42 6c 61 6e 6b 73 20   ┆ng;  { The function StripBlanks ┆
0x073e60…073e80             72 65 74 75 72 6e 73 20 74 68 65 20 69 6e 70 75 74 20 73 74 72 69 6e 67 20 77 69 74 68 20 61 6c   ┆returns the input string with al┆
0x073e80…073ea0             6c 20 62 6c 61 6e 6b 73 20 72 65 6d 6f 76 65 64 20 7d 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 44   ┆l blanks removed }    function D┆
0x073ea0…073ec0             61 74 65 54 69 6d 65 54 65 78 74 20 28 44 54 20 3a 20 44 61 74 65 54 69 6d 65 29 20 3a 20 73 74   ┆ateTimeText (DT : DateTime) : st┆
0x073ec0…073ee0             72 69 6e 67 3b 0d 0a 20 20 7b 20 44 61 74 65 54 69 6d 65 54 65 78 74 20 63 6f 6e 76 65 72 74 73   ┆ring;    { DateTimeText converts┆
0x073ee0…073f00             20 61 20 64 61 74 65 20 61 6e 64 20 74 69 6d 65 20 76 61 6c 75 65 20 69 6e 20 74 68 65 20 66 6f   ┆ a date and time value in the fo┆
0x073f00…073f20             72 6d 20 6f 66 20 61 20 7d 0d 0a 20 20 7b 20 76 61 72 69 61 62 6c 65 20 6f 66 20 74 79 70 65 20   ┆rm of a }    { variable of type ┆
0x073f20…073f40             44 61 74 65 54 69 6d 65 20 28 64 65 66 69 6e 65 64 20 69 6e 20 74 68 65 20 44 6f 73 20 75 6e 69   ┆DateTime (defined in the Dos uni┆
0x073f40…073f60             74 29 20 74 6f 20 74 65 78 74 20 20 7d 0d 0a 20 20 7b 20 66 6f 72 6d 2c 20 61 73 20 64 65 66 69   ┆t) to text  }    { form, as defi┆
0x073f60…073f80             6e 65 64 20 62 79 20 44 4f 53 20 6e 61 74 69 6f 6e 61 6c 20 64 61 74 65 20 66 6f 72 6d 61 74 3a   ┆ned by DOS national date format:┆
0x073f80…073fa0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a 20 20 7b 20 20 20 49 4e 50 55 54 3a 20   ┆                }    {   INPUT: ┆
0x073fa0…073fc0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                                ┆
0x073fc0…073fe0             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a 20 20 7b 20 20 20 20 20 44   ┆                    }    {     D┆
0x073fe0…074000             54 20 3a 20 44 61 74 65 54 69 6d 65 20 20 20 20 20 20 20 74 68 65 20 76 61 6c 75 65 20 74 6f 20   ┆T : DateTime       the value to ┆
0x074000…074020 (30, 1, 14) 62 65 20 63 6f 6e 76 65 72 74 65 64 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a 20 20 7b 20 20   ┆be converted            }    {  ┆
0x074020…074040             20 4f 55 54 50 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ OUTPUT:                        ┆
0x074040…074060             20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a 20   ┆                            }   ┆
0x074060…074080             20 7b 20 20 20 20 20 52 65 73 75 6c 74 20 3a 20 73 74 72 69 6e 67 20 20 20 20 20 74 68 65 20 72   ┆ {     Result : string     the r┆
0x074080…0740a0             65 73 75 6c 74 69 6e 67 20 74 65 78 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆esulting text                   ┆
0x0740a0…0740c0             7d 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 45 6e 76 53 74 72 43 6f 75 6e 74 20 3a 20 69 6e 74 65   ┆}    function EnvStrCount : inte┆
0x0740c0…0740e0             67 65 72 3b 0d 0a 7b 20 66 75 6e 63 74 69 6f 6e 20 45 6e 76 53 74 72 43 6f 75 6e 74 20 72 65 74   ┆ger;  { function EnvStrCount ret┆
0x0740e0…074100             75 72 6e 73 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 73   ┆urns the number of environment s┆
0x074100…074120             74 72 69 6e 67 73 20 7d 0d 0a 7b 20 64 65 66 69 6e 65 64 20 69 6e 20 74 68 65 20 44 4f 53 20 65   ┆trings }  { defined in the DOS e┆
0x074120…074140             6e 76 69 72 6f 6e 6d 65 6e 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆nvironment                      ┆
0x074140…074160             20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 45 6e 76 53 74 72 28   ┆           }    function EnvStr(┆
0x074160…074180             4e 6f 20 3a 20 69 6e 74 65 67 65 72 29 20 3a 20 73 74 72 69 6e 67 3b 0d 0a 7b 20 66 75 6e 63 74   ┆No : integer) : string;  { funct┆
0x074180…0741a0             69 6f 6e 20 45 6e 76 53 74 72 20 72 65 74 75 72 6e 73 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20   ┆ion EnvStr returns the value of ┆
0x0741a0…0741c0             74 68 65 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 73 74 72 69 6e 67 20 64 65 66 69 6e 65 64 20 61   ┆the environment string defined a┆
0x0741c0…0741e0             73 20 20 20 7d 0d 0a 7b 20 74 68 65 20 22 4e 6f 22 74 68 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20   ┆s   }  { the "No"th environment ┆
0x0741e0…074200             73 74 72 69 6e 67 20 69 6e 20 74 68 65 20 44 4f 53 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 2e 20 69   ┆string in the DOS environment. i┆
0x074200…074220 (30, 1, 15) 66 20 22 4e 6f 22 20 69 73 20 67 72 65 61 74 65 72 20 7d 0d 0a 7b 20 74 68 61 6e 20 22 45 6e 76   ┆f "No" is greater }  { than "Env┆
0x074220…074240             53 74 72 43 6f 75 6e 74 22 20 61 6e 20 65 6d 70 74 79 20 73 74 72 69 6e 67 20 69 73 20 72 65 74   ┆StrCount" an empty string is ret┆
0x074240…074260             75 72 6e 65 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆urned                           ┆
0x074260…074280             7d 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 50 72 6f 67 46 69 6c 65 4e 61 6d 65 20 3a 20 73 74 72   ┆}    function ProgFileName : str┆
0x074280…0742a0             69 6e 67 3b 0d 0a 7b 20 66 75 6e 63 74 69 6f 6e 20 50 72 6f 67 46 69 6c 65 4e 61 6d 65 20 72 65   ┆ing;  { function ProgFileName re┆
0x0742a0…0742c0             74 75 72 6e 73 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 75   ┆turns the name of the current ru┆
0x0742c0…0742e0             6e 6e 69 6e 67 20 70 72 6f 67 72 61 6d 20 7d 0d 0a 7b 20 69 6e 20 74 68 65 20 66 6f 72 6d 20 3c   ┆nning program }  { in the form <┆
0x0742e0…074300             64 72 69 76 65 3e 3a 5b 3c 70 61 74 68 3e 5d 5c 3c 66 69 6c 65 6e 61 6d 65 3e 2e 3c 65 78 74 65   ┆drive>:[<path>]\<filename>.<exte┆
0x074300…074320             6e 73 69 6f 6e 3e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 0d 0a 7b 20 77 68   ┆nsion>                   }  { wh┆
0x074320…074340             65 72 65 20 20 20 20 20 20 20 3c 70 61 74 68 3e 20 69 73 20 20 3c 70 61 74 68 3e 5c 3c 73 75 62   ┆ere       <path> is  <path>\<sub┆
0x074340…074360             64 69 72 3e 20 20 6f 72 20 20 5c 3c 73 75 62 64 69 72 3e 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆dir>  or  \<subdir>             ┆
0x074360…074380             20 20 20 20 7d 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 45 6e 76 53 74 72 56 61 6c 28 20 45 6e 76   ┆    }    function EnvStrVal( Env┆
0x074380…0743a0             53 74 72 4e 61 6d 65 20 3a 20 73 74 72 69 6e 67 29 20 3a 20 73 74 72 69 6e 67 3b 0d 0a 7b 20 66   ┆StrName : string) : string;  { f┆
0x0743a0…0743c0             75 6e 63 74 69 6f 6e 20 45 6e 76 53 74 72 56 61 6c 20 72 65 74 75 72 6e 73 20 74 68 65 20 76 61   ┆unction EnvStrVal returns the va┆
0x0743c0…0743e0             6c 75 65 20 6f 66 20 74 68 65 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 73 74 72 69 6e 67 20 77 69   ┆lue of the environment string wi┆
0x0743e0…074400             74 68 20 74 68 65 20 7d 0d 0a 7b 20 6e 61 6d 65 20 67 69 76 65 6e 20 62 79 20 22 45 6e 76 53 74   ┆th the }  { name given by "EnvSt┆
0x074400…086c00 (31, 0, 1)  […elided…]
0x086c00…086c20 (35, 1, 14) 73 fd 75 1c e8 92 fd 3c 1a 74 19 f6 c1 01 74 04 3c 0d 74 10 f6 c1 02 74 07 3c 20 77 03 43 eb e4   ┆s§u Уњ§< t Ш┴ t < t Ш┴ t < w CвС┆
0x086c20…086c40             b0 00 eb 02 b0 01 5f 07 26 89 5d 08 ca 04 00 8b dc 1e 36 c4 7f 08 36 c5 77 04 fc 33 c0 ab b8 b0   ┆░ в ░ _ &Ѕ] ╩  І▄ 6─  6┼w Ч3└ФИ░┆
0x086c40…086c60             d7 ab 33 c0 b9 16 00 f3 ab ac 3c 4f 76 02 b0 4f 8a c8 32 ed f3 a4 32 c0 aa 1f ca 08 00 a0 a2 06   ┆ОФ3└╣  зФг<Ov ░Oі╚2ьзц2└ф ╩  аб ┆
0x086c60…086c80             b4 3d 33 d2 eb 06 b8 00 3c ba 01 00 55 8b ec c4 7e 08 26 81 7d 02 b0 d7 74 1a 26 81 7d 02 b3 d7   ┆┤=3мв И <║  UІВ─~ &Ђ} ░Оt &Ђ} │О┆
0x086c80…086ca0             74 08 c7 06 9c 06 66 00 eb 34 50 52 06 57 0e e8 4c 00 5a 58 26 80 7d 30 00 74 12 1e 8d 55 30 06   ┆t К ю f в4PR W УL ZX&ђ}0 t  ЇU0 ┆
0x086ca0…086cc0             1f 33 c9 cd 21 1f 73 06 a3 9c 06 eb 11 92 26 c7 45 02 b3 d7 26 89 05 8b 46 06 26 89 45 04 5d ca   ┆ 3╔═! s Бю в њ&КE │О&Ѕ ІF &ЅE ]╩┆
0x086cc0…086ce0             06 00 8b dc 36 c4 7f 04 e8 38 00 75 0e 33 c9 26 8b 1d b4 40 cd 21 73 03 a3 9c 06 ca 04 00 8b dc   ┆  І▄6─  У8 u 3╔&І ┤@═!s Бю ╩  І▄┆
0x086ce0…086d00             36 c4 7f 04 e8 1c 00 75 17 26 8b 1d 83 fb 04 76 09 b4 3e cd 21 73 03 a3 9c 06 26 c7 45 02 b0 d7   ┆6─  У  u &І Ѓч v ┤>═!s Бю &КE ░О┆
0x086d00…086d20             ca 04 00 26 81 7d 02 b3 d7 74 06 c7 06 9c 06 67 00 c3 b4 3f ba 64 00 eb 05 b4 40 ba 65 00 55 8b   ┆╩  &Ђ} │Оt К ю g ├┤?║d в ┤@║e UІ┆
0x086d20…086d40             ec c4 7e 0a e8 dc ff 75 1b 1e 52 c5 56 06 26 8b 4d 04 26 8b 1d cd 21 5a 1f 72 06 3b c1 74 05 8b   ┆В─~ У▄ u  R┼V &ІM &І ═!Z r ;┴t І┆
0x086d40…086d60             c2 a3 9c 06 5d ca 04 00 b3 3f b9 64 00 eb 05 b3 40 b9 65 00 55 8b ec c4 7e 10 e8 a6 ff 75 3f 8b   ┆┬Бю ]╩  │?╣d в │@╣e UІВ─~ Уд u?І┆
0x086d60…086d80             46 0a 0b c0 74 1c 1e 51 26 f7 65 04 8b c8 c5 56 0c 8a e3 26 8b 1d cd 21 59 1f 72 1f 33 d2 26 f7   ┆F  └t  Q&эe І╚┼V іс&І ═!Y r 3м&э┆
0x086d80…086da0             75 04 c4 7e 06 8c c2 0b d7 74 05 26 89 05 eb 1c 3b 46 0a 74 17 89 0e 9c 06 eb 11 a3 9c 06 c4 7e   ┆u ─~ ї┬ Оt &Ѕ в ;F t Ѕ ю в Бю ─~┆
0x086da0…086dc0             06 8c c2 0b d7 74 05 33 c0 26 89 05 5d ca 0e 00 55 8b ec c4 7e 0a e8 4a ff 75 21 8b 46 08 26 f7   ┆ ї┬ Оt 3└&Ѕ ]╩  UІВ─~ УJ u!ІF &э┆
0x086dc0…086de0             65 04 8b c8 8b 46 06 26 f7 65 04 03 ca 8b d0 26 8b 1d b8 00 42 cd 21 73 03 a3 9c 06 5d ca 08 00   ┆e І╚ІF &эe  ╩Іл&І И B═!s Бю ]╩  ┆
0x086de0…086e00             e8 44 00 72 0f 26 8b 4d 04 83 f9 01 74 06 33 db 0e e8 88 f0 ca 04 00 e8 2d 00 72 13 8b c1 8b d3   ┆УD r &ІM Ѓщ t 3█ Уѕ ╩  У- r І┴ІМ┆
0x086e00…086e20 (35, 1, 15) 26 8b 4d 04 83 f9 01 74 06 33 db 0e e8 6d f0 ca 04 00 e8 12 00 72 0b 2b c1 1b d3 72 05 b0 01 ca   ┆&ІM Ѓщ t 3█ Уm ╩  У  r +┴ Мr ░ ╩┆
0x086e20…086e40             04 00 32 c0 ca 04 00 8b dc 36 c4 7f 06 26 81 7d 02 b3 d7 75 2b 33 c9 33 d2 26 8b 1d b8 01 42 cd   ┆  2└╩  І▄6─  &Ђ} │Оu+3╔3м&І И B═┆
0x086e40…086e60             21 52 50 33 c9 33 d2 26 8b 1d b8 02 42 cd 21 5b 59 52 50 8b d3 26 8b 1d b8 00 42 cd 21 59 5b c3   ┆!RP3╔3м&І И B═![YRPІМ&І И B═!Y[├┆
0x086e60…086e80             c7 06 9c 06 67 00 33 c0 33 d2 f9 c3 55 8b ec 8b 56 06 0b d2 74 05 e8 49 00 eb 30 b4 30 cd 21 3c   ┆К ю g 3└3мщ├UІВІV  мt УI в0┤0═!<┆
0x086e80…086ea0             03 b8 00 00 72 25 8e 06 98 06 26 8e 06 2c 00 33 ff fc 26 3a 05 74 07 b9 ff ff f2 ae eb f4 83 c7   ┆ И  r%ј ў &ј , 3 Ч&: t ╣  Ы«вЗЃК┆
0x086ea0…086ec0             03 8b f7 b9 00 01 f2 ae 91 f6 d0 1e 06 1f c4 7e 08 fc aa 91 f3 a4 1f 5d ca 02 00 33 d2 e8 02 00   ┆ Іэ╣  Ы«ЉШл   ─~ ЧфЉзц ]╩  3мУ  ┆
0x086ec0…086ee0             93 cb 8e 06 98 06 bf 80 00 26 8a 0d 32 ed 47 33 db e3 09 26 80 3d 20 77 03 47 e2 f7 8b f7 e3 09   ┆Њ╦ј ў ┐ђ &і 2ьG3█с &ђ= w GРэІэс ┆
0x086ee0…086f00             26 80 3d 20 76 03 47 e2 f7 8b c7 2b c6 74 04 43 4a 75 de c3 00 00 00 00 00 00 00 00 00 00 00 00   ┆&ђ= v GРэІК+кt CJuя├            ┆
0x086f00…086f20             04 00 01 49 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆   I                            ┆
0x086f20…086f40             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x087000…087020 (36, 0, 1)  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 03 00 01 4f 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                  O             ┆
0x087020…087040             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x087100…087120             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 03 00   ┆                                ┆
0x087120…087140             05 54 41 42 4c 45 00 00 00 00 00 00 00 08 43 4f 50 59 2e 43 48 54 00 00 00 00 00 00 00 00 00 00   ┆ TABLE        COPY.CHT          ┆
0x087140…087160             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x087220…087240             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 58 52 41 59 00 00 00 00 00 00 00 00 03 4f 46 46   ┆                XRAY         OFF┆
0x087240…087260             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x087320…087340             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 80 00 a0 00   ┆                            ђ а ┆
0x087340…087360             01 00 00 00 00 00 fe ff ff ff 30 31 32 33 34 35 36 37 38 39 41 42 43 44 45 46 0d 45 6e 76 69 72   ┆      ■   0123456789ABCDEF Envir┆
0x087360…087380             6f 6e 6d 65 6e 74 3a 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆onment:                         ┆
0x087380…0873a0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x087460…087480             00 00 00 00 00 00 00 00 03 48 4c 50 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆         HLP                    ┆
0x087480…0874a0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x8…]
0x0875a0…0875c0             00 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x0875c0…0875e0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x087600…087620 (36, 0, 4)  54 75 72 62 6f 20 50 61 73 63 61 6c 20 50 69 63 6b 20 4c 69 73 74 20 46 69 6c 65 20 1a 00 01 0d   ┆Turbo Pascal Pick List File     ┆
0x087620…087640             12 17 01 1a 00 02 01 01 00 e2 02 f9 3f 43 3a 5c 4c 45 49 5c 52 54 50 5c 43 52 4f 53 53 2e 50 41   ┆         Р щ?C:\LEI\RTP\CROSS.PA┆
0x087640…087660             53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆S                               ┆
0x087660…087680             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ac 00 43   ┆                             г C┆
0x087680…0876a0             3a 5c 4c 45 49 5c 52 54 50 5c 56 4f 56 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆:\LEI\RTP\VOV.PAS               ┆
0x0876a0…0876c0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x0876c0…0876e0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 43 3a 5c 4c 45 49 5c 52 54 50 5c 43 52 53 50   ┆                 C:\LEI\RTP\CRSP┆
0x0876e0…087700             41 53 2e 42 41 54 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆AS.BAT                          ┆
0x087700…087720             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x087720…087740             00 b9 00 43 3a 5c 4c 45 49 5c 52 54 50 5c 43 52 53 52 54 50 2e 42 41 54 00 00 00 00 00 00 00 00   ┆ ╣ C:\LEI\RTP\CRSRTP.BAT        ┆
0x087740…087760             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x087760…087780             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 56 4e 43 3a 5c 4c 45 49 5c 52 54 50 5c   ┆                   VNC:\LEI\RTP\┆
0x087780…0877a0             49 4e 44 45 4e 54 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆INDENT.PAS                      ┆
0x0877a0…0877c0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x0877c0…0877e0             00 00 00 00 00 00 00 41 3a 5c 43 48 52 43 4f 4e 56 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00   ┆       A:\CHRCONV.PAS           ┆
0x0877e0…087800             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x8…]
0x087900…087920             00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 12 00 05 00 04 00 03 00 02 00 00 00 01 00 06 00 07   ┆                                ┆
0x087920…087940             00 08 00 03 00 99 00 00 65 3e 19 00 00 00 00 00 00 00 00 00 21 49 64 49 00 00 00 00 00 22 00 22   ┆     Ў  e>          !IdI     " "┆
0x087940…087960             00 22 00 22 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 28 00 00   ┆ " "                         (  ┆
0x087960…087980             00 00 00 00 00 00 00 00 00 bf 00 00 d5 4c 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆         ┐  НL*                 ┆
0x087980…0879a0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x0879c0…0879e0             04 00 36 00 10 00 16 76 94 12 00 00 d7 6c 94 12 00 00 e8 7b 76 12 10 00 42 78 94 12 00 00 f4 78   ┆  6    vћ   Оlћ   У{v   Bxћ   Зx┆
0x0879e0…087a00             94 12 00 00 99 78 92 12 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 64 00 0c 00 0a 02   ┆ћ   Ўxњ                   d     ┆
0x087a00…087a20 (36, 0, 6)  67 75 00 00 00 00 00 00 00 00 65 00 01 00 00 66 00 20 00 04 20 76 2e 20 00 61 62 5f 74 79 00 00   ┆gu        e    f     v.  ab_ty  ┆
0x087a20…087a40             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 67 00 20 00 07 41 52 52 41 59 20 5b 00   ┆                   g    ARRAY [ ┆
0x087a40…087a60             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 68 00 50 00 43 52 53 50 41   ┆                       h P CRSPA┆
0x087a60…087a80             53 2e 42 41 54 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆S.BAT                           ┆
0x087a80…087aa0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x087aa0…087ac0             00 00 00 00 00 00 00 00 00 00 00 ff ff 02 00 1a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x087ac0…087ae0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x087b00…087b20             00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 12 00 05 00 04 00 03 00 02 00 00 00 01 00 06 00 07   ┆                                ┆
0x087b20…087b40             00 08 00 03 00 99 00 00 65 3e 19 00 00 00 00 00 00 00 00 00 21 49 64 49 00 00 00 00 00 22 00 22   ┆     Ў  e>          !IdI     " "┆
0x087b40…087b60             00 22 00 22 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 28 00 00   ┆ " "                         (  ┆
0x087b60…087b80             00 00 00 00 00 00 00 00 00 bf 00 00 d5 4c 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆         ┐  НL*                 ┆
0x087b80…087ba0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x087bc0…087be0             04 00 36 00 10 00 16 76 94 12 00 00 d7 6c 94 12 00 00 e8 7b 76 12 10 00 42 78 94 12 00 00 f4 78   ┆  6    vћ   Оlћ   У{v   Bxћ   Зx┆
0x087be0…087c00             94 12 00 00 99 78 92 12 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 64 00 0c 00 0a 02   ┆ћ   Ўxњ                   d     ┆
0x087c00…087e00 (36, 0, 7)  Cluster(CHRCONV PAS)
                            […0x28…]
0x08ce00…08d000 (37, 1, 3)  Cluster(COUNTCH PAS)
                            […0x1b…]
0x090600…090800 (38, 1, 1)  Cluster(FILEDUMPPAS)
                            […0x14…]
0x093000…093200 (39, 0, 7)  Cluster(COMPARE PAS)
                            […0x24…]
0x097a00…097c00 (40, 0, 14) Cluster(INDENT  PAS)
                            […0x59…]
0x0a2e00…0a3000 (43, 0, 14) Cluster(CROSS   PAS)
                            […0x68…]
0x0b0000…0b0200 (46, 1, 14) Cluster(PASCFORMPAS)
                            […0x72…]
0x0be600…0be800 (50, 1, 9)  Cluster(PASCF1  PAS)
                            […0x15…]
0x0c1200…0c1220 (51, 1, 1)  2f 55 43 3a 5c 54 50 35 3b 63 3a 5c 74 70 35 5c 75 6e 69 74 73 3b 43 3a 5c 54 50 35 5c 54 55 52   ┆/UC:\TP5;c:\tp5\units;C:\TP5\TUR┆
0x0c1220…0c1240             42 4f 33 1a 0a 20 20 49 46 20 66 65 77 65 6e 64 73 20 54 48 45 4e 20 77 72 69 74 65 6c 6e 28 4f   ┆BO3    IF fewends THEN writeln(O┆
0x0c1240…0c1260             75 74 70 75 74 2c 20 27 20 2a 2a 20 57 41 52 4e 49 4e 47 2c 20 45 4e 44 28 53 29 20 4d 49 53 53   ┆utput, ' ** WARNING, END(S) MISS┆
0x0c1260…0c1280             49 4e 47 2e 27 29 3b 0d 0a 20 20 49 46 20 73 6b 69 70 65 72 72 6f 72 20 54 48 45 4e 0d 0a 20 20   ┆ING.');    IF skiperror THEN    ┆
0x0c1280…0c12a0             20 20 77 72 69 74 65 6c 6e 28 4f 75 74 70 75 74 2c 20 27 20 2a 2a 20 70 72 65 6d 61 74 75 72 65   ┆  writeln(Output, ' ** premature┆
0x0c12a0…0c12c0             20 65 6e 64 20 6f 66 20 66 69 6c 65 20 20 27 29 3b 0d 0a 20 20 49 46 20 6c 69 6e 65 5f 74 6f 6f   ┆ end of file  ');    IF line_too┆
0x0c12c0…0c12e0             5f 6c 6f 6e 67 20 3e 20 30 20 54 48 45 4e 0d 0a 20 20 20 20 77 72 69 74 65 6c 6e 28 4f 75 74 70   ┆_long > 0 THEN      writeln(Outp┆
0x0c12e0…0c1300             75 74 2c 20 6c 69 6e 65 5f 74 6f 6f 5f 6c 6f 6e 67 3a 31 2c 20 27 20 6c 69 6e 65 73 20 74 72 75   ┆ut, line_too_long:1, ' lines tru┆
0x0c1300…0c1320             6e 63 61 74 65 64 20 61 66 74 65 72 20 27 2c 0d 0a 20 20 20 20 6c 73 69 7a 65 3a 31 2c 27 20 63   ┆ncated after ',      lsize:1,' c┆
0x0c1320…0c1340             68 61 72 61 63 74 65 72 73 2e 27 29 3b 0d 0a 20 0d 0a 20 20 43 6c 6f 73 65 28 69 6e 70 29 3b 0d   ┆haracters.');       Close(inp); ┆
0x0c1340…0c1360             0a 20 20 43 6c 6f 73 65 28 6f 75 74 70 29 3b 0d 0a 20 20 45 4e 44 2e 0d 0a 1a ae 1a af 1a b0 1a   ┆   Close(outp);    END.   « » ░ ┆
0x0c1360…0c1380             b1 1a b2 1a b3 1a b4 1a b5 1a b6 1a b7 1a b8 1a b9 1a ba 1a bb 1a bc 1a bd 1a be 1a bf 1a c0 1a   ┆▒ ▓ │ ┤ х Х и И ╣ ║ ╗ ╝ й Й ┐ └ ┆
0x0c1380…0c13a0             c1 1a ff ff c3 1a c4 1a c5 1a c6 1a c7 1a c8 1a c9 1a ca 1a cb 1a cc 1a cd 1a ce 1a cf 1a ff ff   ┆┴   ├ ─ ┼ к К ╚ ╔ ╩ ╦ ╠ ═ ╬ ¤   ┆
0x0c13a0…0c13c0             d1 1a d2 1a d3 1a d4 1a d5 1a d6 1a d7 1a d8 1a d9 1a da 1a db 1a dc 1a dd 1a de 1a df 1a e0 1a   ┆Л м М н Н о О п ┘ ┌ █ ▄ П я ▀ Я ┆
0x0c13c0…0c13e0             e1 1a e2 1a e3 1a e4 1a e5 1a e6 1a e7 1a e8 1a e9 1a ea 1a eb 1a ec 1a ed 1a ee 1a ef 1a f0 1a   ┆р Р с С т Т у У ж Ж в В ь Ь №   ┆
0x0c13e0…0c1400             f1 1a f2 1a f3 1a f4 1a f5 1a f6 1a f7 1a f8 1a f9 1a fa 1a fb 1a fc 1a fd 1a fe 1a ff 1a 00 1b   ┆ы Ы з З ш Ш э Э щ Щ ч Ч § ■     ┆
0x0c1400…0c1420 (51, 1, 2)  2f 55 61 3a 3b 61 3a 5c 75 6e 69 74 73 0d 0a 1a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆/Ua:;a:\units                   ┆
0x0c1420…0c1440             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x2…]
0x0c1480…0c14a0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0f 03 31 11 23 31 13 43 31 ff 6f   ┆                       1 #1 C1 o┆
0x0c14a0…0c14c0             31 17 83 31 19 a3 31 1b c3 31 ff ef 31 1f 03 32 21 23 32 23 43 32 25 63 32 27 83 32 29 a3 32 2b   ┆1 Ѓ1 Б1 ├1 №1  2!#2#C2%c2'Ѓ2)Б2+┆
0x0c14c0…0c14e0             c3 32 2d e3 32 2f 03 33 31 23 33 33 43 33 35 63 33 37 83 33 39 a3 33 3b c3 33 3d e3 33 3f 03 34   ┆├2-с2/ 31#33C35c37Ѓ39Б3;├3=с3? 4┆
0x0c14e0…0c1500             41 23 34 43 43 34 45 63 34 47 83 34 49 a3 34 4b c3 34 4d e3 34 4f 03 35 51 23 35 53 43 35 55 63   ┆A#4CC4Ec4GЃ4IБ4K├4Mс4O 5Q#5SC5Uc┆
0x0c1500…0c1520             35 57 f3 ff 59 a3 35 5b c3 35 5d e3 35 5f 03 36 61 23 36 63 43 36 ff 0f 00 00 00 00 ff ff ff ff   ┆5Wз YБ5[├5]с5_ 6a#6cC6          ┆
0x0c1520…0c1540             cf 36 ff ef 36 6f 03 37 71 23 37 73 43 37 75 63 37 77 83 37 79 a3 37 7b f3 ff 7d e3 37 ff 0f 38   ┆¤6 №6o 7q#7sC7uc7wЃ7yБ7{з }с7  8┆
0x0c1540…0c1560             81 23 38 83 43 38 85 63 38 87 83 38 89 a3 38 8b c3 38 8d e3 38 8f 03 39 91 23 39 93 43 39 95 63   ┆Ђ#8ЃC8Ёc8ЄЃ8ЅБ8І├8Їс8Ј 9Љ#9ЊC9Ћc┆
0x0c1560…0c1580             39 97 83 39 99 a3 39 9b c3 39 9d e3 39 9f f3 ff a1 23 3a a3 43 3a a5 63 3a a7 83 3a a9 a3 3a ab   ┆9ЌЃ9ЎБ9Џ├9Юс9Ъз А#:БC:Цc:ДЃ:ЕБ:Ф┆
0x0c1580…0c15a0             c3 3a ad e3 3a af 03 3b b1 23 3b b3 43 3b b5 f3 ff b7 f3 ff b9 a3 3b bb c3 3b bd e3 3b bf 03 3c   ┆├:Гс:» ;▒#;│C;хз из ╣Б;╗├;йс;┐ <┆
0x0c15a0…0c15c0             c1 23 3c c3 f3 ff c5 63 3c c7 83 3c c9 a3 3c cb c3 3c cd e3 3c ff 0f 3d d1 23 3d d3 43 3d d5 63   ┆┴#<├з ┼c<КЃ<╔Б<╦├<═с<  =Л#=МC=Нc┆
0x0c15c0…0c15e0             3d d7 83 3d d9 a3 3d db c3 3d dd e3 3d ff 0f 3e e1 23 3e e3 43 3e e5 63 3e e7 83 3e e9 a3 3e eb   ┆=ОЃ=┘Б=█├=Пс=  >р#>сC>тc>уЃ>жБ>в┆
0x0c15e0…0c1600             c3 3e ff ef 3e ef 03 3f f1 23 3f f3 43 3f f5 63 3f f7 83 3f f9 a3 3f fb c3 3f fd e3 3f ff 03 40   ┆├> №>№ ?ы#?зC?шc?эЃ?щБ?ч├?§с?  @┆
0x0c1600…0c1620 (51, 1, 3)  54 75 72 62 6f 20 50 61 73 63 61 6c 20 50 69 63 6b 20 4c 69 73 74 20 46 69 6c 65 20 1a 00 01 0d   ┆Turbo Pascal Pick List File     ┆
0x0c1620…0c1640             12 17 01 1a 00 02 01 01 00 e2 02 f9 3f 43 3a 5c 4c 45 49 5c 52 54 50 5c 43 52 4f 53 53 2e 50 41   ┆         Р щ?C:\LEI\RTP\CROSS.PA┆
0x0c1640…0c1660             53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆S                               ┆
0x0c1660…0c1680             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ac 00 43   ┆                             г C┆
0x0c1680…0c16a0             3a 5c 4c 45 49 5c 52 54 50 5c 56 4f 56 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆:\LEI\RTP\VOV.PAS               ┆
0x0c16a0…0c16c0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x0c16c0…0c16e0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 43 3a 5c 4c 45 49 5c 52 54 50 5c 43 52 53 50   ┆                 C:\LEI\RTP\CRSP┆
0x0c16e0…0c1700             41 53 2e 42 41 54 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆AS.BAT                          ┆
0x0c1700…0c1720             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x0c1720…0c1740             00 b9 00 43 3a 5c 4c 45 49 5c 52 54 50 5c 43 52 53 52 54 50 2e 42 41 54 00 00 00 00 00 00 00 00   ┆ ╣ C:\LEI\RTP\CRSRTP.BAT        ┆
0x0c1740…0c1760             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x0c1760…0c1780             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 56 4e 43 3a 5c 4c 45 49 5c 52 54 50 5c   ┆                   VNC:\LEI\RTP\┆
0x0c1780…0c17a0             49 4e 44 45 4e 54 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆INDENT.PAS                      ┆
0x0c17a0…0c17c0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x0c17c0…0c17e0             00 00 00 00 00 00 00 41 3a 5c 43 48 52 43 4f 4e 56 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00   ┆       A:\CHRCONV.PAS           ┆
0x0c17e0…0c1800             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x0c1800…0c1820 (51, 1, 4)  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0f 00 41 3a 5c 54 50 43 2e   ┆                         A:\TPC.┆
0x0c1820…0c1840             43 46 47 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆CFG                             ┆
0x0c1840…0c1860             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x5…]
0x0c1900…0c1920             00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 12 00 06 00 05 00 04 00 03 00 02 00 00 00 01 00 07   ┆                                ┆
0x0c1920…0c1940             00 08 00 03 00 99 00 00 65 3e 19 00 00 00 00 00 00 00 00 00 21 49 64 49 00 00 00 00 00 22 00 22   ┆     Ў  e>          !IdI     " "┆
0x0c1940…0c1960             00 22 00 22 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 28 00 00   ┆ " "                         (  ┆
0x0c1960…0c1980             00 00 00 00 00 00 00 00 00 bf 00 00 d5 4c 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆         ┐  НL*                 ┆
0x0c1980…0c19a0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x0c19c0…0c19e0             04 00 36 00 10 00 16 76 94 12 00 00 d7 6c 94 12 00 00 e8 7b 76 12 10 00 42 78 94 12 00 00 f4 78   ┆  6    vћ   Оlћ   У{v   Bxћ   Зx┆
0x0c19e0…0c1a00             94 12 00 00 99 78 92 12 00 00 b4 74 9a 12 00 00 ff ff ff ff 00 00 ff ff ff ff 64 00 0c 00 0a 02   ┆ћ   Ўxњ   ┤tџ             d     ┆
0x0c1a00…0c1a20 (51, 1, 5)  67 75 00 00 00 00 00 00 00 00 65 00 01 00 00 66 00 20 00 04 20 76 2e 20 00 61 62 5f 74 79 00 00   ┆gu        e    f     v.  ab_ty  ┆
0x0c1a20…0c1a40             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 67 00 20 00 07 41 52 52 41 59 20 5b 00   ┆                   g    ARRAY [ ┆
0x0c1a40…0c1a60             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 68 00 50 00 43 52 53 50 41   ┆                       h P CRSPA┆
0x0c1a60…0c1a80             53 2e 42 41 54 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆S.BAT                           ┆
0x0c1a80…0c1aa0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x0c1aa0…0c1ac0             00 00 00 00 00 00 00 00 00 00 00 ff ff 02 00 1a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x0c1ac0…0c1ae0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x0c1b00…0c1b20             00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 12 00 06 00 05 00 04 00 03 00 02 00 00 00 01 00 07   ┆                                ┆
0x0c1b20…0c1b40             00 08 00 03 00 99 00 00 65 3e 19 00 00 00 00 00 00 00 00 00 21 49 64 49 00 00 00 00 00 22 00 22   ┆     Ў  e>          !IdI     " "┆
0x0c1b40…0c1b60             00 22 00 22 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 28 00 00   ┆ " "                         (  ┆
0x0c1b60…0c1b80             00 00 00 00 00 00 00 00 00 bf 00 00 d5 4c 2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆         ┐  НL*                 ┆
0x0c1b80…0c1ba0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x0c1bc0…0c1be0             04 00 36 00 10 00 16 76 94 12 00 00 d7 6c 94 12 00 00 e8 7b 76 12 10 00 42 78 94 12 00 00 f4 78   ┆  6    vћ   Оlћ   У{v   Bxћ   Зx┆
0x0c1be0…0c1c00             94 12 00 00 99 78 92 12 00 00 b4 74 9a 12 00 00 ff ff ff ff 00 00 ff ff ff ff 64 00 0c 00 0a 02   ┆ћ   Ўxњ   ┤tџ             d     ┆
0x0c1c00…0c1e00 (51, 1, 6)  Cluster(CHRCONV EXE)
                            […0x32…]
0x0c8200…0c8400 (53, 0, 12) Cluster(COUNTCH EXE)
                            […0x32…]
0x0ce800…0ce820 (55, 0, 3)  4d 5a b0 01 2c 00 a3 01 6b 00 9c 0a 9c aa ac 0b 00 40 00 00 83 09 00 00 1c 00 00 00 09 00 00 00   ┆MZ░ , Б k ю юфг  @  Ѓ           ┆
0x0ce820…0ce840             21 00 00 00 32 00 00 00 41 00 00 00 46 00 00 00 61 00 00 00 66 00 00 00 77 00 00 00 7c 00 00 00   ┆!   2   A   F   a   f   w   |   ┆
0x0ce840…0ce860             93 00 00 00 ab 00 00 00 bb 00 00 00 c9 00 00 00 ce 00 00 00 02 01 00 00 07 01 00 00 20 01 00 00   ┆Њ   Ф   ╗   ╔   ╬               ┆
0x0ce860…0ce880             b3 01 00 00 b8 01 00 00 cc 01 00 00 20 02 00 00 95 02 00 00 b7 02 00 00 e1 02 00 00 f2 02 00 00   ┆│   И   ╠       Ћ   и   р   Ы   ┆
0x0ce880…0ce8a0             0f 03 00 00 34 03 00 00 3f 03 00 00 5f 03 00 00 64 03 00 00 69 03 00 00 79 03 00 00 99 03 00 00   ┆    4   ?   _   d   i   y   Ў   ┆
0x0ce8a0…0ce8c0             9e 03 00 00 a3 03 00 00 b4 03 00 00 d1 03 00 00 f6 03 00 00 01 04 00 00 21 04 00 00 26 04 00 00   ┆ъ   Б   ┤   Л   Ш       !   &   ┆
0x0ce8c0…0ce8e0             2b 04 00 00 3c 04 00 00 72 04 00 00 83 04 00 00 88 04 00 00 8d 04 00 00 ad 04 00 00 c5 04 00 00   ┆+   <   r   Ѓ   ѕ   Ї   Г   ┼   ┆
0x0ce8e0…0ce900             d7 04 00 00 e5 04 00 00 ea 04 00 00 ef 04 00 00 f6 04 00 00 3e 05 00 00 47 05 00 00 50 05 00 00   ┆О   т   Ж   №   Ш   >   G   P   ┆
0x0ce900…0ce920             57 05 00 00 6e 05 00 00 97 05 00 00 c0 05 00 00 da 05 00 00 2c 06 00 00 4a 06 00 00 64 06 00 00   ┆W   n   Ќ   └   ┌   ,   J   d   ┆
0x0ce920…0ce940             8c 06 00 00 9f 06 00 00 a4 06 00 00 ae 06 00 00 b3 06 00 00 ea 06 00 00 01 07 00 00 1a 07 00 00   ┆ї   Ъ   ц   «   │   Ж           ┆
0x0ce940…0ce960             1f 07 00 00 24 07 00 00 3a 07 00 00 45 07 00 00 4a 07 00 00 4f 07 00 00 66 07 00 00 6b 07 00 00   ┆    $   :   E   J   O   f   k   ┆
0x0ce960…0ce980             70 07 00 00 a6 07 00 00 cc 07 00 00 d1 07 00 00 d6 07 00 00 ef 07 00 00 f4 07 00 00 f9 07 00 00   ┆p   д   ╠   Л   о   №   З   щ   ┆
0x0ce980…0ce9a0             19 08 00 00 1e 08 00 00 37 08 00 00 3c 08 00 00 41 08 00 00 7a 08 00 00 7f 08 00 00 84 08 00 00   ┆        7   <   A   z       ё   ┆
0x0ce9a0…0ce9c0             96 08 00 00 9b 08 00 00 86 09 00 00 8b 09 00 00 90 09 00 00 ac 09 00 00 b9 09 00 00 c6 09 00 00   ┆ќ   Џ   є   І   љ   г   ╣   к   ┆
0x0ce9c0…0ce9e0             cb 09 00 00 d0 09 00 00 ea 09 00 00 ef 09 00 00 f4 09 00 00 06 0a 00 00 0b 0a 00 00 1d 0a 00 00   ┆╦   л   Ж   №   З               ┆
0x0ce9e0…0cea00             2d 0a 00 00 35 0a 00 00 3a 0a 00 00 3f 0a 00 00 59 0a 00 00 63 0a 00 00 7a 0a 00 00 95 0a 00 00   ┆-   5   :   ?   Y   c   z   Ћ   ┆
0x0cea00…0cea20 (55, 0, 4)  a8 0a 00 00 bb 0a 00 00 ce 0a 00 00 e1 0a 00 00 f4 0a 00 00 07 0b 00 00 1a 0b 00 00 2d 0b 00 00   ┆е   ╗   ╬   р   З           -   ┆
0x0cea20…0cea40             40 0b 00 00 53 0b 00 00 66 0b 00 00 79 0b 00 00 8c 0b 00 00 9f 0b 00 00 b2 0b 00 00 c5 0b 00 00   ┆@   S   f   y   ї   Ъ   ▓   ┼   ┆
0x0cea40…0cea60             d8 0b 00 00 eb 0b 00 00 fe 0b 00 00 11 0c 00 00 24 0c 00 00 37 0c 00 00 4a 0c 00 00 5d 0c 00 00   ┆п   в   ■       $   7   J   ]   ┆
0x0cea60…0cea80             70 0c 00 00 83 0c 00 00 96 0c 00 00 a9 0c 00 00 bc 0c 00 00 cf 0c 00 00 e2 0c 00 00 f5 0c 00 00   ┆p   Ѓ   ќ   Е   ╝   ¤   Р   ш   ┆
0x0cea80…0ceaa0             08 0d 00 00 79 0e 00 00 7e 0e 00 00 83 0e 00 00 9e 0e 00 00 a3 0e 00 00 a8 0e 00 00 b2 0e 00 00   ┆    y   ~   Ѓ   ъ   Б   е   ▓   ┆
0x0ceaa0…0ceac0             b7 0e 00 00 c1 0e 00 00 09 00 ed 00 21 00 ed 00 33 00 ed 00 41 00 ed 00 46 00 ed 00 4b 00 ed 00   ┆и   ┴     ь ! ь 3 ь A ь F ь K ь ┆
0x0ceac0…0ceae0             52 00 ed 00 63 00 ed 00 7b 00 ed 00 8c 00 ed 00 9b 00 ed 00 e2 00 ed 00 fb 01 ed 00 13 02 ed 00   ┆R ь c ь { ь ї ь Џ ь Р ь ч ь   ь ┆
0x0ceae0…0ceb00             2f 02 ed 00 4f 02 ed 00 5e 02 ed 00 6e 02 ed 00 9f 02 ed 00 ae 02 ed 00 c1 02 ed 00 d1 02 ed 00   ┆/ ь O ь ^ ь n ь Ъ ь « ь ┴ ь Л ь ┆
0x0ceb00…0ceb20             02 03 ed 00 11 03 ed 00 24 03 ed 00 5a 03 ed 00 65 03 ed 00 80 03 ed 00 8b 03 ed 00 d4 03 ed 00   ┆  ь   ь $ ь Z ь e ь ђ ь І ь н ь ┆
0x0ceb20…0ceb40             e7 03 ed 00 fb 03 ed 00 18 04 ed 00 4b 04 ed 00 5a 04 ed 00 64 04 ed 00 6f 04 ed 00 95 04 ed 00   ┆у ь ч ь   ь K ь Z ь d ь o ь Ћ ь ┆
0x0ceb40…0ceb60             b8 04 ed 00 cd 04 ed 00 09 05 ed 00 18 05 ed 00 22 05 ed 00 2d 05 ed 00 50 05 ed 00 73 05 ed 00   ┆И ь ═ ь   ь   ь " ь - ь P ь s ь ┆
0x0ceb60…0ceb80             88 05 ed 00 9b 05 ed 00 ae 05 ed 00 bd 05 ed 00 d0 05 ed 00 df 05 ed 00 02 06 ed 00 11 06 ed 00   ┆ѕ ь Џ ь « ь й ь л ь ▀ ь   ь   ь ┆
0x0ceb80…0ceba0             1b 06 ed 00 26 06 ed 00 40 06 ed 00 53 06 ed 00 6e 06 ed 00 7d 06 ed 00 33 07 ed 00 56 07 ed 00   ┆  ь & ь @ ь S ь n ь } ь 3 ь V ь ┆
0x0ceba0…0cebc0             65 07 ed 00 8b 07 ed 00 9a 07 ed 00 b2 07 ed 00 bd 07 ed 00 cc 07 ed 00 df 07 ed 00 f9 07 ed 00   ┆e ь І ь џ ь ▓ ь й ь ╠ ь ▀ ь щ ь ┆
0x0cebc0…0cebe0             11 08 ed 00 16 08 ed 00 25 08 ed 00 37 08 ed 00 86 08 ed 00 99 08 ed 00 ad 08 ed 00 ca 08 ed 00   ┆  ь   ь % ь 7 ь є ь Ў ь Г ь ╩ ь ┆
0x0cebe0…0cec00             fd 08 ed 00 08 09 ed 00 2b 09 ed 00 3f 09 ed 00 7a 09 ed 00 85 09 ed 00 a8 09 ed 00 cb 09 ed 00   ┆§ ь   ь + ь ? ь z ь Ё ь е ь ╦ ь ┆
0x0cec00…0cec20 (55, 0, 5)  e0 09 ed 00 f3 09 ed 00 06 0a ed 00 15 0a ed 00 28 0a ed 00 37 0a ed 00 5a 0a ed 00 65 0a ed 00   ┆Я ь з ь   ь   ь ( ь 7 ь Z ь e ь ┆
0x0cec20…0cec40             7f 0a ed 00 92 0a ed 00 ad 0a ed 00 bc 0a ed 00 f5 0a ed 00 0d 0b ed 00 21 0b ed 00 32 0b ed 00   ┆  ь њ ь Г ь ╝ ь ш ь   ь ! ь 2 ь ┆
0x0cec40…0cec60             41 0b ed 00 94 0b ed 00 99 0b ed 00 57 00 ac 01 62 00 ac 01 67 00 ac 01 79 00 ac 01 7e 00 ac 01   ┆A ь ћ ь Ў ь W г b г g г y г ~ г ┆
0x0cec60…0cec80             83 00 ac 01 88 00 ac 01 9a 00 ac 01 9f 00 ac 01 a4 00 ac 01 a9 00 ac 01 bb 00 ac 01 c0 00 ac 01   ┆Ѓ г ѕ г џ г Ъ г ц г Е г ╗ г └ г ┆
0x0cec80…0ceca0             c5 00 ac 01 ca 00 ac 01 dc 00 ac 01 e1 00 ac 01 e6 00 ac 01 eb 00 ac 01 fd 00 ac 01 02 01 ac 01   ┆┼ г ╩ г ▄ г р г Т г в г § г   г ┆
0x0ceca0…0cecc0             07 01 ac 01 0c 01 ac 01 1e 01 ac 01 23 01 ac 01 28 01 ac 01 2d 01 ac 01 3f 01 ac 01 44 01 ac 01   ┆  г   г   г # г ( г - г ? г D г ┆
0x0cecc0…0cece0             49 01 ac 01 83 01 ac 01 9e 01 ac 01 ac 01 ac 01 b1 01 ac 01 bf 01 ac 01 c4 01 ac 01 f1 01 ac 01   ┆I г Ѓ г ъ г г г ▒ г ┐ г ─ г ы г ┆
0x0cece0…0ced00             f6 01 ac 01 fb 01 ac 01 10 02 ac 01 15 02 ac 01 46 02 ac 01 56 02 ac 01 63 02 ac 01 68 02 ac 01   ┆Ш г ч г   г   г F г V г c г h г ┆
0x0ced00…0ced20             6d 02 ac 01 74 02 ac 01 85 02 ac 01 8a 02 ac 01 a1 02 ac 01 b9 02 ac 01 30 03 ac 01 54 03 ac 01   ┆m г t г Ё г і г А г ╣ г 0 г T г ┆
0x0ced20…0ced40             6a 03 ac 01 79 03 ac 01 89 03 ac 01 a7 03 ac 01 ad 03 ac 01 c5 03 ac 01 d0 03 ac 01 e0 03 ac 01   ┆j г y г Ѕ г Д г Г г ┼ г л г Я г ┆
0x0ced40…0ced60             eb 03 ac 01 f5 03 ac 01 03 04 ac 01 10 04 ac 01 1f 04 ac 01 54 04 ac 01 65 04 ac 01 6f 04 ac 01   ┆в г ш г   г   г   г T г e г o г ┆
0x0ced60…0ced80             7d 04 ac 01 87 04 ac 01 9d 04 ac 01 b2 04 ac 01 be 04 ac 01 e6 04 ac 01 f0 04 ac 01 10 05 ac 01   ┆} г Є г Ю г ▓ г Й г Т г   г   г ┆
0x0ced80…0ceda0             20 05 ac 01 55 05 ac 01 5a 05 ac 01 5f 05 ac 01 a4 05 ac 01 ab 05 ac 01 c3 05 ac 01 c8 05 ac 01   ┆  г U г Z г _ г ц г Ф г ├ г ╚ г ┆
0x0ceda0…0cedc0             cd 05 ac 01 e1 05 ac 01 e6 05 ac 01 0f 06 ac 01 1b 06 ac 01 29 06 ac 01 34 06 ac 01 42 06 ac 01   ┆═ г р г Т г   г   г ) г 4 г B г ┆
0x0cedc0…0cede0             50 06 ac 01 7c 06 ac 01 f1 06 ac 01 f6 06 ac 01 08 07 ac 01 19 07 ac 01 4a 07 ac 01 59 07 ac 01   ┆P г | г ы г Ш г   г   г J г Y г ┆
0x0cede0…0cee00             75 07 ac 01 7b 07 ac 01 8f 07 ac 01 9c 07 ac 01 a9 07 ac 01 ae 07 ac 01 b3 07 ac 01 b8 07 ac 01   ┆u г { г Ј г ю г Е г « г │ г И г ┆
0x0cee00…0cee20 (55, 0, 6)  29 00 29 02 4e 00 29 02 7a 00 29 02 92 00 29 02 a3 00 29 02 b2 00 29 02 b7 00 29 02 d0 00 29 02   ┆) ) N ) z ) њ ) Б ) ▓ ) и ) л ) ┆
0x0cee20…0cee40             d5 00 29 02 e9 00 29 02 5d 01 29 02 db 01 29 02 f3 01 29 02 f8 01 29 02 07 02 29 02 33 02 29 02   ┆Н ) ж ) ] ) █ ) з ) Э )   ) 3 ) ┆
0x0cee40…0cee60             44 02 29 02 c3 02 29 02 db 02 29 02 e0 02 29 02 ef 02 29 02 0c 03 29 02 1d 03 29 02 35 03 29 02   ┆D ) ├ ) █ ) Я ) № )   )   ) 5 ) ┆
0x0cee60…0cee80             67 03 29 02 b2 03 29 02 c3 03 29 02 eb 03 29 02 0a 04 29 02 18 04 29 02 3d 04 29 02 6e 04 29 02   ┆g ) ▓ ) ├ ) в )   )   ) = ) n ) ┆
0x0cee80…0ceea0             81 04 29 02 8e 04 29 02 67 05 29 02 6d 05 29 02 17 00 c3 02 2a 00 c3 02 32 01 c3 02 01 00 40 03   ┆Ђ ) ј ) g ) m )   ├ * ├ 2 ├   @ ┆
0x0ceea0…0ceec0             dd 00 40 03 04 0e 40 03 00 00 00 00 00 00 00 00 55 89 e5 b8 84 01 9a 44 02 40 03 81 ec 84 01 c4   ┆П @   @         UЅтИё џD @ ЂВё ─┆
0x0ceec0…0ceee0             7e 04 06 57 8d be fc fe 16 57 b8 ff 00 50 9a 4e 06 40 03 8d be 7c fe 16 57 8d be fc fe 16 57 9a   ┆~  WЇЙЧ■ WИ  PџN @ ЇЙ|■ WЇЙЧ■ Wџ┆
0x0ceee0…0cef00             47 10 40 03 8d be 7c fe 16 57 b8 01 00 50 9a 75 10 40 03 9a 07 02 40 03 09 c0 74 0c c7 46 fc ff   ┆G @ ЇЙ|■ WИ  Pџu @ џ  @  └t КFЧ ┆
0x0cef00…0cef20             ff c7 46 fe ff ff eb 26 8d be 7c fe 16 57 9a 0f 12 40 03 9a 0e 02 40 03 89 46 fc 89 56 fe 8d be   ┆ КF■  в&ЇЙ|■ Wџ  @ џ  @ ЅFЧЅV■ЇЙ┆
0x0cef20…0cef40             7c fe 16 57 9a f6 10 40 03 9a 0e 02 40 03 8b 46 fc 8b 56 fe 89 ec 5d c2 04 00 55 89 e5 b8 00 01   ┆|■ WџШ @ џ  @ ІFЧІV■ЅВ]┬  UЅтИ  ┆
0x0cef40…0cef60             9a 44 02 40 03 81 ec 00 01 c4 7e 04 06 57 8d be 00 ff 16 57 b8 ff 00 50 9a 4e 06 40 03 bf e2 09   ┆џD @ ЂВ  ─~  WЇЙ   WИ  PџN @ ┐Р ┆
0x0cef60…0cef80             1e 57 8d be 00 ff 16 57 9a 47 10 40 03 bf e2 09 1e 57 b8 80 00 50 9a 75 10 40 03 9a 0e 02 40 03   ┆ WЇЙ   WџG @ ┐Р  WИђ Pџu @ џ  @ ┆
0x0cef80…0cefa0             8d be 00 ff 16 57 e8 27 ff a3 74 07 89 16 76 07 c7 06 6a 07 01 00 c7 06 6c 07 01 00 bf e2 09 1e   ┆ЇЙ   WУ' Бt Ѕ v К j   К l   ┐Р  ┆
0x0cefa0…0cefc0             57 bf 62 0a 1e 57 b8 a0 00 50 bf 6e 07 1e 57 9a 60 11 40 03 9a 0e 02 40 03 31 c0 a3 70 07 a3 72   ┆W┐b  WИа P┐n  Wџ` @ џ  @ 1└Бp Бr┆
0x0cefc0…0cefe0             07 89 ec 5d c2 04 00 55 89 e5 b8 02 00 9a 44 02 40 03 83 ec 02 a1 6a 07 8b 3e 6c 07 b1 07 d3 e7   ┆ ЅВ]┬  UЅтИ  џD @ ЃВ Аj І>l ▒ Му┆
0x0cefe0…0cf000             03 f8 8a 85 e1 09 c4 7e 04 26 88 05 c4 06 70 07 8c c2 05 01 00 83 d2 00 a3 70 07 89 16 72 07 c4   ┆ ЭіЁр ─~ &ѕ ─ p ї┬   Ѓм Бp Ѕ r ─┆
0x0cf000…0cf020 (55, 0, 7)  06 74 07 8c c2 3b 16 72 07 7f 0c 7c 06 3b 06 70 07 73 04 b0 00 eb 02 b0 01 88 46 ff a1 6a 07 40   ┆ t ї┬; r   | ; p s ░ в ░ ѕF Аj @┆
0x0cf020…0cf040             a3 6a 07 81 3e 6a 07 80 00 76 3f c7 06 6a 07 01 00 a1 6c 07 40 a3 6c 07 81 3e 6c 07 a0 00 76 2a   ┆Бj Ђ>j ђ v?К j   Аl @Бl Ђ>l а v*┆
0x0cf040…0cf060             c7 06 6c 07 01 00 83 3e 6e 07 00 76 1d bf e2 09 1e 57 bf 62 0a 1e 57 b8 a0 00 50 bf 6e 07 1e 57   ┆К l   Ѓ>n  v ┐Р  W┐b  WИа P┐n  W┆
0x0cf060…0cf080             9a 60 11 40 03 9a 0e 02 40 03 8a 46 ff 89 ec 5d c2 04 00 55 89 e5 b8 38 00 9a 44 02 40 03 83 ec   ┆џ` @ џ  @ іF ЅВ]┬  UЅтИ8 џD @ ЃВ┆
0x0cf080…0cf0a0             38 8a 46 06 88 46 cc 8b 46 06 99 89 46 c8 89 56 ca b8 01 00 31 d2 3b 56 ca 7f 2d 7c 05 3b 46 c8   ┆8іF ѕF╠ІF ЎЅF╚ЅV╩И  1м;V╩ -| ;F╚┆
0x0cf0a0…0cf0c0             77 26 89 46 fc 89 56 fe eb 08 83 46 fc 01 83 56 fe 00 8b 7e fc c6 43 cc 30 c4 46 fc 8c c2 3b 56   ┆w&ЅFЧЅV■в ЃFЧ ЃV■ І~ЧкC╠0─FЧї┬;V┆
0x0cf0c0…0cf0e0             ca 75 e7 3b 46 c8 75 e2 c4 46 08 8c c2 9a 1a 03 40 03 89 46 fc 89 56 fe 83 7e 0a 00 7c 08 7f 16   ┆╩uу;F╚uР─F ї┬џ  @ ЅFЧЅV■Ѓ~  |   ┆
0x0cf0e0…0cf100             83 7e 08 00 73 10 c7 46 f0 02 00 c7 46 f2 00 00 c6 46 cd 2d eb 0a c7 46 f0 01 00 c7 46 f2 00 00   ┆Ѓ~  s КF   КFЫ  кF═-в КF   КFЫ  ┆
0x0cf100…0cf120             8b 46 06 40 99 89 46 f8 89 56 fa 8b 46 fc 0b 46 fe 74 5e c4 46 f8 8c c2 3b 56 f2 7f 07 7c 52 3b   ┆ІF @ЎЅFЭЅVЩІFЧ F■t^─FЭї┬;VЫ  |R;┆
0x0cf120…0cf140             46 f0 76 4d c4 46 f8 8c c2 2d 01 00 83 da 00 89 46 f8 89 56 fa 8b 46 04 99 8b c8 8b da c4 46 fc   ┆F vM─FЭї┬-  Ѓ┌ ЅFЭЅVЩІF ЎІ╚І┌─FЧ┆
0x0cf140…0cf160             8c c2 9a 94 02 40 03 89 c8 89 da 8b f8 8a 85 78 07 8b 7e f8 88 43 cc 8b 46 04 99 8b c8 8b da c4   ┆ї┬џћ @ Ѕ╚Ѕ┌ІЭіЁx І~ЭѕC╠ІF ЎІ╚І┌─┆
0x0cf160…0cf180             46 fc 8c c2 9a 94 02 40 03 89 46 fc 89 56 fe eb 9a 8b 46 fc 0b 46 fe 74 07 8b 7e f0 c6 43 cc 2a   ┆FЧї┬џћ @ ЅFЧЅV■вџІFЧ F■t І~ кC╠*┆
0x0cf180…0cf1a0             8d 7e cc 16 57 c4 7e 0c 06 57 b8 ff 00 50 9a 4e 06 40 03 89 ec 5d c2 08 00 55 89 e5 b8 08 02 9a   ┆Ї~╠ W─~  WИ  PџN @ ЅВ]┬  UЅтИ  џ┆
0x0cf1a0…0cf1c0             44 02 40 03 81 ec 08 02 8d 7e fa 16 57 8d 7e fc 16 57 8d 7e fe 16 57 8d 7e f8 16 57 9a 6c 00 25   ┆D @ ЂВ  Ї~Щ WЇ~Ч WЇ~■ WЇ~Э Wџl %┆
0x0cf1c0…0cf1e0             03 c4 7e 04 06 57 8d be f8 fe 16 57 8b 46 fa 31 d2 52 50 b8 04 00 50 b8 0a 00 50 e8 95 fe 31 c0   ┆ ─~  WЇЙЭ■ WІFЩ1мRPИ  PИ  PУЋ■1└┆
0x0cf1e0…0cf200             50 9a 22 0f 40 03 b0 2d 50 31 c0 50 9a bd 0e 40 03 8d be f8 fd 16 57 8b 46 fc 31 d2 52 50 b8 02   ┆Pџ" @ ░-P1└Pџй @ ЇЙЭ§ WІFЧ1мRPИ ┆
0x0cf200…0cf220 (55, 0, 8)  00 50 b8 0a 00 50 e8 6a fe 31 c0 50 9a 22 0f 40 03 9a 79 0e 40 03 9a 0e 02 40 03 c4 7e 04 06 57   ┆ PИ  PУj■1└Pџ" @ џy @ џ  @ ─~  W┆
0x0cf220…0cf240             b0 2d 50 31 c0 50 9a bd 0e 40 03 8d be f8 fe 16 57 8b 46 fe 31 d2 52 50 b8 02 00 50 b8 0a 00 50   ┆░-P1└Pџй @ ЇЙЭ■ WІF■1мRPИ  PИ  P┆
0x0cf240…0cf260             e8 30 fe 31 c0 50 9a 22 0f 40 03 9a 79 0e 40 03 9a 0e 02 40 03 89 ec 5d c2 04 00 55 89 e5 b8 08   ┆У0■1└Pџ" @ џy @ џ  @ ЅВ]┬  UЅтИ ┆
0x0cf260…0cf280             02 9a 44 02 40 03 81 ec 08 02 8d 7e fe 16 57 8d 7e fc 16 57 8d 7e fa 16 57 8d 7e f8 16 57 9a a2   ┆ џD @ ЂВ  Ї~■ WЇ~Ч WЇ~Щ WЇ~Э Wџб┆
0x0cf280…0cf2a0             00 25 03 c4 7e 04 06 57 8d be f8 fe 16 57 8b 46 fe 31 d2 52 50 b8 02 00 50 b8 0a 00 50 e8 d3 fd   ┆ % ─~  WЇЙЭ■ WІF■1мRPИ  PИ  PУМ§┆
0x0cf2a0…0cf2c0             31 c0 50 9a 22 0f 40 03 b0 3a 50 31 c0 50 9a bd 0e 40 03 8d be f8 fd 16 57 8b 46 fc 31 d2 52 50   ┆1└Pџ" @ ░:P1└Pџй @ ЇЙЭ§ WІFЧ1мRP┆
0x0cf2c0…0cf2e0             b8 02 00 50 b8 0a 00 50 e8 a8 fd 31 c0 50 9a 22 0f 40 03 9a 79 0e 40 03 9a 0e 02 40 03 89 ec 5d   ┆И  PИ  PУе§1└Pџ" @ џy @ џ  @ ЅВ]┆
0x0cf2e0…0cf300             c2 04 00 55 89 e5 b8 04 00 9a 44 02 40 03 83 ec 04 8a 46 04 30 e4 99 b9 10 00 f7 f9 89 46 fe 8a   ┆┬  UЅтИ  џD @ ЃВ іF 0СЎ╣  эщЅF■і┆
0x0cf300…0cf320             46 04 30 e4 99 b9 10 00 f7 f9 92 89 46 fc bf 64 72 1e 57 8b 7e fe 8a 85 88 07 50 b8 01 00 50 9a   ┆F 0СЎ╣  эщњЅFЧ┐dr WІ~■іЁѕ PИ  Pџ┆
0x0cf320…0cf340             bd 0e 40 03 8b 7e fc 8a 85 88 07 50 b8 01 00 50 9a bd 0e 40 03 9a 79 0e 40 03 9a 0e 02 40 03 89   ┆й @ І~ЧіЁѕ PИ  Pџй @ џy @ џ  @ Ѕ┆
0x0cf340…0cf360             ec 5d c2 02 00 0e 2a 2a 2a 20 45 52 52 4f 52 20 2a 2a 2a 20 55 89 e5 b8 00 01 9a 44 02 40 03 81   ┆В]┬   *** ERROR *** UЅтИ  џD @ Ђ┆
0x0cf360…0cf380             ec 00 01 c4 7e 04 06 57 8d be 00 ff 16 57 b8 ff 00 50 9a 4e 06 40 03 bf 64 72 1e 57 bf 95 04 0e   ┆В  ─~  WЇЙ   WИ  PџN @ ┐dr W┐Ћ  ┆
0x0cf380…0cf3a0             57 31 c0 50 9a 22 0f 40 03 8d be 00 ff 16 57 31 c0 50 9a 22 0f 40 03 9a 5a 0e 40 03 9a 0e 02 40   ┆W1└Pџ" @ ЇЙ   W1└Pџ" @ џZ @ џ  @┆
0x0cf3a0…0cf3c0             03 31 c0 9a d8 00 40 03 89 ec 5d c2 04 00 02 4f 4e 0c 48 45 58 20 4f 43 54 20 44 45 43 20 13 20   ┆ 1└џп @ ЅВ]┬   ON HEX OCT DEC   ┆
0x0cf3c0…0cf3e0             4f 70 74 69 6f 6e 20 6e 6f 74 20 75 6e 69 71 75 65 20 12 20 4f 70 74 69 6f 6e 20 6e 6f 74 20 76   ┆Option not unique   Option not v┆
0x0cf3e0…0cf400             61 6c 69 64 20 55 89 e5 b8 58 01 9a 44 02 40 03 81 ec 58 01 9a d3 12 40 03 09 c0 75 0c 9a 27 03   ┆alid UЅтИX џD @ ЂВX џМ @  └u џ' ┆
0x0cf400…0cf420 (55, 0, 9)  ac 01 31 c0 9a d8 00 40 03 bf 00 00 1e 57 b8 02 00 50 bf 1e 02 1e 57 b8 05 00 50 9a 2a 07 ed 00   ┆г 1└џп @ ┐   WИ  P┐   WИ  Pџ* ь ┆
0x0cf420…0cf440             c4 06 29 02 8c c2 a3 b6 5f 89 16 b8 5f c4 06 38 03 8c c2 a3 ba 5f 89 16 bc 5f bf 4b 04 1e 57 bf   ┆─ ) ї┬БХ_Ѕ И_─ 8 ї┬Б║_Ѕ ╝_┐K  W┐┆
0x0cf440…0cf460             fe 04 0e 57 9a 24 07 40 03 74 04 b0 00 eb 02 b0 01 a2 be 5f 80 3e be 5f 00 75 1e 80 3e 1f 02 00   ┆■  Wџ$ @ t ░ в ░ бЙ_ђ>Й_ u ђ>   ┆
0x0cf460…0cf480             75 17 c4 06 b6 5f 8c c2 b9 02 00 31 db 9a 79 02 40 03 a3 b6 5f 89 16 b8 5f bf 5a 05 1e 57 b8 04   ┆u ─ Х_ї┬╣  1█џy @ БХ_Ѕ И_┐Z  WИ ┆
0x0cf480…0cf4a0             00 50 bf 01 05 0e 57 9a ec 0a ed 00 3d ff ff 75 0a bf 0e 05 0e 57 e8 bb fe eb 34 3d 00 00 75 0a   ┆ P┐   WџВ ь =  u ┐   WУ╗■в4=  u ┆
0x0cf4a0…0cf4c0             bf 22 05 0e 57 e8 ac fe eb 25 3d 01 00 75 08 c7 06 c0 5f 10 00 eb 18 3d 02 00 75 08 c7 06 c0 5f   ┆┐"  WУг■в%=  u К └_  в =  u К └_┆
0x0cf4c0…0cf4e0             08 00 eb 0b 3d 03 00 75 06 c7 06 c0 5f 0a 00 bf 69 06 1e 57 bf fe 04 0e 57 9a 24 07 40 03 74 04   ┆  в =  u К └_  ┐i  W┐■  Wџ$ @ t ┆
0x0cf4e0…0cf500             b0 00 eb 02 b0 01 a2 bf 5f bf 0f 00 1e 57 bf 62 5a 1e 57 b8 50 00 50 9a 4e 06 40 03 80 3e 10 01   ┆░ в ░ б┐_┐   W┐bZ WИP PџN @ ђ>  ┆
0x0cf500…0cf520             00 74 15 bf 1e 01 1e 57 bf c2 5f 1e 57 b8 3c 00 50 9a 4e 06 40 03 eb 05 c6 06 c2 5f 00 c6 06 e0   ┆ t ┐   W┐┬_ WИ< PџN @ в к ┬_ к Я┆
0x0cf520…0cf540             09 00 bf 62 5a 1e 57 e8 10 fa c6 06 e0 09 02 bf 64 72 1e 57 bf c2 5f 1e 57 9a 0e 0b 40 03 bf 64   ┆  ┐bZ WУ Щк Я  ┐dr W┐┬_ Wџ  @ ┐d┆
0x0cf540…0cf560             72 1e 57 bf 00 60 1e 57 b8 00 10 50 9a 53 0b 40 03 9a 0e 02 40 03 bf 64 72 1e 57 9a 83 0b 40 03   ┆r W┐ ` WИ  PџS @ џ  @ ┐dr WџЃ @ ┆
0x0cf560…0cf580             9a 0e 02 40 03 89 ec 5d c3 19 20 2d 20 41 62 6f 76 65 20 6c 69 6e 65 20 72 65 70 65 61 74 65 64   ┆џ  @ ЅВ]├  - Above line repeated┆
0x0cf580…0cf5a0             20 2d 20 02 20 20 0a 20 20 20 20 20 20 20 20 20 20 55 89 e5 b8 04 01 9a 44 02 40 03 81 ec 04 01   ┆ -               UЅтИ  џD @ ЂВ  ┆
0x0cf5a0…0cf5c0             bf b8 5a 1e 57 bf c8 5a 1e 57 b8 0f 00 50 9a 5d 02 40 03 80 3e b5 5a 00 74 1c bf 64 72 1e 57 bf   ┆┐ИZ W┐╚Z WИ  Pџ] @ ђ>хZ t ┐dr W┐┆
0x0cf5c0…0cf5e0             b9 06 0e 57 31 c0 50 9a 22 0f 40 03 9a 5a 0e 40 03 9a 0e 02 40 03 bf 64 72 1e 57 ff 36 e2 5a ff   ┆╣  W1└Pџ" @ џZ @ џ  @ ┐dr W 6РZ ┆
0x0cf5e0…0cf600             36 e0 5a b8 08 00 50 9a b8 0f 40 03 b0 3a 50 31 c0 50 9a bd 0e 40 03 9a 79 0e 40 03 9a 0e 02 40   ┆6ЯZИ  PџИ @ ░:P1└Pџй @ џy @ џ  @┆
0x0cf600…0cf620 (55, 0, 10) 03 83 3e c0 5f 0a 7f 1a bf 64 72 1e 57 b0 20 50 31 c0 50 9a bd 0e 40 03 9a 79 0e 40 03 9a 0e 02   ┆ Ѓ>└_   ┐dr W░ P1└Pџй @ џy @ џ  ┆
0x0cf620…0cf640             40 03 8b 46 04 89 46 fc b8 01 00 3b 46 fc 7e 03 e9 8e 00 89 46 fe eb 03 ff 46 fe a1 c0 5f 3d 08   ┆@ ІF ЅFЧИ  ;FЧ~ жј ЅF■в  F■А└_= ┆
0x0cf640…0cf660             00 74 05 3d 0a 00 75 42 bf 64 72 1e 57 b0 20 50 31 c0 50 9a bd 0e 40 03 8d be fc fe 16 57 8b 7e   ┆ t =  uB┐dr W░ P1└Pџй @ ЇЙЧ■ WІ~┆
0x0cf660…0cf680             fe 8a 85 b7 5a 30 e4 31 d2 52 50 b8 03 00 50 ff 36 c0 5f e8 fd f9 31 c0 50 9a 22 0f 40 03 9a 79   ┆■іЁиZ0С1мRPИ  P 6└_У§щ1└Pџ" @ џy┆
0x0cf680…0cf6a0             0e 40 03 9a 0e 02 40 03 eb 2c 3d 10 00 75 27 bf 64 72 1e 57 bf d3 06 0e 57 31 c0 50 9a 22 0f 40   ┆ @ џ  @ в,=  u'┐dr W┐М  W1└Pџ" @┆
0x0cf6a0…0cf6c0             03 9a 79 0e 40 03 9a 0e 02 40 03 8b 7e fe 8a 85 b7 5a 50 e8 2d fc 8b 46 fe 3b 46 fc 74 03 e9 77   ┆ џy @ џ  @ І~■іЁиZPУ-ЧІF■;FЧt жw┆
0x0cf6c0…0cf6e0             ff bf 64 72 1e 57 9a 5a 0e 40 03 9a 0e 02 40 03 80 3e be 5f 00 74 76 bf 64 72 1e 57 bf d6 06 0e   ┆ ┐dr WџZ @ џ  @ ђ>Й_ tv┐dr W┐о  ┆
0x0cf6e0…0cf700             57 31 c0 50 9a 22 0f 40 03 9a 79 0e 40 03 9a 0e 02 40 03 8b 46 04 89 46 fc b8 01 00 3b 46 fc 7f   ┆W1└Pџ" @ џy @ џ  @ ІF ЅFЧИ  ;FЧ ┆
0x0cf700…0cf720             3d 89 46 fe eb 03 ff 46 fe bf 64 72 1e 57 8b 7e fe 8a 85 b7 5a 30 e4 8b f8 d1 e7 d1 e7 81 c7 b6   ┆=ЅF■в  F■┐dr WІ~■іЁиZ0СІЭЛуЛуЂКХ┆
0x0cf720…0cf740             5b 1e 57 b8 04 00 50 9a 22 0f 40 03 9a 79 0e 40 03 9a 0e 02 40 03 8b 46 fe 3b 46 fc 75 c8 bf 64   ┆[ WИ  Pџ" @ џy @ џ  @ ІF■;FЧu╚┐d┆
0x0cf740…0cf760             72 1e 57 9a 5a 0e 40 03 9a 0e 02 40 03 89 ec 5d c2 02 00 0d 20 46 49 4c 45 44 55 4d 50 20 76 2e   ┆r WџZ @ џ  @ ЅВ]┬    FILEDUMP v.┆
0x0cf760…0cf780             20 03 31 2e 31 0c 20 20 20 20 20 20 20 20 41 74 3a 20 02 20 20 0d 20 20 20 20 4f 66 20 66 69 6c   ┆  1.1         At:         Of fil┆
0x0cf780…0cf7a0             65 3a 20 03 4e 55 4c 03 53 4f 48 03 53 54 58 03 45 54 58 03 45 4f 54 03 45 4e 51 03 41 43 4b 03   ┆e:  NUL SOH STX ETX EOT ENQ ACK ┆
0x0cf7a0…0cf7c0             42 45 4c 03 42 53 20 03 48 54 20 03 4c 46 20 03 56 54 20 03 46 46 20 03 43 52 20 03 53 4f 20 03   ┆BEL BS  HT  LF  VT  FF  CR  SO  ┆
0x0cf7c0…0cf7e0             53 49 20 03 44 4c 45 03 44 43 31 03 44 43 32 03 44 43 33 03 44 43 34 03 4e 41 4b 03 53 59 4e 03   ┆SI  DLE DC1 DC2 DC3 DC4 NAK SYN ┆
0x0cf7e0…0cf800             45 54 42 03 43 41 4e 03 45 4d 20 03 53 55 42 03 45 53 43 03 46 53 20 03 47 53 20 03 52 53 20 03   ┆ETB CAN EM  SUB ESC FS  GS  RS  ┆
0x0cf800…0d3000 (55, 0, 11) […elided…]
0x0d3000…0d3020 (56, 0, 9)  1f ca 04 00 8b dc 1e 36 c4 7f 04 26 c5 55 0c 33 c9 26 87 4d 08 26 8b 1d b4 40 cd 21 72 02 33 c0   ┆ ╩  І▄ 6─  &┼U 3╔&ЄM &І ┤@═!r 3└┆
0x0d3020…0d3040             1f ca 04 00 8b dc 36 c4 7f 04 26 8b 1d 83 fb 04 76 06 b4 3e cd 21 72 02 33 c0 ca 04 00 83 3e da   ┆ ╩  І▄6─  &І Ѓч v ┤>═!r 3└╩  Ѓ>┌┆
0x0d3040…0d3060             09 00 75 08 26 81 7d 02 b1 d7 75 0d 26 8b 5d 08 26 8b 55 0a 26 c4 7d 0c c3 c7 06 da 09 68 00 eb   ┆  u &Ђ} ▒Оu &І] &ІU &─} ├К ┌ h в┆
0x0d3060…0d3080             eb 3b da 74 05 26 8a 01 f8 c3 8b fc 36 c4 7d 02 e8 3d 00 8b d0 3b da 75 ec b0 1a f9 c3 83 3e da   ┆в;┌t &і Э├ІЧ6─} У= Іл;┌uВ░ щ├Ѓ>┌┆
0x0d3080…0d30a0             09 00 75 08 26 81 7d 02 b2 d7 75 0d 26 8b 5d 08 26 8b 55 04 26 c4 7d 0c c3 c7 06 da 09 69 00 eb   ┆  u &Ђ} ▓Оu &І] &ІU &─} ├К ┌ i в┆
0x0d30a0…0d30c0             eb 26 88 01 43 3b da 74 01 c3 8b fc 36 c4 7d 02 51 56 1e ba 71 04 8e da 26 89 5d 08 06 57 06 57   ┆в&ѕ C;┌t ├ІЧ6─} QV ║q ј┌&Ѕ]  W W┆
0x0d30c0…0d30e0             26 ff 5d 14 0b c0 74 03 a3 da 09 5f 07 26 8b 45 0a 26 8b 5d 08 26 8b 55 04 26 c4 7d 0c 1f 5e 59   ┆& ]  └t Б┌ _ &ІE &І] &ІU &─}  ^Y┆
0x0d30e0…0d3100             c3 8b dc 36 c4 7f 04 06 57 e8 51 ff 75 14 e8 70 ff 3c 1a 74 0d 43 3c 0d 75 f4 e8 64 ff 3c 0a 75   ┆├І▄6─   WУQ u Уp < t C< uЗУd < u┆
0x0d3100…0d3120             01 43 5f 07 26 89 5d 08 eb 25 8b dc 36 c4 7f 04 06 57 e8 68 ff 75 0a b0 0d e8 85 ff b0 0a e8 80   ┆ C_ &Ѕ] в%І▄6─   WУh u ░ УЁ ░ Уђ┆
0x0d3120…0d3140             ff 5f 07 26 89 5d 08 eb 06 8b dc 36 c4 7f 04 26 83 7d 1a 00 75 03 ca 04 00 83 3e da 09 00 75 f6   ┆ _ &Ѕ] в І▄6─  &Ѓ}  u ╩  Ѓ>┌  uШ┆
0x0d3140…0d3160             06 57 26 ff 5d 18 0b c0 74 ec a3 da 09 eb e7 8b dc 36 c4 7f 04 06 57 e8 e3 fe 75 0d e8 02 ff 72   ┆ W& ]  └tВБ┌ вуІ▄6─   WУс■u У  r┆
0x0d3160…0d3180             01 43 5f 07 26 89 5d 08 cb b0 1a eb f5 8b dc 36 c4 7f 08 36 8a 47 06 36 8b 4f 04 06 57 e8 fd fe   ┆ C_ &Ѕ] ╦░ вшІ▄6─  6іG 6ІO  WУ§■┆
0x0d3180…0d31a0             75 0f 49 7e 09 96 b0 20 e8 16 ff e2 f9 96 e8 10 ff 5f 07 26 89 5d 08 ca 04 00 55 8b ec 1e c4 7e   ┆u I~ ќ░ У  РщќУ  _ &Ѕ] ╩  UІВ ─~┆
0x0d31a0…0d31c0             0c 06 57 e8 97 fe c5 76 08 b9 00 00 75 15 e8 b0 fe 3c 0d 74 0e 3c 1a 74 0a 43 41 46 88 04 3b 4e   ┆  WУЌ■┼v ╣  u У░■< t < t CAFѕ ;N┆
0x0d31c0…0d31e0             06 75 eb 2b f1 88 0c 5f 07 26 89 5d 08 1f 5d ca 06 00 55 8b ec 1e c4 7e 0c 06 57 e8 9f fe 75 25   ┆ uв+ыѕ _ &Ѕ]  ]╩  UІВ ─~  WУЪ■u%┆
0x0d31e0…0d3200             c5 76 08 8b 4e 06 fc ac 32 e4 2b c8 7e 0c b0 20 e8 ae fe e2 f9 8a 44 ff 32 e4 8b c8 e3 07 fc ac   ┆┼v ІN Чг2С+╚~ ░ У«■РщіD 2СІ╚с Чг┆
0x0d3200…0d3220 (56, 0, 10) e8 9e fe e2 f9 5f 07 26 89 5d 08 1f 5d ca 06 00 55 8b ec 83 ec 20 c4 7e 06 06 57 e8 1f fe be 00   ┆Уъ■Рщ_ &Ѕ]  ]╩  UІВЃВ ─~  WУ ■Й ┆
0x0d3220…0d3240             00 75 21 e8 3b fe 3c 1a 74 1a 3c 20 77 03 43 eb f2 e8 2d fe 3c 20 76 0c 43 83 fe 20 74 f3 88 42   ┆ u!У;■< t < w CвЫУ-■< v CЃ■ tзѕB┆
0x0d3240…0d3260             e0 46 eb ed 5f 07 26 89 5d 08 8b ce e3 12 8d 7e e0 16 07 e8 54 fa 72 02 e3 0a c7 06 da 09 6a 00   ┆ЯFвь_ &Ѕ] І╬с Ї~Я  УTЩr с К ┌ j ┆
0x0d3260…0d3280             33 c0 8b d0 8b e5 5d cb 55 8b ec 83 ec 20 8b 46 08 8b 56 0a 8d 7e e0 16 07 e8 b4 f9 c4 7e 0c 06   ┆3└ІлІт]╦UІВЃВ ІF ІV Ї~Я  У┤щ─~  ┆
0x0d3280…0d32a0             57 e8 f9 fd 75 1f 8b 46 06 2b c1 7e 0d 8b f1 8b c8 b0 20 e8 0b fe e2 f9 8b ce 8d 76 e0 fc 36 ac   ┆WУщ§u ІF +┴~ ІыІ╚░ У ■РщІ╬ЇvЯЧ6г┆
0x0d32a0…0d32c0             e8 fe fd e2 f8 5f 07 26 89 5d 08 8b e5 5d ca 06 00 b1 03 eb 0a b1 02 eb 06 b1 01 eb 02 b1 00 8b   ┆У■§РЭ_ &Ѕ] Іт]╩  ▒ в ▒ в ▒ в ▒ І┆
0x0d32c0…0d32e0             dc 36 c4 7f 04 06 57 e8 73 fd 75 1c e8 92 fd 3c 1a 74 19 f6 c1 01 74 04 3c 0d 74 10 f6 c1 02 74   ┆▄6─   WУs§u Уњ§< t Ш┴ t < t Ш┴ t┆
0x0d32e0…0d3300             07 3c 20 77 03 43 eb e4 b0 00 eb 02 b0 01 5f 07 26 89 5d 08 ca 04 00 8b dc 1e 36 c4 7f 08 36 c5   ┆ < w CвС░ в ░ _ &Ѕ] ╩  І▄ 6─  6┼┆
0x0d3300…0d3320             77 04 fc 33 c0 ab b8 b0 d7 ab 33 c0 b9 16 00 f3 ab ac 3c 4f 76 02 b0 4f 8a c8 32 ed f3 a4 32 c0   ┆w Ч3└ФИ░ОФ3└╣  зФг<Ov ░Oі╚2ьзц2└┆
0x0d3320…0d3340             aa 1f ca 08 00 a0 e0 09 b4 3d 33 d2 eb 06 b8 00 3c ba 01 00 55 8b ec c4 7e 08 26 81 7d 02 b0 d7   ┆ф ╩  аЯ ┤=3мв И <║  UІВ─~ &Ђ} ░О┆
0x0d3340…0d3360             74 1a 26 81 7d 02 b3 d7 74 08 c7 06 da 09 66 00 eb 34 50 52 06 57 0e e8 4c 00 5a 58 26 80 7d 30   ┆t &Ђ} │Оt К ┌ f в4PR W УL ZX&ђ}0┆
0x0d3360…0d3380             00 74 12 1e 8d 55 30 06 1f 33 c9 cd 21 1f 73 06 a3 da 09 eb 11 92 26 c7 45 02 b3 d7 26 89 05 8b   ┆ t  ЇU0  3╔═! s Б┌ в њ&КE │О&Ѕ І┆
0x0d3380…0d33a0             46 06 26 89 45 04 5d ca 06 00 8b dc 36 c4 7f 04 e8 38 00 75 0e 33 c9 26 8b 1d b4 40 cd 21 73 03   ┆F &ЅE ]╩  І▄6─  У8 u 3╔&І ┤@═!s ┆
0x0d33a0…0d33c0             a3 da 09 ca 04 00 8b dc 36 c4 7f 04 e8 1c 00 75 17 26 8b 1d 83 fb 04 76 09 b4 3e cd 21 73 03 a3   ┆Б┌ ╩  І▄6─  У  u &І Ѓч v ┤>═!s Б┆
0x0d33c0…0d33e0             da 09 26 c7 45 02 b0 d7 ca 04 00 26 81 7d 02 b3 d7 74 06 c7 06 da 09 67 00 c3 b4 3f ba 64 00 eb   ┆┌ &КE ░О╩  &Ђ} │Оt К ┌ g ├┤?║d в┆
0x0d33e0…0d3400             05 b4 40 ba 65 00 55 8b ec c4 7e 0a e8 dc ff 75 1b 1e 52 c5 56 06 26 8b 4d 04 26 8b 1d cd 21 5a   ┆ ┤@║e UІВ─~ У▄ u  R┼V &ІM &І ═!Z┆
0x0d3400…0d3420 (56, 0, 11) 1f 72 06 3b c1 74 05 8b c2 a3 da 09 5d ca 04 00 b3 3f b9 64 00 eb 05 b3 40 b9 65 00 55 8b ec c4   ┆ r ;┴t І┬Б┌ ]╩  │?╣d в │@╣e UІВ─┆
0x0d3420…0d3440             7e 10 e8 a6 ff 75 3f 8b 46 0a 0b c0 74 1c 1e 51 26 f7 65 04 8b c8 c5 56 0c 8a e3 26 8b 1d cd 21   ┆~ Уд u?ІF  └t  Q&эe І╚┼V іс&І ═!┆
0x0d3440…0d3460             59 1f 72 1f 33 d2 26 f7 75 04 c4 7e 06 8c c2 0b d7 74 05 26 89 05 eb 1c 3b 46 0a 74 17 89 0e da   ┆Y r 3м&эu ─~ ї┬ Оt &Ѕ в ;F t Ѕ ┌┆
0x0d3460…0d3480             09 eb 11 a3 da 09 c4 7e 06 8c c2 0b d7 74 05 33 c0 26 89 05 5d ca 0e 00 55 8b ec c4 7e 0a e8 4a   ┆ в Б┌ ─~ ї┬ Оt 3└&Ѕ ]╩  UІВ─~ УJ┆
0x0d3480…0d34a0             ff 75 21 8b 46 08 26 f7 65 04 8b c8 8b 46 06 26 f7 65 04 03 ca 8b d0 26 8b 1d b8 00 42 cd 21 73   ┆ u!ІF &эe І╚ІF &эe  ╩Іл&І И B═!s┆
0x0d34a0…0d34c0             03 a3 da 09 5d ca 08 00 e8 44 00 72 0f 26 8b 4d 04 83 f9 01 74 06 33 db 0e e8 88 f0 ca 04 00 e8   ┆ Б┌ ]╩  УD r &ІM Ѓщ t 3█ Уѕ ╩  У┆
0x0d34c0…0d34e0             2d 00 72 13 8b c1 8b d3 26 8b 4d 04 83 f9 01 74 06 33 db 0e e8 6d f0 ca 04 00 e8 12 00 72 0b 2b   ┆- r І┴ІМ&ІM Ѓщ t 3█ Уm ╩  У  r +┆
0x0d34e0…0d3500             c1 1b d3 72 05 b0 01 ca 04 00 32 c0 ca 04 00 8b dc 36 c4 7f 06 26 81 7d 02 b3 d7 75 2b 33 c9 33   ┆┴ Мr ░ ╩  2└╩  І▄6─  &Ђ} │Оu+3╔3┆
0x0d3500…0d3520             d2 26 8b 1d b8 01 42 cd 21 52 50 33 c9 33 d2 26 8b 1d b8 02 42 cd 21 5b 59 52 50 8b d3 26 8b 1d   ┆м&І И B═!RP3╔3м&І И B═![YRPІМ&І ┆
0x0d3520…0d3540             b8 00 42 cd 21 59 5b c3 c7 06 da 09 67 00 33 c0 33 d2 f9 c3 55 8b ec 8b 56 06 0b d2 74 05 e8 49   ┆И B═!Y[├К ┌ g 3└3мщ├UІВІV  мt УI┆
0x0d3540…0d3560             00 eb 30 b4 30 cd 21 3c 03 b8 00 00 72 25 8e 06 d6 09 26 8e 06 2c 00 33 ff fc 26 3a 05 74 07 b9   ┆ в0┤0═!< И  r%ј о &ј , 3 Ч&: t ╣┆
0x0d3560…0d3580             ff ff f2 ae eb f4 83 c7 03 8b f7 b9 00 01 f2 ae 91 f6 d0 1e 06 1f c4 7e 08 fc aa 91 f3 a4 1f 5d   ┆  Ы«вЗЃК Іэ╣  Ы«ЉШл   ─~ ЧфЉзц ]┆
0x0d3580…0d35a0             ca 02 00 33 d2 e8 02 00 93 cb 8e 06 d6 09 bf 80 00 26 8a 0d 32 ed 47 33 db e3 09 26 80 3d 20 77   ┆╩  3мУ  Њ╦ј о ┐ђ &і 2ьG3█с &ђ= w┆
0x0d35a0…0d35c0             03 47 e2 f7 8b f7 e3 09 26 80 3d 20 76 03 47 e2 f7 8b c7 2b c6 74 04 43 4a 75 de c3 00 00 00 00   ┆ GРэІэс &ђ= v GРэІК+кt CJuя├    ┆
0x0d35c0…0d35e0             04 00 01 49 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆   I                            ┆
0x0d35e0…0d3600             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x0d36c0…0d36e0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 03 00 01 4f 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                  O             ┆
0x0d36e0…0d3700             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x0d37c0…0d37e0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00   ┆                                ┆
0x0d37e0…0d3800             06 4e 55 4d 42 45 52 00 00 96 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆ NUMBER  ќ                      ┆
0x0d3800…0d3820 (56, 0, 13) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x0d38e0…0d3900             00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 04 53 4b 49 50 00 00 00 00 00 00 00 00 00 00 00 00   ┆                SKIP            ┆
0x0d3900…0d3920             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x0d39e0…0d3a00             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 05 43   ┆                               C┆
0x0d3a00…0d3a20 (56, 0, 14) 48 41 52 53 00 00 00 00 00 00 00 02 4f 4e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆HARS        ON                  ┆
0x0d3a20…0d3a40             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x0d3b00…0d3b20             00 00 00 00 00 00 00 00 00 00 00 02 00 06 46 4f 52 4d 41 54 00 00 00 00 00 00 03 48 45 58 00 00   ┆              FORMAT       HEX  ┆
0x0d3b20…0d3b40             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x0d3c00…0d3c20 (56, 0, 15) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 54 45 53   ┆                             TES┆
0x0d3c20…0d3c40             54 00 00 00 00 00 00 00 00 03 4f 46 46 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆T         OFF                   ┆
0x0d3c40…0d3c60             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x0d3d20…0d3d40             00 00 00 00 00 00 00 00 00 00 80 00 a0 00 01 00 00 00 00 00 fe ff ff ff 30 31 32 33 34 35 36 37   ┆          ђ а       ■   01234567┆
0x0d3d40…0d3d60             38 39 41 42 43 44 45 46 30 31 32 33 34 35 36 37 38 39 41 42 43 44 45 46 0d 45 6e 76 69 72 6f 6e   ┆89ABCDEF0123456789ABCDEF Environ┆
0x0d3d60…0d3d80             6d 65 6e 74 3a 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆ment:                           ┆
0x0d3d80…0d3da0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x0d3e60…0d3e80             00 00 00 00 00 00 03 48 4c 50 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆       HLP                      ┆
0x0d3e80…0d3ea0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x8…]
0x0d3fa0…0d3fc0             02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 f7 8b c7 2b c6 74 04 43 4a 75 de c3 00 00 00 00   ┆                эІК+кt CJuя├    ┆
0x0d3fc0…0d3fe0             04 00 01 49 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆   I                            ┆
0x0d3fe0…0d4000             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x0d4000…0d4200 (56, 1, 2)  Cluster(COMPARE EXE)
                            […0x32…]
0x0da600…0da800 (58, 0, 8)  Cluster(INDENT  EXE)
                            […0x49…]
0x0e3a00…0e3c00 (60, 1, 7)  Cluster(CROSS   EXE)
                            […0x65…]
0x0f0600…0f0800 (64, 0, 4)  Cluster(PASCFORMEXE)
                            […0x42…]
0x0f8c00…0f8e00 (66, 0, 11) Cluster(PASCROSSEXE)
                            […0x41…]
0x101000…101020 (68, 1, 2)  54 75 72 62 6f 20 50 61 73 63 61 6c 20 50 69 63 6b 20 4c 69 73 74 20 46 69 6c 65 20 1a 00 01 0d   ┆Turbo Pascal Pick List File     ┆
0x101020…101040             12 17 01 1a 00 02 01 01 00 e2 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆         Р                      ┆
0x101040…101060             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x15…]
0x101300…101320             00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 12 00 00 00 01 00 02 00 03 00 04 00 05 00 06 00 07   ┆                                ┆
0x101320…101340             00 08 00 03 00 99 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆     Ў                          ┆
0x101340…101360             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x3…]
0x1013c0…1013e0             04 00 36 00 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff   ┆  6                             ┆
0x1013e0…101400             ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 64 00 0c 00 0a 00   ┆                          d     ┆
0x101400…101420 (68, 1, 4)  00 00 00 00 00 00 00 00 00 00 65 00 01 00 00 66 00 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆          e    f                ┆
0x101420…101440             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 67 00 20 00 00 00 00 00 00 00 00 00 00   ┆                   g            ┆
0x101440…101460             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 68 00 50 00 00 00 00 00 00   ┆                       h P      ┆
0x101460…101480             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x1014a0…1014c0             00 00 00 00 00 00 00 00 00 00 00 ff ff 02 00 1a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x1014c0…1014e0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x101500…101520             00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 12 00 00 00 01 00 02 00 03 00 04 00 05 00 06 00 07   ┆                                ┆
0x101520…101540             00 08 00 03 00 99 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆     Ў                          ┆
0x101540…101560             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x3…]
0x1015c0…1015e0             04 00 36 00 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff   ┆  6                             ┆
0x1015e0…101600             ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 64 00 0c 00 0a 00   ┆                          d     ┆
0x101600…101800 (68, 1, 5)  Cluster(TPC     CFG)
0x101800…101820 (68, 1, 6)  54 75 72 62 6f 20 50 61 73 63 61 6c 20 50 69 63 6b 20 4c 69 73 74 20 46 69 6c 65 20 1a 00 01 0d   ┆Turbo Pascal Pick List File     ┆
0x101820…101840             12 17 01 1a 00 02 01 01 00 e2 02 05 00 41 3a 5c 54 50 43 2e 43 46 47 00 00 00 00 00 00 00 00 00   ┆         Р   A:\TPC.CFG         ┆
0x101840…101860             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x15…]
0x101b00…101b20             00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 12 00 00 00 01 00 02 00 03 00 04 00 05 00 06 00 07   ┆                                ┆
0x101b20…101b40             00 08 00 03 00 99 00 00 00 00 05 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆     Ў                          ┆
0x101b40…101b60             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x3…]
0x101bc0…101be0             04 00 36 00 00 00 77 75 9a 12 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff   ┆  6   wuџ                       ┆
0x101be0…101c00             ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 64 00 0c 00 0a 00   ┆                          d     ┆
0x101c00…101c20 (68, 1, 8)  00 00 00 00 00 00 00 00 00 00 65 00 01 00 00 66 00 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆          e    f                ┆
0x101c20…101c40             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 67 00 20 00 00 00 00 00 00 00 00 00 00   ┆                   g            ┆
0x101c40…101c60             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 68 00 50 00 00 00 00 00 00   ┆                       h P      ┆
0x101c60…101c80             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x101ca0…101cc0             00 00 00 00 00 00 00 00 00 00 00 ff ff 02 00 1a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x101cc0…101ce0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x101d00…101d20             00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 12 00 00 00 01 00 02 00 03 00 04 00 05 00 06 00 07   ┆                                ┆
0x101d20…101d40             00 08 00 03 00 99 00 00 00 00 05 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆     Ў                          ┆
0x101d40…101d60             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x3…]
0x101dc0…101de0             04 00 36 00 00 00 77 75 9a 12 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff   ┆  6   wuџ                       ┆
0x101de0…101e00             ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 00 00 ff ff ff ff 64 00 0c 00 0a 00   ┆                          d     ┆
0x101e00…101e20 (68, 1, 9)  4d 5a b0 01 2c 00 a3 01 6b 00 9c 0a 9c aa ac 0b 00 40 00 00 83 09 00 00 1c 00 00 00 09 00 00 00   ┆MZ░ , Б k ю юфг  @  Ѓ           ┆
0x101e20…101e40             21 00 00 00 32 00 00 00 41 00 00 00 46 00 00 00 61 00 00 00 66 00 00 00 77 00 00 00 7c 00 00 00   ┆!   2   A   F   a   f   w   |   ┆
0x101e40…101e60             93 00 00 00 ab 00 00 00 bb 00 00 00 c9 00 00 00 ce 00 00 00 02 01 00 00 07 01 00 00 20 01 00 00   ┆Њ   Ф   ╗   ╔   ╬               ┆
0x101e60…101e80             b3 01 00 00 b8 01 00 00 cc 01 00 00 20 02 00 00 95 02 00 00 b7 02 00 00 e1 02 00 00 f2 02 00 00   ┆│   И   ╠       Ћ   и   р   Ы   ┆
0x101e80…101ea0             0f 03 00 00 34 03 00 00 3f 03 00 00 5f 03 00 00 64 03 00 00 69 03 00 00 79 03 00 00 99 03 00 00   ┆    4   ?   _   d   i   y   Ў   ┆
0x101ea0…101ec0             9e 03 00 00 a3 03 00 00 b4 03 00 00 d1 03 00 00 f6 03 00 00 01 04 00 00 21 04 00 00 26 04 00 00   ┆ъ   Б   ┤   Л   Ш       !   &   ┆
0x101ec0…101ee0             2b 04 00 00 3c 04 00 00 72 04 00 00 83 04 00 00 88 04 00 00 8d 04 00 00 ad 04 00 00 c5 04 00 00   ┆+   <   r   Ѓ   ѕ   Ї   Г   ┼   ┆
0x101ee0…101f00             d7 04 00 00 e5 04 00 00 ea 04 00 00 ef 04 00 00 f6 04 00 00 3e 05 00 00 47 05 00 00 50 05 00 00   ┆О   т   Ж   №   Ш   >   G   P   ┆
0x101f00…101f20             57 05 00 00 6e 05 00 00 97 05 00 00 c0 05 00 00 da 05 00 00 2c 06 00 00 4a 06 00 00 64 06 00 00   ┆W   n   Ќ   └   ┌   ,   J   d   ┆
0x101f20…101f40             8c 06 00 00 9f 06 00 00 a4 06 00 00 ae 06 00 00 b3 06 00 00 ea 06 00 00 01 07 00 00 1a 07 00 00   ┆ї   Ъ   ц   «   │   Ж           ┆
0x101f40…101f60             1f 07 00 00 24 07 00 00 3a 07 00 00 45 07 00 00 4a 07 00 00 4f 07 00 00 66 07 00 00 6b 07 00 00   ┆    $   :   E   J   O   f   k   ┆
0x101f60…101f80             70 07 00 00 a6 07 00 00 cc 07 00 00 d1 07 00 00 d6 07 00 00 ef 07 00 00 f4 07 00 00 f9 07 00 00   ┆p   д   ╠   Л   о   №   З   щ   ┆
0x101f80…101fa0             19 08 00 00 1e 08 00 00 37 08 00 00 3c 08 00 00 41 08 00 00 7a 08 00 00 7f 08 00 00 84 08 00 00   ┆        7   <   A   z       ё   ┆
0x101fa0…101fc0             96 08 00 00 9b 08 00 00 86 09 00 00 8b 09 00 00 90 09 00 00 ac 09 00 00 b9 09 00 00 c6 09 00 00   ┆ќ   Џ   є   І   љ   г   ╣   к   ┆
0x101fc0…101fe0             cb 09 00 00 d0 09 00 00 ea 09 00 00 ef 09 00 00 f4 09 00 00 06 0a 00 00 0b 0a 00 00 1d 0a 00 00   ┆╦   л   Ж   №   З               ┆
0x101fe0…102000             2d 0a 00 00 35 0a 00 00 3a 0a 00 00 3f 0a 00 00 59 0a 00 00 63 0a 00 00 7a 0a 00 00 95 0a 00 00   ┆-   5   :   ?   Y   c   z   Ћ   ┆
0x102000…102020 (68, 1, 10) a8 0a 00 00 bb 0a 00 00 ce 0a 00 00 e1 0a 00 00 f4 0a 00 00 07 0b 00 00 1a 0b 00 00 2d 0b 00 00   ┆е   ╗   ╬   р   З           -   ┆
0x102020…102040             40 0b 00 00 53 0b 00 00 66 0b 00 00 79 0b 00 00 8c 0b 00 00 9f 0b 00 00 b2 0b 00 00 c5 0b 00 00   ┆@   S   f   y   ї   Ъ   ▓   ┼   ┆
0x102040…102060             d8 0b 00 00 eb 0b 00 00 fe 0b 00 00 11 0c 00 00 24 0c 00 00 37 0c 00 00 4a 0c 00 00 5d 0c 00 00   ┆п   в   ■       $   7   J   ]   ┆
0x102060…102080             70 0c 00 00 83 0c 00 00 96 0c 00 00 a9 0c 00 00 bc 0c 00 00 cf 0c 00 00 e2 0c 00 00 f5 0c 00 00   ┆p   Ѓ   ќ   Е   ╝   ¤   Р   ш   ┆
0x102080…1020a0             08 0d 00 00 79 0e 00 00 7e 0e 00 00 83 0e 00 00 9e 0e 00 00 a3 0e 00 00 a8 0e 00 00 b2 0e 00 00   ┆    y   ~   Ѓ   ъ   Б   е   ▓   ┆
0x1020a0…1020c0             b7 0e 00 00 c1 0e 00 00 09 00 ed 00 21 00 ed 00 33 00 ed 00 41 00 ed 00 46 00 ed 00 4b 00 ed 00   ┆и   ┴     ь ! ь 3 ь A ь F ь K ь ┆
0x1020c0…1020e0             52 00 ed 00 63 00 ed 00 7b 00 ed 00 8c 00 ed 00 9b 00 ed 00 e2 00 ed 00 fb 01 ed 00 13 02 ed 00   ┆R ь c ь { ь ї ь Џ ь Р ь ч ь   ь ┆
0x1020e0…102100             2f 02 ed 00 4f 02 ed 00 5e 02 ed 00 6e 02 ed 00 9f 02 ed 00 ae 02 ed 00 c1 02 ed 00 d1 02 ed 00   ┆/ ь O ь ^ ь n ь Ъ ь « ь ┴ ь Л ь ┆
0x102100…102120             02 03 ed 00 11 03 ed 00 24 03 ed 00 5a 03 ed 00 65 03 ed 00 80 03 ed 00 8b 03 ed 00 d4 03 ed 00   ┆  ь   ь $ ь Z ь e ь ђ ь І ь н ь ┆
0x102120…102140             e7 03 ed 00 fb 03 ed 00 18 04 ed 00 4b 04 ed 00 5a 04 ed 00 64 04 ed 00 6f 04 ed 00 95 04 ed 00   ┆у ь ч ь   ь K ь Z ь d ь o ь Ћ ь ┆
0x102140…102160             b8 04 ed 00 cd 04 ed 00 09 05 ed 00 18 05 ed 00 22 05 ed 00 2d 05 ed 00 50 05 ed 00 73 05 ed 00   ┆И ь ═ ь   ь   ь " ь - ь P ь s ь ┆
0x102160…102180             88 05 ed 00 9b 05 ed 00 ae 05 ed 00 bd 05 ed 00 d0 05 ed 00 df 05 ed 00 02 06 ed 00 11 06 ed 00   ┆ѕ ь Џ ь « ь й ь л ь ▀ ь   ь   ь ┆
0x102180…1021a0             1b 06 ed 00 26 06 ed 00 40 06 ed 00 53 06 ed 00 6e 06 ed 00 7d 06 ed 00 33 07 ed 00 56 07 ed 00   ┆  ь & ь @ ь S ь n ь } ь 3 ь V ь ┆
0x1021a0…1021c0             65 07 ed 00 8b 07 ed 00 9a 07 ed 00 b2 07 ed 00 bd 07 ed 00 cc 07 ed 00 df 07 ed 00 f9 07 ed 00   ┆e ь І ь џ ь ▓ ь й ь ╠ ь ▀ ь щ ь ┆
0x1021c0…1021e0             11 08 ed 00 16 08 ed 00 25 08 ed 00 37 08 ed 00 86 08 ed 00 99 08 ed 00 ad 08 ed 00 ca 08 ed 00   ┆  ь   ь % ь 7 ь є ь Ў ь Г ь ╩ ь ┆
0x1021e0…102200             fd 08 ed 00 08 09 ed 00 2b 09 ed 00 3f 09 ed 00 7a 09 ed 00 85 09 ed 00 a8 09 ed 00 cb 09 ed 00   ┆§ ь   ь + ь ? ь z ь Ё ь е ь ╦ ь ┆
0x102200…102220 (68, 1, 11) e0 09 ed 00 f3 09 ed 00 06 0a ed 00 15 0a ed 00 28 0a ed 00 37 0a ed 00 5a 0a ed 00 65 0a ed 00   ┆Я ь з ь   ь   ь ( ь 7 ь Z ь e ь ┆
0x102220…102240             7f 0a ed 00 92 0a ed 00 ad 0a ed 00 bc 0a ed 00 f5 0a ed 00 0d 0b ed 00 21 0b ed 00 32 0b ed 00   ┆  ь њ ь Г ь ╝ ь ш ь   ь ! ь 2 ь ┆
0x102240…102260             41 0b ed 00 94 0b ed 00 99 0b ed 00 57 00 ac 01 62 00 ac 01 67 00 ac 01 79 00 ac 01 7e 00 ac 01   ┆A ь ћ ь Ў ь W г b г g г y г ~ г ┆
0x102260…102280             83 00 ac 01 88 00 ac 01 9a 00 ac 01 9f 00 ac 01 a4 00 ac 01 a9 00 ac 01 bb 00 ac 01 c0 00 ac 01   ┆Ѓ г ѕ г џ г Ъ г ц г Е г ╗ г └ г ┆
0x102280…1022a0             c5 00 ac 01 ca 00 ac 01 dc 00 ac 01 e1 00 ac 01 e6 00 ac 01 eb 00 ac 01 fd 00 ac 01 02 01 ac 01   ┆┼ г ╩ г ▄ г р г Т г в г § г   г ┆
0x1022a0…1022c0             07 01 ac 01 0c 01 ac 01 1e 01 ac 01 23 01 ac 01 28 01 ac 01 2d 01 ac 01 3f 01 ac 01 44 01 ac 01   ┆  г   г   г # г ( г - г ? г D г ┆
0x1022c0…1022e0             49 01 ac 01 83 01 ac 01 9e 01 ac 01 ac 01 ac 01 b1 01 ac 01 bf 01 ac 01 c4 01 ac 01 f1 01 ac 01   ┆I г Ѓ г ъ г г г ▒ г ┐ г ─ г ы г ┆
0x1022e0…102300             f6 01 ac 01 fb 01 ac 01 10 02 ac 01 15 02 ac 01 46 02 ac 01 56 02 ac 01 63 02 ac 01 68 02 ac 01   ┆Ш г ч г   г   г F г V г c г h г ┆
0x102300…102320             6d 02 ac 01 74 02 ac 01 85 02 ac 01 8a 02 ac 01 a1 02 ac 01 b9 02 ac 01 30 03 ac 01 54 03 ac 01   ┆m г t г Ё г і г А г ╣ г 0 г T г ┆
0x102320…102340             6a 03 ac 01 79 03 ac 01 89 03 ac 01 a7 03 ac 01 ad 03 ac 01 c5 03 ac 01 d0 03 ac 01 e0 03 ac 01   ┆j г y г Ѕ г Д г Г г ┼ г л г Я г ┆
0x102340…102360             eb 03 ac 01 f5 03 ac 01 03 04 ac 01 10 04 ac 01 1f 04 ac 01 54 04 ac 01 65 04 ac 01 6f 04 ac 01   ┆в г ш г   г   г   г T г e г o г ┆
0x102360…102380             7d 04 ac 01 87 04 ac 01 9d 04 ac 01 b2 04 ac 01 be 04 ac 01 e6 04 ac 01 f0 04 ac 01 10 05 ac 01   ┆} г Є г Ю г ▓ г Й г Т г   г   г ┆
0x102380…1023a0             20 05 ac 01 55 05 ac 01 5a 05 ac 01 5f 05 ac 01 a4 05 ac 01 ab 05 ac 01 c3 05 ac 01 c8 05 ac 01   ┆  г U г Z г _ г ц г Ф г ├ г ╚ г ┆
0x1023a0…1023c0             cd 05 ac 01 e1 05 ac 01 e6 05 ac 01 0f 06 ac 01 1b 06 ac 01 29 06 ac 01 34 06 ac 01 42 06 ac 01   ┆═ г р г Т г   г   г ) г 4 г B г ┆
0x1023c0…1023e0             50 06 ac 01 7c 06 ac 01 f1 06 ac 01 f6 06 ac 01 08 07 ac 01 19 07 ac 01 4a 07 ac 01 59 07 ac 01   ┆P г | г ы г Ш г   г   г J г Y г ┆
0x1023e0…102400             75 07 ac 01 7b 07 ac 01 8f 07 ac 01 9c 07 ac 01 a9 07 ac 01 ae 07 ac 01 b3 07 ac 01 b8 07 ac 01   ┆u г { г Ј г ю г Е г « г │ г И г ┆
0x102400…102420 (68, 1, 12) 29 00 29 02 4e 00 29 02 7a 00 29 02 92 00 29 02 a3 00 29 02 b2 00 29 02 b7 00 29 02 d0 00 29 02   ┆) ) N ) z ) њ ) Б ) ▓ ) и ) л ) ┆
0x102420…102440             d5 00 29 02 e9 00 29 02 5d 01 29 02 db 01 29 02 f3 01 29 02 f8 01 29 02 07 02 29 02 33 02 29 02   ┆Н ) ж ) ] ) █ ) з ) Э )   ) 3 ) ┆
0x102440…102460             44 02 29 02 c3 02 29 02 db 02 29 02 e0 02 29 02 ef 02 29 02 0c 03 29 02 1d 03 29 02 35 03 29 02   ┆D ) ├ ) █ ) Я ) № )   )   ) 5 ) ┆
0x102460…102480             67 03 29 02 b2 03 29 02 c3 03 29 02 eb 03 29 02 0a 04 29 02 18 04 29 02 3d 04 29 02 6e 04 29 02   ┆g ) ▓ ) ├ ) в )   )   ) = ) n ) ┆
0x102480…1024a0             81 04 29 02 8e 04 29 02 67 05 29 02 6d 05 29 02 17 00 c3 02 2a 00 c3 02 32 01 c3 02 01 00 40 03   ┆Ђ ) ј ) g ) m )   ├ * ├ 2 ├   @ ┆
0x1024a0…1024c0             dd 00 40 03 04 0e 40 03 00 00 00 00 00 00 00 00 55 89 e5 b8 84 01 9a 44 02 40 03 81 ec 84 01 c4   ┆П @   @         UЅтИё џD @ ЂВё ─┆
0x1024c0…1024e0             7e 04 06 57 8d be fc fe 16 57 b8 ff 00 50 9a 4e 06 40 03 8d be 7c fe 16 57 8d be fc fe 16 57 9a   ┆~  WЇЙЧ■ WИ  PџN @ ЇЙ|■ WЇЙЧ■ Wџ┆
0x1024e0…102500             47 10 40 03 8d be 7c fe 16 57 b8 01 00 50 9a 75 10 40 03 9a 07 02 40 03 09 c0 74 0c c7 46 fc ff   ┆G @ ЇЙ|■ WИ  Pџu @ џ  @  └t КFЧ ┆
0x102500…102520             ff c7 46 fe ff ff eb 26 8d be 7c fe 16 57 9a 0f 12 40 03 9a 0e 02 40 03 89 46 fc 89 56 fe 8d be   ┆ КF■  в&ЇЙ|■ Wџ  @ џ  @ ЅFЧЅV■ЇЙ┆
0x102520…102540             7c fe 16 57 9a f6 10 40 03 9a 0e 02 40 03 8b 46 fc 8b 56 fe 89 ec 5d c2 04 00 55 89 e5 b8 00 01   ┆|■ WџШ @ џ  @ ІFЧІV■ЅВ]┬  UЅтИ  ┆
0x102540…102560             9a 44 02 40 03 81 ec 00 01 c4 7e 04 06 57 8d be 00 ff 16 57 b8 ff 00 50 9a 4e 06 40 03 bf e2 09   ┆џD @ ЂВ  ─~  WЇЙ   WИ  PџN @ ┐Р ┆
0x102560…102580             1e 57 8d be 00 ff 16 57 9a 47 10 40 03 bf e2 09 1e 57 b8 80 00 50 9a 75 10 40 03 9a 0e 02 40 03   ┆ WЇЙ   WџG @ ┐Р  WИђ Pџu @ џ  @ ┆
0x102580…1025a0             8d be 00 ff 16 57 e8 27 ff a3 74 07 89 16 76 07 c7 06 6a 07 01 00 c7 06 6c 07 01 00 bf e2 09 1e   ┆ЇЙ   WУ' Бt Ѕ v К j   К l   ┐Р  ┆
0x1025a0…1025c0             57 bf 62 0a 1e 57 b8 a0 00 50 bf 6e 07 1e 57 9a 60 11 40 03 9a 0e 02 40 03 31 c0 a3 70 07 a3 72   ┆W┐b  WИа P┐n  Wџ` @ џ  @ 1└Бp Бr┆
0x1025c0…1025e0             07 89 ec 5d c2 04 00 55 89 e5 b8 02 00 9a 44 02 40 03 83 ec 02 a1 6a 07 8b 3e 6c 07 b1 07 d3 e7   ┆ ЅВ]┬  UЅтИ  џD @ ЃВ Аj І>l ▒ Му┆
0x1025e0…102600             03 f8 8a 85 e1 09 c4 7e 04 26 88 05 c4 06 70 07 8c c2 05 01 00 83 d2 00 a3 70 07 89 16 72 07 c4   ┆ ЭіЁр ─~ &ѕ ─ p ї┬   Ѓм Бp Ѕ r ─┆
0x102600…102620 (68, 1, 13) 06 74 07 8c c2 3b 16 72 07 7f 0c 7c 06 3b 06 70 07 73 04 b0 00 eb 02 b0 01 88 46 ff a1 6a 07 40   ┆ t ї┬; r   | ; p s ░ в ░ ѕF Аj @┆
0x102620…102640             a3 6a 07 81 3e 6a 07 80 00 76 3f c7 06 6a 07 01 00 a1 6c 07 40 a3 6c 07 81 3e 6c 07 a0 00 76 2a   ┆Бj Ђ>j ђ v?К j   Аl @Бl Ђ>l а v*┆
0x102640…102660             c7 06 6c 07 01 00 83 3e 6e 07 00 76 1d bf e2 09 1e 57 bf 62 0a 1e 57 b8 a0 00 50 bf 6e 07 1e 57   ┆К l   Ѓ>n  v ┐Р  W┐b  WИа P┐n  W┆
0x102660…102680             9a 60 11 40 03 9a 0e 02 40 03 8a 46 ff 89 ec 5d c2 04 00 55 89 e5 b8 38 00 9a 44 02 40 03 83 ec   ┆џ` @ џ  @ іF ЅВ]┬  UЅтИ8 џD @ ЃВ┆
0x102680…1026a0             38 8a 46 06 88 46 cc 8b 46 06 99 89 46 c8 89 56 ca b8 01 00 31 d2 3b 56 ca 7f 2d 7c 05 3b 46 c8   ┆8іF ѕF╠ІF ЎЅF╚ЅV╩И  1м;V╩ -| ;F╚┆
0x1026a0…1026c0             77 26 89 46 fc 89 56 fe eb 08 83 46 fc 01 83 56 fe 00 8b 7e fc c6 43 cc 30 c4 46 fc 8c c2 3b 56   ┆w&ЅFЧЅV■в ЃFЧ ЃV■ І~ЧкC╠0─FЧї┬;V┆
0x1026c0…1026e0             ca 75 e7 3b 46 c8 75 e2 c4 46 08 8c c2 9a 1a 03 40 03 89 46 fc 89 56 fe 83 7e 0a 00 7c 08 7f 16   ┆╩uу;F╚uР─F ї┬џ  @ ЅFЧЅV■Ѓ~  |   ┆
0x1026e0…102700             83 7e 08 00 73 10 c7 46 f0 02 00 c7 46 f2 00 00 c6 46 cd 2d eb 0a c7 46 f0 01 00 c7 46 f2 00 00   ┆Ѓ~  s КF   КFЫ  кF═-в КF   КFЫ  ┆
0x102700…102720             8b 46 06 40 99 89 46 f8 89 56 fa 8b 46 fc 0b 46 fe 74 5e c4 46 f8 8c c2 3b 56 f2 7f 07 7c 52 3b   ┆ІF @ЎЅFЭЅVЩІFЧ F■t^─FЭї┬;VЫ  |R;┆
0x102720…102740             46 f0 76 4d c4 46 f8 8c c2 2d 01 00 83 da 00 89 46 f8 89 56 fa 8b 46 04 99 8b c8 8b da c4 46 fc   ┆F vM─FЭї┬-  Ѓ┌ ЅFЭЅVЩІF ЎІ╚І┌─FЧ┆
0x102740…102760             8c c2 9a 94 02 40 03 89 c8 89 da 8b f8 8a 85 78 07 8b 7e f8 88 43 cc 8b 46 04 99 8b c8 8b da c4   ┆ї┬џћ @ Ѕ╚Ѕ┌ІЭіЁx І~ЭѕC╠ІF ЎІ╚І┌─┆
0x102760…102780             46 fc 8c c2 9a 94 02 40 03 89 46 fc 89 56 fe eb 9a 8b 46 fc 0b 46 fe 74 07 8b 7e f0 c6 43 cc 2a   ┆FЧї┬џћ @ ЅFЧЅV■вџІFЧ F■t І~ кC╠*┆
0x102780…1027a0             8d 7e cc 16 57 c4 7e 0c 06 57 b8 ff 00 50 9a 4e 06 40 03 89 ec 5d c2 08 00 55 89 e5 b8 08 02 9a   ┆Ї~╠ W─~  WИ  PџN @ ЅВ]┬  UЅтИ  џ┆
0x1027a0…1027c0             44 02 40 03 81 ec 08 02 8d 7e fa 16 57 8d 7e fc 16 57 8d 7e fe 16 57 8d 7e f8 16 57 9a 6c 00 25   ┆D @ ЂВ  Ї~Щ WЇ~Ч WЇ~■ WЇ~Э Wџl %┆
0x1027c0…1027e0             03 c4 7e 04 06 57 8d be f8 fe 16 57 8b 46 fa 31 d2 52 50 b8 04 00 50 b8 0a 00 50 e8 95 fe 31 c0   ┆ ─~  WЇЙЭ■ WІFЩ1мRPИ  PИ  PУЋ■1└┆
0x1027e0…102800             50 9a 22 0f 40 03 b0 2d 50 31 c0 50 9a bd 0e 40 03 8d be f8 fd 16 57 8b 46 fc 31 d2 52 50 b8 02   ┆Pџ" @ ░-P1└Pџй @ ЇЙЭ§ WІFЧ1мRPИ ┆
0x102800…106600 (68, 1, 14) […elided…]
0x106600…106620 (69, 1, 15) 1f ca 04 00 8b dc 1e 36 c4 7f 04 26 c5 55 0c 33 c9 26 87 4d 08 26 8b 1d b4 40 cd 21 72 02 33 c0   ┆ ╩  І▄ 6─  &┼U 3╔&ЄM &І ┤@═!r 3└┆
0x106620…106640             1f ca 04 00 8b dc 36 c4 7f 04 26 8b 1d 83 fb 04 76 06 b4 3e cd 21 72 02 33 c0 ca 04 00 83 3e da   ┆ ╩  І▄6─  &І Ѓч v ┤>═!r 3└╩  Ѓ>┌┆
0x106640…106660             09 00 75 08 26 81 7d 02 b1 d7 75 0d 26 8b 5d 08 26 8b 55 0a 26 c4 7d 0c c3 c7 06 da 09 68 00 eb   ┆  u &Ђ} ▒Оu &І] &ІU &─} ├К ┌ h в┆
0x106660…106680             eb 3b da 74 05 26 8a 01 f8 c3 8b fc 36 c4 7d 02 e8 3d 00 8b d0 3b da 75 ec b0 1a f9 c3 83 3e da   ┆в;┌t &і Э├ІЧ6─} У= Іл;┌uВ░ щ├Ѓ>┌┆
0x106680…1066a0             09 00 75 08 26 81 7d 02 b2 d7 75 0d 26 8b 5d 08 26 8b 55 04 26 c4 7d 0c c3 c7 06 da 09 69 00 eb   ┆  u &Ђ} ▓Оu &І] &ІU &─} ├К ┌ i в┆
0x1066a0…1066c0             eb 26 88 01 43 3b da 74 01 c3 8b fc 36 c4 7d 02 51 56 1e ba 71 04 8e da 26 89 5d 08 06 57 06 57   ┆в&ѕ C;┌t ├ІЧ6─} QV ║q ј┌&Ѕ]  W W┆
0x1066c0…1066e0             26 ff 5d 14 0b c0 74 03 a3 da 09 5f 07 26 8b 45 0a 26 8b 5d 08 26 8b 55 04 26 c4 7d 0c 1f 5e 59   ┆& ]  └t Б┌ _ &ІE &І] &ІU &─}  ^Y┆
0x1066e0…106700             c3 8b dc 36 c4 7f 04 06 57 e8 51 ff 75 14 e8 70 ff 3c 1a 74 0d 43 3c 0d 75 f4 e8 64 ff 3c 0a 75   ┆├І▄6─   WУQ u Уp < t C< uЗУd < u┆
0x106700…106720             01 43 5f 07 26 89 5d 08 eb 25 8b dc 36 c4 7f 04 06 57 e8 68 ff 75 0a b0 0d e8 85 ff b0 0a e8 80   ┆ C_ &Ѕ] в%І▄6─   WУh u ░ УЁ ░ Уђ┆
0x106720…106740             ff 5f 07 26 89 5d 08 eb 06 8b dc 36 c4 7f 04 26 83 7d 1a 00 75 03 ca 04 00 83 3e da 09 00 75 f6   ┆ _ &Ѕ] в І▄6─  &Ѓ}  u ╩  Ѓ>┌  uШ┆
0x106740…106760             06 57 26 ff 5d 18 0b c0 74 ec a3 da 09 eb e7 8b dc 36 c4 7f 04 06 57 e8 e3 fe 75 0d e8 02 ff 72   ┆ W& ]  └tВБ┌ вуІ▄6─   WУс■u У  r┆
0x106760…106780             01 43 5f 07 26 89 5d 08 cb b0 1a eb f5 8b dc 36 c4 7f 08 36 8a 47 06 36 8b 4f 04 06 57 e8 fd fe   ┆ C_ &Ѕ] ╦░ вшІ▄6─  6іG 6ІO  WУ§■┆
0x106780…1067a0             75 0f 49 7e 09 96 b0 20 e8 16 ff e2 f9 96 e8 10 ff 5f 07 26 89 5d 08 ca 04 00 55 8b ec 1e c4 7e   ┆u I~ ќ░ У  РщќУ  _ &Ѕ] ╩  UІВ ─~┆
0x1067a0…1067c0             0c 06 57 e8 97 fe c5 76 08 b9 00 00 75 15 e8 b0 fe 3c 0d 74 0e 3c 1a 74 0a 43 41 46 88 04 3b 4e   ┆  WУЌ■┼v ╣  u У░■< t < t CAFѕ ;N┆
0x1067c0…1067e0             06 75 eb 2b f1 88 0c 5f 07 26 89 5d 08 1f 5d ca 06 00 55 8b ec 1e c4 7e 0c 06 57 e8 9f fe 75 25   ┆ uв+ыѕ _ &Ѕ]  ]╩  UІВ ─~  WУЪ■u%┆
0x1067e0…106800             c5 76 08 8b 4e 06 fc ac 32 e4 2b c8 7e 0c b0 20 e8 ae fe e2 f9 8a 44 ff 32 e4 8b c8 e3 07 fc ac   ┆┼v ІN Чг2С+╚~ ░ У«■РщіD 2СІ╚с Чг┆
0x106800…106820 (70, 0, 1)  e8 9e fe e2 f9 5f 07 26 89 5d 08 1f 5d ca 06 00 55 8b ec 83 ec 20 c4 7e 06 06 57 e8 1f fe be 00   ┆Уъ■Рщ_ &Ѕ]  ]╩  UІВЃВ ─~  WУ ■Й ┆
0x106820…106840             00 75 21 e8 3b fe 3c 1a 74 1a 3c 20 77 03 43 eb f2 e8 2d fe 3c 20 76 0c 43 83 fe 20 74 f3 88 42   ┆ u!У;■< t < w CвЫУ-■< v CЃ■ tзѕB┆
0x106840…106860             e0 46 eb ed 5f 07 26 89 5d 08 8b ce e3 12 8d 7e e0 16 07 e8 54 fa 72 02 e3 0a c7 06 da 09 6a 00   ┆ЯFвь_ &Ѕ] І╬с Ї~Я  УTЩr с К ┌ j ┆
0x106860…106880             33 c0 8b d0 8b e5 5d cb 55 8b ec 83 ec 20 8b 46 08 8b 56 0a 8d 7e e0 16 07 e8 b4 f9 c4 7e 0c 06   ┆3└ІлІт]╦UІВЃВ ІF ІV Ї~Я  У┤щ─~  ┆
0x106880…1068a0             57 e8 f9 fd 75 1f 8b 46 06 2b c1 7e 0d 8b f1 8b c8 b0 20 e8 0b fe e2 f9 8b ce 8d 76 e0 fc 36 ac   ┆WУщ§u ІF +┴~ ІыІ╚░ У ■РщІ╬ЇvЯЧ6г┆
0x1068a0…1068c0             e8 fe fd e2 f8 5f 07 26 89 5d 08 8b e5 5d ca 06 00 b1 03 eb 0a b1 02 eb 06 b1 01 eb 02 b1 00 8b   ┆У■§РЭ_ &Ѕ] Іт]╩  ▒ в ▒ в ▒ в ▒ І┆
0x1068c0…1068e0             dc 36 c4 7f 04 06 57 e8 73 fd 75 1c e8 92 fd 3c 1a 74 19 f6 c1 01 74 04 3c 0d 74 10 f6 c1 02 74   ┆▄6─   WУs§u Уњ§< t Ш┴ t < t Ш┴ t┆
0x1068e0…106900             07 3c 20 77 03 43 eb e4 b0 00 eb 02 b0 01 5f 07 26 89 5d 08 ca 04 00 8b dc 1e 36 c4 7f 08 36 c5   ┆ < w CвС░ в ░ _ &Ѕ] ╩  І▄ 6─  6┼┆
0x106900…106920             77 04 fc 33 c0 ab b8 b0 d7 ab 33 c0 b9 16 00 f3 ab ac 3c 4f 76 02 b0 4f 8a c8 32 ed f3 a4 32 c0   ┆w Ч3└ФИ░ОФ3└╣  зФг<Ov ░Oі╚2ьзц2└┆
0x106920…106940             aa 1f ca 08 00 a0 e0 09 b4 3d 33 d2 eb 06 b8 00 3c ba 01 00 55 8b ec c4 7e 08 26 81 7d 02 b0 d7   ┆ф ╩  аЯ ┤=3мв И <║  UІВ─~ &Ђ} ░О┆
0x106940…106960             74 1a 26 81 7d 02 b3 d7 74 08 c7 06 da 09 66 00 eb 34 50 52 06 57 0e e8 4c 00 5a 58 26 80 7d 30   ┆t &Ђ} │Оt К ┌ f в4PR W УL ZX&ђ}0┆
0x106960…106980             00 74 12 1e 8d 55 30 06 1f 33 c9 cd 21 1f 73 06 a3 da 09 eb 11 92 26 c7 45 02 b3 d7 26 89 05 8b   ┆ t  ЇU0  3╔═! s Б┌ в њ&КE │О&Ѕ І┆
0x106980…1069a0             46 06 26 89 45 04 5d ca 06 00 8b dc 36 c4 7f 04 e8 38 00 75 0e 33 c9 26 8b 1d b4 40 cd 21 73 03   ┆F &ЅE ]╩  І▄6─  У8 u 3╔&І ┤@═!s ┆
0x1069a0…1069c0             a3 da 09 ca 04 00 8b dc 36 c4 7f 04 e8 1c 00 75 17 26 8b 1d 83 fb 04 76 09 b4 3e cd 21 73 03 a3   ┆Б┌ ╩  І▄6─  У  u &І Ѓч v ┤>═!s Б┆
0x1069c0…1069e0             da 09 26 c7 45 02 b0 d7 ca 04 00 26 81 7d 02 b3 d7 74 06 c7 06 da 09 67 00 c3 b4 3f ba 64 00 eb   ┆┌ &КE ░О╩  &Ђ} │Оt К ┌ g ├┤?║d в┆
0x1069e0…106a00             05 b4 40 ba 65 00 55 8b ec c4 7e 0a e8 dc ff 75 1b 1e 52 c5 56 06 26 8b 4d 04 26 8b 1d cd 21 5a   ┆ ┤@║e UІВ─~ У▄ u  R┼V &ІM &І ═!Z┆
0x106a00…106a20 (70, 0, 2)  1f 72 06 3b c1 74 05 8b c2 a3 da 09 5d ca 04 00 b3 3f b9 64 00 eb 05 b3 40 b9 65 00 55 8b ec c4   ┆ r ;┴t І┬Б┌ ]╩  │?╣d в │@╣e UІВ─┆
0x106a20…106a40             7e 10 e8 a6 ff 75 3f 8b 46 0a 0b c0 74 1c 1e 51 26 f7 65 04 8b c8 c5 56 0c 8a e3 26 8b 1d cd 21   ┆~ Уд u?ІF  └t  Q&эe І╚┼V іс&І ═!┆
0x106a40…106a60             59 1f 72 1f 33 d2 26 f7 75 04 c4 7e 06 8c c2 0b d7 74 05 26 89 05 eb 1c 3b 46 0a 74 17 89 0e da   ┆Y r 3м&эu ─~ ї┬ Оt &Ѕ в ;F t Ѕ ┌┆
0x106a60…106a80             09 eb 11 a3 da 09 c4 7e 06 8c c2 0b d7 74 05 33 c0 26 89 05 5d ca 0e 00 55 8b ec c4 7e 0a e8 4a   ┆ в Б┌ ─~ ї┬ Оt 3└&Ѕ ]╩  UІВ─~ УJ┆
0x106a80…106aa0             ff 75 21 8b 46 08 26 f7 65 04 8b c8 8b 46 06 26 f7 65 04 03 ca 8b d0 26 8b 1d b8 00 42 cd 21 73   ┆ u!ІF &эe І╚ІF &эe  ╩Іл&І И B═!s┆
0x106aa0…106ac0             03 a3 da 09 5d ca 08 00 e8 44 00 72 0f 26 8b 4d 04 83 f9 01 74 06 33 db 0e e8 88 f0 ca 04 00 e8   ┆ Б┌ ]╩  УD r &ІM Ѓщ t 3█ Уѕ ╩  У┆
0x106ac0…106ae0             2d 00 72 13 8b c1 8b d3 26 8b 4d 04 83 f9 01 74 06 33 db 0e e8 6d f0 ca 04 00 e8 12 00 72 0b 2b   ┆- r І┴ІМ&ІM Ѓщ t 3█ Уm ╩  У  r +┆
0x106ae0…106b00             c1 1b d3 72 05 b0 01 ca 04 00 32 c0 ca 04 00 8b dc 36 c4 7f 06 26 81 7d 02 b3 d7 75 2b 33 c9 33   ┆┴ Мr ░ ╩  2└╩  І▄6─  &Ђ} │Оu+3╔3┆
0x106b00…106b20             d2 26 8b 1d b8 01 42 cd 21 52 50 33 c9 33 d2 26 8b 1d b8 02 42 cd 21 5b 59 52 50 8b d3 26 8b 1d   ┆м&І И B═!RP3╔3м&І И B═![YRPІМ&І ┆
0x106b20…106b40             b8 00 42 cd 21 59 5b c3 c7 06 da 09 67 00 33 c0 33 d2 f9 c3 55 8b ec 8b 56 06 0b d2 74 05 e8 49   ┆И B═!Y[├К ┌ g 3└3мщ├UІВІV  мt УI┆
0x106b40…106b60             00 eb 30 b4 30 cd 21 3c 03 b8 00 00 72 25 8e 06 d6 09 26 8e 06 2c 00 33 ff fc 26 3a 05 74 07 b9   ┆ в0┤0═!< И  r%ј о &ј , 3 Ч&: t ╣┆
0x106b60…106b80             ff ff f2 ae eb f4 83 c7 03 8b f7 b9 00 01 f2 ae 91 f6 d0 1e 06 1f c4 7e 08 fc aa 91 f3 a4 1f 5d   ┆  Ы«вЗЃК Іэ╣  Ы«ЉШл   ─~ ЧфЉзц ]┆
0x106b80…106ba0             ca 02 00 33 d2 e8 02 00 93 cb 8e 06 d6 09 bf 80 00 26 8a 0d 32 ed 47 33 db e3 09 26 80 3d 20 77   ┆╩  3мУ  Њ╦ј о ┐ђ &і 2ьG3█с &ђ= w┆
0x106ba0…106bc0             03 47 e2 f7 8b f7 e3 09 26 80 3d 20 76 03 47 e2 f7 8b c7 2b c6 74 04 43 4a 75 de c3 00 00 00 00   ┆ GРэІэс &ђ= v GРэІК+кt CJuя├    ┆
0x106bc0…106be0             04 00 01 49 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆   I                            ┆
0x106be0…106c00             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x106cc0…106ce0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 03 00 01 4f 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                  O             ┆
0x106ce0…106d00             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x106dc0…106de0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00   ┆                                ┆
0x106de0…106e00             06 4e 55 4d 42 45 52 00 00 96 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆ NUMBER  ќ                      ┆
0x106e00…106e20 (70, 0, 4)  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x106ee0…106f00             00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 04 53 4b 49 50 00 00 00 00 00 00 00 00 00 00 00 00   ┆                SKIP            ┆
0x106f00…106f20             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x106fe0…107000             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 05 43   ┆                               C┆
0x107000…107020 (70, 0, 5)  48 41 52 53 00 00 00 00 00 00 00 02 4f 4e 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆HARS        ON                  ┆
0x107020…107040             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x107100…107120             00 00 00 00 00 00 00 00 00 00 00 02 00 06 46 4f 52 4d 41 54 00 00 00 00 00 00 03 48 45 58 00 00   ┆              FORMAT       HEX  ┆
0x107120…107140             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x107200…107220 (70, 0, 6)  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 54 45 53   ┆                             TES┆
0x107220…107240             54 00 00 00 00 00 00 00 00 03 4f 46 46 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆T         OFF                   ┆
0x107240…107260             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x107320…107340             00 00 00 00 00 00 00 00 00 00 80 00 a0 00 01 00 00 00 00 00 fe ff ff ff 30 31 32 33 34 35 36 37   ┆          ђ а       ■   01234567┆
0x107340…107360             38 39 41 42 43 44 45 46 30 31 32 33 34 35 36 37 38 39 41 42 43 44 45 46 0d 45 6e 76 69 72 6f 6e   ┆89ABCDEF0123456789ABCDEF Environ┆
0x107360…107380             6d 65 6e 74 3a 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆ment:                           ┆
0x107380…1073a0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x6…]
0x107460…107480             00 00 00 00 00 00 03 48 4c 50 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆       HLP                      ┆
0x107480…1074a0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x8…]
0x1075a0…1075c0             02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 f7 8b c7 2b c6 74 04 43 4a 75 de c3 00 00 00 00   ┆                эІК+кt CJuя├    ┆
0x1075c0…1075e0             04 00 01 49 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆   I                            ┆
0x1075e0…107600             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x107600…107800 (70, 0, 8)  Cluster(FILEDUMPEXE)
                            […0x2b…]
0x10ce00…10ce20 (71, 1, 7)  54 75 72 62 6f 20 50 61 73 63 61 6c 20 50 69 63 6b 20 4c 69 73 74 20 46 69 6c 65 20 1a 00 01 0d   ┆Turbo Pascal Pick List File     ┆
0x10ce20…10ce40             12 17 01 1a 00 02 01 01 00 e2 02 33 75 41 3a 5c 50 41 53 43 52 4f 53 53 2e 50 41 53 00 00 00 00   ┆         Р 3uA:\PASCROSS.PAS    ┆
0x10ce40…10ce60             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x10ce60…10ce80             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 a8 50 41   ┆                             еPA┆
0x10ce80…10cea0             3a 5c 43 48 52 43 4f 4e 56 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆:\CHRCONV.PAS                   ┆
0x10cea0…10cec0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x10cec0…10cee0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ea 37 41 3a 5c 43 4f 55 4e 54 43 48 2e 50 41 53 00   ┆               Ж7A:\COUNTCH.PAS ┆
0x10cee0…10cf00             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x10cf20…10cf40             00 90 28 41 3a 5c 46 49 4c 45 44 55 4d 50 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆ љ(A:\FILEDUMP.PAS              ┆
0x10cf40…10cf60             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x10cf60…10cf80             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 47 49 41 3a 5c 43 4f 4d 50 41 52 45 2e   ┆                   GIA:\COMPARE.┆
0x10cf80…10cfa0             50 41 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆PAS                             ┆
0x10cfa0…10cfc0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x10cfc0…10cfe0             00 00 00 00 00 4d b3 41 3a 5c 49 4e 44 45 4e 54 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00 00   ┆     M│A:\INDENT.PAS            ┆
0x10cfe0…10d000             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x10d000…10d020 (71, 1, 8)  00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 2c d1 41 3a 5c 43 52 4f 53   ┆                       ,ЛA:\CROS┆
0x10d020…10d040             53 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆S.PAS                           ┆
0x10d040…10d060             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x10d060…10d080             00 00 00 00 00 00 00 00 00 b0 2a 41 3a 5c 50 41 53 43 46 31 2e 50 41 53 00 00 00 00 00 00 00 00   ┆         ░*A:\PASCF1.PAS        ┆
0x10d080…10d0a0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x10d0a0…10d0c0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 82 e5 41 3a 5c   ┆                           ѓтA:\┆
0x10d0c0…10d0e0             50 41 53 43 46 4f 52 4d 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆PASCFORM.PAS                    ┆
0x10d0e0…10d100             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x10d100…10d120             00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 12 00 00 00 08 00 07 00 06 00 05 00 04 00 03 00 02   ┆                                ┆
0x10d120…10d140             00 01 00 03 00 99 00 00 33 75 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 a8 50 00 00 00 00 00   ┆     Ў  3u               еP     ┆
0x10d140…10d160             00 00 00 00 00 00 00 00 00 00 ea 37 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 90 28 00 00 00   ┆          Ж7               љ(   ┆
0x10d160…10d180             00 00 00 00 00 00 00 00 00 00 00 00 47 49 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 4d b3 00   ┆            GI               M│ ┆
0x10d180…10d1a0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 2c d1 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 b0   ┆              ,Л               ░┆
0x10d1a0…10d1c0             2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 82 e5 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆*               ѓт              ┆
0x10d1c0…10d1e0             04 00 36 00 00 00 70 4f 9a 12 00 00 fa 73 9a 12 00 00 06 74 9a 12 00 00 15 74 9a 12 00 00 2a 74   ┆  6   pOџ   Щsџ    tџ    tџ   *t┆
0x10d1e0…10d200             9a 12 00 00 3a 74 9a 12 00 00 4b 74 9a 12 00 00 78 74 9a 12 00 00 6e 74 9a 12 64 00 0c 00 0a 00   ┆џ   :tџ   Ktџ   xtџ   ntџ d     ┆
0x10d200…10d220 (71, 1, 9)  00 00 00 00 00 00 00 00 00 00 65 00 01 00 00 66 00 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆          e    f                ┆
0x10d220…10d240             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 67 00 20 00 00 00 00 00 00 00 00 00 00   ┆                   g            ┆
0x10d240…10d260             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 68 00 50 00 00 00 00 00 00   ┆                       h P      ┆
0x10d260…10d280             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
                            […0x1…]
0x10d2a0…10d2c0             00 00 00 00 00 00 00 00 00 00 00 ff ff 02 00 1a 00 00 00 00 00 00 00 00 00 00 00 82 e5 41 3a 5c   ┆                           ѓтA:\┆
0x10d2c0…10d2e0             50 41 53 43 46 4f 52 4d 2e 50 41 53 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆PASCFORM.PAS                    ┆
0x10d2e0…10d300             00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆                                ┆
0x10d300…10d320             00 00 00 00 00 00 00 00 00 00 00 00 00 02 00 12 00 00 00 08 00 07 00 06 00 05 00 04 00 03 00 02   ┆                                ┆
0x10d320…10d340             00 01 00 03 00 99 00 00 33 75 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 a8 50 00 00 00 00 00   ┆     Ў  3u               еP     ┆
0x10d340…10d360             00 00 00 00 00 00 00 00 00 00 ea 37 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 90 28 00 00 00   ┆          Ж7               љ(   ┆
0x10d360…10d380             00 00 00 00 00 00 00 00 00 00 00 00 47 49 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 4d b3 00   ┆            GI               M│ ┆
0x10d380…10d3a0             00 00 00 00 00 00 00 00 00 00 00 00 00 00 2c d1 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 b0   ┆              ,Л               ░┆
0x10d3a0…10d3c0             2a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 82 e5 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆*               ѓт              ┆
0x10d3c0…10d3e0             04 00 36 00 00 00 70 4f 9a 12 00 00 fa 73 9a 12 00 00 06 74 9a 12 00 00 15 74 9a 12 00 00 2a 74   ┆  6   pOџ   Щsџ    tџ    tџ   *t┆
0x10d3e0…10d400             9a 12 00 00 3a 74 9a 12 00 00 4b 74 9a 12 00 00 78 74 9a 12 00 00 6e 74 9a 12 64 00 0c 00 0a 00   ┆џ   :tџ   Ktџ   xtџ   ntџ d     ┆
0x10d400…10d600 (71, 1, 10) 0xf6[0x200]
                            […0xf5…]