DISK DOCTOR.VIC
FILE INFORMATION
FILENAME(S): DISK DOCTOR.VIC
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-10-19 22:48:52
APPEARS ON: 1 disk(s)
FILE HASH
dd1038b262b6d797d637d1a46ee39db622c538cde83bf937d258e01d0eda6b13
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| AO JUNE | DISK DOCTOR.VIC | PRG | Radd Maxx | 23 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 12 3E 12 00 00 8F 20 43 4F 4E 56 45 52 54 45 |..>.... CONVERTE|
00000010: 44 20 46 52 4F 4D 20 20 20 20 43 2D 36 34 20 54 |D FROM C-64 T|
00000020: 4F 20 56 49 43 2D 32 30 20 20 20 20 20 20 20 20 |O VIC-20 |
00000030: 42 59 20 4B 45 56 49 4E 20 48 49 53 45 4C 00 6E |BY KEVIN HISEL.n|
00000040: 12 02 00 44 4E B2 38 3A 4B 24 B2 22 13 11 11 11 |...DN.8:K$."....|
00000050: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 |..............."|
00000060: 3A 97 33 36 38 37 39 2C 30 38 3A 89 36 38 00 8D |:.36879,08:.68..|
00000070: 12 04 00 8B 49 B3 30 A7 49 B2 32 36 34 AA 49 3A |....I.0.I.264.I:|
00000080: 8B 49 B1 32 35 35 A7 49 B2 49 AB 32 32 00 A7 12 |.I.255.I.I.22...|
00000090: 06 00 8B 49 B1 32 35 35 A7 49 B2 49 AB B5 28 49 |...I.255.I.I..(I|
000000A0: AD 32 32 29 AC 32 32 00 EF 12 08 00 99 4B 24 A6 |.22).22......K$.|
000000B0: 31 30 29 C2 28 53 53 AA 49 29 22 9D 20 20 20 22 |10).(SS.I)". "|
000000C0: 3A 99 22 11 22 A6 31 30 29 49 22 9D 20 20 20 22 |:.".".10)I". "|
000000D0: 3A 99 4B 24 22 56 41 4C 55 45 3A 20 20 20 20 20 |:.K$"VALUE: |
000000E0: 22 3A 99 22 11 50 4F 53 49 54 49 4F 4E 3A 22 00 |":.".POSITION:".|
000000F0: 1E 13 0A 00 81 4A B2 31 A4 32 3A 97 49 AA 53 53 |.....J.1.2:.I.SS|
00000100: 2C 28 C2 28 49 AA 53 53 29 AA 31 32 38 29 AF 32 |,(.(I.SS).128).2|
00000110: 35 35 3A 81 44 B2 30 A4 31 3A 82 44 2C 4A 00 30 |55:.D.0.1:.D,J.0|
00000120: 13 0C 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 30 |....A$:.A$."".10|
00000130: 00 3B 13 0E 00 8B 50 46 A7 35 36 00 56 13 10 00 |.;....PF.56.V...|
00000140: 8B 41 24 B2 22 1D 22 A7 49 B2 28 49 AA 31 29 AF |.A$.".".I.(I.1).|
00000150: 32 35 35 3A 89 34 00 71 13 12 00 8B 41 24 B2 22 |255:.4.q....A$."|
00000160: 9D 22 A7 49 B2 28 49 AB 31 29 AF 32 35 35 3A 89 |.".I.(I.1).255:.|
00000170: 34 00 87 13 14 00 8B 41 24 B2 22 91 22 A7 49 B2 |4......A$.".".I.|
00000180: 49 AB 32 32 3A 89 34 00 9D 13 16 00 8B 41 24 B2 |I.22:.4......A$.|
00000190: 22 11 22 A7 49 B2 49 AA 32 32 3A 89 34 00 B0 13 |".".I.I.22:.4...|
000001A0: 18 00 8B 41 24 B2 22 13 22 A7 49 B2 30 3A 89 34 |...A$.".".I.0:.4|
000001B0: 00 DA 13 1A 00 8B 41 24 B2 22 4E 22 A7 54 24 B2 |......A$."N".T$.|
000001C0: C4 28 C2 28 53 53 29 29 3A 53 24 B2 C4 28 C2 28 |.(.(SS)):S$..(.(|
000001D0: 53 53 AA 31 29 29 3A 89 39 38 00 08 14 1C 00 8B |SS.1)):.98......|
000001E0: 41 24 B2 22 4A 22 A7 54 24 B2 C4 28 C2 28 53 53 |A$."J".T$..(.(SS|
000001F0: AA 49 29 29 3A 53 24 B2 C4 28 C2 28 53 53 AA 49 |.I)):S$..(.(SS.I|
00000200: AA 31 29 29 3A 89 39 38 00 1F 14 1E 00 8B 41 24 |.1)):.98......A$|
00000210: B2 22 51 22 A7 98 31 35 2C 22 49 30 22 3A 8A 00 |."Q"..15,"I0":..|
00000220: 3D 14 20 00 8B 41 24 B2 22 2B 22 A7 53 24 B2 C4 |=. ..A$."+".S$..|
00000230: 28 C5 28 53 24 29 AA 31 29 3A 89 39 38 00 66 14 |(.(S$).1):.98.f.|
00000240: 22 00 8B 41 24 B2 22 2D 22 A7 53 24 B2 C4 28 28 |"..A$."-".S$..((|
00000250: C5 28 53 24 29 AB 31 29 AC B4 28 C5 28 53 24 29 |.(S$).1)..(.(S$)|
00000260: 29 29 3A 89 39 38 00 76 14 24 00 8B 41 24 B2 22 |)):.98.v.$..A$."|
00000270: 52 22 A7 31 32 30 00 8B 14 26 00 8B 41 24 B2 22 |R".120...&..A$."|
00000280: 48 22 A7 8D 31 33 38 3A 89 39 38 00 9A 14 28 00 |H"..138:.98...(.|
00000290: 8B 41 24 B2 22 42 22 A7 39 30 00 C8 14 2A 00 8B |.A$."B".90...*..|
000002A0: 41 24 B2 22 54 22 A7 99 C8 28 4B 24 2C 31 36 29 |A$."T"...(K$,16)|
000002B0: 3A 8D 31 33 36 3A 99 C9 28 4B 24 2C 31 36 29 3A |:.136:..(K$,16):|
000002C0: 8D 31 33 36 3A 89 35 34 00 D8 14 2C 00 8B 41 24 |.136:.54...,..A$|
000002D0: B2 C7 28 33 29 A7 36 34 00 E7 14 2E 00 8B 41 24 |..(3).64......A$|
000002E0: B3 B1 22 40 22 A7 34 00 06 15 30 00 8B 49 B3 30 |.."@".4...0..I.0|
000002F0: A7 49 B2 32 36 34 AA 49 3A 8B 49 B1 32 35 35 A7 |.I.264.I:.I.255.|
00000300: 49 B2 49 AB 32 32 00 20 15 32 00 8B 49 B1 32 35 |I.I.22. .2..I.25|
00000310: 35 A7 49 B2 49 AB B5 28 49 AD 32 32 29 AC 32 32 |5.I.I..(I.22).22|
00000320: 00 8F 15 34 00 99 4B 24 A6 31 30 29 C2 28 53 53 |...4..K$.10).(SS|
00000330: AA 49 29 22 9D 20 20 20 22 3A 99 22 11 22 A6 31 |.I)". ":.".".1|
00000340: 30 29 49 22 9D 20 20 20 22 3A 97 31 39 38 2C 30 |0)I". ":.198,0|
00000350: 3A 99 4B 24 22 4E 45 57 20 56 41 4C 55 45 3A 20 |:.K$"NEW VALUE: |
00000360: 22 3B 3A 84 39 2C 42 24 3A 99 22 91 22 A6 31 30 |";:.9,B$:.".".10|
00000370: 29 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |)" |
00000380: 20 22 3A 42 B2 C5 28 42 24 29 3A 89 31 31 36 00 | ":B..(B$):.116.|
00000390: BF 15 36 00 99 C8 28 4B 24 2C 31 37 29 22 D0 52 |..6...(K$,17)".R|
000003A0: 45 53 53 20 D2 C5 D4 D5 D2 CE 20 54 4F 20 45 58 |ESS ...... TO EX|
000003B0: 49 54 22 3A 50 46 B2 31 3A A1 41 24 3A 89 34 00 |IT":PF.1:.A$:.4.|
000003C0: E4 15 38 00 8B 41 24 B2 C7 28 31 33 29 A7 50 46 |..8..A$..(13).PF|
000003D0: B2 30 3A 99 C8 28 4B 24 2C 31 36 29 3A 8D 31 33 |.0:..(K$,16):.13|
000003E0: 34 3A 89 34 00 F2 15 3A 00 8B 41 24 B2 22 22 A7 |4:.4...:..A$."".|
000003F0: 31 32 00 03 16 3C 00 42 B2 C6 28 41 24 29 3A 89 |12...<.B..(A$):.|
00000400: 31 31 38 00 1E 16 3E 00 99 22 13 11 11 11 11 11 |118...>.."......|
00000410: 11 11 11 11 11 22 3A 8D 31 33 34 3A 89 34 00 44 |.....":.134:.4.D|
00000420: 16 40 00 98 31 35 2C 22 49 30 22 3A 99 4B 24 3A |.@..15,"I0":.K$:|
00000430: 8B C2 28 37 38 38 29 B2 31 39 34 A7 97 37 38 38 |..(788).194..788|
00000440: 2C 31 39 31 00 4A 16 42 00 80 00 C6 16 44 00 41 |,191.J.B.....D.A|
00000450: B2 38 32 38 3A 54 45 4D B2 41 3A 97 32 31 30 2C |.828:TEM.A:.210,|
00000460: B5 28 41 AD 32 35 36 29 3A 97 32 30 39 2C 41 AB |.(A.256):.209,A.|
00000470: 32 35 36 AC C2 28 32 31 30 29 3A 97 32 31 31 2C |256..(210):.211,|
00000480: 30 3A 99 22 12 22 C7 28 33 34 29 C7 28 33 34 29 |0:.".".(34).(34)|
00000490: C7 28 32 30 29 22 92 42 20 12 C6 BF 20 92 40 20 |.(20)".B ... .@ |
000004A0: 12 A4 BF 59 92 B8 44 12 C8 D0 B7 92 CC 12 CC BF |...Y..D.........|
000004B0: 22 3A 8B C2 28 37 38 38 29 B2 31 39 31 A7 97 37 |":..(788).191..7|
000004C0: 38 38 2C 31 39 34 00 02 17 46 00 99 22 0E 1E 22 |88,194...F..".."|
000004D0: 3B 3A 53 53 B2 C2 28 36 34 38 29 AC 32 35 36 AA |;:SS..(648).256.|
000004E0: 36 36 3A 49 B2 30 3A 42 B2 30 3A 4A B2 30 3A 97 |66:I.0:B.0:J.0:.|
000004F0: 38 33 39 2C 36 36 3A 97 38 34 30 2C C2 28 36 34 |839,66:.840,.(64|
00000500: 38 29 00 C4 17 48 00 41 24 B2 22 22 3A 45 24 B2 |8)...H.A$."":E$.|
00000510: 22 22 3A 54 24 B2 22 22 3A 53 24 B2 22 22 3A 99 |"":T$."":S$."":.|
00000520: 22 93 1E 11 11 D0 4C 45 41 53 45 20 50 55 54 20 |".....LEASE PUT |
00000530: 54 48 45 20 20 20 20 20 20 20 20 D3 C9 C3 CB 20 |THE .... |
00000540: C4 C9 D3 CB 20 49 4E 20 44 52 49 56 45 20 30 2E |.... IN DRIVE 0.|
00000550: 22 3A 99 22 11 D9 4F 55 20 53 48 4F 55 4C 44 20 |":."..OU SHOULD |
00000560: 55 53 45 20 54 48 45 20 C4 CF D3 27 D6 27 20 43 |USE THE ...'.' C|
00000570: 4F 4D 4D 41 4E 44 20 54 4F 20 55 50 44 41 54 45 |OMMAND TO UPDATE|
00000580: 20 54 48 45 20 C2 C1 CD 20 4F 4E 20 54 48 45 20 | THE ... ON THE |
00000590: 44 49 53 4B 20 20 20 57 48 45 4E 20 44 4F 4E 45 |DISK WHEN DONE|
000005A0: 2E 22 3A 99 22 11 11 11 CE 4F 54 45 3A C4 49 53 |.":."....OTE:.IS|
000005B0: 4B 20 44 45 56 49 43 45 20 49 53 22 44 4E 22 9D |K DEVICE IS"DN".|
000005C0: 2E 11 11 22 00 E6 17 4A 00 99 22 11 11 12 20 20 |..."...J.."... |
000005D0: 20 20 D0 52 45 53 53 20 C1 CE D9 20 CB C5 D9 20 | .RESS ... ... |
000005E0: 20 20 20 20 22 3B 00 F8 17 4C 00 A1 41 24 3A 8B | ";...L..A$:.|
000005F0: 41 24 B2 22 22 A7 37 36 00 0D 18 4E 00 8D 31 34 |A$."".76...N..14|
00000600: 36 3A 8B 41 24 B2 C7 28 33 29 A7 36 34 00 3C 18 |6:.A$..(3).64.<.|
00000610: 50 00 9F 31 2C 44 4E 2C 32 2C 22 30 3A A0 A0 A0 |P..1,DN,2,"0:...|
00000620: 2C 53 2C 52 22 3A 84 31 35 2C 45 24 3A 8B 45 24 |,S,R":.15,E$:.E$|
00000630: B2 22 36 32 22 A7 A0 31 3A 89 38 38 00 69 18 52 |."62"..1:.88.i.R|
00000640: 00 8B 45 24 B1 22 36 34 22 A7 84 31 2C 45 24 3A |..E$."64"..1,E$:|
00000650: 99 22 93 11 11 11 11 11 22 45 24 22 20 20 4F 4E |."......"E$" ON|
00000660: 20 44 52 49 56 45 20 30 22 00 7B 18 54 00 8B 45 | DRIVE 0".{.T..E|
00000670: 24 B2 22 32 31 22 A7 8D 31 32 36 00 88 18 56 00 |$."21"..126...V.|
00000680: 98 31 35 2C 22 49 30 22 00 9E 18 58 00 9F 32 2C |.15,"I0"...X..2,|
00000690: 44 4E 2C 32 2C 22 23 32 22 3A 99 22 93 22 00 A7 |DN,2,"#2":."."..|
000006A0: 18 5A 00 8D 31 33 32 00 1C 19 5C 00 99 4B 24 22 |.Z..132...\..K$"|
000006B0: 20 20 20 20 20 20 D4 D2 C1 C3 CB 20 20 20 22 CA | ..... ".|
000006C0: 28 C4 28 C5 28 54 24 29 29 2C 32 29 22 A0 22 3A |(.(.(T$)),2)".":|
000006D0: 99 22 20 20 20 20 20 20 D3 C5 C3 D4 CF D2 20 20 |." ...... |
000006E0: 22 CA 28 C4 28 C5 28 53 24 29 29 2C 32 29 22 A0 |".(.(.(S$)),2)".|
000006F0: 91 91 22 3A 99 22 C9 4E 50 55 54 20 D4 D2 C1 C3 |..":.".NPUT ....|
00000700: CB 3A 20 20 22 3B 3A 84 39 2C 54 24 3A 99 3A 8B |.: ";:.9,T$:.:.|
00000710: 54 24 B2 C7 28 31 36 30 29 A7 36 34 00 53 19 5E |T$..(160).64.S.^|
00000720: 00 99 22 91 20 20 20 20 20 22 3A 99 22 C9 4E 50 |..". ":.".NP|
00000730: 55 54 20 D3 C5 C3 D4 CF D2 3A 20 22 3B 3A 84 39 |UT ......: ";:.9|
00000740: 2C 53 24 3A 99 3A 8B 53 24 B2 C7 28 31 36 30 29 |,S$:.:.S$..(160)|
00000750: A7 36 34 00 83 19 60 00 99 22 91 20 20 20 20 20 |.64...`..". |
00000760: 22 3A 54 24 B2 CA 28 C4 28 C5 28 54 24 29 29 2C |":T$..(.(.(T$)),|
00000770: 32 29 3A 53 24 B2 CA 28 C4 28 C5 28 53 24 29 29 |2):S$..(.(.(S$))|
00000780: 2C 32 29 00 93 19 62 00 8B C5 28 54 24 29 B2 30 |,2)...b...(T$).0|
00000790: A7 39 30 00 CE 19 64 00 98 31 35 2C 22 55 31 3A |.90...d..15,"U1:|
000007A0: 32 2C 30 2C 22 54 24 22 2C 22 53 24 3A 84 31 35 |2,0,"T$","S$:.15|
000007B0: 2C 45 31 24 2C 45 32 24 2C 45 33 24 2C 45 34 24 |,E1$,E2$,E3$,E4$|
000007C0: 3A 8B 45 31 24 B2 22 30 30 22 A7 31 31 32 00 3A |:.E1$."00".112.:|
000007D0: 1A 66 00 8D 31 33 32 3A 45 32 24 B2 22 C4 C9 D3 |.f..132:E2$."...|
000007E0: CB 20 C5 D2 D2 CF D2 20 23 22 AA 45 31 24 AA 22 |. ..... #".E1$."|
000007F0: 20 20 20 20 20 20 20 20 22 AA 45 32 24 3A 99 22 | ".E2$:."|
00000800: 13 11 11 11 11 12 22 45 32 24 3A 99 22 49 4E 20 |......"E2$:."IN |
00000810: D4 D2 C1 C3 CB 22 C5 28 45 33 24 29 22 9D 2C 20 |.....".(E3$)"., |
00000820: D3 C5 C3 D4 CF D2 22 C5 28 45 34 24 29 3A 8B 45 |......".(E4$):.E|
00000830: 31 24 B2 22 36 36 22 A7 39 32 00 59 1A 68 00 99 |1$."66".92.Y.h..|
00000840: 22 11 54 52 59 20 41 47 41 49 4E 3F 20 28 43 52 |".TRY AGAIN? (CR|
00000850: 2F 4E 20 4F 52 20 59 29 22 00 6C 1A 6A 00 A1 41 |/N OR Y)".l.j..A|
00000860: 24 3A 8B 41 24 B2 22 22 A7 31 30 36 00 7C 1A 6C |$:.A$."".106.|.l|
00000870: 00 8B 41 24 B2 22 59 22 A7 31 30 30 00 8B 1A 6E |..A$."Y".100...n|
00000880: 00 98 31 35 2C 22 49 30 22 3A 8A 00 B4 1A 70 00 |..15,"I0":....p.|
00000890: 8D 31 33 32 3A 98 31 35 2C 22 42 2D 50 3A 32 2C |.132:.15,"B-P:2,|
000008A0: 30 22 3A 9E 54 45 4D 3A 49 B2 30 3A 99 3A 97 31 |0":.TEM:I.0:.:.1|
000008B0: 39 38 2C 30 00 BB 1A 72 00 89 34 00 D4 1A 74 00 |98,0...r..4...t.|
000008C0: 8B 42 B1 32 35 35 B0 C6 28 42 24 29 B2 31 36 30 |.B.255..(B$).160|
000008D0: A7 31 32 30 00 05 1B 76 00 97 53 53 AA 49 2C 42 |.120...v..SS.I,B|
000008E0: 3A 98 31 35 2C 22 42 2D 50 3A 32 2C 22 C4 28 49 |:.15,"B-P:2,".(I|
000008F0: 29 3A 98 32 2C C7 28 42 29 3B 3A 49 B2 49 AA 31 |):.2,.(B);:I.I.1|
00000900: 3A 89 31 31 34 00 2A 1B 78 00 99 4B 24 22 11 11 |:.114.*.x..K$"..|
00000910: 11 12 C1 D2 C5 20 D9 CF D5 20 D3 D5 D2 C5 3F 20 |..... ... ....? |
00000920: 28 59 20 4F 52 20 4E 29 22 3B 00 69 1B 7A 00 A1 |(Y OR N)";.i.z..|
00000930: 41 24 3A 4A B2 AB 28 41 24 B2 22 59 22 29 AB 32 |A$:J..(A$."Y").2|
00000940: AC 28 41 24 B2 22 4E 22 29 AB 33 AC 28 41 24 B2 |.(A$."N").3.(A$.|
00000950: C7 28 33 29 29 3A 91 4A 89 31 32 34 2C 31 31 30 |.(3)):.J.124,110|
00000960: 2C 31 31 30 3A 89 31 32 32 00 B4 1B 7C 00 98 31 |,110:.122...|..1|
00000970: 35 2C 22 4D 2D 57 22 5A 24 C7 28 31 39 29 C7 28 |5,"M-W"Z$.(19).(|
00000980: 32 29 C7 28 C2 28 53 53 29 29 C7 28 C2 28 53 53 |2).(.(SS)).(.(SS|
00000990: AA 31 29 29 3A 98 31 35 2C 22 55 32 3A 32 2C 30 |.1)):.15,"U2:2,0|
000009A0: 2C 22 54 24 22 2C 22 53 24 3A 98 31 35 2C 22 49 |,"T$","S$:.15,"I|
000009B0: 30 22 3A 8A 00 F9 1B 7E 00 99 22 11 11 4E 4F 20 |0":....~.."..NO |
000009C0: 44 49 53 4B 20 49 4E 20 44 52 49 56 45 20 30 22 |DISK IN DRIVE 0"|
000009D0: 3A 99 22 11 50 4C 41 43 45 20 44 49 53 4B 20 49 |:.".PLACE DISK I|
000009E0: 4E 20 44 52 49 56 45 20 30 2C 20 50 52 45 53 53 |N DRIVE 0, PRESS|
000009F0: 20 41 4E 59 20 4B 45 59 22 00 0C 1C 80 00 A1 41 | ANY KEY"......A|
00000A00: 24 3A 8B 41 24 B2 22 22 A7 31 32 38 00 12 1C 82 |$:.A$."".128....|
00000A10: 00 8E 00 C4 1C 84 00 99 22 13 91 B0 C0 C0 C0 C0 |........".......|
00000A20: C0 C0 C0 C0 AE B0 C0 C0 C0 C0 AE B0 C0 C0 C0 C0 |................|
00000A30: AE 22 3B 3A 99 22 DD C4 49 53 4B 20 C4 4F 43 DD |.";:."..ISK .OC.|
00000A40: DD D4 3A 22 C9 28 22 20 20 22 AA 54 24 2C 32 29 |..:".(" ".T$,2)|
00000A50: 22 DD DD D3 3A 22 C9 28 22 20 20 22 AA 53 24 2C |"...:".(" ".S$,|
00000A60: 32 29 22 DD 22 3B 3A 99 22 B1 C0 C0 C0 C0 C0 C0 |2)".";:.".......|
00000A70: C0 C0 B1 B1 C0 C0 C0 C0 B1 B1 C0 C0 C0 C0 B1 22 |..............."|
00000A80: 3B 3A 81 49 B2 30 A4 31 31 3A 99 22 20 20 20 20 |;:.I.0.11:." |
00000A90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000AA0: 20 22 3B 3A 82 3A 99 22 20 20 20 20 B0 C0 C0 C0 | ";:.:." ....|
00000AB0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000AC0: C0 C0 BD 22 00 F7 1C 86 00 99 22 12 40 92 20 12 |..."......".@. .|
00000AD0: CE 92 20 12 CA 92 20 12 D1 92 20 12 D2 92 20 12 |.. ... ... ... .|
00000AE0: C2 92 20 12 D4 92 20 12 2B 92 20 12 2D 92 20 12 |.. ... .+. .-. .|
00000AF0: C8 92 45 4C 50 22 3B 00 40 1D 88 00 81 44 B2 31 |..ELP";.@....D.1|
00000B00: A4 35 3A 99 22 20 20 20 20 20 20 20 20 20 20 20 |.5:." |
00000B10: 20 20 20 20 20 20 20 20 20 20 20 22 3B 3A 82 3A | ";:.:|
00000B20: 81 44 B2 32 31 37 A4 32 34 30 3A 97 44 2C C2 28 |.D.217.240:.D,.(|
00000B30: 44 29 B0 31 32 38 3A 82 3A 99 22 13 22 3B 3A 8E |D).128:.:.".";:.|
00000B40: 00 FD 1D 8A 00 99 22 93 20 11 12 40 92 20 2D C3 |......". ..@. -.|
00000B50: 48 41 4E 47 45 20 C3 D2 D3 D2 20 42 59 54 45 22 |HANGE .... BYTE"|
00000B60: 3A 99 22 20 11 12 CE 92 20 2D CE 45 58 54 20 42 |:." .... -.EXT B|
00000B70: 4C 4F 43 4B 22 3A 99 22 20 11 12 CA 92 20 2D CA |LOCK":." .... -.|
00000B80: 55 4D 50 20 54 4F 20 C3 D2 D3 D2 20 4C 49 4E 4B |UMP TO .... LINK|
00000B90: 22 3A 99 22 20 11 12 D1 92 20 2D D1 55 49 54 22 |":." .... -.UIT"|
00000BA0: 3A 99 22 20 11 12 D2 92 20 2D D2 45 57 52 49 54 |:." .... -.EWRIT|
00000BB0: 45 20 54 48 49 53 20 42 4C 4F 43 4B 22 3B 3A 99 |E THIS BLOCK";:.|
00000BC0: 22 20 11 12 C2 92 20 2D CE 45 57 20 C2 4C 4F 43 |" .... -.EW .LOC|
00000BD0: 4B 22 3A 99 22 20 11 12 D4 92 20 2D D4 45 58 54 |K":." .... -.EXT|
00000BE0: 20 4D 4F 44 45 22 3A 99 22 20 11 12 2B 92 20 2D | MODE":." ..+. -|
00000BF0: D3 43 41 4E 20 46 4F 52 57 41 52 44 22 00 4B 1E |.CAN FORWARD".K.|
00000C00: 8C 00 99 22 20 11 12 2D 92 20 2D D3 43 41 4E 20 |..." ..-. -.CAN |
00000C10: 42 41 43 4B 57 41 52 44 22 3A 99 22 20 11 12 C8 |BACKWARD":." ...|
00000C20: 92 20 2D D4 48 49 53 20 48 45 4C 50 20 53 43 52 |. -.HIS HELP SCR|
00000C30: 45 45 4E 22 3A 99 22 11 1D 1D 1D 1D 12 D0 52 45 |EEN":.".......RE|
00000C40: 53 53 20 C1 CE D9 20 CB C5 D9 22 00 5E 1E 8E 00 |SS ... ...".^...|
00000C50: A1 41 24 3A 8B 41 24 B2 22 22 A7 31 34 32 00 69 |.A$:.A$."".142.i|
00000C60: 1E 90 00 99 22 93 22 3A 8E 00 86 1E 92 00 5A 24 |....".":......Z$|
00000C70: B2 C7 28 30 29 3A 9F 31 35 2C 44 4E 2C 31 35 3A |..(0):.15,DN,15:|
00000C80: 9F 39 2C 30 3A 8E 00 00 00 20 |.9,0:.... |
..>.... CONVERTED FROM C-64 TO VIC-20
BY KEVIN HISEL.N...DN.8:K$."....
...............":.36879,08:.68......I.0.
I.264.I:.I.255.I.I.22......I.255.I.I..(I
.22).22......K$.10)B(SS.I)". ":.".".10
)I". ":.K$"VALUE: ":.".POSITION:".
.....J.1.2:.I.SS,(B(I.SS).128).255:.D.0.
1:.D,J.0....A$:.A$."".10.;....PF.56.V...
.A$.".".I.(I.1).255:.4.Q....A$.".".I.(I.
1).255:.4......A$.".".I.I.22:.4......A$.
".".I.I.22:.4......A$.".".I.0:.4.Z....A$
."N".T$.D(B(SS)):S$.D(B(SS.1)):.98......
A$."J".T$.D(B(SS.I)):S$.D(B(SS.I.1)):.98
......A$."Q"..15,"I0":..=. ..A$."+".S$.D
(E(S$).1):.98.F."..A$."-".S$.D((E(S$).1)
..(E(S$))):.98.V.$..A$."R".120...&..A$."
H"..138:.98...(..A$."B".90.H.*..A$."T"..
H(K$,16):.136:.I(K$,16):.136:.54.X.,..A$
.G(3).64......A$.."@".4...0..I.0.I.264.I
:.I.255.I.I.22. .2..I.255.I.I..(I.22).22
...4..K$.10)B(SS.I)". ":.".".10)I".
":.198,0:.K$"NEW VALUE: ";:.9,B$:.".".10
)" ":B.E(B$):.116...6..H(K
$,17)"PRESS RETURN TO EXIT":PF.1:.A$:.4.
..8..A$.G(13).PF.0:.H(K$,16):.134:.4...:
..A$."".12...<.B.F(A$):.118...>.."......
.....":.134:.4.D.@..15,"I0":.K$:.B(788).
194..788,191.J.B...F.D.A.828:TEM.A:.210,
.(A.256):.209,A.256.B(210):.211,0:."."G(
34)G(34)G(20)".B .F. .@ ...Y..D.HP..L.L.
":.B(788).191..788,194...F.."..";:SS.B(6
48).256.66:I.0:B.0:J.0:.839,66:.840,B(64
8).D.H.A$."":E$."":T$."":S$."":."....PLE
ASE PUT THE SICK DISK IN DRIVE 0.
":.".YOU SHOULD USE THE DOS'V' COMMAND T
O UPDATE THE BAM ON THE DISK WHEN DONE
.":."...NOTE:DISK DEVICE IS"DN"...."...J
.."... PRESS ANY KEY ";...L..A$:.
A$."".76...N..146:.A$.G(3).64.<.P..1,DN,
2,"0: ,S,R":.15,E$:.E$."62". 1:.88.I.R
..E$."64"..1,E$:."......"E$" ON DRIVE 0
".{.T..E$."21"..126...V..15,"I0"...X..2,
DN,2,"#2":."."...Z..132...\..K$" TR
ACK "J(D(E(T$)),2)" ":." SECTOR
"J(D(E(S$)),2)" ..":."INPUT TRACK: ";:.
9,T$:.:.T$.G(160).64.S.^..". ":."INP
UT SECTOR: ";:.9,S$:.:.S$.G(160).64...`.
.". ":T$.J(D(E(T$)),2):S$.J(D(E(S$))
,2)...B..E(T$).0.90.N.D..15,"U1:2,0,"T$"
,"S$:.15,E1$,E2$,E3$,E4$:.E1$."00".112.:
.F..132:E2$."DISK ERROR #".E1$."
".E2$:."......"E2$:."IN TRACK"E(E3$)".,
SECTOR"E(E4$):.E1$."66".92.Y.H..".TRY AG
AIN? (CR/N OR Y)".L.J..A$:.A$."".106.|.L
..A$."Y".100...N..15,"I0":....P..132:.15
,"B-P:2,0":.TEM:I.0:.:.198,0...R..4.T.T.
.B.255.F(B$).160.120...V..SS.I,B:.15,"B-
P:2,"D(I):.2,G(B);:I.I.1:.114.*.X..K$"..
..ARE YOU SURE? (Y OR N)";.I.Z..A$:J..(A
$."Y").2.(A$."N").3.(A$.G(3)):.J.124,110
,110:.122...|..15,"M-W"Z$G(19)G(2)G(B(SS
))G(B(SS.1)):.15,"U2:2,0,"T$","S$:.15,"I
0":....~.."..NO DISK IN DRIVE 0":.".PLAC
E DISK IN DRIVE 0, PRESS ANY KEY"......A
$:.A$."".128.......D...."...............
.........";:.".DISK DOC..T:"I(" ".T$,2)
"..S:"I(" ".S$,2)".";:."...............
.......";:.I.0.11:."
";:.:." ......................."....
..".@. .N. .J. .Q. .R. .B. .T. .+. .-. .
H.ELP";.@....D.1.5:."
";:.:.D.217.240:.D,B(D).128:.:.".";:.
......". ..@. -CHANGE CRSR BYTE":." ..N.
-NEXT BLOCK":." ..J. -JUMP TO CRSR LINK
":." ..Q. -QUIT":." ..R. -REWRITE THIS B
LOCK";:." ..B. -NEW BLOCK":." ..T. -TEXT
MODE":." ..+. -SCAN FORWARD".K...." ..-
. -SCAN BACKWARD":." ..H. -THIS HELP SCR
EEN":."......PRESS ANY KEY".^....A$:.A$.
"".142.I....".":......Z$.G(0):.15,DN,15:
.9,0:....
> CLICK IMAGE PREVIEW FOR FULL MODAL