INTERR.FORM.ID'S

FILE INFORMATION

FILENAME(S): INTERR.FORM.ID'S

FILE TYPE(S): PRG

FILE SIZE: 1K

FIRST SEEN: 2025-11-30 21:23:31

APPEARS ON: 1 disk(s)

FILE HASH

c03db10ea0a29a4483cfee31c5ed43421ead98a1d447c2d9edc7ae79f43439f9

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
C64 HULP 43 1	INTERR.FORM.ID'S	PRG	DuncanTwain	23	7	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 2A 08 64 00 8F 20  49 4E 54 45 52 52 4F 47  |..*.d.. INTERROG|
00000010: 41 54 45 20 46 4F 52 4D  41 54 54 49 4E 47 20 49  |ATE FORMATTING I|
00000020: 44 27 53 20 2D 20 31 35  34 31 00 35 08 6E 00 86  |D'S - 1541.5.n..|
00000030: 54 28 33 35 29 00 41 08  78 00 81 49 B2 31 A4 33  |T(35).A.x..I.1.3|
00000040: 35 00 4C 08 82 00 54 28  49 29 B2 31 00 53 08 8C  |5.L...T(I).1.S..|
00000050: 00 82 49 00 7E 08 96 00  99 22 93 49 4E 54 45 52  |..I.~....".INTER|
00000060: 52 4F 47 41 54 45 20 46  4F 52 4D 41 54 54 49 4E  |ROGATE FORMATTIN|
00000070: 47 20 49 44 27 53 20 2D  20 31 35 34 31 22 00 9D  |G ID'S - 1541"..|
00000080: 08 A0 00 99 22 11 49 4E  53 45 52 54 20 4D 41 53  |....".INSERT MAS|
00000090: 54 45 52 20 49 4E 20 44  52 49 56 45 22 00 C4 08  |TER IN DRIVE"...|
000000A0: AA 00 31 37 30 20 99 22  11 50 52 45 53 53 20 12  |..170 .".PRESS .|
000000B0: 52 45 54 55 52 4E 92 20  54 4F 20 43 4F 4E 54 49  |RETURN. TO CONTI|
000000C0: 4E 55 45 22 00 D7 08 B4  00 A1 43 24 3A 8B 43 24  |NUE"......C$:.C$|
000000D0: B2 22 22 A7 31 38 30 00  EA 08 BE 00 8B 43 24 B3  |."".180......C$.|
000000E0: B1 C7 28 31 33 29 89 31  38 30 00 F7 08 C8 00 9F  |..(13).180......|
000000F0: 31 35 2C 38 2C 31 35 00  00 09 D2 00 99 22 93 22  |15,8,15......"."|
00000100: 00 0B 09 DC 00 8F 20 53  45 45 4B 00 17 09 E6 00  |...... SEEK.....|
00000110: 81 54 B2 31 A4 33 35 00  27 09 F0 00 8B 54 28 54  |.T.1.35.'....T(T|
00000120: 29 B2 30 89 34 34 30 00  30 09 FA 00 8D 35 35 30  |).0.440.0....550|
00000130: 00 3E 09 04 01 8B 45 B3  B1 31 89 34 31 30 00 55  |.>....E..1.410.U|
00000140: 09 0E 01 98 31 35 2C 22  4D 2D 52 22 C7 28 32 32  |....15,"M-R".(22|
00000150: 29 C7 28 30 29 00 61 09  18 01 A1 23 31 35 2C 49  |).(0).a....#15,I|
00000160: 24 00 74 09 22 01 8B 49  24 B2 22 22 A7 49 24 B2  |$.t."..I$."".I$.|
00000170: C7 28 30 29 00 80 09 2C  01 49 B2 C6 28 49 24 29  |.(0)...,.I..(I$)|
00000180: 00 99 09 36 01 49 24 B2  C9 28 C4 28 49 29 2C C3  |...6.I$..(.(I),.|
00000190: 28 C4 28 49 29 29 AB 31  29 00 B0 09 40 01 98 31  |(.(I)).1)...@..1|
000001A0: 35 2C 22 4D 2D 52 22 C7  28 32 33 29 C7 28 30 29  |5,"M-R".(23).(0)|
000001B0: 00 BC 09 4A 01 A1 23 31  35 2C 44 24 00 CF 09 54  |...J..#15,D$...T|
000001C0: 01 8B 44 24 B2 22 22 A7  44 24 B2 C7 28 30 29 00  |..D$."".D$..(0).|
000001D0: DB 09 5E 01 44 B2 C6 28  44 24 29 00 F4 09 68 01  |..^.D..(D$)...h.|
000001E0: 44 24 B2 C9 28 90 28 44  29 2C 88 28 90 28 44 29  |D$..(.(D),.(.(D)|
000001F0: 29 AB 31 29 00 0A 0A 72  01 49 24 B2 22 43 48 52  |).1)...r.I$."CHR|
00000200: 24 28 22 AA 49 24 AA 22  29 22 00 20 0A 7C 01 44  |$(".I$.")". .|.D|
00000210: 24 B2 22 43 48 52 24 28  22 AA 44 24 AA 22 29 22  |$."CHR$(".D$.")"|
00000220: 00 34 0A 86 01 49 44 24  B2 49 24 AA 22 20 2B 20  |.4...ID$.I$." + |
00000230: 22 AA 44 24 00 3D 0A 90  01 89 34 35 30 00 60 0A  |".D$.=....450.`.|
00000240: 9A 01 8B 45 B2 33 A7 49  44 24 B2 22 3F 4E 4F 20  |...E.3.ID$."?NO |
00000250: 53 59 4E 43 20 4D 41 52  4B 53 22 3A 89 34 35 30  |SYNC MARKS":.450|
00000260: 00 8F 0A A4 01 8B 45 B2  32 A7 49 44 24 B2 22 3F  |......E.2.ID$."?|
00000270: 48 45 41 44 45 52 20 42  4C 4F 43 4B 53 20 4E 4F  |HEADER BLOCKS NO|
00000280: 54 20 50 52 45 53 45 4E  54 22 3A 89 34 35 30 00  |T PRESENT":.450.|
00000290: BD 0A AE 01 8B 45 B2 39  A7 49 44 24 B2 22 3F 43  |.....E.9.ID$."?C|
000002A0: 48 45 4B 53 55 4D 20 45  52 52 4F 52 20 49 4E 20  |HEKSUM ERROR IN |
000002B0: 48 45 41 44 45 52 53 22  3A 89 34 35 30 00 D1 0A  |HEADERS":.450...|
000002C0: B8 01 49 44 24 B2 22 3F  54 49 4D 45 20 4F 55 54  |..ID$."?TIME OUT|
000002D0: 22 00 EA 0A C2 01 54 24  B2 C9 28 90 28 54 29 2C  |".....T$..(.(T),|
000002E0: 88 28 90 28 54 29 29 AB  31 29 00 FE 0A CC 01 8B  |.(.(T)).1)......|
000002F0: 54 B3 31 30 A7 54 24 B2  22 20 22 AA 54 24 00 16  |T.10.T$." ".T$..|
00000300: 0B D6 01 99 22 54 52 41  43 4B 20 22 54 24 22 20  |...."TRACK "T$" |
00000310: 3D 20 22 49 44 24 00 22  0B E0 01 8F 20 50 41 55  |= "ID$.".... PAU|
00000320: 5A 45 00 35 0B EA 01 A1  43 24 3A 8B 43 24 B2 22  |ZE.5....C$:.C$."|
00000330: 22 89 35 31 30 00 48 0B  F4 01 A1 43 24 3A 8B 43  |".510.H....C$:.C|
00000340: 24 B2 22 22 A7 35 30 30  00 4F 0B FE 01 82 54 00  |$."".500.O....T.|
00000350: 57 0B 08 02 A0 31 35 00  5D 0B 12 02 80 00 6D 0B  |W....15.].....m.|
00000360: 1C 02 8F 20 4A 4F 42 20  51 55 45 55 45 00 77 0B  |... JOB QUEUE.w.|
00000370: 26 02 54 52 59 B2 30 00  99 0B 30 02 98 31 35 2C  |&.TRY.0...0..15,|
00000380: 22 4D 2D 57 22 C7 28 38  29 C7 28 30 29 C7 28 32  |"M-W".(8).(0).(2|
00000390: 29 C7 28 54 29 C7 28 30  29 00 B9 0B 3A 02 98 31  |).(T).(0)...:..1|
000003A0: 35 2C 22 4D 2D 57 22 C7  28 31 29 C7 28 30 29 C7  |5,"M-W".(1).(0).|
000003B0: 28 31 29 C7 28 31 37 36  29 00 C7 0B 44 02 54 52  |(1).(176)...D.TR|
000003C0: 59 B2 54 52 59 AA 31 00  DD 0B 4E 02 98 31 35 2C  |Y.TRY.1...N..15,|
000003D0: 22 4D 2D 52 22 C7 28 31  29 C7 28 30 29 00 E9 0B  |"M-R".(1).(0)...|
000003E0: 58 02 A1 23 31 35 2C 45  24 00 FC 0B 62 02 8B 45  |X..#15,E$...b..E|
000003F0: 24 B2 22 22 A7 45 24 B2  C7 28 30 29 00 08 0C 6C  |$."".E$..(0)...l|
00000400: 02 45 B2 C6 28 45 24 29  00 19 0C 76 02 8B 54 52  |.E..(E$)...v..TR|
00000410: 59 B2 35 30 30 89 36 35  30 00 28 0C 80 02 8B 45  |Y.500.650.(....E|
00000420: B1 31 32 37 89 35 38 30  00 2E 0C 8A 02 8E 00 00  |.127.580........|
00000430: 00 00                                             |..              |

..*.D.. INTERROGATE FORMATTING ID'S - 15
41.5.N..T(35).A.X..I.1.35.L...T(I).1.S..
..I.~....".INTERROGATE FORMATTING ID'S -
 1541"... ..".INSERT MASTER IN DRIVE".D.
..170 .".PRESS .RETURN. TO CONTINUE".W..
..C$:.C$."".180......C$..G(13).180...H..
15,8,15...R.."."...... SEEK......T.1.35.
'....T(T).0.440.0....550.>....E..1.410.U
....15,"M-R"G(22)G(0).A....#15,I$.T."..I
$."".I$.G(0)...,.I.F(I$)...6.I$.I(D(I),C
(D(I)).1)...@..15,"M-R"G(23)G(0)...J..#1
5,D$.O.T..D$."".D$.G(0)...^.D.F(D$)...H.
D$.I(.(D),.(.(D)).1)...R.I$."CHR$(".I$."
)". .|.D$."CHR$(".D$.")".4...ID$.I$." + 
".D$.=....450.`....E.3.ID$."?NO SYNC MAR
KS":.450......E.2.ID$."?HEADER BLOCKS NO
T PRESENT":.450......E.9.ID$."?CHEKSUM E
RROR IN HEADERS":.450.Q...ID$."?TIME OUT
"...B.T$.I(.(T),.(.(T)).1)...L..T.10.T$.
" ".T$...V.."TRACK "T$" = "ID$.".... PAU
ZE.5....C$:.C$."".510.H....C$:.C$."".500
.O....T.W... 15.].....M.... JOB QUEUE.W.
&.TRY.0...0..15,"M-W"G(8)G(0)G(2)G(T)G(0
)...:..15,"M-W"G(1)G(0)G(1)G(176).G.D.TR
Y.TRY.1...N..15,"M-R"G(1)G(0)...X..#15,E
$...B..E$."".E$.G(0)...L.E.F(E$)...V..TR
Y.500.650.(....E.127.580..........

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL