00000000: 2A 20 63 00 0C 11 3F 02 99 22 4E 45 58 54 20 54 |* c...?.."NEXT T|
00000010: 52 41 43 4B 20 41 4E 44 20 53 45 43 54 4F 52 22 |RACK AND SECTOR"|
00000020: 4E 42 28 31 29 4E 42 28 32 29 20 22 11 22 00 35 |NB(1)NB(2) ".".5|
00000030: 11 44 02 99 22 44 4F 20 59 4F 55 20 57 41 4E 54 |.D.."DO YOU WANT|
00000040: 20 4E 45 58 54 20 54 52 41 43 4B 20 41 4E 44 20 | NEXT TRACK AND |
00000050: 53 45 43 54 4F 52 22 00 4B 11 4E 02 A1 20 5A 24 |SECTOR".K.N.. Z$|
00000060: 3A 8B 20 5A 24 B2 42 22 20 26 20 A7 35 39 30 00 |:. Z$.B" & .590.|
00000070: 6F 11 58 02 8B 20 5A 24 B2 22 59 22 20 A7 20 54 |o.X.. Z$."Y" . T|
00000080: B2 4E 42 28 31 29 3A 53 B2 4E 42 28 32 29 3A 89 |.NB(1):S.NB(2):.|
00000090: 42 33 20 24 30 00 82 11 62 02 8B 20 5A 24 B2 22 |B3 $0...b.. Z$."|
000000A0: 4E 22 20 A7 20 33 32 30 00 8C 11 6C 02 89 20 35 |N" . 320...l.. 5|
000000B0: 39 30 00 B0 11 76 02 8F A3 2A 2A 2A 2A 2A 2A 2A |90...v...*******|
000000C0: 2A 46 2A 13 00 D4 11 80 02 8F 2A 20 53 55 42 52 |*F*.......* SUBR|
000000D0: 4F 55 54 49 4E 45 53 A2 20 20 20 20 20 20 20 20 |OUTINES. |
000000E0: 07 2A 00 F8 11 8A 02 8F A3 2A 2A 2A 2A 2A 2A 2A |.*.......*******|
000000F0: 2A 46 2A 09 00 1C 12 94 02 8F 2A 20 45 42 52 0A |*F*.......* EBR.|
00000100: 4F 52 20 52 4F 55 54 49 4E 45 4E 20 07 2A 00 40 |OR ROUTINEN .*.@|
00000110: 12 9E 02 8F A3 2A 2A 2A 2A 2A 2A 2A 2A 46 2A 20 |.....********F* |
00000120: 2E 00 60 12 A8 02 84 31 35 2C 45 4E 2C 45 4D 24 |..`....15,EN,EM$|
00000130: 2C 45 54 2C 45 53 3A 8B 20 45 4E B2 30 20 A7 20 |,ET,ES:. EN.0 . |
00000140: 8E 00 80 12 B2 02 99 22 12 44 49 53 4B 20 45 42 |.......".DISK EB|
00000150: 52 1E 4F 52 92 22 45 4E 2C 45 4D 24 2C 45 54 2C |R.OR."EN,EM$,ET,|
00000160: 45 53 00 88 12 BC 02 90 3A 8E 00 AC 12 C6 02 8F |ES......:.......|
00000170: A3 2A 2A 2A 2A 2A 2A 2A 2A 46 2A 0B 00 D0 12 D0 |.********F*.....|
00000180: 02 8F 2A 20 53 43 52 42 45 0D 4E 20 43 4F 4E 54 |..* SCRBE.N CONT|
00000190: 49 4E 55 45 20 4D 45 42 53 03 41 47 45 44 20 07 |INUE MEBS.AGED .|
000001A0: 2A 00 F4 12 DA 02 8F A3 2A 2A 2A 2A 2A 2A 2A 2A |*.......********|
000001B0: 46 2A 08 00 0E 13 E4 02 99 22 11 44 1D 1C 43 4F |F*.......".D..CO|
000001C0: 4E 54 49 4E 55 45 28 59 2F 4E 29 22 00 24 13 EE |NTINUE(Y/N)".$..|
000001D0: 02 A1 5A 24 3A 8B 20 5A 24 B2 42 22 20 52 20 A7 |..Z$:. Z$.B" R .|
000001E0: 20 37 35 30 00 35 13 F8 02 8B 20 5A 24 B2 22 4E | 750.5.... Z$."N|
000001F0: 22 20 A7 20 8E 00 49 13 02 03 8B 20 5A 24 B3 B1 |" . ..I.... Z$..|
00000200: 22 59 22 20 A7 20 37 35 30 00 6A 13 0C 03 99 22 |"Y" . 750.j...."|
00000210: 93 54 52 41 43 4B 22 20 54 20 22 20 53 45 43 54 |.TRACK" T " SECT|
00000220: 4F 52 22 53 20 22 93 22 3A 8E 00 8E 13 16 03 8F |OR"S ".":.......|
00000230: A3 2A 2A 2A 2A 2A 2A 2A 2A 46 2A 1E 00 B2 13 20 |.********F*.... |
00000240: 03 8F 2A 20 44 49 53 4B 20 42 59 54 45 20 54 4F |..* DISK BYTE TO|
00000250: 20 48 45 58 20 50 52 49 4E 54 45 20 07 2A 00 D6 | HEX PRINTE .*..|
00000260: 13 2A 03 8F A3 2A 2A 2A 2A 2A 2A 2A 2A 46 2A 20 |.*...********F* |
00000270: 5F 00 F9 13 34 03 41 31 B2 B5 28 4E AD 31 36 29 |_...4.A1..(N.16)|
00000280: 3A 41 24 B2 41 24 AA CA 28 48 58 24 2C 41 31 AA |:A$.A$..(HX$,A1.|
00000290: 31 2C 31 29 00 1F 14 3E 03 41 32 B2 B5 28 4E AB |1,1)...>.A2..(N.|
000002A0: 31 36 AC 41 31 29 3A 41 24 B2 41 24 AA CA 28 48 |16.A1):A$.A$..(H|
000002B0: 58 24 2C 41 32 AA 31 2C 31 29 00 2F 14 48 03 41 |X$,A2.1,1)./.H.A|
000002C0: 24 B2 41 24 AA 53 50 24 3A 8E 00 53 14 52 03 8F |$.A$.SP$:..S.R..|
000002D0: A3 2A 2A 2A 2A 2A 2A 2A 2A 46 2A 20 20 00 77 14 |.********F* .w.|
000002E0: 5C 03 8F 2A 20 44 49 53 4B 20 42 59 54 45 20 54 |\..* DISK BYTE T|
000002F0: 4F 20 41 53 43 20 44 49 53 50 4C 41 59 43 20 12 |O ASC DISPLAYC .|
00000300: 2A 00 9B 14 66 03 8F 2A 20 43 48 41 52 41 43 54 |*...f..* CHARACT|
00000310: 45 52 A2 20 20 20 20 20 20 20 20 42 20 07 2A 00 |ER. B .*.|
00000320: BF 14 70 03 8F A3 2A 2A 2A 2A 2A 2A 2A 2A 46 2A |..p...********F*|
00000330: 20 44 00 D9 14 7A 03 8B 20 C6 28 43 24 29 B3 33 | D...z.. .(C$).3|
00000340: 32 20 A7 20 43 24 B2 22 20 22 3A 8E 00 F9 14 84 |2 . C$." ":.....|
00000350: 03 8B 20 C6 28 43 24 29 B3 31 32 38 20 B0 20 C6 |.. .(C$).128 . .|
00000360: 28 43 24 29 B1 31 35 39 20 A7 20 8E 00 19 15 8E |(C$).159 . .....|
00000370: 03 43 24 B2 CA 28 42 53 14 24 2C 33 AC 28 C6 28 |.C$..(BS.$,3.(.(|
00000380: 43 24 29 AB 31 32 37 29 2C 33 29 3A 8E C3 |C$).127),3):.. |
* C...?.."NEXT TRACK AND SECTOR"NB(1)NB(
2) ".".5.D.."DO YOU WANT NEXT TRACK AND
SECTOR".K.N.. Z$:. Z$.B" & .590.O.X.. Z$
."Y" . T.NB(1):S.NB(2):.B3 $0...B.. Z$."
N" . 320...L.. 590...V...********F*..T..
..* SUBROUTINES. .*.......*******
*F*.......* EBR.OR ROUTINEN .*.@.....***
*****F* ..`....15,EN,EM$,ET,ES:. EN.0 .
.......".DISK EBR.OR."EN,EM$,ET,ES......
:....F...********F*..P.P..* SCRBE.N CONT
INUE MEBS.AGED .*...Z...********F*......
.".D..CONTINUE(Y/N)".$....Z$:. Z$.B" R .
750.5.... Z$."N" . ..I.... Z$.."Y" . 75
0.J....".TRACK" T " SECTOR"S ".":.......
.********F*.... ..* DISK BYTE TO HEX PRI
NTE .*.V.*...********F* _...4.A1..(N.16)
:A$.A$.J(HX$,A1.1,1)...>.A2..(N.16.A1):A
$.A$.J(HX$,A2.1,1)./.H.A$.A$.SP$:..S.R..
.********F* .W.\..* DISK BYTE TO ASC DI
SPLAYC .*...F..* CHARACTER. B .*.
..P...********F* D.Y.Z.. F(C$).32 . C$."
":....... F(C$).128 . F(C$).159 . .....
.C$.J(BS.$,3.(F(C$).127),3):.C
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL