_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\

CHANGE UNIT #

FILE INFORMATION

FILENAME(S): CHANGE UNIT #

FILE TYPE(S): PRG

FILE SIZE: 760b

FIRST SEEN: 2025-11-30 18:07:08

APPEARS ON: 3 disk(s)

FILE HASH

023185124735b217b11945d78ea546397c401b09b3821c189f21c157ee46bc82

FOUND ON DISKS (3 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
1764 V 040887 CHANGE UNIT # PRG Xii 19 5 DOWNLOAD FILE
1764 V 040887 CHANGE UNIT # PRG Sailor, Pbv 19 5 DOWNLOAD FILE
1764 V 040887 CHANGE UNIT # PRG DuncanTwain 19 5 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 41 08 64 00 8F 20  46 24 3D 22 30 3A 43 48  |..A.d.. F$="0:CH|
00000010: 41 4E 47 45 20 55 4E 49  54 20 23 22 3A 20 4F 50  |ANGE UNIT #": OP|
00000020: 45 4E 31 2C 38 2C 31 35  2C 22 53 22 2B 46 24 3A  |EN1,8,15,"S"+F$:|
00000030: 20 43 4C 4F 53 45 31 3A  20 53 41 56 45 46 24 2C  | CLOSE1: SAVEF$,|
00000040: 38 00 4B 08 6E 00 99 22  93 22 3B 00 71 08 78 00  |8.K.n..".";.q.x.|
00000050: 99 22 B0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |."..............|
00000060: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00000070: AE 00 97 08 82 00 99 22  DD 20 20 43 48 41 4E 47  |.......".  CHANG|
00000080: 45 20 55 4E 49 54 20 4E  55 4D 42 45 52 20 56 31  |E UNIT NUMBER V1|
00000090: 31 31 32 38 36 20 DD 00  C0 08 8C 00 99 22 AD C0  |11286 ......."..|
000000A0: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
000000B0: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 BD 22 3A 99  |.............":.|
000000C0: 00 E6 08 96 00 99 22 20  46 4F 52 20 43 42 4D 20  |......" FOR CBM |
000000D0: 53 45 52 49 41 4C 20 44  49 53 4B 53 20 4F 4E 4C  |SERIAL DISKS ONL|
000000E0: 59 2E 20 49 46 22 00 0C  09 A0 00 99 22 20 41 4E  |Y. IF"......" AN|
000000F0: 59 20 44 49 53 4B 53 20  41 52 45 20 54 48 45 20  |Y DISKS ARE THE |
00000100: 53 41 4D 45 20 4E 55 4D  42 45 52 22 00 32 09 AA  |SAME NUMBER".2..|
00000110: 00 99 22 20 50 4F 57 45  52 2D 4F 46 46 20 41 4C  |.." POWER-OFF AL|
00000120: 4C 20 20 42 55 54 20 20  54 48 45 20 46 49 52 53  |L  BUT  THE FIRS|
00000130: 54 22 00 4F 09 B4 00 99  22 20 55 4E 49 54 20 54  |T".O...." UNIT T|
00000140: 4F 20 42 45 20 43 48 41  4E 47 45 44 2E 11 22 00  |O BE CHANGED..".|
00000150: 81 09 BE 00 46 B2 30 3A  20 85 20 22 20 12 20 4F  |....F.0: . " . O|
00000160: 4C 44 20 92 20 44 45 56  49 43 45 20 23 20 28 38  |LD . DEVICE # (8|
00000170: 2D 33 30 29 3A 20 3F 20  38 20 9D 9D 9D 9D 22 3B  |-30): ? 8 ....";|
00000180: 46 00 A2 09 C8 00 8B 20  46 B3 38 20 B0 20 46 B1  |F...... F.8 . F.|
00000190: 33 30 20 A7 20 99 20 22  91 91 22 3A 20 89 20 31  |30 . . "..": . 1|
000001A0: 39 30 00 D4 09 D2 00 54  B2 30 3A 20 85 20 22 20  |90.....T.0: . " |
000001B0: 12 20 4E 45 57 20 92 20  44 45 56 49 43 45 20 23  |. NEW . DEVICE #|
000001C0: 20 28 38 2D 33 30 29 3A  20 3F 20 39 20 9D 9D 9D  | (8-30): ? 9 ...|
000001D0: 9D 22 3B 54 00 F5 09 DC  00 8B 20 54 B3 38 20 B0  |.";T...... T.8 .|
000001E0: 20 54 B1 33 30 20 A7 20  99 20 22 91 91 22 3A 20  | T.30 . . "..": |
000001F0: 89 20 32 31 30 00 29 0A  E6 00 9F 20 31 2C 46 2C  |. 210.).... 1,F,|
00000200: 31 35 2C 22 4D 2D 57 22  AA C7 28 31 31 39 29 AA  |15,"M-W"..(119).|
00000210: C7 28 30 29 AA C7 28 32  29 AA C7 28 54 AA 33 32  |.(0)..(2)..(T.32|
00000220: 29 AA C7 28 54 AA 36 34  29 00 36 0A F0 00 53 B2  |)..(T.64).6...S.|
00000230: 53 54 3A 20 A0 31 00 64  0A FA 00 8B 20 28 53 20  |ST: .1.d.... (S |
00000240: AF 20 31 39 31 29 20 A7  20 99 20 22 20 45 52 52  |. 191) . . " ERR|
00000250: 4F 52 20 4F 4E 20 55 4E  49 54 22 3B 46 3A 20 89  |OR ON UNIT";F: .|
00000260: 20 32 37 30 00 8D 0A 04  01 99 20 22 11 20 44 45  | 270...... ". DE|
00000270: 56 49 43 45 22 3B 46 3B  22 43 48 41 4E 47 45 44  |VICE";F;"CHANGED|
00000280: 20 54 4F 20 44 45 56 49  43 45 22 3B 54 00 BA 0A  | TO DEVICE";T...|
00000290: 0E 01 85 20 22 11 20 43  48 41 4E 47 45 20 4D 4F  |... ". CHANGE MO|
000002A0: 52 45 20 55 4E 49 54 53  20 28 59 2F 4E 29 3A 20  |RE UNITS (Y/N): |
000002B0: 3F 20 4E 9D 9D 9D 22 3B  43 24 00 F5 0A 18 01 8B  |? N...";C$......|
000002C0: 20 43 24 B2 22 59 22 20  A7 20 99 20 22 11 12 20  | C$."Y" . . ".. |
000002D0: 50 4F 57 45 52 2D 4F 4E  20 4E 45 58 54 20 55 4E  |POWER-ON NEXT UN|
000002E0: 49 54 20 54 4F 20 43 48  41 4E 47 45 20 11 22 3A  |IT TO CHANGE .":|
000002F0: 20 89 31 39 30 00 00 00                           | .190...        |

..A.D.. F$="0:CHANGE UNIT #": OPEN1,8,15
,"S"+F$: CLOSE1: SAVEF$,8.K.N..".";.Q.X.
."....................................."
.  CHANGE UNIT NUMBER V111286 ......."..
.............................":......." 
FOR CBM SERIAL DISKS ONLY. IF"... .." AN
Y DISKS ARE THE SAME NUMBER".2...." POWE
R-OFF ALL  BUT  THE FIRST".O...." UNIT T
O BE CHANGED..".....F.0: . " . OLD . DEV
ICE # (8-30): ? 8 ....";F...H.. F.8 . F.
30 . . "..": . 190.T.R.T.0: . " . NEW . 
DEVICE # (8-30): ? 9 ....";T...... T.8 .
 T.30 . . "..": . 210.).... 1,F,15,"M-W"
.G(119).G(0).G(2).G(T.32).G(T.64).6...S.
ST:  1.D.... (S . 191) . . " ERROR ON UN
IT";F: . 270...... ". DEVICE";F;"CHANGED
 TO DEVICE";T...... ". CHANGE MORE UNITS
 (Y/N): ? N...";C$...... C$."Y" . . ".. 
POWER-ON NEXT UNIT TO CHANGE .": .190...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL