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

A HEADER CHANGE

FILE INFORMATION

FILENAME(S): A HEADER CHANGE

FILE TYPE(S): PRG

FILE SIZE: 2.5K

FIRST SEEN: 2025-11-30 21:10:11

APPEARS ON: 1 disk(s)

FILE HASH

7eaf2a2ee4d33d7b085681c2da22ddc2506de425c8b09245bd7ac4fb2d5ec673

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
COPIEER PRG 1A A HEADER CHANGE PRG DuncanTwain 27 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: C0 02 00 08 01 00 93 22  41 20 48 45 41 44 45 52  |......."A HEADER|
00000010: 20 43 48 41 4E 47 45 22  2C 38 2C 31 00 00 00 00  | CHANGE",8,1....|
00000020: 00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
00000030: 00 00 00 00 00 00 00 00  00 00 00 00 00 00 00 00  |................|
00000040: 00 00 8B E3 34 03 7C A5  1A A7 E4 A7 86 AE 00 00  |....4.|.........|
00000050: 00 00 4C 48 B2 00 31 EA  66 02 47 FE 4A F3 91 F2  |..LH..1.f.G.J...|
00000060: 0E F2 50 F2 33 F3 57 F1  CA F1 ED F6 3E F1 2F F3  |..P.3.W.....>./.|
00000070: 66 FE A5 F4 ED F5 20 59  A6 4C AE A7 20 20 20 20  |f..... Y.L..    |
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: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000100: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000110: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000120: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000130: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000140: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000150: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000160: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000170: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000180: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000190: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000200: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000210: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000220: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000230: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000240: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000250: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000260: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000270: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000280: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000290: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000300: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000310: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000320: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000330: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000340: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000350: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000360: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000370: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000380: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000390: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000400: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000410: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000420: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000430: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000440: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000450: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000460: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000470: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000480: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000490: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000500: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000510: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000520: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000530: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000540: 20 20 00 28 08 0A 00 99  20 22 93 11 20 43 48 41  |  .(.... ".. CHA|
00000550: 4E 47 45 20 44 49 53 4B  45 54 54 45 20 48 45 41  |NGE DISKETTE HEA|
00000560: 44 45 52 2D 4E 41 4D 45  22 00 50 08 14 00 99 20  |DER-NAME".P.... |
00000570: 22 11 20 44 49 53 4B 20  55 4E 49 54 20 4E 52 20  |". DISK UNIT NR |
00000580: 28 38 2D 31 35 29 20 3F  A0 38 20 9D 9D 9D 9D 22  |(8-15) ?.8 ...."|
00000590: 3B 00 76 08 1E 00 85 20  55 3A 20 8B 20 55 B3 38  |;.v.... U: . U.8|
000005A0: 20 B0 20 55 B1 31 35 20  A7 20 99 20 22 91 91 91  | . U.15 . . "...|
000005B0: 22 3A 20 89 20 32 30 00  9C 08 28 00 99 20 22 11  |": . 20...(.. ".|
000005C0: 20 44 49 53 4B 20 44 52  49 56 45 20 4E 52 20 28  | DISK DRIVE NR (|
000005D0: 30 2F 31 29 20 3F A0 30  9D 9D 9D 22 3B 00 C1 08  |0/1) ?.0...";...|
000005E0: 32 00 85 20 44 3A 20 8B  20 44 B3 30 20 B0 20 44  |2.. D: . D.0 . D|
000005F0: B1 31 20 A7 20 99 20 22  91 91 91 22 3A 20 89 20  |.1 . . "...": . |
00000600: 34 30 00 F1 08 3C 00 99  20 22 11 11 20 50 55 54  |40...<.. ".. PUT|
00000610: 20 54 41 52 47 45 54 20  44 49 53 4B 20 49 4E 20  | TARGET DISK IN |
00000620: 55 4E 49 54 22 3B 55 3B  22 20 44 52 49 56 45 22  |UNIT";U;" DRIVE"|
00000630: 3B 44 00 19 09 46 00 99  20 22 20 54 48 45 4E 20  |;D...F.. " THEN |
00000640: 50 52 45 53 53 20 41 4E  59 20 4B 45 59 20 54 4F  |PRESS ANY KEY TO|
00000650: 20 43 4F 4E 54 49 4E 55  45 22 00 2F 09 50 00 A1  | CONTINUE"./.P..|
00000660: 20 58 24 3A 20 8B 20 58  24 B2 22 22 A7 20 38 30  | X$: . X$."". 80|
00000670: 00 52 09 5A 00 41 B2 31  3A 20 56 B2 31 36 3A 20  |.R.Z.A.1: V.16: |
00000680: 51 24 B2 C7 28 33 34 29  3A 20 50 24 B2 C7 28 31  |Q$..(34): P$..(1|
00000690: 36 30 29 00 72 09 64 00  54 B2 31 38 3A 20 53 B2  |60).r.d.T.18: S.|
000006A0: 30 3A 20 49 24 B2 22 49  22 AA C9 28 C4 28 44 29  |0: I$."I"..(.(D)|
000006B0: 2C 31 29 00 89 09 6E 00  9F 20 31 2C 55 2C 31 35  |,1)...n.. 1,U,15|
000006C0: 2C 49 24 3A 20 8D 20 33  35 30 00 AB 09 78 00 8D  |,I$: . 350...x..|
000006D0: 20 33 31 30 3A 20 46 24  B2 48 24 3A 20 A1 23 32  | 310: F$.H$: .#2|
000006E0: 2C 58 24 2C 58 24 2C 41  24 2C 42 24 00 D5 09 82  |,X$,X$,A$,B$....|
000006F0: 00 99 20 22 93 11 11 20  43 55 52 52 45 4E 54 20  |.. "... CURRENT |
00000700: 48 45 41 44 45 52 2D 4E  41 4D 45 20 22 3B 51 24  |HEADER-NAME ";Q$|
00000710: 3B 46 24 3B 51 24 00 F6  09 8C 00 99 20 22 20 44  |;F$;Q$...... " D|
00000720: 49 53 4B 45 54 54 45 20  49 44 20 49 53 3A 20 20  |ISKETTE ID IS:  |
00000730: 22 3B 41 24 3B 42 24 00  27 0A 96 00 99 20 22 11  |";A$;B$.'.... ".|
00000740: 20 4E 45 57 20 4E 41 4D  45 20 28 4D 41 58 20 31  | NEW NAME (MAX 1|
00000750: 36 20 43 48 41 52 41 43  54 45 52 53 29 20 4F 52  |6 CHARACTERS) OR|
00000760: 20 27 51 55 49 54 27 22  00 56 0A A0 00 85 20 22  | 'QUIT'".V.... "|
00000770: 20 3F 20 51 55 49 54 9D  9D 9D 9D 9D 9D 22 3B 4E  | ? QUIT......";N|
00000780: 24 3A 20 4C B2 C3 28 4E  24 29 3A 20 8B 20 4C B1  |$: L..(N$): . L.|
00000790: 56 20 A7 20 31 33 30 00  76 0A AA 00 8B 20 4E 24  |V . 130.v.... N$|
000007A0: B2 22 51 55 49 54 22 20  A7 20 99 20 22 93 22 3B  |."QUIT" . . ".";|
000007B0: 3A 20 89 20 33 37 30 00  AA 0A B4 00 99 20 22 11  |: . 370...... ".|
000007C0: 20 4F 4B 20 54 4F 20 57  52 49 54 45 20 4E 45 57  | OK TO WRITE NEW|
000007D0: 20 48 45 41 44 45 52 2D  4E 41 4D 45 20 28 59 2F  | HEADER-NAME (Y/|
000007E0: 4E 29 20 3F 20 59 9D 9D  9D 22 3B 00 C4 0A BE 00  |N) ? Y...";.....|
000007F0: 85 20 58 24 3A 20 8B 20  58 24 B3 B1 22 59 22 20  |. X$: . X$.."Y" |
00000800: A7 20 31 33 30 00 D4 0A  C8 00 8B 20 4C B2 56 20  |. 130...... L.V |
00000810: A7 20 32 32 30 00 F1 0A  D2 00 81 20 58 B2 4C AA  |. 220...... X.L.|
00000820: 41 20 A4 20 56 3A 20 4E  24 B2 4E 24 AA 50 24 3A  |A . V: N$.N$.P$:|
00000830: 20 82 00 0D 0B DC 00 98  31 2C 22 42 2D 50 3A 22  | .......1,"B-P:"|
00000840: 3B 32 3B 31 34 34 3A 20  98 32 2C 4E 24 3B 00 29  |;2;144: .2,N$;.)|
00000850: 0B E6 00 98 31 2C 22 55  32 3A 22 3B 32 3B 44 3B  |....1,"U2:";2;D;|
00000860: 54 3B 53 3A 20 8D 20 33  35 30 00 3F 0B F0 00 98  |T;S: . 350.?....|
00000870: 31 2C 49 24 3A 20 8D 20  33 35 30 3A 20 A0 20 32  |1,I$: . 350: . 2|
00000880: 00 63 0B FA 00 99 20 22  11 20 4F 4C 44 20 48 45  |.c.... ". OLD HE|
00000890: 41 44 45 52 2D 4E 41 4D  45 20 22 3B 51 24 3B 46  |ADER-NAME ";Q$;F|
000008A0: 24 3B 51 24 00 77 0B 04  01 8D 20 33 31 30 3A 20  |$;Q$.w.... 310: |
000008B0: A0 20 32 3A 20 A0 20 31  00 9B 0B 0E 01 99 20 22  |. 2: . 1...... "|
000008C0: 11 20 4E 45 57 20 48 45  41 44 45 52 2D 4E 41 4D  |. NEW HEADER-NAM|
000008D0: 45 20 22 3B 51 24 3B 48  24 3B 51 24 00 CB 0B 18  |E ";Q$;H$;Q$....|
000008E0: 01 99 20 22 11 20 43 48  41 4E 47 45 20 41 4E 4F  |.. ". CHANGE ANO|
000008F0: 54 48 45 52 20 44 49 53  4B 45 54 54 45 20 28 59  |THER DISKETTE (Y|
00000900: 2F 4E 29 20 3F 20 59 9D  9D 9D 22 3B 00 E3 0B 22  |/N) ? Y...";..."|
00000910: 01 85 20 58 24 3A 20 8B  20 58 24 B2 22 59 22 20  |.. X$: . X$."Y" |
00000920: A7 20 36 30 00 F1 0B 2C  01 99 20 22 93 22 3B 3A  |. 60...,.. ".";:|
00000930: 20 80 00 0F 0C 36 01 9F  20 32 2C 55 2C 32 2C 22  | ....6.. 2,U,2,"|
00000940: 23 22 3A 20 8D 20 33 35  30 3A 20 48 24 B2 22 22  |#": . 350: H$.""|
00000950: 00 2B 0C 40 01 98 31 2C  22 55 31 3A 22 3B 32 3B  |.+.@..1,"U1:";2;|
00000960: 44 3B 54 3B 53 3A 20 8D  20 33 35 30 00 4A 0C 4A  |D;T;S: . 350.J.J|
00000970: 01 98 31 2C 22 42 2D 50  3A 22 3B 32 3B 31 34 34  |..1,"B-P:";2;144|
00000980: 3A 20 81 20 58 B2 41 20  A4 20 56 00 65 0C 54 01  |: . X.A . V.e.T.|
00000990: A1 23 32 2C 54 24 3A 20  48 24 B2 48 24 AA 54 24  |.#2,T$: H$.H$.T$|
000009A0: 3A 20 82 3A 20 8E 00 7F  0C 5E 01 84 31 2C 45 2C  |: .: ....^..1,E,|
000009B0: 4D 24 2C 4A 2C 4B 3A 8B  20 45 B2 30 20 A7 20 8E  |M$,J,K:. E.0 . .|
000009C0: 00 9A 0C 68 01 99 20 22  11 20 45 52 52 4F 52 3A  |...h.. ". ERROR:|
000009D0: 20 22 3B 45 3B 4D 24 3B  4A 3B 4B 00 AA 0C 72 01  | ";E;M$;J;K...r.|
000009E0: A0 20 32 3A 20 A0 20 31  3A 20 80 00 00 00        |. 2: . 1: ....  |
......."A HEADER CHANGE",8,1............
............................4.|.........
..LH..1.F.G.J.....P.3.W.J...>./.F..... Y
.L..                                    
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                                        
                          .(.... ".. CHA
NGE DISKETTE HEADER-NAME".P.... ". DISK 
UNIT NR (8-15) ? 8 ....";.V.... U: . U.8
 . U.15 . . "...": . 20...(.. ". DISK DR
IVE NR (0/1) ? 0...";.A.2.. D: . D.0 . D
.1 . . "...": . 40...<.. ".. PUT TARGET 
DISK IN UNIT";U;" DRIVE";D...F.. " THEN 
PRESS ANY KEY TO CONTINUE"./.P.. X$: . X
$."". 80.R.Z.A.1: V.16: Q$.G(34): P$.G(1
60).R.D.T.18: S.0: I$."I".I(D(D),1)...N.
. 1,U,15,I$: . 350...X.. 310: F$.H$: .#2
,X$,X$,A$,B$.U.... "... CURRENT HEADER-N
AME ";Q$;F$;Q$...... " DISKETTE ID IS:  
";A$;B$.'.... ". NEW NAME (MAX 16 CHARAC
TERS) OR 'QUIT'".V. .. " ? QUIT......";N
$: L.C(N$): . L.V . 130.V.... N$."QUIT" 
. . ".";: . 370...... ". OK TO WRITE NEW
 HEADER-NAME (Y/N) ? Y...";.D.... X$: . 
X$.."Y" . 130.T.H.. L.V . 220...R.. X.L.
A . V: N$.N$.P$: .......1,"B-P:";2;144: 
.2,N$;.)....1,"U2:";2;D;T;S: . 350.?....
1,I$: . 350:   2.C.... ". OLD HEADER-NAM
E ";Q$;F$;Q$.W.... 310:   2:   1...... "
. NEW HEADER-NAME ";Q$;H$;Q$.K.... ". CH
ANGE ANOTHER DISKETTE (Y/N) ? Y...";..."
.. X$: . X$."Y" . 60...,.. ".";: ....6..
 2,U,2,"#": . 350: H$."".+.@..1,"U1:";2;
D;T;S: . 350.J.J..1,"B-P:";2;144: . X.A 
. V.E.T..#2,T$: H$.H$.T$: .: ...^..1,E,
M$,J,K:. E.0 . ....H.. ". ERROR: ";E;M$;
J;K...R.  2:   1: ....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL