|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 38768 (0x9770)
Notes: pts_type(UF)
Names: »USINFO.UF«
└─⟦f45ea3bc3⟧ Bits:30009713 Philips computer tape "WSM"
└─⟦this⟧ »WSM:UTIL/USINFO.UF«
***************************************************************************
** **
** W S M UTILITY TOOLS USER INFORMATION - ADAPTED FOR MAS/SDS **
** **
***************************************************************************
DIRECTORY: WSM:UTIL
SOURCE AND OBJECT OF WSM UTILITY PROGRAM
TOSSUTILITIES LOADMODULE UTL13D USED VIA I.C. TO WSMUTILITIES
IS REQUIRED. USE FILECODES II=98,IO=99 AND PIPEID=TU.
UTL13D IS SPECIAL TOSSUT VERSION MADE FOR WSM UTILITIES AND IS
NOT OVERLAYED LINKED.
WUTIL,<DADFC> ON DIR WSM:LMU TO GET A UTILITY LOAD MODULE & NO CREBUG
WUTILT,<DADFC> ON DIR WSM:LMU TO GET A UTILITY LOAD MODULE & CREBUG
HISTORY:
85-09-10 WUDIV SUPPORT OF NEW WCH-DISKS PTS 6794 AND PTS 6793
85-09-10 WUCRV SUPPORT OF NEW WCH-DISKS PTS 6794 AND PTS 6793
85-08-08 CHANGE IN SYNTAX IN WSM-UTILITIES FROM DISC TO DISK IN:
1.WUCRV 2.WUDEN 3.WUUTI
85-07-01 WSM RELEASE 3.0 -> IRL.
85-03-01 WSM RELEASE 2.2 FOR TOSS 13.1 TO ACTION-CENTRE
85-01-25 WUDIV SUPPORT OF 12.8 MB WCH PTS 6794 FOR PTS 6923
85-01-25 WUCRV SUPPORT OF 12.8 MB WCH PTS 6794 FOR PTS 6923
84-12-11 CHANGE IN WUASS TO PREVENT A14-STACK NOT TO EXEED
84-12-04 1. MUL AND DIV NOW FROM ASSRUT WSMCAL, IN WUUTI AND WUCOP
2. START/STOP BLOCKING IMPLEMENTED IN WUUTI AND WUDEN
84-12-01 RELEASE 2.2 INTERTASK TOSSUT <-> WSMUTILITIES IMPLEMENTED
84-10-01 RELEASE 2.1, A SUBSET OF TOSS REL 12.2:
1. STANDARD SUPPORT OF INTERTASK COMMUNICATION ON
FILE CODES D0/D1. PRESSING THE RETURN-KEY WHEN
THE INITIAL MENU IS DISPLAYED GIVES "ESCAPE".
2. SUPPORT OF 5 1/4" FLOPPY DISC PTS-6792.
3. SUPPORT OF 35 MB WINCHESTER DISC PTS-6963,
CONNECTED TO TC PTS-6910.
4. CREATE VOLUME: MAXIMUM NUMBER OF FILES ( = VTOC
ENTRIES ) EXTENDED FROM 99 TO 999.
5. COPY: CALCULATION OF "PROGRAM LENGTH" FOR L-
FILES ( LOAD MODULES ), CORRECTED ( P445:
THE DESTINATION FILE, IN SOME CASES, IS CREATED
TOO SHORT).
6. COPY: OPTION "FILE TO FILE" NOW CREATES ENOUGH
DESTINATION FILE SPACE WHEN SOURCE FILE IS OF
TYPE S,D OR I.
7. THE INTERNAL "CHANGE VOLUME NAME" ROUTINE NO
MORE DESTROYES THE RETURN-CODE OF A PREVIOUS
LKM-REQUEST, I.E. "I/O ERROR 0000" IS NOT
DISPLAYED ANY MORE.
8. AFTER A COMPLETED "DELETE FILE", THE RETURN IS
MADE TO THE "DELETE FILE" MENU INSTEAD OF THE
INITIAL MENU.
9. CREATE FILE: THE TEXT IS SUBSTITUTED BY "CREATE
WSM SYSTEM FILE".
10. EXTEND FILE: THE TEXT IS SUBSTITUTED BY "EXTEND
WSM SYSTEM FILE".
11. COPY: ON THE "TYPE OF COPY" MENU, MAXIMUM
SECTION SIZE IS DISPLAYED FOR OPTION "W".
12. THE PRODUCTION VERSION W:UTIL ON USER WSMLMU
IS LINKED WITH 40 POOL UNITS ( = MAXIMUM
SECTION SIZE ).
13. THE TEST VERSION W:UTIB ON USER WSMLMU
IS LINKED WITH 20 POOL UNITS ( = MAXIMUM
SECTION SIZE ).
84-06-01 SUPPORT OF 5 1/4" MINI FLOPPY DISC INTRODUCED (PREREL).
83-10-15 THE UTILITY PACKAGE CAN NO MORE WRITE ON A DISC THAT
IS NOT TOSS-FORMATTED.
INITIAL PRINT ON GP74 NOW OK (PREVIOUS I/O-ERROR).
THE CREATE VOLUME MENU CHANGED AGAIN.
EXTENDED DELAY WHEN ATTACHING PRINTER (LP PROBLEMS).
83-10-01 OPTION 5, EXTEND FILE, DOES NO MORE DESTROY THE VOLUME
NAME IF RETURN IS PRESSED BEFORE ENTERING UNIT MNEMO.
CREATE VOLUME OF 5 MB DISC NOW POSSIBLE AGAIN.
OPTION 9, NOT DEFINED, NO MORE VALID.
CREATE VOLUME SCREEN HANDLING ON VD82/83 CORRECTED.
83-09-15 TYPE OF DISCS TO SUPPORT (CREATE VOLUME) CHANGED.
83-08-09 WINCHESTER DISC HANDLING IMPLEMENTED.
83-06-01 RELEASE 2.0 TO ALPHA TEST.
83-03-22 ADAPTED TO VD81, VD82.
83-02-28 RELEASE 1.O
0x0000…0008 (0, 0, 400) Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0004}
0x0008…0010 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x000c}
0x0010…0064 Head {h00=0x0050, h01=0x0050, text=»*************************************************************************** «, t00=0x0000, t01=0x0014}
0x0064…00b8 Head {h00=0x0050, h01=0x0050, text=»** ** «, t00=0x0000, t01=0x0068}
0x00b8…010c Head {h00=0x0050, h01=0x0050, text=»** W S M UTILITY TOOLS USER INFORMATION - ADAPTED FOR MAS/SDS ** «, t00=0x0000, t01=0x00bc}
0x010c…0160 Head {h00=0x0050, h01=0x0050, text=»** ** «, t00=0x0000, t01=0x0110}
0x0160…01b4 Head {h00=0x0050, h01=0x0050, text=»*************************************************************************** «, t00=0x0000, t01=0x0164}
0x01b4…01bc Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x0028}
0x01bc…01d8 Head {h00=0x0018, h01=0x0050, text=»DIRECTORY: WSM:UTIL «, t00=0x0001, t01=0x0030}
0x01d8…01e0 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x004c}
0x01e0…0216 Head {h00=0x0032, h01=0x0050, text=» SOURCE AND OBJECT OF WSM UTILITY PROGRAM«, t00=0x0001, t01=0x0054}
0x0216…0262 Head {h00=0x0048, h01=0x0050, text=» TOSSUTILITIES LOADMODULE UTL13D USED VIA I.C. TO WSMUTILITIES «, t00=0x0001, t01=0x008a}
0x0262…02a6 Head {h00=0x0040, h01=0x0050, text=» IS REQUIRED. USE FILECODES II=98,IO=99 AND PIPEID=TU. «, t00=0x0001, t01=0x00d6}
0x02a6…02f2 Head {h00=0x0048, h01=0x0050, text=» UTL13D IS SPECIAL TOSSUT VERSION MADE FOR WSM UTILITIES AND IS«, t00=0x0001, t01=0x011a}
0x02f2…0316 Head {h00=0x0020, h01=0x0050, text=» NOT OVERLAYED LINKED. «, t00=0x0001, t01=0x0166}
0x0316…036a Head {h00=0x0050, h01=0x0050, text=» WUTIL,<DADFC> ON DIR WSM:LMU TO GET A UTILITY LOAD MODULE & NO CREBUG «, t00=0x0001, t01=0x018a}
0x036a…03bc Head {h00=0x004e, h01=0x0050, text=» WUTILT,<DADFC> ON DIR WSM:LMU TO GET A UTILITY LOAD MODULE & CREBUG «, t00=0x0002, t01=0x004e}
0x03bc…03c4 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x00a0}
0x03c4…03da Head {h00=0x0012, h01=0x0050, text=» HISTORY:«, t00=0x0002, t01=0x00a8}
0x03da…03e2 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x00be}
0x03e2…0430 Head {h00=0x004a, h01=0x0050, text=» 85-09-10 WUDIV SUPPORT OF NEW WCH-DISKS PTS 6794 AND PTS 6793«, t00=0x0002, t01=0x00c6}
0x0430…047e Head {h00=0x004a, h01=0x0050, text=» 85-09-10 WUCRV SUPPORT OF NEW WCH-DISKS PTS 6794 AND PTS 6793«, t00=0x0002, t01=0x0114}
0x047e…04d0 Head {h00=0x004e, h01=0x0050, text=» 85-08-08 CHANGE IN SYNTAX IN WSM-UTILITIES FROM DISC TO DISK IN: «, t00=0x0002, t01=0x0162}
0x04d0…0502 Head {h00=0x002e, h01=0x0050, text=» 1.WUCRV 2.WUDEN 3.WUUTI «, t00=0x0003, t01=0x0024}
0x0502…0534 Head {h00=0x002e, h01=0x0050, text=» 85-07-01 WSM RELEASE 3.0 -> IRL. «, t00=0x0003, t01=0x0056}
0x0534…057c Head {h00=0x0044, h01=0x0050, text=» 85-03-01 WSM RELEASE 2.2 FOR TOSS 13.1 TO ACTION-CENTRE«, t00=0x0003, t01=0x0088}
0x057c…05c8 Head {h00=0x0048, h01=0x0050, text=» 85-01-25 WUDIV SUPPORT OF 12.8 MB WCH PTS 6794 FOR PTS 6923«, t00=0x0003, t01=0x00d0}
0x05c8…0614 Head {h00=0x0048, h01=0x0050, text=» 85-01-25 WUCRV SUPPORT OF 12.8 MB WCH PTS 6794 FOR PTS 6923«, t00=0x0003, t01=0x011c}
0x0614…0660 Head {h00=0x0048, h01=0x0050, text=» 84-12-11 CHANGE IN WUASS TO PREVENT A14-STACK NOT TO EXEED «, t00=0x0003, t01=0x0168}
0x0660…06b4 Head {h00=0x0050, h01=0x0050, text=» 84-12-04 1. MUL AND DIV NOW FROM ASSRUT WSMCAL, IN WUUTI AND WUCOP «, t00=0x0004, t01=0x0024}
0x06b4…0704 Head {h00=0x004c, h01=0x0050, text=» 2. START/STOP BLOCKING IMPLEMENTED IN WUUTI AND WUDEN «, t00=0x0004, t01=0x0078}
0x0704…0758 Head {h00=0x0050, h01=0x0050, text=» 84-12-01 RELEASE 2.2 INTERTASK TOSSUT <-> WSMUTILITIES IMPLEMENTED «, t00=0x0004, t01=0x00c8}
0x0758…079a Head {h00=0x003e, h01=0x0050, text=» 84-10-01 RELEASE 2.1, A SUBSET OF TOSS REL 12.2: «, t00=0x0004, t01=0x011c}
0x079a…07e6 Head {h00=0x0048, h01=0x0050, text=» 1. STANDARD SUPPORT OF INTERTASK COMMUNICATION ON«, t00=0x0004, t01=0x015e}
0x07e6…0832 Head {h00=0x0048, h01=0x0050, text=» FILE CODES D0/D1. PRESSING THE RETURN-KEY WHEN«, t00=0x0005, t01=0x001a}
0x0832…087e Head {h00=0x0048, h01=0x0050, text=» THE INITIAL MENU IS DISPLAYED GIVES "ESCAPE". «, t00=0x0005, t01=0x0066}
0x087e…08c4 Head {h00=0x0042, h01=0x0050, text=» 2. SUPPORT OF 5 1/4" FLOPPY DISC PTS-6792. «, t00=0x0005, t01=0x00b2}
0x08c4…090c Head {h00=0x0044, h01=0x0050, text=» 3. SUPPORT OF 35 MB WINCHESTER DISC PTS-6963,«, t00=0x0005, t01=0x00f8}
0x090c…0944 Head {h00=0x0034, h01=0x0050, text=» CONNECTED TO TC PTS-6910. «, t00=0x0005, t01=0x0140}
0x0944…0992 Head {h00=0x004a, h01=0x0050, text=» 4. CREATE VOLUME: MAXIMUM NUMBER OF FILES ( = VTOC «, t00=0x0005, t01=0x0178}
0x0992…09d2 Head {h00=0x003c, h01=0x0050, text=» ENTRIES ) EXTENDED FROM 99 TO 999.«, t00=0x0006, t01=0x0036}
0x09d2…0a1c Head {h00=0x0046, h01=0x0050, text=» 5. COPY: CALCULATION OF "PROGRAM LENGTH" FOR L-«, t00=0x0006, t01=0x0076}
0x0a1c…0a64 Head {h00=0x0044, h01=0x0050, text=» FILES ( LOAD MODULES ), CORRECTED ( P445: «, t00=0x0006, t01=0x00c0}
0x0a64…0ab2 Head {h00=0x004a, h01=0x0050, text=» THE DESTINATION FILE, IN SOME CASES, IS CREATED «, t00=0x0006, t01=0x0108}
0x0ab2…0adc Head {h00=0x0026, h01=0x0050, text=» TOO SHORT). «, t00=0x0006, t01=0x0156}
0x0adc…0b28 Head {h00=0x0048, h01=0x0050, text=» 6. COPY: OPTION "FILE TO FILE" NOW CREATES ENOUGH«, t00=0x0006, t01=0x0180}
0x0b28…0b74 Head {h00=0x0048, h01=0x0050, text=» DESTINATION FILE SPACE WHEN SOURCE FILE IS OF «, t00=0x0007, t01=0x003c}
0x0b74…0ba0 Head {h00=0x0028, h01=0x0050, text=» TYPE S,D OR I.«, t00=0x0007, t01=0x0088}
0x0ba0…0bea Head {h00=0x0046, h01=0x0050, text=» 7. THE INTERNAL "CHANGE VOLUME NAME" ROUTINE NO«, t00=0x0007, t01=0x00b4}
0x0bea…0c34 Head {h00=0x0046, h01=0x0050, text=» MORE DESTROYES THE RETURN-CODE OF A PREVIOUS«, t00=0x0007, t01=0x00fe}
0x0c34…0c7c Head {h00=0x0044, h01=0x0050, text=» LKM-REQUEST, I.E. "I/O ERROR 0000" IS NOT «, t00=0x0007, t01=0x0148}
0x0c7c…0cae Head {h00=0x002e, h01=0x0050, text=» DISPLAYED ANY MORE. «, t00=0x0007, t01=0x0190}
0x0cae…0cfa Head {h00=0x0048, h01=0x0050, text=» 8. AFTER A COMPLETED "DELETE FILE", THE RETURN IS«, t00=0x0008, t01=0x0032}
0x0cfa…0d46 Head {h00=0x0048, h01=0x0050, text=» MADE TO THE "DELETE FILE" MENU INSTEAD OF THE «, t00=0x0008, t01=0x007e}
0x0d46…0d72 Head {h00=0x0028, h01=0x0050, text=» INITIAL MENU. «, t00=0x0008, t01=0x00ca}
0x0d72…0dc0 Head {h00=0x004a, h01=0x0050, text=» 9. CREATE FILE: THE TEXT IS SUBSTITUTED BY "CREATE «, t00=0x0008, t01=0x00f6}
0x0dc0…0df0 Head {h00=0x002c, h01=0x0050, text=» WSM SYSTEM FILE". «, t00=0x0008, t01=0x0144}
0x0df0…0e3e Head {h00=0x004a, h01=0x0050, text=» 10. EXTEND FILE: THE TEXT IS SUBSTITUTED BY "EXTEND «, t00=0x0008, t01=0x0174}
0x0e3e…0e6e Head {h00=0x002c, h01=0x0050, text=» WSM SYSTEM FILE". «, t00=0x0009, t01=0x0032}
0x0e6e…0eb6 Head {h00=0x0044, h01=0x0050, text=» 11. COPY: ON THE "TYPE OF COPY" MENU, MAXIMUM «, t00=0x0009, t01=0x0062}
0x0eb6…0efe Head {h00=0x0044, h01=0x0050, text=» SECTION SIZE IS DISPLAYED FOR OPTION "W". «, t00=0x0009, t01=0x00aa}
0x0efe…0f48 Head {h00=0x0046, h01=0x0050, text=» 12. THE PRODUCTION VERSION W:UTIL ON USER WSMLMU«, t00=0x0009, t01=0x00f2}
0x0f48…0f8e Head {h00=0x0042, h01=0x0050, text=» IS LINKED WITH 40 POOL UNITS ( = MAXIMUM«, t00=0x0009, t01=0x013c}
0x0f8e…0fbc Head {h00=0x002a, h01=0x0050, text=» SECTION SIZE ). «, t00=0x0009, t01=0x0182}
0x0fbc…1000 Head {h00=0x0040, h01=0x0050, text=» 13. THE TEST VERSION W:UTIB ON USER WSMLMU«, t00=0x000a, t01=0x0020}
0x1000…1046 Head {h00=0x0042, h01=0x0050, text=» IS LINKED WITH 20 POOL UNITS ( = MAXIMUM«, t00=0x000a, t01=0x0064}
0x1046…1074 Head {h00=0x002a, h01=0x0050, text=» SECTION SIZE ). «, t00=0x000a, t01=0x00aa}
0x1074…10c6 Head {h00=0x004e, h01=0x0050, text=» 84-06-01 SUPPORT OF 5 1/4" MINI FLOPPY DISC INTRODUCED (PREREL). «, t00=0x000a, t01=0x00d8}
0x10c6…1114 Head {h00=0x004a, h01=0x0050, text=» 83-10-15 THE UTILITY PACKAGE CAN NO MORE WRITE ON A DISC THAT«, t00=0x000a, t01=0x012a}
0x1114…1144 Head {h00=0x002c, h01=0x0050, text=» IS NOT TOSS-FORMATTED.«, t00=0x000a, t01=0x0178}
0x1144…1190 Head {h00=0x0048, h01=0x0050, text=» INITIAL PRINT ON GP74 NOW OK (PREVIOUS I/O-ERROR).«, t00=0x000b, t01=0x0018}
0x1190…11d0 Head {h00=0x003c, h01=0x0050, text=» THE CREATE VOLUME MENU CHANGED AGAIN. «, t00=0x000b, t01=0x0064}
0x11d0…121e Head {h00=0x004a, h01=0x0050, text=» EXTENDED DELAY WHEN ATTACHING PRINTER (LP PROBLEMS).«, t00=0x000b, t01=0x00a4}
0x121e…126e Head {h00=0x004c, h01=0x0050, text=» 83-10-01 OPTION 5, EXTEND FILE, DOES NO MORE DESTROY THE VOLUME«, t00=0x000b, t01=0x00f2}
0x126e…12be Head {h00=0x004c, h01=0x0050, text=» NAME IF RETURN IS PRESSED BEFORE ENTERING UNIT MNEMO. «, t00=0x000b, t01=0x0142}
0x12be…1306 (12, 0, 400) Head {h00=0x0044, h01=0x0050, text=» CREATE VOLUME OF 5 MB DISC NOW POSSIBLE AGAIN.«, t00=0x000c, t01=0x0004}
0x1306…1346 Head {h00=0x003c, h01=0x0050, text=» OPTION 9, NOT DEFINED, NO MORE VALID. «, t00=0x000c, t01=0x004c}
0x1346…1394 Head {h00=0x004a, h01=0x0050, text=» CREATE VOLUME SCREEN HANDLING ON VD82/83 CORRECTED. «, t00=0x000c, t01=0x008c}
0x1394…13e0 Head {h00=0x0048, h01=0x0050, text=» 83-09-15 TYPE OF DISCS TO SUPPORT (CREATE VOLUME) CHANGED. «, t00=0x000c, t01=0x00da}
0x13e0…1420 Head {h00=0x003c, h01=0x0050, text=» 83-08-09 WINCHESTER DISC HANDLING IMPLEMENTED.«, t00=0x000c, t01=0x0126}
0x1420…1454 Head {h00=0x0030, h01=0x0050, text=» 83-06-01 RELEASE 2.0 TO ALPHA TEST.«, t00=0x000c, t01=0x0166}
0x1454…1484 Head {h00=0x002c, h01=0x0050, text=» 83-03-22 ADAPTED TO VD81, VD82.«, t00=0x000d, t01=0x000a}
0x1484…14aa Head {h00=0x0022, h01=0x0050, text=» 83-02-28 RELEASE 1.O «, t00=0x000d, t01=0x003a}
0x14aa…14ae Head {h00=0x4004, h01=0x0000}
0x14ae…14b2 00 0d 00 60 ┆ `┆
0x14b2…14ba (14, 1, 8) 20 04 00 00 00 0e 00 04 ┆ ┆
0x14ba…14f0 (15, 2, 7260) 5c 53 45 4c 45 43 54 20 41 4e 44 20 45 4e 54 45 52 20 46 49 45 4c 44 53 20 21 0d 4f 52 20 54 42 44 3f 0d 54 20 46 49 45 4c 44 3f 0d 52 45 4e 54 0d 47 3b 0d 45 54 ┆ SELECT AND ENTER FIELDS ! OR TBD? T FIELD? RENT G; ET┆
0x14f0…1540 29 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 43 46 5c 41 31 34 2c 52 53 45 4c 0d 45 43 42 3a 43 57 2c 41 31 33 0d 45 41 52 20 4d 4f 44 49 46 49 45 44 20 42 49 54 53 20 49 4e 20 44 46 44 0d 20 2e 2e 2e 0d 2a 2a ┆); CF A14,RSEL ECB:CW,A13 EAR MODIFIED BITS IN DFD ... **┆
0x1540…1590 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 00 00 00 00 0d 49 53 30 37 35 5c 45 51 55 5c 2a 0d 2d 4b 31 3a 54 42 44 5c 43 41 52 52 49 41 47 45 20 52 45 54 55 52 4e 3f 0d 45 44 20 38 34 31 30 30 31 2f 4d 45 29 0d 0d 44 3b 0d ┆**************** IS075 EQU * -K1:TBD CARRIAGE RETURN? ED 841001/ME) D; ┆
0x1590…15e0 54 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 4c 44 4b 5c 41 31 2c 52 43 3a 49 4e 41 5c 52 45 54 20 43 4f 44 45 20 49 4e 20 43 41 53 45 20 49 4e 50 55 54 20 4e 4f 54 20 41 4c 4c 4f 57 45 44 0d 43 41 53 45 20 2e ┆T; LDK A1,RC:INA RET CODE IN CASE INPUT NOT ALLOWED CASE .┆
0x15e0…1630 2e 2e 0d 3b 0d 4e 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 4c 43 5c 41 32 2c 50 42 3a 49 4e 50 2c 41 31 33 0d 43 4c 45 41 52 20 45 58 49 54 20 52 4f 55 54 49 4e 45 20 4e 4f 2e 0d 20 21 0d 32 30 29 0d 2a 2a 2a 2a 2a 2a 2a 2a ┆.. ; N; LC A2,PB:INP,A13 CLEAR EXIT ROUTINE NO. ! 20) ********┆
0x1630…1680 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 69 5c 41 4e 4b 5c 41 32 2c 2f 30 31 0d 44 20 45 4e 54 45 52 20 46 49 45 4c 44 53 20 21 0d 4f 52 20 54 42 44 3f 0d 54 20 46 49 45 4c 44 3f 0d ┆**************** i ANK A2,/01 D ENTER FIELDS ! OR TBD? T FIELD? ┆
0x1680…16d0 52 45 4e 54 0d 47 3b 0d 45 54 29 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 52 46 28 4e 5a 29 5c 52 43 56 45 52 52 5c 2d 20 49 4e 50 55 54 20 4e 4f 54 20 41 4c 4c 4f 57 45 44 0d 44 20 42 49 54 53 20 49 4e 20 44 ┆RENT G; ET); RF(NZ) RCVERR - INPUT NOT ALLOWED D BITS IN D┆
0x16d0…1720 46 44 0d 20 2e 2e 2e 0d 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 00 00 00 00 0d 49 53 30 37 35 5c 45 51 55 5c 2a 0d 2d 4b 31 3a 54 42 44 5c 43 41 52 52 49 41 47 45 20 52 45 54 55 52 4e 3f 0d 45 44 20 38 34 31 30 30 ┆FD ... ****************** IS075 EQU * -K1:TBD CARRIAGE RETURN? ED 84100┆
0x1720…1770 31 2f 4d 45 29 0d 0d 44 3b 0d 54 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 4c 44 4b 5c 41 31 2c 52 43 3a 4b 45 59 5c 52 45 54 20 43 4f 44 45 20 49 4e 20 43 41 53 45 20 4e 4f 54 20 45 4e 54 45 52 20 4f 52 20 41 ┆1/ME) D; T; LDK A1,RC:KEY RET CODE IN CASE NOT ENTER OR A┆
0x1770…17c0 55 54 4f 2d 45 4e 54 45 52 0d 2e 2e 0d 3b 0d 4e 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 4c 43 5c 41 32 2c 54 43 3a 53 43 52 2c 41 31 33 0d 43 4c 45 41 52 20 45 58 49 54 20 52 4f 55 54 49 4e 45 20 4e 4f 2e 0d 20 21 0d 32 30 ┆UTO-ENTER .. ; N; LC A2,TC:SCR,A13 CLEAR EXIT ROUTINE NO. ! 20┆
0x17c0…1810 29 0d 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 69 5c 41 4e 4b 5c 41 32 2c 2f 30 38 0d 44 20 45 4e 54 45 52 20 46 49 45 4c 44 53 20 21 0d 4f 52 20 54 42 44 3f ┆) ************************ i ANK A2,/08 D ENTER FIELDS ! OR TBD?┆
0x1810…1860 0d 54 20 46 49 45 4c 44 3f 0d 52 45 4e 54 0d 47 3b 0d 45 54 29 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 52 46 28 5a 29 5c 52 43 56 45 52 52 5c 2d 20 4e 4f 54 20 45 4e 54 45 52 20 4b 45 59 20 4f 52 20 41 55 54 ┆ T FIELD? RENT G; ET); RF(Z) RCVERR - NOT ENTER KEY OR AUT┆
0x1860…18b0 4f 2d 45 4e 54 45 52 20 21 0d 46 44 0d 20 2e 2e 2e 0d 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 00 00 00 00 24 52 55 54 20 4d 49 53 54 52 54 2c 53 54 41 52 54 20 50 4f 49 4e 54 20 4d 45 4d 4f 52 59 20 49 4e 50 55 54 ┆O-ENTER ! FD ... ****************** $RUT MISTRT,START POINT MEMORY INPUT┆
0x18b0…1900 3b 0d 45 44 20 38 34 31 30 30 31 2f 4d 45 29 0d 0d 44 3b 0d 54 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 24 43 20 31 2e 20 57 52 43 49 56 45 20 2e 4d 45 4d 3b 0d 43 4f 44 45 20 49 4e 20 43 41 53 45 20 4e 4f 54 20 ┆; ED 841001/ME) D; T; $C 1. WRCIVE .MEM; CODE IN CASE NOT ┆
0x1900…1950 45 4e 54 45 52 20 4f 52 20 41 55 54 4f 2d 45 4e 54 45 52 0d 2e 2e 0d 3b 0d 4e 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 24 43 20 32 2e 20 43 4f 50 59 20 54 4f 20 42 55 46 46 45 52 20 57 48 45 4e 20 57 52 43 49 56 45 20 2e 4f 50 ┆ENTER OR AUTO-ENTER .. ; N; $C 2. COPY TO BUFFER WHEN WRCIVE .OP┆
0x1950…19a0 45 52 3b 0d 0d 20 21 0d 32 30 29 0d 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 69 24 43 20 33 2e 20 57 52 43 49 56 45 20 54 4f 20 47 45 54 20 52 45 4d 41 49 4e ┆ER; ! 20) ************************ i$C 3. WRCIVE TO GET REMAIN┆
0x19a0…19f0 49 4e 47 20 44 41 54 41 3b 0d 0d 54 20 46 49 45 4c 44 3f 0d 52 45 4e 54 0d 47 3b 0d 45 54 29 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 24 43 3b 0d 5a 29 5c 52 43 56 45 52 52 5c 2d 20 4e 4f 54 20 45 4e 54 45 52 20 ┆ING DATA; T FIELD? RENT G; ET); $C; Z) RCVERR - NOT ENTER ┆
0x19f0…1a40 4b 45 59 20 4f 52 20 41 55 54 4f 2d 45 4e 54 45 52 20 21 0d 46 44 0d 20 2e 2e 2e 0d 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 00 00 00 00 24 46 52 41 4d 45 3b 0d 54 52 54 2c 53 54 41 52 54 20 50 4f 49 4e 54 20 4d 45 ┆KEY OR AUTO-ENTER ! FD ... ****************** $FRAME; TRT,START POINT ME┆
0x1a40…1a90 4d 4f 52 59 20 49 4e 50 55 54 3b 0d 45 44 20 38 34 31 30 30 31 2f 4d 45 29 0d 0d 44 3b 0d 54 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0d 43 20 31 2e 20 57 52 43 49 56 45 20 2e 4d 45 4d 3b 0d 43 4f 44 45 20 49 4e ┆MORY INPUT; ED 841001/ME) D; T; C 1. WRCIVE .MEM; CODE IN┆
0x1a90…1ae0 20 43 41 53 45 20 4e 4f 54 20 45 4e 54 45 52 20 4f 52 20 41 55 54 4f 2d 45 4e 54 45 52 0d 2e 2e 0d 3b 0d 4e 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 4c 44 5c 41 34 2c 52 43 56 46 4c 44 2c 41 31 34 5c 41 34 20 3a 3d 20 31 3a ┆ CASE NOT ENTER OR AUTO-ENTER .. ; N; LD A4,RCVFLD,A14 A4 := 1:┆
0x1ae0…1b30 53 54 20 44 46 20 54 4f 20 43 4f 50 59 20 54 4f 20 42 55 46 46 45 52 0d 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 69 4d 49 53 30 31 30 5c 45 51 55 5c 2a 0d 54 4f 20 ┆ST DF TO COPY TO BUFFER ********************** iMIS010 EQU * TO ┆
0x1b30…1b80 47 45 54 20 52 45 4d 41 49 4e 49 4e 47 20 44 41 54 41 3b 0d 0d 54 20 46 49 45 4c 44 3f 0d 52 45 4e 54 0d 47 3b 0d 45 54 29 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 4c 44 4b 5c 41 31 2c 32 5c 49 4e 44 49 43 41 ┆GET REMAINING DATA; T FIELD? RENT G; ET); LDK A1,2 INDICA┆
0x1b80…1bd0 54 45 20 4d 45 4d 4f 52 59 20 49 4e 50 55 54 0d 20 41 55 54 4f 2d 45 4e 54 45 52 20 21 0d 46 44 0d 20 2e 2e 2e 0d 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 00 00 00 00 5c 5c 5c 53 45 4c 45 43 54 20 26 20 43 4f 50 59 ┆TE MEMORY INPUT AUTO-ENTER ! FD ... ****************** SELECT & COPY┆
0x1bd0…1c20 20 44 59 4e 20 46 49 45 4c 44 53 20 21 0d 20 49 4e 50 55 54 3b 0d 45 44 20 38 34 31 30 30 31 2f 4d 45 29 0d 0d 44 3b 0d 54 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 43 46 5c 41 31 34 2c 52 53 45 4c 0d 2e 4d 45 ┆ DYN FIELDS ! INPUT; ED 841001/ME) D; T; CF A14,RSEL .ME┆
0x1c20…1c70 4d 3b 0d 43 4f 44 45 20 49 4e 20 43 41 53 45 20 4e 4f 54 20 45 4e 54 45 52 20 4f 52 20 41 55 54 4f 2d 45 4e 54 45 52 0d 2e 2e 0d 3b 0d 4e 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 4c 43 5c 41 31 2c 54 43 3a 53 43 52 2c 41 31 ┆M; CODE IN CASE NOT ENTER OR AUTO-ENTER .. ; N; LC A1,TC:SCR,A1┆
0x1c70…1cc0 33 0d 41 34 20 3a 3d 20 31 3a 53 54 20 44 46 20 54 4f 20 43 4f 50 59 20 54 4f 20 42 55 46 46 45 52 0d 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 69 5c 4c 44 52 5c 41 ┆3 A4 := 1:ST DF TO COPY TO BUFFER ********************** i LDR A┆
0x1cc0…1d10 32 2c 41 31 0d 2a 0d 54 4f 20 47 45 54 20 52 45 4d 41 49 4e 49 4e 47 20 44 41 54 41 3b 0d 0d 54 20 46 49 45 4c 44 3f 0d 52 45 4e 54 0d 47 3b 0d 45 54 29 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 41 4e 4b 5c 41 ┆2,A1 * TO GET REMAINING DATA; T FIELD? RENT G; ET); ANK A┆
0x1d10…1d60 31 2c 2f 31 30 5c 42 55 46 46 45 52 20 4f 56 45 52 46 4c 4f 57 20 3f 0d 54 0d 20 41 55 54 4f 2d 45 4e 54 45 52 20 21 0d 46 44 0d 20 2e 2e 2e 0d 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 00 00 00 00 5c 53 52 4c 5c 41 ┆1,/10 BUFFER OVERFLOW ? T AUTO-ENTER ! FD ... ****************** SRL A┆
0x1d60…1db0 31 2c 34 5c 2d 20 57 45 4c 4c 2c 20 49 4e 44 2e 20 4d 4f 52 45 20 44 41 54 41 20 54 4f 20 47 45 54 0d 20 38 34 31 30 30 31 2f 4d 45 29 0d 0d 44 3b 0d 54 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 41 4e 4b 5c 41 ┆1,4 - WELL, IND. MORE DATA TO GET 841001/ME) D; T; ANK A┆
0x1db0…1e00 32 2c 2f 32 30 5c 53 4f 4d 45 20 44 46 20 4e 4f 54 20 46 4f 55 4e 44 20 3f 0d 4e 4f 54 20 45 4e 54 45 52 20 4f 52 20 41 55 54 4f 2d 45 4e 54 45 52 0d 2e 2e 0d 3b 0d 4e 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 5c 52 46 28 5a 29 ┆2,/20 SOME DF NOT FOUND ? NOT ENTER OR AUTO-ENTER .. ; N; RF(Z)┆
0x1e00…1e50 5c 57 3a 52 43 49 45 5c 2d 20 4e 4f 20 21 0d 3a 3d 20 31 3a 53 54 20 44 46 20 54 4f 20 43 4f 50 59 20 54 4f 20 42 55 46 46 45 52 0d 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ W:RCIE - NO ! := 1:ST DF TO COPY TO BUFFER ********************** ┆
0x1e50…1ea0 00 00 00 69 5c 41 44 4b 5c 41 31 2c 52 43 3a 44 4e 32 5c 2d 20 59 45 53 20 21 0d 41 49 4e 49 4e 47 20 44 41 54 41 3b 0d 0d 54 20 46 49 45 4c 44 3f 0d 52 45 4e 54 0d 47 3b 0d 45 54 29 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ i ADK A1,RC:DN2 - YES ! AINING DATA; T FIELD? RENT G; ET); ┆
0x1ea0…1ef0 00 00 00 00 24 52 55 54 20 57 3a 52 43 49 45 2c 57 52 43 49 56 45 20 54 45 52 4d 49 4e 41 54 49 4f 4e 2e 3b 0d 41 55 54 4f 2d 45 4e 54 45 52 20 21 0d 46 44 0d 20 2e 2e 2e 0d 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 ┆ $RUT W:RCIE,WRCIVE TERMINATION.; AUTO-ENTER ! FD ... ****************** ┆
0x1ef0…1f40 00 00 00 00 24 43 20 53 48 4f 55 4c 44 20 42 45 20 55 53 45 44 20 42 59 20 41 4c 4c 20 57 52 43 49 56 45 20 45 58 49 54 53 2e 3b 0d 20 38 34 31 30 30 31 2f 4d 45 29 0d 0d 44 3b 0d 54 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ $C SHOULD BE USED BY ALL WRCIVE EXITS.; 841001/ME) D; T; ┆
0x1f40…1f90 00 00 00 00 24 49 4e 50 20 41 31 20 3d 20 52 45 54 55 52 4e 20 43 4f 44 45 3b 0d 20 46 4f 55 4e 44 20 3f 0d 4e 4f 54 20 45 4e 54 45 52 20 4f 52 20 41 55 54 4f 2d 45 4e 54 45 52 0d 2e 2e 0d 3b 0d 4e 3b 0d 00 00 00 00 00 00 00 00 00 00 00 00 ┆ $INP A1 = RETURN CODE; FOUND ? NOT ENTER OR AUTO-ENTER .. ; N; ┆
0x1f90…1fe0 00 00 00 00 24 43 3b 0d 5a 29 5c 57 3a 52 43 49 45 5c 2d 20 4e 4f 20 21 0d 3a 3d 20 31 3a 53 54 20 44 46 20 54 4f 20 43 4f 50 59 20 54 4f 20 42 55 46 46 45 52 0d 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 00 00 00 ┆ $C; Z) W:RCIE - NO ! := 1:ST DF TO COPY TO BUFFER ********************** ┆
0x1fe0…2030 00 00 00 00 00 00 00 00 00 00 00 00 00 69 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ i ┆
0x2030…2080 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x3…]
0x2170…21c0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 69 00 10 0d 38 0d 40 0d 48 0d 50 0d 58 0d 60 0d 68 0d 70 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ i 8 @ H P X ` h p ┆
0x21c0…2210 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x3…]
0x2300…2350 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 69 01 90 00 2c 00 50 5c 49 44 45 4e 54 5c 57 55 43 4f 50 5c 52 45 4c 3d 32 2e 33 2c 38 34 31 32 30 33 2c 38 37 30 31 35 35 39 34 30 32 33 30 ┆ i , P IDENT WUCOP REL=2.3,841203,870155940230┆
0x2350…23a0 00 00 00 04 00 2a 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 00 00 34 00 2a 00 50 2a 20 20 57 4f 52 4b 20 53 54 41 54 49 4f 4e 20 4d 41 4e 41 47 45 4d 45 4e 54 ┆ * P************************************** 4 * P* WORK STATION MANAGEMENT┆
0x23a0…23f0 20 20 20 20 20 20 20 20 20 20 20 2a 00 00 00 62 00 2a 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 00 00 90 00 2a 00 50 2a 20 20 34 20 20 43 4f 50 59 20 56 4f 4c ┆ * b * P* * * P* 4 COPY VOL┆
0x23f0…2440 55 4d 45 2f 46 49 4c 45 20 28 52 45 4f 52 47 41 4e 49 5a 45 29 20 20 2a 00 00 00 be 00 2a 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 00 00 00 ec 00 2a 00 50 2a 2a ┆UME/FILE (REORGANIZE) * * P* * * P**┆
0x2440…2490 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 00 01 1a 00 04 00 50 00 00 01 48 00 04 00 50 00 00 01 50 00 10 00 50 2a 2a 20 20 48 49 53 54 4f 52 59 3a 00 00 01 58 00 04 00 50 ┆************************************ P H P P P** HISTORY: X P┆
0x2490…24ae 00 00 01 6c 00 36 00 50 2a 2a 20 38 34 2d 31 32 2d 30 33 20 2f 43 4a 20 20 20 20 20 20 4d ┆ l 6 P** 84-12-03 /CJ M┆
0x24ae…8770 […elided…]
0x8770…87a0 46 4f 52 20 43 4f 50 59 20 44 49 53 43 20 54 4f 20 44 49 53 43 29 2e 20 00 03 00 ec 00 2e 00 50 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FOR COPY DISC TO DISC). . P** ┆
0x87a0…87f0 20 20 20 20 20 43 48 41 4e 47 45 44 20 44 45 43 4f 52 41 54 49 4f 4e 53 2e 20 00 03 01 36 00 36 00 50 2a 2a 20 38 32 2d 31 30 2d 32 30 20 2f 4d 41 45 52 20 20 20 20 56 4f 4c 55 4d 45 2d 4e 41 4d 45 20 43 48 41 4e 47 45 20 00 00 00 00 00 00 ┆ CHANGED DECORATIONS. 6 6 P** 82-10-20 /MAER VOLUME-NAME CHANGE ┆
0x87f0…8840 00 69 01 90 43 4f 4d 50 4c 45 54 45 44 2e 00 03 01 68 00 3c 00 50 2a 2a 20 38 32 2d 30 37 2d 32 36 20 2f 44 41 4c 49 20 20 20 20 56 4f 4c 55 4d 45 2d 4e 41 4d 45 20 49 53 20 43 48 41 4e 47 45 44 20 42 45 46 4f 52 45 20 43 4f 50 59 20 00 04 ┆ i COMPLETED. h < P** 82-07-26 /DALI VOLUME-NAME IS CHANGED BEFORE COPY ┆
0x8840…8890 00 12 00 22 00 50 2a 2a 20 38 31 2d 31 31 2d 30 34 20 2f 44 41 4c 49 20 20 20 20 43 52 45 41 54 49 4f 4e 20 00 04 00 52 00 04 00 50 00 04 00 78 00 04 00 50 00 04 00 80 00 10 00 50 5c 44 44 55 4d 5c 57 55 44 49 56 20 00 04 00 88 00 0a 00 50 ┆ " P** 81-11-04 /DALI CREATION R P x P P DDUM WUDIV P┆
0x8890…88e0 5c 50 44 49 56 20 00 04 00 9c 00 10 00 50 5c 45 4e 54 52 59 5c 57 55 43 4f 50 00 04 00 aa 00 06 00 50 2a 20 00 04 00 be 00 26 00 50 5c 45 58 50 52 4f 43 5c 44 45 43 4c 52 41 5c 43 52 45 3d 20 53 43 52 45 45 4e 20 52 4f 55 54 49 4e 45 00 04 ┆ PDIV P ENTRY WUCOP P* & P EXPROC DECLRA CRE= SCREEN ROUTINE ┆
0x88e0…8930 00 c8 00 26 00 50 5c 45 58 50 52 4f 43 5c 44 45 43 4c 52 4e 5c 43 52 45 3d 20 53 43 52 45 45 4e 20 52 4f 55 54 49 4e 45 00 04 00 f2 00 26 00 50 5c 45 58 50 52 4f 43 5c 44 49 53 45 52 52 5c 43 52 45 3d 20 45 52 52 4f 52 20 52 4f 55 54 49 4e ┆ & P EXPROC DECLRN CRE= SCREEN ROUTINE & P EXPROC DISERR CRE= ERROR ROUTIN┆
0x8930…8980 45 20 00 04 01 1c 00 24 00 50 5c 45 58 50 52 4f 43 5c 55 46 45 52 52 5c 43 52 45 3d 20 45 52 52 4f 52 20 52 4f 55 54 49 4e 45 00 04 01 46 00 2a 00 50 5c 45 58 50 52 4f 43 5c 44 53 4b 45 52 52 2c 50 42 49 4e 5c 43 52 45 3d 20 45 52 52 4f 52 ┆E $ P EXPROC UFERR CRE= ERROR ROUTINE F * P EXPROC DSKERR,PBIN CRE= ERROR┆
0x8980…89d0 20 52 4f 55 00 00 00 00 00 00 00 69 01 90 54 49 4e 45 00 04 01 6e 00 34 00 50 5c 45 58 50 52 4f 43 5c 43 48 56 4e 41 4d 2c 50 53 54 52 47 2c 50 42 49 4e 5c 43 52 45 3d 20 43 48 41 4e 47 45 20 56 4f 4c 55 4d 45 4e 41 4d 45 00 05 00 0c 00 10 ┆ ROU i TINE n 4 P EXPROC CHVNAM,PSTRG,PBIN CRE= CHANGE VOLUMENAME ┆
0x89d0…8a20 00 50 5c 45 58 50 52 4f 43 5c 48 41 4c 54 00 05 00 44 00 06 00 50 2a 20 00 05 00 58 00 26 00 50 5c 45 58 54 5c 43 4f 50 59 44 44 5c 41 53 53 3d 20 43 4f 50 59 20 44 49 53 43 20 54 4f 20 44 49 53 43 00 05 00 62 00 1e 00 50 5c 45 58 54 5c 4f ┆ P EXPROC HALT D P* X & P EXT COPYDD ASS= COPY DISC TO DISC b P EXT O┆
0x8a20…8a70 50 45 4e 46 5c 41 53 53 3d 20 4f 50 45 4e 20 46 49 4c 45 20 00 05 00 8c 00 20 00 50 5c 45 58 54 5c 43 4c 4f 53 45 46 5c 41 53 53 3d 20 43 4c 4f 53 45 20 46 49 4c 45 20 00 05 00 ae 00 24 00 50 5c 45 58 54 5c 52 44 53 45 43 54 5c 41 53 53 3d ┆PENF ASS= OPEN FILE P EXT CLOSEF ASS= CLOSE FILE $ P EXT RDSECT ASS=┆
0x8a70…8ac0 20 52 45 41 44 20 4f 4e 45 20 53 45 43 54 4f 52 00 05 00 d2 00 2c 00 50 5c 45 58 54 5c 42 49 4e 42 43 44 5c 41 53 53 3d 20 54 57 4f 20 42 49 4e 41 52 59 20 49 54 45 4d 53 20 54 4f 20 42 43 44 00 05 00 fa 00 2c 00 50 5c 45 58 54 5c 42 43 44 ┆ READ ONE SECTOR , P EXT BINBCD ASS= TWO BINARY ITEMS TO BCD , P EXT BCD┆
0x8ac0…8b10 42 49 4e 5c 41 53 53 3d 20 42 43 44 20 54 4f 20 54 57 4f 20 42 49 4e 41 52 59 20 49 54 45 4d 53 00 05 01 2a 00 20 00 50 5c 45 58 54 5c 43 52 45 46 49 4c 5c 41 53 53 3d 20 43 52 45 41 54 45 20 46 49 4c 45 00 05 01 5a 00 20 00 50 5c 45 58 54 ┆BIN ASS= BCD TO TWO BINARY ITEMS * P EXT CREFIL ASS= CREATE FILE Z P EXT┆
0x8b10…8b60 5c 44 45 4c 46 49 4c 5c 41 53 53 3d 20 44 00 00 00 00 00 00 00 6a 01 90 45 4c 45 54 45 20 46 49 4c 45 00 05 01 7e 00 22 00 50 5c 45 58 54 5c 52 45 41 44 44 4b 5c 41 53 53 3d 20 52 45 41 44 20 41 20 52 45 43 4f 52 44 00 06 00 12 00 24 00 50 ┆ DELFIL ASS= D j ELETE FILE ~ " P EXT READDK ASS= READ A RECORD $ P┆
0x8b60…8bb0 5c 45 58 54 5c 57 52 49 54 44 4b 5c 41 53 53 3d 20 57 52 49 54 45 20 41 20 52 45 43 4f 52 44 20 00 06 00 38 00 24 00 50 5c 45 58 54 5c 43 48 41 4e 46 43 5c 41 53 53 3d 20 43 48 41 4e 47 45 20 46 49 4c 45 43 4f 44 45 00 06 00 60 00 1c 00 50 ┆ EXT WRITDK ASS= WRITE A RECORD 8 $ P EXT CHANFC ASS= CHANGE FILECODE ` P┆
0x8bb0…8c00 5c 45 58 54 5c 50 52 45 41 44 5c 41 53 53 3d 20 57 53 4d 2d 52 45 41 44 00 06 00 88 00 1e 00 50 5c 45 58 54 5c 50 57 52 49 54 45 5c 41 53 53 3d 20 57 53 4d 2d 57 52 49 54 45 00 06 00 a8 00 1e 00 50 5c 45 58 54 5c 50 43 4c 4f 53 45 5c 41 53 ┆ EXT PREAD ASS= WSM-READ P EXT PWRITE ASS= WSM-WRITE P EXT PCLOSE AS┆
0x8c00…8c50 53 3d 20 57 53 4d 2d 43 4c 4f 53 45 00 06 00 ca 00 22 00 50 5c 45 58 54 5c 57 58 4d 55 4c 5c 41 53 53 3d 20 4d 55 4c 54 49 50 4c 49 43 41 54 49 4f 4e 00 06 00 ec 00 1c 00 50 5c 45 58 54 5c 57 58 44 49 56 5c 41 53 53 3d 20 44 49 56 49 53 49 ┆S= WSM-CLOSE " P EXT WXMUL ASS= MULTIPLICATION P EXT WXDIV ASS= DIVISI┆
0x8c50…8ca0 4f 4e 00 06 01 12 00 22 00 50 5c 45 58 54 5c 47 45 54 49 4e 44 5c 41 53 53 3d 20 47 45 54 20 44 49 4d 45 4e 53 49 4f 4e 00 06 01 32 00 0a 00 50 5c 45 4a 45 43 54 00 06 01 58 00 0e 00 50 57 55 43 4f 50 5c 50 52 4f 43 00 06 01 66 00 2a 00 50 ┆ON " P EXT GETIND ASS= GET DIMENSION 2 P EJECT X PWUCOP PROC f * P┆
0x8ca0…8cf0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 00 00 00 00 00 00 6a 01 90 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 06 01 78 00 2a 00 50 2a 20 20 34 20 20 43 4f 50 59 20 56 4f 4c 55 4d 45 2f 46 49 4c 45 20 28 ┆************************ j ************* x * P* 4 COPY VOLUME/FILE (┆
0x8cf0…8d40 52 45 4f 52 47 41 4e 49 5a 45 29 20 2a 20 00 07 00 16 00 2a 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 07 00 44 00 0a 00 50 43 4f 50 30 30 30 00 07 00 72 00 24 ┆REORGANIZE) * * P************************************* D PCOP000 r $┆
0x8d40…8d90 00 50 5c 43 4c 45 41 52 5c 42 4f 4f 4c 32 5c 55 53 45 44 20 49 4e 20 46 4f 52 4d 41 54 20 46 49 4f 20 00 07 00 80 00 12 00 50 5c 41 54 54 46 4d 54 5c 46 43 4f 50 59 20 00 07 00 a8 00 12 00 50 5c 53 45 54 5c 44 45 50 52 4f 4d 50 54 20 00 07 ┆ P CLEAR BOOL2 USED IN FORMAT FIO P ATTFMT FCOPY P SET DEPROMPT ┆
0x8d90…8de0 00 be 00 0a 00 50 43 4f 50 31 30 30 00 07 00 d4 00 10 00 50 5c 50 45 52 46 5c 44 45 43 4c 52 41 00 07 00 e2 00 0a 00 50 43 4f 50 31 35 30 00 07 00 f6 00 24 00 50 5c 49 42 5c 44 45 42 49 4e 57 32 2c 43 4f 50 31 30 30 2c 52 45 54 55 52 2c 43 ┆ PCOP100 P PERF DECLRA PCOP150 $ P IB DEBINW2,COP100,RETUR,C┆
0x8de0…8e30 4f 50 32 30 30 20 00 07 01 04 00 1a 00 50 5c 50 45 52 46 5c 44 53 4b 45 52 52 2c 57 30 5c 27 42 45 4c 4c 27 00 07 01 2c 00 0e 00 50 5c 42 5c 43 4f 50 31 35 30 20 00 07 01 4a 00 0a 00 50 52 45 54 55 52 20 00 07 01 5c 00 08 00 50 5c 52 45 54 ┆OP200 P PERF DSKERR,W0 'BELL' , P B COP150 J PRETUR P RET┆
0x8e30…8e80 00 07 01 6a 00 0a 00 50 43 4f 50 32 30 30 00 07 01 76 00 2e 00 50 5c 49 42 5c 44 54 59 50 2c 43 4f 50 00 00 00 00 00 00 00 6a 01 90 35 30 30 2c 43 4f 50 37 30 30 5c 43 4f 50 59 20 46 49 4c 45 2c 43 4f 50 59 20 57 53 4d 20 00 07 01 84 00 0a ┆ j PCOP200 v . P IB DTYP,COP j 500,COP700 COPY FILE,COPY WSM ┆
0x8e80…8ed0 00 50 5c 45 4a 45 43 54 00 08 00 26 00 1a 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 08 00 34 00 1a 00 50 2a 20 43 4f 50 59 20 44 49 53 43 20 54 4f 20 44 49 53 43 20 2a 20 00 08 00 52 00 1a 00 50 2a 2a 2a 2a ┆ P EJECT & P********************* 4 P* COPY DISC TO DISC * R P****┆
0x8ed0…8f20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 08 00 70 00 06 00 50 2a 20 00 08 00 8e 00 0a 00 50 43 4f 50 32 35 30 00 08 00 98 00 12 00 50 5c 41 54 54 46 4d 54 5c 46 43 4f 50 56 20 00 08 00 a6 00 12 00 50 5c 53 45 54 5c 44 45 50 ┆***************** p P* PCOP250 P ATTFMT FCOPV P SET DEP┆
0x8f20…8f70 52 4f 4d 50 54 20 00 08 00 bc 00 0a 00 50 43 4f 50 33 30 30 00 08 00 d2 00 10 00 50 5c 50 45 52 46 5c 44 45 43 4c 52 41 00 08 00 e0 00 0a 00 50 43 4f 50 33 35 30 00 08 00 f4 00 24 00 50 5c 49 42 5c 44 45 42 49 4e 57 32 2c 43 4f 50 33 30 30 ┆ROMPT PCOP300 P PERF DECLRA PCOP350 $ P IB DEBINW2,COP300┆
0x8f70…8fc0 2c 43 4f 50 30 30 30 2c 43 4f 50 34 30 30 00 08 01 02 00 1a 00 50 5c 50 45 52 46 5c 44 53 4b 45 52 52 2c 57 30 5c 27 42 45 4c 4c 27 00 08 01 2a 00 0e 00 50 5c 42 5c 43 4f 50 33 35 30 20 00 08 01 48 00 0a 00 50 43 4f 50 34 30 30 00 08 01 5a ┆,COP000,COP400 P PERF DSKERR,W0 'BELL' * P B COP350 H PCOP400 Z┆
0x8fc0…9010 00 32 00 50 5c 58 43 4f 50 59 5c 50 42 4c 4f 43 4b 2c 57 36 2c 57 31 2c 46 43 4f 44 31 2c 57 31 5c 46 43 33 20 3d 20 53 4f 55 52 43 00 00 00 00 00 00 00 6a 01 90 45 20 44 49 53 43 00 08 01 68 00 32 00 50 5c 58 43 4f 50 59 5c 50 42 4c 4f 43 ┆ 2 P XCOPY PBLOCK,W6,W1,FCOD1,W1 FC3 = SOURC j E DISC h 2 P XCOPY PBLOC┆
0x9010…9060 4b 2c 57 37 2c 57 31 2c 46 43 4f 44 32 2c 57 31 5c 46 43 34 20 3d 20 44 45 53 54 2e 20 44 49 53 43 20 00 09 00 0e 00 36 00 50 5c 58 43 4f 50 59 5c 50 42 4c 4f 43 4b 2c 57 31 34 2c 57 36 2c 43 4f 50 4e 41 4d 2c 57 30 5c 56 4f 4c 2e 4e 41 4d ┆K,W7,W1,FCOD2,W1 FC4 = DEST. DISC 6 P XCOPY PBLOCK,W14,W6,COPNAM,W0 VOL.NAM┆
0x9060…90b0 45 20 44 45 53 54 20 44 49 53 43 20 00 09 00 44 00 34 00 50 5c 58 43 4f 50 59 5c 50 42 4c 4f 43 4b 2c 57 32 32 2c 57 31 2c 57 33 2c 57 31 5c 4f 50 54 49 4f 4e 3d 33 20 4e 45 57 20 44 49 41 4c 4f 55 47 45 00 09 00 7e 00 3c 00 50 5c 58 43 4f ┆E DEST DISC D 4 P XCOPY PBLOCK,W22,W1,W3,W1 OPTION=3 NEW DIALOUGE ~ < P XCO┆
0x90b0…9100 50 59 5c 50 42 4c 4f 43 4b 2c 57 32 33 2c 57 31 2c 57 30 2c 57 30 5c 53 4f 50 2d 50 41 4e 45 4c 20 46 2e 43 2e 20 4e 4f 54 20 55 53 45 44 20 28 3a 3d 30 29 00 09 00 b6 00 34 00 50 5c 43 41 4c 4c 5c 43 4f 50 59 44 44 2c 50 42 4c 4f 43 4b 2c ┆PY PBLOCK,W23,W1,W0,W0 SOP-PANEL F.C. NOT USED (:=0) 4 P CALL COPYDD,PBLOCK,┆
0x9100…9150 42 50 4f 4f 4c 28 57 31 29 2c 42 50 4f 4f 4c 28 57 31 38 29 2c 52 45 54 43 4f 44 20 00 09 00 f6 00 24 00 50 5c 5c 5c 42 50 4f 4f 4c 28 57 31 29 20 3d 20 42 55 46 31 20 3d 20 32 30 34 38 20 57 4f 52 44 53 00 09 01 2e 00 24 00 50 5c 5c 5c 42 ┆BPOOL(W1),BPOOL(W18),RETCOD $ P BPOOL(W1) = BUF1 = 2048 WORDS . $ P B┆
0x9150…91a0 50 4f 4f 4c 28 57 31 38 29 3d 20 42 55 46 32 20 3d 20 20 32 30 30 20 57 4f 52 44 53 00 09 01 56 00 1a 00 50 5c 43 42 45 5c 52 45 54 43 4f 44 2c 57 30 2c 43 4f 50 00 00 00 00 00 00 00 6a 01 90 34 35 30 20 00 09 01 7e 00 2a 00 50 5c 43 42 45 ┆POOL(W18)= BUF2 = 200 WORDS V P CBE RETCOD,W0,COP j 450 ~ * P CBE┆
0x91a0…91f0 5c 52 45 54 43 4f 44 2c 57 39 2c 43 4f 50 30 30 30 5c 4f 50 45 52 41 54 4f 52 20 41 42 4f 52 54 45 44 00 0a 00 0c 00 0a 00 50 43 4f 50 34 32 30 00 0a 00 3a 00 10 00 50 5c 50 45 52 46 5c 44 49 53 45 52 52 00 0a 00 48 00 0e 00 50 5c 42 5c 43 ┆ RETCOD,W9,COP000 OPERATOR ABORTED PCOP420 : P PERF DISERR H P B C┆
0x91f0…9240 4f 50 33 35 30 20 00 0a 00 5c 00 0a 00 50 43 4f 50 34 35 30 00 0a 00 6e 00 0e 00 50 5c 50 45 52 46 5c 48 41 4c 54 00 0a 00 7c 00 0e 00 50 5c 42 5c 43 4f 50 30 30 30 20 00 0a 00 8e 00 0a 00 50 5c 45 4a 45 43 54 00 0a 00 a0 00 1a 00 50 2a 2a ┆OP350 PCOP450 n P PERF HALT | P B COP000 P EJECT P**┆
0x9240…9290 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 0a 00 ae 00 1a 00 50 2a 20 43 4f 50 59 20 46 49 4c 45 20 54 4f 20 46 49 4c 45 20 2a 20 00 0a 00 cc 00 1a 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 ┆******************* P* COPY FILE TO FILE * P********************* ┆
0x9290…92e0 00 0a 00 ea 00 0a 00 50 43 4f 50 35 30 30 00 0a 01 08 00 12 00 50 5c 41 54 54 46 4d 54 5c 46 43 4f 50 46 20 00 0a 01 16 00 12 00 50 5c 53 45 54 5c 44 45 50 52 4f 4d 50 54 20 00 0a 01 2c 00 0e 00 50 5c 53 45 54 5c 42 4f 4f 4c 32 00 0a 01 42 ┆ PCOP500 P ATTFMT FCOPF P SET DEPROMPT , P SET BOOL2 B┆
0x92e0…9330 00 0a 00 50 43 4f 50 35 31 30 00 0a 01 54 00 10 00 50 5c 50 45 52 46 5c 44 45 43 4c 52 41 00 0a 01 62 00 0a 00 50 43 4f 50 35 32 30 00 0a 01 76 00 24 00 50 5c 49 42 5c 44 45 42 49 4e 57 32 2c 00 00 00 00 00 00 00 6a 01 90 43 4f 50 35 31 30 ┆ PCOP510 T P PERF DECLRA b PCOP520 v $ P IB DEBINW2, j COP510┆
0x9330…9380 2c 43 4f 50 30 30 30 2c 43 4f 50 35 34 30 00 0a 01 84 00 1a 00 50 5c 50 45 52 46 5c 44 53 4b 45 52 52 2c 57 30 5c 27 42 45 4c 4c 27 00 0b 00 1c 00 0e 00 50 5c 42 5c 43 4f 50 35 32 30 20 00 0b 00 3a 00 0a 00 50 43 4f 50 35 34 30 00 0b 00 4c ┆,COP000,COP540 P PERF DSKERR,W0 'BELL' P B COP520 : PCOP540 L┆
0x9380…93d0 00 28 00 50 5c 43 4c 45 41 52 5c 42 4f 4f 4c 35 5c 46 49 4c 45 20 50 52 45 53 45 4e 43 45 20 49 4e 44 49 43 41 54 4f 52 00 0b 00 5a 00 16 00 50 5c 4d 4f 56 45 5c 4e 4f 52 45 43 2c 3d 44 27 30 30 27 00 0b 00 86 00 2a 00 50 5c 50 45 52 46 5c ┆ ( P CLEAR BOOL5 FILE PRESENCE INDICATOR Z P MOVE NOREC,=D'00' * P PERF ┆
0x93d0…9420 43 48 56 4e 41 4d 2c 56 4f 4c 45 58 31 2c 46 43 4f 44 31 5c 43 48 41 4e 47 45 20 4e 41 4d 45 20 00 0b 00 a0 00 10 00 50 5c 42 4e 4f 4b 5c 43 4f 50 35 34 36 00 0b 00 ce 00 2a 00 50 5c 50 45 52 46 5c 43 48 56 4e 41 4d 2c 56 4f 4c 45 58 32 2c ┆CHVNAM,VOLEX1,FCOD1 CHANGE NAME P BNOK COP546 * P PERF CHVNAM,VOLEX2,┆
0x9420…9470 46 43 4f 44 32 5c 43 48 41 4e 47 45 20 4e 41 4d 45 20 00 0b 00 e2 00 10 00 50 5c 42 4e 4f 4b 5c 43 4f 50 35 34 34 00 0b 01 10 00 22 00 50 5c 53 45 54 5c 42 4f 4f 4c 35 5c 22 46 49 4c 45 20 4e 41 4d 45 20 55 4e 4b 4e 4f 57 4e 22 00 0b 01 24 ┆FCOD2 CHANGE NAME P BNOK COP544 " P SET BOOL5 "FILE NAME UNKNOWN" $┆
0x9470…94c0 00 1c 00 50 5c 43 42 45 5c 46 43 4f 44 31 2c 46 43 4f 44 32 2c 43 4f 50 35 34 31 20 00 0b 01 4a 00 3e 00 50 5c 43 41 4c 4c 20 4f 50 45 4e 46 2c 44 49 53 4b 2c 46 49 4c 45 43 4f 44 45 28 57 31 29 2c 53 59 53 42 55 46 2c 46 00 00 00 00 00 00 ┆ P CBE FCOD1,FCOD2,COP541 J > P CALL OPENF,DISK,FILECODE(W1),SYSBUF,F ┆
0x94c0…9510 00 6a 01 90 49 4c 4e 41 4d 2c 56 4f 4c 45 58 31 2c 52 45 54 43 4f 44 20 00 0b 01 6a 00 0e 00 50 5c 42 5c 43 4f 50 35 34 32 20 00 0c 00 1c 00 0a 00 50 43 4f 50 35 34 31 00 0c 00 2e 00 3e 00 50 5c 43 41 4c 4c 5c 4f 50 45 4e 46 2c 44 49 53 4b ┆ j ILNAM,VOLEX1,RETCOD j P B COP542 PCOP541 . > P CALL OPENF,DISK┆
0x9510…9560 2c 46 49 4c 45 43 4f 44 45 28 57 31 29 2c 53 59 53 42 55 46 2c 46 49 4c 4e 41 4d 2c 56 4f 4c 45 58 32 2c 52 45 54 43 4f 44 20 00 0c 00 3c 00 0a 00 50 43 4f 50 35 34 32 00 0c 00 7e 00 10 00 50 5c 42 4e 4f 4b 5c 43 4f 50 35 34 33 00 0c 00 8c ┆,FILECODE(W1),SYSBUF,FILNAM,VOLEX2,RETCOD < PCOP542 ~ P BNOK COP543 ┆
0x9560…95b0 00 26 00 50 5c 43 4c 45 41 52 5c 42 4f 4f 4c 35 5c 22 46 49 4c 45 20 4e 41 4d 45 20 4b 4e 4f 57 4e 2e 2e 2e 22 20 00 0c 00 a0 00 34 00 50 5c 43 41 4c 4c 20 43 4c 4f 53 45 46 2c 44 49 53 4b 2c 46 49 4c 45 43 4f 44 45 28 57 31 29 2c 52 42 55 ┆ & P CLEAR BOOL5 "FILE NAME KNOWN..." 4 P CALL CLOSEF,DISK,FILECODE(W1),RBU┆
0x95b0…9600 46 2c 4e 4f 52 45 43 2c 52 45 54 43 4f 44 00 0c 00 ca 00 10 00 50 5c 42 4f 4b 5c 43 4f 50 35 34 38 20 00 0c 01 02 00 0a 00 50 43 4f 50 35 34 33 00 0c 01 16 00 2a 00 50 5c 50 45 52 46 5c 43 48 56 4e 41 4d 2c 43 4f 50 4e 41 4d 2c 46 43 4f 44 ┆F,NOREC,RETCOD P BOK COP548 PCOP543 * P PERF CHVNAM,COPNAM,FCOD┆
0x9600…9650 32 5c 43 48 41 4e 47 45 20 4e 41 4d 45 20 00 0c 01 24 00 10 00 50 5c 42 4e 4f 4b 5c 43 4f 50 35 34 36 00 0c 01 52 00 1c 00 50 5c 43 42 45 5c 46 43 4f 44 31 2c 46 43 4f 44 32 2c 43 4f 50 35 34 36 20 00 0c 01 66 00 0a 00 50 43 4f 50 35 34 34 ┆2 CHANGE NAME $ P BNOK COP546 R P CBE FCOD1,FCOD2,COP546 f PCOP544┆
0x9650…96a0 00 0c 01 86 00 00 00 00 00 00 00 6a 01 90 00 2a 00 50 5c 50 45 52 46 5c 43 48 56 4e 41 4d 2c 56 4f 4c 4e 41 4d 2c 46 43 4f 44 31 5c 43 48 41 4e 47 45 20 4e 41 4d 45 20 00 0d 00 04 00 0a 00 50 43 4f 50 35 34 36 00 0d 00 32 00 26 00 50 5c 54 ┆ j * P PERF CHVNAM,VOLNAM,FCOD1 CHANGE NAME PCOP546 2 & P T┆
0x96a0…96f0 42 54 5c 42 4f 4f 4c 35 2c 43 4f 50 35 34 37 5c 46 49 4c 45 20 4e 4f 54 20 50 52 45 53 45 4e 54 00 0d 00 40 00 10 00 50 5c 50 45 52 46 5c 44 49 53 45 52 52 00 0d 00 6a 00 0e 00 50 5c 42 5c 43 4f 50 35 32 30 20 00 0d 00 7e 00 0a 00 50 43 4f ┆BT BOOL5,COP547 FILE NOT PRESENT @ P PERF DISERR j P B COP520 ~ PCO┆
0x96f0…9740 50 35 34 37 00 0d 00 90 00 28 00 50 5c 50 45 52 46 5c 44 53 4b 45 52 52 2c 57 31 32 5c 22 46 49 4c 45 20 4e 41 4d 45 20 55 4e 4b 4e 4f 57 4e 22 00 0d 00 9e 00 0e 00 50 5c 42 5c 43 4f 50 35 32 30 20 00 0d 00 ca 00 0a 00 50 43 4f 50 35 34 38 ┆P547 ( P PERF DSKERR,W12 "FILE NAME UNKNOWN" P B COP520 PCOP548┆
0x9740…9770 00 0d 00 dc 00 3e 00 50 5c 43 41 4c 4c 20 4f 50 45 4e 46 2c 44 49 53 4b 2c 46 49 4c 45 43 4f 44 45 28 57 33 29 2c 53 59 53 42 55 46 2c 43 4f 50 ┆ > P CALL OPENF,DISK,FILECODE(W3),SYSBUF,COP┆