DISPLAY A CHAIN
FILE INFORMATION
FILENAME(S): DISPLAY A CHAIN
FILE TYPE(S): PRG
FILE SIZE: 2.1K
FIRST SEEN: 2025-12-01 02:25:40
APPEARS ON: 1 disk(s)
FILE HASH
c47c6d9ca2d53bf4a89bbd60e5b21ebb1fff8f06b404e967b47b52d7ed1fc3f6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| INSIDE C DOS 1 | DISPLAY A CHAIN | PRG | hedning, shine | 12 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 0A 00 8F 20 2A 49 4E 53 49 44 45 20 |..(.... *INSIDE |
00000010: 43 4F 4D 4D 4F 44 4F 52 45 20 44 4F 53 2A 20 2A |COMMODORE DOS* *|
00000020: 50 47 2E 20 34 35 31 2A 00 3F 08 14 00 8F 20 2A |PG. 451*.?.... *|
00000030: 4A 4A 4D 2A 20 20 20 2A 30 34 31 38 38 37 2A 00 |JJM* *041887*.|
00000040: 5C 08 64 00 8F 20 44 49 53 50 4C 41 59 20 41 20 |\.d.. DISPLAY A |
00000050: 43 48 41 49 4E 20 2D 20 31 35 34 31 00 62 08 6E |CHAIN - 1541.b.n|
00000060: 00 9C 00 81 08 78 00 99 22 93 44 49 53 50 4C 41 |.....x..".DISPLA|
00000070: 59 20 41 20 43 48 41 49 4E 20 2D 20 31 35 34 31 |Y A CHAIN - 1541|
00000080: 22 00 A2 08 82 00 99 22 11 49 4E 53 45 52 54 20 |"......".INSERT |
00000090: 44 49 53 4B 45 54 54 45 20 49 4E 20 44 52 49 56 |DISKETTE IN DRIV|
000000A0: 45 22 00 C3 08 8C 00 85 22 11 54 52 41 43 4B 20 |E"......".TRACK |
000000B0: 26 20 53 45 43 54 4F 52 20 28 54 2C 53 29 22 3B |& SECTOR (T,S)";|
000000C0: 54 2C 53 00 D3 08 96 00 8B 54 B3 31 B0 54 B1 33 |T,S......T.1.T.3|
000000D0: 35 A7 80 00 F4 08 A0 00 4E 53 B2 32 30 AA 32 AC |5.......NS.20.2.|
000000E0: 28 54 B1 31 37 29 AA 28 54 B1 32 34 29 AA 28 54 |(T.17).(T.24).(T|
000000F0: B1 33 30 29 00 04 09 AA 00 8B 53 B3 30 B0 53 B1 |.30)......S.0.S.|
00000100: 4E 53 A7 80 00 37 09 B4 00 85 22 11 4F 55 54 50 |NS...7....".OUTP|
00000110: 55 54 20 54 4F 20 53 43 52 45 45 4E 20 4F 52 20 |UT TO SCREEN OR |
00000120: 50 52 49 4E 54 45 52 20 28 53 2F 50 29 20 20 53 |PRINTER (S/P) S|
00000130: 9D 9D 9D 22 3B 4F 24 00 4E 09 BE 00 8B 4F 24 B3 |...";O$.N....O$.|
00000140: B1 22 53 22 AF 4F 24 B3 B1 22 50 22 A7 80 00 6C |."S".O$.."P"...l|
00000150: 09 C8 00 85 22 11 41 52 45 20 59 4F 55 20 53 55 |....".ARE YOU SU|
00000160: 52 45 20 20 59 9D 9D 9D 22 3B 51 24 00 7B 09 D2 |RE Y...";Q$.{..|
00000170: 00 8B 51 24 B3 B1 22 59 22 A7 80 00 88 09 DC 00 |..Q$.."Y".......|
00000180: 9F 31 35 2C 38 2C 31 35 00 95 09 E6 00 98 31 35 |.15,8,15......15|
00000190: 2C 22 49 30 22 00 AD 09 F0 00 84 31 35 2C 45 4E |,"I0"......15,EN|
000001A0: 24 2C 45 4D 24 2C 45 54 24 2C 45 53 24 00 BF 09 |$,EM$,ET$,ES$...|
000001B0: FA 00 8B 45 4E 24 B2 22 30 30 22 89 32 39 30 00 |...EN$."00".290.|
000001C0: DE 09 04 01 99 22 11 22 45 4E 24 22 2C 20 22 45 |....."."EN$", "E|
000001D0: 4D 24 22 2C 22 45 54 24 22 2C 22 45 53 24 00 E6 |M$","ET$","ES$..|
000001E0: 09 0E 01 A0 31 35 00 EC 09 18 01 80 00 FC 09 22 |....15........."|
000001F0: 01 8B 4F 24 B2 22 53 22 89 33 39 30 00 17 0A 2C |..O$."S".390...,|
00000200: 01 99 22 11 12 50 52 49 4E 54 49 4E 47 92 20 41 |.."..PRINTING. A|
00000210: 20 43 48 41 49 4E 22 00 20 0A 36 01 9F 34 2C 34 | CHAIN". .6..4,4|
00000220: 00 2B 0A 40 01 81 49 B2 31 A4 36 00 32 0A 4A 01 |.+.@..I.1.6.2.J.|
00000230: 98 34 00 39 0A 54 01 82 49 00 5F 0A 5E 01 98 34 |.4.9.T..I._.^..4|
00000240: 2C 22 20 20 20 20 20 20 20 20 20 20 20 20 20 44 |," D|
00000250: 49 53 50 4C 41 59 20 41 20 43 48 41 49 4E 22 00 |ISPLAY A CHAIN".|
00000260: 88 0A 68 01 98 34 2C 22 20 20 20 20 20 20 20 20 |..h..4," |
00000270: 20 42 4C 4F 43 4B 20 20 20 54 52 41 43 4B 20 2D | BLOCK TRACK -|
00000280: 20 53 45 43 54 4F 52 22 00 8F 0A 72 01 98 34 00 | SECTOR"...r..4.|
00000290: 98 0A 7C 01 89 34 32 30 00 D0 0A 86 01 99 22 93 |..|..420......".|
000002A0: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 44 49 |. DI|
000002B0: 53 50 4C 41 59 20 41 20 43 48 41 49 4E 20 20 20 |SPLAY A CHAIN |
000002C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 92 22 | ."|
000002D0: 00 04 0B 90 01 99 22 13 11 12 20 20 20 20 20 20 |......"... |
000002E0: 20 20 20 42 4C 4F 43 4B 20 20 20 54 52 41 43 4B | BLOCK TRACK|
000002F0: 20 2D 20 53 45 43 54 4F 52 20 20 20 20 20 20 20 | - SECTOR |
00000300: 20 20 92 22 00 0F 0B 9A 01 99 22 13 11 11 22 00 | ."......"...".|
00000310: 19 0B A4 01 42 B2 42 AA 31 00 23 0B AE 01 8D 31 |....B.B.1.#....1|
00000320: 30 33 30 00 2E 0B B8 01 8F 20 53 45 45 4B 00 3A |030...... SEEK.:|
00000330: 0B C2 01 4A 4F 42 B2 31 37 36 00 43 0B CC 01 8D |...JOB.176.C....|
00000340: 39 31 30 00 51 0B D6 01 8B 45 B3 B1 31 89 35 32 |910.Q....E..1.52|
00000350: 30 00 5C 0B E0 01 8F 20 52 45 41 44 00 68 0B EA |0.\.... READ.h..|
00000360: 01 4A 4F 42 B2 31 32 38 00 71 0B F4 01 8D 39 31 |.JOB.128.q....91|
00000370: 30 00 7E 0B FE 01 8B 45 B2 31 89 36 33 30 00 A4 |0.~....E.1.630..|
00000380: 0B 08 02 8B 45 B1 31 AF 45 B3 31 32 A7 45 4E 24 |....E.1.E.12.EN$|
00000390: B2 C9 28 C4 28 45 AA 31 38 29 2C 32 29 3A CB 54 |..(.(E.18),2):.T|
000003A0: 4C 35 34 30 00 C5 0B 12 02 45 4E 24 B2 22 30 32 |L540.....EN$."02|
000003B0: 22 3A 45 4D 24 B2 22 3F 54 49 4D 45 4F 55 54 22 |":EM$."?TIMEOUT"|
000003C0: 3A 89 35 35 30 00 DA 0B 1C 02 45 4D 24 B2 22 52 |:.550.....EM$."R|
000003D0: 45 41 44 20 45 52 52 4F 52 22 00 E5 0B 26 02 45 |EAD ERROR"...&.E|
000003E0: 54 24 B2 54 24 00 F0 0B 30 02 45 53 24 B2 53 24 |T$.T$...0.ES$.S$|
000003F0: 00 27 0C 3A 02 8B 4F 24 B2 22 50 22 A7 98 34 2C |.'.:..O$."P"..4,|
00000400: 22 20 20 20 20 20 20 20 20 20 20 22 45 4E 24 22 |" "EN$"|
00000410: 2C 20 22 45 4D 24 22 2C 22 45 54 24 22 2C 22 45 |, "EM$","ET$","E|
00000420: 53 24 3A 89 35 39 30 00 4F 0C 44 02 99 22 20 20 |S$:.590.O.D.." |
00000430: 20 20 20 20 20 20 20 20 22 45 4E 24 22 2C 20 22 | "EN$", "|
00000440: 45 4D 24 22 2C 22 45 54 24 22 2C 22 45 53 24 00 |EM$","ET$","ES$.|
00000450: 60 0C 4E 02 8B 45 B2 34 B0 45 B2 35 89 36 33 30 |`.N..E.4.E.5.630|
00000460: 00 70 0C 58 02 8B 4F 24 B2 22 50 22 89 38 31 30 |.p.X..O$."P".810|
00000470: 00 7A 0C 62 02 8D 31 30 39 30 00 83 0C 6C 02 89 |.z.b..1090...l..|
00000480: 38 32 30 00 9C 0C 76 02 42 24 B2 C9 28 C4 28 42 |820...v.B$..(.(B|
00000490: 29 2C C3 28 C4 28 42 29 29 AB 31 29 00 B0 0C 80 |),.(.(B)).1)....|
000004A0: 02 8B 42 B3 31 30 A7 42 24 B2 22 20 22 AA 42 24 |..B.10.B$." ".B$|
000004B0: 00 C5 0C 8A 02 8B 42 B3 31 30 30 A7 42 24 B2 22 |......B.100.B$."|
000004C0: 20 22 AA 42 24 00 FA 0C 94 02 8B 4F 24 B2 22 50 | ".B$......O$."P|
000004D0: 22 A7 98 34 2C 22 20 20 20 20 20 20 20 20 20 20 |"..4," |
000004E0: 22 42 24 22 20 20 20 20 20 20 20 22 54 24 22 20 |"B$" "T$" |
000004F0: 2D 20 22 53 24 3A 89 36 38 30 00 20 0D 9E 02 99 |- "S$:.680. ....|
00000500: 22 20 20 20 20 20 20 20 20 20 20 22 42 24 22 20 |" "B$" |
00000510: 20 20 20 20 20 20 22 54 24 22 20 2D 20 22 53 24 | "T$" - "S$|
00000520: 00 3A 0D A8 02 98 31 35 2C 22 4D 2D 52 22 C7 28 |.:....15,"M-R".(|
00000530: 30 29 C7 28 34 29 C7 28 32 29 00 46 0D B2 02 A1 |0).(4).(2).F....|
00000540: 23 31 35 2C 54 24 00 57 0D BC 02 54 B2 C6 28 54 |#15,T$.W...T..(T|
00000550: 24 AA C7 28 30 29 29 00 64 0D C6 02 8B 54 B2 30 |$..(0)).d....T.0|
00000560: 89 37 36 30 00 70 0D D0 02 A1 23 31 35 2C 53 24 |.760.p....#15,S$|
00000570: 00 81 0D DA 02 53 B2 C6 28 53 24 AA C7 28 30 29 |.....S..(S$..(0)|
00000580: 29 00 AB 0D E4 02 8B 54 B1 33 35 B0 53 B1 32 30 |)......T.35.S.20|
00000590: AA 32 AC 28 54 B1 31 37 29 AA 28 54 B1 32 34 29 |.2.(T.17).(T.24)|
000005A0: AA 28 54 B1 33 30 29 89 38 35 30 00 C9 0D EE 02 |.(T.30).850.....|
000005B0: 8B 4F 24 B2 22 53 22 AF 42 AD 31 36 B3 B1 B5 28 |.O$."S".B.16...(|
000005C0: 42 AD 31 36 29 89 34 32 30 00 D9 0D F8 02 8B 4F |B.16).420......O|
000005D0: 24 B2 22 50 22 89 37 38 30 00 E3 0D 02 03 8D 31 |$."P".780......1|
000005E0: 30 39 30 00 F0 0D 0C 03 8B 54 B2 30 89 38 31 30 |090......T.0.810|
000005F0: 00 00 0E 16 03 8B 4F 24 B2 22 53 22 89 33 39 30 |......O$."S".390|
00000600: 00 09 0E 20 03 89 34 32 30 00 18 0E 2A 03 8B 4F |... ..420...*..O|
00000610: 24 B2 22 50 22 A7 A0 34 00 20 0E 34 03 A0 31 35 |$."P"..4. .4..15|
00000620: 00 29 0E 3E 03 89 31 31 30 00 47 0E 48 03 8F 20 |.).>..110.G.H.. |
00000630: 49 4C 4C 45 47 41 4C 20 54 52 41 43 4B 20 4F 52 |ILLEGAL TRACK OR|
00000640: 20 53 45 43 54 4F 52 00 51 0E 52 03 8D 31 30 33 | SECTOR.Q.R..103|
00000650: 30 00 94 0E 5C 03 8B 4F 24 B2 22 50 22 A7 98 34 |0...\..O$."P"..4|
00000660: 2C 22 20 20 20 20 20 20 20 20 20 36 36 2C 20 49 |," 66, I|
00000670: 4C 4C 45 47 41 4C 20 54 52 41 43 4B 20 4F 52 20 |LLEGAL TRACK OR |
00000680: 53 45 43 54 4F 52 2C 22 54 24 22 2C 22 53 24 3A |SECTOR,"T$","S$:|
00000690: 89 38 31 30 00 C0 0E 66 03 99 22 11 36 36 2C 20 |.810...f..".66, |
000006A0: 49 4C 4C 45 47 41 4C 20 54 52 41 43 4B 20 4F 52 |ILLEGAL TRACK OR|
000006B0: 20 53 45 43 54 4F 52 2C 22 54 24 22 2C 22 53 24 | SECTOR,"T$","S$|
000006C0: 00 CA 0E 70 03 8D 31 30 39 30 00 D3 0E 7A 03 89 |...p..1090...z..|
000006D0: 38 32 30 00 E3 0E 84 03 8F 20 4A 4F 42 20 51 55 |820...... JOB QU|
000006E0: 45 55 45 00 ED 0E 8E 03 54 52 59 B2 30 00 0F 0F |EUE.....TRY.0...|
000006F0: 98 03 98 31 35 2C 22 4D 2D 57 22 C7 28 38 29 C7 |...15,"M-W".(8).|
00000700: 28 30 29 C7 28 32 29 C7 28 54 29 C7 28 53 29 00 |(0).(2).(T).(S).|
00000710: 2F 0F A2 03 98 31 35 2C 22 4D 2D 57 22 C7 28 31 |/....15,"M-W".(1|
00000720: 29 C7 28 30 29 C7 28 31 29 C7 28 4A 4F 42 29 00 |).(0).(1).(JOB).|
00000730: 3D 0F AC 03 54 52 59 B2 54 52 59 AA 31 00 53 0F |=...TRY.TRY.1.S.|
00000740: B6 03 98 31 35 2C 22 4D 2D 52 22 C7 28 31 29 C7 |...15,"M-R".(1).|
00000750: 28 30 29 00 5F 0F C0 03 A1 23 31 35 2C 45 24 00 |(0)._....#15,E$.|
00000760: 72 0F CA 03 8B 45 24 B2 22 22 A7 45 24 B2 C7 28 |r....E$."".E$..(|
00000770: 30 29 00 7E 0F D4 03 45 B2 C6 28 45 24 29 00 90 |0).~...E..(E$)..|
00000780: 0F DE 03 8B 54 52 59 B2 35 30 30 89 31 30 31 30 |....TRY.500.1010|
00000790: 00 9F 0F E8 03 8B 45 B1 31 32 37 89 39 34 30 00 |......E.127.940.|
000007A0: A5 0F F2 03 8E 00 B5 0F FC 03 8F 20 53 54 52 24 |........... STR$|
000007B0: 28 54 2C 53 29 00 CE 0F 06 04 54 24 B2 C9 28 C4 |(T,S).....T$..(.|
000007C0: 28 54 29 2C C3 28 C4 28 54 29 29 AB 31 29 00 E2 |(T),.(.(T)).1)..|
000007D0: 0F 10 04 8B 54 B3 31 30 A7 53 24 B2 22 30 22 AA |....T.10.S$."0".|
000007E0: 53 24 00 FB 0F 1A 04 53 24 B2 C9 28 C4 28 53 29 |S$.....S$..(.(S)|
000007F0: 2C C3 28 C4 28 53 29 29 AB 31 29 00 0F 10 24 04 |,.(.(S)).1)...$.|
00000800: 8B 53 B3 31 30 A7 53 24 B2 22 30 22 AA 53 24 00 |.S.10.S$."0".S$.|
00000810: 15 10 2E 04 8E 00 21 10 38 04 8F 20 44 45 4C 41 |......!.8.. DELA|
00000820: 59 00 44 10 42 04 99 22 11 50 52 45 53 53 20 12 |Y.D.B..".PRESS .|
00000830: 52 45 54 55 52 4E 92 20 54 4F 20 43 4F 4E 54 49 |RETURN. TO CONTI|
00000840: 4E 55 45 22 00 58 10 4C 04 A1 43 24 3A 8B 43 24 |NUE".X.L..C$:.C$|
00000850: B2 22 22 A7 31 31 30 30 00 6C 10 56 04 8B 43 24 |."".1100.l.V..C$|
00000860: B3 B1 C7 28 31 33 29 89 31 31 30 30 00 72 10 60 |...(13).1100.r.`|
00000870: 04 8E 00 00 00 |..... |
..(.... *INSIDE COMMODORE DOS* *PG. 451*
.?.... *JJM* *041887*.\.D.. DISPLAY A
CHAIN - 1541.B.N.....X..".DISPLAY A CHAI
N - 1541"......".INSERT DISKETTE IN DRIV
E".C....".TRACK & SECTOR (T,S)";T,S.S...
.T.1.T.35..... .NS.20.2.(T.17).(T.24).(T
.30)......S.0.S.NS...7....".OUTPUT TO SC
REEN OR PRINTER (S/P) S...";O$.N....O$.
."S".O$.."P"...L.H..".ARE YOU SURE Y...
";Q$.{.R..Q$.."Y"........15,8,15......15
,"I0"......15,EN$,EM$,ET$,ES$......EN$."
00".290......"."EN$", "EM$","ET$","ES$..
... 15........."..O$."S".390...,.."..PRI
NTING. A CHAIN". .6..4,4.+.@..I.1.6.2.J.
.4.9.T..I._.^..4," DISPLAY A
CHAIN"...H..4," BLOCK TRACK -
SECTOR"...R..4...|..420.P...."..
DISPLAY A CHAIN ."
......"... BLOCK TRACK - SECTO
R ."......"...".....B.B.1.#....1
030...... SEEK.:.B.JOB.176.C.L..910.Q.V.
.E..1.520.\.... READ.H...JOB.128.Q....91
0.~....E.1.630......E.1.E.12.EN$.I(D(E.1
8),2):KTL540.E...EN$."02":EM$."?TIMEOUT"
:.550.Z...EM$."READ ERROR"...&.ET$.T$...
0.ES$.S$.'.:..O$."P"..4," "EN$"
, "EM$","ET$","ES$:.590.O.D.."
"EN$", "EM$","ET$","ES$.`.N..E.4.E.5.630
.P.X..O$."P".810.Z.B..1090...L..820...V.
B$.I(D(B),C(D(B)).1)......B.10.B$." ".B$
.E....B.100.B$." ".B$......O$."P"..4,"
"B$" "T$" - "S$:.680. ....
" "B$" "T$" - "S$.:....15
,"M-R"G(0)G(4)G(2).F....#15,T$.W...T.F(T
$.G(0)).D.F..T.0.760.P.P..#15,S$...Z.S.F
(S$.G(0))......T.35.S.20.2.(T.17).(T.24)
.(T.30).850.I....O$."S".B.16...(B.16).42
0.Y....O$."P".780......1090......T.0.810
......O$."S".390... ..420...*..O$."P". 4
. .4. 15.).>..110.G.H.. ILLEGAL TRACK OR
SECTOR.Q.R..1030...\..O$."P"..4,"
66, ILLEGAL TRACK OR SECTOR,"T$","S$:
.810...F..".66, ILLEGAL TRACK OR SECTOR,
"T$","S$.J.P..1090.S.Z..820...... JOB QU
EUE.....TRY.0......15,"M-W"G(8)G(0)G(2)G
(T)G(S)./....15,"M-W"G(1)G(0)G(1)G(JOB).
=...TRY.TRY.1.S....15,"M-R"G(1)G(0)._...
.#15,E$.R.J..E$."".E$.G(0).~.T.E.F(E$)..
....TRY.500.1010......E.127.940.........
... STR$(T,S).N...T$.I(D(T),C(D(T)).1)..
....T.10.S$."0".S$.....S$.I(D(S),C(D(S))
.1)...$..S.10.S$."0".S$.......!.8.. DELA
Y.D.B..".PRESS .RETURN. TO CONTINUE".X.L
..C$:.C$."".1100.L.V..C$..G(13).1100.R.`
.....
> CLICK IMAGE PREVIEW FOR FULL MODAL