DISK TOOL
FILE INFORMATION
FILENAME(S): DISK TOOL
FILE TYPE(S): PRG
FILE SIZE: 8.8K
FIRST SEEN: 2025-11-02 16:39:36
APPEARS ON: 1 disk(s)
FILE HASH
08bd64bd9daac59ea2bc2ce8f2ed749d8219bdf08a150f223295922619bc357e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ANW PRG | DISK TOOL | PRG | Treasure Chest - Plattfuss | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 21 08 64 00 8B C2 28 35 36 29 B2 31 32 37 |..!.d...(56).127|
00000010: A7 97 35 36 2C 31 36 30 3A 9C 3A 58 B2 B8 28 30 |..56,160:.:X..(0|
00000020: 29 00 45 08 6E 00 8F 2A 20 44 49 53 50 4C 41 59 |).E.n..* DISPLAY|
00000030: 20 41 4E 59 20 54 52 41 43 4B 20 24 20 53 45 43 | ANY TRACK $ SEC|
00000040: 54 4F 52 20 2A 00 69 08 78 00 8F 2A 20 4F 4E 20 |TOR *.i.x..* ON |
00000050: 54 48 45 20 44 49 53 4B 20 54 4F 20 54 48 45 20 |THE DISK TO THE |
00000060: 53 43 52 45 45 4E 20 20 2A 00 8D 08 82 00 8F 2A |SCREEN *......*|
00000070: 20 4F 52 20 54 48 45 20 50 52 49 4E 54 45 52 20 | OR THE PRINTER |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 B1 08 | *...|
00000090: 8C 00 8F 2A 2A 2A 2A 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 00 E5 08 96 00 99 22 93 11 11 D2 D2 D2 D2 D2 |*......"........|
000000C0: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |................|
000000D0: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |................|
000000E0: D2 D2 D2 22 3B 00 32 09 A0 00 99 22 44 49 53 50 |...";.2...."DISP|
000000F0: 4C 41 59 20 42 4C 4F 43 4B 20 43 4F 4E 54 45 4E |LAY BLOCK CONTEN|
00000100: 54 53 20 49 4E 20 48 45 58 20 26 20 41 4C 50 48 |TS IN HEX & ALPH|
00000110: 41 22 C7 28 31 33 29 A6 31 30 29 22 12 53 92 43 |A".(13).10)".S.C|
00000120: 52 45 45 4E 20 4F 52 20 12 50 92 52 49 4E 54 45 |REEN OR .P.RINTE|
00000130: 52 22 00 63 09 A5 00 99 22 C5 C5 C5 C5 C5 C5 C5 |R".c....".......|
00000140: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00000150: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00000160: C5 22 3B 00 AF 09 A6 00 99 22 28 4F 52 20 12 46 |.";......"(OR .F|
00000170: 31 92 20 53 43 41 4C 50 45 4C 20 20 12 46 32 92 |1. SCALPEL .F2.|
00000180: 20 54 52 41 43 45 20 4C 49 4E 4B 53 20 20 12 46 | TRACE LINKS .F|
00000190: 33 92 20 45 4E 44 20 20 20 20 11 20 12 46 35 92 |3. END . .F5.|
000001A0: 20 4C 4F 41 44 20 41 44 44 52 45 53 53 22 3B 00 | LOAD ADDRESS";.|
000001B0: C8 09 A7 00 99 22 20 20 12 46 37 92 20 38 4B 20 |....." .F7. 8K |
000001C0: 43 4F 50 59 29 11 11 22 00 EC 09 B4 00 8F 2A 20 |COPY).."......* |
000001D0: 53 45 54 20 50 52 4F 47 52 41 4D 20 43 4F 4E 53 |SET PROGRAM CONS|
000001E0: 54 41 4E 54 20 20 20 20 20 20 20 2A 00 10 0A BE |TANT *....|
000001F0: 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
00000200: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000210: 00 3C 0A C8 00 53 50 24 B2 22 20 22 3A 4E 4C 24 |.<...SP$." ":NL$|
00000220: B2 C7 28 30 29 3A 48 58 24 B2 22 30 31 32 33 34 |..(0):HX$."01234|
00000230: 35 36 37 38 39 41 42 43 44 45 46 22 00 6B 0A D2 |56789ABCDEF".k..|
00000240: 00 46 53 24 B2 22 22 3A 81 49 B2 36 34 20 A4 20 |.FS$."":.I.64 . |
00000250: 39 35 3A 46 53 24 B2 46 53 24 AA 22 12 22 AA C7 |95:FS$.FS$."."..|
00000260: 28 49 29 AA 22 92 22 3A 82 20 49 00 9F 0A DC 00 |(I).".":. I.....|
00000270: 53 53 24 B2 22 20 20 22 3A 81 20 49 B2 31 39 32 |SS$." ":. I.192|
00000280: 20 A4 20 32 32 33 3A 53 53 24 B2 53 53 24 AA 22 | . 223:SS$.SS$."|
00000290: 12 22 AA C7 28 49 29 AA 22 92 22 3A 82 20 49 00 |."..(I).".":. I.|
000002A0: B2 0A F0 00 86 20 41 24 28 31 35 29 2C 4E 42 28 |..... A$(15),NB(|
000002B0: 32 29 00 BD 0A FB 00 44 24 B2 22 30 22 00 D4 0A |2).....D$."0"...|
000002C0: FE 00 A1 4A 4A 24 3A 8B 20 4A 4A 24 B2 22 22 20 |...JJ$:. JJ$."" |
000002D0: A7 32 35 34 00 F7 0A FF 00 8B 20 4A 4A 24 B2 22 |.254...... JJ$."|
000002E0: 53 22 A7 99 22 20 20 20 20 20 20 20 20 11 12 53 |S".." ..S|
000002F0: 43 52 45 45 4E 92 22 00 1B 0B 00 01 8B 20 4A 4A |CREEN."...... JJ|
00000300: 24 B2 22 50 22 A7 99 22 20 20 20 20 20 20 20 20 |$."P".." |
00000310: 11 12 50 52 49 4E 54 45 52 92 22 00 2E 0B 01 01 |..PRINTER.".....|
00000320: 8B 4A 4A 24 B2 22 85 22 A7 8A 31 30 30 30 00 49 |.JJ$."."..1000.I|
00000330: 0B 02 01 8B 4A 4A 24 B2 22 86 22 A7 99 22 45 4E |....JJ$.".".."EN|
00000340: 44 22 3A 40 22 49 22 3A 80 00 5C 0B 03 01 8B 4A |D":@"I":..\....J|
00000350: 4A 24 B2 22 89 22 A7 8A 32 30 30 30 00 6F 0B 04 |J$."."..2000.o..|
00000360: 01 8B 4A 4A 24 B2 22 87 22 A7 8A 33 30 30 30 00 |..JJ$."."..3000.|
00000370: 82 0B 05 01 8B 4A 4A 24 B2 22 88 22 A7 8A 34 30 |.....JJ$."."..40|
00000380: 30 30 00 9C 0B 08 01 9F 31 35 2C 38 2C 31 35 2C |00......15,8,15,|
00000390: 22 49 22 AA 44 24 3A 8D 20 36 35 30 00 A5 0B 09 |"I".D$:. 650....|
000003A0: 01 9F 34 2C 34 00 BB 0B 0E 01 9F 20 32 2C 38 2C |..4,4...... 2,8,|
000003B0: 32 2C 22 23 22 3A 8D 20 36 35 30 00 DF 0B 18 01 |2,"#":. 650.....|
000003C0: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
000003D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000003E0: 03 0C 22 01 8F 2A 20 4C 4F 41 44 20 54 52 41 43 |.."..* LOAD TRAC|
000003F0: 4B 20 41 4E 44 20 53 45 43 54 4F 52 20 20 20 20 |K AND SECTOR |
00000400: 20 20 2A 00 27 0C 2C 01 8F 2A 20 49 4E 54 4F 20 | *.'.,..* INTO |
00000410: 44 49 53 4B 20 42 55 46 46 45 52 20 20 20 20 20 |DISK BUFFER |
00000420: 20 20 20 20 20 20 2A 00 4B 0C 36 01 8F 2A 2A 2A | *.K.6..***|
00000430: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000440: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 67 0C 40 01 |***********.g.@.|
00000450: 85 22 11 1D 1D 54 52 41 43 4B 2C 20 53 45 43 54 |."...TRACK, SECT|
00000460: 4F 52 22 3B 54 2C 53 00 97 0C 4A 01 8B 20 54 B2 |OR";T,S...J.. T.|
00000470: 30 20 B0 20 54 B1 33 35 20 A7 20 98 31 35 2C 22 |0 . T.35 . .15,"|
00000480: 49 22 44 24 3A A0 32 3A A0 34 3A A0 31 35 3A 99 |I"D$:.2:.4:.15:.|
00000490: 22 45 4E 44 22 3A 80 00 C1 0C 54 01 8B 20 4A 4A |"END":....T.. JJ|
000004A0: 24 B2 22 53 22 20 A7 20 99 22 11 1D 1D 54 52 41 |$."S" . ."...TRA|
000004B0: 43 4B 22 54 22 20 53 45 43 54 4F 52 22 53 22 11 |CK"T" SECTOR"S".|
000004C0: 22 00 ED 0C 55 01 8B 20 4A 4A 24 B2 22 50 22 20 |"...U.. JJ$."P" |
000004D0: A7 20 98 34 3A 98 34 2C 22 54 52 41 43 4B 22 54 |. .4:.4,"TRACK"T|
000004E0: 22 20 53 45 43 54 4F 52 22 53 3A 98 34 00 08 0D |" SECTOR"S:.4...|
000004F0: 5E 01 98 31 35 2C 22 55 31 3A 32 2C 22 44 24 3B |^..15,"U1:2,"D$;|
00000500: 54 3B 53 3A 8D 36 35 30 00 2C 0D 68 01 8F 2A 2A |T;S:.650.,.h..**|
00000510: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000520: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 50 0D 72 |************.P.r|
00000530: 01 8F 2A 20 52 45 41 44 20 42 59 54 45 20 30 20 |..* READ BYTE 0 |
00000540: 4F 46 20 44 49 53 4B 20 42 55 46 46 45 52 20 2A |OF DISK BUFFER *|
00000550: 00 74 0D 86 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.t....**********|
00000560: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000570: 2A 2A 2A 2A 00 86 0D 90 01 98 31 35 2C 22 42 2D |****......15,"B-|
00000580: 50 3A 32 2C 31 22 00 9C 0D 9A 01 98 31 35 2C 22 |P:2,1"......15,"|
00000590: 4D 2D 52 22 C7 28 30 29 C7 28 35 29 00 BF 0D A4 |M-R".(0).(5)....|
000005A0: 01 A1 23 31 35 2C 41 24 28 30 29 3A 8B 41 24 28 |..#15,A$(0):.A$(|
000005B0: 30 29 B2 22 22 A7 41 24 28 30 29 B2 4E 4C 24 00 |0)."".A$(0).NL$.|
000005C0: D1 0D AC 01 8B 20 4A 4A 24 B2 22 53 22 A7 34 33 |..... JJ$."S".43|
000005D0: 30 00 E3 0D AE 01 8B 20 4A 4A 24 B2 22 50 22 A7 |0...... JJ$."P".|
000005E0: 34 36 30 00 07 0E AF 01 8F 2A 2A 2A 2A 2A 2A 2A |460......*******|
000005F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000600: 2A 2A 2A 2A 2A 2A 2A 00 2B 0E B0 01 8F 2A 20 52 |*******.+....* R|
00000610: 45 41 44 20 26 20 43 52 54 20 44 49 53 50 4C 41 |EAD & CRT DISPLA|
00000620: 59 20 20 20 20 20 20 20 20 20 2A 00 4F 0E B1 01 |Y *.O...|
00000630: 8F 2A 20 52 45 53 54 20 4F 46 20 54 48 45 20 44 |.* REST OF THE D|
00000640: 49 53 4B 20 42 55 46 46 45 52 20 20 20 20 2A 00 |ISK BUFFER *.|
00000650: 73 0E B2 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |s....***********|
00000660: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000670: 2A 2A 2A 00 8A 0E B4 01 4B B2 31 3A 4E 42 28 31 |***.....K.1:NB(1|
00000680: 29 B2 C6 28 41 24 28 30 29 29 00 BD 0E B6 01 81 |)..(A$(0))......|
00000690: 20 4A B2 30 20 A4 20 36 33 3A 8B 20 4A B2 33 32 | J.0 . 63:. J.32|
000006A0: 20 A7 20 8D 20 37 31 30 3A 8B 20 5A 24 B2 22 4E | . . 710:. Z$."N|
000006B0: 22 A7 20 4A B2 38 30 3A 89 20 34 35 38 00 CB 0E |". J.80:. 458...|
000006C0: B8 01 81 20 49 B2 4B 20 A4 20 33 00 F0 0E BA 01 |... I.K . 3.....|
000006D0: A1 23 32 2C 41 24 28 49 29 3A 8B 20 41 24 28 49 |.#2,A$(I):. A$(I|
000006E0: 29 B2 22 22 20 A7 20 41 24 28 49 29 B2 4E 4C 24 |)."" . A$(I).NL$|
000006F0: 00 11 0F BC 01 8B 20 4B B2 31 20 AF 20 49 B3 32 |...... K.1 . I.2|
00000700: 20 A7 20 4E 42 28 32 29 B2 C6 28 41 24 28 49 29 | . NB(2)..(A$(I)|
00000710: 29 00 1D 0F BE 01 82 20 49 3A 4B B2 30 00 44 0F |)...... I:K.0.D.|
00000720: C0 01 41 24 B2 22 22 3A 42 24 B2 22 3A 22 3A 4E |..A$."":B$.":":N|
00000730: B2 4A AC 34 3A 8D 20 37 39 30 3A 41 24 B2 41 24 |.J.4:. 790:A$.A$|
00000740: AA 22 3A 22 00 63 0F C2 01 81 20 49 B2 30 20 A4 |.":".c.... I.0 .|
00000750: 20 33 3A 4E B2 C6 28 41 24 28 49 29 29 3A 8D 20 | 3:N..(A$(I)):. |
00000760: 37 39 30 00 7F 0F C4 01 43 24 B2 41 24 28 49 29 |790.....C$.A$(I)|
00000770: 3A 8D 20 38 35 30 3A 42 24 B2 42 24 AA 43 24 00 |:. 850:B$.B$.C$.|
00000780: 99 0F C6 01 82 20 49 3A 8B 20 4A 4A 24 B2 22 53 |..... I:. JJ$."S|
00000790: 22 20 A7 20 99 41 24 42 24 00 A6 0F CA 01 82 20 |" . .A$B$...... |
000007A0: 4A 3A 89 35 37 31 00 CA 0F CC 01 8F 2A 2A 2A 2A |J:.571......****|
000007B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000007C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 EE 0F CE 01 8F |**********......|
000007D0: 2A 20 52 45 41 44 20 26 20 50 52 49 4E 54 45 52 |* READ & PRINTER|
000007E0: 20 44 49 53 50 4C 41 59 20 20 20 20 20 2A 00 12 | DISPLAY *..|
000007F0: 10 D0 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....************|
00000800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000810: 2A 2A 00 29 10 D2 01 4B B2 31 3A 4E 42 28 31 29 |**.)...K.1:NB(1)|
00000820: B2 C6 28 41 24 28 30 29 29 00 38 10 D4 01 81 20 |..(A$(0)).8.... |
00000830: 4A B2 30 20 A4 20 31 35 00 47 10 D6 01 81 20 49 |J.0 . 15.G.... I|
00000840: B2 4B 20 A4 20 31 35 00 6C 10 D8 01 A1 23 32 2C |.K . 15.l....#2,|
00000850: 41 24 28 49 29 3A 8B 20 41 24 28 49 29 B2 22 22 |A$(I):. A$(I).""|
00000860: 20 A7 20 41 24 28 49 29 B2 4E 4C 24 00 8D 10 DA | . A$(I).NL$....|
00000870: 01 8B 20 4B B2 31 20 AF 20 49 B3 32 20 A7 20 4E |.. K.1 . I.2 . N|
00000880: 42 28 32 29 B2 C6 28 41 24 28 49 29 29 00 99 10 |B(2)..(A$(I))...|
00000890: DC 01 82 20 49 3A 4B B2 30 00 C1 10 DE 01 41 24 |... I:K.0.....A$|
000008A0: B2 22 22 3A 42 24 B2 22 3A 22 3A 4E B2 4A AC 31 |."":B$.":":N.J.1|
000008B0: 36 3A 8D 20 37 39 30 3A 41 24 B2 41 24 AA 22 3A |6:. 790:A$.A$.":|
000008C0: 22 00 F6 10 E0 01 81 20 49 B2 30 20 A4 20 31 35 |"...... I.0 . 15|
000008D0: 3A 4E B2 C6 28 41 24 28 49 29 29 3A 8D 20 37 39 |:N..(A$(I)):. 79|
000008E0: 30 3A 8B 20 5A 24 B2 22 4E 22 A7 20 4A B2 34 30 |0:. Z$."N". J.40|
000008F0: 3A 89 20 35 37 31 00 12 11 E2 01 43 24 B2 41 24 |:. 571.....C$.A$|
00000900: 28 49 29 3A 8D 20 38 35 30 3A 42 24 B2 42 24 AA |(I):. 850:B$.B$.|
00000910: 43 24 00 1A 11 E4 01 82 20 49 00 32 11 E6 01 8B |C$...... I.2....|
00000920: 20 4A 4A 24 B2 22 50 22 20 A7 20 98 34 2C 41 24 | JJ$."P" . .4,A$|
00000930: 42 24 00 3F 11 E8 01 82 20 4A 3A 89 35 37 31 00 |B$.?.... J:.571.|
00000940: 63 11 3B 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |c.;..***********|
00000950: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000960: 2A 2A 2A 00 87 11 3C 02 8F 2A 20 4E 45 58 54 20 |***...<..* NEXT |
00000970: 54 52 41 43 4B 20 41 4E 44 20 53 45 43 54 4F 52 |TRACK AND SECTOR|
00000980: 20 20 20 20 20 20 2A 00 AB 11 3D 02 8F 2A 2A 2A | *...=..***|
00000990: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000009A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 D6 11 3F 02 |***********...?.|
000009B0: 99 22 4E 45 58 54 20 54 52 41 43 4B 20 41 4E 44 |."NEXT TRACK AND|
000009C0: 20 53 45 43 54 4F 52 22 4E 42 28 31 29 4E 42 28 | SECTOR"NB(1)NB(|
000009D0: 32 29 20 22 11 22 00 19 12 44 02 99 22 44 4F 20 |2) "."...D.."DO |
000009E0: 59 4F 55 20 57 41 4E 54 20 4E 45 58 54 20 54 52 |YOU WANT NEXT TR|
000009F0: 41 43 4B 20 41 4E 44 20 53 45 43 54 4F 52 20 28 |ACK AND SECTOR (|
00000A00: 59 2F 4E 29 20 20 20 20 12 46 33 92 20 54 4F 20 |Y/N) .F3. TO |
00000A10: 45 4E 44 20 20 20 20 22 3B 00 2F 12 4E 02 A1 20 |END ";./.N.. |
00000A20: 5A 24 3A 8B 20 5A 24 B2 22 22 20 A7 35 39 30 00 |Z$:. Z$."" .590.|
00000A30: 53 12 58 02 8B 20 5A 24 B2 22 59 22 20 A7 20 54 |S.X.. Z$."Y" . T|
00000A40: B2 4E 42 28 31 29 3A 53 B2 4E 42 28 32 29 3A 89 |.NB(1):S.NB(2):.|
00000A50: 33 33 30 00 66 12 62 02 8B 20 5A 24 B2 22 4E 22 |330.f.b.. Z$."N"|
00000A60: 20 A7 20 33 32 30 00 74 12 67 02 8B 5A 24 B2 22 | . 320.t.g..Z$."|
00000A70: 86 22 A7 8A 00 7E 12 6C 02 89 20 35 39 30 00 A2 |."...~.l.. 590..|
00000A80: 12 76 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.v..************|
00000A90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000AA0: 2A 2A 00 C6 12 80 02 8F 2A 20 53 55 42 52 4F 55 |**......* SUBROU|
00000AB0: 54 49 4E 45 53 20 20 20 20 20 20 20 20 20 20 20 |TINES |
00000AC0: 20 20 20 20 20 2A 00 EA 12 8A 02 8F 2A 2A 2A 2A | *......****|
00000AD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000AE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 0E 13 94 02 8F |**********......|
00000AF0: 2A 20 45 52 52 4F 52 20 52 4F 55 54 49 4E 45 20 |* ERROR ROUTINE |
00000B00: 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 32 | *.2|
00000B10: 13 9E 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |....************|
00000B20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B30: 2A 2A 00 52 13 A8 02 84 31 35 2C 45 4E 2C 45 4D |**.R....15,EN,EM|
00000B40: 24 2C 45 54 2C 45 53 3A 8B 20 45 4E B2 30 20 A7 |$,ET,ES:. EN.0 .|
00000B50: 20 8E 00 72 13 B2 02 99 22 12 44 49 53 4B 20 45 | ..r....".DISK E|
00000B60: 52 52 4F 52 92 22 45 4E 2C 45 4D 24 2C 45 54 2C |RROR."EN,EM$,ET,|
00000B70: 45 53 00 78 13 BC 02 80 00 9C 13 C6 02 8F 2A 2A |ES.x..........**|
00000B80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 C0 13 D0 |************....|
00000BA0: 02 8F 2A 20 53 43 52 45 45 4E 20 43 4F 4E 54 49 |..* SCREEN CONTI|
00000BB0: 4E 55 45 20 4D 45 53 53 41 47 45 20 20 20 20 2A |NUE MESSAGE *|
00000BC0: 00 E4 13 DA 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |......**********|
00000BD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000BE0: 2A 2A 2A 2A 00 FE 13 E4 02 99 22 11 1D 1D 1D 1D |****......".....|
00000BF0: 43 4F 4E 54 49 4E 55 45 28 59 2F 4E 29 22 00 14 |CONTINUE(Y/N)"..|
00000C00: 14 EE 02 A1 5A 24 3A 8B 20 5A 24 B2 22 22 20 A7 |....Z$:. Z$."" .|
00000C10: 20 37 35 30 00 25 14 F8 02 8B 20 5A 24 B2 22 4E | 750.%.... Z$."N|
00000C20: 22 20 A7 20 8E 00 39 14 02 03 8B 20 5A 24 B3 B1 |" . ..9.... Z$..|
00000C30: 22 59 22 20 A7 20 37 35 30 00 5A 14 0C 03 99 22 |"Y" . 750.Z...."|
00000C40: 93 54 52 41 43 4B 22 20 54 20 22 20 53 45 43 54 |.TRACK" T " SECT|
00000C50: 4F 52 22 53 20 22 93 22 3A 8E 00 7E 14 16 03 8F |OR"S ".":..~....|
00000C60: 2A 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 00 A2 |**************..|
00000C80: 14 20 03 8F 2A 20 44 49 53 4B 20 42 59 54 45 20 |. ..* DISK BYTE |
00000C90: 54 4F 20 48 45 58 20 50 52 49 4E 54 20 20 20 20 |TO HEX PRINT |
00000CA0: 20 2A 00 C6 14 2A 03 8F 2A 2A 2A 2A 2A 2A 2A 2A | *...*..********|
00000CB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000CC0: 2A 2A 2A 2A 2A 2A 00 E9 14 34 03 41 31 B2 B5 28 |******...4.A1..(|
00000CD0: 4E AD 31 36 29 3A 41 24 B2 41 24 AA CA 28 48 58 |N.16):A$.A$..(HX|
00000CE0: 24 2C 41 31 AA 31 2C 31 29 00 0F 15 3E 03 41 32 |$,A1.1,1)...>.A2|
00000CF0: B2 B5 28 4E AB 31 36 AC 41 31 29 3A 41 24 B2 41 |..(N.16.A1):A$.A|
00000D00: 24 AA CA 28 48 58 24 2C 41 32 AA 31 2C 31 29 00 |$..(HX$,A2.1,1).|
00000D10: 1F 15 48 03 41 24 B2 41 24 AA 53 50 24 3A 8E 00 |..H.A$.A$.SP$:..|
00000D20: 43 15 52 03 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |C.R..***********|
00000D30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000D40: 2A 2A 2A 00 67 15 5C 03 8F 2A 20 44 49 53 4B 20 |***.g.\..* DISK |
00000D50: 42 59 54 45 20 54 4F 20 41 53 43 20 44 49 53 50 |BYTE TO ASC DISP|
00000D60: 4C 41 59 20 20 20 2A 00 8B 15 66 03 8F 2A 20 43 |LAY *...f..* C|
00000D70: 48 41 52 41 43 54 45 52 20 20 20 20 20 20 20 20 |HARACTER |
00000D80: 20 20 20 20 20 20 20 20 20 20 2A 00 AF 15 70 03 | *...p.|
00000D90: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000DA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000DB0: C9 15 7A 03 8B 20 C6 28 43 24 29 B3 33 32 20 A7 |..z.. .(C$).32 .|
00000DC0: 20 43 24 B2 22 20 22 3A 8E 00 E9 15 8E 03 8B 20 | C$." ":....... |
00000DD0: C6 28 43 24 29 B3 31 32 38 20 B0 20 C6 28 43 24 |.(C$).128 . .(C$|
00000DE0: 29 B1 31 35 39 20 A7 20 8E 00 09 16 98 03 43 24 |).159 . ......C$|
00000DF0: B2 CA 28 53 53 24 2C 33 AC 28 C6 28 43 24 29 AB |..(SS$,3.(.(C$).|
00000E00: 31 32 37 29 2C 33 29 3A 8E 00 29 16 E8 03 8F 20 |127),3):..).... |
00000E10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 53 43 41 4C 50 45 4C |*********SCALPEL|
00000E20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 5D 16 EA 03 42 4C |*********.]...BL|
00000E30: 24 B2 22 13 20 20 20 20 20 20 20 20 20 20 20 20 |$.". |
00000E40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E50: 20 20 20 20 20 20 20 20 20 20 20 13 22 00 7F 16 | ."...|
00000E60: EB 03 86 48 24 28 31 36 29 3A 48 24 B2 22 30 31 |...H$(16):H$."01|
00000E70: 32 33 34 35 36 37 38 39 41 42 43 44 45 46 22 00 |23456789ABCDEF".|
00000E80: A2 16 F2 03 99 22 93 22 A6 31 30 29 22 11 11 11 |.....".".10)"...|
00000E90: 12 53 43 41 4C 50 45 4C 92 20 28 4A 2E 4D 43 41 |.SCALPEL. (J.MCA|
00000EA0: 29 22 00 C6 16 FC 03 99 A6 36 29 22 11 11 28 46 |)".......6)"..(F|
00000EB0: 4F 52 20 44 49 53 4B 20 46 49 4C 45 20 53 55 52 |OR DISK FILE SUR|
00000EC0: 47 45 52 59 29 22 00 EB 16 FD 03 81 58 B2 30 A4 |GERY)"......X.0.|
00000ED0: 31 35 3A 48 24 28 58 29 B2 CA 28 48 24 2C 58 AA |15:H$(X)..(H$,X.|
00000EE0: 31 2C 31 29 3A 82 3A 45 43 B2 30 00 14 17 FE 03 |1,1):.:EC.0.....|
00000EF0: 99 20 A6 38 29 22 11 11 12 53 92 43 52 45 45 4E |. .8)"...S.CREEN|
00000F00: 20 4F 52 20 12 50 92 52 49 4E 54 45 52 20 3F 20 | OR .P.RINTER ? |
00000F10: 12 53 92 22 00 34 17 FF 03 99 A6 38 29 22 11 45 |.S.".4.....8)".E|
00000F20: 52 52 4F 52 20 12 43 92 48 45 43 4B 91 91 22 3B |RROR .C.HECK..";|
00000F30: A6 39 29 3B 00 48 17 00 04 A1 50 24 3A 8B 50 24 |.9);.H....P$:.P$|
00000F40: B2 22 22 A7 31 30 32 34 00 6A 17 01 04 99 22 53 |."".1024.j...."S|
00000F50: 9D 22 3B 3A 8B 50 24 B2 22 50 22 A7 50 B2 31 3A |.";:.P$."P".P.1:|
00000F60: 9F 34 2C 34 3A 99 22 50 22 3B 00 81 17 02 04 8B |.4,4:."P";......|
00000F70: 50 24 B2 22 43 22 A7 45 43 B2 31 3A 99 22 43 22 |P$."C".EC.1:."C"|
00000F80: 3B 00 B0 17 03 04 99 3A 99 A6 37 29 22 11 11 11 |;......:..7)"...|
00000F90: 11 12 42 92 4C 4F 43 4B 20 4F 52 20 44 49 53 4B |..B.LOCK OR DISK|
00000FA0: 20 12 4D 92 45 4D 4F 52 59 20 12 42 92 9D 22 3B | .M.EMORY .B..";|
00000FB0: 00 C4 17 04 04 A1 4D 24 3A 8B 4D 24 B2 22 22 A7 |......M$:.M$."".|
00000FC0: 31 30 32 38 00 E1 17 05 04 99 22 42 9D 22 3B 3A |1028......"B.";:|
00000FD0: 8B 4D 24 B2 22 4D 22 A7 4D B2 31 3A 99 22 4D 22 |.M$."M".M.1:."M"|
00000FE0: 3B 00 09 18 06 04 99 3A 8B 4D A7 99 A6 31 30 29 |;......:.M...10)|
00000FF0: 22 11 11 11 48 49 42 59 54 45 2C 4C 4F 42 59 54 |"...HIBYTE,LOBYT|
00001000: 45 22 3B 3A 89 31 30 33 35 00 25 18 07 04 99 A6 |E";:.1035.%.....|
00001010: 31 30 29 22 11 11 11 54 52 41 43 4B 2C 53 45 43 |10)"...TRACK,SEC|
00001020: 54 4F 52 22 3B 00 2E 18 0B 04 85 54 2C 53 00 53 |TOR";......T,S.S|
00001030: 18 10 04 9F 31 35 2C 38 2C 31 35 3A 8B 4D A7 4C |....15,8,15:.M.L|
00001040: 42 B2 53 3A 48 42 B2 54 3A 99 22 93 22 3A 89 31 |B.S:HB.T:.".":.1|
00001050: 30 39 30 00 62 18 1A 04 9F 33 2C 38 2C 33 2C 22 |090.b....3,8,3,"|
00001060: 23 22 00 7D 18 24 04 98 31 35 2C 22 55 31 3A 22 |#".}.$..15,"U1:"|
00001070: 33 3B 38 3B 54 3B 53 3A 99 22 93 22 3B 00 9D 18 |3;8;T;S:.".";...|
00001080: 2E 04 84 31 35 2C 41 24 2C 42 24 2C 43 24 2C 44 |...15,A$,B$,C$,D|
00001090: 24 3A 45 4E B2 C5 28 41 24 29 AA 45 43 00 BD 18 |$:EN..(A$).EC...|
000010A0: 38 04 99 22 12 22 54 22 9D 2C 22 53 22 9D 3A 22 |8.."."T".,"S".:"|
000010B0: 41 24 42 24 43 24 22 2C 22 44 24 20 22 00 EA 18 |A$B$C$","D$ "...|
000010C0: 39 04 8B 45 4E A7 99 A6 36 29 22 11 11 12 43 92 |9..EN...6)"...C.|
000010D0: 4F 4E 54 49 4E 55 45 20 4F 52 20 12 52 92 45 50 |ONTINUE OR .R.EP|
000010E0: 45 41 54 20 3F 20 12 43 92 22 00 1D 19 3A 04 8B |EAT ? .C."...:..|
000010F0: 45 4E A7 99 A6 36 29 22 11 11 12 53 92 43 41 4C |EN...6)"...S.CAL|
00001100: 50 45 4C 20 4D 45 4E 55 22 3A 99 A6 36 29 22 11 |PEL MENU":..6)".|
00001110: 11 12 4D 92 41 49 4E 20 4D 45 4E 55 22 00 37 19 |..M.AIN MENU".7.|
00001120: 3B 04 8B 45 4E A7 A1 41 4E 24 3A 8B 41 4E 24 B2 |;..EN..AN$:.AN$.|
00001130: 22 22 A7 31 30 38 33 00 4D 19 3D 04 8B 45 4E A7 |"".1083.M.=..EN.|
00001140: 8B 41 4E 24 B2 22 52 22 A7 31 30 36 30 00 6B 19 |.AN$."R".1060.k.|
00001150: 3F 04 8B 45 4E A7 8B 41 4E 24 B2 22 53 22 A7 A0 |?..EN..AN$."S"..|
00001160: 33 3A A0 31 35 3A 8A 31 30 30 30 00 85 19 40 04 |3:.15:.1000...@.|
00001170: 8B 45 4E A7 8B 41 4E 24 B2 22 4D 22 A7 A0 33 3A |.EN..AN$."M"..3:|
00001180: A0 31 35 3A 8A 00 9D 19 42 04 5A 24 B2 C7 28 30 |.15:....B.Z$..(0|
00001190: 29 3A 99 22 13 11 20 20 30 3A 20 22 3B 00 B0 19 |):.".. 0: ";...|
000011A0: 43 04 8B 50 A7 98 34 2C 22 20 20 30 3A 20 22 3B |C..P..4," 0: ";|
000011B0: 00 C4 19 60 04 81 59 B2 31 A4 32 32 3A 81 58 B2 |...`..Y.1.22:.X.|
000011C0: 31 A4 31 32 00 ED 19 6A 04 8B 4D A7 98 31 35 2C |1.12...j..M..15,|
000011D0: 22 4D 2D 52 22 C7 28 4C 42 29 C7 28 48 42 29 3A |"M-R".(LB).(HB):|
000011E0: A1 23 31 35 2C 44 24 3A 89 31 31 34 30 00 F8 19 |.#15,D$:.1140...|
000011F0: 6F 04 A1 23 33 2C 44 24 00 1A 1A 74 04 41 B2 C6 |o..#3,D$...t.A..|
00001200: 28 44 24 AA 5A 24 29 3A 48 B2 B5 28 41 AD 31 36 |(D$.Z$):H..(A.16|
00001210: 29 3A 4C B2 41 AB 48 AC 31 36 00 43 1A 92 04 99 |):L.A.H.16.C....|
00001220: 48 24 28 48 29 48 24 28 4C 29 22 20 22 3B 3A 8B |H$(H)H$(L)" ";:.|
00001230: 50 A7 98 34 2C 48 24 28 48 29 48 24 28 4C 29 22 |P..4,H$(H)H$(L)"|
00001240: 20 22 3B 00 67 1A 97 04 8B 4D A7 4C 42 B2 4C 42 | ";.g....M.LB.LB|
00001250: AA 31 3A 8B 4C 42 B2 32 35 36 A7 4C 42 B2 30 3A |.1:.LB.256.LB.0:|
00001260: 48 42 B2 48 42 AA 31 00 7D 1A 9C 04 44 B2 44 AA |HB.HB.1.}...D.D.|
00001270: 31 3A 8B 44 B2 32 35 36 A7 31 32 30 30 00 96 1A |1:.D.256.1200...|
00001280: A6 04 82 3A 99 22 9D 22 C9 28 C4 28 44 29 2C 33 |...:.".".(.(D),3|
00001290: 29 22 3A 20 22 3B 00 B4 1A A8 04 8B 50 A7 98 34 |)": ";......P..4|
000012A0: 2C C7 28 31 33 29 C9 28 C4 28 44 29 2C 33 29 22 |,.(13).(.(D),3)"|
000012B0: 3A 20 22 3B 00 BA 1A AB 04 82 00 CD 1A B0 04 8B |: ";............|
000012C0: 50 A7 98 34 2C C7 28 31 33 29 3A A0 34 00 D8 1A |P..4,.(13):.4...|
000012D0: B5 04 8B A8 4D A7 A0 33 00 E0 1A B6 04 A0 31 35 |....M..3......15|
000012E0: 00 1C 1B BA 04 99 C7 28 31 33 29 22 12 46 31 92 |.......(13)".F1.|
000012F0: 3D 41 47 41 49 4E 20 12 46 32 92 3D 57 52 49 54 |=AGAIN .F2.=WRIT|
00001300: 45 20 12 46 33 92 3D 51 55 49 54 20 12 46 34 92 |E .F3.=QUIT .F4.|
00001310: 3D 58 46 45 52 20 42 4C 4B 20 22 3B 00 44 1B BF |=XFER BLK ";.D..|
00001320: 04 99 A6 34 29 22 12 46 35 92 2F 12 46 36 92 20 |...4)".F5./.F6. |
00001330: 4F 4E 2F 4F 46 46 20 4D 45 4D 4F 52 59 20 4D 4F |ON/OFF MEMORY MO|
00001340: 44 45 22 3B 00 6A 1B C4 04 50 B2 31 30 32 34 AA |DE";.j...P.1024.|
00001350: 33 39 AA 36 3A 53 43 B2 31 30 32 34 3A 45 B2 31 |39.6:SC.1024:E.1|
00001360: 39 31 39 3A 42 B2 31 30 36 39 00 A8 1B E2 04 A1 |919:B.1069......|
00001370: 4B 24 3A 8B 4B 24 B2 22 22 A7 43 B2 C2 28 50 29 |K$:.K$."".C..(P)|
00001380: 3A 97 50 2C 43 AA 31 32 38 3A 81 49 B2 30 A4 34 |:.P,C.128:.I.0.4|
00001390: 30 3A 82 3A 97 50 2C 43 3A 81 49 B2 30 A4 34 30 |0:.:.P,C:.I.0.40|
000013A0: 3A 82 3A 89 31 32 35 30 00 BA 1B EC 04 8B 4B 24 |:.:.1250......K$|
000013B0: B2 22 85 22 A7 8A 31 30 30 30 00 CA 1B ED 04 8B |."."..1000......|
000013C0: 4B 24 B2 22 87 22 A7 4D B2 31 00 DA 1B EE 04 8B |K$.".".M.1......|
000013D0: 4B 24 B2 22 8B 22 A7 4D B2 30 00 EB 1B EF 04 8B |K$.".".M.0......|
000013E0: 4B 24 B2 22 89 22 A7 31 35 30 30 00 F9 1B F1 04 |K$.".".1500.....|
000013F0: 8B 4B 24 B2 22 86 22 A7 8A 00 1F 1C F2 04 8B 4B |.K$."."........K|
00001400: 24 B2 22 8A 22 A7 99 42 4C 24 3B 3A 99 22 54 52 |$."."..BL$;:."TR|
00001410: 41 43 4B 2C 53 45 43 54 4F 52 20 3F 20 22 3B 00 |ACK,SECTOR ? ";.|
00001420: 49 1C F3 04 8B 4B 24 B2 22 8A 22 A7 8B 4D A7 99 |I....K$."."..M..|
00001430: 42 4C 24 3B 3A 99 22 48 49 42 59 54 45 2C 4C 4F |BL$;:."HIBYTE,LO|
00001440: 42 59 54 45 20 3F 20 22 3B 00 6A 1C F5 04 8B 4B |BYTE ? ";.j....K|
00001450: 24 B2 22 8A 22 A7 9F 36 2C 30 3A 84 36 2C 54 2C |$."."..6,0:.6,T,|
00001460: 53 3A A0 36 3A 89 31 35 30 30 00 80 1C F6 04 8B |S:.6:.1500......|
00001470: 4B 24 B2 22 1D 22 AF 50 B3 45 A7 50 B2 50 AA 31 |K$.".".P.E.P.P.1|
00001480: 00 96 1C F7 04 8B 4B 24 B2 22 9D 22 AF 50 B1 42 |......K$.".".P.B|
00001490: A7 50 B2 50 AB 31 00 BA 1C FB 04 50 31 B2 50 AB |.P.P.1.....P1.P.|
000014A0: 53 43 3A 50 49 B2 34 30 AC B5 28 50 31 AD 34 30 |SC:PI.40..(P1.40|
000014B0: 29 3A 50 44 B2 50 31 AB 50 49 00 D7 1C FD 04 8B |):PD.P1.PI......|
000014C0: 4B 24 B2 22 9D 22 AF 50 44 B3 35 A7 50 B2 50 AB |K$.".".PD.5.P.P.|
000014D0: 35 3A 89 31 32 35 30 00 EE 1C FE 04 8B 50 44 B3 |5:.1250......PD.|
000014E0: 35 A7 20 50 B2 50 AA 35 3A 89 31 32 35 30 00 1D |5. P.P.5:.1250..|
000014F0: 1D FF 04 8B 4B 24 B3 B1 22 9D 22 A7 8B 28 50 44 |....K$.."."..(PD|
00001500: AB 37 29 AD 33 B2 B5 28 28 50 44 AB 37 29 AD 33 |.7).3..((PD.7).3|
00001510: 29 A7 50 B2 50 AA 31 3A 89 31 32 35 30 00 3F 1D |).P.P.1:.1250.?.|
00001520: 00 05 8B 4B 24 B2 22 11 22 AF 50 B3 28 45 AB 33 |...K$.".".P.(E.3|
00001530: 39 29 A7 50 B2 50 AA 34 30 3A 89 31 32 35 30 00 |9).P.P.40:.1250.|
00001540: 61 1D 0A 05 8B 4B 24 B2 22 91 22 AF 50 B1 28 42 |a....K$.".".P.(B|
00001550: AA 33 39 29 A7 50 B2 50 AB 34 30 3A 89 31 32 35 |.39).P.P.40:.125|
00001560: 30 00 6D 1D 14 05 4B B2 C6 28 4B 24 29 00 84 1D |0.m...K..(K$)...|
00001570: 1E 05 8B 4B B2 33 32 A7 4B 24 B2 22 1D 22 3A 89 |...K.32.K$.".":.|
00001580: 31 32 37 30 00 A5 1D 28 05 8B 4B B1 34 37 AF 4B |1270...(..K.47.K|
00001590: B3 35 38 A7 97 50 2C 4B 3A 4B 24 B2 22 1D 22 3A |.58..P,K:K$.".":|
000015A0: 89 31 32 37 30 00 C9 1D 32 05 8B 4B B1 36 34 AF |.1270...2..K.64.|
000015B0: 4B B3 37 31 A7 97 50 2C 4B AB 36 34 3A 4B 24 B2 |K.71..P,K.64:K$.|
000015C0: 22 1D 22 3A 89 31 32 37 30 00 D3 1D AA 05 89 31 |".":.1270......1|
000015D0: 32 35 30 00 F4 1D DC 05 3A 99 42 4C 24 22 12 57 |250.....:.BL$".W|
000015E0: 52 49 54 49 4E 47 22 3B 54 22 9D 2C 22 53 22 9D |RITING";T".,"S".|
000015F0: 20 92 22 3B 00 18 1E 0E 06 9F 31 35 2C 38 2C 31 | .";......15,8,1|
00001600: 35 3A 8B 4D A7 4C 42 B2 53 3A 48 42 B2 54 3A 50 |5:.M.LB.S:HB.T:P|
00001610: B2 42 3A 89 31 35 37 30 00 27 1E 13 06 9F 36 2C |.B:.1570.'....6,|
00001620: 38 2C 36 2C 22 23 22 00 3D 1E 18 06 98 31 35 2C |8,6,"#".=....15,|
00001630: 22 42 2D 50 3A 22 36 3B 30 3A 50 B2 42 00 64 1E |"B-P:"6;0:P.B.d.|
00001640: 22 06 81 59 B2 31 A4 32 32 3A 81 58 B2 31 A4 31 |"..Y.1.22:.X.1.1|
00001650: 32 3A 8B 50 B1 45 A7 50 B2 30 3A 44 B2 30 3A 89 |2:.P.E.P.0:D.0:.|
00001660: 31 36 39 31 00 88 1E 40 06 43 48 B2 C2 28 50 29 |1691...@.CH..(P)|
00001670: 3A 43 4C B2 C2 28 50 AA 31 29 3A 97 50 2C 33 32 |:CL..(P.1):.P,32|
00001680: 3A 97 50 AA 31 2C 33 32 00 A0 1E 5E 06 8B 43 48 |:.P.1,32...^..CH|
00001690: B1 34 37 A7 48 B2 31 36 AC 28 43 48 AB 34 38 29 |.47.H.16.(CH.48)|
000016A0: 00 B3 1E 68 06 8B 43 4C B1 34 37 A7 4C B2 43 4C |...h..CL.47.L.CL|
000016B0: AB 34 38 00 C9 1E 72 06 8B 43 48 B3 37 A7 48 B2 |.48...r..CH.7.H.|
000016C0: 31 36 AC 28 39 AA 43 48 29 00 DA 1E 7C 06 8B 43 |16.(9.CH)...|..C|
000016D0: 4C B3 37 A7 4C B2 39 AA 43 4C 00 00 1F 81 06 8B |L.7.L.9.CL......|
000016E0: 4D A7 3A 98 31 35 2C 22 4D 2D 57 22 C7 28 4C 42 |M.:.15,"M-W".(LB|
000016F0: 29 C7 28 48 42 29 C7 28 31 29 C7 28 48 AA 4C 29 |).(HB).(1).(H.L)|
00001700: 00 2A 1F 82 06 8B 4D A7 4C 42 B2 4C 42 AA 31 3A |.*....M.LB.LB.1:|
00001710: 8B 4C 42 B2 32 35 36 A7 4C 42 B2 30 3A 48 42 B2 |.LB.256.LB.0:HB.|
00001720: 48 42 AA 31 3A 89 31 36 38 30 00 36 1F 83 06 8B |HB.1:.1680.6....|
00001730: 4D A7 31 36 38 30 00 45 1F 86 06 98 36 2C C7 28 |M.1680.E....6,.(|
00001740: 48 AA 4C 29 3B 00 4F 1F 90 06 50 B2 50 AA 33 00 |H.L);.O...P.P.3.|
00001750: 5D 1F 9A 06 82 3A 50 B2 50 AA 34 3A 82 00 6E 1F |]....:P.P.4:..n.|
00001760: 9B 06 8B 4D A7 A0 31 35 3A 89 31 30 34 30 00 83 |...M..15:.1040..|
00001770: 1F A4 06 98 31 35 2C 22 55 32 3A 22 36 3B 38 3B |....15,"U2:"6;8;|
00001780: 54 3B 53 00 97 1F D6 06 84 31 35 2C 41 24 2C 42 |T;S......15,A$,B|
00001790: 24 2C 43 24 2C 44 24 00 C4 1F 08 07 99 42 4C 24 |$,C$,D$......BL$|
000017A0: 22 12 22 54 22 9D 2C 22 53 22 9D 3A 22 41 24 42 |"."T".,"S".:"A$B|
000017B0: 24 43 24 22 2C 22 44 24 22 20 28 57 52 49 54 45 |$C$","D$" (WRITE|
000017C0: 29 20 92 22 00 D3 1F 1C 07 A0 36 3A A0 31 35 3A |) ."......6:.15:|
000017D0: 44 B2 30 00 EB 1F 3A 07 9F 31 35 2C 38 2C 31 35 |D.0...:..15,8,15|
000017E0: 3A 9F 33 2C 38 2C 33 2C 22 23 22 00 00 20 44 07 |:.3,8,3,"#".. D.|
000017F0: 98 31 35 2C 22 55 31 3A 22 33 3B 38 3B 54 3B 53 |.15,"U1:"3;8;T;S|
00001800: 00 30 20 45 07 84 31 35 2C 41 24 2C 42 24 2C 43 |.0 E..15,A$,B$,C|
00001810: 24 2C 44 24 3A 44 24 B2 44 24 AA 22 20 52 45 41 |$,D$:D$.D$." REA|
00001820: 44 42 41 43 4B 20 22 3A 45 4E B2 C5 28 41 24 29 |DBACK ":EN..(A$)|
00001830: 00 3A 20 6C 07 89 31 30 38 30 00 82 20 D0 07 99 |.: l..1080.. ...|
00001840: 22 93 22 A6 39 29 22 11 11 54 52 41 43 45 20 4C |".".9)"..TRACE L|
00001850: 49 4E 4B 53 20 28 4A 20 4D 43 41 29 11 11 11 11 |INKS (J MCA)....|
00001860: 22 3A 99 A6 39 29 22 11 11 11 91 91 12 53 92 43 |":..9)"......S.C|
00001870: 52 45 45 4E 20 4F 52 20 12 50 92 52 49 4E 54 45 |REEN OR .P.RINTE|
00001880: 52 22 00 9A 20 D1 07 A1 41 4E 53 24 3A 8B 41 4E |R".. ...ANS$:.AN|
00001890: 53 24 B2 22 22 A7 32 30 30 31 00 CC 20 D2 07 99 |S$."".2001.. ...|
000018A0: 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 12 4E 92 41 4D |"...........N.AM|
000018B0: 45 20 28 2A 29 20 20 4F 52 20 20 12 54 92 52 41 |E (*) OR .T.RA|
000018C0: 43 4B 20 26 20 53 45 43 54 4F 52 22 00 E2 20 D3 |CK & SECTOR".. .|
000018D0: 07 A1 52 45 24 3A 8B 52 45 24 B2 22 22 A7 32 30 |..RE$:.RE$."".20|
000018E0: 30 33 00 F4 20 D4 07 8B 52 45 24 B2 22 54 22 A7 |03.. ...RE$."T".|
000018F0: 32 30 31 30 00 2D 21 D5 07 99 22 11 11 11 11 1D |2010.-!...".....|
00001900: 1D 1D 1D 1D 1D 1D 1D 4E 41 4D 45 28 2A 29 22 3B |.......NAME(*)";|
00001910: 3A 85 4E 41 24 3A 8B 4E 41 24 B2 22 24 22 A7 54 |:.NA$:.NA$."$".T|
00001920: B2 31 38 3A 53 B2 31 3A 89 32 30 31 32 00 48 21 |.18:S.1:.2012.H!|
00001930: D6 07 9F 31 35 2C 38 2C 31 35 3A 9F 31 2C 38 2C |...15,8,15:.1,8,|
00001940: 33 2C 4E 41 24 3A A0 31 00 72 21 D7 07 98 31 35 |3,NA$:.1.r!...15|
00001950: 2C 22 4D 2D 52 22 C7 28 32 34 29 C7 28 30 29 C7 |,"M-R".(24).(0).|
00001960: 28 32 29 3A A1 23 31 35 2C 54 24 2C 53 24 3A A0 |(2):.#15,T$,S$:.|
00001970: 31 35 00 90 21 D8 07 54 B2 C6 28 54 24 AA C7 28 |15..!..T..(T$..(|
00001980: 30 29 29 3A 53 B2 C6 28 53 24 AA C7 28 30 29 29 |0)):S..(S$..(0))|
00001990: 00 9A 21 D9 07 89 32 30 31 32 00 BC 21 DA 07 99 |..!...2012..!...|
000019A0: 22 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 54 52 |".............TR|
000019B0: 41 43 4B 2C 53 45 43 54 4F 52 22 3B 00 C5 21 DB |ACK,SECTOR";..!.|
000019C0: 07 85 54 2C 53 00 D8 21 DC 07 8B 41 4E 53 24 B2 |..T,S..!...ANS$.|
000019D0: 22 53 22 A7 32 32 30 30 00 EA 21 DF 07 9F 31 35 |"S".2200..!...15|
000019E0: 2C 38 2C 31 35 3A 9F 34 2C 34 00 F9 21 E4 07 9F |,8,15:.4,4..!...|
000019F0: 33 2C 38 2C 33 2C 22 23 22 00 0E 22 EE 07 98 31 |3,8,3,"#".."...1|
00001A00: 35 2C 22 55 31 3A 22 33 3B 38 3B 54 3B 53 00 28 |5,"U1:"3;8;T;S.(|
00001A10: 22 F8 07 84 31 35 2C 41 24 2C 42 24 2C 43 24 2C |"...15,A$,B$,C$,|
00001A20: 44 24 3A 42 B2 42 AA 31 00 53 22 02 08 98 34 2C |D$:B.B.1.S"...4,|
00001A30: 22 42 4C 4B 23 22 42 22 3A 22 54 22 2C 22 53 3B |"BLK#"B":"T","S;|
00001A40: 22 20 22 41 24 3B 42 24 3B 43 24 3B 44 24 22 20 |" "A$;B$;C$;D$" |
00001A50: 20 22 3B 00 7B 22 2A 08 A1 23 33 2C 54 24 2C 53 | ";.{"*..#3,T$,S|
00001A60: 24 3A 54 B2 C6 28 54 24 AA C7 28 30 29 29 3A 53 |$:T..(T$..(0)):S|
00001A70: B2 C6 28 53 24 AA C7 28 30 29 29 00 89 22 2F 08 |..(S$..(0)).."/.|
00001A80: 98 34 2C 54 3B 22 2C 22 53 00 97 22 30 08 8B 54 |.4,T;","S.."0..T|
00001A90: B2 30 A7 32 31 32 30 00 A1 22 34 08 89 32 30 33 |.0.2120.."4..203|
00001AA0: 30 00 B4 22 48 08 98 34 3A A0 34 3A A0 33 3A A0 |0.."H..4:.4:.3:.|
00001AB0: 31 35 3A 8A 00 BA 22 98 08 3A 00 ED 22 A7 08 99 |15:..."..:.."...|
00001AC0: 22 1D 1D 1D 11 11 11 48 4F 4C 44 20 44 4F 57 4E |"......HOLD DOWN|
00001AD0: 20 53 48 49 46 54 20 4B 45 59 20 54 4F 20 53 54 | SHIFT KEY TO ST|
00001AE0: 4F 50 20 53 43 52 4F 4C 4C 11 11 11 22 00 FA 22 |OP SCROLL...".."|
00001AF0: AC 08 9F 31 35 2C 38 2C 31 35 00 09 23 B6 08 9F |...15,8,15..#...|
00001B00: 33 2C 38 2C 33 2C 22 23 22 00 1E 23 C0 08 98 31 |3,8,3,"#"..#...1|
00001B10: 35 2C 22 55 31 3A 22 33 3B 38 3B 54 3B 53 00 32 |5,"U1:"3;8;T;S.2|
00001B20: 23 CA 08 84 31 35 2C 41 24 2C 42 24 2C 43 24 2C |#...15,A$,B$,C$,|
00001B30: 44 24 00 49 23 CF 08 42 B2 42 AA 31 3A 99 22 42 |D$.I#..B.B.1:."B|
00001B40: 4C 4B 23 22 42 22 3A 22 3B 00 68 23 D4 08 99 54 |LK#"B":";.h#...T|
00001B50: 22 2C 22 53 3B 22 20 22 41 24 3B 42 24 3B 43 24 |","S;" "A$;B$;C$|
00001B60: 3B 44 24 22 20 20 22 3B 00 90 23 DE 08 A1 23 33 |;D$" ";..#...#3|
00001B70: 2C 54 24 2C 53 24 3A 54 B2 C6 28 54 24 AA C7 28 |,T$,S$:T..(T$..(|
00001B80: 30 29 29 3A 53 B2 C6 28 53 24 AA C7 28 30 29 29 |0)):S..(S$..(0))|
00001B90: 00 9C 23 E8 08 99 54 3B 22 2C 22 53 00 AA 23 F2 |..#...T;","S..#.|
00001BA0: 08 8B 54 B2 30 A7 32 33 31 30 00 BD 23 F7 08 8B |..T.0.2310..#...|
00001BB0: C2 28 36 35 34 29 B2 31 A7 32 32 39 35 00 C7 23 |.(654).1.2295..#|
00001BC0: FC 08 89 32 32 34 30 00 D2 23 06 09 A0 33 3A A0 |...2240..#...3:.|
00001BD0: 31 35 00 F3 23 10 09 99 22 11 12 46 33 92 20 54 |15..#..."..F3. T|
00001BE0: 4F 20 45 4E 44 20 20 12 46 31 92 3D 41 47 41 49 |O END .F1.=AGAI|
00001BF0: 4E 22 3B 00 0B 24 15 09 A1 41 4E 53 24 3A 8B 41 |N";..$...ANS$:.A|
00001C00: 4E 53 24 B2 22 22 A7 32 33 32 35 00 1F 24 1A 09 |NS$."".2325..$..|
00001C10: 8B 41 4E 53 24 B2 22 85 22 A7 8A 32 30 30 30 00 |.ANS$."."..2000.|
00001C20: 2F 24 1F 09 8B 41 4E 53 24 B2 22 86 22 A7 8A 00 |/$...ANS$."."...|
00001C30: 39 24 24 09 89 32 33 32 35 00 64 24 B8 0B 99 20 |9$$..2325.d$... |
00001C40: 22 93 12 44 49 53 50 4C 41 59 20 27 4C 4F 41 44 |"..DISPLAY 'LOAD|
00001C50: 20 41 44 44 52 45 53 53 27 20 4F 46 20 41 20 46 | ADDRESS' OF A F|
00001C60: 49 4C 45 22 00 78 24 C7 0B 99 20 22 11 46 49 4C |ILE".x$... ".FIL|
00001C70: 45 20 22 3B 3A 85 46 24 00 90 24 CA 0B 99 20 22 |E ";:.F$..$... "|
00001C80: 11 4C 4F 41 44 20 41 44 44 52 45 53 53 3A 22 3B |.LOAD ADDRESS:";|
00001C90: 00 A3 24 CC 0B 9F 31 2C 38 2C 33 2C 22 30 3A 22 |..$...1,8,3,"0:"|
00001CA0: AA 46 24 00 B2 24 D6 0B A1 20 23 31 2C 4C 24 2C |.F$..$... #1,L$,|
00001CB0: 48 24 00 CA 24 EA 0B 58 24 B2 48 24 3A 8D 33 31 |H$..$..X$.H$:.31|
00001CC0: 30 30 3A 48 B2 58 AC 32 35 36 00 E3 24 F4 0B 58 |00:H.X.256..$..X|
00001CD0: 24 B2 4C 24 3A 8D 33 31 30 30 3A 4C B2 58 3A 99 |$.L$:.3100:L.X:.|
00001CE0: 48 AA 4C 00 02 25 08 0C A0 31 3A 99 22 11 12 46 |H.L..%...1:."..F|
00001CF0: 31 92 20 41 47 41 49 4E 20 20 12 46 33 92 20 45 |1. AGAIN .F3. E|
00001D00: 4E 44 00 1A 25 12 0C A1 41 4E 53 24 3A 8B 41 4E |ND..%...ANS$:.AN|
00001D10: 53 24 B2 22 22 A7 33 30 39 30 00 2E 25 15 0C 8B |S$."".3090..%...|
00001D20: 41 4E 53 24 B2 22 85 22 A7 8A 33 30 30 30 00 3E |ANS$."."..3000.>|
00001D30: 25 16 0C 8B 41 4E 53 24 B2 22 86 22 A7 8A 00 48 |%...ANS$."."...H|
00001D40: 25 17 0C 89 33 30 39 30 00 5C 25 1C 0C 8B 20 58 |%...3090.\%... X|
00001D50: 24 B2 22 22 20 A7 20 58 B2 30 3A 8E 00 6A 25 26 |$."" . X.0:..j%&|
00001D60: 0C 58 B2 C6 28 58 24 29 3A 8E 00 86 25 A0 0F 8F |.X..(X$):...%...|
00001D70: 2A 2A 2A 2A 2A 20 38 4B 20 43 4F 50 59 20 2A 2A |***** 8K COPY **|
00001D80: 2A 2A 2A 2A 2A 2A 00 AB 25 AA 0F 8B C2 28 35 36 |******..%....(56|
00001D90: 29 B3 B1 31 32 37 A7 97 35 36 2C 31 32 37 3A 41 |)..127..56,127:A|
00001DA0: B2 B8 28 30 29 3A 8A 34 30 31 30 00 DF 25 AF 0F |..(0):.4010..%..|
00001DB0: 42 4C 24 B2 22 13 20 20 20 20 20 20 20 20 20 20 |BL$.". |
00001DC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001DD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 13 22 00 | .".|
00001DE0: 02 26 B4 0F 99 22 93 22 A6 31 30 29 22 11 11 11 |.&...".".10)"...|
00001DF0: 12 43 4F 50 59 2A 38 2A 92 20 28 4A 2E 4D 43 41 |.COPY*8*. (J.MCA|
00001E00: 29 22 00 2D 26 B9 0F 99 A6 36 29 22 11 11 28 43 |)".-&....6)"..(C|
00001E10: 4F 50 49 45 53 20 38 4B 20 4F 46 20 44 49 53 4B |OPIES 8K OF DISK|
00001E20: 20 44 41 54 41 29 22 3A 8D 34 35 30 30 00 51 26 | DATA)":.4500.Q&|
00001E30: BE 0F 99 A6 36 29 22 11 11 11 53 54 41 52 54 20 |....6)"...START |
00001E40: 41 54 20 54 52 41 43 4B 2C 53 45 43 54 4F 52 22 |AT TRACK,SECTOR"|
00001E50: 3B 00 7B 26 C8 0F 85 54 2C 53 3A 54 53 B2 54 3A |;.{&...T,S:TS.T:|
00001E60: 53 53 B2 53 3A 53 41 B2 33 32 37 36 38 3A 5A 24 |SS.S:SA.32768:Z$|
00001E70: B2 C7 28 30 29 3A 41 44 B2 53 41 00 93 26 D2 0F |..(0):AD.SA..&..|
00001E80: 9F 31 35 2C 38 2C 31 35 3A 9F 33 2C 38 2C 33 2C |.15,8,15:.3,8,3,|
00001E90: 22 23 22 00 A0 26 D7 0F 81 42 4B B2 31 A4 33 32 |"#"..&...BK.1.32|
00001EA0: 00 B5 26 DC 0F 98 31 35 2C 22 55 31 3A 22 33 3B |..&...15,"U1:"3;|
00001EB0: 38 3B 54 3B 53 00 C8 26 E6 0F 84 31 35 2C 41 2C |8;T;S..&...15,A,|
00001EC0: 42 24 2C 43 24 2C 44 24 00 01 27 F0 0F 99 22 93 |B$,C$,D$..'...".|
00001ED0: 12 22 54 22 9D 2C 22 53 22 9D 3A 22 41 22 9D 22 |."T".,"S".:"A"."|
00001EE0: 42 24 43 24 22 2C 22 44 24 22 20 53 54 3A 22 53 |B$C$","D$" ST:"S|
00001EF0: 54 22 9D 20 42 4C 4F 43 4B 23 20 22 42 4B 22 92 |T". BLOCK# "BK".|
00001F00: 22 00 15 27 FA 0F 8B 41 B2 30 A7 45 53 B2 30 3A |"..'...A.0.ES.0:|
00001F10: 89 34 31 31 30 00 2C 27 04 10 45 53 24 B2 22 52 |.4110.,'..ES$."R|
00001F20: 22 3A 45 53 B2 31 3A 89 34 32 30 30 00 40 27 0E |":ES.1:.4200.@'.|
00001F30: 10 54 4C B2 54 3A 53 4C B2 53 3A 42 4C B2 42 4B |.TL.T:SL.S:BL.BK|
00001F40: 00 64 27 13 10 A1 23 33 2C 54 24 2C 53 24 3A 54 |.d'...#3,T$,S$:T|
00001F50: B2 C6 28 54 24 AA 5A 24 29 3A 53 B2 C6 28 53 24 |..(T$.Z$):S..(S$|
00001F60: AA 5A 24 29 00 73 27 18 10 8B 54 B2 30 A7 42 4B |.Z$).s'...T.0.BK|
00001F70: B2 33 32 00 97 27 22 10 97 41 44 2C 54 3A 41 44 |.32..'"..AD,T:AD|
00001F80: B2 41 44 AA 31 3A 97 41 44 2C 53 3A 97 38 34 30 |.AD.1:.AD,S:.840|
00001F90: 2C 31 32 37 AA 42 4C 00 A0 27 2C 10 9E 38 32 38 |,127.BL..',..828|
00001FA0: 00 B2 27 40 10 41 44 B2 41 44 AA 32 35 35 3A 82 |..'@.AD.AD.255:.|
00001FB0: 42 4B 00 E4 27 68 10 99 3A 99 22 11 11 11 11 11 |BK..'h..:.".....|
00001FC0: 11 11 11 11 11 11 11 11 4C 41 53 54 20 42 4C 4F |........LAST BLO|
00001FD0: 43 4B 20 53 55 43 45 53 53 46 55 4C 59 20 52 45 |CK SUCESSFULY RE|
00001FE0: 41 44 3A 22 00 07 28 69 10 99 22 54 52 41 43 4B |AD:"..(i.."TRACK|
00001FF0: 22 54 4C 22 53 45 43 54 4F 52 22 53 4C 22 42 4C |"TL"SECTOR"SL"BL|
00002000: 4F 43 4B 23 22 42 4C 00 26 28 6A 10 8B 45 53 B2 |OCK#"BL.&(j..ES.|
00002010: 30 20 A7 20 99 22 11 4E 4F 20 52 45 41 44 20 45 |0 . .".NO READ E|
00002020: 52 52 4F 52 53 22 00 49 28 6B 10 8B 45 53 B2 31 |RRORS".I(k..ES.1|
00002030: A7 99 22 11 53 54 4F 50 45 44 20 42 59 20 52 45 |..".STOPED BY RE|
00002040: 41 44 20 45 52 52 4F 52 22 00 6E 28 6D 10 99 22 |AD ERROR".n(m.."|
00002050: 11 45 58 43 48 41 4E 47 45 20 44 49 53 4B 53 20 |.EXCHANGE DISKS |
00002060: 12 46 31 92 20 54 4F 20 57 52 49 54 45 22 00 79 |.F1. TO WRITE".y|
00002070: 28 72 10 A0 33 3A A0 31 35 00 8F 28 7C 10 A1 41 |(r..3:.15..(|..A|
00002080: 4E 24 3A 8B 41 4E 24 B2 22 22 A7 34 32 32 30 00 |N$:.AN$."".4220.|
00002090: 9F 28 86 10 8B 41 4E 24 B3 B1 22 85 22 A7 90 00 |.(...AN$.."."...|
000020A0: B3 28 90 10 41 44 B2 53 41 3A 54 B2 54 53 3A 53 |.(..AD.SA:T.TS:S|
000020B0: B2 53 53 00 CB 28 9A 10 9F 31 35 2C 38 2C 31 35 |.SS..(...15,8,15|
000020C0: 3A 9F 36 2C 38 2C 36 2C 22 23 22 00 D7 28 A4 10 |:.6,8,6,"#"..(..|
000020D0: 81 58 B2 31 A4 42 4C 00 E9 28 AE 10 98 31 35 2C |.X.1.BL..(...15,|
000020E0: 22 42 2D 50 3A 22 36 3B 30 00 07 29 B8 10 54 4E |"B-P:"6;0..)..TN|
000020F0: B2 C2 28 41 44 29 3A 41 44 B2 41 44 AA 31 3A 53 |..(AD):AD.AD.1:S|
00002100: 4E B2 C2 28 41 44 29 00 16 29 C2 10 97 38 35 37 |N..(AD)..)...857|
00002110: 2C 31 32 37 AA 58 00 1F 29 CC 10 9E 38 34 38 00 |,127.X..)...848.|
00002120: 2D 29 D6 10 41 44 B2 41 44 AA 32 35 35 00 42 29 |-)..AD.AD.255.B)|
00002130: EA 10 98 31 35 2C 22 55 32 3A 22 36 3B 38 3B 54 |...15,"U2:"6;8;T|
00002140: 3B 53 00 55 29 F4 10 84 31 35 2C 41 2C 42 24 2C |;S.U)...15,A,B$,|
00002150: 43 24 2C 44 24 00 90 29 FE 10 99 42 4C 24 22 12 |C$,D$..)...BL$".|
00002160: 22 54 22 9D 2C 22 53 22 9D 3A 22 41 22 9D 22 42 |"T".,"S".:"A"."B|
00002170: 24 43 24 22 2C 22 44 24 22 20 53 54 3A 22 53 54 |$C$","D$" ST:"ST|
00002180: 22 9D 20 42 4C 4F 43 4B 23 20 9D 22 58 22 92 22 |". BLOCK# ."X"."|
00002190: 00 A5 29 00 11 81 4C B2 30 A4 4E 45 3A 8B 4E 45 |..)...L.0.NE:.NE|
000021A0: B3 B1 30 A7 99 00 AB 29 01 11 82 00 CB 29 03 11 |..0....).....)..|
000021B0: 8B 41 B3 B1 30 A7 99 22 45 52 52 4F 52 22 54 22 |.A..0.."ERROR"T"|
000021C0: 2C 22 53 3A 4E 45 B2 4E 45 AA 31 00 DB 29 08 11 |,"S:NE.NE.1..)..|
000021D0: 54 B2 54 4E 3A 53 B2 53 4E 3A 82 00 F7 29 12 11 |T.TN:S.SN:...)..|
000021E0: A0 36 3A A0 31 35 3A 97 35 36 2C 31 36 30 3A 9C |.6:.15:.56,160:.|
000021F0: 3A 46 B2 B8 28 30 29 00 16 2A 1C 11 99 3A 99 22 |:F..(0)..*...:."|
00002200: 12 46 31 92 3D 41 47 41 49 4E 20 20 12 46 33 92 |.F1.=AGAIN .F3.|
00002210: 3D 45 4E 44 22 3B 00 2C 2A 26 11 A1 41 4E 24 3A |=END";.,*&..AN$:|
00002220: 8B 41 4E 24 B2 22 22 A7 34 33 39 30 00 3F 2A 30 |.AN$."".4390.?*0|
00002230: 11 8B 41 4E 24 B2 22 85 22 A7 8A 34 30 31 30 00 |..AN$."."..4010.|
00002240: 45 2A 3A 11 8A 00 5E 2A 94 11 81 41 B2 38 32 38 |E*:...^*...A.828|
00002250: A4 38 36 37 3A 87 42 3A 97 41 2C 42 3A 82 00 A9 |.867:.B:.A,B:...|
00002260: 2A 9E 11 83 20 31 36 32 2C 33 2C 33 32 2C 31 39 |*... 162,3,32,19|
00002270: 38 2C 32 35 35 2C 31 36 30 2C 32 2C 33 32 2C 31 |8,255,160,2,32,1|
00002280: 36 35 2C 32 35 35 2C 31 35 33 2C 30 2C 34 38 2C |65,255,153,0,48,|
00002290: 32 30 30 2C 32 30 38 2C 32 34 37 2C 33 32 2C 32 |200,208,247,32,2|
000022A0: 30 34 2C 32 35 35 2C 39 36 00 F4 2A A8 11 83 20 |04,255,96..*... |
000022B0: 31 36 32 2C 36 2C 33 32 2C 32 30 31 2C 32 35 35 |162,6,32,201,255|
000022C0: 2C 31 36 30 2C 30 2C 31 38 35 2C 30 2C 34 38 2C |,160,0,185,0,48,|
000022D0: 33 32 2C 31 36 38 2C 32 35 35 2C 32 30 30 2C 32 |32,168,255,200,2|
000022E0: 30 38 2C 32 34 37 2C 33 32 2C 32 30 34 2C 32 35 |08,247,32,204,25|
000022F0: 35 2C 39 36 00 FC 2A B2 11 8C 3A 8E 00 00 00 28 |5,96..*...:....(|
..!.D..B(56).127..56,160:.:X..(0).E.N..*
DISPLAY ANY TRACK $ SECTOR *.I.X..* ON
THE DISK TO THE SCREEN *......* OR THE
PRINTER *......*************
*****************......"...RRRRRRRRRRRRR
RRRRRRRRRRRRRRRRRRRRRRRRRRR";.2. .."DISP
LAY BLOCK CONTENTS IN HEX & ALPHA"G(13).
10)".S.CREEN OR .P.RINTER".C...."EEEEEEE
EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE";.....
."(OR .F1. SCALPEL .F2. TRACE LINKS .F
3. END . .F5. LOAD ADDRESS";.H...."
.F7. 8K COPY).."......* SET PROGRAM CONS
TANT *......**********************
********.<.H.SP$." ":NL$.G(0):HX$."01234
56789ABCDEF".K.R.FS$."":.I.64 . 95:FS$.F
S$.".".G(I).".":. I.....SS$." ":. I.192
. 223:SS$.SS$.".".G(I).".":. I...... A$
(15),NB(2).....D$."0".T....JJ$:. JJ$.""
.254...... JJ$."S".." ..SCREEN.".
..... JJ$."P".." ..PRINTER.".....
.JJ$."."..1000.I....JJ$.".".."END":@"I":
..\....JJ$."."..2000.O....JJ$."."..3000.
.....JJ$."."..4000......15,8,15,"I".D$:.
650......4,4...... 2,8,2,"#":. 650.....
.******************************..."..* L
OAD TRACK AND SECTOR *.'.,..* INTO
DISK BUFFER *.K.6..***********
*******************.G.@.."...TRACK, SECT
OR";T,S...J.. T.0 . T.35 . .15,"I"D$: 2:
4: 15:."END":..A.T.. JJ$."S" . ."...TRA
CK"T" SECTOR"S"."...U.. JJ$."P" . .4:.4,
"TRACK"T" SECTOR"S:.4...^..15,"U1:2,"D$;
T;S:.650.,.H..**************************
****.P.R..* READ BYTE 0 OF DISK BUFFER *
.T....******************************....
..15,"B-P:2,1"......15,"M-R"G(0)G(5)....
..#15,A$(0):.A$(0)."".A$(0).NL$.Q.... JJ
$."S".430...... JJ$."P".460......*******
***********************.+....* READ & CR
T DISPLAY *.O....* REST OF THE D
ISK BUFFER *.S....*******************
***********.....K.1:NB(1).F(A$(0))......
J.0 . 63:. J.32 . . 710:. Z$."N". J.80:
. 458.K.... I.K . 3......#2,A$(I):. A$(I
)."" . A$(I).NL$...... K.1 . I.2 . NB(2)
.F(A$(I))...... I:K.0.D...A$."":B$.":":N
.J.4:. 790:A$.A$.":".C.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:.571.J
.L..******************************...N..
* READ & PRINTER DISPLAY *...P..****
**************************.).R.K.1:NB(1)
.F(A$(0)).8.T.. J.0 . 15.G.V.. I.K . 15.
L.X..#2,A$(I):. A$(I)."" . A$(I).NL$...Z
.. K.1 . I.2 . NB(2).F(A$(I))...... I:K.
0.A...A$."":B$.":":N.J.16:. 790:A$.A$.":
"...... I.0 . 15:N.F(A$(I)):. 790:. Z$."
N". J.40:. 571.....C$.A$(I):. 850:B$.B$.
C$...... I.2.... JJ$."P" . .4,A$B$.?....
J:.571.C.;..***************************
***...<..* NEXT TRACK AND SECTOR *.
..=..******************************.V.?.
."NEXT TRACK AND SECTOR"NB(1)NB(2) "."..
.D.."DO YOU WANT NEXT TRACK AND SECTOR (
Y/N) .F3. TO END ";./.N.. Z$:. Z$.
"" .590.S.X.. Z$."Y" . T.NB(1):S.NB(2):.
330.F.B.. Z$."N" . 320.T.G..Z$."."...~.L
.. 590...V..****************************
**.F....* SUBROUTINES *..
....******************************......
* ERROR ROUTINE *.2....****
**************************.R....15,EN,EM
$,ET,ES:. EN.0 . ..R....".DISK ERROR."EN
,EM$,ET,ES.X.......F..******************
************...P..* SCREEN CONTINUE MESS
AGE *...Z..**************************
****......".....CONTINUE(Y/N)"......Z$:.
Z$."" . 750.%.... Z$."N" . ..9.... Z$..
"Y" . 750.Z....".TRACK" T " SECTOR"S "."
:..~....******************************..
. ..* DISK BYTE TO HEX PRINT *.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$:..
C.R..******************************.G.\.
.* DISK BYTE TO ASC DISPLAY *...F..* C
HARACTER *...P..*******
***********************.I.Z.. F(C$).32 .
C$." ":....... F(C$).128 . F(C$).159 .
......C$.J(SS$,3.(F(C$).127),3):..)....
*********SCALPEL*********.]...BL$.".
."..
...H$(16):H$."0123456789ABCDEF"......"."
.10)"....SCALPEL. (J.MCA)".F.....6)"..(F
OR DISK FILE SURGERY)"......X.0.15:H$(X)
.J(H$,X.1,1):.:EC.0...... .8)"...S.CREEN
OR .P.RINTER ? .S.".4.....8)".ERROR .C.
HECK..";.9);.H....P$:.P$."".1024.J...."S
.";:.P$."P".P.1:.4,4:."P";......P$."C".E
C.1:."C";......:..7)".....B.LOCK OR DISK
.M.EMORY .B..";.D....M$:.M$."".1028....
.."B.";:.M$."M".M.1:."M";......:.M...10)
"...HIBYTE,LOBYTE";:.1035.%.....10)"...T
RACK,SECTOR";......T,S.S....15,8,15:.M.L
B.S:HB.T:.".":.1090.B....3,8,3,"#".}.$..
15,"U1:"3;8;T;S:.".";......15,A$,B$,C$,D
$:EN.E(A$).EC...8.."."T".,"S".:"A$B$C$",
"D$ "...9..EN...6)"...C.ONTINUE OR .R.EP
EAT ? .C."...:..EN...6)"...S.CALPEL MENU
":..6)"...M.AIN MENU".7.;..EN..AN$:.AN$.
"".1083.M.=..EN..AN$."R".1060.K.?..EN..A
N$."S". 3: 15:.1000...@..EN..AN$."M". 3:
15:....B.Z$.G(0):.".. 0: ";...C..P..4,
" 0: ";.D.`..Y.1.22:.X.1.12...J..M..15,
"M-R"G(LB)G(HB):.#15,D$:.1140...O..#3,D$
...T.A.F(D$.Z$):H..(A.16):L.A.H.16.C....
H$(H)H$(L)" ";:.P..4,H$(H)H$(L)" ";.G...
.M.LB.LB.1:.LB.256.LB.0:HB.HB.1.}...D.D.
1:.D.256.1200......:."."I(D(D),3)": ";..
....P..4,G(13)I(D(D),3)": ";.......M....
P..4,G(13): 4.X.....M. 3..... 15......G(
13)".F1.=AGAIN .F2.=WRITE .F3.=QUIT .F4.
=XFER BLK ";.D.....4)".F5./.F6. ON/OFF M
EMORY MODE";.J.D.P.1024.39.6:SC.1024:E.1
919:B.1069......K$:.K$."".C.B(P):.P,C.12
8:.I.0.40:.:.P,C:.I.0.40:.:.1250......K$
."."..1000.J....K$.".".M.1.Z....K$.".".M
.0......K$.".".1500......K$."."........K
$."."..BL$;:."TRACK,SECTOR ? ";.I....K$.
"."..M..BL$;:."HIBYTE,LOBYTE ? ";.J....K
$."."..6,0:.6,T,S: 6:.1500......K$.".".P
.E.P.P.1......K$.".".P.B.P.P.1.....P1.P.
SC:PI.40..(P1.40):PD.P1.PI.W....K$.".".P
D.5.P.P.5:.1250......PD.5. P.P.5:.1250..
....K$.."."..(PD.7).3..((PD.7).3).P.P.1:
.1250.?....K$.".".P.(E.39).P.P.40:.1250.
A....K$.".".P.(B.39).P.P.40:.1250.M...K.
F(K$)......K.32.K$.".":.1270...(..K.47.K
.58..P,K:K$.".":.1270.I.2..K.64.K.71..P,
K.64:K$.".":.1270.S....1250.....:.BL$".W
RITING";T".,"S". .";......15,8,15:.M.LB.
S:HB.T:P.B:.1570.'....6,8,6,"#".=....15,
"B-P:"6;0:P.B.D."..Y.1.22:.X.1.12:.P.E.P
.0:D.0:.1691...@.CH.B(P):CL.B(P.1):.P,32
:.P.1,32. .^..CH.47.H.16.(CH.48)...H..CL
.47.L.CL.48.I.R..CH.7.H.16.(9.CH).Z.|..C
L.7.L.9.CL......M.:.15,"M-W"G(LB)G(HB)G(
1)G(H.L).*....M.LB.LB.1:.LB.256.LB.0:HB.
HB.1:.1680.6....M.1680.E....6,G(H.L);.O.
..P.P.3.]....:P.P.4:..N....M. 15:.1040..
....15,"U2:"6;8;T;S...V..15,A$,B$,C$,D$.
D....BL$"."T".,"S".:"A$B$C$","D$" (WRITE
) .".S... 6: 15:D.0...:..15,8,15:.3,8,3,
"#".. D..15,"U1:"3;8;T;S.0 E..15,A$,B$,C
$,D$:D$.D$." READBACK ":EN.E(A$).: L..10
80.. P..".".9)"..TRACE LINKS (J MCA)....
":..9)"......S.CREEN OR .P.RINTER".. Q..
ANS$:.ANS$."".2001.L R.."...........N.AM
E (*) OR .T.RACK & SECTOR".. S..RE$:.R
E$."".2003.. T..RE$."T".2010.-!U..".....
.......NAME(*)";:.NA$:.NA$."$".T.18:S.1:
.2012.H!V..15,8,15:.1,8,3,NA$: 1.R!W..15
,"M-R"G(24)G(0)G(2):.#15,T$,S$: 15..!X.T
.F(T$.G(0)):S.F(S$.G(0))..!Y..2012..!Z..
".............TRACK,SECTOR";.E!...T,S.X!
...ANS$."S".2200..!...15,8,15:.4,4..!...
3,8,3,"#".."...15,"U1:"3;8;T;S.("...15,A
$,B$,C$,D$:B.B.1.S"...4,"BLK#"B":"T","S;
" "A$;B$;C$;D$" ";.{"*..#3,T$,S$:T.F(T$
.G(0)):S.F(S$.G(0)).."/..4,T;","S.."0..T
.0.2120.."4..2030.."H..4: 4: 3: 15:...".
.:.."..."......HOLD DOWN SHIFT KEY TO ST
OP SCROLL...".."...15,8,15..#...3,8,3,"#
"..#...15,"U1:"3;8;T;S.2#J..15,A$,B$,C$,
D$.I#O.B.B.1:."BLK#"B":";.H#T..T","S;" "
A$;B$;C$;D$" ";..#...#3,T$,S$:T.F(T$.G(
0)):S.F(S$.G(0))..#...T;","S..#...T.0.23
10..#...B(654).1.2295.G#...2240.R#.. 3:
15..#..."..F3. TO END .F1.=AGAIN";..$..
.ANS$:.ANS$."".2325..$...ANS$."."..2000.
/$...ANS$."."...9$$..2325.D$... "..DISPL
AY 'LOAD ADDRESS' OF A FILE".X$G.. ".FIL
E ";:.F$..$J.. ".LOAD ADDRESS:";..$L..1,
8,3,"0:".F$..$V.. #1,L$,H$.J$..X$.H$:.31
00:H.X.256..$..X$.L$:.3100:L.X:.H.L..%..
1:."..F1. AGAIN .F3. END..%...ANS$:.AN
S$."".3090..%...ANS$."."..3000.>%...ANS$
."."...H%...3090.\%... X$."" . X.0:..J%&
.X.F(X$):...% ..***** 8K COPY ********..
%...B(56)..127..56,127:A..(0):.4010..%..
BL$.".
."..&...".".10)"....COPY*8*. (J.MCA
)".-&....6)"..(COPIES 8K OF DISK DATA)":
.4500.Q&....6)"...START AT TRACK,SECTOR"
;.{&H..T,S:TS.T:SS.S:SA.32768:Z$.G(0):AD
.SA..&R..15,8,15:.3,8,3,"#". &W..BK.1.32
..&...15,"U1:"3;8;T;S.H&...15,A,B$,C$,D$
..'...".."T".,"S".:"A"."B$C$","D$" ST:"S
T". BLOCK# "BK"."..'...A.0.ES.0:.4110.,'
..ES$."R":ES.1:.4200.@'..TL.T:SL.S:BL.BK
.D'...#3,T$,S$:T.F(T$.Z$):S.F(S$.Z$).S'.
..T.0.BK.32..'"..AD,T:AD.AD.1:.AD,S:.840
,127.BL. ',..828..'@.AD.AD.255:.BK..'H..
:.".............LAST BLOCK SUCESSFULY RE
AD:"..(I.."TRACK"TL"SECTOR"SL"BLOCK#"BL.
&(J..ES.0 . .".NO READ ERRORS".I(K..ES.1
..".STOPED BY READ ERROR".N(M..".EXCHANG
E DISKS .F1. TO WRITE".Y(R. 3: 15..(|..A
N$:.AN$."".4220..(...AN$.."."....(..AD.S
A:T.TS:S.SS.K(...15,8,15:.6,8,6,"#".W(..
.X.1.BL..(...15,"B-P:"6;0..)..TN.B(AD):A
D.AD.1:SN.B(AD)..)B..857,127.X..)L..848.
-)V.AD.AD.255.B)...15,"U2:"6;8;T;S.U)...
15,A,B$,C$,D$..)...BL$"."T".,"S".:"A"."B
$C$","D$" ST:"ST". BLOCK# ."X"."..)...L.
0.NE:.NE..0....)....K)...A..0.."ERROR"T"
,"S:NE.NE.1..)..T.TN:S.SN:...).. 6: 15:.
56,160:.:F..(0)..*...:.".F1.=AGAIN .F3.
=END";.,*&..AN$:.AN$."".4390.?*0..AN$.".
"..4010.E*:...^*...A.828.867:.B:.A,B:...
*... 162,3,32,198,255,160,2,32,165,255,1
53,0,48,200,208,247,32,204,255,96..*...
162,6,32,201,255,160,0,185,0,48,32,168,2
55,200,208,247,32,204,255,96..*...:....(
> CLICK IMAGE PREVIEW FOR FULL MODAL