HEADER CHANGE SC
FILE INFORMATION
FILENAME(S): HEADER CHANGE SC
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-10-19 23:07:10
APPEARS ON: 1 disk(s)
FILE HASH
4811b7accee07964099c2640ae77ad47d19710fce9657e9ac8c1c8c0deb542cc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MARTON SOFT 784 | HEADER CHANGE SC | PRG | Bugjam - Argentina | 27 | 14 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 0A 00 4E 24 B2 22 4D 41 52 54 4F 4E |..'...N$."MARTON| 00000010: 20 53 4F 46 54 20 37 38 34 2D 22 3A 49 44 24 B2 | SOFT 784-":ID$.| 00000020: 22 20 38 38 35 31 22 00 3D 08 14 00 97 35 33 32 |" 8851".=....532| 00000030: 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 00 78 08 |80,0:.53281,0.x.| 00000040: 1E 00 99 22 93 81 11 11 11 11 11 11 11 11 11 54 |..."...........T| 00000050: 48 45 20 48 45 41 44 45 52 20 43 48 41 4E 47 45 |HE HEADER CHANGE| 00000060: 20 50 52 4F 47 52 41 4D 20 42 59 20 4D 41 52 54 | PROGRAM BY MART| 00000070: 4F 4E 20 53 4F 46 54 22 00 A9 08 28 00 99 22 91 |ON SOFT"...(..".| 00000080: A3 A3 A3 20 A3 A3 A3 A3 A3 A3 20 A3 A3 A3 A3 A3 |... ...... .....| 00000090: A3 20 A3 A3 A3 A3 A3 A3 A3 20 A3 A3 20 A3 A3 A3 |. ....... .. ...| 000000A0: A3 A3 A3 20 A3 A3 A3 A3 22 00 B5 08 32 00 55 B2 |... ...."...2.U.| 000000B0: 38 3A 44 B2 30 00 E3 08 3C 00 99 22 11 20 20 20 |8:D.0...<..". | 000000C0: 49 4E 53 45 52 54 20 44 49 53 4B 20 54 4F 20 52 |INSERT DISK TO R| 000000D0: 45 4E 41 4D 45 20 49 4E 20 54 48 45 20 44 52 49 |ENAME IN THE DRI| 000000E0: 56 45 22 00 08 09 46 00 99 22 11 20 20 20 20 20 |VE"...F..". | 000000F0: 20 20 20 20 20 20 20 20 41 4E 44 20 48 49 54 20 | AND HIT | 00000100: 41 4E 59 20 4B 45 59 22 00 29 09 50 00 99 22 11 |ANY KEY".).P..".| 00000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000120: 20 12 4D 92 29 45 4E 55 22 00 46 09 5A 00 99 22 | .M.)ENU".F.Z.."| 00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000140: 20 A3 A3 A3 A3 A3 00 59 09 64 00 A1 58 24 3A 8B | ......Y.d..X$:.| 00000150: 58 24 B2 22 22 A7 31 30 30 00 69 09 6E 00 8B 58 |X$."".100.i.n..X| 00000160: 24 B2 22 4D 22 A7 32 34 30 00 91 09 78 00 99 22 |$."M".240...x.."| 00000170: 93 11 52 45 4E 41 4D 49 4E 47 20 44 49 53 4B 2E |..RENAMING DISK.| 00000180: 2E 2E 57 41 49 54 21 22 3A 41 B2 31 3A 54 B2 31 |..WAIT!":A.1:T.1| 00000190: 38 00 AD 09 82 00 56 B2 31 36 3A 51 24 B2 C7 28 |8.....V.16:Q$..(| 000001A0: 33 34 29 3A 50 24 B2 C7 28 31 36 30 29 00 C6 09 |34):P$..(160)...| 000001B0: 8C 00 53 B2 30 3A 49 24 B2 22 49 22 AA C9 28 C4 |..S.0:I$."I"..(.| 000001C0: 28 44 29 2C 31 29 00 DB 09 96 00 9F 31 2C 55 2C |(D),1)......1,U,| 000001D0: 31 35 2C 49 24 3A 20 8D 34 39 30 00 EB 09 A0 00 |15,I$: .490.....| 000001E0: 8D 34 35 30 3A 46 24 B2 48 24 3A 00 F8 09 AA 00 |.450:F$.H$:.....| 000001F0: 8B 4C B2 56 A7 32 30 30 00 05 0A B4 00 81 58 B2 |.L.V.200......X.| 00000200: 4C AA 41 A4 56 00 20 0A BE 00 98 31 2C 22 42 2D |L.A.V. ....1,"B-| 00000210: 50 3A 22 3B 32 3B 31 34 34 3A 98 32 2C 4E 24 3B |P:";2;144:.2,N$;| 00000220: 00 3B 0A C8 00 98 31 2C 22 42 2D 50 3A 22 3B 32 |.;....1,"B-P:";2| 00000230: 3B 31 34 34 3A 98 32 2C 4E 24 3B 00 57 0A D2 00 |;144:.2,N$;.W...| 00000240: 98 31 2C 22 42 2D 50 3A 22 3B 32 3B 31 36 32 3A |.1,"B-P:";2;162:| 00000250: 98 32 2C 49 44 24 3B 00 71 0A DC 00 98 31 2C 22 |.2,ID$;.q....1,"| 00000260: 55 32 3A 22 3B 32 3B 44 3B 54 3B 53 3A 8D 34 39 |U2:";2;D;T;S:.49| 00000270: 30 00 84 0A E6 00 98 31 2C 49 24 3A 8D 34 39 30 |0......1,I$:.490| 00000280: 3A A0 20 32 00 C9 0A F0 00 99 22 93 1D 1D 1D 1D |:. 2......".....| 00000290: 1D 1D 1D 1D 1D 1D 1D 56 45 52 49 46 49 43 41 54 |.......VERIFICAT| 000002A0: 49 4F 4E 20 4D 45 4E 55 22 3A 99 22 1D 1D 1D 1D |ION MENU":."....| 000002B0: 1D 1D 1D 1D 1D 1D 1D A3 A3 A3 A3 A3 A3 A3 A3 A3 |................| 000002C0: A3 A3 A3 20 A3 A3 A3 A3 22 00 F3 0A FB 00 99 22 |... ...."......"| 000002D0: 11 11 11 11 12 52 92 29 45 4E 41 4D 45 20 44 49 |.....R.)ENAME DI| 000002E0: 53 4B 22 3A 99 22 A3 A3 A3 A3 A3 A3 A3 20 A3 A3 |SK":."....... ..| 000002F0: A3 A3 22 00 27 0B 04 01 99 22 12 46 31 92 29 48 |..".'....".F1.)H| 00000300: 45 41 44 45 52 20 44 49 52 45 43 54 4F 52 59 22 |EADER DIRECTORY"| 00000310: 3A 99 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 20 A3 A3 A3 |:."......... ...| 00000320: A3 A3 A3 A3 A3 A3 22 00 51 0B 05 01 99 22 12 46 |......".Q....".F| 00000330: 32 92 29 53 54 41 52 54 20 41 47 41 49 4E 22 3A |2.)START AGAIN":| 00000340: 99 22 A3 A3 A3 A3 A3 A3 A3 A3 20 A3 A3 A3 A3 A3 |."........ .....| 00000350: 22 00 77 0B 0E 01 99 22 12 46 33 92 29 44 49 52 |".w....".F3.)DIR| 00000360: 45 43 54 4F 52 59 22 3A 99 22 A3 A3 A3 A3 A3 A3 |ECTORY":."......| 00000370: A3 A3 A3 A3 A3 A3 22 00 A3 0B 18 01 99 22 12 46 |......"......".F| 00000380: 35 92 29 51 55 49 54 20 50 52 4F 47 52 41 4D 22 |5.)QUIT PROGRAM"| 00000390: 3A 99 22 A3 A3 A3 A3 A3 A3 A3 20 A3 A3 A3 A3 A3 |:."....... .....| 000003A0: A3 A3 22 00 D9 0B 22 01 99 22 12 46 37 92 29 46 |.."..."..".F7.)F| 000003B0: 49 4C 45 20 55 54 49 4C 49 54 59 20 4D 45 4E 55 |ILE UTILITY MENU| 000003C0: 22 3A 99 22 A3 A3 A3 A3 A3 A3 A3 20 A3 A3 A3 A3 |":."....... ....| 000003D0: A3 A3 A3 20 A3 A3 A3 A3 22 00 EC 0B 2C 01 A1 58 |... ...."...,..X| 000003E0: 24 3A 8B 58 24 B2 22 22 A7 33 30 30 00 FB 0B 2D |$:.X$."".300...-| 000003F0: 01 8B 58 24 B2 22 22 A7 31 32 30 00 0B 0C 36 01 |..X$."".120...6.| 00000400: 8B 58 24 B2 22 88 22 A7 35 35 30 00 19 0C 37 01 |.X$.".".550...7.| 00000410: 8B 58 24 B2 22 89 22 A7 8A 00 2C 0C 40 01 8B 58 |.X$."."...,.@..X| 00000420: 24 B2 22 87 22 A7 9E 36 34 37 33 38 00 3C 0C 4A |$."."..64738.<.J| 00000430: 01 8B 58 24 B2 22 85 22 A7 33 37 30 00 4C 0C 54 |..X$.".".370.L.T| 00000440: 01 8B 58 24 B2 22 86 22 A7 34 31 30 00 7C 0C 72 |..X$.".".410.|.r| 00000450: 01 99 22 93 22 3A D8 22 24 24 22 3A 99 22 11 1D |..".":."$$":."..| 00000460: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 28 41 4E 59 |............(ANY| 00000470: 20 4B 45 59 2C 50 4C 45 41 53 45 29 00 8F 0C 7C | KEY,PLEASE)...|| 00000480: 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 33 38 30 00 |..A$:.A$."".380.| 00000490: 9F 0C 86 01 8B 41 24 B2 22 22 A7 99 22 93 22 00 |.....A$.""..".".| 000004A0: A8 0C 90 01 89 32 34 30 00 D8 0C 9A 01 99 22 93 |.....240......".| 000004B0: 22 3A D8 22 24 22 3A 99 22 11 1D 1D 1D 1D 1D 1D |":."$":.".......| 000004C0: 1D 1D 1D 1D 1D 1D 1D 28 41 4E 59 20 4B 45 59 2C |.......(ANY KEY,| 000004D0: 50 4C 45 41 53 45 29 22 00 EB 0C A4 01 A1 41 24 |PLEASE)"......A$| 000004E0: 3A 8B 41 24 B2 22 22 A7 34 32 30 00 FB 0C AE 01 |:.A$."".420.....| 000004F0: 8B 41 24 B2 22 22 A7 99 22 93 22 00 04 0D B8 01 |.A$.""..".".....| 00000500: 89 32 34 30 00 1F 0D C2 01 9F 32 2C 55 2C 32 2C |.240......2,U,2,| 00000510: 22 23 22 3A 8D 20 34 39 30 3A 48 24 B2 22 22 00 |"#":. 490:H$."".| 00000520: 39 0D CC 01 98 31 2C 22 55 31 3A 22 3B 32 3B 44 |9....1,"U1:";2;D| 00000530: 3B 54 3B 53 3A 8D 34 39 30 00 54 0D D6 01 98 31 |;T;S:.490.T....1| 00000540: 2C 22 42 2D 50 3A 22 3B 32 3B 31 34 34 3A 81 58 |,"B-P:";2;144:.X| 00000550: B2 41 A4 56 00 6C 0D E0 01 A1 23 32 2C 54 24 3A |.A.V.l....#2,T$:| 00000560: 48 24 B2 48 24 AA 54 24 3A 82 3A 8E 00 83 0D EA |H$.H$.T$:.:.....| 00000570: 01 84 31 2C 45 2C 4D 24 2C 4A 2C 4B 3A 8B 45 B2 |..1,E,M$,J,K:.E.| 00000580: 30 A7 8E 00 A2 0D F4 01 99 22 11 44 49 53 4B 20 |0........".DISK | 00000590: 45 52 52 4F 52 21 3A 12 22 3B 45 3B 4D 24 3B 4A |ERROR!:.";E;M$;J| 000005A0: 3B 4B 00 AC 0D FE 01 A0 32 3A A0 31 00 BF 0D 08 |;K......2:.1....| 000005B0: 02 A1 41 24 3A 8B 41 24 B2 22 22 A7 35 32 30 00 |..A$:.A$."".520.| 000005C0: CF 0D 12 02 8B 41 24 B2 22 22 A7 99 22 93 22 00 |.....A$.""..".".| 000005D0: D5 0D 1C 02 8A 00 1A 0E 26 02 99 22 93 1D 1D 1D |........&.."....| 000005E0: 1D 1D 1D 1D 1D 1D 1D 1D 44 49 53 4B 20 55 54 49 |........DISK UTI| 000005F0: 4C 49 54 59 20 4D 45 4E 55 22 3A 99 22 1D 1D 1D |LITY MENU":."...| 00000600: 1D 1D 1D 1D 1D 1D 1D 1D A3 A3 A3 A3 20 A3 A3 A3 |............ ...| 00000610: A3 A3 A3 A3 20 A3 A3 A3 A3 22 00 40 0E 30 02 99 |.... ....".@.0..| 00000620: 22 11 11 12 20 92 29 4D 41 49 4E 20 4D 45 4E 55 |"... .)MAIN MENU| 00000630: 22 3A 99 22 A3 A3 A3 A3 A3 A3 20 A3 A3 A3 A3 22 |":."...... ...."| 00000640: 00 6B 0E 3A 02 99 22 11 12 46 31 92 29 46 4F 52 |.k.:.."..F1.)FOR| 00000650: 4D 41 54 20 44 49 53 4B 22 3A 99 22 A3 A3 A3 A3 |MAT DISK":."....| 00000660: A3 A3 A3 A3 A3 A0 A3 A3 A3 A3 22 00 9A 0E 44 02 |.........."...D.| 00000670: 99 22 11 12 46 33 92 29 53 43 52 41 54 43 48 20 |."..F3.)SCRATCH | 00000680: 46 49 4C 45 53 22 3A 99 22 A3 A3 A3 A3 A3 A3 A3 |FILES":.".......| 00000690: A3 A3 A3 20 A3 A3 A3 A3 A3 22 00 C7 0E 4E 02 99 |... ....."...N..| 000006A0: 22 11 12 46 35 92 29 52 45 4E 41 4D 45 20 46 49 |"..F5.)RENAME FI| 000006B0: 4C 45 53 22 3A 99 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 |LES":.".........| 000006C0: 20 A3 A3 A3 A3 A3 22 00 F8 0E 58 02 99 22 11 12 | ....."...X.."..| 000006D0: 46 37 92 29 56 41 4C 49 44 41 54 45 20 46 49 4C |F7.)VALIDATE FIL| 000006E0: 45 53 22 3A 99 22 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |ES":."..........| 000006F0: A3 20 A3 A3 A3 A3 A3 22 00 0B 0F 62 02 A1 41 24 |. ....."...b..A$| 00000700: 3A 8B 41 24 B2 22 22 A7 36 31 30 00 19 0F 6C 02 |:.A$."".610...l.| 00000710: 8B 41 24 B2 22 20 22 A7 8A 00 29 0F 76 02 8B 41 |.A$." "...).v..A| 00000720: 24 B2 22 85 22 A7 36 37 30 00 3A 0F 80 02 8B 41 |$.".".670.:....A| 00000730: 24 B2 22 86 22 A7 31 30 30 30 00 4A 0F 8A 02 8B |$.".".1000.J....| 00000740: 41 24 B2 22 87 22 A7 38 35 30 00 5B 0F 94 02 8B |A$.".".850.[....| 00000750: 41 24 B2 22 88 22 A7 31 31 34 30 00 9F 0F 9E 02 |A$.".".1140.....| 00000760: 99 22 93 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............| 00000770: 1D 46 4F 52 4D 41 54 20 4D 45 4E 55 22 3A 99 22 |.FORMAT MENU":."| 00000780: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D A3 A3 |................| 00000790: A3 A3 A3 A3 20 A3 A3 A3 A3 22 3A 89 37 31 30 00 |.... ....":.710.| 000007A0: C9 0F A8 02 99 22 11 1D 1D 1D 1D 1D 1D 49 4E 53 |.....".......INS| 000007B0: 45 52 54 20 44 49 53 4B 20 54 4F 20 42 45 20 46 |ERT DISK TO BE F| 000007C0: 4F 52 4D 41 54 54 45 44 22 00 F2 0F B2 02 99 22 |ORMATTED"......"| 000007D0: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 54 48 45 4E |............THEN| 000007E0: 20 48 49 54 20 41 4E 59 20 4B 45 59 22 3A 89 38 | HIT ANY KEY":.8| 000007F0: 30 30 00 05 10 BC 02 A1 41 24 3A 8B 41 24 B2 22 |00......A$:.A$."| 00000800: 22 A7 37 30 30 00 48 10 C6 02 99 22 11 53 45 4C |".700.H....".SEL| 00000810: 45 43 54 20 4D 4F 44 45 3A 22 3A 99 22 11 12 46 |ECT MODE:":."..F| 00000820: 92 29 4F 52 4D 41 54 22 3A 99 22 12 44 92 29 49 |.)ORMAT":.".D.)I| 00000830: 52 45 43 54 4F 52 59 22 3A 99 22 12 4D 92 29 41 |RECTORY":.".M.)A| 00000840: 49 4E 20 4D 45 4E 55 22 00 5B 10 D0 02 A1 41 24 |IN MENU".[....A$| 00000850: 3A 8B 41 24 B2 22 22 A7 37 32 30 00 6B 10 DA 02 |:.A$."".720.k...| 00000860: 8B 41 24 B2 22 46 22 A7 36 38 30 00 79 10 E4 02 |.A$."F".680.y...| 00000870: 8B 41 24 B2 22 4D 22 A7 8A 00 89 10 EE 02 8B 41 |.A$."M"........A| 00000880: 24 B2 22 44 22 A7 37 36 30 00 B9 10 F8 02 99 22 |$."D".760......"| 00000890: 93 22 3A D8 22 24 22 3A 99 22 11 1D 1D 1D 1D 1D |.":."$":."......| 000008A0: 1D 1D 1D 1D 1D 1D 1D 1D 28 41 4E 59 20 4B 45 59 |........(ANY KEY| 000008B0: 2C 50 4C 45 41 53 45 29 22 00 CC 10 02 03 A1 41 |,PLEASE)"......A| 000008C0: 24 3A 8B 41 24 B2 22 22 A7 37 37 30 00 DC 10 0C |$:.A$."".770....| 000008D0: 03 8B 41 24 B2 22 22 A7 99 22 93 22 00 E5 10 16 |..A$."".."."....| 000008E0: 03 8A 36 37 30 00 F8 10 20 03 A1 41 24 3A 8B 41 |..670... ..A$:.A| 000008F0: 24 B2 22 22 A7 38 30 30 00 07 11 2A 03 8B 41 24 |$."".800...*..A$| 00000900: B2 22 22 A7 38 32 30 00 4C 11 34 03 99 A3 39 29 |."".820.L.4...9)| 00000910: 22 11 46 4F 52 4D 41 54 54 49 4E 47 20 44 49 53 |".FORMATTING DIS| 00000920: 4B 2C 57 41 49 54 22 3A 9F 31 35 2C 38 2C 31 35 |K,WAIT":.15,8,15| 00000930: 2C 22 4E 30 3A 20 46 4F 52 4D 41 54 54 45 44 20 |,"N0: FORMATTED | 00000940: 44 49 53 4B 2C 31 35 22 3A A0 31 35 00 55 11 3E |DISK,15":.15.U.>| 00000950: 03 89 36 37 30 00 5E 11 48 03 99 44 4E 24 00 AE |..670.^.H..DN$..| 00000960: 11 52 03 99 22 93 1D 1D 1D 1D 1D 1D 1D 1D 1D 44 |.R.."..........D| 00000970: 49 53 4B 20 46 49 4C 45 20 52 45 4E 41 4D 45 52 |ISK FILE RENAMER| 00000980: 20 4D 45 4E 55 22 3A 99 22 1D 1D 1D 1D 1D 1D 1D | MENU":.".......| 00000990: 1D 1D A3 A3 A3 A3 20 A3 A3 A3 A3 20 A3 A3 A3 A3 |...... .... ....| 000009A0: A3 A3 A3 20 A3 A3 A3 A3 22 3A 89 39 30 30 00 CA |... ....":.900..| 000009B0: 11 5C 03 85 22 11 11 4F 4C 44 20 46 49 4C 45 20 |.\.."..OLD FILE | 000009C0: 4E 41 4D 45 3A 22 3B 44 49 24 00 DF 11 66 03 8B |NAME:";DI$...f..| 000009D0: 20 C3 28 44 49 24 29 B2 30 20 A7 20 38 35 30 00 | .(DI$).0 . 850.| 000009E0: 01 12 70 03 85 22 11 11 4E 45 57 20 46 49 4C 45 |..p.."..NEW FILE| 000009F0: 20 4E 41 4D 45 3A 22 3B 4E 57 53 24 3A 89 39 39 | NAME:";NWS$:.99| 00000A00: 30 00 16 12 7A 03 8B 20 C3 28 4E 57 24 29 B2 30 |0...z.. .(NW$).0| 00000A10: 20 A7 20 38 35 30 00 5E 12 84 03 99 22 11 53 45 | . 850.^....".SE| 00000A20: 4C 45 43 54 20 4D 4F 44 45 3A 22 3A 99 22 11 12 |LECT MODE:":."..| 00000A30: 52 92 29 45 4E 41 4D 45 20 46 49 4C 45 22 3A 99 |R.)ENAME FILE":.| 00000A40: 22 12 44 92 29 49 52 45 43 54 4F 52 59 22 3A 99 |".D.)IRECTORY":.| 00000A50: 22 12 4D 92 29 41 49 4E 20 4D 45 4E 55 22 00 71 |".M.)AIN MENU".q| 00000A60: 12 8E 03 A1 41 24 3A 8B 41 24 B2 22 22 A7 39 31 |....A$:.A$."".91| 00000A70: 30 00 81 12 98 03 8B 41 24 B2 22 52 22 A7 38 36 |0......A$."R".86| 00000A80: 30 00 91 12 A2 03 8B 41 24 B2 22 44 22 A7 39 35 |0......A$."D".95| 00000A90: 30 00 9F 12 AC 03 8B 41 24 B2 22 4D 22 A7 8A 00 |0......A$."M"...| 00000AA0: CE 12 B6 03 99 22 93 22 3A D8 22 24 22 3A 99 22 |.....".":."$":."| 00000AB0: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 28 41 |..............(A| 00000AC0: 4E 59 20 4B 45 59 2C 50 4C 45 41 53 45 29 00 E1 |NY KEY,PLEASE)..| 00000AD0: 12 C0 03 A1 41 24 3A 8B 41 24 B2 22 22 A7 39 36 |....A$:.A$."".96| 00000AE0: 30 00 F1 12 CA 03 8B 41 24 B2 22 22 A7 99 22 93 |0......A$.""..".| 00000AF0: 22 00 FA 12 D4 03 8A 38 35 30 00 2A 13 DE 03 A0 |"......850.*....| 00000B00: 31 35 3A 9F 20 31 35 2C 38 2C 31 35 2C 22 52 30 |15:. 15,8,15,"R0| 00000B10: 3A 22 AA 4E 57 53 24 AA 22 3D 22 AA 44 49 53 4B |:".NWS$."=".DISK| 00000B20: 24 3A A0 31 35 3A 8A 38 35 30 00 73 13 E8 03 99 |$:.15:.850.s....| 00000B30: 22 93 1D 1D 1D 1D 1D 1D 1D 1D 1D 44 49 53 4B 20 |"..........DISK | 00000B40: 46 49 4C 45 20 53 43 52 41 54 43 48 45 52 20 4D |FILE SCRATCHER M| 00000B50: 45 4E 55 22 3A 99 A3 39 29 22 A3 A3 A3 A3 20 A3 |ENU":..9)".... .| 00000B60: A3 A3 A3 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 20 A3 A3 |... ......... ..| 00000B70: A3 A3 22 00 7D 13 F2 03 89 31 30 34 30 00 AB 13 |..".}....1040...| 00000B80: FC 03 97 31 39 2C 36 35 3A 99 44 4E 24 3A 85 22 |...19,65:.DN$:."| 00000B90: 45 4E 54 45 52 20 46 49 4C 45 20 4E 41 4D 45 3A |ENTER FILE NAME:| 00000BA0: 22 3B 44 49 24 3A 89 31 31 33 30 00 C1 13 06 04 |";DI$:.1130.....| 00000BB0: 8B 20 C3 28 44 49 24 29 B2 30 20 A7 89 31 30 30 |. .(DI$).0 ..100| 00000BC0: 30 00 0A 14 10 04 99 22 11 53 45 4C 45 43 54 20 |0......".SELECT | 00000BD0: 4D 4F 44 45 3A 22 3A 99 22 11 12 53 92 29 43 52 |MODE:":."..S.)CR| 00000BE0: 41 54 43 48 20 46 49 4C 45 22 3A 99 22 12 44 92 |ATCH FILE":.".D.| 00000BF0: 29 49 52 45 43 54 4F 52 59 22 3A 99 22 12 4D 92 |)IRECTORY":.".M.| 00000C00: 29 41 49 4E 20 4D 45 4E 55 22 00 1E 14 1A 04 A1 |)AIN MENU"......| 00000C10: 41 24 3A 8B 41 24 B2 22 22 A7 31 30 35 30 00 2F |A$:.A$."".1050./| 00000C20: 14 24 04 8B 41 24 B2 22 53 22 A7 31 30 32 30 00 |.$..A$."S".1020.| 00000C30: 40 14 2E 04 8B 41 24 B2 22 44 22 A7 31 30 39 30 |@....A$."D".1090| 00000C40: 00 4E 14 38 04 8B 41 24 B2 22 4D 22 A7 8A 00 7D |.N.8..A$."M"...}| 00000C50: 14 42 04 99 22 93 22 3A D8 22 24 22 3A 99 22 11 |.B..".":."$":.".| 00000C60: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 28 41 4E |.............(AN| 00000C70: 59 20 4B 45 59 2C 50 4C 45 41 53 45 29 00 91 14 |Y KEY,PLEASE)...| 00000C80: 4C 04 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 31 30 |L..A$:.A$."".110| 00000C90: 30 00 A1 14 56 04 8B 41 24 B2 22 22 A7 99 22 93 |0...V..A$.""..".| 00000CA0: 22 00 AB 14 60 04 8A 31 30 30 30 00 CC 14 6A 04 |"...`..1000...j.| 00000CB0: 9F 31 35 2C 38 2C 31 35 2C 22 53 30 3A 22 AA 44 |.15,8,15,"S0:".D| 00000CC0: 49 24 3A A0 31 35 3A 8A 31 30 30 30 00 15 15 74 |I$:.15:.1000...t| 00000CD0: 04 99 22 93 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..".............| 00000CE0: 44 49 53 4B 20 56 41 4C 49 44 41 54 45 20 4D 45 |DISK VALIDATE ME| 00000CF0: 4E 55 22 3A 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |NU":."..........| 00000D00: 1D 1D A3 A3 A3 A3 20 A3 A3 A3 A3 A3 A3 A3 A3 20 |...... ........ | 00000D10: A3 A3 A3 A3 22 00 1F 15 7E 04 89 31 32 30 30 00 |...."...~..1200.| 00000D20: 50 15 88 04 99 22 11 49 4E 53 45 52 54 20 44 49 |P....".INSERT DI| 00000D30: 53 4B 20 54 4F 20 56 41 4C 49 44 41 54 45 20 54 |SK TO VALIDATE T| 00000D40: 48 45 4E 20 48 49 54 20 41 4E 59 20 4B 45 59 22 |HEN HIT ANY KEY"| 00000D50: 00 64 15 92 04 A1 41 24 3A 8B 41 24 B2 22 22 A7 |.d....A$:.A$."".| 00000D60: 31 31 37 30 00 74 15 9C 04 8B 41 24 B2 22 22 A7 |1170.t....A$."".| 00000D70: 31 31 39 30 00 7E 15 A6 04 89 31 32 39 30 00 C8 |1190.~....1290..| 00000D80: 15 B0 04 99 22 11 53 45 4C 45 43 54 20 4D 4F 44 |....".SELECT MOD| 00000D90: 45 3A 22 3A 99 22 11 12 56 92 29 41 4C 49 44 41 |E:":."..V.)ALIDA| 00000DA0: 54 45 20 44 49 53 4B 22 3A 99 22 12 44 92 29 49 |TE DISK":.".D.)I| 00000DB0: 52 45 43 54 4F 52 59 22 3A 99 22 12 4D 92 29 41 |RECTORY":.".M.)A| 00000DC0: 49 4E 20 4D 45 4E 55 22 00 DC 15 BA 04 A1 41 24 |IN MENU"......A$| 00000DD0: 3A 8B 41 24 B2 22 22 A7 31 32 31 30 00 ED 15 C4 |:.A$."".1210....| 00000DE0: 04 8B 41 24 B2 22 56 22 A7 31 31 36 30 00 FB 15 |..A$."V".1160...| 00000DF0: CE 04 8B 41 24 B2 22 4D 22 A7 8A 00 0C 16 D8 04 |...A$."M".......| 00000E00: 8B 41 24 B2 22 44 22 A7 31 32 35 30 00 3B 16 E2 |.A$."D".1250.;..| 00000E10: 04 99 22 93 22 3A D8 22 24 22 3A 99 22 11 1D 1D |..".":."$":."...| 00000E20: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 28 41 4E 59 20 |...........(ANY | 00000E30: 4B 45 59 2C 50 4C 45 41 53 45 29 00 4F 16 EC 04 |KEY,PLEASE).O...| 00000E40: A1 41 24 3A 8B 41 24 B2 22 22 A7 31 32 36 30 00 |.A$:.A$."".1260.| 00000E50: 5F 16 F6 04 8B 41 24 B2 22 22 A7 99 22 93 22 00 |_....A$.""..".".| 00000E60: 69 16 00 05 8A 31 31 34 30 00 AA 16 0A 05 99 22 |i....1140......"| 00000E70: 11 20 20 20 20 20 20 20 56 41 4C 49 44 41 54 49 |. VALIDATI| 00000E80: 4E 47 20 42 41 4D 2C 50 4C 45 41 53 45 20 57 41 |NG BAM,PLEASE WA| 00000E90: 49 54 22 3A 9F 31 35 2C 38 2C 31 35 2C 22 56 22 |IT":.15,8,15,"V"| 00000EA0: 3A A0 31 35 3A 8A 31 31 34 30 00 00 00 |:.15:.1140... |
..'...N$."MARTON SOFT 784-":ID$." 8851".
=....53280,0:.53281,0.X...."...........T
HE HEADER CHANGE PROGRAM BY MARTON SOFT"
...(..".... ...... ...... ....... .. ...
... ...."...2.U.8:D.0...<..". INSERT D
ISK TO RENAME IN THE DRIVE"...F..".
AND HIT ANY KEY".).P..".
.M.)ENU".F.Z.."
......Y.D..X$:.X$."".100.I.N..X$."M".24
0...X.."..RENAMING DISK...WAIT!":A.1:T.1
8.....V.16:Q$.G(34):P$.G(160).F...S.0:I$
."I".I(D(D),1)......1,U,15,I$: .490... .
.450:F$.H$:......L.V.200......X.L.A.V. .
...1,"B-P:";2;144:.2,N$;.;.H..1,"B-P:";2
;144:.2,N$;.W.R..1,"B-P:";2;162:.2,ID$;.
Q....1,"U2:";2;D;T;S:.490......1,I$:.490
: 2.I...."............VERIFICATION MENU
":."....................... ...."......"
.....R.)ENAME DISK":."....... ....".'...
.".F1.)HEADER DIRECTORY":."......... ...
......".Q....".F2.)START AGAIN":."......
.. .....".W....".F3.)DIRECTORY":."......
......"......".F5.)QUIT PROGRAM":.".....
.. .......".Y."..".F7.)FILE UTILITY MENU
":."....... ....... ...."...,..X$:.X$.""
.300...-..X$."".120...6..X$.".".550...7.
.X$."."...,.@..X$."."..64738.<.J..X$."."
.370.L.T..X$.".".410.|.R..".":X"$$":."..
............(ANY KEY,PLEASE)...|..A$:.A$
."".380......A$."".."."......240.X....".
":X"$":."..............(ANY KEY,PLEASE)"
......A$:.A$."".420......A$.""..".".....
.240...B..2,U,2,"#":. 490:H$."".9.L..1,"
U1:";2;D;T;S:.490.T.V..1,"B-P:";2;144:.X
.A.V.L....#2,T$:H$.H$.T$:.:.......1,E,M$
,J,K:.E.0........".DISK ERROR!:.";E;M$;J
;K..... 2: 1......A$:.A$."".520.O....A$.
""..".".U.......&.."............DISK UTI
LITY MENU":."............... ....... ...
.".@.0.."... .)MAIN MENU":."...... ...."
.K.:.."..F1.)FORMAT DISK":."......... ..
.."...D.."..F3.)SCRATCH FILES":.".......
... .....".G.N.."..F5.)RENAME FILES":.".
........ ....."...X.."..F7.)VALIDATE FIL
ES":."........... ....."...B..A$:.A$."".
610...L..A$." "...).V..A$.".".670.:....A
$.".".1000.J....A$.".".850.[....A$.".".1
140......"...............FORMAT MENU":."
.................... ....":.710.I...."..
.....INSERT DISK TO BE FORMATTED"......"
............THEN HIT ANY KEY":.800......
A$:.A$."".700.H.F..".SELECT MODE:":."..F
.)ORMAT":.".D.)IRECTORY":.".M.)AIN MENU"
.[.P..A$:.A$."".720.K.Z..A$."F".680.Y...
.A$."M"........A$."D".760......".":X"$":
."..............(ANY KEY,PLEASE)".L....A
$:.A$."".770......A$."".."."......670...
..A$:.A$."".800...*..A$."".820.L.4...9)
".FORMATTING DISK,WAIT":.15,8,15,"N0: FO
RMATTED DISK,15": 15.U.>..670.^.H..DN$..
.R.."..........DISK FILE RENAMER MENU":.
"............. .... ....... ....":.900.J
.\.."..OLD FILE NAME:";DI$...F.. C(DI$).
0 . 850...P.."..NEW FILE NAME:";NWS$:.99
0...Z.. C(NW$).0 . 850.^....".SELECT MOD
E:":."..R.)ENAME FILE":.".D.)IRECTORY":.
".M.)AIN MENU".Q....A$:.A$."".910......A
$."R".860......A$."D".950......A$."M"...
N....".":X"$":."..............(ANY KEY,P
LEASE)......A$:.A$."".960...J..A$.""..".
"...T..850.*... 15:. 15,8,15,"R0:".NWS$.
"=".DISK$: 15:.850.S...."..........DISK
FILE SCRATCHER MENU":..9)".... .... ....
..... ....".}....1040......19,65:.DN$:."
ENTER FILE NAME:";DI$:.1130.A.... C(DI$)
.0 ..1000......".SELECT MODE:":."..S.)CR
ATCH FILE":.".D.)IRECTORY":.".M.)AIN MEN
U"......A$:.A$."".1050./.$..A$."S".1020.
@....A$."D".1090.N.8..A$."M"...}.B..".":
X"$":."..............(ANY KEY,PLEASE)...
L..A$:.A$."".1100...V..A$."".."."...`..1
000.L.J..15,8,15,"S0:".DI$: 15:.1000...T
..".............DISK VALIDATE MENU":."..
.............. ........ ...."...~..1200.
P....".INSERT DISK TO VALIDATE THEN HIT
ANY KEY".D....A$:.A$."".1170.T....A$."".
1190.~....1290.H....".SELECT MODE:":."..
V.)ALIDATE DISK":.".D.)IRECTORY":.".M.)A
IN MENU"......A$:.A$."".1210...D..A$."V"
.1160...N..A$."M".....X..A$."D".1250.;..
..".":X"$":."..............(ANY KEY,PLEA
SE).O....A$:.A$."".1260._....A$.""..".".
I....1140......". VALIDATING BAM,P
LEASE WAIT":.15,8,15,"V": 15:.1140...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL