DISPLAY TRK/SEC
FILE INFORMATION
FILENAME(S): DISPLAY TRK/SEC
FILE TYPE(S): PRG
FILE SIZE: 3.3K
FIRST SEEN: 2025-12-01 02:25:53
APPEARS ON: 1 disk(s)
FILE HASH
e4e00fe950c2a4ce027312b00a88fa1b7b9c92ebda06caad5fec1554de4ef286
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISK ARRANGER A | DISPLAY TRK/SEC | PRG | hedning, shine | 4 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 25 08 64 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..%.d..*********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 00 49 08 6E 00 8F 2A 20 44 49 53 |*****.I.n..* DIS| 00000030: 50 4C 41 59 20 41 4E 59 20 54 52 41 43 4B 20 24 |PLAY ANY TRACK $| 00000040: 20 53 45 43 54 4F 52 20 2A 00 6D 08 78 00 8F 2A | SECTOR *.m.x..*| 00000050: 20 4F 4E 20 54 48 45 20 44 49 53 4B 20 54 4F 20 | ON THE DISK TO | 00000060: 54 48 45 20 53 43 52 45 45 4E 20 20 2A 00 91 08 |THE SCREEN *...| 00000070: 82 00 8F 2A 20 4F 52 20 54 48 45 20 50 52 49 4E |...* OR THE PRIN| 00000080: 54 45 52 20 20 20 20 20 20 20 20 20 20 20 20 20 |TER | 00000090: 2A 00 B5 08 8C 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |*......*********| 000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000B0: 2A 2A 2A 2A 2A 00 CD 08 91 00 97 35 33 32 38 30 |*****......53280| 000000C0: 2C 31 32 3A 97 35 33 32 38 31 2C 31 32 00 F7 08 |,12:.53281,12...| 000000D0: 96 00 99 22 90 93 11 11 20 20 20 20 20 20 20 20 |...".... | 000000E0: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |................| 000000F0: D2 D2 D2 D2 D2 D2 22 00 1D 09 A0 00 99 22 20 20 |......"......" | 00000100: 20 20 20 20 20 20 44 49 53 50 4C 41 59 20 42 4C | DISPLAY BL| 00000110: 4F 43 4B 20 43 4F 4E 54 45 4E 54 53 22 00 44 09 |OCK CONTENTS".D.| 00000120: A5 00 99 22 20 20 20 20 20 20 20 20 C5 C5 C5 C5 |..." ....| 00000130: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................| 00000140: C5 C5 22 3A 00 68 09 AA 00 8F 2A 2A 2A 2A 2A 2A |..":.h....******| 00000150: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000160: 2A 2A 2A 2A 2A 2A 2A 2A 00 8C 09 B4 00 8F 2A 20 |********......* | 00000170: 53 45 54 20 50 52 4F 47 52 41 4D 20 43 4F 4E 53 |SET PROGRAM CONS| 00000180: 54 41 4E 54 20 20 20 20 20 20 20 2A 00 B0 09 BE |TANT *....| 00000190: 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************| 000001A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000001B0: 00 DC 09 C8 00 53 50 24 B2 22 20 22 3A 4E 4C 24 |.....SP$." ":NL$| 000001C0: B2 C7 28 30 29 3A 48 58 24 B2 22 30 31 32 33 34 |..(0):HX$."01234| 000001D0: 35 36 37 38 39 41 42 43 44 45 46 22 00 0B 0A D2 |56789ABCDEF"....| 000001E0: 00 46 53 24 B2 22 22 3A 81 49 B2 36 34 20 A4 20 |.FS$."":.I.64 . | 000001F0: 39 35 3A 46 53 24 B2 46 53 24 AA 22 12 22 AA C7 |95:FS$.FS$."."..| 00000200: 28 49 29 AA 22 92 22 3A 82 20 49 00 3F 0A DC 00 |(I).".":. I.?...| 00000210: 53 53 24 B2 22 20 20 22 3A 81 20 49 B2 31 39 32 |SS$." ":. I.192| 00000220: 20 A4 20 32 32 33 3A 53 53 24 B2 53 53 24 AA 22 | . 223:SS$.SS$."| 00000230: 12 22 AA C7 28 49 29 AA 22 92 22 3A 82 20 49 00 |."..(I).".":. I.| 00000240: 52 0A F0 00 86 20 41 24 28 31 35 29 2C 4E 42 28 |R.... A$(15),NB(| 00000250: 32 29 00 5D 0A FB 00 44 24 B2 22 30 22 00 88 0A |2).]...D$."0"...| 00000260: FD 00 99 A3 31 35 29 22 12 53 92 43 52 45 45 4E |....15)".S.CREEN| 00000270: 11 9D 9D 9D 9D 9D 9D 9D 9D 4F 52 20 11 9D 12 50 |.........OR ...P| 00000280: 92 52 49 4E 54 45 52 22 00 9F 0A FE 00 A1 4A 4A |.RINTER"......JJ| 00000290: 24 3A 8B 20 4A 4A 24 B2 22 22 20 A7 32 35 34 00 |$:. JJ$."" .254.| 000002A0: C2 0A FF 00 8B 20 4A 4A 24 B2 22 53 22 A7 99 22 |..... JJ$."S".."| 000002B0: 20 20 20 20 20 20 20 20 11 12 53 43 52 45 45 4E | ..SCREEN| 000002C0: 92 22 00 E6 0A 00 01 8B 20 4A 4A 24 B2 22 50 22 |."...... JJ$."P"| 000002D0: A7 99 22 20 20 20 20 20 20 20 20 11 12 50 52 49 |.." ..PRI| 000002E0: 4E 54 45 52 92 22 00 00 0B 04 01 9F 31 35 2C 38 |NTER."......15,8| 000002F0: 2C 31 35 2C 22 49 22 AA 44 24 3A 8D 20 36 35 30 |,15,"I".D$:. 650| 00000300: 00 09 0B 09 01 9F 34 2C 34 00 1F 0B 0E 01 9F 20 |......4,4...... | 00000310: 32 2C 38 2C 32 2C 22 23 22 3A 8D 20 36 35 30 00 |2,8,2,"#":. 650.| 00000320: 43 0B 18 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |C....***********| 00000330: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000340: 2A 2A 2A 00 67 0B 22 01 8F 2A 20 4C 4F 41 44 20 |***.g."..* LOAD | 00000350: 54 52 41 43 4B 20 41 4E 44 20 53 45 43 54 4F 52 |TRACK AND SECTOR| 00000360: 20 20 20 20 20 20 2A 00 8B 0B 2C 01 8F 2A 20 49 | *...,..* I| 00000370: 4E 54 4F 20 44 49 53 4B 20 42 55 46 46 45 52 20 |NTO DISK BUFFER | 00000380: 20 20 20 20 20 20 20 20 20 20 2A 00 AF 0B 36 01 | *...6.| 00000390: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************| 000003A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.| 000003B0: CB 0B 40 01 85 22 11 1D 1D 54 52 41 43 4B 2C 20 |..@.."...TRACK, | 000003C0: 53 45 43 54 4F 52 22 3B 54 2C 53 00 FB 0B 4A 01 |SECTOR";T,S...J.| 000003D0: 8B 20 54 B2 30 20 B0 20 54 B1 33 35 20 A7 20 98 |. T.0 . T.35 . .| 000003E0: 31 35 2C 22 49 22 44 24 3A A0 32 3A A0 34 3A A0 |15,"I"D$:.2:.4:.| 000003F0: 31 35 3A 99 22 45 4E 44 22 3A 80 00 25 0C 54 01 |15:."END":..%.T.| 00000400: 8B 20 4A 4A 24 B2 22 53 22 20 A7 20 99 22 11 1D |. JJ$."S" . ."..| 00000410: 1D 54 52 41 43 4B 22 54 22 20 53 45 43 54 4F 52 |.TRACK"T" SECTOR| 00000420: 22 53 22 11 22 00 51 0C 55 01 8B 20 4A 4A 24 B2 |"S".".Q.U.. JJ$.| 00000430: 22 50 22 20 A7 20 98 34 3A 98 34 2C 22 54 52 41 |"P" . .4:.4,"TRA| 00000440: 43 4B 22 54 22 20 53 45 43 54 4F 52 22 53 3A 98 |CK"T" SECTOR"S:.| 00000450: 34 00 6C 0C 5E 01 98 31 35 2C 22 55 31 3A 32 2C |4.l.^..15,"U1:2,| 00000460: 22 44 24 3B 54 3B 53 3A 8D 36 35 30 00 90 0C 68 |"D$;T;S:.650...h| 00000470: 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************| 00000480: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000490: 00 B4 0C 72 01 8F 2A 20 52 45 41 44 20 42 59 54 |...r..* READ BYT| 000004A0: 45 20 30 20 4F 46 20 44 49 53 4B 20 42 55 46 46 |E 0 OF DISK BUFF| 000004B0: 45 52 20 2A 00 D8 0C 86 01 8F 2A 2A 2A 2A 2A 2A |ER *......******| 000004C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000004D0: 2A 2A 2A 2A 2A 2A 2A 2A 00 EA 0C 90 01 98 31 35 |********......15| 000004E0: 2C 22 42 2D 50 3A 32 2C 31 22 00 00 0D 9A 01 98 |,"B-P:2,1"......| 000004F0: 31 35 2C 22 4D 2D 52 22 C7 28 30 29 C7 28 35 29 |15,"M-R".(0).(5)| 00000500: 00 23 0D A4 01 A1 23 31 35 2C 41 24 28 30 29 3A |.#....#15,A$(0):| 00000510: 8B 41 24 28 30 29 B2 22 22 A7 41 24 28 30 29 B2 |.A$(0)."".A$(0).| 00000520: 4E 4C 24 00 35 0D AC 01 8B 20 4A 4A 24 B2 22 53 |NL$.5.... JJ$."S| 00000530: 22 A7 34 33 30 00 47 0D AE 01 8B 20 4A 4A 24 B2 |".430.G.... JJ$.| 00000540: 22 50 22 A7 34 36 30 00 6B 0D AF 01 8F 2A 2A 2A |"P".460.k....***| 00000550: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000560: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8F 0D B0 01 |***********.....| 00000570: 8F 2A 20 52 45 41 44 20 26 20 43 52 54 20 44 49 |.* READ & CRT DI| 00000580: 53 50 4C 41 59 20 20 20 20 20 20 20 20 20 2A 00 |SPLAY *.| 00000590: B3 0D B1 01 8F 2A 20 52 45 53 54 20 4F 46 20 54 |.....* REST OF T| 000005A0: 48 45 20 44 49 53 4B 20 42 55 46 46 45 52 20 20 |HE DISK BUFFER | 000005B0: 20 20 2A 00 D7 0D B2 01 8F 2A 2A 2A 2A 2A 2A 2A | *......*******| 000005C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000005D0: 2A 2A 2A 2A 2A 2A 2A 00 EE 0D B4 01 4B B2 31 3A |*******.....K.1:| 000005E0: 4E 42 28 31 29 B2 C6 28 41 24 28 30 29 29 00 21 |NB(1)..(A$(0)).!| 000005F0: 0E B6 01 81 20 4A B2 30 20 A4 20 36 33 3A 8B 20 |.... J.0 . 63:. | 00000600: 4A B2 33 32 20 A7 20 8D 20 37 31 30 3A 8B 20 5A |J.32 . . 710:. Z| 00000610: 24 B2 22 4E 22 A7 20 4A B2 38 30 3A 89 20 34 35 |$."N". J.80:. 45| 00000620: 38 00 2F 0E B8 01 81 20 49 B2 4B 20 A4 20 33 00 |8./.... I.K . 3.| 00000630: 54 0E BA 01 A1 23 32 2C 41 24 28 49 29 3A 8B 20 |T....#2,A$(I):. | 00000640: 41 24 28 49 29 B2 22 22 20 A7 20 41 24 28 49 29 |A$(I)."" . A$(I)| 00000650: B2 4E 4C 24 00 75 0E BC 01 8B 20 4B B2 31 20 AF |.NL$.u.... K.1 .| 00000660: 20 49 B3 32 20 A7 20 4E 42 28 32 29 B2 C6 28 41 | I.2 . NB(2)..(A| 00000670: 24 28 49 29 29 00 81 0E BE 01 82 20 49 3A 4B B2 |$(I))...... I:K.| 00000680: 30 00 A8 0E C0 01 41 24 B2 22 22 3A 42 24 B2 22 |0.....A$."":B$."| 00000690: 3A 22 3A 4E B2 4A AC 34 3A 8D 20 37 39 30 3A 41 |:":N.J.4:. 790:A| 000006A0: 24 B2 41 24 AA 22 3A 22 00 C7 0E C2 01 81 20 49 |$.A$.":"...... I| 000006B0: B2 30 20 A4 20 33 3A 4E B2 C6 28 41 24 28 49 29 |.0 . 3:N..(A$(I)| 000006C0: 29 3A 8D 20 37 39 30 00 E3 0E C4 01 43 24 B2 41 |):. 790.....C$.A| 000006D0: 24 28 49 29 3A 8D 20 38 35 30 3A 42 24 B2 42 24 |$(I):. 850:B$.B$| 000006E0: AA 43 24 00 FD 0E C6 01 82 20 49 3A 8B 20 4A 4A |.C$...... I:. JJ| 000006F0: 24 B2 22 53 22 20 A7 20 99 41 24 42 24 00 0A 0F |$."S" . .A$B$...| 00000700: CA 01 82 20 4A 3A 89 35 37 31 00 2E 0F CC 01 8F |... J:.571......| 00000710: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000720: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 52 |**************.R| 00000730: 0F CE 01 8F 2A 20 52 45 41 44 20 26 20 50 52 49 |....* READ & PRI| 00000740: 4E 54 45 52 20 44 49 53 50 4C 41 59 20 20 20 20 |NTER DISPLAY | 00000750: 20 2A 00 76 0F D0 01 8F 2A 2A 2A 2A 2A 2A 2A 2A | *.v....********| 00000760: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000770: 2A 2A 2A 2A 2A 2A 00 8D 0F D2 01 4B B2 31 3A 4E |******.....K.1:N| 00000780: 42 28 31 29 B2 C6 28 41 24 28 30 29 29 00 9C 0F |B(1)..(A$(0))...| 00000790: D4 01 81 20 4A B2 30 20 A4 20 31 35 00 AB 0F D6 |... J.0 . 15....| 000007A0: 01 81 20 49 B2 4B 20 A4 20 31 35 00 D0 0F D8 01 |.. I.K . 15.....| 000007B0: A1 23 32 2C 41 24 28 49 29 3A 8B 20 41 24 28 49 |.#2,A$(I):. A$(I| 000007C0: 29 B2 22 22 20 A7 20 41 24 28 49 29 B2 4E 4C 24 |)."" . A$(I).NL$| 000007D0: 00 F1 0F DA 01 8B 20 4B B2 31 20 AF 20 49 B3 32 |...... K.1 . I.2| 000007E0: 20 A7 20 4E 42 28 32 29 B2 C6 28 41 24 28 49 29 | . NB(2)..(A$(I)| 000007F0: 29 00 FD 0F DC 01 82 20 49 3A 4B B2 30 00 25 10 |)...... I:K.0.%.| 00000800: DE 01 41 24 B2 22 22 3A 42 24 B2 22 3A 22 3A 4E |..A$."":B$.":":N| 00000810: B2 4A AC 31 36 3A 8D 20 37 39 30 3A 41 24 B2 41 |.J.16:. 790:A$.A| 00000820: 24 AA 22 3A 22 00 5A 10 E0 01 81 20 49 B2 30 20 |$.":".Z.... I.0 | 00000830: A4 20 31 35 3A 4E B2 C6 28 41 24 28 49 29 29 3A |. 15:N..(A$(I)):| 00000840: 8D 20 37 39 30 3A 8B 20 5A 24 B2 22 4E 22 A7 20 |. 790:. Z$."N". | 00000850: 4A B2 34 30 3A 89 20 35 37 31 00 76 10 E2 01 43 |J.40:. 571.v...C| 00000860: 24 B2 41 24 28 49 29 3A 8D 20 38 35 30 3A 42 24 |$.A$(I):. 850:B$| 00000870: B2 42 24 AA 43 24 00 7E 10 E4 01 82 20 49 00 96 |.B$.C$.~.... I..| 00000880: 10 E6 01 8B 20 4A 4A 24 B2 22 50 22 20 A7 20 98 |.... JJ$."P" . .| 00000890: 34 2C 41 24 42 24 00 A3 10 E8 01 82 20 4A 3A 89 |4,A$B$...... J:.| 000008A0: 35 37 31 00 C7 10 3B 02 8F 2A 2A 2A 2A 2A 2A 2A |571...;..*******| 000008B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000008C0: 2A 2A 2A 2A 2A 2A 2A 00 EB 10 3C 02 8F 2A 20 4E |*******...<..* N| 000008D0: 45 58 54 20 54 52 41 43 4B 20 41 4E 44 20 53 45 |EXT TRACK AND SE| 000008E0: 43 54 4F 52 20 20 20 20 20 20 2A 00 0F 11 3D 02 |CTOR *...=.| 000008F0: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************| 00000900: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.| 00000910: 3A 11 3F 02 99 22 4E 45 58 54 20 54 52 41 43 4B |:.?.."NEXT TRACK| 00000920: 20 41 4E 44 20 53 45 43 54 4F 52 22 4E 42 28 31 | AND SECTOR"NB(1| 00000930: 29 4E 42 28 32 29 20 22 11 22 00 63 11 44 02 99 |)NB(2) ".".c.D..| 00000940: 22 44 4F 20 59 4F 55 20 57 41 4E 54 20 4E 45 58 |"DO YOU WANT NEX| 00000950: 54 20 54 52 41 43 4B 20 41 4E 44 20 53 45 43 54 |T TRACK AND SECT| 00000960: 4F 52 22 00 79 11 4E 02 A1 20 5A 24 3A 8B 20 5A |OR".y.N.. Z$:. Z| 00000970: 24 B2 22 22 20 A7 35 39 30 00 9D 11 58 02 8B 20 |$."" .590...X.. | 00000980: 5A 24 B2 22 59 22 20 A7 20 54 B2 4E 42 28 31 29 |Z$."Y" . T.NB(1)| 00000990: 3A 53 B2 4E 42 28 32 29 3A 89 33 33 30 00 B0 11 |:S.NB(2):.330...| 000009A0: 62 02 8B 20 5A 24 B2 22 4E 22 20 A7 20 33 32 30 |b.. Z$."N" . 320| 000009B0: 00 BA 11 6C 02 89 20 35 39 30 00 DE 11 76 02 8F |...l.. 590...v..| 000009C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000009D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 02 |**************..| 000009E0: 12 80 02 8F 2A 20 53 55 42 52 4F 55 54 49 4E 45 |....* SUBROUTINE| 000009F0: 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |S | 00000A00: 20 2A 00 26 12 8A 02 8F 2A 2A 2A 2A 2A 2A 2A 2A | *.&....********| 00000A10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000A20: 2A 2A 2A 2A 2A 2A 00 4A 12 94 02 8F 2A 20 45 52 |******.J....* ER| 00000A30: 52 4F 52 20 52 4F 55 54 49 4E 45 20 20 20 20 20 |ROR ROUTINE | 00000A40: 20 20 20 20 20 20 20 20 20 2A 00 6E 12 9E 02 8F | *.n....| 00000A50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000A60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8E |**************..| 00000A70: 12 A8 02 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 54 |....15,EN,EM$,ET| 00000A80: 2C 45 53 3A 8B 20 45 4E B2 30 20 A7 20 8E 00 AE |,ES:. EN.0 . ...| 00000A90: 12 B2 02 99 22 12 44 49 53 4B 20 45 52 52 4F 52 |....".DISK ERROR| 00000AA0: 92 22 45 4E 2C 45 4D 24 2C 45 54 2C 45 53 00 B4 |."EN,EM$,ET,ES..| 00000AB0: 12 BC 02 80 00 D8 12 C6 02 8F 2A 2A 2A 2A 2A 2A |..........******| 00000AC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000AD0: 2A 2A 2A 2A 2A 2A 2A 2A 00 FC 12 D0 02 8F 2A 20 |********......* | 00000AE0: 53 43 52 45 45 4E 20 43 4F 4E 54 49 4E 55 45 20 |SCREEN CONTINUE | 00000AF0: 4D 45 53 53 41 47 45 20 20 20 20 2A 00 20 13 DA |MESSAGE *. ..| 00000B00: 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************| 00000B10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000B20: 00 3A 13 E4 02 99 22 11 1D 1D 1D 1D 43 4F 4E 54 |.:....".....CONT| 00000B30: 49 4E 55 45 28 59 2F 4E 29 22 00 50 13 EE 02 A1 |INUE(Y/N)".P....| 00000B40: 5A 24 3A 8B 20 5A 24 B2 22 22 20 A7 20 37 35 30 |Z$:. Z$."" . 750| 00000B50: 00 61 13 F8 02 8B 20 5A 24 B2 22 4E 22 20 A7 20 |.a.... Z$."N" . | 00000B60: 8E 00 75 13 02 03 8B 20 5A 24 B3 B1 22 59 22 20 |..u.... Z$.."Y" | 00000B70: A7 20 37 35 30 00 96 13 0C 03 99 22 93 54 52 41 |. 750......".TRA| 00000B80: 43 4B 22 20 54 20 22 20 53 45 43 54 4F 52 22 53 |CK" T " SECTOR"S| 00000B90: 20 22 93 22 3A 8E 00 BA 13 16 03 8F 2A 2A 2A 2A | ".":.......****| 00000BA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000BB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 DE 13 20 03 8F |**********... ..| 00000BC0: 2A 20 44 49 53 4B 20 42 59 54 45 20 54 4F 20 48 |* DISK BYTE TO H| 00000BD0: 45 58 20 50 52 49 4E 54 20 20 20 20 20 2A 00 02 |EX PRINT *..| 00000BE0: 14 2A 03 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.*..************| 00000BF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000C00: 2A 2A 00 25 14 34 03 41 31 B2 B5 28 4E AD 31 36 |**.%.4.A1..(N.16| 00000C10: 29 3A 41 24 B2 41 24 AA CA 28 48 58 24 2C 41 31 |):A$.A$..(HX$,A1| 00000C20: AA 31 2C 31 29 00 4B 14 3E 03 41 32 B2 B5 28 4E |.1,1).K.>.A2..(N| 00000C30: AB 31 36 AC 41 31 29 3A 41 24 B2 41 24 AA CA 28 |.16.A1):A$.A$..(| 00000C40: 48 58 24 2C 41 32 AA 31 2C 31 29 00 5B 14 48 03 |HX$,A2.1,1).[.H.| 00000C50: 41 24 B2 41 24 AA 53 50 24 3A 8E 00 7F 14 52 03 |A$.A$.SP$:....R.| 00000C60: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************| 00000C70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.| 00000C80: A3 14 5C 03 8F 2A 20 44 49 53 4B 20 42 59 54 45 |..\..* DISK BYTE| 00000C90: 20 54 4F 20 41 53 43 20 44 49 53 50 4C 41 59 20 | TO ASC DISPLAY | 00000CA0: 20 20 2A 00 C7 14 66 03 8F 2A 20 43 48 41 52 41 | *...f..* CHARA| 00000CB0: 43 54 45 52 20 20 20 20 20 20 20 20 20 20 20 20 |CTER | 00000CC0: 20 20 20 20 20 20 2A 00 EB 14 70 03 8F 2A 2A 2A | *...p..***| 00000CD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000CE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 05 15 7A 03 |***********...z.| 00000CF0: 8B 20 C6 28 43 24 29 B3 33 32 20 A7 20 43 24 B2 |. .(C$).32 . C$.| 00000D00: 22 20 22 3A 8E 00 25 15 8E 03 8B 20 C6 28 43 24 |" ":..%.... .(C$| 00000D10: 29 B3 31 32 38 20 B0 20 C6 28 43 24 29 B1 31 35 |).128 . .(C$).15| 00000D20: 39 20 A7 20 8E 00 45 15 98 03 43 24 B2 CA 28 53 |9 . ..E...C$..(S| 00000D30: 53 24 2C 33 AC 28 C6 28 43 24 29 AB 31 32 37 29 |S$,3.(.(C$).127)| 00000D40: 2C 33 29 3A 8E 00 00 00 |,3):.... |
..%.D..******************************.I. N..* DISPLAY ANY TRACK $ SECTOR *.M.X..* ON THE DISK TO THE SCREEN *......* OR THE PRINTER *......********* *********************.M....53280,12:.532 81,12......".... RRRRRRRRRRRRRRRR RRRRRR"... .." DISPLAY BLOCK CONT ENTS".D...." EEEEEEEEEEEEEEEEEEEE EE":.H....****************************** ......* SET PROGRAM CONSTANT *.... ..******************************...H.SP$ ." ":NL$.G(0):HX$."0123456789ABCDEF"...R .FS$."":.I.64 . 95:FS$.FS$.".".G(I).".": . I.?...SS$." ":. I.192 . 223:SS$.SS$." .".G(I).".":. I.R.... A$(15),NB(2).]...D $."0".......15)".S.CREEN.........OR ...P .RINTER"......JJ$:. JJ$."" .254.B.... JJ $."S".." ..SCREEN."...... JJ$."P" .." ..PRINTER."......15,8,15,"I". D$:. 650......4,4...... 2,8,2,"#":. 650. C....******************************.G.". .* LOAD TRACK AND SECTOR *...,..* I NTO DISK BUFFER *...6..******* ***********************.K.@.."...TRACK, SECTOR";T,S...J.. T.0 . T.35 . .15,"I"D$ : 2: 4: 15:."END":..%.T.. JJ$."S" . .".. .TRACK"T" SECTOR"S".".Q.U.. JJ$."P" . .4 :.4,"TRACK"T" SECTOR"S:.4.L.^..15,"U1:2, "D$;T;S:.650...H..********************** ********...R..* READ BYTE 0 OF DISK BUFF ER *.X....****************************** ......15,"B-P:2,1"......15,"M-R"G(0)G(5) .#....#15,A$(0):.A$(0)."".A$(0).NL$.5... . JJ$."S".430.G.... JJ$."P".460.K....*** ***************************......* READ & CRT DISPLAY *......* REST OF T HE DISK BUFFER *.W....*************** ***************.....K.1:NB(1).F(A$(0)).! .... J.0 . 63:. J.32 . . 710:. Z$."N". J .80:. 458./.... I.K . 3.T....#2,A$(I):. A$(I)."" . A$(I).NL$.U.... K.1 . I.2 . N B(2).F(A$(I))...... I:K.0.....A$."":B$." :":N.J.4:. 790:A$.A$.":".G.B.. I.0 . 3:N .F(A$(I)):. 790...D.C$.A$(I):. 850:B$.B$ .C$...F.. I:. JJ$."S" . .A$B$...J.. J:.5 71...L..******************************.R .N..* READ & PRINTER DISPLAY *.V.P.. ******************************...R.K.1:N B(1).F(A$(0))...T.. J.0 . 15...V.. I.K . 15.P.X..#2,A$(I):. A$(I)."" . A$(I).NL$ ...Z.. K.1 . I.2 . NB(2).F(A$(I))...... I:K.0.%...A$."":B$.":":N.J.16:. 790:A$.A $.":".Z.... I.0 . 15:N.F(A$(I)):. 790:. Z$."N". J.40:. 571.V...C$.A$(I):. 850:B$ .B$.C$.~.... I...... JJ$."P" . .4,A$B$.. .... J:.571.G.;..*********************** *******...<..* NEXT TRACK AND SECTOR *...=..******************************. :.?.."NEXT TRACK AND SECTOR"NB(1)NB(2) " .".C.D.."DO YOU WANT NEXT TRACK AND SECT OR".Y.N.. Z$:. Z$."" .590...X.. Z$."Y" . T.NB(1):S.NB(2):.330...B.. Z$."N" . 320 ...L.. 590...V..************************ ******......* SUBROUTINES *.&....******************************.J ....* ERROR ROUTINE *.N.... ******************************......15,E N,EM$,ET,ES:. EN.0 . .......".DISK ERROR ."EN,EM$,ET,ES.......X.F..************** ****************...P..* SCREEN CONTINUE MESSAGE *. .Z..********************** ********.:....".....CONTINUE(Y/N)".P.... Z$:. Z$."" . 750.A.... Z$."N" . ..U.... Z$.."Y" . 750......".TRACK" T " SECTOR"S ".":.......**************************** **... ..* DISK BYTE TO HEX PRINT *.. .*..******************************.%.4.A 1..(N.16):A$.A$.J(HX$,A1.1,1).K.>.A2..(N .16.A1):A$.A$.J(HX$,A2.1,1).[.H.A$.A$.SP $:...R..******************************. ..\..* DISK BYTE TO ASC DISPLAY *.G.F. .* CHARACTER *...P..*** ***************************...Z.. F(C$). 32 . C$." ":..%.... F(C$).128 . F(C$).15 9 . ..E...C$.J(SS$,3.(F(C$).127),3):....
> CLICK IMAGE PREVIEW FOR FULL MODAL