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

FONTDISK-DISK

FILE INFORMATION

FILENAME(S): FONTDISK-DISK

FILE TYPE(S): PRG

FILE SIZE: 626b

FIRST SEEN: 2025-10-19 22:48:31

APPEARS ON: 1 disk(s)

FILE HASH

d4d149aea6371d1e62fe831931cb70b1ee464ca421ae980b95a702b9175c0191

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
UTILITIES U38 FONTDISK-DISK PRG Radd Maxx 19 6 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 37 08 01 00 8F 20  50 52 4F 47 52 41 4D 20  |..7.... PROGRAM |
00000010: 54 4F 20 43 4F 50 59 20  41 20 46 4F 4E 54 20 46  |TO COPY A FONT F|
00000020: 52 4F 4D 20 4F 4E 45 20  44 49 53 4B 20 54 4F 20  |ROM ONE DISK TO |
00000030: 41 4E 4F 54 48 45 52 00  4A 08 02 00 86 4C 24 28  |ANOTHER.J....L$(|
00000040: 36 37 29 2C 4D 24 28 36  35 29 00 83 08 03 00 99  |67),M$(65)......|
00000050: 22 93 22 3A 99 22 49 4E  53 45 52 54 20 46 4F 4E  |".":."INSERT FON|
00000060: 54 20 44 49 53 4B 22 3A  99 3A 85 22 45 4E 54 45  |T DISK":.:."ENTE|
00000070: 52 20 46 4F 4E 54 20 4E  55 4D 42 45 52 22 3B 46  |R FONT NUMBER";F|
00000080: 24 3A 99 00 9D 08 04 00  8B C5 28 46 24 29 B3 31  |$:........(F$).1|
00000090: B0 C5 28 46 24 29 B1 39  39 39 39 A7 33 00 AE 08  |..(F$).9999.3...|
000000A0: 05 00 46 24 B2 22 46 4F  4E 54 22 AA 46 24 00 EE  |..F$."FONT".F$..|
000000B0: 08 0A 00 9F 32 2C 38 2C  32 2C 22 30 3A 22 AA 46  |....2,8,2,"0:".F|
000000C0: 24 AA 22 2C 53 2C 52 22  3A 84 32 2C 5A 24 3A 8B  |$.",S,R":.2,Z$:.|
000000D0: 5A 24 B2 22 22 A7 A0 32  3A 99 22 46 4F 4E 54 20  |Z$.""..2:."FONT |
000000E0: 4E 4F 54 20 46 4F 55 4E  44 22 3A 99 3A 80 00 21  |NOT FOUND":.:..!|
000000F0: 09 14 00 81 58 B2 30 A4  36 37 3A 84 32 2C 4C 24  |....X.0.67:.2,L$|
00000100: 28 58 29 3A 8B C9 28 4C  24 28 58 29 2C 31 29 B1  |(X):..(L$(X),1).|
00000110: 22 44 22 AF 58 B3 36 35  A7 84 32 2C 4D 24 28 58  |"D".X.65..2,M$(X|
00000120: 29 00 56 09 1E 00 82 3A  A0 32 3A 99 22 43 48 41  |).V....:.2:."CHA|
00000130: 4E 47 45 20 44 49 53 4B  2C 20 50 52 45 53 53 20  |NGE DISK, PRESS |
00000140: 3C 45 4E 54 45 52 3E 20  54 4F 20 43 4F 4E 54 49  |<ENTER> TO CONTI|
00000150: 4E 55 45 22 3A 99 00 6C  09 23 00 A1 58 24 3A 8B  |NUE":..l.#..X$:.|
00000160: 58 24 B3 B1 C7 28 31 33  29 A7 33 35 00 8C 09 28  |X$...(13).35...(|
00000170: 00 9F 32 2C 38 2C 32 2C  22 30 3A 22 AA 46 24 AA  |..2,8,2,"0:".F$.|
00000180: 22 2C 53 2C 57 22 3A 98  32 2C 5A 24 00 BF 09 32  |",S,W":.2,Z$...2|
00000190: 00 81 58 B2 30 A4 36 37  3A 98 32 2C 4C 24 28 58  |..X.0.67:.2,L$(X|
000001A0: 29 3A 8B C9 28 4C 24 28  58 29 2C 31 29 B1 22 44  |):..(L$(X),1)."D|
000001B0: 22 AF 58 B3 36 35 A7 98  32 2C 4D 24 28 58 29 00  |".X.65..2,M$(X).|
000001C0: C8 09 3C 00 82 3A A0 32  00 E8 09 46 00 9F 32 2C  |..<..:.2...F..2,|
000001D0: 38 2C 32 2C 22 30 3A 22  AA 46 24 AA 22 2C 53 2C  |8,2,"0:".F$.",S,|
000001E0: 52 22 3A 84 32 2C 5A 24  00 0F 0A 50 00 81 58 B2  |R":.2,Z$...P..X.|
000001F0: 30 A4 36 37 3A 84 32 2C  41 24 3A 8B 41 24 B3 B1  |0.67:.2,A$:.A$..|
00000200: 4C 24 28 58 29 B0 41 24  B2 22 22 A7 31 30 30 00  |L$(X).A$."".100.|
00000210: 40 0A 55 00 8B C9 28 41  24 2C 31 29 B1 22 44 22  |@.U...(A$,1)."D"|
00000220: AF 58 B3 36 35 A7 84 32  2C 41 24 3A 8B 41 24 B3  |.X.65..2,A$:.A$.|
00000230: B1 4D 24 28 58 29 B0 41  24 B2 22 22 A7 31 30 30  |.M$(X).A$."".100|
00000240: 00 58 0A 5A 00 82 3A A0  32 3A 99 22 44 41 54 41  |.X.Z..:.2:."DATA|
00000250: 20 4F 4B 45 59 22 3A 80  00 6F 0A 64 00 A0 32 3A  | OKEY":..o.d..2:|
00000260: 99 22 44 41 54 41 20 45  52 52 4F 52 22 3A 80 00  |."DATA ERROR":..|
00000270: 00 00                                             |..              |
..7.... PROGRAM TO COPY A FONT FROM ONE 
DISK TO ANOTHER.J....L$(67),M$(65)......
".":."INSERT FONT DISK":.:."ENTER FONT N
UMBER";F$:.......E(F$).1.E(F$).9999.3...
..F$."FONT".F$......2,8,2,"0:".F$.",S,R"
:.2,Z$:.Z$."". 2:."FONT NOT FOUND":.:..!
....X.0.67:.2,L$(X):.I(L$(X),1)."D".X.65
..2,M$(X).V....: 2:."CHANGE DISK, PRESS 
<ENTER> TO CONTINUE":..L.#..X$:.X$..G(13
).35...(..2,8,2,"0:".F$.",S,W":.2,Z$...2
..X.0.67:.2,L$(X):.I(L$(X),1)."D".X.65..
2,M$(X).H.<..: 2...F..2,8,2,"0:".F$.",S,
R":.2,Z$...P..X.0.67:.2,A$:.A$..L$(X).A$
."".100.@.U..I(A$,1)."D".X.65..2,A$:.A$.
.M$(X).A$."".100.X.Z..: 2:."DATA OKEY":.
.O.D. 2:."DATA ERROR":....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL