Multiple names: DISKPRINT.C, DISKPRINTOR
FILE INFORMATION
FILENAME(S):
• DISKPRINT.C<br>• DISKPRINTOR
FILE TYPE(S): PRG
FILE SIZE: 1.6K
FIRST SEEN: 2025-11-30 21:07:08
APPEARS ON: 3 disk(s)
FILE HASH
65494ce9770c06656d90f762e97a07c600bf70f5a1b7e038993dd7159f7ed86d
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MORE MARCH 3 C | DISKPRINT.C | PRG | DuncanTwain | 29 | 5 | DOWNLOAD FILE |
| NEW | DISKPRINTOR | PRG | DuncanTwain | 32 | 4 | DOWNLOAD FILE |
| C64 HULP 60 1 | DISKPRINTOR | PRG | DuncanTwain | 32 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 16 08 14 00 8B C2 28 35 30 33 32 36 29 B2 |........(50326).|
00000010: 31 39 38 A7 33 30 00 3F 08 16 00 99 22 20 20 12 |198.30.?...." .|
00000020: 05 11 11 20 20 20 20 20 20 57 41 49 54 2E 2E 2E |... WAIT...|
00000030: 2E 4C 4F 41 44 49 4E 47 20 43 4F 44 45 92 22 00 |.LOADING CODE.".|
00000040: 54 08 19 00 93 22 44 43 41 54 4D 4C 50 2E 44 22 |T...."DCATMLP.D"|
00000050: 2C 38 2C 31 00 73 08 1E 00 9C 3A 86 50 46 24 28 |,8,1.s....:.PF$(|
00000060: 31 35 30 29 3A A0 34 3A A0 32 3A 9F 31 35 2C 38 |150):.4:.2:.15,8|
00000070: 2C 31 35 00 8C 08 23 00 8F 2A 2A 2A 53 43 52 45 |,15...#..***SCRE|
00000080: 45 4E 20 46 4F 52 4D 41 54 2A 2A 2A 00 96 08 27 |EN FORMAT***...'|
00000090: 00 99 22 93 05 22 00 E4 08 28 00 99 22 11 11 11 |..".."...(.."...|
000000A0: 20 20 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 | THIS PROGRAM |
000000B0: 57 49 4C 4C 20 52 45 41 44 20 59 4F 55 52 20 44 |WILL READ YOUR D|
000000C0: 49 53 4B 20 20 11 20 20 20 20 20 20 20 20 20 20 |ISK . |
000000D0: 20 44 49 52 45 43 54 4F 52 59 20 53 4F 52 54 20 | DIRECTORY SORT |
000000E0: 41 4E 44 22 00 10 09 2C 00 99 22 11 20 20 20 50 |AND"...,..". P|
000000F0: 52 49 4E 54 20 20 49 54 20 49 4E 20 20 41 4C 50 |RINT IT IN ALP|
00000100: 48 41 42 45 54 49 43 41 4C 20 4F 52 44 45 52 22 |HABETICAL ORDER"|
00000110: 00 3A 09 32 00 99 22 11 20 20 20 20 20 20 49 4E |.:.2..". IN|
00000120: 53 45 52 54 20 44 49 53 4B 20 54 4F 20 42 45 20 |SERT DISK TO BE |
00000130: 43 41 54 41 4C 4F 47 45 44 22 00 5E 09 34 00 99 |CATALOGED".^.4..|
00000140: 22 11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
00000150: 20 20 12 48 49 54 20 46 20 31 20 92 20 22 00 81 | .HIT F 1 . "..|
00000160: 09 36 00 99 22 11 20 20 20 20 20 20 20 20 20 20 |.6..". |
00000170: 20 20 20 20 57 48 45 4E 20 20 52 45 41 44 59 20 | WHEN READY |
00000180: 22 00 93 09 38 00 A1 41 24 3A 8B 41 24 B2 22 22 |"...8..A$:.A$.""|
00000190: A7 35 36 00 A3 09 39 00 8B 41 24 B2 22 85 22 A7 |.56...9..A$.".".|
000001A0: 31 30 30 00 AB 09 3B 00 89 35 36 00 DA 09 64 00 |100...;..56...d.|
000001B0: 8F 2A 2A 2A 46 4F 52 4D 20 48 45 41 44 45 52 20 |.***FORM HEADER |
000001C0: 4F 46 20 4E 41 4D 45 2C 49 44 2C 42 4C 4F 43 4B |OF NAME,ID,BLOCK|
000001D0: 53 20 46 52 45 45 2A 2A 2A 2A 00 11 0A 6E 00 9F |S FREE****...n..|
000001E0: 32 2C 38 2C 32 2C 22 23 22 3A 8D 31 30 30 30 3A |2,8,2,"#":.1000:|
000001F0: 98 31 35 2C 22 55 31 22 3B 32 3B 30 3B 31 38 3B |.15,"U1";2;0;18;|
00000200: 30 3A 98 31 35 2C 22 42 2D 50 3A 22 32 3B 31 36 |0:.15,"B-P:"2;16|
00000210: 32 00 40 0A 78 00 A1 23 32 2C 49 24 3A A1 23 32 |2.@.x..#2,I$:.#2|
00000220: 2C 44 24 3A A0 32 3A 49 44 24 B2 49 24 AA 44 24 |,D$:.2:ID$.I$.D$|
00000230: 3A 9F 31 2C 38 2C 30 2C 22 24 30 3A 25 25 32 22 |:.1,8,0,"$0:%%2"|
00000240: 00 66 0A 82 00 43 48 24 B2 22 20 20 20 20 20 20 |.f...CH$." |
00000250: 20 20 20 20 20 20 20 20 20 20 20 22 AA 22 22 3A | "."":|
00000260: 9E 35 30 33 32 33 00 8C 0A 8C 00 44 48 24 B2 22 |.50323.....DH$."|
00000270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000280: 20 22 AA 22 22 3A 9E 35 30 33 32 33 00 B6 0A 96 | "."":.50323....|
00000290: 00 48 24 B2 C8 28 43 48 24 2C 31 36 29 AA 49 44 |.H$..(CH$,16).ID|
000002A0: 24 AA C4 28 C2 28 32 35 31 29 AA 32 35 36 AC C2 |$..(.(251).256..|
000002B0: 28 32 35 32 29 29 00 ED 0A A0 00 9F 32 2C 38 2C |(252))......2,8,|
000002C0: 30 2C 22 24 30 22 3A 8D 31 30 30 30 3A 44 48 24 |0,"$0":.1000:DH$|
000002D0: B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
000002E0: 20 20 22 AA 22 22 3A 9E 35 30 33 32 33 00 FE 0A | "."":.50323...|
000002F0: AA 00 8B 53 54 A7 A0 32 3A 89 32 30 30 30 00 22 |...ST..2:.2000."|
00000300: 0B C8 00 8F 2A 2A 2A 2A 46 4F 52 4D 20 41 52 52 |....****FORM ARR|
00000310: 41 59 20 4F 46 20 50 52 47 20 4E 41 4D 45 53 2A |AY OF PRG NAMES*|
00000320: 2A 2A 00 52 0B D2 00 81 43 54 B2 31 A4 31 35 30 |**.R....CT.1.150|
00000330: 3A 46 53 24 B2 22 20 20 20 20 20 20 20 20 20 20 |:FS$." |
00000340: 20 20 20 20 20 20 20 22 AA 22 22 3A 9E 35 30 33 | "."":.503|
00000350: 32 33 00 6B 0B DC 00 8B 53 54 A7 43 54 B2 43 54 |23.k....ST.CT.CT|
00000360: AB 33 3A A0 32 3A 89 32 30 30 30 00 AC 0B E6 00 |.3:.2:.2000.....|
00000370: 50 46 24 28 43 54 29 B2 46 53 24 AA 22 20 22 AA |PF$(CT).FS$." ".|
00000380: 49 44 24 AA C4 28 C2 28 32 35 31 29 AA 32 35 36 |ID$..(.(251).256|
00000390: AC C2 28 32 35 32 29 29 3A 82 3A 99 22 54 4F 4F |..(252)):.:."TOO|
000003A0: 20 4D 41 4E 59 20 46 49 4C 45 53 22 00 C6 0B E8 | MANY FILES"....|
000003B0: 03 8F 2A 2A 2A 45 52 52 4F 52 20 54 52 41 50 50 |..***ERROR TRAPP|
000003C0: 49 4E 47 2A 2A 2A 00 E1 0B F2 03 84 31 35 2C 45 |ING***......15,E|
000003D0: 2C 47 24 2C 4B 24 2C 4C 24 3A 8B 45 B3 32 30 A7 |,G$,K$,L$:.E.20.|
000003E0: 8E 00 14 0C FC 03 8B 45 B2 37 34 A7 99 22 20 20 |.......E.74.." |
000003F0: 20 20 20 20 20 20 20 20 20 20 20 44 49 53 4B 20 | DISK |
00000400: 4E 4F 54 20 50 52 45 53 45 4E 54 22 3A A0 31 35 |NOT PRESENT":.15|
00000410: 3A 89 32 30 00 2A 0C 06 04 99 45 3B 47 24 3B 4C |:.20.*....E;G$;L|
00000420: 24 3B 4B 24 3A A0 31 35 3A 80 00 3F 0C D0 07 9E |$;K$:.15:..?....|
00000430: 34 39 31 35 32 2C 43 54 2C 50 46 24 28 31 29 00 |49152,CT,PF$(1).|
00000440: 74 0C D1 07 99 22 93 22 3A 99 22 11 11 11 11 20 |t....".":.".... |
00000450: 20 20 20 44 4F 20 59 4F 55 20 57 41 4E 54 20 48 | DO YOU WANT H|
00000460: 41 52 44 20 43 4F 50 59 3F 20 20 20 20 20 12 59 |ARD COPY? .Y|
00000470: 2F 4E 92 22 00 88 0C D2 07 A1 41 24 3A 8B 41 24 |/N."......A$:.A$|
00000480: B2 22 22 A7 32 30 30 32 00 99 0C D3 07 8B 41 24 |."".2002......A$|
00000490: B2 22 59 22 A7 32 30 30 38 00 AC 0C D4 07 8B 41 |."Y".2008......A|
000004A0: 24 B2 22 4E 22 A7 99 22 93 22 3A 80 00 DF 0C D8 |$."N"..".":.....|
000004B0: 07 99 22 11 11 11 1D 1D 1D 1D 1D 1D 1D 12 4E 4F |.."...........NO|
000004C0: 57 20 50 52 49 4E 54 49 4E 47 92 22 3A 9F 34 2C |W PRINTING.":.4,|
000004D0: 34 3A 98 34 2C C7 28 32 37 29 3B 22 40 22 3B 00 |4:.4,.(27);"@";.|
000004E0: 08 0D D9 07 98 34 2C C7 28 32 37 29 3B 22 44 22 |.....4,.(27);"D"|
000004F0: 3B C7 28 32 30 29 3B C7 28 35 30 29 3B C7 28 37 |;.(20);.(50);.(7|
00000500: 36 29 3B C7 28 30 29 3B 00 23 0D DA 07 98 34 2C |6);.(0);.#....4,|
00000510: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 |" "|
00000520: 3B 48 24 00 37 0D DF 07 98 34 2C C7 28 32 37 29 |;H$.7....4,.(27)|
00000530: 3B C7 28 31 35 29 3B 00 53 0D EE 07 81 4E B2 31 |;.(15);.S....N.1|
00000540: A4 43 54 A9 32 3A 98 34 2C C7 28 32 37 29 3B 22 |.CT.2:.4,.(27);"|
00000550: 31 22 3B 00 60 0D F8 07 81 4B B2 4E A4 4E AA 31 |1";.`....K.N.N.1|
00000560: 00 74 0D 02 08 98 34 2C C7 28 39 29 3B 50 46 24 |.t....4,.(9);PF$|
00000570: 28 4B 29 3B 00 7B 0D 0C 08 82 4B 00 A4 0D 16 08 |(K);.{....K.....|
00000580: 98 34 2C C7 28 39 29 3B 22 9C 22 3B C7 28 31 33 |.4,.(9);".";.(13|
00000590: 29 3B 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |);" |
000005A0: 20 9C 22 3B 00 B9 0D 20 08 82 4E 3A 98 34 2C C7 | .";... ..N:.4,.|
000005B0: 28 32 37 29 3B 22 32 22 3B 00 C7 0D 2A 08 A0 34 |(27);"2";...*..4|
000005C0: 3A A0 31 3A 89 33 30 00 08 0E B8 0B 8F 20 54 48 |:.1:.30...... TH|
000005D0: 49 53 20 50 52 4F 47 52 41 4D 20 4D 55 53 54 20 |IS PROGRAM MUST |
000005E0: 4C 4F 41 44 20 22 44 43 41 54 4D 4C 50 2E 44 22 |LOAD "DCATMLP.D"|
000005F0: 20 57 48 49 43 48 20 57 4F 52 4B 53 20 57 49 54 | WHICH WORKS WIT|
00000600: 48 20 44 49 53 4B 41 54 00 37 0E BD 0B 8F 20 53 |H DISKAT.7.... S|
00000610: 45 54 20 55 50 20 46 4F 52 20 4D 2F 54 20 53 50 |ET UP FOR M/T SP|
00000620: 49 52 49 54 20 41 4E 44 20 45 50 53 4F 4E 20 50 |IRIT AND EPSON P|
00000630: 52 49 4E 54 45 52 53 00 00 00 |RINTERS... |
.......B(50326).198.30.?...." ....
WAIT....LOADING CODE.".T...."DCATMLP.D"
,8,1.S....:.PF$(150): 4: 2:.15,8,15...#.
.***SCREEN FORMAT***...'..".."...(.."...
THIS PROGRAM WILL READ YOUR DISK .
DIRECTORY SORT AND"...,..". P
RINT IT IN ALPHABETICAL ORDER".:.2..".
INSERT DISK TO BE CATALOGED".^.4..
". .HIT F 1 . "...6..".
WHEN READY "...8..A$:.A$.""
.56...9..A$.".".100...;..56.Z.D..***FORM
HEADER OF NAME,ID,BLOCKS FREE****...N..
2,8,2,"#":.1000:.15,"U1";2;0;18;0:.15,"B
-P:"2;162.@.X..#2,I$:.#2,D$: 2:ID$.I$.D$
:.1,8,0,"$0:%%2".F...CH$."
"."":.50323.....DH$."
"."":.50323.....H$.H(CH$,16).ID$.D(B(25
1).256.B(252))... ..2,8,0,"$0":.1000:DH$
." "."":.50323......ST. 2
:.2000.".H..****FORM ARRAY OF PRG NAMES*
**.R.R..CT.1.150:FS$." "
."":.50323.K....ST.CT.CT.3: 2:.2000.....
PF$(CT).FS$." ".ID$.D(B(251).256.B(252))
:.:."TOO MANY FILES".F....***ERROR TRAPP
ING***......15,E,G$,K$,L$:.E.20........E
.74.." DISK NOT PRESENT": 15
:.20.*....E;G$;L$;K$: 15:..?.P..49152,CT
,PF$(1).T.Q..".":.".... DO YOU WANT H
ARD COPY? .Y/N."...R..A$:.A$."".2002
...S..A$."Y".2008...T..A$."N"..".":....X
.."...........NOW PRINTING.":.4,4:.4,G(2
7);"@";...Y..4,G(27);"D";G(20);G(50);G(7
6);G(0);.#.Z..4," ";H$.7...
.4,G(27);G(15);.S....N.1.CT.2:.4,G(27);"
1";.`....K.N.N.1.T....4,G(9);PF$(K);.{..
..K......4,G(9);".";G(13);"
.";... ..N:.4,G(27);"2";.G.*. 4: 1:.30.
..... THIS PROGRAM MUST LOAD "DCATMLP.D"
WHICH WORKS WITH DISKAT.7.... SET UP FO
R M/T SPIRIT AND EPSON PRINTERS...
> CLICK IMAGE PREVIEW FOR FULL MODAL