COMPARE
FILE INFORMATION
FILENAME(S): COMPARE
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-30 21:12:51
APPEARS ON: 1 disk(s)
FILE HASH
fbbd627e2850a85c02d08597b214c3d944a87a90b8cf4065cb8be3fb4a33dadb
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TRANSACTOR DISK | COMPARE | PRG | DuncanTwain | 31 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 3B 08 0A 00 97 35 36 2C 36 34 3A 9C 3A 43 |..;....56,64:.:C| 00000010: 4F B2 30 36 3A 43 52 B2 30 32 3A 43 42 B2 31 3A |O.06:CR.02:CB.1:| 00000020: 97 36 34 36 2C 43 4F 3A 97 35 33 32 38 30 2C 43 |.646,CO:.53280,C| 00000030: 52 3A 97 35 33 32 38 31 2C 43 42 00 60 08 14 00 |R:.53281,CB.`...| 00000040: 8B 20 C2 28 32 36 36 33 36 29 B2 35 31 20 AF 20 |. .(26636).51 . | 00000050: C2 28 32 36 36 33 38 29 B2 35 32 20 A7 31 30 30 |.(26638).52 .100| 00000060: 00 97 08 1E 00 8D 39 34 30 3A 99 22 13 12 D3 D4 |......940:."....| 00000070: C1 CE C4 C2 D9 20 2D 20 CC 4F 41 44 49 4E 47 20 |..... - .OADING | 00000080: CD CC 20 D3 55 42 52 4F 55 54 49 4E 45 53 2E 20 |.. .UBROUTINES. | 00000090: 20 20 20 20 20 20 22 00 BB 08 28 00 44 4E 25 B2 | "...(.DN%.| 000000A0: C2 28 31 38 36 29 3A 93 22 43 4D 50 2E 4D 4C 2E |.(186):."CMP.ML.| 000000B0: 36 38 30 30 22 2C 44 4E 25 2C 31 00 E8 08 64 00 |6800",DN%,1...d.| 000000C0: 48 44 24 B2 22 2A 20 C6 49 4C 45 20 C3 4F 4D 50 |HD$."* .ILE .OMP| 000000D0: 41 52 49 53 4F 4E 20 D5 54 49 4C 49 54 59 20 20 |ARISON .TILITY | 000000E0: 20 D6 33 2E 34 20 2A 22 00 15 09 6E 00 42 58 24 | .3.4 *"...n.BX$| 000000F0: B2 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |."**************| 00000100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000110: 2A 2A 2A 2A 22 00 37 09 78 00 8F 20 4F 46 24 3D |****".7.x.. OF$=| 00000120: 43 48 52 24 28 31 36 30 29 3A 4E 46 24 3D 43 48 |CHR$(160):NF$=CH| 00000130: 52 24 28 31 37 36 29 00 73 09 82 00 4D 4D 25 B2 |R$(176).s...MM%.| 00000140: 30 3A 52 43 25 B2 30 3A 43 52 24 B2 C7 28 31 33 |0:RC%.0:CR$..(13| 00000150: 29 3A 5A 45 24 B2 C7 28 30 29 3A 81 49 B2 31 A4 |):ZE$..(0):.I.1.| 00000160: 31 36 3A 53 50 24 B2 53 50 24 AA C7 28 31 36 30 |16:SP$.SP$..(160| 00000170: 29 3A 82 00 9F 09 8C 00 4F 56 24 B2 22 22 3A 4F |):......OV$."":O| 00000180: 54 24 B2 22 22 3A 4F 5A 24 B2 22 22 3A 4F 53 24 |T$."":OZ$."":OS$| 00000190: B2 22 22 3A 4F 42 25 B2 30 3A 4F 59 25 B2 30 00 |."":OB%.0:OY%.0.| 000001A0: CB 09 96 00 4E 56 24 B2 22 22 3A 4E 54 24 B2 22 |....NV$."":NT$."| 000001B0: 22 3A 4E 5A 24 B2 22 22 3A 4E 53 24 B2 22 22 3A |":NZ$."":NS$."":| 000001C0: 4E 42 25 B2 30 3A 4E 59 25 B2 30 00 D1 09 A0 00 |NB%.0:NY%.0.....| 000001D0: 3A 00 DA 09 AA 00 8D 39 34 30 00 0B 0A B4 00 44 |:......940.....D| 000001E0: 4E 25 B2 30 3A 85 22 C4 49 53 4B 20 55 4E 49 54 |N%.0:.".ISK UNIT| 000001F0: 20 4E 52 20 28 38 2D 31 31 29 22 3B 44 4E 25 3A | NR (8-11)";DN%:| 00000200: 8B 20 44 4E 25 B2 30 20 A7 20 80 00 3F 0A BE 00 |. DN%.0 . ..?...| 00000210: 8B 20 44 4E 25 B3 38 20 B0 20 44 4E 25 B1 31 31 |. DN%.8 . DN%.11| 00000220: 20 A7 20 99 22 D5 4E 49 54 20 4E 52 20 4D 55 53 | . .".NIT NR MUS| 00000230: 54 20 42 45 20 38 2D 31 31 22 3A 89 31 38 30 00 |T BE 8-11":.180.| 00000240: 6B 0A C8 00 8D 39 34 30 3A 4F 4C 24 B2 22 22 3A |k....940:OL$."":| 00000250: 85 22 CF CC C4 20 46 49 4C 45 20 4E 41 4D 45 20 |."... FILE NAME | 00000260: 4F 52 20 12 24 92 22 3B 4F 4C 24 00 85 0A D2 00 |OR .$.";OL$.....| 00000270: 8B 20 4F 4C 24 B2 22 24 22 20 A7 20 8D 39 37 30 |. OL$."$" . .970| 00000280: 3A 89 32 30 30 00 97 0A DC 00 8B 20 4F 4C 24 B2 |:.200...... OL$.| 00000290: 22 22 20 A7 31 37 30 00 BE 0A E6 00 4E 55 24 B2 |"" .170.....NU$.| 000002A0: 22 22 3A 85 22 CE C5 D7 20 46 49 4C 45 20 4E 41 |"":."... FILE NA| 000002B0: 4D 45 20 4F 52 20 12 2A 92 22 3B 4E 55 24 00 DD |ME OR .*.";NU$..| 000002C0: 0A F0 00 8B 20 4E 55 24 B2 22 24 22 20 A7 20 8D |.... NU$."$" . .| 000002D0: 39 37 30 3A 8D 39 34 30 3A 89 32 30 30 00 EF 0A |970:.940:.200...| 000002E0: FA 00 8B 20 4E 55 24 B2 22 22 20 A7 32 30 30 00 |... NU$."" .200.| 000002F0: 21 0B 04 01 50 44 24 B2 22 22 3A 85 22 D2 45 50 |!...PD$."":.".EP| 00000300: 4F 52 54 20 54 4F 20 12 53 92 43 52 45 45 4E 20 |ORT TO .S.CREEN | 00000310: 4F 52 20 12 50 92 52 49 4E 54 45 52 22 3B 50 44 |OR .P.RINTER";PD| 00000320: 24 00 33 0B 0E 01 8B 20 50 44 24 B2 22 22 20 A7 |$.3.... PD$."" .| 00000330: 32 33 30 00 54 0B 18 01 8B 20 50 44 24 B2 22 53 |230.T.... PD$."S| 00000340: 22 20 A7 20 50 4E 25 B2 33 3A 50 43 25 B2 30 3A |" . PN%.3:PC%.0:| 00000350: 89 33 31 30 00 75 0B 22 01 8B 20 50 44 24 B2 22 |.310.u.".. PD$."| 00000360: 50 22 20 A7 20 50 4E 25 B2 34 3A 50 43 25 B2 37 |P" . PN%.4:PC%.7| 00000370: 3A 89 33 31 30 00 7E 0B 2C 01 89 32 36 30 00 84 |:.310.~.,..260..| 00000380: 0B 36 01 3A 00 A9 0B 40 01 3A 8F 2D 2D 2D 20 47 |.6.:...@.:.--- G| 00000390: 45 54 20 46 49 4C 45 20 54 59 50 45 2C 20 54 52 |ET FILE TYPE, TR| 000003A0: 4B 2C 20 53 45 43 54 4F 52 00 BF 0B 4A 01 4F 4F |K, SECTOR...J.OO| 000003B0: 24 B2 C8 28 4F 4C 24 AA 53 50 24 2C 31 36 29 00 |$..(OL$.SP$,16).| 000003C0: D5 0B 54 01 4E 4E 24 B2 C8 28 4E 55 24 AA 53 50 |..T.NN$..(NU$.SP| 000003D0: 24 2C 31 36 29 00 F8 0B 5E 01 9E 32 36 36 32 37 |$,16)...^..26627| 000003E0: 3A 8B 20 4E 55 24 B2 22 2A 22 20 A7 20 4E 59 25 |:. NU$."*" . NY%| 000003F0: B2 31 3A 4E 42 25 B2 30 00 0B 0C 68 01 8B 20 52 |.1:NB%.0...h.. R| 00000400: 43 25 B3 31 32 38 20 A7 34 30 30 00 2D 0C 72 01 |C%.128 .400.-.r.| 00000410: 8B 20 52 43 25 B3 32 35 35 20 A7 20 41 24 B2 22 |. RC%.255 . A$."| 00000420: 46 41 49 4C 45 44 2E 22 3A 89 33 39 30 00 41 0C |FAILED.":.390.A.| 00000430: 7C 01 41 24 B2 22 43 41 4E 43 45 4C 4C 45 44 2E ||.A$."CANCELLED.| 00000440: 22 00 62 0C 86 01 99 22 C4 49 52 45 43 54 4F 52 |".b....".IRECTOR| 00000450: 59 20 53 45 41 52 43 48 20 22 3B 41 24 3A 89 34 |Y SEARCH ";A$:.4| 00000460: 34 30 00 7D 0C 90 01 8B 20 4F 59 25 B3 B1 30 20 |40.}.... OY%..0 | 00000470: AF 20 4E 59 25 B3 B1 30 20 A7 34 38 30 00 A2 0C |. NY%..0 .480...| 00000480: 9A 01 8B 20 4F 59 25 B2 30 20 A7 20 99 22 CF CC |... OY%.0 . ."..| 00000490: C4 20 46 49 4C 45 20 4E 4F 54 20 46 4F 55 4E 44 |. FILE NOT FOUND| 000004A0: 2E 22 00 C7 0C A4 01 8B 20 4E 59 25 B2 30 20 A7 |."...... NY%.0 .| 000004B0: 20 99 22 CE C5 D7 20 46 49 4C 45 20 4E 4F 54 20 | ."... FILE NOT | 000004C0: 46 4F 55 4E 44 2E 22 00 F4 0C AE 01 99 22 C5 4E |FOUND."......".N| 000004D0: 54 45 52 20 12 24 92 20 54 4F 20 4C 49 53 54 20 |TER .$. TO LIST | 000004E0: 54 48 45 20 44 49 53 4B 20 44 49 52 45 43 54 4F |THE DISK DIRECTO| 000004F0: 52 59 2E 22 00 15 0D B8 01 99 22 D0 52 45 53 53 |RY."......".RESS| 00000500: 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 | ANY KEY TO CONT| 00000510: 49 4E 55 45 22 00 2B 0D C2 01 A1 20 41 24 3A 8B |INUE".+.... A$:.| 00000520: 20 41 24 B2 22 22 20 A7 34 35 30 00 34 0D CC 01 | A$."" .450.4...| 00000530: 89 32 30 30 00 3A 0D D6 01 3A 00 5F 0D E0 01 3A |.200.:...:._...:| 00000540: 8F 2D 2D 2D 20 47 45 54 20 52 45 50 4F 52 54 20 |.--- GET REPORT | 00000550: 41 4E 44 20 52 45 43 4F 52 44 20 54 59 50 45 00 |AND RECORD TYPE.| 00000560: 7E 0D EA 01 4F 53 24 B2 5A 45 24 3A 99 22 C3 48 |~...OS$.ZE$:.".H| 00000570: 4F 4F 53 45 20 12 41 92 53 43 49 49 22 3B 00 A7 |OOSE .A.SCII";..| 00000580: 0D F4 01 8B 20 4F 59 25 B2 32 20 A7 20 99 22 2C |.... OY%.2 . .",| 00000590: 12 42 92 41 53 49 43 2C 12 44 92 49 53 41 53 53 |.B.ASIC,.D.ISASS| 000005A0: 45 4D 42 4C 59 22 3B 00 C0 0D FE 01 4F 56 24 B2 |EMBLY";.....OV$.| 000005B0: 22 22 3A 85 22 2C 48 45 12 58 92 22 3B 4F 56 24 |"":.",HE.X.";OV$| 000005C0: 00 DD 0D 08 02 8B 20 4F 56 24 B2 22 41 22 20 B0 |...... OV$."A" .| 000005D0: 20 4F 56 24 B2 22 58 22 20 A7 35 38 30 00 0B 0E | OV$."X" .580...| 000005E0: 12 02 8B 20 4F 59 25 B2 32 20 AF 20 4F 56 24 B2 |... OY%.2 . OV$.| 000005F0: 22 42 22 20 A7 20 4F 54 24 B2 22 43 22 3A 4F 5A |"B" . OT$."C":OZ| 00000600: 24 B2 C7 28 30 29 3A 89 38 32 30 00 39 0E 1C 02 |$..(0):.820.9...| 00000610: 8B 20 4F 59 25 B2 32 20 AF 20 4F 56 24 B2 22 44 |. OY%.2 . OV$."D| 00000620: 22 20 A7 20 4F 54 24 B2 22 46 22 3A 4F 5A 24 B2 |" . OT$."F":OZ$.| 00000630: C7 28 31 29 3A 89 38 32 30 00 4D 0E 26 02 8B 20 |.(1):.820.M.&.. | 00000640: 4F 56 24 B2 22 22 20 A7 20 89 38 32 30 00 56 0E |OV$."" . .820.V.| 00000650: 30 02 89 34 39 30 00 75 0E 3A 02 3A 8F 2D 2D 2D |0..490.u.:.:.---| 00000660: 20 52 45 43 4F 52 44 20 53 50 45 43 49 46 49 43 | RECORD SPECIFIC| 00000670: 41 54 49 4F 4E 00 AE 0E 44 02 4F 54 24 B2 22 22 |ATION...D.OT$.""| 00000680: 3A 85 22 C9 53 20 52 45 43 4F 52 44 20 4C 45 4E |:.".S RECORD LEN| 00000690: 47 54 48 20 12 46 92 49 58 45 44 20 4F 52 20 12 |GTH .F.IXED OR .| 000006A0: 56 92 41 52 49 41 42 4C 45 22 3B 4F 54 24 00 C1 |V.ARIABLE";OT$..| 000006B0: 0E 4E 02 8B 20 4F 54 24 B2 22 46 22 20 A7 36 33 |.N.. OT$."F" .63| 000006C0: 30 00 D4 0E 58 02 8B 20 4F 54 24 B2 22 56 22 20 |0...X.. OT$."V" | 000006D0: A7 36 36 30 00 E6 0E 62 02 8B 20 4F 54 24 B2 22 |.660...b.. OT$."| 000006E0: 22 20 A7 34 39 30 00 EF 0E 6C 02 89 35 38 30 00 |" .490...l..580.| 000006F0: 2D 0F 76 02 58 B2 30 3A 85 22 D3 50 45 43 49 46 |-.v.X.0:.".PECIF| 00000700: 59 20 52 45 43 4F 52 44 20 4C 45 4E 47 54 48 20 |Y RECORD LENGTH | 00000710: 28 31 2D 32 35 35 29 22 3B 58 3A 8B 20 58 B3 31 |(1-255)";X:. X.1| 00000720: 20 B0 20 58 B1 32 35 35 20 A7 35 38 30 00 3F 0F | . X.255 .580.?.| 00000730: 80 02 4F 5A 24 B2 C7 28 58 29 3A 89 38 32 30 00 |..OZ$..(X):.820.| 00000740: 5C 0F 8A 02 3A 8F 2D 2D 2D 20 56 41 52 49 41 42 |\...:.--- VARIAB| 00000750: 4C 45 20 4C 4E 20 52 45 43 4F 52 44 00 85 0F 94 |LE LN RECORD....| 00000760: 02 99 22 C3 48 4F 4F 53 45 20 45 4E 44 20 4F 46 |..".HOOSE END OF| 00000770: 20 52 45 43 4F 52 44 20 49 4E 44 49 43 41 54 4F | RECORD INDICATO| 00000780: 52 2E 2E 2E 22 00 BF 0F 9E 02 4F 54 24 B2 22 22 |R...".....OT$.""| 00000790: 3A 85 22 20 20 20 20 20 20 20 12 43 92 48 41 52 |:." .C.HAR| 000007A0: 41 43 54 45 52 2C 20 12 4C 92 45 4E 47 54 48 2C |ACTER, .L.ENGTH,| 000007B0: 20 4F 52 20 12 4D 92 41 53 4B 22 3B 4F 54 24 00 | OR .M.ASK";OT$.| 000007C0: E3 0F A8 02 8B 20 4F 54 24 B2 22 43 22 20 A7 20 |..... OT$."C" . | 000007D0: 41 24 B2 22 43 48 41 52 41 43 54 45 52 22 3A 89 |A$."CHARACTER":.| 000007E0: 37 33 30 00 02 10 B2 02 8B 20 4F 54 24 B2 22 4D |730...... OT$."M| 000007F0: 22 20 A7 20 41 24 B2 22 4D 41 53 4B 22 3A 89 37 |" . A$."MASK":.7| 00000800: 33 30 00 15 10 BC 02 8B 20 4F 54 24 B2 22 4C 22 |30...... OT$."L"| 00000810: 20 A7 37 39 30 00 27 10 C6 02 8B 20 4F 54 24 B2 | .790.'.... OT$.| 00000820: 22 22 20 A7 35 38 30 00 30 10 D0 02 89 36 36 30 |"" .580.0....660| 00000830: 00 6E 10 DA 02 58 24 B2 22 22 3A 99 22 C5 4E 54 |.n...X$."":.".NT| 00000840: 45 52 20 56 41 4C 55 45 20 4F 46 20 22 3B 41 24 |ER VALUE OF ";A$| 00000850: 3B 22 20 28 30 2D 32 35 35 29 22 3B 3A 85 20 58 |;" (0-255)";:. X| 00000860: 24 3A 8B 20 58 24 B2 22 22 20 A7 36 36 30 00 8D |$:. X$."" .660..| 00000870: 10 E4 02 58 B2 C5 28 58 24 29 3A 8B 20 58 B3 30 |...X..(X$):. X.0| 00000880: 20 B0 20 58 B1 32 35 35 20 A7 37 33 30 00 9A 10 | . X.255 .730...| 00000890: EE 02 4F 5A 24 B2 C7 28 58 29 00 DC 10 F8 02 58 |..OZ$..(X).....X| 000008A0: 24 B2 22 22 3A 85 20 22 C5 4E 54 45 52 20 4D 49 |$."":. ".NTER MI| 000008B0: 4E 49 4D 55 4D 20 52 45 43 4F 52 44 20 4C 45 4E |NIMUM RECORD LEN| 000008C0: 47 54 48 20 28 30 2D 32 35 35 29 22 3B 58 24 3A |GTH (0-255)";X$:| 000008D0: 8B 20 58 24 B2 22 22 20 A7 37 33 30 00 FB 10 02 |. X$."" .730....| 000008E0: 03 58 B2 C5 28 58 24 29 3A 8B 20 58 B3 30 20 B0 |.X..(X$):. X.0 .| 000008F0: 20 58 B1 32 35 35 20 A7 37 36 30 00 0D 11 0C 03 | X.255 .760.....| 00000900: 4F 53 24 B2 C7 28 58 29 3A 89 38 32 30 00 48 11 |OS$..(X):.820.H.| 00000910: 16 03 58 24 B2 22 22 3A 85 20 22 D3 50 45 43 49 |..X$."":. ".PECI| 00000920: 46 59 20 54 48 45 20 4C 4F 43 41 54 49 4F 4E 20 |FY THE LOCATION | 00000930: 28 31 2D 32 35 35 29 22 3B 58 24 3A 8B 20 58 24 |(1-255)";X$:. X$| 00000940: B2 22 22 20 A7 37 36 30 00 67 11 20 03 58 B2 C5 |."" .760.g. .X..| 00000950: 28 58 24 29 3A 8B 20 58 B3 31 20 B0 20 58 B1 32 |(X$):. X.1 . X.2| 00000960: 35 35 20 A7 37 39 30 00 74 11 2A 03 4F 5A 24 B2 |55 .790.t.*.OZ$.| 00000970: C7 28 58 29 00 86 11 34 03 8B 20 4F 56 24 B2 22 |.(X)...4.. OV$."| 00000980: 22 20 A7 32 36 30 00 AA 11 3E 03 4E 56 24 B2 4F |" .260...>.NV$.O| 00000990: 56 24 3A 4E 54 24 B2 4F 54 24 3A 4E 5A 24 B2 4F |V$:NT$.OT$:NZ$.O| 000009A0: 5A 24 3A 4E 53 24 B2 4F 53 24 00 B0 11 48 03 3A |Z$:NS$.OS$...H.:| 000009B0: 00 D4 11 52 03 3A 8F 2D 2D 2D 20 50 52 4F 44 55 |...R.:.--- PRODU| 000009C0: 43 45 20 43 4F 4D 50 41 52 49 53 4F 4E 20 52 45 |CE COMPARISON RE| 000009D0: 50 4F 52 54 00 15 12 5C 03 41 24 B2 C7 28 31 34 |PORT...\.A$..(14| 000009E0: 37 29 3A 42 24 B2 22 20 20 20 22 3A 8B 20 50 4E |7):B$." ":. PN| 000009F0: 25 B3 B1 33 20 A7 20 41 24 B2 C7 28 31 32 29 3A |%..3 . A$..(12):| 00000A00: 42 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 |B$." | 00000A10: 20 20 20 20 22 00 27 12 66 03 9F 20 50 4E 25 2C | ".'.f.. PN%,| 00000A20: 50 4E 25 2C 50 43 25 00 54 12 70 03 98 50 4E 25 |PN%,PC%.T.p..PN%| 00000A30: 2C 41 24 3B 42 24 3B 42 58 24 3B 43 52 24 3B 42 |,A$;B$;BX$;CR$;B| 00000A40: 24 3B 48 44 24 3B 43 52 24 3B 42 24 3B 42 58 24 |$;HD$;CR$;B$;BX$| 00000A50: 3B 43 52 24 00 71 12 7A 03 98 50 4E 25 2C 42 24 |;CR$.q.z..PN%,B$| 00000A60: 3B 22 CF CC C4 20 CE 41 4D 45 3A 20 22 3B 4F 4C |;"... .AME: ";OL| 00000A70: 24 00 92 12 84 03 98 50 4E 25 2C 42 24 3B 22 CE |$......PN%,B$;".| 00000A80: C5 D7 20 CE 41 4D 45 3A 20 22 3B 4E 55 24 3B 43 |.. .AME: ";NU$;C| 00000A90: 52 24 00 A7 12 8E 03 9E 32 36 36 32 34 3A 8D 39 |R$......26624:.9| 00000AA0: 39 30 3A 89 32 30 30 00 AD 12 98 03 3A 00 CC 12 |90:.200.....:...| 00000AB0: A2 03 3A AB AB AB 20 44 49 53 50 4C 41 59 20 53 |..:... DISPLAY S| 00000AC0: 43 52 45 45 4E 20 48 45 41 44 45 52 00 E8 12 AC |CREEN HEADER....| 00000AD0: 03 99 22 93 22 C7 28 31 34 29 A3 33 29 48 44 24 |..".".(14).3)HD$| 00000AE0: 43 52 24 43 52 24 3A 8E 00 EE 12 B6 03 3A 00 02 |CR$CR$:......:..| 00000AF0: 13 C0 03 3A AB AB AB 20 9B 20 44 49 52 45 43 A4 |...:... . DIREC.| 00000B00: 52 59 00 29 13 CA 03 50 4E 25 B2 33 3A 4E 55 24 |RY.)...PN%.3:NU$| 00000B10: B2 22 2A 22 3A 9F 20 50 4E 25 2C 50 4E 25 2C 50 |."*":. PN%,PN%,P| 00000B20: 43 25 3A 9E 32 36 36 33 30 00 2F 13 D4 03 3A 00 |C%:.26630./...:.| 00000B30: 5B 13 DE 03 41 24 B2 22 C3 4F 4D 50 41 52 45 20 |[...A$.".OMPARE | 00000B40: 22 3A 8B 20 4E 55 24 B2 22 2A 22 20 A7 20 41 24 |":. NU$."*" . A$| 00000B50: B2 22 CC 49 53 54 49 4E 47 20 22 00 A2 13 E8 03 |.".ISTING ".....| 00000B60: 42 24 B2 22 46 49 4E 49 53 48 45 44 2E 22 3A 8B |B$."FINISHED.":.| 00000B70: 20 52 43 25 B1 39 39 20 A7 20 42 24 B2 22 46 41 | RC%.99 . B$."FA| 00000B80: 49 4C 45 44 2E 22 3A 8B 20 52 43 25 B2 32 35 35 |ILED.":. RC%.255| 00000B90: 20 A7 20 42 24 B2 22 43 41 4E 43 45 4C 4C 45 44 | . B$."CANCELLED| 00000BA0: 2E 22 00 CF 13 F2 03 8B 20 4E 55 24 B3 B1 22 2A |."...... NU$.."*| 00000BB0: 22 20 A7 20 42 24 B2 42 24 AA C4 28 4D 4D 25 29 |" . B$.B$..(MM%)| 00000BC0: AA 22 20 4D 49 53 4D 41 54 43 48 45 53 2E 22 00 |." MISMATCHES.".| 00000BD0: EE 13 FC 03 98 50 4E 25 2C 43 52 24 43 52 24 41 |.....PN%,CR$CR$A| 00000BE0: 24 42 24 3A 98 50 4E 25 3A A0 20 50 4E 25 00 01 |$B$:.PN%:. PN%..| 00000BF0: 14 06 04 8B 20 50 4E 25 B3 B1 33 20 A7 31 30 36 |.... PN%..3 .106| 00000C00: 30 00 23 14 10 04 99 22 D0 52 45 53 53 20 41 4E |0.#....".RESS AN| 00000C10: 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 |Y KEY TO CONTINU| 00000C20: 45 2E 22 00 46 14 1A 04 A1 20 41 24 3A 8B 20 41 |E.".F.... A$:. A| 00000C30: 24 B2 22 22 20 B0 20 41 24 B2 C7 28 31 33 36 29 |$."" . A$..(136)| 00000C40: 20 A7 31 30 35 30 00 4C 14 24 04 8E 00 00 00 | .1050.L.$..... |
..;....56,64:.:CO.06:CR.02:CB.1:.646,CO: .53280,CR:.53281,CB.`.... B(26636).51 . B(26638).52 .100......940:."..STANDBY - LOADING ML SUBROUTINES. "...(.DN%. B(186):."CMP.ML.6800",DN%,1...D.HD$."* F ILE COMPARISON UTILITY V3.4 *"...N.BX$ ."**********************************".7. X.. OF$=CHR$(160):NF$=CHR$(176).S...MM%. 0:RC%.0:CR$.G(13):ZE$.G(0):.I.1.16:SP$.S P$.G(160):......OV$."":OT$."":OZ$."":OS$ ."":OB%.0:OY%.0.K...NV$."":NT$."":NZ$."" :NS$."":NB%.0:NY%.0.Q. .:.Z....940.....D N%.0:."DISK UNIT NR (8-11)";DN%:. DN%.0 . ..?.... DN%.8 . DN%.11 . ."UNIT NR MUS T BE 8-11":.180.K.H..940:OL$."":."OLD FI LE NAME OR .$.";OL$...R.. OL$."$" . .970 :.200...... OL$."" .170.....NU$."":."NEW FILE NAME OR .*.";NU$...... NU$."$" . . 970:.940:.200...... NU$."" .200.!...PD$. "":."REPORT TO .S.CREEN OR .P.RINTER";PD $.3.... PD$."" .230.T.... PD$."S" . PN%. 3:PC%.0:.310.U.".. PD$."P" . PN%.4:PC%.7 :.310.~.,..260...6.:...@.:.--- GET FILE TYPE, TRK, SECTOR...J.OO$.H(OL$.SP$,16). U.T.NN$.H(NU$.SP$,16)...^..26627:. NU$." *" . NY%.1:NB%.0...H.. RC%.128 .400.-.R. . RC%.255 . A$."FAILED.":.390.A.|.A$."CA NCELLED.".B...."DIRECTORY SEARCH ";A$:.4 40.}.... OY%..0 . NY%..0 .480...... OY%. 0 . ."OLD FILE NOT FOUND.".G.... NY%.0 . ."NEW FILE NOT FOUND."......"ENTER .$. TO LIST THE DISK DIRECTORY."......"PRESS ANY KEY TO CONTINUE".+.B.. A$:. A$."" . 450.4.L..200.:.V.:._...:.--- GET REPORT AND RECORD TYPE.~...OS$.ZE$:."CHOOSE .A. SCII";...... OY%.2 . .",.B.ASIC,.D.ISASS EMBLY";.....OV$."":.",HE.X.";OV$...... O V$."A" . OV$."X" .580...... OY%.2 . OV$. "B" . OT$."C":OZ$.G(0):.820.9.... OY%.2 . OV$."D" . OT$."F":OZ$.G(1):.820.M.&.. OV$."" . .820.V.0..490.U.:.:.--- RECORD SPECIFICATION...D.OT$."":."IS RECORD LEN GTH .F.IXED OR .V.ARIABLE";OT$.A.N.. OT$ ."F" .630.T.X.. OT$."V" .660...B.. OT$." " .490...L..580.-.V.X.0:."SPECIFY RECORD LENGTH (1-255)";X:. X.1 . X.255 .580.?. ..OZ$.G(X):.820.\...:.--- VARIABLE LN RE CORD......"CHOOSE END OF RECORD INDICATO R...".....OT$."":." .C.HARACTER, . L.ENGTH, OR .M.ASK";OT$...... OT$."C" . A$."CHARACTER":.730...... OT$."M" . A$." MASK":.730...... OT$."L" .790.'.F.. OT$. "" .580.0.P..660.N.Z.X$."":."ENTER VALUE OF ";A$;" (0-255)";:. X$:. X$."" .660.. ...X.E(X$):. X.0 . X.255 .730.....OZ$.G( X).....X$."":. "ENTER MINIMUM RECORD LEN GTH (0-255)";X$:. X$."" .730.....X.E(X$) :. X.0 . X.255 .760.....OS$.G(X):.820.H. ..X$."":. "SPECIFY THE LOCATION (1-255)" ;X$:. X$."" .760.G. .X.E(X$):. X.1 . X.2 55 .790.T.*.OZ$.G(X)...4.. OV$."" .260.. .>.NV$.OV$:NT$.OT$:NZ$.OZ$:NS$.OS$...H.: .T.R.:.--- PRODUCE COMPARISON REPORT...\ .A$.G(147):B$." ":. PN%..3 . A$.G(12): B$." ".'.F.. PN%,PN%,PC%. T.P..PN%,A$;B$;BX$;CR$;B$;HD$;CR$;B$;BX$ ;CR$.Q.Z..PN%,B$;"OLD NAME: ";OL$......P N%,B$;"NEW NAME: ";NU$;CR$......26624:.9 90:.200.....:.L...:... DISPLAY SCREEN HE ADER......"."G(14).3)HD$CR$CR$:......:.. ...:... . DIREC.RY.).J.PN%.3:NU$."*":. P N%,PN%,PC%:.26630./.T.:.[...A$."COMPARE ":. NU$."*" . A$."LISTING ".....B$."FINI SHED.":. RC%.99 . B$."FAILED.":. RC%.255 . B$."CANCELLED.".O.... NU$.."*" . B$.B $.D(MM%)." MISMATCHES."......PN%,CR$CR$A $B$:.PN%: PN%...... PN%..3 .1060.#...." PRESS ANY KEY TO CONTINUE.".F.... A$:. A $."" . A$.G(136) .1050.L.$.....
> CLICK IMAGE PREVIEW FOR FULL MODAL