_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\

Multiple names: DISK TOOL       , DISK TOOL, 19.DISK-TOOL

FILE INFORMATION

FILENAME(S):
• DISK&nbspTOOL&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp&nbsp<br>• DISK&nbspTOOL<br>• 19.DISK-TOOL

FILE TYPE(S): PRG

FILE SIZE: 8.7K

FIRST SEEN: 2025-10-20 14:31:20

APPEARS ON: 6 disk(s)

FILE HASH

b71b346bd9c4692ff823629c9386df1d05216071186914fe56a165f07b437d75

FOUND ON DISKS (6 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
MASTERMMSOFT DISK TOOL        PRG Treasure Chest - Klaus Der Suhler 17 3 DOWNLOAD FILE
D M PD SERVICE DISK TOOL PRG Treasure Chest - Plattfuss 11 5 DOWNLOAD FILE
U TILITEIS 19.DISK-TOOL PRG Treasure Chest - Wolfgang Rauprich 6 0 DOWNLOAD FILE
FREESOFT DISK NR DISK TOOL PRG Treasure Chest - Wolfgang Rauprich 19 7 DOWNLOAD FILE
A NWENDER DISK TOOL PRG Treasure Chest - Wolfgang Rauprich 19 7 DOWNLOAD FILE
FREEWARE DISK NR 19.DISK-TOOL PRG Treasure Chest - Wolfgang Rauprich 6 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     |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..*...:....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL