> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 31 08 01 00 58 58 B2 C2 28 37 38 37 29 3A |..1...XX..(787):|
00000010: 99 22 20 14 14 14 14 14 14 14 14 14 14 14 14 14 |." .............|
00000020: 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 |................|
00000030: 14 00 66 08 02 00 8B 58 58 B3 B1 39 39 A7 9E 36 |..f....XX..99..6|
00000040: 34 37 33 38 3A 99 22 20 14 14 14 14 14 14 14 14 |4738:." ........|
00000050: 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 14 |................|
00000060: 14 14 14 14 14 14 00 73 08 14 00 97 35 33 32 38 |.......s....5328|
00000070: 31 2C 36 00 A4 08 19 00 99 C7 28 31 34 37 29 3A |1,6.......(147):|
00000080: 99 22 11 11 22 3B 3A 99 A3 31 31 29 22 44 49 53 |."..";:..11)"DIS|
00000090: 4B 20 43 4F 4E 46 49 47 55 52 41 54 49 4F 4E 22 |K CONFIGURATION"|
000000A0: 3A 99 3A 99 00 BD 08 1E 00 99 A3 35 29 22 5B 41 |:.:........5)"[A|
000000B0: 5D 20 44 45 56 49 43 45 20 38 22 3A 99 00 D6 08 |] DEVICE 8":....|
000000C0: 23 00 99 A3 35 29 22 5B 42 5D 20 44 45 56 49 43 |#...5)"[B] DEVIC|
000000D0: 45 20 39 22 3A 99 00 00 09 28 00 99 A3 35 29 22 |E 9":....(...5)"|
000000E0: 5B 43 5D 20 41 42 4F 52 54 20 54 4F 20 4D 45 4E |[C] ABORT TO MEN|
000000F0: 55 20 4C 45 56 45 4C 20 54 57 4F 22 3A 99 3A 99 |U LEVEL TWO":.:.|
00000100: 00 16 09 2D 00 99 A3 31 30 29 22 59 4F 55 52 20 |...-...10)"YOUR |
00000110: 43 48 4F 49 43 45 00 2A 09 32 00 A1 43 48 24 3A |CHOICE.*.2..CH$:|
00000120: 8B 43 48 24 B2 22 22 A7 35 30 00 40 09 37 00 8B |.CH$."".50.@.7..|
00000130: 43 48 24 B2 22 41 22 A7 44 56 B2 38 3A 89 37 35 |CH$."A".DV.8:.75|
00000140: 00 56 09 3C 00 8B 43 48 24 B2 22 42 22 A7 44 56 |.V.<..CH$."B".DV|
00000150: B2 39 3A 89 37 35 00 67 09 41 00 8B 43 48 24 B3 |.9:.75.g.A..CH$.|
00000160: B1 22 43 22 A7 35 30 00 70 09 46 00 89 33 34 35 |."C".50.p.F..345|
00000170: 00 84 09 4B 00 97 35 33 32 38 31 2C 30 3A 97 36 |...K..53281,0:.6|
00000180: 34 36 2C 33 00 B1 09 50 00 99 C7 28 31 34 37 29 |46,3...P...(147)|
00000190: 3A 99 22 11 11 22 3B 3A 99 A3 31 33 29 22 43 48 |:."..";:..13)"CH|
000001A0: 41 4E 47 45 20 44 49 53 4B 20 49 44 22 3A 99 3A |ANGE DISK ID":.:|
000001B0: 99 00 CD 09 55 00 A0 39 3A 9F 39 2C 30 2C 30 3A |....U..9:.9,0,0:|
000001C0: A0 31 35 3A 9F 31 35 2C 44 56 2C 31 35 00 EF 09 |.15:.15,DV,15...|
000001D0: 5A 00 4D 44 24 B2 22 13 22 3A 81 49 B2 31 A4 33 |Z.MD$.".":.I.1.3|
000001E0: 32 3A 4D 44 24 B2 4D 44 24 AA 22 11 22 3A 82 00 |2:MD$.MD$.".":..|
000001F0: 09 0A 5F 00 81 49 B2 31 A4 33 39 3A 42 4C 24 B2 |.._..I.1.39:BL$.|
00000200: 42 4C 24 AA 22 20 22 3A 82 00 2F 0A 64 00 50 30 |BL$." ":../.d.P0|
00000210: 24 B2 22 93 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |$.".............|
00000220: 44 49 53 4B 20 49 44 20 43 48 41 4E 47 45 52 00 |DISK ID CHANGER.|
00000230: 46 0A 69 00 52 45 24 B2 22 48 49 54 20 5B 52 45 |F.i.RE$."HIT [RE|
00000240: 54 55 52 4E 5D 22 00 65 0A 6E 00 83 32 2C 4F 55 |TURN]".e.n..2,OU|
00000250: 54 20 4F 46 20 52 41 4E 47 45 21 2C 54 4F 4F 20 |T OF RANGE!,TOO |
00000260: 4C 4F 4E 47 21 00 84 0A 73 00 87 41 3A 86 4D 24 |LONG!...s..A:.M$|
00000270: 28 41 29 3A 81 49 B2 31 A4 41 3A 87 45 4D 24 28 |(A):.I.1.A:.EM$(|
00000280: 49 29 3A 82 00 8D 0A 78 00 89 31 38 35 00 A0 0A |I):....x..185...|
00000290: 7D 00 84 31 35 2C 45 52 3A 8B 45 52 B2 30 A7 8E |}..15,ER:.ER.0..|
000002A0: 00 B7 0A 82 00 84 31 35 2C 45 52 2C 45 4D 24 2C |......15,ER,EM$,|
000002B0: 45 54 24 2C 45 53 24 00 E6 0A 87 00 99 4D 44 24 |ET$,ES$......MD$|
000002C0: 22 12 44 49 53 4B 20 45 52 52 4F 52 21 92 20 23 |".DISK ERROR!. #|
000002D0: 22 45 52 22 20 22 45 4D 24 22 20 22 45 54 24 22 |"ER" "EM$" "ET$"|
000002E0: 2C 20 22 45 53 24 00 EF 0A 8C 00 89 33 34 35 00 |, "ES$......345.|
000002F0: 09 0B 91 00 84 39 2C 51 24 3A 99 3A 51 31 24 B2 |.....9,Q$:.:Q1$.|
00000300: C8 28 51 24 2C 31 29 3A 8E 00 28 0B 96 00 A0 32 |.(Q$,1):..(....2|
00000310: 3A A0 31 35 3A 97 35 39 34 36 38 2C 50 4B 3A 99 |:.15:.59468,PK:.|
00000320: 22 93 22 3A 89 33 34 35 00 3F 0B 9B 00 99 C8 28 |".":.345.?.....(|
00000330: 4D 44 24 2C 4D 44 29 42 4C 24 3A 99 42 4C 24 00 |MD$,MD)BL$:.BL$.|
00000340: 51 0B A0 00 99 C8 28 4D 44 24 2C 4D 44 29 3B 3A |Q.....(MD$,MD);:|
00000350: 8E 00 60 0B A5 00 4D 44 B2 32 31 3A 8D 31 35 35 |..`...MD.21:.155|
00000360: 00 81 0B AA 00 99 22 12 49 4C 4C 45 47 41 4C 20 |......".ILLEGAL |
00000370: 45 4E 54 52 59 20 2D 2D 20 22 45 4D 24 28 45 4D |ENTRY -- "EM$(EM|
00000380: 29 00 94 0B AF 00 99 52 45 24 3A 8D 31 34 35 3A |)......RE$:.145:|
00000390: 8D 31 35 35 00 9A 0B B4 00 8E 00 A7 0B B9 00 46 |.155...........F|
000003A0: B2 30 3A 99 50 30 24 00 D7 0B BE 00 99 50 30 24 |.0:.P0$......P0$|
000003B0: 3A 99 22 11 11 22 3B 3A 99 A3 31 30 29 22 50 4C |:."..";:..10)"PL|
000003C0: 41 43 45 20 44 49 53 4B 20 49 4E 20 44 52 49 56 |ACE DISK IN DRIV|
000003D0: 45 22 44 56 22 11 22 00 E9 0B C3 00 99 A3 31 30 |E"DV".".......10|
000003E0: 29 52 45 24 3A 8D 31 34 35 00 00 0C C8 00 98 31 |)RE$:.145......1|
000003F0: 35 2C 22 49 22 AA C4 28 44 56 29 3A 8D 31 32 35 |5,"I"..(DV):.125|
00000400: 00 2D 0C CD 00 A0 32 3A 9F 32 2C 44 56 2C 32 2C |.-....2:.2,DV,2,|
00000410: 22 23 22 3A 98 31 35 2C 22 55 31 3A 32 22 3B 38 |"#":.15,"U1:2";8|
00000420: 3B 22 2C 31 38 2C 30 22 3A 8D 31 32 35 00 4D 0C |;",18,0":.125.M.|
00000430: D2 00 98 31 35 2C 22 42 2D 50 3A 32 2C 31 36 32 |...15,"B-P:2,162|
00000440: 22 3A 8D 31 32 35 3A 44 4E 24 B2 22 22 00 6D 0C |":.125:DN$."".m.|
00000450: D7 00 81 49 B2 31 A4 31 36 3A A1 23 32 2C 41 24 |...I.1.16:.#2,A$|
00000460: 3A 44 4E 24 B2 44 4E 24 AA 41 24 3A 82 00 81 0C |:DN$.DN$.A$:....|
00000470: DC 00 4D 44 B2 31 30 3A 8D 31 35 35 3A 8B 46 A7 |..MD.10:.155:.F.|
00000480: 8E 00 A6 0C E1 00 99 22 11 11 22 3B 3A 99 A3 32 |......."..";:..2|
00000490: 29 22 12 20 54 48 45 20 44 49 53 4B 20 49 44 20 |)". THE DISK ID |
000004A0: 49 53 3A 92 22 3B 00 B9 0C E6 00 99 C7 28 33 34 |IS:.";.......(34|
000004B0: 29 44 4E 24 C7 28 33 34 29 00 C3 0C EB 00 4D 44 |)DN$.(34).....MD|
000004C0: B2 31 33 00 CD 0C F0 00 4D 44 B2 31 36 00 E1 0C |.13.....MD.16...|
000004D0: F5 00 99 A3 32 29 22 11 11 45 4E 54 45 52 20 22 |....2)"..ENTER "|
000004E0: 3B 00 02 0D FA 00 99 A3 32 29 22 4E 45 57 20 49 |;.......2)"NEW I|
000004F0: 44 20 28 32 20 43 48 41 52 41 43 54 45 52 53 29 |D (2 CHARACTERS)|
00000500: 22 3B 00 2E 0D FF 00 8D 31 34 35 3A 8B C3 28 51 |";......145:..(Q|
00000510: 24 29 B1 32 A7 45 4D B2 32 3A 8D 31 36 35 3A 4D |$).2.EM.2:.165:M|
00000520: 44 B2 31 38 3A 8D 31 35 35 3A 89 32 35 35 00 43 |D.18:.155:.255.C|
00000530: 0D 04 01 4E 44 4E 24 B2 C8 28 51 24 AA 42 4C 24 |...NDN$..(Q$.BL$|
00000540: 2C 32 29 00 52 0D 09 01 4D 44 B2 32 31 3A 8D 31 |,2).R...MD.21:.1|
00000550: 35 35 00 5B 0D 0E 01 89 32 37 35 00 7A 0D 13 01 |55.[....275.z...|
00000560: 4D 44 B2 32 31 3A 99 A3 32 29 22 91 91 48 41 4E |MD.21:..2)"..HAN|
00000570: 47 20 4F 4E 2E 2E 2E 2E 2E 2E 00 93 0D 18 01 98 |G ON............|
00000580: 31 35 2C 22 42 2D 50 3A 32 2C 31 36 32 22 3A 8D |15,"B-P:2,162":.|
00000590: 31 32 35 00 A5 0D 1D 01 98 32 2C 4E 44 4E 24 3B |125......2,NDN$;|
000005A0: 3A 8D 31 32 35 00 C3 0D 22 01 98 31 35 2C 22 55 |:.125..."..15,"U|
000005B0: 32 3A 32 22 3B 38 3B 22 2C 31 38 2C 30 22 3A 8D |2:2";8;",18,0":.|
000005C0: 31 32 35 00 DD 0D 27 01 98 31 35 2C 22 49 22 AA |125...'..15,"I".|
000005D0: C4 28 44 56 29 3A 8D 31 32 35 3A A0 32 00 F3 0D |.(DV):.125:.2...|
000005E0: 2C 01 46 B2 31 3A 99 50 30 24 3A 8D 32 30 30 3A |,.F.1:.P0$:.200:|
000005F0: 46 B2 30 00 10 0E 31 01 99 22 54 48 45 20 4E 45 |F.0...1.."THE NE|
00000600: 57 20 44 49 53 4B 20 49 44 20 49 53 3A 20 22 3B |W DISK ID IS: ";|
00000610: 00 23 0E 36 01 99 C7 28 33 34 29 44 4E 24 C7 28 |.#.6...(34)DN$.(|
00000620: 33 34 29 00 35 0E 3B 01 A0 32 3A 4D 44 B2 32 31 |34).5.;..2:MD.21|
00000630: 3A 8D 31 35 35 00 5B 0E 40 01 99 A3 32 29 22 91 |:.155.[.@...2)".|
00000640: 91 91 91 91 91 41 4E 4F 54 48 45 52 20 44 49 53 |.....ANOTHER DIS|
00000650: 4B 3F 20 28 59 2F 4E 29 20 12 22 00 6E 0E 45 01 |K? (Y/N) .".n.E.|
00000660: A1 55 24 3A 8B 55 24 B2 22 22 A7 33 32 35 00 7E |.U$:.U$."".325.~|
00000670: 0E 4A 01 8B 55 24 B2 22 59 22 A7 31 39 30 00 8E |.J..U$."Y".190..|
00000680: 0E 4F 01 8B 55 24 B2 22 4E 22 A7 31 35 30 00 97 |.O..U$."N".150..|
00000690: 0E 54 01 89 33 32 35 00 B9 0E 59 01 99 3A 99 3A |.T..325...Y..:.:|
000006A0: 99 22 48 49 54 20 41 4E 59 20 4B 45 59 20 54 4F |."HIT ANY KEY TO|
000006B0: 20 43 4F 4E 54 49 4E 55 45 00 CF 0E 5B 01 92 31 | CONTINUE...[..1|
000006C0: 39 37 2C 36 34 2C 36 34 3A 97 31 39 38 2C 30 00 |97,64,64:.198,0.|
000006D0: E3 0E 5C 01 97 36 34 36 2C 30 3A 97 35 33 32 38 |..\..646,0:.5328|
000006E0: 31 2C 30 00 FD 0E 5E 01 99 C7 28 31 34 37 29 3A |1,0...^...(147):|
000006F0: 99 22 4C 4F 41 44 49 4E 47 11 11 11 22 00 24 0F |."LOADING...".$.|
00000700: 63 01 99 22 4C 4F 41 44 22 C7 28 33 34 29 22 4D |c.."LOAD".(34)"M|
00000710: 45 4E 55 20 32 20 2B 22 C7 28 33 34 29 22 2C 38 |ENU 2 +".(34)",8|
00000720: 91 91 91 22 00 59 0F 68 01 97 36 33 31 2C 31 33 |...".Y.h..631,13|
00000730: 3A 97 36 33 32 2C 38 32 3A 97 36 33 33 2C 38 35 |:.632,82:.633,85|
00000740: 3A 97 36 33 34 2C 37 38 3A 97 36 33 35 2C 31 33 |:.634,78:.635,13|
00000750: 3A 97 31 39 38 2C 35 3A 80 00 00 00 |:.198,5:.... |
..1...XX.B(787):." .....................
..........F....XX..99..64738:." ........
.......................S....53281,6.....
.G(147):."..";:..11)"DISK CONFIGURATION"
:.:........5)"[A] DEVICE 8":..V.#...5)"[
B] DEVICE 9":....(...5)"[C] ABORT TO MEN
U LEVEL TWO":.:....-...10)"YOUR CHOICE.*
.2..CH$:.CH$."".50.@.7..CH$."A".DV.8:.75
.V.<..CH$."B".DV.9:.75.G.A..CH$.."C".50.
P.F..345...K..53281,0:.646,3...P..G(147)
:."..";:..13)"CHANGE DISK ID":.:..M.U. 9
:.9,0,0: 15:.15,DV,15...Z.MD$.".":.I.1.3
2:MD$.MD$.".":...._..I.1.39:BL$.BL$." ":
../.D.P0$.".............DISK ID CHANGER.
F.I.RE$."HIT [RETURN]".E.N..2,OUT OF RAN
GE!,TOO LONG!...S..A:.M$(A):.I.1.A:.EM$(
I):....X..185. .}..15,ER:.ER.0........15
,ER,EM$,ET$,ES$......MD$".DISK ERROR!. #
"ER" "EM$" "ET$", "ES$......345......9,Q
$:.:Q1$.H(Q$,1):..(... 2: 15:.59468,PK:.
".":.345.?....H(MD$,MD)BL$:.BL$.Q. ..H(M
D$,MD);:..`...MD.21:.155......".ILLEGAL
ENTRY -- "EM$(EM)......RE$:.145:.155....
.......F.0:.P0$.W....P0$:."..";:..10)"PL
ACE DISK IN DRIVE"DV"."...C...10)RE$:.14
5...H..15,"I".D(DV):.125.-.M. 2:.2,DV,2,
"#":.15,"U1:2";8;",18,0":.125.M.R..15,"B
-P:2,162":.125:DN$."".M.W..I.1.16:.#2,A$
:DN$.DN$.A$:......MD.10:.155:.F........"
..";:..2)". THE DISK ID IS:.";......G(34
)DN$G(34).C...MD.13.M...MD.16.......2)".
.ENTER ";.......2)"NEW ID (2 CHARACTERS)
";......145:.C(Q$).2.EM.2:.165:MD.18:.15
5:.255.C...NDN$.H(Q$.BL$,2).R...MD.21:.1
55.[....275.Z...MD.21:..2)"..HANG ON....
........15,"B-P:2,162":.125......2,NDN$;
:.125.C."..15,"U2:2";8;",18,0":.125...'.
.15,"I".D(DV):.125: 2...,.F.1:.P0$:.200:
F.0...1.."THE NEW DISK ID IS: ";.#.6..G(
34)DN$G(34).5.;. 2:MD.21:.155.[.@...2)".
.....ANOTHER DISK? (Y/N) .".N.E..U$:.U$.
"".325.~.J..U$."Y".190...O..U$."N".150..
.T..325...Y..:.:."HIT ANY KEY TO CONTINU
E.O.[..197,64,64:.198,0...\..646,0:.5328
1,0...^..G(147):."LOADING...".$.C.."LOAD
"G(34)"MENU 2 +"G(34)",8...".Y.H..631,13
:.632,82:.633,85:.634,78:.635,13:.198,5:
....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL