/ APDL Public Domain 1 / APDL_PD1A.iso / program / boota / !Compare / Source

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0e f4 20 3e 20 | 53 6f 75 72 63 65 0d 00 |..... > |Source..|
|00000010| 14 05 3a 0d 00 1e 45 f4 | 20 53 6f 75 72 63 65 20 |..:...E.| Source |
|00000020| 43 6f 64 65 20 66 6f 72 | 20 21 43 6f 6d 70 61 72 |Code for| !Compar|
|00000030| 65 20 75 74 69 6c 69 74 | 79 20 61 70 70 6c 69 63 |e utilit|y applic|
|00000040| 61 74 69 6f 6e 20 28 63 | 6f 6d 70 69 6c 65 64 20 |ation (c|ompiled |
|00000050| 76 65 72 73 69 6f 6e 29 | 0d 00 28 23 f4 20 50 61 |version)|..(#. Pa|
|00000060| 75 6c 20 57 69 74 68 65 | 72 69 64 67 65 20 2d 20 |ul Withe|ridge - |
|00000070| 31 35 20 44 65 63 20 31 | 39 39 31 0d 00 32 05 3a |15 Dec 1|991..2.:|
|00000080| 0d 00 3c 25 62 75 66 6c | 65 6e 25 20 3d 20 28 93 |..<%bufl|en% = (.|
|00000090| 2d e0 2d 26 31 30 30 30 | 29 20 80 20 26 46 46 46 |-.-&1000|) . &FFF|
|000000a0| 46 46 46 46 38 0d 00 46 | 42 e7 20 62 75 66 6c 65 |FFFF8..F|B. bufle|
|000000b0| 6e 25 20 3c 20 26 32 30 | 30 30 20 f2 65 72 72 6f |n% < &20|00 .erro|
|000000c0| 72 28 22 4e 6f 74 20 65 | 6e 6f 75 67 68 20 6d 65 |r("Not e|nough me|
|000000d0| 6d 6f 72 79 20 66 6f 72 | 20 72 65 61 64 20 62 75 |mory for| read bu|
|000000e0| 66 66 65 72 73 22 29 0d | 00 50 05 3a 0d 00 5a 15 |ffers").|.P.:..Z.|
|000000f0| de 20 62 75 66 66 65 72 | 25 20 62 75 66 6c 65 6e |. buffer|% buflen|
|00000100| 25 0d 00 64 05 3a 0d 00 | 6e 26 46 69 6c 65 31 24 |%..d.:..|n&File1$|
|00000110| 20 3d 20 a4 72 65 61 64 | 76 61 72 28 22 43 6f 6d | = .read|var("Com|
|00000120| 70 61 72 65 24 46 69 6c | 65 31 22 29 0d 00 78 26 |pare$Fil|e1")..x&|
|00000130| 46 69 6c 65 32 24 20 3d | 20 a4 72 65 61 64 76 61 |File2$ =| .readva|
|00000140| 72 28 22 43 6f 6d 70 61 | 72 65 24 46 69 6c 65 32 |r("Compa|re$File2|
|00000150| 22 29 0d 00 82 05 3a 0d | 00 8c 14 46 69 6c 65 31 |")....:.|...File1|
|00000160| 68 61 6e 64 6c 65 25 20 | 3d 20 30 0d 00 96 14 46 |handle% |= 0....F|
|00000170| 69 6c 65 32 68 61 6e 64 | 6c 65 25 20 3d 20 30 0d |ile2hand|le% = 0.|
|00000180| 00 a0 05 3a 0d 00 aa 18 | ee 20 85 20 3a 20 ee 20 |...:....|. . : . |
|00000190| 85 20 87 20 3a 20 f2 61 | 62 65 6e 64 0d 00 b4 05 |. . : .a|bend....|
|000001a0| 3a 0d 00 be 1d f1 20 22 | 43 6f 6d 70 61 72 69 6e |:..... "|Comparin|
|000001b0| 67 20 2d 2d 3e 20 22 20 | 46 69 6c 65 31 24 0d 00 |g --> " |File1$..|
|000001c0| c8 1d f1 20 22 20 20 20 | 20 20 20 20 20 20 20 2d |... "   |       -|
|000001d0| 2d 3e 20 22 20 46 69 6c | 65 32 24 0d 00 d2 05 f1 |-> " Fil|e2$.....|
|000001e0| 0d 00 dc 05 3a 0d 00 e6 | 3f c8 99 20 22 4f 53 5f |....:...|?.. "OS_|
|000001f0| 46 69 6c 65 22 2c 31 37 | 2c 46 69 6c 65 31 24 20 |File",17|,File1$ |
|00000200| b8 20 74 79 70 65 31 25 | 2c 2c 6c 6f 61 64 31 25 |. type1%|,,load1%|
|00000210| 2c 65 78 65 63 31 25 2c | 6c 65 6e 31 25 2c 61 74 |,exec1%,|len1%,at|
|00000220| 74 72 31 25 0d 00 f0 3f | c8 99 20 22 4f 53 5f 46 |tr1%...?|.. "OS_F|
|00000230| 69 6c 65 22 2c 31 37 2c | 46 69 6c 65 32 24 20 b8 |ile",17,|File2$ .|
|00000240| 20 74 79 70 65 32 25 2c | 2c 6c 6f 61 64 32 25 2c | type2%,|,load2%,|
|00000250| 65 78 65 63 32 25 2c 6c | 65 6e 32 25 2c 61 74 74 |exec2%,l|en2%,att|
|00000260| 72 32 25 0d 00 fa 05 3a | 0d 01 04 2f e7 20 74 79 |r2%....:|.../. ty|
|00000270| 70 65 31 25 20 3d 20 30 | 20 20 f2 65 72 72 6f 72 |pe1% = 0|  .error|
|00000280| 28 46 69 6c 65 31 24 2b | 22 20 2d 20 6e 6f 74 20 |(File1$+|" - not |
|00000290| 66 6f 75 6e 64 22 29 0d | 01 0e 2f e7 20 74 79 70 |found").|../. typ|
|000002a0| 65 32 25 20 3d 20 30 20 | 20 f2 65 72 72 6f 72 28 |e2% = 0 | .error(|
|000002b0| 46 69 6c 65 32 24 2b 22 | 20 2d 20 6e 6f 74 20 66 |File2$+"| - not f|
|000002c0| 6f 75 6e 64 22 29 0d 01 | 18 32 e7 20 74 79 70 65 |ound")..|.2. type|
|000002d0| 31 25 20 3c 3e 20 31 20 | f2 65 72 72 6f 72 28 46 |1% <> 1 |.error(F|
|000002e0| 69 6c 65 31 24 2b 22 20 | 2d 20 69 73 20 64 69 72 |ile1$+" |- is dir|
|000002f0| 65 63 74 6f 72 79 22 29 | 0d 01 22 32 e7 20 74 79 |ectory")|.."2. ty|
|00000300| 70 65 32 25 20 3c 3e 20 | 31 20 f2 65 72 72 6f 72 |pe2% <> |1 .error|
|00000310| 28 46 69 6c 65 32 24 2b | 22 20 2d 20 69 73 20 64 |(File2$+|" - is d|
|00000320| 69 72 65 63 74 6f 72 79 | 22 29 0d 01 2c 35 e7 20 |irectory|")..,5. |
|00000330| 61 74 74 72 31 25 20 80 | 20 31 20 8b 20 f2 65 72 |attr1% .| 1 . .er|
|00000340| 72 6f 72 28 46 69 6c 65 | 31 24 2b 22 20 2d 20 6e |ror(File|1$+" - n|
|00000350| 6f 20 72 65 61 64 20 61 | 63 63 65 73 73 22 29 0d |o read a|ccess").|
|00000360| 01 36 35 e7 20 61 74 74 | 72 32 25 20 80 20 31 20 |.65. att|r2% . 1 |
|00000370| 8b 20 f2 65 72 72 6f 72 | 28 46 69 6c 65 32 24 2b |. .error|(File2$+|
|00000380| 22 20 2d 20 6e 6f 20 72 | 65 61 64 20 61 63 63 65 |" - no r|ead acce|
|00000390| 73 73 22 29 0d 01 40 05 | 3a 0d 01 4a 33 63 61 74 |ss")..@.|:..J3cat|
|000003a0| 61 6c 6f 67 63 6f 6d 70 | 61 72 69 73 6f 6e 24 20 |alogcomp|arison$ |
|000003b0| 3d 20 a4 63 6f 6d 70 61 | 72 65 63 61 74 61 6c 6f |= .compa|recatalo|
|000003c0| 67 69 6e 66 6f 72 6d 61 | 74 69 6f 6e 0d 01 54 05 |ginforma|tion..T.|
|000003d0| 3a 0d 01 5e 16 e7 20 6c | 65 6e 31 25 20 3c 3e 20 |:..^.. l|en1% <> |
|000003e0| 6c 65 6e 32 25 20 8c 0d | 01 68 3a 20 20 20 f1 20 |len2% ..|.h:   . |
|000003f0| 22 46 69 6c 65 20 6c 65 | 6e 67 74 68 73 20 61 72 |"File le|ngths ar|
|00000400| 65 20 64 69 66 66 65 72 | 65 6e 74 22 20 27 20 63 |e differ|ent" ' c|
|00000410| 61 74 61 6c 6f 67 63 6f | 6d 70 61 72 69 73 6f 6e |atalogco|mparison|
|00000420| 24 0d 01 72 05 cc 0d 01 | 7c 1b 20 20 20 e7 20 a4 |$..r....||.   . .|
|00000430| 63 6f 6d 70 61 72 65 63 | 6f 6e 74 65 6e 74 73 20 |comparec|ontents |
|00000440| 8c 0d 01 86 74 20 20 20 | 20 20 20 e7 20 63 61 74 |....t   |   . cat|
|00000450| 61 6c 6f 67 63 6f 6d 70 | 61 72 69 73 6f 6e 24 20 |alogcomp|arison$ |
|00000460| 3d 20 22 22 20 8c 20 f1 | 20 22 46 69 6c 65 73 20 |= "" . .| "Files |
|00000470| 61 72 65 20 69 64 65 6e | 74 69 63 61 6c 22 20 8b |are iden|tical" .|
|00000480| 20 f1 20 22 46 69 6c 65 | 20 63 6f 6e 74 65 6e 74 | . "File| content|
|00000490| 73 20 61 72 65 20 69 64 | 65 6e 74 69 63 61 6c 22 |s are id|entical"|
|000004a0| 20 27 20 63 61 74 61 6c | 6f 67 63 6f 6d 70 61 72 | ' catal|ogcompar|
|000004b0| 69 73 6f 6e 24 0d 01 90 | 08 20 20 20 cc 0d 01 9a |ison$...|.   ....|
|000004c0| 3e 20 20 20 20 20 20 f1 | 20 22 46 69 6c 65 20 63 |>      .| "File c|
|000004d0| 6f 6e 74 65 6e 74 73 20 | 61 72 65 20 64 69 66 66 |ontents |are diff|
|000004e0| 65 72 65 6e 74 22 20 27 | 20 63 61 74 61 6c 6f 67 |erent" '| catalog|
|000004f0| 63 6f 6d 70 61 72 69 73 | 6f 6e 24 0d 01 a4 08 20 |comparis|on$.... |
|00000500| 20 20 cd 0d 01 ae 05 cd | 0d 01 b8 05 3a 0d 01 c2 |  ......|....:...|
|00000510| 0d f2 63 6f 6e 74 69 6e | 75 65 0d 01 cc 05 3a 0d |..contin|ue....:.|
|00000520| 01 d6 05 e0 0d 01 e0 05 | 3a 0d 01 ea 2e f4 20 2d |........|:..... -|
|00000530| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000540| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000550| 2d 2d 2d 2d 2d 2d 2d 0d | 01 f4 05 3a 0d 01 fe 15 |-------.|...:....|
|00000560| dd a4 63 6f 6d 70 61 72 | 65 63 6f 6e 74 65 6e 74 |..compar|econtent|
|00000570| 73 0d 02 08 05 3a 0d 02 | 12 45 ea 20 72 65 61 64 |s....:..|.E. read|
|00000580| 6c 65 6e 25 2c 62 75 66 | 66 65 72 31 25 2c 62 75 |len%,buf|fer1%,bu|
|00000590| 66 66 65 72 32 25 2c 6e | 6f 74 72 65 61 64 31 25 |ffer2%,n|otread1%|
|000005a0| 2c 6e 6f 74 72 65 61 64 | 32 25 2c 6c 65 6e 72 65 |,notread|2%,lenre|
|000005b0| 61 64 25 2c 6f 66 66 73 | 65 74 25 0d 02 1c 05 3a |ad%,offs|et%....:|
|000005c0| 0d 02 26 15 e7 20 6c 65 | 6e 31 25 20 3d 20 30 20 |..&.. le|n1% = 0 |
|000005d0| 8c 20 3d 20 b9 0d 02 30 | 05 3a 0d 02 3a 1c 46 69 |. = ...0|.:..:.Fi|
|000005e0| 6c 65 31 68 61 6e 64 6c | 65 25 20 3d 20 8e 28 46 |le1handl|e% = .(F|
|000005f0| 69 6c 65 31 24 29 0d 02 | 44 1c 46 69 6c 65 32 68 |ile1$)..|D.File2h|
|00000600| 61 6e 64 6c 65 25 20 3d | 20 8e 28 46 69 6c 65 32 |andle% =| .(File2|
|00000610| 24 29 0d 02 4e 05 3a 0d | 02 58 42 e7 20 46 69 6c |$)..N.:.|.XB. Fil|
|00000620| 65 31 68 61 6e 64 6c 65 | 25 20 3d 20 30 20 84 20 |e1handle|% = 0 . |
|00000630| 46 69 6c 65 32 68 61 6e | 64 6c 65 25 20 3d 20 30 |File2han|dle% = 0|
|00000640| 20 85 20 39 39 2c 22 43 | 61 6e 6e 6f 74 20 6f 70 | . 99,"C|annot op|
|00000650| 65 6e 20 66 69 6c 65 73 | 22 0d 02 62 05 3a 0d 02 |en files|"..b.:..|
|00000660| 6c 1b 72 65 61 64 6c 65 | 6e 25 20 3d 20 62 75 66 |l.readle|n% = buf|
|00000670| 6c 65 6e 25 20 3e 3e 20 | 31 0d 02 76 16 62 75 66 |len% >> |1..v.buf|
|00000680| 66 65 72 31 25 20 3d 20 | 62 75 66 66 65 72 25 0d |fer1% = |buffer%.|
|00000690| 02 80 21 62 75 66 66 65 | 72 32 25 20 3d 20 62 75 |..!buffe|r2% = bu|
|000006a0| 66 66 65 72 25 20 2b 20 | 72 65 61 64 6c 65 6e 25 |ffer% + |readlen%|
|000006b0| 0d 02 8a 05 3a 0d 02 94 | 05 f5 0d 02 9e 43 20 20 |....:...|.....C  |
|000006c0| 20 c8 99 20 22 4f 53 5f | 47 42 50 42 22 2c 34 2c | .. "OS_|GBPB",4,|
|000006d0| 46 69 6c 65 31 68 61 6e | 64 6c 65 25 2c 62 75 66 |File1han|dle%,buf|
|000006e0| 66 65 72 31 25 2c 72 65 | 61 64 6c 65 6e 25 20 b8 |fer1%,re|adlen% .|
|000006f0| 20 2c 2c 2c 6e 6f 74 72 | 65 61 64 31 25 0d 02 a8 | ,,,notr|ead1%...|
|00000700| 43 20 20 20 c8 99 20 22 | 4f 53 5f 47 42 50 42 22 |C   .. "|OS_GBPB"|
|00000710| 2c 34 2c 46 69 6c 65 32 | 68 61 6e 64 6c 65 25 2c |,4,File2|handle%,|
|00000720| 62 75 66 66 65 72 32 25 | 2c 72 65 61 64 6c 65 6e |buffer2%|,readlen|
|00000730| 25 20 b8 20 2c 2c 2c 6e | 6f 74 72 65 61 64 32 25 |% . ,,,n|otread2%|
|00000740| 0d 02 b2 38 20 20 20 e7 | 20 6e 6f 74 72 65 61 64 |...8   .| notread|
|00000750| 31 25 20 3c 3e 20 6e 6f | 74 72 65 61 64 32 25 20 |1% <> no|tread2% |
|00000760| 85 20 39 39 2c 22 52 65 | 61 64 20 6c 65 6e 67 74 |. 99,"Re|ad lengt|
|00000770| 68 20 65 72 72 6f 72 22 | 0d 02 bc 26 20 20 20 6c |h error"|...&   l|
|00000780| 65 6e 72 65 61 64 25 20 | 3d 20 72 65 61 64 6c 65 |enread% |= readle|
|00000790| 6e 25 20 2d 20 6e 6f 74 | 72 65 61 64 31 25 0d 02 |n% - not|read1%..|
|000007a0| c6 18 20 20 20 6c 65 6e | 31 25 20 2d 3d 20 6c 65 |..   len|1% -= le|
|000007b0| 6e 72 65 61 64 25 0d 02 | d0 43 20 20 20 e7 20 6c |nread%..|.C   . l|
|000007c0| 65 6e 31 25 20 3e 20 30 | 20 80 20 6e 6f 74 72 65 |en1% > 0| . notre|
|000007d0| 61 64 31 25 20 3e 20 30 | 20 85 20 39 39 2c 22 55 |ad1% > 0| . 99,"U|
|000007e0| 6e 65 78 70 65 63 74 65 | 64 20 65 6e 64 20 74 6f |nexpecte|d end to|
|000007f0| 20 72 65 61 64 69 6e 67 | 22 0d 02 da 12 20 20 20 | reading|"....   |
|00000800| 6f 66 66 73 65 74 25 20 | 3d 20 30 0d 02 e4 16 20 |offset% |= 0.... |
|00000810| 20 20 c8 95 20 6c 65 6e | 72 65 61 64 25 20 3e 20 |  .. len|read% > |
|00000820| 33 0d 02 ee 4d 20 20 20 | 20 20 20 20 e7 20 62 75 |3...M   |    . bu|
|00000830| 66 66 65 72 31 25 21 6f | 66 66 73 65 74 25 20 3c |ffer1%!o|ffset% <|
|00000840| 3e 20 62 75 66 66 65 72 | 32 25 21 6f 66 66 73 65 |> buffer|2%!offse|
|00000850| 74 25 20 8c 20 6c 65 6e | 31 25 20 3d 20 2d 31 20 |t% . len|1% = -1 |
|00000860| 3a 20 6c 65 6e 72 65 61 | 64 25 20 3d 20 30 0d 02 |: lenrea|d% = 0..|
|00000870| f8 18 20 20 20 20 20 20 | 20 6c 65 6e 72 65 61 64 |..      | lenread|
|00000880| 25 20 2d 3d 20 34 0d 03 | 02 18 20 20 20 20 20 20 |% -= 4..|..      |
|00000890| 20 6f 66 66 73 65 74 25 | 20 20 2b 3d 20 34 0d 03 | offset%|  += 4..|
|000008a0| 0c 08 20 20 20 ce 0d 03 | 16 16 20 20 20 c8 95 20 |..   ...|..   .. |
|000008b0| 6c 65 6e 72 65 61 64 25 | 20 3e 20 30 0d 03 20 4d |lenread%| > 0.. M|
|000008c0| 20 20 20 20 20 20 20 e7 | 20 62 75 66 66 65 72 31 |       .| buffer1|
|000008d0| 25 3f 6f 66 66 73 65 74 | 25 20 3c 3e 20 62 75 66 |%?offset|% <> buf|
|000008e0| 66 65 72 32 25 3f 6f 66 | 66 73 65 74 25 20 8c 20 |fer2%?of|fset% . |
|000008f0| 6c 65 6e 31 25 20 3d 20 | 2d 31 20 3a 20 6c 65 6e |len1% = |-1 : len|
|00000900| 72 65 61 64 25 20 3d 20 | 30 0d 03 2a 18 20 20 20 |read% = |0..*.   |
|00000910| 20 20 20 20 6c 65 6e 72 | 65 61 64 25 20 2d 3d 20 |    lenr|ead% -= |
|00000920| 31 0d 03 34 18 20 20 20 | 20 20 20 20 6f 66 66 73 |1..4.   |    offs|
|00000930| 65 74 25 20 20 2b 3d 20 | 31 0d 03 3e 08 20 20 20 |et%  += |1..>.   |
|00000940| ce 0d 03 48 10 fd 20 6c | 65 6e 31 25 20 3c 3d 20 |...H.. l|en1% <= |
|00000950| 30 0d 03 52 05 3a 0d 03 | 5c 23 d9 23 46 69 6c 65 |0..R.:..|\#.#File|
|00000960| 31 68 61 6e 64 6c 65 25 | 20 3a 20 46 69 6c 65 31 |1handle%| : File1|
|00000970| 68 61 6e 64 6c 65 25 3d | 30 0d 03 66 23 d9 23 46 |handle%=|0..f#.#F|
|00000980| 69 6c 65 32 68 61 6e 64 | 6c 65 25 20 3a 20 46 69 |ile2hand|le% : Fi|
|00000990| 6c 65 32 68 61 6e 64 6c | 65 25 3d 30 0d 03 70 05 |le2handl|e%=0..p.|
|000009a0| 3a 0d 03 7a 0d 3d 20 6c | 65 6e 31 25 3d 30 0d 03 |:..z.= l|en1%=0..|
|000009b0| 84 05 3a 0d 03 8e 2e f4 | 20 2d 2d 2d 2d 2d 2d 2d |..:.....| -------|
|000009c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000009d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000009e0| 2d 0d 03 98 05 3a 0d 03 | a2 1f dd a4 63 6f 6d 70 |-....:..|....comp|
|000009f0| 61 72 65 63 61 74 61 6c | 6f 67 69 6e 66 6f 72 6d |arecatal|oginform|
|00000a00| 61 74 69 6f 6e 0d 03 ac | 05 3a 0d 03 b6 21 ea 20 |ation...|.:...!. |
|00000a10| 74 69 6d 65 73 74 61 6d | 70 65 64 31 25 2c 74 69 |timestam|ped1%,ti|
|00000a20| 6d 65 73 74 61 6d 70 65 | 64 32 25 0d 03 c0 05 3a |mestampe|d2%....:|
|00000a30| 0d 03 ca 2a 74 69 6d 65 | 73 74 61 6d 70 65 64 31 |...*time|stamped1|
|00000a40| 25 20 3d 20 28 6c 6f 61 | 64 31 25 20 3e 3e 3e 20 |% = (loa|d1% >>> |
|00000a50| 32 30 29 20 3d 20 26 46 | 46 46 0d 03 d4 2a 74 69 |20) = &F|FF...*ti|
|00000a60| 6d 65 73 74 61 6d 70 65 | 64 32 25 20 3d 20 28 6c |mestampe|d2% = (l|
|00000a70| 6f 61 64 32 25 20 3e 3e | 3e 20 32 30 29 20 3d 20 |oad2% >>|> 20) = |
|00000a80| 26 46 46 46 0d 03 de 05 | 3a 0d 03 e8 25 e7 20 74 |&FFF....|:...%. t|
|00000a90| 69 6d 65 73 74 61 6d 70 | 65 64 31 25 20 3d 20 74 |imestamp|ed1% = t|
|00000aa0| 69 6d 65 73 74 61 6d 70 | 65 64 32 25 20 8c 0d 03 |imestamp|ed2% ...|
|00000ab0| f2 40 20 20 20 e7 20 74 | 69 6d 65 73 74 61 6d 70 |.@   . t|imestamp|
|00000ac0| 65 64 31 25 20 8c 20 3d | a4 63 6f 6d 70 61 72 65 |ed1% . =|.compare|
|00000ad0| 74 69 6d 65 73 74 61 6d | 70 73 20 8b 20 3d a4 63 |timestam|ps . =.c|
|00000ae0| 6f 6d 70 61 72 65 6c 6f | 61 64 65 78 65 63 0d 03 |omparelo|adexec..|
|00000af0| fc 05 cd 0d 04 06 05 3a | 0d 04 10 1f 3d 20 22 4f |.......:|....= "O|
|00000b00| 6e 6c 79 20 6f 6e 65 20 | 69 73 20 74 69 6d 65 73 |nly one |is times|
|00000b10| 74 61 6d 70 65 64 22 0d | 04 1a 05 3a 0d 04 24 2e |tamped".|...:..$.|
|00000b20| f4 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |. ------|--------|
|00000b30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000b40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 04 2e 05 3a 0d |--------|--....:.|
|00000b50| 04 38 17 dd a4 63 6f 6d | 70 61 72 65 74 69 6d 65 |.8...com|paretime|
|00000b60| 73 74 61 6d 70 73 0d 04 | 42 05 3a 0d 04 4c 42 ea |stamps..|B.:..LB.|
|00000b70| 20 74 79 70 65 6d 73 67 | 24 2c 74 69 6d 65 73 74 | typemsg|$,timest|
|00000b80| 61 6d 70 31 41 25 2c 74 | 69 6d 65 73 74 61 6d 70 |amp1A%,t|imestamp|
|00000b90| 32 41 25 2c 74 69 6d 65 | 73 74 61 6d 70 31 42 25 |2A%,time|stamp1B%|
|00000ba0| 2c 74 69 6d 65 73 74 61 | 6d 70 32 42 25 0d 04 56 |,timesta|mp2B%..V|
|00000bb0| 05 3a 0d 04 60 11 74 79 | 70 65 6d 73 67 24 20 3d |.:..`.ty|pemsg$ =|
|00000bc0| 20 22 22 0d 04 6a 05 3a | 0d 04 74 4e e7 20 28 6c | ""..j.:|..tN. (l|
|00000bd0| 6f 61 64 31 25 20 82 20 | 6c 6f 61 64 32 25 29 20 |oad1% . |load2%) |
|00000be0| 80 20 26 46 46 46 30 30 | 20 74 79 70 65 6d 73 67 |. &FFF00| typemsg|
|00000bf0| 24 20 3d 20 22 46 69 6c | 65 20 74 79 70 65 73 20 |$ = "Fil|e types |
|00000c00| 61 72 65 20 64 69 66 66 | 65 72 65 6e 74 22 2b bd |are diff|erent"+.|
|00000c10| 31 33 2b bd 31 30 0d 04 | 7e 05 3a 0d 04 88 3a 74 |13+.10..|~.:...:t|
|00000c20| 69 6d 65 73 74 61 6d 70 | 31 41 25 20 3d 20 28 28 |imestamp|1A% = ((|
|00000c30| 6c 6f 61 64 31 25 20 80 | 20 26 46 46 29 20 3c 3c |load1% .| &FF) <<|
|00000c40| 20 38 29 20 84 20 28 65 | 78 65 63 31 25 20 3e 3e | 8) . (e|xec1% >>|
|00000c50| 3e 20 32 34 29 0d 04 92 | 3a 74 69 6d 65 73 74 61 |> 24)...|:timesta|
|00000c60| 6d 70 32 41 25 20 3d 20 | 28 28 6c 6f 61 64 32 25 |mp2A% = |((load2%|
|00000c70| 20 80 20 26 46 46 29 20 | 3c 3c 20 38 29 20 84 20 | . &FF) |<< 8) . |
|00000c80| 28 65 78 65 63 32 25 20 | 3e 3e 3e 20 32 34 29 0d |(exec2% |>>> 24).|
|00000c90| 04 9c 23 74 69 6d 65 73 | 74 61 6d 70 31 42 25 20 |..#times|tamp1B% |
|00000ca0| 3d 20 65 78 65 63 31 25 | 20 80 20 26 46 46 46 46 |= exec1%| . &FFFF|
|00000cb0| 46 46 0d 04 a6 23 74 69 | 6d 65 73 74 61 6d 70 32 |FF...#ti|mestamp2|
|00000cc0| 42 25 20 3d 20 65 78 65 | 63 32 25 20 80 20 26 46 |B% = exe|c2% . &F|
|00000cd0| 46 46 46 46 46 0d 04 b0 | 05 3a 0d 04 ba 0a c8 8e |FFFFF...|.:......|
|00000ce0| 20 b9 20 ca 0d 04 c4 37 | 20 20 20 c9 20 74 69 6d | . ....7|   . tim|
|00000cf0| 65 73 74 61 6d 70 31 41 | 25 20 3e 20 74 69 6d 65 |estamp1A|% > time|
|00000d00| 73 74 61 6d 70 32 41 25 | 20 3a 20 3d a4 68 69 67 |stamp2A%| : =.hig|
|00000d10| 68 28 74 79 70 65 6d 73 | 67 24 29 0d 04 ce 36 20 |h(typems|g$)...6 |
|00000d20| 20 20 c9 20 74 69 6d 65 | 73 74 61 6d 70 31 41 25 |  . time|stamp1A%|
|00000d30| 20 3c 20 74 69 6d 65 73 | 74 61 6d 70 32 41 25 20 | < times|tamp2A% |
|00000d40| 3a 20 3d a4 6c 6f 77 28 | 74 79 70 65 6d 73 67 24 |: =.low(|typemsg$|
|00000d50| 29 0d 04 d8 08 20 20 20 | 7f 0d 04 e2 10 20 20 20 |)....   |.....   |
|00000d60| 20 20 20 c8 8e 20 b9 20 | ca 0d 04 ec 3d 20 20 20 |   .. . |....=   |
|00000d70| 20 20 20 20 20 20 c9 20 | 74 69 6d 65 73 74 61 6d |      . |timestam|
|00000d80| 70 31 42 25 20 3e 20 74 | 69 6d 65 73 74 61 6d 70 |p1B% > t|imestamp|
|00000d90| 32 42 25 20 3a 20 3d a4 | 68 69 67 68 28 74 79 70 |2B% : =.|high(typ|
|00000da0| 65 6d 73 67 24 29 0d 04 | f6 3c 20 20 20 20 20 20 |emsg$)..|.<      |
|00000db0| 20 20 20 c9 20 74 69 6d | 65 73 74 61 6d 70 31 42 |   . tim|estamp1B|
|00000dc0| 25 20 3c 20 74 69 6d 65 | 73 74 61 6d 70 32 42 25 |% < time|stamp2B%|
|00000dd0| 20 3a 20 3d a4 6c 6f 77 | 28 74 79 70 65 6d 73 67 | : =.low|(typemsg|
|00000de0| 24 29 0d 05 00 0b 20 20 | 20 20 20 20 cb 0d 05 0a |$)....  |    ....|
|00000df0| 05 cb 0d 05 14 05 3a 0d | 05 1e 07 3d 22 22 0d 05 |......:.|...=""..|
|00000e00| 28 05 3a 0d 05 32 2e f4 | 20 2d 2d 2d 2d 2d 2d 2d |(.:..2..| -------|
|00000e10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000e30| 2d 0d 05 3c 05 3a 0d 05 | 46 3d dd a4 68 69 67 68 |-..<.:..|F=..high|
|00000e40| 28 74 79 70 65 6d 73 67 | 24 29 20 3d 20 74 79 70 |(typemsg|$) = typ|
|00000e50| 65 6d 73 67 24 2b 46 69 | 6c 65 31 24 2b 22 20 68 |emsg$+Fi|le1$+" h|
|00000e60| 61 73 20 6c 61 74 65 72 | 20 74 69 6d 65 73 74 61 |as later| timesta|
|00000e70| 6d 70 22 0d 05 50 3d dd | a4 6c 6f 77 28 74 79 70 |mp"..P=.|.low(typ|
|00000e80| 65 6d 73 67 24 29 20 20 | 3d 20 74 79 70 65 6d 73 |emsg$)  |= typems|
|00000e90| 67 24 2b 46 69 6c 65 32 | 24 2b 22 20 68 61 73 20 |g$+File2|$+" has |
|00000ea0| 6c 61 74 65 72 20 74 69 | 6d 65 73 74 61 6d 70 22 |later ti|mestamp"|
|00000eb0| 0d 05 5a 05 3a 0d 05 64 | 2e f4 20 2d 2d 2d 2d 2d |..Z.:..d|.. -----|
|00000ec0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ed0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ee0| 2d 2d 2d 0d 05 6e 05 3a | 0d 05 78 15 dd a4 63 6f |---..n.:|..x...co|
|00000ef0| 6d 70 61 72 65 6c 6f 61 | 64 65 78 65 63 0d 05 82 |mpareloa|dexec...|
|00000f00| 05 3a 0d 05 8c 12 ea 20 | 6c 6f 61 64 65 78 65 63 |.:..... |loadexec|
|00000f10| 6d 73 67 24 0d 05 96 05 | 3a 0d 05 a0 15 6c 6f 61 |msg$....|:....loa|
|00000f20| 64 65 78 65 63 6d 73 67 | 24 20 3d 20 22 22 0d 05 |dexecmsg|$ = ""..|
|00000f30| aa 05 3a 0d 05 b4 42 e7 | 20 6c 6f 61 64 31 25 20 |..:...B.| load1% |
|00000f40| 3c 3e 20 6c 6f 61 64 32 | 25 20 6c 6f 61 64 65 78 |<> load2|% loadex|
|00000f50| 65 63 6d 73 67 24 20 3d | 20 22 4c 4f 41 44 20 61 |ecmsg$ =| "LOAD a|
|00000f60| 64 64 72 65 73 73 65 73 | 20 61 72 65 20 75 6e 65 |ddresses| are une|
|00000f70| 71 75 61 6c 22 0d 05 be | 05 3a 0d 05 c8 18 e7 20 |qual"...|.:..... |
|00000f80| 65 78 65 63 31 25 20 3c | 3e 20 65 78 65 63 32 25 |exec1% <|> exec2%|
|00000f90| 20 8c 0d 05 d2 33 20 20 | 20 e7 20 6c 6f 61 64 65 | ....3  | . loade|
|00000fa0| 78 65 63 6d 73 67 24 20 | 3c 3e 20 22 22 20 6c 6f |xecmsg$ |<> "" lo|
|00000fb0| 61 64 65 78 65 63 6d 73 | 67 24 20 2b 3d 20 bd 31 |adexecms|g$ += .1|
|00000fc0| 33 2b bd 31 30 0d 05 dc | 33 20 20 20 6c 6f 61 64 |3+.10...|3   load|
|00000fd0| 65 78 65 63 6d 73 67 24 | 20 2b 3d 20 22 45 58 45 |execmsg$| += "EXE|
|00000fe0| 43 20 61 64 64 72 65 73 | 73 65 73 20 61 72 65 20 |C addres|ses are |
|00000ff0| 75 6e 65 71 75 61 6c 22 | 0d 05 e6 05 cd 0d 05 f0 |unequal"|........|
|00001000| 05 3a 0d 05 fa 11 3d 6c | 6f 61 64 65 78 65 63 6d |.:....=l|oadexecm|
|00001010| 73 67 24 0d 06 04 05 3a | 0d 06 0e 2e f4 20 2d 2d |sg$....:|..... --|
|00001020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001040| 2d 2d 2d 2d 2d 2d 0d 06 | 18 05 3a 0d 06 22 17 dd |------..|..:.."..|
|00001050| a4 72 65 61 64 76 61 72 | 28 76 61 72 6e 61 6d 65 |.readvar|(varname|
|00001060| 24 29 0d 06 2c 05 3a 0d | 06 36 0a ea 20 6c 65 6e |$)..,.:.|.6.. len|
|00001070| 25 0d 06 40 05 3a 0d 06 | 4a 38 c8 99 20 22 4f 53 |%..@.:..|J8.. "OS|
|00001080| 5f 52 65 61 64 56 61 72 | 56 61 6c 22 2c 76 61 72 |_ReadVar|Val",var|
|00001090| 6e 61 6d 65 24 2c 62 75 | 66 66 65 72 25 2c 62 75 |name$,bu|ffer%,bu|
|000010a0| 66 6c 65 6e 25 20 b8 20 | 2c 2c 6c 65 6e 25 0d 06 |flen% . |,,len%..|
|000010b0| 54 13 62 75 66 66 65 72 | 25 3f 6c 65 6e 25 3d 31 |T.buffer|%?len%=1|
|000010c0| 33 0d 06 5e 23 c8 99 20 | 22 4f 53 5f 53 65 74 56 |3..^#.. |"OS_SetV|
|000010d0| 61 72 56 61 6c 22 2c 76 | 61 72 6e 61 6d 65 24 2c |arVal",v|arname$,|
|000010e0| 30 2c 2d 31 0d 06 68 05 | 3a 0d 06 72 0d 3d 24 62 |0,-1..h.|:..r.=$b|
|000010f0| 75 66 66 65 72 25 0d 06 | 7c 05 3a 0d 06 86 2e f4 |uffer%..||.:.....|
|00001100| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -------|--------|
|00001110| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001120| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 06 90 05 f4 0d 06 |--------|-.......|
|00001130| 9a 3c f4 20 4e 6f 74 65 | 20 2d 20 62 65 63 61 75 |.<. Note| - becau|
|00001140| 73 65 20 74 68 65 20 75 | 73 65 20 6f 66 20 74 68 |se the u|se of th|
|00001150| 65 20 42 6f 6f 74 41 75 | 74 69 6c 20 70 72 6f 67 |e BootAu|til prog|
|00001160| 72 61 6d 20 69 6e 20 74 | 68 65 0d 06 a4 3e f4 20 |ram in t|he...>. |
|00001170| 20 20 20 20 20 20 20 21 | 52 75 6e 41 20 66 69 6c |       !|RunA fil|
|00001180| 65 20 66 6f 72 20 21 43 | 6f 6d 70 61 72 65 2c 20 |e for !C|ompare, |
|00001190| 74 68 65 20 66 6f 6c 6c | 6f 77 69 6e 67 20 6d 65 |the foll|owing me|
|000011a0| 73 73 61 67 65 20 69 73 | 0d 06 ae 40 f4 20 20 20 |ssage is|...@.   |
|000011b0| 20 20 20 20 20 6e 6f 74 | 20 69 73 73 75 65 64 20 |     not| issued |
|000011c0| 62 79 20 74 68 65 20 57 | 69 6e 64 6f 77 20 4d 61 |by the W|indow Ma|
|000011d0| 6e 61 67 65 72 2e 20 54 | 68 69 73 20 50 52 4f 43 |nager. T|his PROC|
|000011e0| 20 69 73 20 75 73 65 64 | 0d 06 b8 21 f4 20 20 20 | is used|...!.   |
|000011f0| 20 20 20 20 20 74 6f 20 | 72 65 6d 65 64 79 20 74 |     to |remedy t|
|00001200| 68 69 73 20 6c 61 63 6b | 2e 0d 06 c2 05 3a 0d 06 |his lack|.....:..|
|00001210| cc 0e dd f2 63 6f 6e 74 | 69 6e 75 65 0d 06 d6 0e |....cont|inue....|
|00001220| ea 20 58 25 2c 59 25 2c | 5a 25 0d 06 e0 34 f1 20 |. X%,Y%,|Z%...4. |
|00001230| 27 20 22 50 72 65 73 73 | 20 53 50 41 43 45 20 62 |' "Press| SPACE b|
|00001240| 61 72 20 6f 72 20 63 6c | 69 63 6b 20 6d 6f 75 73 |ar or cl|ick mous|
|00001250| 65 20 74 6f 20 63 6f 6e | 74 69 6e 75 65 22 0d 06 |e to con|tinue"..|
|00001260| ea 05 f5 0d 06 f4 11 20 | 20 c8 97 20 58 25 2c 59 |....... | .. X%,Y|
|00001270| 25 2c 5a 25 0d 06 fe 11 | fd 20 a6 28 2d 39 39 29 |%,Z%....|. .(-99)|
|00001280| 20 84 20 5a 25 0d 07 08 | 05 f5 0d 07 12 11 20 20 | . Z%...|......  |
|00001290| c8 97 20 58 25 2c 59 25 | 2c 5a 25 0d 07 1c 17 fd |.. X%,Y%|,Z%.....|
|000012a0| 20 ac 20 a6 28 2d 39 39 | 29 20 80 20 5a 25 20 3d | . .(-99|) . Z% =|
|000012b0| 20 30 0d 07 26 15 c8 99 | 20 22 4f 53 5f 42 79 74 | 0..&...| "OS_Byt|
|000012c0| 65 22 2c 31 35 2c 31 0d | 07 30 05 e1 0d 07 3a 05 |e",15,1.|.0....:.|
|000012d0| 3a 0d 07 44 2e f4 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |:..D.. -|--------|
|000012e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000012f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00001300| 07 4e 05 3a 0d 07 58 16 | dd f2 65 72 72 6f 72 28 |.N.:..X.|..error(|
|00001310| 65 72 72 6f 72 6d 73 67 | 24 29 0d 07 62 05 3a 0d |errormsg|$)..b.:.|
|00001320| 07 6c 07 ef 20 37 0d 07 | 76 1a f1 20 22 45 52 52 |.l.. 7..|v.. "ERR|
|00001330| 4f 52 20 2d 20 22 2b 65 | 72 72 6f 72 6d 73 67 24 |OR - "+e|rrormsg$|
|00001340| 0d 07 80 0d f2 63 6f 6e | 74 69 6e 75 65 0d 07 8a |.....con|tinue...|
|00001350| 05 e0 0d 07 94 05 3a 0d | 07 9e 05 e1 0d 07 a8 05 |......:.|........|
|00001360| 3a 0d 07 b2 2e f4 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |:..... -|--------|
|00001370| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001380| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00001390| 07 bc 05 3a 0d 07 c6 0b | dd f2 61 62 65 6e 64 0d |...:....|..abend.|
|000013a0| 07 d0 05 3a 0d 07 da 16 | f1 20 f6 24 20 22 20 61 |...:....|. .$ " a|
|000013b0| 74 20 6c 69 6e 65 20 22 | 3b 9e 0d 07 e4 21 e7 20 |t line "|;....!. |
|000013c0| 46 69 6c 65 31 68 61 6e | 64 6c 65 25 20 d9 23 46 |File1han|dle% .#F|
|000013d0| 69 6c 65 31 68 61 6e 64 | 6c 65 25 0d 07 ee 21 e7 |ile1hand|le%...!.|
|000013e0| 20 46 69 6c 65 32 68 61 | 6e 64 6c 65 25 20 d9 23 | File2ha|ndle% .#|
|000013f0| 46 69 6c 65 32 68 61 6e | 64 6c 65 25 0d 07 f8 0d |File2han|dle%....|
|00001400| f2 63 6f 6e 74 69 6e 75 | 65 0d 08 02 05 e0 0d 08 |.continu|e.......|
|00001410| 0c 05 3a 0d 08 16 05 e1 | 0d 08 20 05 3a 0d 08 2a |..:.....|.. .:..*|
|00001420| 2e f4 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.. -----|--------|
|00001430| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001440| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d ff          |--------|---..   |
+--------+-------------------------+-------------------------+--------+--------+