00000000: 01 04 2B 04 0A 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..+....*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 32 04 0B 00 |***********.2...|
00000030: 8F 2A 00 56 04 0C 00 8F 2A 20 43 48 41 4E 47 45 |.*.V....* CHANGE|
00000040: 20 43 42 4D 20 44 49 53 4B 20 20 20 53 45 50 54 | CBM DISK SEPT|
00000050: 2F 31 34 2F 38 31 00 5D 04 0D 00 8F 2A 00 84 04 |/14/81.]....*...|
00000060: 0E 00 8F 2A 20 54 48 49 53 20 50 52 4F 47 52 41 |...* THIS PROGRA|
00000070: 4D 20 43 48 41 4E 47 45 53 20 54 48 45 20 44 49 |M CHANGES THE DI|
00000080: 53 4B 27 53 00 AC 04 0F 00 8F 2A 20 44 45 56 49 |SK'S......* DEVI|
00000090: 43 45 20 4E 55 4D 42 45 52 20 54 4F 20 54 48 45 |CE NUMBER TO THE|
000000A0: 20 4E 55 4D 42 45 52 20 54 48 41 54 00 D2 04 10 | NUMBER THAT....|
000000B0: 00 8F 2A 20 49 53 20 47 49 56 45 4E 20 42 59 20 |..* IS GIVEN BY |
000000C0: 54 48 45 20 4F 50 45 52 41 54 4F 52 2E 20 54 48 |THE OPERATOR. TH|
000000D0: 49 53 00 F9 04 11 00 8F 2A 20 43 41 4E 20 52 41 |IS......* CAN RA|
000000E0: 4E 47 45 20 46 52 4F 4D 20 39 20 54 4F 20 31 35 |NGE FROM 9 TO 15|
000000F0: 2E 20 54 48 49 53 20 49 53 00 1F 05 12 00 8F 2A |. THIS IS......*|
00000100: 20 41 20 53 4F 46 54 20 43 48 41 4E 47 45 3B 20 | A SOFT CHANGE; |
00000110: 54 48 55 53 20 41 20 52 45 53 45 54 20 4F 46 00 |THUS A RESET OF.|
00000120: 48 05 13 00 8F 2A 20 54 48 45 20 44 49 53 4B 20 |H....* THE DISK |
00000130: 57 49 4C 4C 20 43 41 55 53 45 20 49 54 20 54 4F |WILL CAUSE IT TO|
00000140: 20 52 45 53 54 4F 52 45 00 6A 05 14 00 8F 2A 20 | RESTORE.j....* |
00000150: 54 4F 20 54 48 45 20 48 41 52 44 20 44 45 56 49 |TO THE HARD DEVI|
00000160: 43 45 20 4E 55 4D 42 45 52 2E 00 71 05 15 00 8F |CE NUMBER..q....|
00000170: 2A 00 96 05 16 00 8F 2A 20 54 48 49 53 20 50 52 |*......* THIS PR|
00000180: 4F 47 52 41 4D 20 49 53 20 46 4F 52 20 41 4E 59 |OGRAM IS FOR ANY|
00000190: 20 32 30 34 30 2C 00 B7 05 17 00 8F 2A 20 34 30 | 2040,......* 40|
000001A0: 34 30 2C 20 38 30 35 30 2C 20 32 30 33 31 20 4F |40, 8050, 2031 O|
000001B0: 52 20 31 35 34 30 2E 00 BE 05 18 00 8F 2A 00 E5 |R 1540.......*..|
000001C0: 05 19 00 8F 2A 20 54 48 49 53 20 56 45 52 53 49 |....* THIS VERSI|
000001D0: 4F 4E 20 42 59 20 4A 49 4D 20 42 55 54 54 45 52 |ON BY JIM BUTTER|
000001E0: 46 49 45 4C 44 00 EC 05 1A 00 8F 2A 00 16 06 1B |FIELD......*....|
000001F0: 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
00000200: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000210: 2A 2A 2A 2A 2A 2A 00 28 06 63 00 83 20 31 32 2C |******.(.c.. 12,|
00000220: 35 30 2C 31 31 39 2C 30 00 44 06 64 00 85 22 4F |50,119,0.D.d.."O|
00000230: 4C 44 20 44 45 56 49 43 45 20 4E 55 4D 42 45 52 |LD DEVICE NUMBER|
00000240: 22 3B 44 4F 00 5B 06 6E 00 8B 44 4F B3 38 20 B0 |";DO.[.n..DO.8 .|
00000250: 20 44 4F B1 31 35 20 A7 31 30 30 00 77 06 96 00 | DO.15 .100.w...|
00000260: 85 22 4E 45 57 20 44 45 56 49 43 45 20 4E 55 4D |."NEW DEVICE NUM|
00000270: 42 45 52 22 3B 44 4E 00 8E 06 A0 00 8B 44 4E B3 |BER";DN......DN.|
00000280: 38 20 B0 20 44 4E B1 31 35 20 A7 31 35 30 00 AE |8 . DN.15 .150..|
00000290: 06 C8 00 9F 31 35 2C 44 4F 2C 31 35 3A 8F 20 43 |....15,DO,15:. C|
000002A0: 4F 4D 4D 41 4E 44 20 43 48 41 4E 4E 45 4C 00 CA |OMMAND CHANNEL..|
000002B0: 06 D2 00 41 24 B2 C7 28 44 4F AA 33 32 29 3A 42 |...A$..(DO.32):B|
000002C0: 24 B2 C7 28 44 4F AA 36 34 29 00 F3 06 DC 00 87 |$..(DO.64)......|
000002D0: 41 3A 8B 41 B2 30 A7 99 22 44 49 53 4B 20 4E 4F |A:.A.0.."DISK NO|
000002E0: 54 20 52 45 43 4F 47 4E 49 5A 45 44 21 22 3B 89 |T RECOGNIZED!";.|
000002F0: 33 31 30 00 1D 07 E6 00 98 31 35 2C 22 4D 2D 52 |310......15,"M-R|
00000300: 22 C7 28 41 29 C7 28 30 29 3A A1 23 31 35 2C 58 |".(A).(0):.#15,X|
00000310: 24 3A 8B 58 24 B3 B1 41 24 89 32 32 30 00 49 07 |$:.X$..A$.220.I.|
00000320: F0 00 98 31 35 2C 22 4D 2D 52 22 C7 28 41 AA 31 |...15,"M-R".(A.1|
00000330: 29 C7 28 30 29 3A A1 23 31 35 2C 58 24 3A 8B 58 |).(0):.#15,X$:.X|
00000340: 24 B3 B1 42 24 89 32 32 30 00 73 07 2C 01 98 31 |$..B$.220.s.,..1|
00000350: 35 2C 22 4D 2D 57 22 C7 28 41 29 C7 28 30 29 C7 |5,"M-W".(A).(0).|
00000360: 28 32 29 C7 28 44 4E AA 33 32 29 C7 28 44 4E AA |(2).(DN.32).(DN.|
00000370: 36 34 29 00 7B 07 36 01 A0 31 35 00 00 00 |64).{.6..15... |
..+....*********************************
***.2....*.V....* CHANGE CBM DISK SEPT
/14/81.]....*......* THIS PROGRAM CHANGE
S THE DISK'S......* DEVICE NUMBER TO THE
NUMBER THAT.R....* IS GIVEN BY THE OPER
ATOR. THIS......* CAN RANGE FROM 9 TO 15
. THIS IS......* A SOFT CHANGE; THUS A R
ESET OF.H....* THE DISK WILL CAUSE IT TO
RESTORE.J....* TO THE HARD DEVICE NUMBE
R..Q....*......* THIS PROGRAM IS FOR ANY
2040,......* 4040, 8050, 2031 OR 1540..
.....*......* THIS VERSION BY JIM BUTTER
FIELD......*......**********************
**************.(.C.. 12,50,119,0.D.D.."O
LD DEVICE NUMBER";DO.[.N..DO.8 . DO.15 .
100.W...."NEW DEVICE NUMBER";DN... ..DN.
8 . DN.15 .150...H..15,DO,15:. COMMAND C
HANNEL.J.R.A$.G(DO.32):B$.G(DO.64)......
A:.A.0.."DISK NOT RECOGNIZED!";.310.....
.15,"M-R"G(A)G(0):.#15,X$:.X$..A$.220.I.
...15,"M-R"G(A.1)G(0):.#15,X$:.X$..B$.22
0.S.,..15,"M-W"G(A)G(0)G(2)G(DN.32)G(DN.
64).{.6. 15...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL