DISK-DOCTOR
FILE INFORMATION
FILENAME(S): DISK-DOCTOR
FILE TYPE(S): PRG
FILE SIZE: 5.7K
FIRST SEEN: 2025-11-30 19:36:54
APPEARS ON: 1 disk(s)
FILE HASH
e7e1e78489185459cd72523ff401dc4088cabb8768695a7d64f72e8e6a999a6c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C 64 UTILITIES 2 | DISK-DOCTOR | PRG | Curtcool, Bo | 24 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 15 08 00 00 44 4E B2 38 3A 8F 20 44 45 56 |......DN.8:. DEV|
00000010: 49 43 45 20 23 00 4E 08 02 00 97 35 33 32 38 30 |ICE #.N....53280|
00000020: 2C 31 31 3A 97 35 33 32 38 31 2C 30 3A 86 41 24 |,11:.53281,0:.A$|
00000030: 2C 49 2C 53 24 2C 54 24 2C 43 43 2C 42 2C 53 53 |,I,S$,T$,CC,B,SS|
00000040: 2C 45 24 2C 4A 2C 54 45 2C 41 3A 89 37 38 00 AC |,E$,J,TE,A:.78..|
00000050: 08 04 00 A1 41 24 3A 8B 41 24 B1 22 22 A7 99 22 |....A$:.A$."".."|
00000060: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000070: 11 11 11 11 11 11 11 11 11 20 20 20 20 20 20 20 |......... |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000A0: 13 22 3B 3A 43 43 B2 32 39 33 3A 8E 00 BB 08 06 |.";:CC.293:.....|
000000B0: 00 8B 41 24 B2 22 22 A7 32 35 32 00 C1 08 08 00 |..A$."".252.....|
000000C0: 8E 00 E0 08 0A 00 8B 49 B3 30 A7 49 B2 32 38 30 |.......I.0.I.280|
000000D0: AA 49 3A 8B 49 B1 32 35 35 A7 49 B2 49 AB 34 30 |.I:.I.255.I.I.40|
000000E0: 00 FA 08 0C 00 8B 49 B1 32 35 35 A7 49 B2 49 AB |......I.255.I.I.|
000000F0: B5 28 49 AD 34 30 29 AC 34 30 00 38 09 0E 00 99 |.(I.40).40.8....|
00000100: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
00000110: 11 11 11 11 11 11 22 A6 31 30 29 C2 28 53 53 AA |......".10).(SS.|
00000120: 49 29 22 9D 20 20 20 22 3A 99 22 11 22 A6 31 30 |I)". ":.".".10|
00000130: 29 49 22 9D 20 20 20 22 00 6E 09 10 00 99 22 13 |)I". ".n....".|
00000140: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000150: 11 11 11 11 56 41 4C 55 45 3A 20 20 20 20 20 22 |....VALUE: "|
00000160: 3A 99 22 11 50 4F 53 49 54 49 4F 4E 3A 22 00 9D |:.".POSITION:"..|
00000170: 09 12 00 81 4A B2 31 A4 32 3A 97 49 AA 53 53 2C |....J.1.2:.I.SS,|
00000180: 28 C2 28 49 AA 53 53 29 AA 31 32 38 29 AF 32 35 |(.(I.SS).128).25|
00000190: 35 3A 81 44 B2 30 A4 31 3A 82 44 2C 4A 00 AE 09 |5:.D.0.1:.D,J...|
000001A0: 14 00 8D 34 3A 8B 41 24 B2 22 22 A7 31 38 00 B9 |...4:.A$."".18..|
000001B0: 09 16 00 8B 50 46 A7 36 36 00 D5 09 18 00 8B 41 |....PF.66......A|
000001C0: 24 B2 22 1D 22 A7 49 B2 28 49 AA 31 29 AF 32 35 |$.".".I.(I.1).25|
000001D0: 35 3A 89 31 30 00 F1 09 1A 00 8B 41 24 B2 22 9D |5:.10......A$.".|
000001E0: 22 A7 49 B2 28 49 AB 31 29 AF 32 35 35 3A 89 31 |".I.(I.1).255:.1|
000001F0: 30 00 08 0A 1C 00 8B 41 24 B2 22 91 22 A7 49 B2 |0......A$.".".I.|
00000200: 49 AB 34 30 3A 89 31 30 00 1F 0A 1E 00 8B 41 24 |I.40:.10......A$|
00000210: B2 22 11 22 A7 49 B2 49 AA 34 30 3A 89 31 30 00 |.".".I.I.40:.10.|
00000220: 33 0A 20 00 8B 41 24 B2 22 13 22 A7 49 B2 30 3A |3. ..A$.".".I.0:|
00000230: 89 31 30 00 5E 0A 22 00 8B 41 24 B2 22 4E 22 A7 |.10.^."..A$."N".|
00000240: 54 24 B2 C4 28 C2 28 53 53 29 29 3A 53 24 B2 C4 |T$..(.(SS)):S$..|
00000250: 28 C2 28 53 53 AA 31 29 29 3A 89 31 32 38 00 8D |(.(SS.1)):.128..|
00000260: 0A 24 00 8B 41 24 B2 22 4A 22 A7 54 24 B2 C4 28 |.$..A$."J".T$..(|
00000270: C2 28 53 53 AA 49 29 29 3A 53 24 B2 C4 28 C2 28 |.(SS.I)):S$..(.(|
00000280: 53 53 AA 49 AA 31 29 29 3A 89 31 32 38 00 A4 0A |SS.I.1)):.128...|
00000290: 26 00 8B 41 24 B2 22 51 22 A7 98 31 35 2C 22 49 |&..A$."Q"..15,"I|
000002A0: 30 22 3A 8A 00 C3 0A 28 00 8B 41 24 B2 22 2B 22 |0":....(..A$."+"|
000002B0: A7 53 24 B2 C4 28 C5 28 53 24 29 AA 31 29 3A 89 |.S$..(.(S$).1):.|
000002C0: 31 32 38 00 ED 0A 2A 00 8B 41 24 B2 22 2D 22 A7 |128...*..A$."-".|
000002D0: 53 24 B2 C4 28 28 C5 28 53 24 29 AB 31 29 AC B4 |S$..((.(S$).1)..|
000002E0: 28 C5 28 53 24 29 29 29 3A 89 31 32 38 00 FD 0A |(.(S$))):.128...|
000002F0: 2C 00 8B 41 24 B2 22 52 22 A7 31 37 34 00 0D 0B |,..A$."R".174...|
00000300: 2E 00 8B 41 24 B2 22 42 22 A7 31 31 36 00 47 0B |...A$."B".116.G.|
00000310: 30 00 8B 41 24 B2 22 54 22 A7 99 22 13 11 11 11 |0..A$."T".."....|
00000320: 11 11 11 11 11 11 11 22 3A 8D 32 31 38 3A 99 22 |.......":.218:."|
00000330: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 3A 8D |.............":.|
00000340: 32 31 38 3A 89 36 34 00 57 0B 32 00 8B 41 24 B2 |218:.64.W.2..A$.|
00000350: C7 28 33 29 A7 37 34 00 67 0B 34 00 8B 41 24 B3 |.(3).74.g.4..A$.|
00000360: B1 22 40 22 A7 31 30 00 86 0B 36 00 8B 49 B3 30 |."@".10...6..I.0|
00000370: A7 49 B2 32 38 30 AA 49 3A 8B 49 B1 32 35 35 A7 |.I.280.I:.I.255.|
00000380: 49 B2 49 AB 34 30 00 A0 0B 38 00 8B 49 B1 32 35 |I.I.40...8..I.25|
00000390: 35 A7 49 B2 49 AB B5 28 49 AD 34 30 29 AC 34 30 |5.I.I..(I.40).40|
000003A0: 00 DE 0B 3A 00 99 22 13 11 11 11 11 11 11 11 11 |...:..".........|
000003B0: 11 11 11 11 11 11 11 11 11 11 11 11 22 A6 31 30 |............".10|
000003C0: 29 C2 28 53 53 AA 49 29 22 9D 20 20 20 22 3A 99 |).(SS.I)". ":.|
000003D0: 22 11 22 A6 31 30 29 49 22 9D 20 20 20 22 00 16 |".".10)I". "..|
000003E0: 0C 3C 00 97 31 39 38 2C 30 3A 99 22 13 11 11 11 |.<..198,0:."....|
000003F0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000400: 11 4E 45 57 20 56 41 4C 55 45 3A 20 22 3B 3A 84 |.NEW VALUE: ";:.|
00000410: 39 2C 42 24 3A 99 00 41 0C 3E 00 99 22 91 22 A6 |9,B$:..A.>..".".|
00000420: 32 30 29 22 20 20 20 20 20 20 20 20 20 20 20 20 |20)" |
00000430: 20 20 20 22 3A 42 B2 C5 28 42 24 29 3A 89 31 36 | ":B..(B$):.16|
00000440: 36 00 88 0C 40 00 99 22 13 11 11 11 11 11 11 11 |6...@.."........|
00000450: 11 11 11 11 11 11 11 11 20 20 20 D0 52 45 53 53 |........ .RESS|
00000460: 20 5B D2 C5 D4 D5 D2 CE 5D 20 54 4F 20 45 4E 44 | [......] TO END|
00000470: 20 54 45 58 54 20 4D 4F 44 45 22 3A 50 46 B2 31 | TEXT MODE":PF.1|
00000480: 3A A1 41 24 3A 89 31 30 00 B3 0C 42 00 8B 41 24 |:.A$:.10...B..A$|
00000490: B2 C7 28 31 33 29 A7 50 46 B2 30 3A 99 22 13 11 |..(13).PF.0:."..|
000004A0: 11 11 11 11 11 11 11 11 11 22 3A 8D 32 30 32 3A |.........":.202:|
000004B0: 89 31 30 00 C1 0C 44 00 8B 41 24 B2 22 22 A7 32 |.10...D..A$."".2|
000004C0: 30 00 D2 0C 46 00 42 B2 C6 28 41 24 29 3A 89 31 |0...F.B..(A$):.1|
000004D0: 36 38 00 EE 0C 48 00 99 22 13 11 11 11 11 11 11 |68...H..".......|
000004E0: 11 11 11 11 22 3A 8D 32 30 32 3A 89 31 30 00 27 |....":.202:.10.'|
000004F0: 0D 4A 00 98 31 35 2C 22 49 30 22 3A 99 22 13 11 |.J..15,"I0":."..|
00000500: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000510: 11 11 11 22 3A 8B C2 28 37 38 38 29 B2 35 32 A7 |...":..(788).52.|
00000520: 97 37 38 38 2C 34 39 00 2F 0D 4C 00 80 3A 8A 00 |.788,49./.L..:..|
00000530: 4A 0D 4E 00 41 B2 38 32 38 3A 54 45 4D B2 41 3A |J.N.A.828:TEM.A:|
00000540: 8F 20 46 49 4C 45 52 45 41 44 00 75 0D 50 00 97 |. FILEREAD.u.P..|
00000550: 32 31 30 2C B5 28 41 AD 32 35 36 29 3A 97 32 30 |210,.(A.256):.20|
00000560: 39 2C 41 AB 32 35 36 AC C2 28 32 31 30 29 3A 97 |9,A.256..(210):.|
00000570: 32 31 31 2C 30 00 A9 0D 52 00 99 22 12 22 C7 28 |211,0...R..".".(|
00000580: 33 34 29 C7 28 33 34 29 C7 28 32 30 29 22 92 42 |34).(34).(20)".B|
00000590: 20 12 C6 BF 20 92 40 20 12 A4 BF 59 92 B8 44 12 | ... .@ ...Y..D.|
000005A0: C8 D0 B7 92 CC 12 CC BF 22 00 D3 0D 54 00 8B C2 |........"...T...|
000005B0: 28 37 38 38 29 B2 34 39 A7 97 37 38 38 2C 35 32 |(788).49..788,52|
000005C0: 3A 8F 20 53 54 4F 50 20 4B 45 59 20 44 49 53 41 |:. STOP KEY DISA|
000005D0: 42 4C 45 00 DE 0D 56 00 99 22 0E 99 22 3B 00 FA |BLE...V.."..";..|
000005E0: 0D 58 00 53 53 B2 31 30 32 34 AA 31 32 30 3A 49 |.X.SS.1024.120:I|
000005F0: B2 30 3A 42 B2 30 3A 4A B2 30 00 16 0E 5A 00 41 |.0:B.0:J.0...Z.A|
00000600: 24 B2 22 22 3A 45 24 B2 22 22 3A 54 24 B2 22 22 |$."":E$."":T$.""|
00000610: 3A 53 24 B2 22 22 00 47 0E 5C 00 99 22 93 99 11 |:S$."".G.\.."...|
00000620: 11 11 D0 4C 45 41 53 45 20 50 55 54 20 54 48 45 |...LEASE PUT THE|
00000630: 20 D3 C9 C3 CB 20 C4 C9 D3 CB 20 49 4E 20 44 52 | .... .... IN DR|
00000640: 49 56 45 20 30 2E 22 00 76 0E 5E 00 99 22 11 11 |IVE 0.".v.^.."..|
00000650: D9 4F 55 20 53 48 4F 55 4C 44 20 55 53 45 20 54 |.OU SHOULD USE T|
00000660: 48 45 20 C4 CF D3 20 27 D6 27 20 43 4F 4D 4D 41 |HE ... '.' COMMA|
00000670: 4E 44 20 54 4F 22 00 A3 0E 60 00 99 22 55 50 44 |ND TO"...`.."UPD|
00000680: 41 54 45 20 54 48 45 20 C2 C1 CD 20 4F 4E 20 54 |ATE THE ... ON T|
00000690: 48 45 20 44 49 53 4B 20 57 48 45 4E 20 44 4F 4E |HE DISK WHEN DON|
000006A0: 45 2E 22 00 C9 0E 62 00 99 22 11 11 CE 4F 54 45 |E."...b.."...OTE|
000006B0: 3A 20 C4 49 53 4B 20 44 45 56 49 43 45 20 49 53 |: .ISK DEVICE IS|
000006C0: 22 44 4E 22 9D 2E 11 11 22 00 ED 0E 64 00 99 22 |"DN"...."...d.."|
000006D0: 11 11 12 D0 52 45 53 53 20 C1 CE D9 20 CB C5 D9 |....RESS ... ...|
000006E0: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 FF 0E | TO CONTINUE"...|
000006F0: 66 00 8D 34 3A 8B 41 24 B2 22 22 A7 31 30 32 00 |f..4:.A$."".102.|
00000700: 16 0F 68 00 8D 31 30 30 32 31 3A 8B 41 24 B2 C7 |..h..10021:.A$..|
00000710: 28 33 29 A7 37 34 00 46 0F 6A 00 9F 31 2C 44 4E |(3).74.F.j..1,DN|
00000720: 2C 32 2C 22 30 3A A0 A0 A0 2C 53 2C 52 22 3A 84 |,2,"0:...,S,R":.|
00000730: 31 35 2C 45 24 3A 8B 45 24 B2 22 36 32 22 A7 A0 |15,E$:.E$."62"..|
00000740: 31 3A 89 31 31 34 00 73 0F 6C 00 8B 45 24 B1 22 |1:.114.s.l..E$."|
00000750: 36 34 22 A7 84 31 2C 45 24 3A 99 22 93 11 11 11 |64"..1,E$:."....|
00000760: 11 11 22 45 24 22 20 20 4F 4E 20 44 52 49 56 45 |.."E$" ON DRIVE|
00000770: 20 30 22 00 85 0F 6E 00 8B 45 24 B2 22 32 31 22 | 0"...n..E$."21"|
00000780: A7 8D 31 38 34 00 92 0F 70 00 98 31 35 2C 22 49 |..184...p..15,"I|
00000790: 30 22 00 A8 0F 72 00 9F 32 2C 44 4E 2C 32 2C 22 |0"...r..2,DN,2,"|
000007A0: 23 32 22 3A 99 22 93 22 00 B1 0F 74 00 8D 31 39 |#2":."."...t..19|
000007B0: 32 00 EC 0F 76 00 99 22 13 11 11 11 11 11 11 11 |2...v.."........|
000007C0: 11 11 11 11 11 11 11 11 11 11 11 11 11 20 20 20 |............. |
000007D0: 20 20 20 D4 D2 C1 C3 CB 20 20 20 22 CA 28 C4 28 | ..... ".(.(|
000007E0: C5 28 54 24 29 29 2C 32 29 22 A0 22 00 13 10 78 |.(T$)),2)"."...x|
000007F0: 00 99 22 20 20 20 20 20 20 D3 C5 C3 D4 CF D2 20 |.." ...... |
00000800: 20 22 CA 28 C4 28 C5 28 53 24 29 29 2C 32 29 22 | ".(.(.(S$)),2)"|
00000810: A0 91 91 00 40 10 7A 00 99 22 C9 4E 50 55 54 20 |....@.z..".NPUT |
00000820: D4 D2 C1 C3 CB 3A 20 20 22 3B 3A 84 39 2C 54 24 |.....: ";:.9,T$|
00000830: 3A 99 3A 8B 54 24 B2 C7 28 31 36 30 29 A7 37 34 |:.:.T$..(160).74|
00000840: 00 77 10 7C 00 99 22 91 20 20 20 20 20 22 3A 99 |.w.|..". ":.|
00000850: 22 C9 4E 50 55 54 20 D3 C5 C3 D4 CF D2 3A 20 22 |".NPUT ......: "|
00000860: 3B 3A 84 39 2C 53 24 3A 99 3A 8B 53 24 B2 C7 28 |;:.9,S$:.:.S$..(|
00000870: 31 36 30 29 A7 37 34 00 A7 10 7E 00 99 22 91 20 |160).74...~..". |
00000880: 20 20 20 20 22 3A 54 24 B2 CA 28 C4 28 C5 28 54 | ":T$..(.(.(T|
00000890: 24 29 29 2C 32 29 3A 53 24 B2 CA 28 C4 28 C5 28 |$)),2):S$..(.(.(|
000008A0: 53 24 29 29 2C 32 29 00 B8 10 80 00 8B C5 28 54 |S$)),2).......(T|
000008B0: 24 29 B2 30 A7 31 31 36 00 FB 10 82 00 99 22 13 |$).0.116......".|
000008C0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000008D0: 11 11 11 20 20 20 20 20 20 20 20 20 20 20 20 20 |... |
000008E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008F0: 20 20 20 20 20 20 20 20 20 20 22 00 2A 11 84 00 | ".*...|
00000900: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
00000910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000920: 20 20 20 20 20 20 20 20 20 22 00 59 11 86 00 99 | ".Y....|
00000930: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000940: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000950: 20 20 20 20 20 20 20 20 22 00 7C 11 88 00 98 31 | ".|....1|
00000960: 35 2C 22 55 31 3A 32 2C 30 2C 22 54 24 22 2C 22 |5,"U1:2,0,"T$","|
00000970: 53 24 3A 8F 20 43 48 32 20 44 52 30 00 A2 11 8A |S$:. CH2 DR0....|
00000980: 00 84 31 35 2C 45 31 24 2C 45 32 24 2C 45 33 24 |..15,E1$,E2$,E3$|
00000990: 2C 45 34 24 3A 8B 45 31 24 B2 22 30 30 22 A7 31 |,E4$:.E1$."00".1|
000009A0: 35 36 00 CB 11 8C 00 8D 31 39 32 3A 45 32 24 B2 |56......192:E2$.|
000009B0: 22 20 C4 C9 D3 CB 20 C5 D2 D2 CF D2 20 23 22 AA |" .... ..... #".|
000009C0: 45 31 24 AA 22 2C 22 AA 45 32 24 00 F4 11 8E 00 |E1$.",".E2$.....|
000009D0: 99 22 13 11 11 22 3A 81 49 B2 31 A4 C3 28 45 32 |."...":.I.1..(E2|
000009E0: 24 29 3A 99 22 AF 22 3B 3A 82 3A 99 3A 99 22 12 |$):.".";:.:.:.".|
000009F0: 22 45 32 24 00 0E 12 90 00 81 49 B2 31 A4 C3 28 |"E2$......I.1..(|
00000A00: 45 32 24 29 3A 99 22 A3 22 3B 3A 82 3A 99 00 43 |E2$):.".";:.:..C|
00000A10: 12 92 00 99 22 49 4E 20 D4 D2 C1 C3 CB 22 C5 28 |...."IN .....".(|
00000A20: 45 33 24 29 22 9D 2C 20 D3 C5 C3 D4 CF D2 22 C5 |E3$)"., ......".|
00000A30: 28 45 34 24 29 3A 8B 45 31 24 B2 22 36 36 22 A7 |(E4$):.E1$."66".|
00000A40: 31 31 38 00 61 12 94 00 99 22 54 52 59 20 41 47 |118.a...."TRY AG|
00000A50: 41 49 4E 3F 20 28 43 52 2F 4E 20 4F 52 20 59 29 |AIN? (CR/N OR Y)|
00000A60: 22 00 74 12 96 00 A1 41 24 3A 8B 41 24 B2 22 22 |".t....A$:.A$.""|
00000A70: A7 31 35 30 00 84 12 98 00 8B 41 24 B2 22 59 22 |.150......A$."Y"|
00000A80: A7 31 33 36 00 93 12 9A 00 98 31 35 2C 22 49 30 |.136......15,"I0|
00000A90: 22 3A 8A 00 B5 12 9C 00 8D 31 39 32 3A 98 31 35 |":.......192:.15|
00000AA0: 2C 22 42 2D 50 3A 32 2C 30 22 3A 8F 20 43 48 32 |,"B-P:2,0":. CH2|
00000AB0: 20 50 4F 53 31 00 BE 12 9E 00 9E 54 45 4D 00 C6 | POS1......TEM..|
00000AC0: 12 A0 00 49 B2 30 00 D3 12 A2 00 99 3A 97 31 39 |...I.0......:.19|
00000AD0: 38 2C 30 00 DB 12 A4 00 89 31 30 00 F4 12 A6 00 |8,0......10.....|
00000AE0: 8B 42 B1 32 35 35 B0 C6 28 42 24 29 B2 31 36 30 |.B.255..(B$).160|
00000AF0: A7 31 37 34 00 01 13 A8 00 97 53 53 AA 49 2C 42 |.174......SS.I,B|
00000B00: 3A 00 1F 13 AA 00 98 31 35 2C 22 42 2D 50 3A 32 |:......15,"B-P:2|
00000B10: 2C 22 C4 28 49 29 3A 98 32 2C C7 28 42 29 3B 00 |,".(I):.2,.(B);.|
00000B20: 2E 13 AC 00 49 B2 49 AA 31 3A 89 31 36 34 00 64 |....I.I.1:.164.d|
00000B30: 13 AE 00 99 22 13 11 11 11 11 11 11 11 11 11 11 |...."...........|
00000B40: 11 11 11 11 11 11 11 11 11 11 11 11 11 12 C1 D2 |................|
00000B50: C5 20 D9 CF D5 20 D3 D5 D2 C5 20 28 4E 20 4F 52 |. ... .... (N OR|
00000B60: 20 59 29 22 00 A1 13 B0 00 A1 41 24 3A 4A B2 AB | Y)"......A$:J..|
00000B70: 28 41 24 B2 22 59 22 29 AB 32 AC 28 41 24 B2 22 |(A$."Y").2.(A$."|
00000B80: 4E 22 29 AB 33 AC 28 41 24 B2 C7 28 33 29 29 3A |N").3.(A$..(3)):|
00000B90: 91 4A 89 31 37 38 2C 37 32 2C 37 34 3A 89 31 37 |.J.178,72,74:.17|
00000BA0: 36 00 CC 13 B2 00 98 31 35 2C 22 4D 2D 57 22 5A |6......15,"M-W"Z|
00000BB0: 24 C7 28 31 39 29 C7 28 32 29 C7 28 C2 28 53 53 |$.(19).(2).(.(SS|
00000BC0: 29 29 C7 28 C2 28 53 53 AA 31 29 29 00 E5 13 B4 |)).(.(SS.1))....|
00000BD0: 00 98 31 35 2C 22 55 32 3A 32 2C 30 2C 22 54 24 |..15,"U2:2,0,"T$|
00000BE0: 22 2C 22 53 24 00 F4 13 B6 00 98 31 35 2C 22 49 |","S$......15,"I|
00000BF0: 30 22 3A 8A 00 0F 14 B8 00 99 22 11 11 4E 4F 20 |0":......."..NO |
00000C00: 44 49 53 4B 20 49 4E 20 44 52 49 56 45 20 30 00 |DISK IN DRIVE 0.|
00000C10: 3B 14 BA 00 99 22 11 50 4C 41 43 45 20 44 49 53 |;....".PLACE DIS|
00000C20: 4B 20 49 4E 20 44 52 49 56 45 20 30 2C 20 50 52 |K IN DRIVE 0, PR|
00000C30: 45 53 53 20 41 4E 59 20 4B 45 59 00 4E 14 BC 00 |ESS ANY KEY.N...|
00000C40: A1 41 24 3A 8B 41 24 B2 22 22 A7 31 38 38 00 54 |.A$:.A$."".188.T|
00000C50: 14 BE 00 8E 00 87 14 C0 00 99 22 13 91 B0 C0 C0 |..........".....|
00000C60: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 20 |............... |
00000C70: B0 C0 C0 C0 C0 C0 C0 C0 C0 AE B0 C0 C0 C0 C0 C0 |................|
00000C80: C0 C0 C0 C0 AE 22 3B 00 D0 14 C2 00 99 22 DD C4 |.....";......"..|
00000C90: 49 53 4B 20 C4 4F 43 54 4F 52 20 36 34 2E 30 DD |ISK .OCTOR 64.0.|
00000CA0: 20 DD D4 D2 C1 C3 CB 3A 22 C9 28 22 20 20 22 AA | ......:".(" ".|
00000CB0: 54 24 2C 32 29 22 DD DD D3 C5 C3 D4 CF D2 3A 22 |T$,2)"........:"|
00000CC0: C9 28 22 20 20 22 AA 53 24 2C 32 29 22 DD 22 3B |.(" ".S$,2)".";|
00000CD0: 00 01 15 C4 00 99 22 B1 C0 C0 C0 C0 C0 C0 C0 C0 |......".........|
00000CE0: C0 C0 C0 C0 C0 C0 C0 C0 B1 C0 B1 C0 C0 C0 C0 C0 |................|
00000CF0: C0 C0 C0 B1 B1 C0 C0 C0 C0 C0 C0 C0 C0 C0 B1 22 |..............."|
00000D00: 3B 00 33 15 C6 00 81 49 B2 31 A4 38 3A 99 22 20 |;.3....I.1.8:." |
00000D10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00000D30: 3B 3A 82 00 64 15 C8 00 99 22 B0 C0 C0 C0 C0 C0 |;:..d...."......|
00000D40: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000D50: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000D60: C0 C0 BD 22 00 92 15 CA 00 99 22 50 52 45 53 53 |..."......"PRESS|
00000D70: 20 5B 40 5D 20 2D 20 C3 48 41 4E 47 45 20 42 59 | [@] - .HANGE BY|
00000D80: 54 45 20 55 4E 44 45 52 20 43 55 52 53 4F 52 20 |TE UNDER CURSOR |
00000D90: 20 22 00 C2 15 CC 00 99 22 20 20 20 20 20 20 5B | "......" [|
00000DA0: CE 5D 20 2D 20 C7 4F 20 54 4F 20 12 CE 92 45 58 |.] - .O TO ...EX|
00000DB0: 54 20 42 4C 4F 43 4B 20 4F 46 20 46 49 4C 45 20 |T BLOCK OF FILE |
00000DC0: 20 22 00 F2 15 CE 00 99 22 20 20 20 20 20 20 5B | "......" [|
00000DD0: CA 5D 20 2D 20 12 CA 92 55 4D 50 20 54 4F 20 4C |.] - ...UMP TO L|
00000DE0: 49 4E 4B 20 55 4E 44 45 52 20 43 55 52 53 4F 52 |INK UNDER CURSOR|
00000DF0: 20 22 00 22 16 D0 00 99 22 20 20 20 20 20 20 5B | "."...." [|
00000E00: D1 5D 20 2D 20 12 D1 92 55 49 54 20 20 20 20 20 |.] - ...UIT |
00000E10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E20: 20 22 00 52 16 D2 00 99 22 20 20 20 20 20 20 5B | ".R...." [|
00000E30: D2 5D 20 2D 20 12 D2 92 45 57 52 49 54 45 20 43 |.] - ...EWRITE C|
00000E40: 55 52 52 45 4E 54 20 42 4C 4F 43 4B 20 20 20 20 |URRENT BLOCK |
00000E50: 20 22 00 82 16 D4 00 99 22 20 20 20 20 20 20 5B | "......" [|
00000E60: C2 5D 20 2D 20 CE 45 57 20 12 C2 92 4C 4F 43 4B |.] - .EW ...LOCK|
00000E70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E80: 20 22 00 B2 16 D6 00 99 22 20 20 20 20 20 20 5B | "......" [|
00000E90: D4 5D 20 2D 20 C1 44 44 20 12 D4 92 45 58 54 20 |.] - .DD ...EXT |
00000EA0: 53 54 52 49 4E 47 20 20 20 20 20 20 20 20 20 20 |STRING |
00000EB0: 20 22 00 E0 16 D8 00 99 22 20 20 5B 2B 5D 2F 5B | "......" [+]/[|
00000EC0: 2D 5D 20 2D 20 D3 43 41 4E 20 46 4F 52 57 41 52 |-] - .CAN FORWAR|
00000ED0: 44 2F 42 41 43 4B 57 41 52 44 20 20 20 20 20 22 |D/BACKWARD "|
00000EE0: 00 1A 17 DA 00 81 44 B2 31 A4 35 3A 99 22 20 20 |......D.1.5:." |
00000EF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F10: 20 20 20 20 20 20 22 3B 3A 82 00 3D 17 DC 00 81 | ";:..=....|
00000F20: 44 B2 32 31 37 A4 32 34 32 3A 97 44 2C C2 28 44 |D.217.242:.D,.(D|
00000F30: 29 B0 31 32 38 3A 82 3A 99 22 13 22 3B 00 43 17 |).128:.:.".";.C.|
00000F40: DE 00 8E 00 91 17 E0 00 43 56 B2 31 3A 43 4D 24 |........CV.1:CM$|
00000F50: B2 22 C7 45 54 20 D3 D9 D3 D2 C5 D3 2C 20 54 48 |.".ET ......, TH|
00000F60: 45 20 55 4C 54 49 4D 41 54 45 20 50 52 4F 47 52 |E ULTIMATE PROGR|
00000F70: 41 4D 20 4D 41 4E 49 50 55 4C 41 54 49 4F 4E 20 |AM MANIPULATION |
00000F80: 53 59 53 54 45 4D 2C 20 41 54 20 22 3A 8F 22 8D |SYSTEM, AT ":.".|
00000F90: 93 00 CD 17 E2 00 43 4D 24 B2 43 4D 24 AA 22 59 |......CM$.CM$."Y|
00000FA0: 4F 55 52 20 4C 4F 43 41 4C 20 44 45 41 4C 45 52 |OUR LOCAL DEALER|
00000FB0: 2E 20 C9 54 20 41 44 44 53 20 4F 56 45 52 20 31 |. .T ADDS OVER 1|
00000FC0: 31 30 30 20 4E 45 57 22 3A 8F 22 8D 93 00 19 18 |100 NEW":.".....|
00000FD0: E4 00 43 4D 24 B2 43 4D 24 AA 22 20 45 44 49 54 |..CM$.CM$." EDIT|
00000FE0: 49 4E 47 20 41 4E 44 20 44 49 53 4B 20 46 55 4E |ING AND DISK FUN|
00000FF0: 43 54 49 4F 4E 53 2E 20 D3 50 45 4E 44 20 4C 45 |CTIONS. .PEND LE|
00001000: 53 53 20 54 49 4D 45 20 43 4F 52 52 45 43 54 49 |SS TIME CORRECTI|
00001010: 4E 47 20 59 4F 55 52 20 22 00 53 18 E6 00 43 4D |NG YOUR ".S...CM|
00001020: 24 B2 43 4D 24 AA 22 4D 49 53 54 41 4B 45 53 20 |$.CM$."MISTAKES |
00001030: 41 4E 44 20 4D 4F 52 45 20 54 49 4D 45 20 50 52 |AND MORE TIME PR|
00001040: 4F 47 52 41 4D 4D 49 4E 47 2E 20 20 20 22 3A 8F |OGRAMMING. ":.|
00001050: 22 8D 93 00 99 18 E8 00 43 4D 24 B2 43 4D 24 AA |".......CM$.CM$.|
00001060: 22 C1 20 C3 4F 4D 4D 4F 44 4F 52 45 20 36 34 20 |". .OMMODORE 64 |
00001070: 57 49 54 48 4F 55 54 20 D3 D9 D3 D2 C5 D3 20 49 |WITHOUT ...... I|
00001080: 53 20 4F 4E 4C 59 20 41 20 C3 4F 4D 4D 4F 44 4F |S ONLY A .OMMODO|
00001090: 52 45 20 36 33 2E 35 21 22 00 A1 18 EA 00 8E 3A |RE 63.5!"......:|
000010A0: 13 00 EE 18 EC 00 43 56 B2 32 3A 43 4D 24 B2 22 |......CV.2:CM$."|
000010B0: 2A 2A CE C5 D7 2A 2A 20 46 52 4F 4D 20 D3 CF CC |**...** FROM ...|
000010C0: C9 C4 D5 D3 20 C9 CE D4 C5 D2 CE C1 D4 C9 CF CE |.... ...........|
000010D0: C1 CC 2E 2E 2E 20 20 20 20 20 20 20 20 20 20 20 |..... |
000010E0: 20 20 20 20 20 20 20 20 20 3A 20 20 20 22 00 29 | : ".)|
000010F0: 19 EE 00 43 4D 24 B2 43 4D 24 AA 22 D3 CF CC C9 |...CM$.CM$."....|
00001100: C4 C5 D8 2C 20 54 48 45 20 50 45 52 53 4F 4E 41 |..., THE PERSONA|
00001110: 4C 20 45 E1 55 E1 20 46 49 4C 45 52 2E 20 20 20 |L E.U. FILER. |
00001120: 20 20 20 22 3A 8F 22 8D 93 00 77 19 F0 00 43 4D | ":."...w...CM|
00001130: 24 B2 43 4D 24 AA 22 D3 54 4F 52 45 3A 4E 4F 54 |$.CM$.".TORE:NOT|
00001140: 45 53 2C 20 52 45 43 4F 52 44 53 2C 20 52 45 43 |ES, RECORDS, REC|
00001150: 49 50 45 53 2C 20 45 54 43 2E 20 4F 4E 20 45 4C |IPES, ETC. ON EL|
00001160: 45 43 54 52 4F 4E 49 43 20 49 4E 44 45 58 20 43 |ECTRONIC INDEX C|
00001170: 41 52 44 53 2E 20 22 00 AF 19 F2 00 43 4D 24 B2 |ARDS. ".....CM$.|
00001180: 43 4D 24 AA 22 20 20 20 C8 55 4E 44 52 45 44 53 |CM$." .UNDREDS|
00001190: 20 4F 46 20 55 53 45 53 20 41 52 4F 55 4E 44 20 | OF USES AROUND |
000011A0: 54 48 45 20 48 4F 4D 45 20 22 3A 8F 22 8D 93 00 |THE HOME ":."...|
000011B0: E6 19 F4 00 43 4D 24 B2 43 4D 24 AA 22 41 4E 44 |....CM$.CM$."AND|
000011C0: 20 4F 46 46 49 43 45 2E 20 D3 45 45 20 49 54 20 | OFFICE. .EE IT |
000011D0: 41 54 20 59 4F 55 52 20 4C 4F 43 41 4C 20 44 45 |AT YOUR LOCAL DE|
000011E0: 41 4C 45 52 2E 22 00 EE 19 F6 00 8E 3A 13 00 3A |ALER."......:..:|
000011F0: 1A F8 00 43 56 B2 32 3A 43 4D 24 B2 22 D4 48 49 |...CV.2:CM$.".HI|
00001200: 53 20 50 52 4F 47 52 41 4D 20 48 41 53 20 42 45 |S PROGRAM HAS BE|
00001210: 45 4E 20 52 45 4C 45 41 53 45 44 20 54 4F 20 50 |EN RELEASED TO P|
00001220: 55 42 4C 49 43 20 44 4F 4D 41 49 4E 20 43 4F 55 |UBLIC DOMAIN COU|
00001230: 52 54 45 53 59 20 4F 46 20 22 00 70 1A FA 00 43 |RTESY OF ".p...C|
00001240: 4D 24 B2 43 4D 24 AA 22 D3 4F 4C 49 44 55 53 20 |M$.CM$.".OLIDUS |
00001250: C9 4E 54 45 52 4E 41 54 49 4F 4E 41 4C 20 C3 4F |.NTERNATIONAL .O|
00001260: 52 50 4F 52 41 54 49 4F 4E 22 3A 8E 3A 22 8D 93 |RPORATION":.:"..|
00001270: 00 7F 1A FC 00 8B 43 43 B2 30 A7 8D 32 34 38 00 |......CC.0..248.|
00001280: 9C 1A FE 00 8B 43 43 B1 35 35 30 A7 43 43 B2 30 |.....CC.550.CC.0|
00001290: 3A 91 43 56 8D 32 33 36 2C 32 32 34 00 B6 1A 00 |:.CV.236,224....|
000012A0: 01 43 43 B2 43 43 AA 31 3A 8B 43 43 B1 32 39 32 |.CC.CC.1:.CC.292|
000012B0: A7 8E 3A 22 8D 93 00 D8 1A 02 01 99 22 13 11 11 |..:"........"...|
000012C0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000012D0: 11 11 11 11 11 11 22 3B 00 E5 1A 04 01 43 50 B2 |......";.....CP.|
000012E0: B5 28 43 43 29 00 0C 1B 06 01 8B 43 50 B3 33 39 |.(CC)......CP.39|
000012F0: A7 99 A6 33 39 AB 43 50 29 C8 28 43 4D 24 2C 43 |...39.CP).(CM$,C|
00001300: 50 29 22 13 22 3B 3A 8E 3A 22 8D 93 00 56 1B 08 |P)".";:.:"...V..|
00001310: 01 99 C8 28 C8 28 CA 28 43 4D 24 2C 43 50 AB 33 |...(.(.(CM$,CP.3|
00001320: 38 29 2C 33 39 29 AA 22 20 20 20 20 20 20 20 20 |8),39)." |
00001330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2C | ",|
00001350: 33 39 29 22 13 22 00 5C 1B 0A 01 8E 00 66 1B 10 |39)".".\.....f..|
00001360: 27 22 8D 93 0E 9E 00 8E 1B 24 27 22 14 14 14 14 |'".......$'"....|
00001370: 14 14 14 D0 52 4F 47 52 41 4D 3A 20 22 22 14 C4 |....ROGRAM: ""..|
00001380: 49 53 4B 20 C4 4F 43 54 4F 52 20 36 34 22 00 AF |ISK .OCTOR 64"..|
00001390: 1B 25 27 89 31 30 31 32 33 3A 22 14 14 14 14 14 |.%'.10123:".....|
000013A0: 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 00 |................|
000013B0: BC 1B 29 27 22 14 14 14 14 14 14 14 00 DA 1B 2E |..)'"...........|
000013C0: 27 22 14 14 14 14 14 14 14 C1 55 54 48 4F 52 3A |'"........UTHOR:|
000013D0: 20 C4 4F 4E 20 CC 45 4B 45 49 00 E7 1B 33 27 22 | .ON .EKEI...3'"|
000013E0: 14 14 14 14 14 14 14 00 F4 1B 34 27 22 14 14 14 |..........4'"...|
000013F0: 14 14 14 14 00 26 1C 38 27 22 14 14 14 14 14 14 |.....&.8'"......|
00001400: 14 D4 48 49 53 20 50 52 4F 47 52 41 4D 20 49 53 |..HIS PROGRAM IS|
00001410: 20 50 52 4F 56 49 44 45 44 20 43 4F 55 52 54 45 | PROVIDED COURTE|
00001420: 53 59 20 4F 46 3A 00 33 1C 3D 27 22 14 14 14 14 |SY OF:.3.='"....|
00001430: 14 14 14 00 64 1C 42 27 22 14 14 14 14 14 14 14 |....d.B'".......|
00001440: 20 20 20 D3 4F 4C 49 44 55 53 20 C9 4E 54 45 52 | .OLIDUS .NTER|
00001450: 4E 41 54 49 4F 4E 41 4C 20 C3 4F 52 50 4F 52 41 |NATIONAL .ORPORA|
00001460: 54 49 4F 4E 00 93 1C 4C 27 22 14 14 14 14 14 14 |TION...L'"......|
00001470: 14 20 20 20 20 D3 55 49 54 45 20 23 35 2C 20 31 |. .UITE #5, 1|
00001480: 34 34 20 D7 45 53 54 20 31 35 54 48 20 D3 54 52 |44 .EST 15TH .TR|
00001490: 45 45 54 00 BE 1C 56 27 22 14 14 14 14 14 14 14 |EET...V'".......|
000014A0: 20 20 20 20 20 20 20 20 20 CE 4F 52 54 48 20 D6 | .ORTH .|
000014B0: 41 4E 43 4F 55 56 45 52 2C 20 C2 2E C3 2E 00 E8 |ANCOUVER, ......|
000014C0: 1C 5B 27 22 14 14 14 14 14 14 14 20 20 20 20 20 |.['"....... |
000014D0: 20 20 20 20 D0 48 4F 4E 45 3A 20 28 36 30 34 29 | .HONE: (604)|
000014E0: 39 38 34 2D 30 34 37 37 00 F5 1C 60 27 22 14 14 |984-0477...`'"..|
000014F0: 14 14 14 14 14 00 28 1D 6A 27 22 14 14 14 14 14 |......(.j'".....|
00001500: 14 14 D4 4F 20 47 45 54 20 54 48 45 20 CD C1 D8 |...O GET THE ...|
00001510: C9 CD D5 CD 20 55 53 45 20 4F 55 54 20 4F 46 20 |.... USE OUT OF |
00001520: 59 4F 55 52 20 4E 45 57 00 58 1D 74 27 22 14 14 |YOUR NEW.X.t'"..|
00001530: 14 14 14 14 14 C3 4F 4D 4D 4F 44 4F 52 45 2D 36 |......OMMODORE-6|
00001540: 34 20 43 4F 4D 50 55 54 45 52 20 41 4E 44 20 59 |4 COMPUTER AND Y|
00001550: 4F 55 52 20 44 49 53 4B 00 7F 1D 7E 27 22 14 14 |OUR DISK...~'"..|
00001560: 14 14 14 14 14 44 52 49 56 45 2C 20 57 45 20 52 |.....DRIVE, WE R|
00001570: 45 43 4F 4D 4D 45 4E 44 20 55 53 49 4E 47 3A 00 |ECOMMEND USING:.|
00001580: A9 1D 8B 27 5A 24 B2 C7 28 30 29 3A 8F 22 8D 91 |...'Z$..(0):."..|
00001590: A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |................|
000015A0: A0 A0 A0 A0 A0 A0 A0 A0 91 00 D5 1D 8C 27 9F 31 |.............'.1|
000015B0: 35 2C 44 4E 2C 31 35 3A 8F 22 8D 91 A0 A0 A0 A0 |5,DN,15:."......|
000015C0: A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |................|
000015D0: A0 A0 A0 A0 91 00 FC 1D 8D 27 9F 39 2C 30 3A 8F |.........'.9,0:.|
000015E0: 22 8D 91 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 |"...............|
000015F0: A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 91 00 20 1E 8E |............. ..|
00001600: 27 8E 3A 8F 22 8D 91 A0 A0 A0 A0 A0 A0 A0 A0 A0 |'.:."...........|
00001610: A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 A0 91 |................|
00001620: 00 4A 1E 92 27 22 14 14 14 14 14 14 14 8D 05 20 |.J..'"......... |
00001630: 20 20 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 20 | *** |
00001640: D3 D9 D3 D2 C5 D3 20 2A 2A 2A 00 57 1E 97 27 22 |...... ***.W..'"|
00001650: 14 14 14 14 14 14 14 00 8A 1E 9C 27 22 14 14 14 |...........'"...|
00001660: 14 14 14 14 20 20 22 22 14 D4 48 45 20 D5 4C 54 |.... ""..HE .LT|
00001670: 49 4D 41 54 45 20 D0 52 4F 47 52 41 4D 20 CD 41 |IMATE .ROGRAM .A|
00001680: 4E 49 50 55 4C 41 54 49 4F 4E 00 BE 1E A6 27 22 |NIPULATION....'"|
00001690: 14 14 14 14 14 14 14 20 20 D3 59 53 54 45 4D 20 |....... .YSTEM |
000016A0: 46 4F 52 20 C3 4F 4D 4D 4F 44 4F 52 45 20 CD 49 |FOR .OMMODORE .I|
000016B0: 43 52 4F 43 4F 4D 50 55 54 45 52 53 2E 22 00 F5 |CROCOMPUTERS."..|
000016C0: 1E BA 27 22 14 14 14 14 14 14 14 8D 9E CE 4F 57 |..'"..........OW|
000016D0: 20 41 56 41 49 4C 41 42 4C 45 20 41 54 20 59 4F | AVAILABLE AT YO|
000016E0: 55 52 20 C3 4F 4D 4D 4F 44 4F 52 45 20 44 45 41 |UR .OMMODORE DEA|
000016F0: 4C 45 52 2E 05 00 00 00 |LER..... |
......DN.8:. DEVICE #.N....53280,11:.532
81,0:.A$,I,S$,T$,CC,B,SS,E$,J,TE,A:.78..
....A$:.A$."".."........................
.
.";:CC.293:.......A$."".252.A..........I
.0.I.280.I:.I.255.I.I.40......I.255.I.I.
.(I.40).40.8....".....................".
10)B(SS.I)". ":.".".10)I". ".N....".
....................VALUE: ":.".POSI
TION:"......J.1.2:.I.SS,(B(I.SS).128).25
5:.D.0.1:.D,J......4:.A$."".18......PF.6
6.U....A$.".".I.(I.1).255:.10......A$.".
".I.(I.1).255:.10......A$.".".I.I.40:.10
......A$.".".I.I.40:.10.3. ..A$.".".I.0:
.10.^."..A$."N".T$.D(B(SS)):S$.D(B(SS.1)
):.128...$..A$."J".T$.D(B(SS.I)):S$.D(B(
SS.I.1)):.128...&..A$."Q"..15,"I0":..C.(
..A$."+".S$.D(E(S$).1):.128...*..A$."-".
S$.D((E(S$).1)..(E(S$))):.128...,..A$."R
".174......A$."B".116.G.0..A$."T".."....
.......":.218:.".............":.218:.64.
W.2..A$.G(3).74.G.4..A$.."@".10...6..I.0
.I.280.I:.I.255.I.I.40. .8..I.255.I.I..(
I.40).40...:..".....................".10
)B(SS.I)". ":.".".10)I". "...<..198,
0:.".....................NEW VALUE: ";:.
9,B$:..A.>..".".20)" ":B.E
(B$):.166...@.."................ PRESS
[RETURN] TO END TEXT MODE":PF.1:.A$:.10
...B..A$.G(13).PF.0:."...........":.202:
.10.A.D..A$."".20.R.F.B.F(A$):.168...H..
"...........":.202:.10.'.J..15,"I0":."..
...................":.B(788).52..788,49.
/.L..:..J.N.A.828:TEM.A:. FILEREAD.U.P..
210,.(A.256):.209,A.256.B(210):.211,0...
R.."."G(34)G(34)G(20)".B .F. .@ ...Y..D.
HP..L.L.".S.T..B(788).49..788,52:. STOP
KEY DISABLE...V.."..";...X.SS.1024.120:I
.0:B.0:J.0...Z.A$."":E$."":T$."":S$."".G
.\..".....PLEASE PUT THE SICK DISK IN DR
IVE 0.".V.^.."..YOU SHOULD USE THE DOS '
V' COMMAND TO"...`.."UPDATE THE BAM ON T
HE DISK WHEN DONE.".I.B.."..NOTE: DISK D
EVICE IS"DN"...."...D.."...PRESS ANY KEY
TO CONTINUE"...F..4:.A$."".102...H..100
21:.A$.G(3).74.F.J..1,DN,2,"0: ,S,R":.
15,E$:.E$."62". 1:.114.S.L..E$."64"..1,E
$:."......"E$" ON DRIVE 0"...N..E$."21"
..184...P..15,"I0"...R..2,DN,2,"#2":."."
...T..192...V..".....................
TRACK "J(D(E(T$)),2)" "...X.."
SECTOR "J(D(E(S$)),2)" ...@.Z.."INPUT
TRACK: ";:.9,T$:.:.T$.G(160).74.W.|..".
":."INPUT SECTOR: ";:.9,S$:.:.S$.G(
160).74...~..". ":T$.J(D(E(T$)),2):S
$.J(D(E(S$)),2)......E(T$).0.116......".
...................
".*...."
".Y...."
".|....1
5,"U1:2,0,"T$","S$:. CH2 DR0......15,E1$
,E2$,E3$,E4$:.E1$."00".156.K....192:E2$.
" DISK ERROR #".E1$.",".E2$......"...":.
I.1.C(E2$):.".";:.:.:."."E2$......I.1.C(
E2$):.".";:.:..C...."IN TRACK"E(E3$)".,
SECTOR"E(E4$):.E1$."66".118.A...."TRY AG
AIN? (CR/N OR Y)".T....A$:.A$."".150....
..A$."Y".136......15,"I0":.......192:.15
,"B-P:2,0":. CH2 POS1......TEM.F. .I.0.S
....:.198,0......10......B.255.F(B$).160
.174......SS.I,B:......15,"B-P:2,"D(I):.
2,G(B);.....I.I.1:.164.D...."...........
..............ARE YOU SURE (N OR Y)"....
..A$:J..(A$."Y").2.(A$."N").3.(A$.G(3)):
.J.178,72,74:.176.L....15,"M-W"Z$G(19)G(
2)G(B(SS))G(B(SS.1))......15,"U2:2,0,"T$
","S$......15,"I0":......."..NO DISK IN
DRIVE 0.;....".PLACE DISK IN DRIVE 0, PR
ESS ANY KEY.N....A$:.A$."".188.T........
..".................... ................
.....";.P.B..".DISK DOCTOR 64.0. .TRACK:
"I(" ".T$,2)"..SECTOR:"I(" ".S$,2)".";
...D..".................................
.......";.3.F..I.1.8:."
";:..D.H.."..............
..........................."...J.."PRESS
[@] - CHANGE BYTE UNDER CURSOR ".B.L..
" [N] - GO TO .N.EXT BLOCK OF FILE
"...N.." [J] - .J.UMP TO LINK UNDE
R CURSOR ".".P.." [Q] - .Q.UIT
".R.R.." [R] - .R.
EWRITE CURRENT BLOCK "...T.." [
B] - NEW .B.LOCK "...V..
" [T] - ADD .T.EXT STRING
"...X.." [+]/[-] - SCAN FORWARD/BACKWA
RD "...Z..D.1.5:."
";:..=....D.217.24
2:.D,B(D).128:.:.".";.C.........CV.1:CM$
."GET SYSRES, THE ULTIMATE PROGRAM MANIP
ULATION SYSTEM, AT ":."...M...CM$.CM$."Y
OUR LOCAL DEALER. IT ADDS OVER 1100 NEW"
:.".......CM$.CM$." EDITING AND DISK FUN
CTIONS. SPEND LESS TIME CORRECTING YOUR
".S...CM$.CM$."MISTAKES AND MORE TIME PR
OGRAMMING. ":.".......CM$.CM$."A COMMO
DORE 64 WITHOUT SYSRES IS ONLY A COMMODO
RE 63.5!"......:......CV.2:CM$."**NEW**
FROM SOLIDUS INTERNATIONAL...
: ".)...CM$.CM$."SOLIDEX, THE
PERSONAL E.U. FILER. ":."...W...CM
$.CM$."STORE:NOTES, RECORDS, RECIPES, ET
C. ON ELECTRONIC INDEX CARDS. ".....CM$.
CM$." HUNDREDS OF USES AROUND THE HOME
":.".......CM$.CM$."AND OFFICE. SEE IT
AT YOUR LOCAL DEALER."......:..:...CV.2:
CM$."THIS PROGRAM HAS BEEN RELEASED TO P
UBLIC DOMAIN COURTESY OF ".P...CM$.CM$."
SOLIDUS INTERNATIONAL CORPORATION":.:"..
.....CC.0..248......CC.550.CC.0:.CV.236
,224.....CC.CC.1:.CC.292..:"...X...."...
......................";.....CP..(CC)...
...CP.39...39.CP)H(CM$,CP)".";:.:"...V..
..H(H(J(CM$,CP.38),39)."
",39)".".\.....F..
'".......$'".......PROGRAM: "".DISK DOCT
OR 64"...%'.10123:".....................
..)'"........Z..'".......AUTHOR: DON LEK
EI...3'"..........4'"........&.8'"......
.THIS PROGRAM IS PROVIDED COURTESY OF:.3
.='"........D.B'"....... SOLIDUS INTER
NATIONAL CORPORATION...L'"....... SUI
TE #5, 144 WEST 15TH STREET...V'".......
NORTH VANCOUVER, B.C....['"....
... PHONE: (604)984-0477...`'"..
......(.J'".......TO GET THE MAXIMUM USE
OUT OF YOUR NEW.X.T'".......COMMODORE-6
4 COMPUTER AND YOUR DISK..~'".......DRI
VE, WE RECOMMEND USING:....'Z$.G(0):."..
..U..'.15,DN,15:
.".. .....'.9,0:.
".. .. ..'.:."..
..J..'".........
*** SYSRES ***.W..'"........
...'"....... "".THE ULTIMATE PROGRAM MA
NIPULATION....'"....... SYSTEM FOR COMM
ODORE MICROCOMPUTERS."....'".........NOW
AVAILABLE AT YOUR COMMODORE DEALER.....
> CLICK IMAGE PREVIEW FOR FULL MODAL