PROCEDURE DNTOA (NUM,BASE,BA);                                          00010000
   VALUE NUM,BASE;                                                      00015000
   DOUBLE NUM; INTEGER BASE; BYTE ARRAY BA;                             00020000
   BEGIN                                                                00025000
   BA(0) := "0";                                                        00030000
   WHILE NUM <> 0D DO                                                   00035000
      BEGIN                                                             00040000
      ASSEMBLE(ZERO; LOAD NUM; LOAD BASE; LDIV;                         00045000
               LDD NUM; DELB; LOAD BASE; LDIV;                          00050000
               ADDI %60);                                               00055000
      BA(X) := TOS;                                                     00060000
      NUM := TOS;                                                       00065000
      X := X-1                                                          00070000
      END                                                               00075000
   END;                                                                 00080000
PROCEDURE NTOA (NUM,BASE,BA);                                           00085000
   VALUE NUM,BASE;                                                      00090000
   INTEGER NUM,BASE;                                                    00095000
   BYTE ARRAY BA;                                                       00100000
   DNTOA(DOUBLE(LOGICAL(NUM)),BASE,BA);                                 00105000
INTEGER PROCEDURE LDNTOA(NUM, BASE, BA);                                00110000
   VALUE NUM, BASE;                                                     00115000
   DOUBLE NUM;                                                          00120000
   INTEGER BASE;                                                        00125000
   BYTE ARRAY BA;                                                       00130000
BEGIN                                                                   00135000
   BYTE ARRAY BUF(0:11)=Q;                                              00140000
                                                                        00145000
   X := 12;                                                             00150000
   DO BEGIN                                                             00155000
      ASSEMBLE(ZERO; LOAD NUM; LOAD BASE; LDIV;                         00160000
               LDD NUM; DELB; LOAD BASE; LDIV;                          00165000
               ADDI %60);                                               00170000
      BUF(X:=X-1) := TOS;                                               00175000
      NUM := TOS;                                                       00180000
      END UNTIL NUM=0D;                                                 00185000
   MOVE BA := BUF(X),(LDNTOA:=12-X);                                    00190000
END;                                                                    00195000
INTEGER PROCEDURE LNTOA( NUM, BASE, BA);                                00200000
   VALUE NUM, BASE;                                                     00205000
   INTEGER NUM, BASE;                                                   00210000
   BYTE ARRAY BA;                                                       00215000
   LNTOA := LDNTOA(DOUBLE(LOGICAL(NUM)),BASE,BA);                       00220000
INTEGER PROCEDURE ASCII( NUM,BASE, BUF);                                00225000
   VALUE NUM,BASE;                                                      00230000
   INTEGER NUM,BASE;                                                    00235000
   BYTE ARRAY BUF;                                                      00240000
   ASCII := LDNTOA(DOUBLE(LOGICAL(NUM)),BASE,BUF);                      00245000
                                                                        00250000
                                                                        00255000
                                                                        00260000
<<  ************************************************  >>                00265000
<<  *      The entire procedure GENMESSAGE was     *  >>                00270000
<<  *  added to initial 9/22/79.  The fix numbers  *  >>                00275000
<<  *  in columns 64/72 apply to the entire        *  >>                00280000
<<  *  procedure.                                  *  >>                00285000
<<  ************************************************  >>                00290000
INTEGER PROCEDURE GENMESSAGE(MSGNR,BUF,NUM1,NUM2,NUM3,NUM4,             00295000
       STRING1,STRING2);                                                00300000
   VALUE MSGNR,NUM1,NUM2,NUM3,NUM4;                                     00305000
   INTEGER MSGNR;                                                       00310000
   DOUBLE NUM1,NUM2,NUM3,NUM4;                                          00315000
   BYTE ARRAY BUF,STRING1,STRING2;                                      00320000
BEGIN COMMENT                                                           00325000
                                                                        00330000
      This procedure composes the message identified by                 00335000
   MSGNR and inserts the message in the buffer BUF,                     00340000
   returning the number of characters in the message.                   00345000
   If a message does not exist, a zero length is returned.              00350000
   If the message number is less than 2000 the message                  00355000
   will be preceeded with the error number.  Numbers and                00360000
   strings may be passed in and formated as part of the                 00365000
   message.                                                             00370000
                                                                        00375000
   MESSAGE WORD DEFINATION                                              00380000
                                                                        00385000
      VOCAB WORD:                                                       00390000
                                                                        00395000
      Bit  2     Append a "S" to VOCAB word                             00400000
      Bits 3/15  Position of VOCAB word                                 00405000
                                                                        00410000
      PARAMETER PASSED:                                                 00415000
                                                                        00420000
      Bit   1    Must be set                                            00425000
      Bit  11    Parameter is to be formated in octal,                  00430000
                 will be preceeded with a "%" sign                      00435000
      Bit  12    Parameter is a string                                  00440000
      Bits 13/15 Position of parameter (numbers and                     00445000
                 strings both start a zero)                             00450000
;                                                                       00455000
EQUATE                                                                  00460000
   PLURAL    = %20000,  << APPEND A "S" TO VOCAB WORD     >>            00465000
   PD1       = %40000,  << CONVERT FIRST PARM TO DECIMAL  >>            00470000
   PD2       = %40001,  << CONVERT SECOND PARM TO DECIMAL >>            00475000
   PD3       = %40002,  << CONVERT THIRD PARM TO DECIMAL  >>            00480000
   PD4       = %40003,  << CONVERT FOURTH PARM TO DECIMAL >>            00485000
   PO1       = %40020,  << CONVERT FIRST PARM TO OCTAL    >>            00490000
   PO2       = %40021,  << CONVERT SECOND PARM TO OCTAL   >>            00495000
   PO3       = %40022,  << CONVERT THIRD PARM TO OCTAL    >>            00500000
   PO4       = %40023,  << CONVERT FOURTH PARM TO OCTAL   >>            00505000
   STR1      = %40010,  << FIRST STRING PRAM              >>            00510000
   STR2      = %40011;  << SECORD STRING PRAM             >>            00515000
BYTE ARRAY VOCAB(*) = PB :=                                             00520000
    1,"A",                                                              00525000
    7,"ABORTED",                                                        00530000
    6,"ACCEPT",                                                         00535000
    6,"ACCESS",                                                         00540000
    7,"ACCOUNT",                                                        00545000
    3,"ADD",                                                            00550000
    5,"ADDED",                                                          00555000
   10,"ADDITIONAL",                                                     00560000
    7,"ADDRESS",                                                        00565000
    5,"AHEAD",                                                          00570000
    3,"ALL",                                                            00575000
    8,"ALLOCATE",                                                       00580000
   10,"ALLOCATION",                                                     00585000
    9,"ALLOWABLE",                                                      00590000
    7,"ALLOWED",                                                        00595000
    7,"ALREADY",                                                        00600000
    7,"ALTDSEG",                                                        00605000
    9,"ALTERNATE",                                                      00610000
    2,"AN",                                                             00615000
    3,"AND",                                                            00620000
    7,"ANOTHER",                                                        00625000
    6,"ANSWER",                                                         00630000
    3,"ANY",                                                            00635000
    3,"ARE",                                                            00640000
    4,"AREA",                                                           00645000
    2,"AS",                                                             00650000
    7,"ASSUMED",                                                        00655000
    2,"AT",                                                             00660000
    8,"ATTACHIO",                                                       00665000
    7,"ATTEMPT",                                                        00670000
    9,"ATTENTION",                                                      00675000
    4,"AUTO",                                                  <<i8964>>00680000
    9,"AUTOMATIC",                                                      00685000
    9,"AVAILABLE",                                                      00690000
    3,"BAD",                                                            00695000
    4,"BANK",                                                           00700000
    2,"BE",                                                             00705000
    7,"BECAUSE",                                                        00710000
    4,"BEEN",                                                           00715000
    5,"BEING",                                                          00720000
    7,"BINDING",                                                        00725000
    5,"BLANK",                                                          00730000
    9,"BLOCKSIZE",                                                      00735000
    5,"BOARD",                                                          00740000
    4,"BOOT",                                                           00745000
    9,"BOOTSTRAP",                                                      00750000
    5,"BOUND",                                                          00755000
   10,"BREAKPOINT",                                                     00760000
    6,"BUFFER",                                                         00765000
    2,"BY",                                                             00770000
    4,"CALL",                                                           00775000
    3,"CAN",                                                            00780000
    6,"CANNOT",                                                         00785000
   12,"CAPABILITIES",                                                   00790000
    7,"CATALOG",                                                        00795000
    6,"CHANGE",                                                         00800000
   10,"CHANGEABLE",                                                     00805000
    7,"CHANGED",                                                        00810000
    7,"CHANNEL",                                                        00815000
   10,"CHARACTERS",                                                     00820000
    8,"CHECKSUM",                                                       00825000
    8,"CIRCULAR",                                                       00830000
    5,"CLASS",                                                          00835000
    7,"CLASSES",                                                        00840000
    3,"CMD",                                                            00845000
    4,"CODE",                                                           00850000
   25,"<COLDSTART/RELOAD/UPDATE>",                                      00855000
    4,"COLD",                                                           00860000
    8,"COLDLOAD",                                                       00865000
   13,"COLD-LOADABLE",                                                  00870000
    9,"COLDSTART",                                                      00875000
   12,"COMBINATIONS",                                                   00880000
    1,",",                                                              00885000
    7,"COMMAND",                                                        00890000
    7,"COMPARE",                                                        00895000
    9,"COMPLETED",                                                      00900000
    9,"COMPLETOR",                                                      00905000
    7,"COMPLEX",                                                        00910000
    9,"COMPONENT",                                                      00915000
   10,"CONCURRENT",                                                     00920000
    8,"CONFDATA",                                                       00925000
   13,"CONFIGURATION",                                                  00930000
   10,"CONFIGURED",                                                     00935000
    7,"CONNECT",                                                        00940000
    7,"CONSOLE",                                                        00945000
    8,"CONTAINS",                                                       00950000
    8,"CONTINUE",                                                       00955000
    7,"CONTROL",                                                        00960000
   10,"CONTROLLER",                                                     00965000
    9,"CONVERTED",                                                      00970000
    9,"COOLSTART",                                                      00975000
    4,"CORE",                                                           00980000
    7,"CORRECT",                                                        00985000
   11,"CORRECTABLE",                                                    00990000
    3,"CPU",                                                            00995000
    4,"CPVA",                                                           01000000
    3,"CRC",                                                            01005000
    8,"CREATION",                                                       01010000
    2,%15,%12,                                                          01015000
    2,"CS",                                                             01020000
    5,"CS'80",                                                          01025000
    3,"CST",                                                            01030000
    6,"CSTBLK",                                                         01035000
    7,"CURRENT",                                                        01040000
    8,"CYLINDER",                                                       01045000
    4,"DATA",                                                           01050000
    4,"DATE",                                                           01055000
    7,"DEFAULT",                                                        01060000
    9,"DEFECTIVE",                                                      01065000
    7,"DEFINED",                                                        01070000
    5,"DELAY",                                                          01075000
    6,"DELETE",                                                         01080000
    9,"DEPENDENT",                                                      01085000
   10,"DESCRIPTOR",                                                     01090000
    9,"DESTROYED",                                                      01095000
    7,"DEVDATA",                                                        01100000
    6,"DEVICE",                                                         01105000
    4,"DIAL",                                                           01110000
    9,"DIFFERENT",                                                      01115000
    9,"DIRECTORY",                                                      01120000
    7,"DISABLE",                                                        01125000
    4,"DISC",                                                           01130000
    8,"DISMOUNT",                                                       01135000
    2,"DO",                                                             01140000
    4,"DOES",                                                           01145000
    6,"DOUBLE",                                                         01150000
    5,"DRIVE",                                                          01155000
    6,"DRIVER",                                                         01160000
    3,"DRT",                                                            01165000
    3,"DST",                                                            01170000
    4,"DUAL",                                                           01175000
    4,"DUMP",                                                           01180000
    6,"DUMPED",                                                         01185000
    9,"DUPLICATE",                                                      01190000
   11,"DUPLICATIVE",                                                    01195000
    6,"DURING",                                                         01200000
    7,"EARLIER",                                                        01205000
    1,"8",                                                              01210000
    6,"ENABLE",                                                         01215000
    3,"END",                                                            01220000
    5,"ENTER",                                                          01225000
    7,"ENTRIES",                                                        01230000
    5,"ENTRY",                                                          01235000
    3,"EOF",                                                            01240000
    1,"=",                                                              01245000
    5,"ERROR",                                                          01250000
    6,"EXCEED",                                                         01255000
    8,"EXCEEDED",                                                       01260000
    5,"EXIST",                                                          01265000
   12,"EXPERIMENTAL",                                                   01270000
    8,"EXTENDED",                                                       01275000
    6,"EXTENT",                                                         01280000
    8,"EXTERNAL",                                                       01285000
    5,"EXTRA",                                                          01290000
    8,"FACILITY",                                                       01295000
    7,"FAILURE",                                                        01300000
    5,"FATAL",                                                          01305000
    2,"15",                                                             01310000
    4,"FILE",                                                           01315000
    8,"FILENAME",                                                       01320000
    7,"FLAGGED",                                                        01325000
    9,"FOLLOWING",                                                      01330000
    3,"FOR",                                                            01335000
    1,"4",                                                              01340000
    7,"FOREIGN",                                                        01345000
    6,"FORMAT",                                                         01350000
    5,"FOUND",                                                          01355000
    4,"FREE",                                                           01360000
    4,"FROM",                                                           01365000
    4,"FULL",                                                           01370000
    8,"FUNCTION",                                                       01375000
    2,">=",                                                             01380000
    7,"GETDSEG",                                                        01385000
    7,"GETTING",                                                        01390000
    6,"GLOBAL",                                                         01395000
    5,"GROUP",                                                          01400000
    4,"HALF",                                                           01405000
    4,"HALT",                                                           01410000
    7,"HANDLER",                                                        01415000
    8,"HARDWARE",                                                       01420000
    3,"HAS",                                                            01425000
    4,"HAVE",                                                           01430000
    4,"HEAD",                                                           01435000
    7,"HIGHEST",                                                        01440000
    4,"HPIB",                                                           01445000
    7,"HP32002",                                                        01450000
    7,"HP32033",                                                        01455000
    1,"-",                                                              01460000
    3,"I/O",                                                            01465000
    3,"ICS",                                                            01470000
    2,"ID",                                                             01475000
    7,"ILLEGAL",                                                        01480000
   12,"IMCOMPATIBLE",                                                   01485000
    8,"IMPROPER",                                                       01490000
    2,"IN",                                                             01495000
    6,"IN/OUT",                                                         01500000
    8,"INDIRECT",                                                       01505000
   11,"INFORMATION",                                                    01510000
    4,"ININ",                                                           01515000
    7,"INITIAL",                                                        01520000
   14,"INITIALIZATION",                                                 01525000
    9,"INITIALLY",                                                      01530000
    9,"INITIATOR",                                                      01535000
    5,"INPUT",                                                          01540000
   12,"INSTALLATION",                                                   01545000
   12,"INSUFFICIENT",                                                   01550000
   11,"INTERACTIVE",                                                    01555000
   14,"INTERCOMPONENT",                                                 01560000
    9,"INTERFACE",                                                      01565000
    9,"INTERRUPT",                                                      01570000
    4,"INTO",                                                           01575000
    7,"INVALID",                                                        01580000
    3,"IOP",                                                            01585000
   13,"IRRECOVERABLE",                                                  01590000
    2,"IS",                                                             01595000
    4,"JMAT",                                                           01600000
    3,"JOB",                                                            01605000
   13,"JOBS/SESSIONS",                                                  01610000
   11,"KILOSECTORS",                                                    01615000
    5,"LABEL",                                                          01620000
    5,"LARGE",                                                          01625000
    4,"LDEV",                                                           01630000
    6,"LENGTH",                                                         01635000
    2,"<=",                                                             01640000
    5,"LEVEL",                                                          01645000
    7,"LIBRARY",                                                        01650000
    5,"LIMIT",                                                          01655000
    4,"LIST",                                                           01660000
    4,"LOAD",                                                           01665000
    6,"LOADED",                                                         01670000
    6,"LOADER",                                                         01675000
    7,"LOADING",                                                        01680000
    5,"LOCAL",                                                          01685000
    3,"LOG",                                                            01690000
    7,"LOGGING",                                                        01695000
    7,"LOGICAL",                                                        01700000
    5,"LOGID",                                                          01705000
    5,"LOGON",                                                          01710000
    4,"LONG",                                                           01715000
    6,"LONGER",                                                         01720000
    4,"LOST",                                                           01725000
   11,"MAINTENANCE",                                                    01730000
    4,"MAKE",                                                           01735000
    7,"MAKECAT",                                                        01740000
   10,"MANAGEMENT",                                                     01745000
    4,"MANY",                                                           01750000
    3,"MAP",                                                            01755000
    5,"MARK.",                                                          01760000
    6,"MARKER",                                                         01765000
    4,"MASK",                                                           01770000
    6,"MASTER",                                                         01775000
    3,"MAX",                                                            01780000
    3,"MAY",                                                            01785000
    5,"MEDIA",                                                          01790000
    6,"MEMBER",                                                         01795000
    6,"MEMORY",                                                         01800000
    7,"MESSAGE",                                                        01805000
    3,"MIN",                                                            01810000
    4,"MISC",                                                           01815000
    7,"MISSING",                                                        01820000
    3,"MOD",                                                            01825000
    4,"MODE",                                                           01830000
    6,"MODULE",                                                         01835000
    4,"MORE",                                                           01840000
    5,"MOUNT",                                                          01845000
    7,"MOUNTED",                                                        01850000
    6,"MOVING",                                                         01855000
    3,"MPE",                                                            01860000
    4,"MUST",                                                           01865000
    7,"125-127",                                                        01870000
   14,"NON-RESPONDING",                                                 01875000
    4,"NAME",                                                           01880000
    3,"NEW",                                                            01885000
    4,"NEXT",                                                           01890000
    2,"NO",                                                             01895000
    3,"NON",                                                            01900000
    6,"NORMAL",                                                         01905000
    3,"NOT",                                                            01910000
    3,"NOW",                                                            01915000
    1,"#",                                                              01920000
    6,"NUMBER",                                                         01925000
    3,"#'S",                                                            01930000
    6,"OBTAIN",                                                         01935000
    2,"OF",                                                             01940000
    3,"OFF",                                                            01945000
    4,"OKAY",                                                           01950000
    3,"OLD",                                                            01955000
    2,"ON",                                                             01960000
    6,"ON/OFF",                                                         01965000
    1,"1",                                                              01970000
    4,"ONLY",                                                           01975000
    4,"OPEN",                                                           01980000
    9,"OPERATION",                                                      01985000
    6,"OPTION",                                                         01990000
    2,"OR",                                                             01995000
    3,"OUT",                                                            02000000
    6,"OUTPUT",                                                         02005000
    8,"OVERFLOW",                                                       02010000
    7,"OVERRUN",                                                        02015000
    4,"PACK",                                                           02020000
   10,"PARAMETERS",                                                     02025000
    6,"PARITY",                                                         02030000
    4,"PART",                                                           02035000
    4,"PASS",                                                           02040000
    5,"PATCH",                                                          02045000
    3,"PCB",                                                            02050000
    7,"PENDING",                                                        02055000
    3,"PER",                                                            02060000
    9,"PERFORMED",                                                      02065000
   10,"PERFORMING",                                                     02070000
    1,".",                                                              02075000
    5,"PHONE",                                                          02080000
    8,"PHYSICAL",                                                       02085000
    4,"POLL",                                                           02090000
    4,"PORT",                                                           02095000
    7,"PORTION",                                                        02100000
    8,"POSSIBLE",                                                       02105000
    9,"PREFERRED",                                                      02110000
    8,"PREVIOUS",                                                       02115000
    7,"PRIMARY",                                                        02120000
    8,"PRIORITY",                                                       02125000
    7,"PROCESS",                                                        02130000
    9,"PROCESSES",                                                      02135000
    7,"PROGRAM",                                                        02140000
    8,"PROGRESS",                                                       02145000
    7,"PROTECT",                                                        02150000
    8,"PROTOCOL",                                                       02155000
    5,"PURGE",                                                          02160000
    6,"PURGED",                                                         02165000
    5,"QUEUE",                                                          02170000
    5,"RANGE",                                                          02175000
    4,"READ",                                                           02180000
    7,"READING",                                                        02185000
    5,"READY",                                                          02190000
    8,"REASSIGN",                                                       02195000
   10,"REASSIGNED",                                                     02200000
    7,"RECEIVE",                                                        02205000
   12,"RECONFIGURED",                                                   02210000
    6,"RECORD",                                                         02215000
    9,"(RECORDS)",                                                      02220000
    7,"RECOVER",                                                        02225000
    4,"REEL",                                                           02230000
   12,"REINITIALIZE",                                                   02235000
    8,"REJECTED",                                                       02240000
    6,"RELOAD",                                                         02245000
    6,"REMOTE",                                                         02250000
    9,"REMOVABLE",                                                      02255000
    8,"REPAIRED",                                                       02260000
    7,"REPEATS",                                                        02265000
    7,"REPLACE",                                                        02270000
    8,"REPLACED",                                                       02275000
   11,"REPLACEMENT",                                                    02280000
    5,"REPLY",                                                 <<i8964>>02285000
    7,"REQUEST",                                                        02290000
    8,"REQUIRED",                                                       02295000
    8,"RESERVED",                                                       02300000
    8,"RESIDENT",                                                       02305000
    7,"RETRIES",                                                        02310000
    9,"RETURNING",                                                      02315000
    3,"RIN",                                                            02320000
    7,"RUNNING",                                                        02325000
    3,"(S)",                                                            02330000
    4,"SAME",                                                           02335000
    4,"SAVE",                                                           02340000
   10,"SCHEDULING",                                                     02345000
    6,"SECOND",                                                         02350000
    9,"SECONDARY",                                                      02355000
    7,"SECTION",                                                        02360000
    6,"SECTOR",                                                         02365000
    9,"(SECTORS)",                                                      02370000
    9,"SEEKAHEAD",                                                      02375000
    8,"[,S/C/P]",                                                       02380000
    7,"SEGMENT",                                                        02385000
   16,"SEGMENTS/PROCESS",                                               02390000
    8,"SEQUENCE",                                                       02395000
    6,"SERIAL",                                                         02400000
    9,"SERIES 33",                                                      02405000
    8,"SESSIONS",                                                       02410000
    3,"SET",                                                            02415000
    1,"7",                                                              02420000
    3,"SIO",                                                            02425000
    1,"6",                                                              02430000
    4,"SIZE",                                                           02435000
    2,"SL",                                                             02440000
    8,"SOFTDUMP",                                                       02445000
    8,"SOFTWARE",                                                       02450000
    5,"SPACE",                                                          02455000
    5,"SPARE",                                                          02460000
    7,"SPARING",                                                        02465000
    7,"SPECIAL",                                                        02470000
    8,"SPECIFIC",                                                       02475000
    9,"SPECIFIED",                                                      02480000
    7,"SPECIFY",                                                        02485000
    5,"SPEED",                                                          02490000
    7,"SPOOLED",                                                        02495000
    9,"SPOOLFILE",                                                      02500000
    6,"SPREAD",                                                         02505000
   38,"<SPREAD/COMPACT/RESTORE/ACCOUNTS/NULL>",                         02510000
    5,"STACK",                                                          02515000
    2,"**",                                                             02520000
    7,"STATION",                                                        02525000
    6,"STATUS",                                                         02530000
    3,"STD",                                                            02535000
    3,"SUB",                                                            02540000
    6,"SUBSET",                                                         02545000
    4,"SUCH",                                                           02550000
    9,"SUPPORTED",                                                      02555000
    8,"SUPPOSED",                                                       02560000
    4,"SWAP",                                                           02565000
    6,"SYNTAX",                                                         02570000
    7,"SYSDUMP",                                                        02575000
    6,"SYSTEM",                                                         02580000
    5,"TABLE",                                                          02585000
    4,"TAPE",                                                           02590000
    4,"TERM",                                                           02595000
   42,"ENTER [TERM TYPE #],[DESCRIPTOR FILENAME] ",                     02600000
    8,"TERMINAL",                                                       02605000
    4,"THAN",                                                           02610000
    4,"THAT",                                                           02615000
    3,"THE",                                                            02620000
    4,"THIS",                                                           02625000
    4,"TIME",                                                           02630000
    7,"TIMEOUT",                                                        02635000
    5,"TIMER",                                                          02640000
    6,"TIMING",                                                         02645000
    2,"TO",                                                             02650000
    3,"TOO",                                                            02655000
    5,"TOTAL",                                                          02660000
    5,"TRACE",                                                          02665000
    5,"TRACK",                                                          02670000
   12,"TRACK/SECTOR",                                                   02675000
    7,"TRAILER",                                                        02680000
    8,"TRANSFER",                                                       02685000
   12,"TRANSMISSION",                                                   02690000
    3,"TRY",                                                            02695000
    4,"TYPE",                                                           02700000
    4,"UCOP",                                                           02705000
    6,"UNABLE",                                                         02710000
   11,"UNAVAILABLE",                                                    02715000
   13,"UNCORRECTABLE",                                                  02720000
    9,"UNDEFINED",                                                      02725000
   13,"UNINITIALIZED",                                                  02730000
    6,"UNIQUE",                                                         02735000
    4,"UNIT",                                                           02740000
    7,"UNKNOWN",                                                        02745000
   10,"UNRESOLVED",                                                     02750000
    2,"UP",                                                             02755000
    6,"UPDATE",                                                         02760000
    3,"USE",                                                            02765000
    4,"USED",                                                           02770000
    4,"USER",                                                           02775000
    7,"USLFILE",                                                        02780000
    7,"VERSION",                                                        02785000
    7,"VIRTUAL",                                                        02790000
    6,"VOLUME",                                                         02795000
    4,"WANT",                                                           02800000
   21,"<WARMSTART/COOLSTART>",                                          02805000
    9,"WARMSTART",                                                      02810000
   11,"**WARNING**",                                                    02815000
    7,"WELCOME",                                                        02820000
    4,"WENT",                                                           02825000
    5,"WHICH",                                                          02830000
    5,"WHILE",                                                          02835000
    5,"WIDTH",                                                          02840000
    4,"WILL",                                                           02845000
    4,"WITH",                                                           02850000
    7,"WITHOUT",                                                        02855000
   11,"WRAP-AROUND",                                                    02860000
    5,"WRONG",                                                          02865000
    5,"WSTAB",                                                          02870000
    3,"YOU",                                                            02875000
    1,"0";                                                              02880000
EQUATE                                                                  02885000
   A                 = 0,                                               02890000
   ABORTED           = A                +1,                             02895000
   ACCEPT            = ABORTED          +1,                             02900000
   ACCESS            = ACCEPT           +1,                             02905000
   ACCOUNT           = ACCESS           +1,                             02910000
   ADD               = ACCOUNT          +1,                             02915000
   ADDED             = ADD              +1,                             02920000
   ADDITIONAL        = ADDED            +1,                             02925000
   ADDRESS           = ADDITIONAL       +1,                             02930000
   AHEAD             = ADDRESS          +1,                             02935000
   ALL               = AHEAD            +1,                             02940000
   ALLOCATE          = ALL              +1,                             02945000
   ALLOCATION        = ALLOCATE         +1,                             02950000
   ALLOWABLE         = ALLOCATION       +1,                             02955000
   ALLOWED           = ALLOWABLE        +1,                             02960000
   ALREADY           = ALLOWED          +1,                             02965000
   ALTDSEG           = ALREADY          +1,                             02970000
   ALTERNATE         = ALTDSEG          +1,                             02975000
   ALTERNATES        = ALTERNATE        +PLURAL,                        02980000
   AN                = ALTERNATE        +1,                             02985000
   AND'              = AN               +1,                             02990000
   ANOTHER           = AND'             +1,                             02995000
   ANSWER            = ANOTHER          +1,                             03000000
   ANY               = ANSWER           +1,                             03005000
   ARE               = ANY              +1,                             03010000
   AREA              = ARE              +1,                             03015000
   AS                = AREA             +1,                             03020000
   ASSUMED           = AS               +1,                             03025000
   AT                = ASSUMED          +1,                             03030000
   ATTACHIO          = AT               +1,                             03035000
   ATTEMPT           = ATTACHIO         +1,                             03040000
   ATTENTION         = ATTEMPT          +1,                             03045000
   AUTO              = ATTENTION        +1,                    <<i8964>>03050000
   AUTOMATIC         = AUTO             +1,                    <<i8964>>03055000
   AVAILABLE         = AUTOMATIC        +1,                             03060000
   BAD               = AVAILABLE        +1,                             03065000
   BANK              = BAD              +1,                             03070000
   BE                = BANK             +1,                             03075000
   BECAUSE           = BE               +1,                             03080000
   BEEN              = BECAUSE          +1,                             03085000
   BEING             = BEEN             +1,                             03090000
   BINDING           = BEING            +1,                             03095000
   BLANK             = BINDING          +1,                             03100000
   BLOCKSIZE         = BLANK            +1,                             03105000
   BOARD             = BLOCKSIZE        +1,                             03110000
   BOOT              = BOARD            +1,                             03115000
   BOOTSTRAP         = BOOT             +1,                             03120000
   BOUND             = BOOTSTRAP        +1,                             03125000
   BREAKPOINT        = BOUND            +1,                             03130000
   BUFFER            = BREAKPOINT       +1,                             03135000
   BUFFERS           = BUFFER           +PLURAL,                        03140000
   BY                = BUFFER           +1,                             03145000
   CALL              = BY               +1,                             03150000
   CAN               = CALL             +1,                             03155000
   CANNOT            = CAN              +1,                             03160000
   CAPABILITIES      = CANNOT           +1,                             03165000
   CATALOG           = CAPABILITIES     +1,                             03170000
   CHANGE            = CATALOG          +1,                             03175000
   CHANGEABLE        = CHANGE           +1,                             03180000
   CHANGED           = CHANGEABLE       +1,                             03185000
   CHANGES           = CHANGE           +PLURAL,                        03190000
   CHANNEL           = CHANGED          +1,                             03195000
   CHARACTERS        = CHANNEL          +1,                             03200000
   CHECKSUM'         = CHARACTERS       +1,                             03205000
   CIRCULAR          = CHECKSUM'        +1,                             03210000
   CLASS             = CIRCULAR         +1,                             03215000
   CLASSES           = CLASS            +1,                             03220000
   CMD               = CLASSES          +1,                             03225000
   CODE              = CMD              +1,                             03230000
   COL'REL'UPD       = CODE             +1,                             03235000
   COLD              = COL'REL'UPD      +1,                             03240000
   COLDLOAD          = COLD             +1,                             03245000
   COLD'LOADABLE     = COLDLOAD         +1,                             03250000
   COLDSTART         = COLD'LOADABLE    +1,                             03255000
   COMBINATIONS      = COLDSTART        +1,                             03260000
   COMMA             = COMBINATIONS     +1,                             03265000
   COMMAND           = COMMA            +1,                             03270000
   COMPARE           = COMMAND          +1,                             03275000
   COMPLETED         = COMPARE          +1,                             03280000
   COMPLETOR         = COMPLETED        +1,                             03285000
   COMPLEX           = COMPLETOR        +1,                             03290000
   COMPONENT         = COMPLEX          +1,                             03295000
   COMPONENTS        = COMPONENT        +PLURAL,                        03300000
   CONCURRENT        = COMPONENT        +1,                             03305000
   CONFDATA          = CONCURRENT       +1,                             03310000
   CONFIGURATION     = CONFDATA         +1,                             03315000
   CONFIGURED        = CONFIGURATION    +1,                             03320000
   CONNECT           = CONFIGURED       +1,                             03325000
   CONSOLE           = CONNECT          +1,                             03330000
   CONTAINS          = CONSOLE          +1,                             03335000
   CONTINUE          = CONTAINS         +1,                             03340000
   CONTROL           = CONTINUE         +1,                             03345000
   CONTROLLER        = CONTROL          +1,                             03350000
   CONVERTED         = CONTROLLER       +1,                             03355000
   COOLSTART         = CONVERTED        +1,                             03360000
   CORE              = COOLSTART        +1,                             03365000
   CORRECT           = CORE             +1,                             03370000
   CORRECTABLE       = CORRECT          +1,                             03375000
   CPU               = CORRECTABLE      +1,                             03380000
   CPVA              = CPU              +1,                             03385000
   CRC               = CPVA             +1,                             03390000
   CREATION          = CRC              +1,                             03395000
   CRLF              = CREATION         +1,                             03400000
   CS                = CRLF             +1,                             03405000
   CS'80             = CS               +1,                             03410000
   CST               = CS'80            +1,                             03415000
   CSTBLK            = CST              +1,                             03420000
   CURRENT           = CSTBLK           +1,                             03425000
   CYLINDER          = CURRENT          +1,                             03430000
   CYLINDERS         = CYLINDER         +PLURAL,                        03435000
   DATA              = CYLINDER         +1,                             03440000
   DATE              = DATA             +1,                             03445000
   DEFAULT           = DATE             +1,                             03450000
   DEFAULTS          = DEFAULT          +PLURAL,                        03455000
   DEFECTIVE         = DEFAULT          +1,                             03460000
   DEFINED           = DEFECTIVE        +1,                             03465000
   DELAY             = DEFINED          +1,                             03470000
   DELETE            = DELAY            +1,                             03475000
   DEPENDENT         = DELETE           +1,                             03480000
   DESCRIPTOR        = DEPENDENT        +1,                             03485000
   DESTROYED         = DESCRIPTOR       +1,                             03490000
   DEVDATA           = DESTROYED        +1,                             03495000
   DEVICE            = DEVDATA          +1,                             03500000
   DEVICES           = DEVICE           +PLURAL,                        03505000
   DIAL              = DEVICE           +1,                             03510000
   DIFFERENT         = DIAL             +1,                             03515000
   DIRECTORY         = DIFFERENT        +1,                             03520000
   DISABLE           = DIRECTORY        +1,                             03525000
   DISC              = DISABLE          +1,                             03530000
   DISMOUNT          = DISC             +1,                             03535000
   DO'               = DISMOUNT         +1,                             03540000
   DOES              = DO'              +1,                             03545000
   DOUBLE'           = DOES             +1,                             03550000
   DRIVE             = DOUBLE'          +1,                             03555000
   DRIVER            = DRIVE            +1,                             03560000
   DRIVERS           = DRIVER           +PLURAL,                        03565000
   DRT               = DRIVER           +1,                             03570000
   DRTS              = DRT             + PLURAL,                        03575000
   DST               = DRT              +1,                             03580000
   DUAL              = DST              +1,                             03585000
   DUMP              = DUAL             +1,                             03590000
   DUMPED            = DUMP             +1,                             03595000
   DUPLICATE'        = DUMPED           +1,                             03600000
   DUPLICATIVE       = DUPLICATE'       +1,                             03605000
   DURING            = DUPLICATIVE      +1,                             03610000
   EARLIER           = DURING           +1,                             03615000
   EIGHT             = EARLIER          +1,                             03620000
   ENABLE            = EIGHT            +1,                             03625000
   END'              = ENABLE           +1,                             03630000
   ENTER             = END'             +1,                             03635000
   ENTRIES           = ENTER            +1,                             03640000
   ENTRY'            = ENTRIES          +1,                             03645000
   EOF               = ENTRY'           +1,                             03650000
   EQUALS            = EOF              +1,                             03655000
   ERROR             = EQUALS           +1,                             03660000
   ERRORS            = ERROR            +PLURAL,                        03665000
   EXCEED            = ERROR            +1,                             03670000
   EXCEEDED          = EXCEED           +1,                             03675000
   EXCEEDS           = EXCEED           +PLURAL,                        03680000
   EXIST             = EXCEEDED         +1,                             03685000
   EXISTS            = EXIST            +PLURAL,                        03690000
   EXPERIMENTAL      = EXIST            +1,                             03695000
   EXTENDED          = EXPERIMENTAL     +1,                             03700000
   EXTENT            = EXTENDED         +1,                             03705000
   EXTERNAL'         = EXTENT           +1,                             03710000
   EXTRA             = EXTERNAL'        +1,                             03715000
   FACILITY          = EXTRA            +1,                             03720000
   FAILURE           = FACILITY         +1,                             03725000
   FATAL             = FAILURE          +1,                             03730000
   FIFTEEN           = FATAL            +1,                             03735000
   FILE              = FIFTEEN          +1,                             03740000
   FILENAME          = FILE             +1,                             03745000
   FILES             = FILE             +PLURAL,                        03750000
   FLAGGED           = FILENAME         +1,                             03755000
   FOLLOWING         = FLAGGED          +1,                             03760000
   FOR'              = FOLLOWING        +1,                             03765000
   FOUR              = FOR'             +1,                             03770000
   FOREIGN           = FOUR             +1,                             03775000
   FORMAT            = FOREIGN          +1,                             03780000
   FOUND             = FORMAT           +1,                             03785000
   FREE              = FOUND            +1,                             03790000
   FROM              = FREE             +1,                             03795000
   FULL              = FROM             +1,                             03800000
   FUNCTION          = FULL             +1,                             03805000
   GEQ               = FUNCTION         +1,                             03810000
   GETDSEG           = GEQ              +1,                             03815000
   GETTING           = GETDSEG          +1,                             03820000
   GLOBAL'           = GETTING          +1,                             03825000
   GROUP             = GLOBAL'          +1,                             03830000
   HALF              = GROUP            +1,                             03835000
   HALT              = HALF             +1,                             03840000
   HANDLER           = HALT             +1,                             03845000
   HARDWARE          = HANDLER          +1,                             03850000
   HAS               = HARDWARE         +1,                             03855000
   HAVE              = HAS              +1,                             03860000
   HEAD              = HAVE             +1,                             03865000
   HIGHEST           = HEAD             +1,                             03870000
   HPIB              = HIGHEST          +1,                             03875000
   HP32002           = HPIB             +1,                             03880000
   HP32033           = HP32002          +1,                             03885000
   HYPHEN            = HP32033          +1,                             03890000
   IO                = HYPHEN           +1,                             03895000
   ICS               = IO               +1,                             03900000
   ID                = ICS              +1,                             03905000
   ILLEGAL           = ID               +1,                             03910000
   IMCOMPATIBLE      = ILLEGAL          +1,                             03915000
   IMPROPER          = IMCOMPATIBLE     +1,                             03920000
   IN                = IMPROPER         +1,                             03925000
   IN'OUT            = IN               +1,                             03930000
   INDIRECT          = IN'OUT           +1,                             03935000
   INFORMATION       = INDIRECT         +1,                             03940000
   ININ              = INFORMATION      +1,                             03945000
   INITIAL           = ININ             +1,                             03950000
   INITIALIZATION    = INITIAL          +1,                             03955000
   INITIALLY         = INITIALIZATION   +1,                             03960000
   INITIATOR         = INITIALLY        +1,                             03965000
   INPUT             = INITIATOR        +1,                             03970000
   INSTALLATION      = INPUT            +1,                             03975000
   INSUFFICIENT      = INSTALLATION     +1,                             03980000
   INTERACTIVE       = INSUFFICIENT     +1,                             03985000
   INTERCOMPONENT    = INTERACTIVE      +1,                             03990000
   INTERFACE         = INTERCOMPONENT   +1,                             03995000
   INTERRUPT'        = INTERFACE        +1,                             04000000
   INTO              = INTERRUPT'       +1,                             04005000
   INVALID           = INTO             +1,                             04010000
   IOP               = INVALID          +1,                             04015000
   IRRECOVERABLE     = IOP              +1,                             04020000
   IS                = IRRECOVERABLE    +1,                             04025000
   JMAT              = IS               +1,                             04030000
   JOB               = JMAT             +1,                             04035000
   JOBS              = JOB              +PLURAL,                        04040000
   JOBS'SESSIONS     = JOB              +1,                             04045000
   KILOSECTORS       = JOBS'SESSIONS    +1,                             04050000
   LABEL'            = KILOSECTORS      +1,                             04055000
   LARGE             = LABEL'           +1,                             04060000
   LDEV              = LARGE            +1,                             04065000
   LENGTH            = LDEV             +1,                             04070000
   LEQ               = LENGTH           +1,                             04075000
   LEVEL             = LEQ              +1,                             04080000
   LIBRARY           = LEVEL            +1,                             04085000
   LIMIT             = LIBRARY          +1,                             04090000
   LIST              = LIMIT            +1,                             04095000
   LISTS             = LIST             +PLURAL,                        04100000
   LOAD              = LIST             +1,                             04105000
   LOADED            = LOAD             +1,                             04110000
   LOADER            = LOADED           +1,                             04115000
   LOADING           = LOADER           +1,                             04120000
   LOCAL             = LOADING          +1,                             04125000
   LOG               = LOCAL            +1,                             04130000
   LOGGING           = LOG              +1,                             04135000
   LOGICAL'          = LOGGING          +1,                             04140000
   LOGID             = LOGICAL'         +1,                             04145000
   LOGON             = LOGID            +1,                             04150000
   LONG'             = LOGON            +1,                             04155000
   LONGER            = LONG'            +1,                             04160000
   LOST              = LONGER           +1,                             04165000
   MAINTENANCE       = LOST             +1,                             04170000
   MAKE              = MAINTENANCE      +1,                             04175000
   MAKECAT           = MAKE             +1,                             04180000
   MANAGEMENT        = MAKECAT          +1,                             04185000
   MANY              = MANAGEMENT       +1,                             04190000
   MAP               = MANY             +1,                             04195000
   MAPS              = MAP              +PLURAL,                        04200000
   MARK              = MAP              +1,                             04205000
   MARKER            = MARK             +1,                             04210000
   MASK              = MARKER           +1,                             04215000
   MASTER            = MASK             +1,                             04220000
   MAX               = MASTER           +1,                             04225000
   MAY               = MAX              +1,                             04230000
   MEDIA             = MAY              +1,                             04235000
   MEMBER            = MEDIA            +1,                             04240000
   MEMORY            = MEMBER           +1,                             04245000
   MESSAGE           = MEMORY           +1,                             04250000
   MIN               = MESSAGE          +1,                             04255000
   MISC              = MIN              +1,                             04260000
   MISSING           = MISC             +1,                             04265000
   MOD'              = MISSING          +1,                             04270000
   MODE              = MOD'             +1,                             04275000
   MODULE            = MODE             +1,                             04280000
   MORE              = MODULE           +1,                             04285000
   MOUNT             = MORE             +1,                             04290000
   MOUNTED           = MOUNT            +1,                             04295000
   MOVING            = MOUNTED          +1,                             04300000
   MPE               = MOVING           +1,                             04305000
   MUST              = MPE              +1,                             04310000
   N125'127          = MUST             +1,                             04315000
   NON'RESPONDING    = N125'127         +1,                             04320000
   NAME              = NON'RESPONDING   +1,                             04325000
   NEW               = NAME             +1,                             04330000
   NEXT              = NEW              +1,                             04335000
   NO                = NEXT             +1,                             04340000
   NON               = NO               +1,                             04345000
   NORMAL            = NON              +1,                             04350000
   NOT'              = NORMAL           +1,                             04355000
   NOW               = NOT'             +1,                             04360000
   NUM               = NOW              +1,                             04365000
   NUMBER            = NUM              +1,                             04370000
   NUMBERS           = NUMBER           +PLURAL,                        04375000
   NUMS              = NUMBER           +1,                             04380000
   OBTAIN            = NUMS             +1,                             04385000
   OF'               = OBTAIN           +1,                             04390000
   OFF               = OF'              +1,                             04395000
   OKAY              = OFF              +1,                             04400000
   OLD               = OKAY             +1,                             04405000
   ON                = OLD              +1,                             04410000
   ON'OFF            = ON               +1,                             04415000
   ONE               = ON'OFF           +1,                             04420000
   ONLY              = ONE              +1,                             04425000
   OPEN              = ONLY             +1,                             04430000
   OPERATION         = OPEN             +1,                             04435000
   OPERATIONS        = OPERATION        +PLURAL,                        04440000
   OPTION'           = OPERATION        +1,                             04445000
   OPTIONS           = OPTION'          +PLURAL,                        04450000
   OR'               = OPTION'          +1,                             04455000
   OUT               = OR'              +1,                             04460000
   OUTPUT            = OUT              +1,                             04465000
   OVERFLOW'         = OUTPUT           +1,                             04470000
   OVERRUN           = OVERFLOW'        +1,                             04475000
   PACK              = OVERRUN          +1,                             04480000
   PARAMETERS        = PACK             +1,                             04485000
   PARITY            = PARAMETERS       +1,                             04490000
   PART              = PARITY           +1,                             04495000
   PASS              = PART             +1,                             04500000
   PATCH             = PASS             +1,                             04505000
   PCB               = PATCH            +1,                             04510000
   PENDING           = PCB              +1,                             04515000
   PER               = PENDING          +1,                             04520000
   PERFORMED         = PER              +1,                             04525000
   PERFORMING        = PERFORMED        +1,                             04530000
   PERIOD            = PERFORMING       +1,                             04535000
   PHONE             = PERIOD           +1,                             04540000
   PHYSICAL          = PHONE            +1,                             04545000
   POLL              = PHYSICAL         +1,                             04550000
   PORT              = POLL             +1,                             04555000
   PORTION           = PORT             +1,                             04560000
   POSSIBLE          = PORTION          +1,                             04565000
   PREFERRED         = POSSIBLE         +1,                             04570000
   PREVIOUS          = PREFERRED        +1,                             04575000
   PRIMARY           = PREVIOUS         +1,                             04580000
   PRIORITY          = PRIMARY          +1,                             04585000
   PROCESS           = PRIORITY         +1,                             04590000
   PROCESSES         = PROCESS          +1,                             04595000
   PROGRAM           = PROCESSES        +1,                             04600000
   PROGRAMS          = PROGRAM          +PLURAL,                        04605000
   PROGRESS          = PROGRAM          +1,                             04610000
   PROTECT           = PROGRESS         +1,                             04615000
   PROTOCOL          = PROTECT          +1,                             04620000
   PURGE             = PROTOCOL         +1,                             04625000
   PURGED            = PURGE            +1,                             04630000
   QUEUE             = PURGED           +1,                             04635000
   RANGE'            = QUEUE            +1,                             04640000
   RANGES            = RANGE'           + PLURAL,                       04645000
   READ              = RANGE'           +1,                             04650000
   READING           = READ             +1,                             04655000
   READY             = READING          +1,                             04660000
   REASSIGN          = READY            +1,                             04665000
   REASSIGNS         = REASSIGN         +PLURAL,                        04670000
   REASSIGNED        = REASSIGN         +1,                             04675000
   RECEIVE           = REASSIGNED       +1,                             04680000
   RECONFIGURED      = RECEIVE          +1,                             04685000
   RECORD            = RECONFIGURED     +1,                             04690000
   RECORDS           = RECORD           +PLURAL,                        04695000
   RECORDS'          = RECORD           +1,                             04700000
   RECOVER           = RECORDS'         +1,                             04705000
   REEL              = RECOVER          +1,                             04710000
   REINITIALIZE      = REEL             +1,                             04715000
   REJECTED          = REINITIALIZE     +1,                             04720000
   RELOAD            = REJECTED         +1,                             04725000
   REMOTE            = RELOAD           +1,                             04730000
   REMOVABLE'        = REMOTE           +1,                             04735000
   REPAIRED          = REMOVABLE'       +1,                             04740000
   REPEATS           = REPAIRED         +1,                             04745000
   REPLACE           = REPEATS          +1,                             04750000
   REPLACED          = REPLACE          +1,                             04755000
   REPLACEMENT       = REPLACED         +1,                             04760000
   REPLY             = REPLACEMENT      +1,                    <<i8964>>04765000
   REQUEST           = REPLY            +1,                    <<i8964>>04770000
   REQUIRED          = REQUEST          +1,                             04775000
   RESERVED          = REQUIRED         +1,                             04780000
   RESIDENT          = RESERVED         +1,                             04785000
   RETRIES           = RESIDENT         +1,                             04790000
   RETURNING         = RETRIES          +1,                             04795000
   RIN               = RETURNING        +1,                             04800000
   RINS              = RIN              +PLURAL,                        04805000
   RUNNING           = RIN              +1,                             04810000
   S'                = RUNNING          +1,                             04815000
   SAME              = S'               +1,                             04820000
   SAVE              = SAME             +1,                             04825000
   SCHEDULING        = SAVE             +1,                             04830000
   SECOND            = SCHEDULING       +1,                             04835000
   SECONDARY         = SECOND           +1,                             04840000
   SECONDS           = SECOND           +PLURAL,                        04845000
   SECTION           = SECONDARY        +1,                             04850000
   SECTOR            = SECTION          +1,                             04855000
   SECTORS           = SECTOR           +PLURAL,                        04860000
   SECTORS'          = SECTOR           +1,                             04865000
   SEEKAHEAD         = SECTORS'         +1,                             04870000
   SEG'TYPE          = SEEKAHEAD        +1,                             04875000
   SEGMENT           = SEG'TYPE         +1,                             04880000
   SEGMENTS          = SEGMENT          +PLURAL,                        04885000
   SEGS'PROC         = SEGMENT          +1,                             04890000
   SEQUENCE          = SEGS'PROC        +1,                             04895000
   SERIAL            = SEQUENCE         +1,                             04900000
   SERIES'33         = SERIAL           +1,                             04905000
   SESSIONS          = SERIES'33        +1,                             04910000
   SET'              = SESSIONS         +1,                             04915000
   SEVEN             = SET'             +1,                             04920000
   SIO               = SEVEN            +1,                             04925000
   SIX               = SIO              +1,                             04930000
   SIZE              = SIX              +1,                             04935000
   SIZES             = SIZE             +PLURAL,                        04940000
   SL                = SIZE             +1,                             04945000
   SOFTDUMP          = SL               +1,                             04950000
   SOFTWARE          = SOFTDUMP         +1,                             04955000
   SPACE             = SOFTWARE         +1,                             04960000
   SPARE             = SPACE            +1,                             04965000
   SPARING           = SPARE            +1,                             04970000
   SPECIAL'          = SPARING          +1,                             04975000
   SPECIFIC          = SPECIAL'         +1,                             04980000
   SPECIFIED         = SPECIFIC         +1,                             04985000
   SPECIFY           = SPECIFIED        +1,                             04990000
   SPEED             = SPECIFY          +1,                             04995000
   SPOOLED           = SPEED            +1,                             05000000
   SPOOLFILE         = SPOOLED          +1,                             05005000
   SPOOLFILES        = SPOOLFILE        +PLURAL,                        05010000
   SPREAD'           = SPOOLFILE        +1,                             05015000
   SPR'CMP'RST       = SPREAD'          +1,                             05020000
   STACK             = SPR'CMP'RST      +1,                             05025000
   STARS             = STACK            +1,                             05030000
   STATION           = STARS            +1,                             05035000
   STATIONS          = STATION          +PLURAL,                        05040000
   STATUS            = STATION          +1,                             05045000
   STD               = STATUS           +1,                             05050000
   SUB               = STD              +1,                             05055000
   SUBSET            = SUB              +1,                             05060000
   SUCH              = SUBSET           +1,                             05065000
   SUPPORTED         = SUCH             +1,                             05070000
   SUPPOSED          = SUPPORTED        +1,                             05075000
   SWAP              = SUPPOSED         +1,                             05080000
   SYNTAX            = SWAP             +1,                             05085000
   SYSDUMP           = SYNTAX           +1,                             05090000
   SYSTEM            = SYSDUMP          +1,                             05095000
   TABLE             = SYSTEM           +1,                             05100000
   TABLES            = TABLE            +PLURAL,                        05105000
   TAPE              = TABLE            +1,                             05110000
   TERM              = TAPE             +1,                             05115000
   TTDF              = TERM             +1,                             05120000
   TERMINAL          = TTDF             +1,                             05125000
   THAN              = TERMINAL         +1,                             05130000
   THAT              = THAN             +1,                             05135000
   THE               = THAT             +1,                             05140000
   THIS              = THE              +1,                             05145000
   TIME              = THIS             +1,                             05150000
   TIMEOUT           = TIME             +1,                             05155000
   TIMER             = TIMEOUT          +1,                             05160000
   TIMING            = TIMER            +1,                             05165000
   TO'               = TIMING           +1,                             05170000
   TOO               = TO'              +1,                             05175000
   TOTAL             = TOO              +1,                             05180000
   TRACE             = TOTAL            +1,                             05185000
   TRACK             = TRACE            +1,                             05190000
   TRACKS            = TRACK            +PLURAL,                        05195000
   TRACK'SECTOR      = TRACK            +1,                             05200000
   TRAILER           = TRACK'SECTOR     +1,                             05205000
   TRANSFER          = TRAILER          +1,                             05210000
   TRANSMISSION      = TRANSFER         +1,                             05215000
   TRY               = TRANSMISSION     +1,                             05220000
   TYPE              = TRY              +1,                             05225000
   UCOP              = TYPE             +1,                             05230000
   UNABLE            = UCOP             +1,                             05235000
   UNAVAILABLE       = UNABLE           +1,                             05240000
   UNCORRECTABLE     = UNAVAILABLE      +1,                             05245000
   UNDEFINED         = UNCORRECTABLE    +1,                             05250000
   UNINITIALIZED     = UNDEFINED        +1,                             05255000
   UNIQUE            = UNINITIALIZED    +1,                             05260000
   UNIT              = UNIQUE           +1,                             05265000
   UNKNOWN           = UNIT             +1,                             05270000
   UNRESOLVED        = UNKNOWN          +1,                             05275000
   UP                = UNRESOLVED       +1,                             05280000
   UPDATE'           = UP               +1,                             05285000
   USE               = UPDATE'          +1,                             05290000
   USED              = USE              +1,                             05295000
   USER              = USED             +1,                             05300000
   USERS             = USER             +PLURAL,                        05305000
   USLFILE           = USER             +1,                             05310000
   VERSION           = USLFILE          +1,                             05315000
   VIRTUAL           = VERSION          +1,                             05320000
   VOLUME            = VIRTUAL          +1,                             05325000
   VOLUMES           = VOLUME           +PLURAL,                        05330000
   WANT              = VOLUME           +1,                             05335000
   WARMCOOL          = WANT             +1,                             05340000
   WARMSTART'        = WARMCOOL         +1,                             05345000
   WARNING           = WARMSTART'       +1,                             05350000
   WELCOME           = WARNING          +1,                             05355000
   WENT              = WELCOME          +1,                             05360000
   WHICH             = WENT             +1,                             05365000
   WHILE'            = WHICH            +1,                             05370000
   WIDTH             = WHILE'           +1,                             05375000
   WILL              = WIDTH            +1,                             05380000
   WITH'             = WILL             +1,                             05385000
   WITHOUT           = WITH'            +1,                             05390000
   WRAP'AROUND       = WITHOUT          +1,                             05395000
   WRONG             = WRAP'AROUND      +1,                             05400000
   WSTAB             = WRONG            +1,                             05405000
   YOU               = WSTAB            +1,                             05410000
   ZERO              = YOU              +1;                             05415000
                                                                        05420000
INTEGER ARRAY MESS(*) = PB :=                                           05425000
                                                                        05430000
             << I/O ERRORS >>                                           05435000
                                                                        05440000
        << ERROR MSG ZERO - RESERVED FOR "NO MSG" >>                    05445000
   1, 5,NON'RESPONDING,DEVICE,CONTROLLER,DRT,PD1,                       05450000
   2, 6,CHANNEL,PROGRAM,FAILURE,HYPHEN,DRT,PD1,                         05455000
   3, 6,CHANNEL,PROGRAM,ABORTED,HYPHEN,CPVA,PO1,                        05460000
   4, 2,IOP,ERROR,                                                      05465000
   5, 4,TAPE,IO,CMD,REJECTED,                                           05470000
   6, 3,TAPE,TRANSFER,ERROR,                                            05475000
   7, 3,TAPE,PARITY,ERROR,                                              05480000
   8, 3,TAPE,TIMING,ERROR,                                              05485000
   9, 3,READING,BLANK,TAPE,                                             05490000
  10, 5,COLD,LOAD,TAPE,READ,ERROR,                                      05495000
  11, 3,IRRECOVERABLE,PARITY,ERRORS,                                    05500000
  12, 2,ILLEGAL,CMD,                                                    05505000
  13, 3,CYLINDER,COMPARE,ERROR,                                         05510000
  14, 2,UNCORRECTABLE,ERROR,                                            05515000
  15, 4,HEAD,SECTOR,COMPARE,ERROR,                                      05520000
  16, 3,SIO,PROGRAM,ERROR,                                              05525000
  17, 3,END',OF',CYLINDER,                                              05530000
  18, 1,OVERRUN,                                                        05535000
  19, 3,POSSIBLE,CORRECTABLE,ERROR,                                     05540000
  20, 5,ILLEGAL,ACCESS,TO',SPARE,TRACK,                                 05545000
  21, 2,DEFECTIVE,TRACK,                                                05550000
  22, 4,HEAD,MOVING,DURING,OPERATION,                                   05555000
  23, 3,DISC,DRIVE,ERROR,                                               05560000
  24, 5,ATTEMPT,TO',PROTECT,DEFECTIVE,TRACK,                            05565000
  25, 2,DRIVE,UNAVAILABLE,                                              05570000
  26, 2,DRIVE,ATTENTION,                                                05575000
  27, 3,BAD,DISC,ADDRESS,                                               05580000
  28, 3,BAD,FILE,ADDRESS,                                               05585000
  29, 3,HPIB,INTERFACE,ERROR,                                           05590000
  30, 5,CS'80,DRIVER,ERROR,NUMBER,PD1,                                  05595000
  31,10,DRIVER,COMMAND,STACK,OVERFLOW',LDEV,PD1,DRT,PD2,                05600000
        UNIT,PD3,                                                       05605000
  32,11,NUMBER,OF',RETRIES,EXCEEDS,MAX,LDEV,PD1,DRT,PD2,                05610000
        UNIT,PD3,                                                       05615000
  33, 6,TRANSFER,SIZE,TOO,LARGE,LDEV,PD1,                               05620000
  34, 5,INVALID,DRIVER,CALL,LDEV,PD1,                                   05625000
  35, 3,DISC,IO,ERROR,                                                  05630000
                                                                        05635000
             << CONFIGURATION ERRORS >>                                 05640000
                                                                        05645000
 100, 6,PREVIOUS,RELOAD,ABORTED,HYPHEN,MUST,RELOAD,                     05650000
 101,11,PREVIOUS,TAPE,COLD,LOAD,ABORTED,HYPHEN,MUST,COLD,LOAD,          05655000
        FROM,TAPE,                                                      05660000
 102, 6,USER,SPECIFIED,MAX,DRT,IS,PD1,                                  05665000
 103, 6,SYSTEM,DISC,MUST,BE,UNIT,ZERO,                                  05670000
 104, 8,SYSTEM,DISC,MAY,ONLY,BE,RECONFIGURED,ON,RELOAD,                 05675000
 105, 6,LDEV,ONE,MUST,BE,SYSTEM,DISC,                                   05680000
 106, 5,WRONG,DRT,FOR',SYSTEM,DISC,                                     05685000
 107, 5,NO,DEVICE,IN,CLASS,DISC,                                        05690000
 108, 6,COLD,LOAD,DEVICE,MUST,BE,CONFIGURED,                            05695000
 109, 9,SYSTEM,CONSOLE,MUST,BE,IN,DRT,SEVEN,UNIT,ZERO,                  05700000
 110, 9,SYSTEM,CONSOLE,MUST,BE,IN,DRT,EIGHT,UNIT,ZERO,                  05705000
 111, 5,IMPROPER,SPEED,FOR',SYSTEM,CONSOLE,                             05710000
 112, 7,LDEV,PD1,TERMINAL,UNIT,MUST,BE,ZERO,                            05715000
 113, 7,LDEV,PD1,TERMINAL,DRT,MUST,BE,UNIQUE,                           05720000
 114, 3,ILLEGAL,MASTER,DEVICE,                                          05725000
 115,10,UNDEFINED,CLASS,STR1,USED,AS,OUTPUT,DEVICE,BY,                  05730000
        FOLLOWING,DEVICES,                                              05735000
 116, 7,NO,OUTPUT,DEVICE,FOR',LOGICAL',DEVICE,PD1,                      05740000
 117, 8,OUTPUT,CLASS,FOR',DEVICE,PD1,NO,LONGER,EXISTS,                  05745000
 118, 8,DEVICE,CLASS,STR1,CAN,NOT',BE,OUTPUT,DEVICE,                    05750000
 119, 8,LOGICAL',DEVICE,PD1,CAN,NOT',BE,OUTPUT,DEVICE,                  05755000
 120, 6,LOGICAL',DEVICE,PD1,DOES,NOT',EXIST,                            05760000
 121,10,LDEV,PD1,AND',LDEV,PD2,ON,SAME,DRT,AND',UNIT,                   05765000
 122, 8,DEVICES,OF',DIFFERENT,TYPE,RANGES,IN,CLASS,STR1,                05770000
 123, 6,ILLEGAL,TYPE,COMBINATIONS,IN,CLASS,STR1,                        05775000
 124, 7,CONFIGURED,MEMORY,SIZE,EXCEEDS,PHYSICAL,MEMORY,                 05780000
        AVAILABLE,                                                      05785000
 125, 8,CAN,NOT',RECOVER,DISC,SPACE,OF',SPOOLFILE,STR1,                 05790000
 126, 5,DISC,DRIVER,DOES,NOT',EXIST,                                    05795000
 127, 7,DIFFERENT,DEVICE,DRIVERS,CONFIGURED,FOR',DRT,PD1,               05800000
 128, 8,HIGHEST,DRT,SUPPORTED,BY,THIS,CPU,IS,PD1,                       05805000
 129, 5,FOLLOWING,DRTS,MUST,BE,CHANGED,                                 05810000
 130, 4,NOT',A,SUPPORTED,SPEED,                                         05815000
 131, 8,LDEV,PD1,TERMINAL,SPEED,NOT',SUPPORTED,BY,HARDWARE,             05820000
 132, 9,NON'RESPONDING,BOARD,FOR',TERMINAL,ON,LDEV,PD1,DRT,PD2,         05825000
 133, 9,WRONG,BOARD,FOR',TERMINAL,ON,LDEV,PD1,DRT,PD2,                  05830000
 134, 6,CHANGE,LDEV,PD1,TO',DRT,PD2,                                    05835000
 135, 8,LDEV,PD1,DRTS,N125'127,RESERVED,FOR',HPIB,INTERFACE,            05840000
 136,12,CHANNEL,ON,HPIB,INTERFACE,CANNOT,BE,ZERO,COMMA,ONE,             05845000
        COMMA,OR',FIFTEEN,                                              05850000
 137, 6,HIGHEST,SUPPORTED,DISC,LDEV,IS,PD1,                             05855000
 138, 8,LDEV,PD1,IS,NOT',A,SERIAL,IO,DEVICE,                            05860000
                                                                        05865000
             << VOLUME TABLE ERRORS >>                                  05870000
                                                                        05875000
 200, 3,VOLUME,TABLE,FULL,                                              05880000
 201, 6,VOLUME,TABLE,DESTROYED,HYPHEN,MUST,RELOAD,                      05885000
 202, 5,MOUNT,CORRECT,VOLUMES,OR',RELOAD,                               05890000
 203, 5,ALL,VOLUMES,MUST,BE,MOUNTED,                                    05895000
 204, 8,DEVICE,PD1,VOLUME,STR1,NOT',DEFINED,IN,TABLE,                   05900000
 205, 9,VOLUME,NAME,STR1,ON,DEVICE,PD1,ALREADY,IN,USE,                  05905000
                                                                        05910000
             << DEFECTIVE TRACKS >>                                     05915000
                                                                        05920000
 225, 4,DEFECTIVE,TRACKS,TABLE,FULL,                                    05925000
 226, 3,NO,ALTERNATES,AVAILABLE,                                        05930000
 227, 7,IN,RESERVED,AREA,HYPHEN,CAN,NOT',DELETE,                        05935000
 228, 6,IN,DIRECTORY,HYPHEN,CAN,NOT',DELETE,                            05940000
 229, 6,ALTERNATE,TRACK,HYPHEN,CAN,NOT',DELETE,                         05945000
 230, 7,IN,SYSTEM,AREA,HYPHEN,CAN,NOT',DELETE,                          05950000
 231, 9,SYSTEM,TABLE,ON,DEFECTIVE,TRACKS,HYPHEN,CAN,NOT',               05955000
        WARMSTART',                                                     05960000
 232, 9,FLAGGED,TRACK,IN,RESERVED,AREA,HYPHEN,MUST,                     05965000
        REINITIALIZE,PACK,                                              05970000
 233, 6,NO,MORE,REASSIGNS,ALLOWED,THIS,BOOT,                            05975000
 234, 6,INVALID,DISC,LABEL',ON,LDEV,PD1,                                05980000
 235, 7,INVALID,DEFECTIVE,TRACKS,TABLE,ON,LDEV,PD1,                     05985000
 236,10,IN,A,SYSTEM,DISC,RESIDENT,TABLE,HYPHEN,CAN,NOT',DELETE,         05990000
 237, 9,IN,DISC,FREE,SPACE,MAP,HYPHEN,CAN,NOT',DELETE,                  05995000
                                                                        06000000
             << I/O TABLE INITIALIZATION ERRORS >>                      06005000
                                                                        06010000
 250, 5,TERMINAL,INITIALIZATION,PROGRAM,TOO,LARGE,                      06015000
 251, 5,TERMINAL,CHANNEL,PROGRAM,TOO,LARGE,                             06020000
 252, 6,DIFFERENT,PROCESSES,SPECIFIED,FOR',DRT,PD1,                     06025000
 253,11,INITIATOR,COMMA,COMPLETOR,FOR',LDEV,PD1,SUPPOSED,TO',           06030000
        BE,CORE,RESIDENT,                                               06035000
 254, 9,MORE,THAN,ONE,PRIMARY,INTERRUPT',HANDLER,FOR',DRT,PD1,          06040000
                                                                        06045000
             << DIRECTORY ERRORS >>                                     06050000
                                                                        06055000
 275,17,INVALID,DIRECTORY,ENTRY',HYPHEN,ENTRY',LEVEL,WRONG,OR',         06060000
        MISSING,CRLF,AT,ACCOUNT,COMMA,GROUP,OR',FILE,LEVEL,             06065000
 276,15,INVALID,DIRECTORY,ENTRY',HYPHEN,ENTRY',LEVEL,WRONG,OR',         06070000
        MISSING,CRLF,AT,ACCOUNT,OR',USER,LEVEL,                         06075000
 277, 5,DIRECTORY,ERROR,PD1,COMMA,PD2,                                  06080000
 278, 2,DIRECTORY,ERROR,                                                06085000
                                                                        06090000
             << TABLE ERRORS >>                                         06095000
                                                                        06100000
 300, 4,OUT,OF',CST,ENTRIES,                                            06105000
 301, 4,OUT,OF',DST,ENTRIES,                                            06110000
 302, 4,OUT,OF',PCB,ENTRIES,                                            06115000
 303, 4,OUT,OF',WSTAB,ENTRIES,                                          06120000
 304, 4,OUT,OF',CSTBLK,ENTRIES,                                         06125000
 305, 3,INVALID,JMAT,STR1,                                              06130000
                                                                        06135000
             << DISC SPACE MGMT >>                                      06140000
                                                                        06145000
 325,10,DISC,SPACE,ERROR,PD1,COMMA,TRY,RECOVER,LOST,DISC,SPACE,         06150000
 326, 7,OUT,OF',DISC,SPACE,ON,LDEV,PD1,                                 06155000
 327, 5,OUT,OF',BOOTSTRAP,DISC,SPACE,                                   06160000
 328, 7,DISC,SPACE,ERROR,HYPHEN,WHILE',RETURNING,SPACE,                 06165000
 329, 7,DISC,SPACE,ERROR,HYPHEN,WHILE',GETTING,SPACE,                   06170000
 330, 7,OUT,OF',VIRTUAL,MEMORY,ON,LDEV,PD1,                             06175000
 331,12,LDEV,PD1,HAS,NOT',BEEN,CONVERTED,TO',NEW,DISC,                  06180000
        FREE,SPACE,MAP,                                                 06185000
 332,22,DISC,FREE,SPACE,MAP,HAS,BEEN,FLAGGED,AS,BAD,COMMA,              06190000
        CANNOT,ALLOCATE,SPACE,ON,LDEV,PD1,COMMA,TRY,RECOVER,            06195000
        LOST,DISC,SPACE,                                                06200000
 333,18,DISC,FREE,SPACE,MAP,FOR',LDEV,PD1,IS,ON,A,                      06205000
        DEFECTIVE,AREA,OF',THE,DISC,COMMA,MUST,RELOAD,                  06210000
 334, 7,RETURNING,SPACE,NOT',IN,THE,RESERVED,AREA,                      06215000
 335, 8,RETURNING,SPACE,ALREADY,FREE,IN,THE,RESERVED,AREA,              06220000
                                                                        06225000
             << MEMORY MGMT >>                                          06230000
                                                                        06235000
 350, 3,OUT,OF',MEMORY,                                                 06240000
 351, 4,OUT,OF',BANK,ZERO,                                              06245000
 352, 2,BANK,WRAP'AROUND,                                               06250000
 374, 3,FATAL,ERROR,PD1,                                                06255000
 353, 2,GETDSEG,FAILURE,                                       <<*8865>>06260000
 354, 2,ALTDSEG,FAILURE,                                       <<*8865>>06265000
                                                                        06270000
             << RESTORE ERRORS >>                                       06275000
                                                                        06280000
 375, 3,IMPROPER,TAPE,FORMAT,                                           06285000
 376, 4,NOT',A,RELOAD,TAPE,                                             06290000
 377, 7,TAPE,NOT',A,MEMBER,OF',THIS,SET',                               06295000
 378, 8,WRONG,TAPE,SET',HYPHEN,MUST,HAVE,EARLIER,DATE,                  06300000
 379, 2,WRONG,REEL,                                                     06305000
                                                                        06310000
             << INTERNAL TRAPS >>                                       06315000
                                                                        06320000
 400, 3,NON'RESPONDING,MODULE,INTERRUPT',                               06325000
                                                                        06330000
             << FILE SYSTEM >>                                          06335000
                                                                        06340000
 450, 4,FILE,LABEL',CHECKSUM',ERROR,                                    06345000
 451, 5,TAPE,FILE,LABEL',CHECKSUM',ERROR,                               06350000
 452, 3,DEFECTIVE,FILE,LABEL',                                          06355000
 453, 2,INVALID,FUNCTION,                                               06360000
 454, 2,TRANSMISSION,ERROR,                                             06365000
 455, 3,UNDEFINED,ERROR,NUMBER,                                         06370000
 456, 3,SIO,NOT',READY,                                                 06375000
 457, 2,UNIT,FAILURE,                                                   06380000
 458, 3,INVALID,DISC,ADDRESS,                                           06385000
 459, 5,ILLEGAL,TAPE,FILE,OPEN,PARAMETERS,                              06390000
                                                                        06395000
                                                                        06400000
             << CS'80 SPARING >>                                        06405000
                                                                        06410000
 500, 6,NO,MORE,SPARING,ALLOWED,THIS,BOOT,                              06415000
 501,10,DATA,LOST,DURING,SPARE,LDEV,PD1,SECTORS,STR1,                   06420000
        HYPHEN,STR2,                                                    06425000
                                                                        06430000
                                                                        06435000
             << GENERAL MESSAGES AND QUESTIONS  >>                      06440000
             << ALL MESSAGES ABOVE 2000 WILL    >>                      06445000
             << NOT BE PRECEEDED WILL AN ERROR  >>                      06450000
             << NUMBER CODE WHEN MOVED INTO BUF >>                      06455000
                                                                        06460000
                                                                        06465000
             << I/O CONFIGURATION MESSAGES >>                           06470000
                                                                        06475000
2000, 3,WHICH,OPTION',WARMCOOL,                                         06480000
2001, 3,WHICH,OPTION',COL'REL'UPD,                                      06485000
2002, 3,WHICH,OPTION',SPR'CMP'RST,                                      06490000
2003, 3,SYSTEM,DISC,DRT,                                                06495000
2004,12,IS,REMOVABLE',PORTION,OF',SYSTEM,DISC,BEING,USED,FOR',          06500000
        THIS,COLD,LOAD,                                                 06505000
2005, 2,ANY,CHANGES,                                                    06510000
2006, 2,LOAD,MAP,                                                       06515000
2007, 2,MEMORY,SIZE,                                                    06520000
2008, 3,IO,CONFIGURATION,CHANGES,                                       06525000
2009, 3,LIST,IO,DEVICES,                                                06530000
2010, 2,HIGHEST,DRT,                                                    06535000
2011, 3,LOGICAL',DEVICE,NUM,                                            06540000
2012, 2,DRT,NUM,                                                        06545000
2013, 2,UNIT,NUM,                                                       06550000
2014, 3,SOFTWARE,CHANNEL,NUM,                                           06555000
2015, 1,TYPE,                                                           06560000
2016, 2,SUB,TYPE,                                                       06565000
2017, 2,TERM,TYPE,                                                      06570000
2018, 5,SPEED,IN,CHARACTERS,PER,SECOND,                                 06575000
2019, 2,RECORD,WIDTH,                                                   06580000
2020, 2,OUTPUT,DEVICE,                                                  06585000
2021, 2,ACCEPT,JOBS'SESSIONS,                                           06590000
2022, 2,ACCEPT,DATA,                                                    06595000
2023, 1,INTERACTIVE,                                                    06600000
2024, 1,DUPLICATIVE,                                                    06605000
2025, 2,INITIALLY,SPOOLED,                                              06610000
2026, 2,DRIVER,NAME,                                                    06615000
2027, 2,DEVICE,CLASSES,                                                 06620000
2028, 6,IS,STR1,A,SERIAL,DISC,CLASS,                                    06625000
2029, 2,ENABLE,SEEKAHEAD,                                               06630000
2040, 2,IO,MAP,                                                         06635000
2041, 2,DEVICE,NAME,                                                    06640000
2042, 2,ID,CODE,                                                        06645000
2043, 3,LIST,DEVICE,DEFAULTS,                                           06650000
2044, 4,OUTPUT,DEVICE,EQUALS,STR1,                                      06655000
2045, 4,OUTPUT,DEVICE,EQUALS,PD1,                                       06660000
2046, 4,ACCEPT,JOBS'SESSIONS,EQUALS,STR1,                               06665000
2047, 4,ACCEPT,DATA,EQUALS,STR1,                                        06670000
2048, 3,INTERACTIVE,EQUALS,STR1,                                        06675000
2049, 3,DUPLICATIVE,EQUALS,STR1,                                        06680000
2050, 4,INITIALLY,SPOOLED,EQUALS,STR1,                                  06685000
2051, 4,DRIVER,NAME,EQUALS,STR1,                                        06690000
2052, 4,DEVICE,NAME,NOT',FOUND,                                <<tlook>>06695000
2053, 3,DRT,EQUALS,PD1,                                                 06700000
2054, 3,UNIT,EQUALS,PD1,                                                06705000
2055, 2,AUTO,REPLY,                                            <<i8964>>06710000
2056, 4,AUTO,REPLY,EQUALS,STR1,                                <<i8964>>06715000
                                                                        06720000
             << CS MESSAGES >>                                          06725000
                                                                        06730000
2100, 3,LIST,CS,DEVICES,                                                06735000
2101, 2,PORT,MASK,                                                      06740000
2102, 1,PROTOCOL,                                                       06745000
2103, 2,LOCAL,MODE,                                                     06750000
2104, 2,TRANSMISSION,CODE,                                              06755000
2105, 2,RECEIVE,TIMEOUT,                                                06760000
2106, 2,LOCAL,TIMEOUT,                                                  06765000
2107, 2,CONNECT,TIMEOUT,                                                06770000
2108, 2,DIAL,FACILITY,                                                  06775000
2109, 2,ANSWER,FACILITY,                                                06780000
2110, 2,AUTOMATIC,ANSWER,                                               06785000
2111, 2,DUAL,SPEED,                                                     06790000
2112, 2,HALF,SPEED,                                                     06795000
2113, 2,SPEED,CHANGEABLE,                                               06800000
2114, 2,TRANSMISSION,SPEED,                                             06805000
2115, 2,TRANSMISSION,MODE,                                              06810000
2116, 3,PREFERRED,BUFFER,SIZE,                                          06815000
2117, 2,DRIVER,CHANGEABLE,                                              06820000
2118, 2,DRIVER,OPTIONS,                                                 06825000
2119, 2,CONTROL,LENGTH,                                                 06830000
2120, 2,PHONE,LIST,                                                     06835000
2121, 2,PHONE,NUMBER,                                                   06840000
2122, 3,LOCAL,ID,SEQUENCE,                                              06845000
2123, 3,REMOTE,ID,SEQUENCE,                                             06850000
2124, 2,INTERCOMPONENT,DELAY,                                           06855000
2125, 4,NUMBER,OF',POLL,REPEATS,                                        06860000
2126, 3,CIRCULAR,POLL,DELAY,                                            06865000
2127, 3,COMPONENTS,PER,STATION,                                         06870000
2128, 3,NUMBER,OF',COMPONENTS,                                          06875000
2129, 2,COMPONENT,TYPE,                                                 06880000
2130, 4,COMPONENT,IN,POLL,LIST,                                         06885000
2131, 2,COMPONENT,SEQUENCE,                                             06890000
2140, 4,ILLEGAL,TYPE,OR',UNIT,                                          06895000
2141, 5,ILLEGAL,TYPE,OR',SUB,TYPE,                                      06900000
2150, 3,ADDITIONAL,DRIVER,CHANGES,                                      06905000
2151, 3,LIST,ADDITIONAL,DRIVERS,                                        06910000
2152, 2,DELETE,DRIVERS,                                                 06915000
2153, 6,DRIVER,NOT',IN,ADDITIONAL,DRIVERS,LIST,                         06920000
2154, 3,DRIVER,ALREADY,DEFINED,                                         06925000
2155,10,MAX,NUM,OF',ADDITIONAL,DRIVERS,EXCEEDED,COMMA,DRIVER            06930000
       ,NOT',ADDED,                                                     06935000
2156, 2,ADD,DRIVERS,                                                    06940000
                                                                        06945000
             << VOLUME TABLE MESSAGES >>                                06950000
                                                                        06955000
2200, 3,DISC,VOLUME,CHANGES,                                            06960000
2201, 3,LIST,VOLUME,TABLE,                                              06965000
2202, 2,DELETE,VOLUME,                                                  06970000
2203, 2,ADD,VOLUME,                                                     06975000
2204, 3,ENTER,VOLUME,NAME,                                              06980000
2205, 3,NO,SUCH,VOLUME,                                                 06985000
2206, 3,VOLUME,ALREADY,DEFINED,                                         06990000
2207, 5,VOLUME,NAME,ALREADY,IN,USE,                                     06995000
2208, 6,NON,SYSTEM,VOLUME,ON,LDEV,PD1,                                  07000000
2210, 4,FOLLOWING,VOLUMES,NOT',FOUND,                                   07005000
2211, 5,ADD,TO',SYSTEM,VOLUME,SET',                                     07010000
2212, 3,TOO,MANY,VOLUMES,                                               07015000
                                                                        07020000
             << VIRTUAL MEMORY CHANGES >>                               07025000
                                                                        07030000
2215, 3,VIRTUAL,MEMORY,CHANGES,                                         07035000
2216, 5,LIST,VIRTUAL,MEMORY,DEVICE,ALLOCATION,                          07040000
2217, 7,ENTER,VOLUME,NAME,COMMA,SIZE,IN,KILOSECTORS,                    07045000
2218, 8,WARNING,INSUFFICIENT,DISC,SPACE,AVAILABLE,ON,THIS,DISC,         07050000
2219, 7,WARNING,DEFAULT,VIRTUAL,MEMORY,SIZES,BEING,USED,                07055000
2220, 8,WARNING,NO,VIRTUAL,MEMORY,ALLOCATION,ON,SYSTEM,DISC,            07060000
                                                                        07065000
             << DEFECTIVE TRACK MESSAGES >>                             07070000
                                                                        07075000
2225, 4,LIST,DEFECTIVE,TRACK'SECTOR,INFORMATION,                        07080000
2226, 4,NO,ENTRIES,IN,TABLE,                                            07085000
2227, 2,DELETE,TRACK,                                                   07090000
2228, 6,ENTER,LDEV,COMMA,CYLINDER,AND',HEAD,                            07095000
2229, 1,RECOVER,                                                        07100000
2230, 1,DELETE,                                                         07105000
2231, 3,DELETE,OR',RECOVER,                                             07110000
2232, 3,DELETE,OR',REASSIGN,                                            07115000
2233, 5,DELETE,COMMA,REASSIGN,OR',RECOVER,                              07120000
2234, 5,LOGICAL',PACK,SIZE,IN,CYLINDERS,                                07125000
2235, 6,LDEV,PD1,IS,NOT',A,DISC,                                        07130000
2236, 2,UNINITIALIZED,DISC,                                             07135000
2237, 2,INVALID,TRACK,                                                  07140000
2238, 2,INVALID,CYLINDER,                                               07145000
2239, 2,INVALID,HEAD,                                                   07150000
2240, 4,WARNING,IN,RESERVED,AREA,                                       07155000
2241, 3,WARNING,IN,DIRECTORY,                                           07160000
2242, 4,WARNING,IN,VIRTUAL,MEMORY,                                      07165000
2243, 4,WARNING,IN,ALTERNATE,AREA,                                      07170000
2244, 7,WARNING,OLD,WELCOME,MESSAGE,ON,DEFECTIVE,TRACKS,                07175000
2245, 7,WARNING,VIRTUAL,MEMORY,AREA,CONTAINS,REASSIGNED,TRACKS,         07180000
2246, 4,WARNING,IN,SYSTEM,AREA,                                         07185000
2247, 3,REASSIGN,OR',RECOVER,                                           07190000
2248, 6,WARNING,IN,DISC,FREE,SPACE,MAP,                                 07195000
2250, 7,WARNING,IN,A,SYSTEM,DISC,RESIDENT,TABLE,                        07200000
2251,11,LOGICAL',PACK,SIZE,EQUALS,PD1,CYLINDERS,COMMA,PD2,              07205000
        ALTERNATE,TRACKS,AVAILABLE,                                     07210000
                                                                        07215000
             << RESTORE MESSAGES >>                                     07220000
                                                                        07225000
2275,11,NO,USER,FILES,ON,TAPE,HYPHEN,DO',YOU,WANT,TO',RELOAD,           07230000
2276, 9,PD1,FILES,NOT',FOUND,HYPHEN,ANOTHER,TAPE,SET',                  07235000
        AVAILABLE,                                                      07240000
2277, 6,FOLLOWING,FILES,PURGED,HYPHEN,NOT',FOUND,                       07245000
2278, 6,NOT',ALL,FILES,FOUND,HYPHEN,LIST,                               07250000
2279, 9,WARNING,DOUBLE',EOF,MARK,CRLF,TRAILER,LABEL',ERROR,             07255000
        ASSUMED,                                                        07260000
2280, 6,FOLLOWING,FILES,PURGED,HYPHEN,DISC,ERRORS,                      07265000
2281, 7,FILES,PURGED,BECAUSE,OF',ERRORS,HYPHEN,LIST,                    07270000
2282, 1,LIST,                                                           07275000
2283, 5,RELOAD,OF',USER,FILES,ABORTED,                                  07280000
2284, 4,IS,ANOTHER,REEL,AVAILABLE,                                      07285000
2285, 4,INVALID,COLD,LOAD,DEVICE,                                       07290000
2286, 6,FOLLOWING,FILES,LOST,DATA,DURING,SPARING,                       07295000
2287, 6,PURGE,ALL,FILES,WHICH,LOST,DATA,                                07300000
2288, 3,SAVE,FILE,STR1,                                                 07305000
2291, 3,MOUNT,NEXT,REEL,                                                07310000
2292, 4,MOUNT,REEL,NUM,PD1,                                             07315000
2293, 1,SECONDARY,                                                      07320000
                                                                        07325000
             << CLASS MESSAGES >>                                       07330000
                                                                        07335000
2300, 2,CLASS,CHANGES,                                                  07340000
2301, 2,LIST,CLASSES,                                                   07345000
2302, 2,DELETE,CLASSES,                                                 07350000
2303, 2,ADD,CLASSES,                                                    07355000
2304, 1,CLASSES,                                                        07360000
2305, 3,LOGICAL',DEVICE,NUMS,                                           07365000
2306, 3,DUPLICATE',DEVICE,NUMS,                                         07370000
2307, 2,CLASS,NAME,                                                     07375000
2308, 3,INPUT,OR',OUTPUT,                                               07380000
                                                                        07385000
                                                                        07390000
             << TERMTYPE DESCRIPTOR FILE MESSAGES >>                    07395000
                                                                        07400000
2309, 1,TTDF,  <<ENTER [TERM TYPE #],[DESCR FILENAME]?>>                07405000
2310, 4,LIST,TERMINAL,TYPE,FILES,                                       07410000
2311, 5,NO,TERMINAL,TYPE,FILES,DEFINED,                                 07415000
2312, 3,TERMINAL,TYPE,CHANGES,                                          07420000
2313, 4,DELETE,TERMINAL,TYPE,FILES,                                     07425000
2314, 4,ADD,TERMINAL,TYPE,FILES,                                        07430000
2315, 1,FILES,                                                          07435000
2316, 2,FILE,NAME,                                                      07440000
                                                                        07445000
             << SERIAL/FOREIGN DISC MESSAGES >>                         07450000
                                                                        07455000
2325, 5,OKAY,TO',DISMOUNT,LDEV,PD1,                                     07460000
2326, 4,SERIAL,DISC,ERROR,PD1,                                          07465000
2327, 3,SERIAL,DISC,CLASS,                                              07470000
2328, 5,NEW,SERIAL,DISC,UNIT,NUM,                                       07475000
2329, 6,MAKE,DISC,UNIT,NUM,CHANGES,NOW,                                 07480000
2330, 3,CHANGE,INPUT,DEVICE,                                            07485000
2331, 5,MOUNT,SERIAL,DISC,NUM,PD1,                                      07490000
2332, 1,READY,                                                          07495000
2333,10,NOT',A,SERIAL,DISC,MOUNTED,ON,DRT,PD1,UNIT,PD2,                 07500000
2334, 3,FOREIGN,DISC,CLASS,                                             07505000
                                                                        07510000
             << SPOOLING MESSAGES >>                                    07515000
                                                                        07520000
2350, 5,IN,COMMA,OUT,OR',IN'OUT,                                        07525000
2351, 5,CONCURRENT,OR',NON,HYPHEN,CONCURRENT,                           07530000
2352, 5,MAX,NUM,OF',OPEN,SPOOLFILES,                                    07535000
2353, 5,MAX,NUM,OF',SPOOLFILE,KILOSECTORS,                              07540000
2354, 6,NUM,OF',SECTORS,PER,SPOOLFILE,EXTENT,                           07545000
2355, 8,MAX,NUM,OF',OPEN,SPOOLFILES,MUST,BE,CHANGED,                    07550000
2356, 5,MAX,ALLOWED,IN,CURRENT,CONFIGURATION,                           07555000
2357, 5,SIZE,MUST,BE,MOD',FOUR,                                         07560000
                                                                        07565000
             << CONFIGURATION MESSAGES >>                               07570000
                                                                        07575000
2400, 9,WARNING,COLD,LOAD,DEVICE,NOT',CONFIGURED,INTO,IO,               07580000
        TABLES,                                                         07585000
2401,22,WARNING,SYSTEM,DISC,AND',COLD,LOAD,DEVICE,ARE,ON,SAME,          07590000
        DRT,CRLF,SYSTEM,DISC,MUST,BE,ONLY,UNIT,ZERO,ON,THIS,DRT,        07595000
2402, 10,WARNING,SYSTEM,DISC,VIRTUAL,MEMORY,SIZE,ONLY,CHANGED,          07600000
         ON,RELOAD,                                                     07605000
2403, 7,WARNING,DIRECTORY,SIZE,ONLY,CHANGED,ON,RELOAD,                  07610000
2404, 7,WARNING,RIN,TABLE,CHANGED,ONLY,ON,RELOAD,                       07615000
2405, 7,WARNING,LOGID,TABLE,ONLY,CHANGED,ON,RELOAD,                     07620000
2406, 9,WARNING,CS,DRIVER,WILL,NOT',BE,LOADED,CORE,RESIDENT,            07625000
2407, 7,TAPE,UNIT,NUM,PD1,WENT,NOT',READY,                              07630000
2408, 5,LDEV,NUM,PD1,NOT',READY,                                        07635000
2409, 3,NO,SUCH,CLASS,                                                  07640000
2410, 3,NO,SUCH,DEVICE,                                                 07645000
2411, 4,LDEV,PD1,DRT,PD2,                                               07650000
2412, 5,PHYSICAL,MEMORY,AVAILABLE,IS,PD1,                               07655000
2413, 8,THAT,FUNCTION,NOT',SUPPORTED,ON,THIS,CPU,TYPE,                  07660000
                                                                        07665000
             << MISC. MESSAGES >>                                       07670000
                                                                        07675000
2450, 2,DISABLE,LOGGING,                                                07680000
2451, 4,RECOVER,LOST,DISC,SPACE,                                        07685000
2452, 7,BANK,ZERO,DEPENDENT,MEMORY,USED,HYPHEN,PD1,                     07690000
2453, 2,ILLEGAL,INPUT,                                                  07695000
2454, 3,STACK,MARKER,TRACE,                                             07700000
2455, 1,EOF,                                                            07705000
2456, 6,UNRESOLVED,EXTERNAL',STR1,IN,PROGRAM,STR2,                      07710000
2457, 7,UNRESOLVED,EXTERNAL',STR1,IN,SL,SEGMENT,STR2,                   07715000
2458,10,INVALID,INPUT,HYPHEN,ALLOWED  ,INPUT,RANGE',IS,                 07720000
                PD1,HYPHEN,PD2,                                         07725000
2459, 6,WARNING,EXPERIMENTAL,SOFTWARE,PASS,EQUALS,PD1,                  07730000
2460, 6,WARNING,FOLLOWING,SYSTEM,FILES,NOT',DUMPED,                     07735000
2461, 3,ENTER,DUMP,DATE,                                                07740000
2462, 3,LIST,FILES,DUMPED,                                              07745000
2463, 5,ENTER,DUMP,FILE,SUBSET,S',                                      07750000
2464, 4,END',OF',SYSTEM,SECTION,                                        07755000
2465, 2,READ,PENDING,                                                   07760000
2466, 5,UNABLE,TO',OBTAIN,STACK,SPACE,                                  07765000
2467, 6,NEW,ININ,FILE,NOT',ONE,EXTENT,                                  07770000
2468, 4,MAX,ININ,SIZE,EXCEEDED,                                         07775000
2469, 4,USER,WITHOUT,REQUIRED,CAPABILITIES,                             07780000
2470, 5,CHANGED,TO',DEFAULT,DUMP,DATE,                                  07785000
2471, 3,ILLEGAL,DUMP,DATE,                                              07790000
2472, 6,SERIES'33,NOT',SUPPORTED,BY,THIS,VERSION,                       07795000
2473, 8,WARNING,THE,NEW,OPTION',WILL,NOT',BE,PERFORMED,                 07800000
                                                                        07805000
             << CS'80 SPARING MESSAGES >>                               07810000
                                                                        07815000
2500, 6,SPARING,IN,PROGRESS,ON,LDEV,PD1,                                07820000
2501, 5,SPARING,COMPLETED,ON,LDEV,PD1,                                  07825000
2502, 7,CAN,NOT',DELETE,TRACKS,ON,THIS,DISC,                            07830000
2503,10,WARNING,INVALID,DEFECTIVE,SECTOR,TABLE,ON,LDEV,PD1,             07835000
        HYPHEN,REPAIRED,                                                07840000
2504, 6,NUM,OF',SPARE,OPERATIONS,EQUALS,STR1,                           07845000
2505, 7,NUM,OF',SPARE,TRACKS,USED,EQUALS,PD1,                           07850000
2506, 7,NUM,OF',SPARE,TRACKS,AVAILABLE,EQUALS,PD1,                      07855000
                                                                        07860000
           << DISC ALLOCATION CHANGES  >>                               07865000
                                                                        07870000
2550, 3,DISC,ALLOCATION,CHANGES,                                        07875000
2551, 4,MAX,DIRECTORY,SIZE,SECTORS',                                    07880000
                                                                        07885000
           << SYSTEM SL AND PROGRAM CHANGES   >>                        07890000
                                                                        07895000
2600, 3,SYSTEM,SL,CHANGES,                                              07900000
2601, 2,LIST,LIBRARY,                                                   07905000
2602, 7,ENTER,SEGMENT,NAME,COMMA,USLFILE,NAME,SEG'TYPE,                 07910000
2603, 7,ENTER,PROGRAM,NAME,COMMA,REPLACEMENT,FILE,NAME,                 07915000
2604, 2,DELETE,SEGMENT,                                                 07920000
2605, 3,ENTER,SEGMENT,NAME,                                             07925000
2606, 2,ADD,SEGMENT,                                                    07930000
2607, 2,REPLACE,SEGMENT,                                                07935000
2608, 3,SYSTEM,PROGRAM,CHANGES,                                         07940000
2609, 4,NOT',A,SYSTEM,PROGRAM,                                          07945000
2610, 5,TOO,MANY,SYSTEM,SL,CHANGES,                                     07950000
2611, 6,NEW,ININ,FILE,NOT',ONE,EXTENT,                                  07955000
2612, 4,MAX,ININ,SIZE,EXCEEDED,                                         07960000
                                                                        07965000
           << LOGGING CHANGES  >>                                       07970000
                                                                        07975000
2650, 2,LOGGING,CHANGES,                                                07980000
2651, 3,LIST,LOGGING,STATUS,                                            07985000
2652, 2,STATUS,CHANGES,                                                 07990000
2653, 4,ENTER,TYPE,COMMA,ON'OFF,                                        07995000
2654, 5,LOG,FILE,RECORD,SIZE,SECTORS',                                  08000000
2655, 4,LOG,FILE,SIZE,RECORDS',                                         08005000
2656, 6,MAX,NUMBER,OF',USER,LOGGING,PROCESSES,                          08010000
2657, 7,MAX,NUMBER,OF',USERS,PER,LOGGING,PROCESS,                       08015000
                                                                        08020000
           << MISC. CONFIGURATION CHANGES >>                            08025000
                                                                        08030000
2700, 3,MISC,CONFIGURATION,CHANGES,                                     08035000
2701, 4,NOT',A,GLOBAL',RIN,                                             08040000
2702, 3,LIST,GLOBAL',RINS,                                              08045000
2703, 3,DELETE,GLOBAL',RINS,                                            08050000
2704, 6,MAX,NUM,OF',CONCURRENT,RUNNING,JOBS,                            08055000
2705, 3,ENTER,RIN,NUM,                                                  08060000
2706, 5,NUM,OF',SECONDS,TO',LOGON,                                      08065000
2707, 3,NUM,OF',RINS,                                                   08070000
2708, 4,NUM,OF',GLOBAL',RINS,                                           08075000
2709, 4,MAX,NUM,OF',JOBS,                                               08080000
2710, 5,DEFAULT,JOB,CPU,TIME,LIMIT,                                     08085000
2712, 3,MESSAGE,CATALOG,CHANGES,                                        08090000
2713, 3,LIST,MESSAGE,CATALOG,                                           08095000
2714, 4,CATALOG,INPUT,FILE,NAME,                                        08100000
2715, 6,MAX,NUM,OF',CONCURRENT,RUNNING,SESSIONS,                        08105000
2716, 2,MAKECAT,ERROR,                                                  08110000
2717, 3,SOFTDUMP,COMMAND,CHANGES,                                       08115000
2718, 5,SOFTDUMP,COMMAND,COMMA,FILE,NAME,                               08120000
2719, 4,SOFTDUMP,COMMAND,FILE,ERROR,                                    08125000
2720, 1,MAX,                                                            08130000
                                                                        08135000
           << SCHEDULING CHANGES   >>                                   08140000
                                                                        08145000
2750, 2,SCHEDULING,CHANGES,                                             08150000
2751, 3,SEGMENT,LIMIT,CHANGES,                                          08155000
2752, 6,MAX,NUM,OF',CONCURRENT,RUNNING,PROGRAMS,                        08160000
2753, 4,MAX,CODE,SEGMENT,SIZE,                                          08165000
2754, 4,MAX,NUM,OF',SEGS'PROC,                                          08170000
2755, 3,MAX,STACK,SIZE,                                                 08175000
2756, 5,MAX,EXTRA,DATA,SEGMENT,SIZE,                                    08180000
2757, 6,MAX,NUM,OF',EXTRA,DATA,SEGS'PROC,                               08185000
2758, 3,STD,STACK,SIZE,                                                 08190000
                                                                        08195000
           << MISC. SYSDUMP MESSAGES >>                                 08200000
                                                                        08205000
2800, 5,ILLEGAL,TAPE,FILE,OPEN,PARAMETERS,                              08210000
2801,23,FILE,SUBSET,LIST,TOO,LONG',COMMA,A,MAX,                         08215000
        OF',PD1,CHARACTERS,IS,ALLOWED,PERIOD,FOR',MORE,                 08220000
        COMPLEX,LISTS,COMMA,SPECIFY,A,INDIRECT,FILE,                    08225000
2802, 5,SYNTAX,ERROR,IN,SUBSET,LIST,                                    08230000
2803, 4,USER,WITHOUT,REQUIRED,CAPABILITIES,                             08235000
2804, 8,THAT,FUNCTION,NOT',SUPPORTED,ON,THIS,CPU,TYPE,                  08240000
                                                                        08245000
           << SYSTEM TABLE CHANGES >>                                   08250000
                                                                        08255000
3000, 3,SYSTEM,TABLE,CHANGES,                                           08260000
3001, 1,CST,                                                            08265000
3002, 2,EXTENDED,CST,                                                   08270000
3003, 1,DST,                                                            08275000
3004, 1,PCB,                                                            08280000
3005, 2,IO,QUEUE,                                                       08285000
3006, 3,DISC,REQUEST,QUEUE,                                             08290000
3007, 4,TERMINAL,BUFFERS,PER,PORT,                                      08295000
3008, 2,SYSTEM,BUFFERS,                                                 08300000
3009, 2,SWAP,TABLE,                                                     08305000
3010, 3,PRIMARY,MESSAGE,TABLE,                                          08310000
3011, 3,SECONDARY,MESSAGE,TABLE,                                        08315000
3012, 3,SPECIAL',REQUEST,TABLE,                                         08320000
3013, 1,ICS,                                                            08325000
3014, 3,UCOP,REQUEST,QUEUE,                                             08330000
3015, 3,TIMER,REQUEST,QUEUE,                                            08335000
3016, 2,BREAKPOINT,TABLE,                                               08340000
3017, 3,LOADER,SEGMENT,TABLE,                                           08345000
                                                                        08350000
           << PROGRESS MESSAGES >>                                      08355000
                                                                        08360000
3050, 6,INITIALIZATION,OF',DISC,FREE,MAPS,COMPLETED,                    08365000
3051, 6,RECOVER,LOST,DISC,SPACE,IN,PROGRESS,                            08370000
3052, 5,RECOVER,LOST,DISC,SPACE,COMPLETED,                              08375000
3053, 3,DIRECTORY,MAINTENANCE,COMPLETED,                                08380000
3054, 5,LOADING,OF',SYSTEM,FILES,COMPLETED,                             08385000
3055, 6,RELOAD,OF',USER,FILES,IN,PROGRESS,                              08390000
3056, 5,RELOAD,OF',USER,FILES,COMPLETED,                                08395000
3057, 11,PART,PD1,OF',PD2,COMPLETED,HYPHEN,MEMORY,                      08400000
         RESIDENT,TABLES,SET',UP,                                       08405000
3058, 8, PART,PD1,OF',PD2,COMPLETED,HYPHEN,SL,                          08410000
         BINDING,                                                       08415000
3059, 10,PART,PD1,OF',PD2,COMPLETED,HYPHEN,SYSTEM,                      08420000
         IO,PROCESS,CREATION,                                           08425000
3060, 8, PART,PD1,OF',PD2,COMPLETED,HYPHEN,DRIVER,                      08430000
         LOADING,                                                       08435000
3061,11, PART,PD1,OF',PD2,COMPLETED,HYPHEN,DISC,                        08440000
         RESIDENT,TABLES,SET',UP,                                       08445000
3062, 9, PART,PD1,OF',PD2,COMPLETED,HYPHEN,SYSTEM,                      08450000
         PROCESS,CREATION,                                              08455000
3063, 6, LOADING,OF',SYSTEM,FILES,IN,PROGRESS,                          08460000
3064, 5, STARS, PERFORMING, A, WARMSTART', STARS,                       08465000
3065, 5, STARS, PERFORMING, A, COOLSTART, STARS,                        08470000
3066, 5, STARS, PERFORMING, AN,UPDATE', STARS,                          08475000
3067, 5, STARS, PERFORMING, A, COLDSTART, STARS,                        08480000
3068, 8, STARS, PERFORMING, A, RELOAD, WITH',                           08485000
         SPREAD', OPTION', STARS,                                       08490000
3069, 9, STARS, PERFORMING, A, RELOAD, FOR', A,                         08495000
         NEW, INSTALLATION, STARS,                                      08500000
  -1;   << TERMINATOR - END OF THE MESSAGES >>                          08505000
                                                                        08510000
                                                                        08515000
   INTEGER ARRAY TEST(0:29)=Q;                                          08520000
   BYTE ARRAY BTEST(*) = TEST;                                          08525000
   INTEGER POINTER PHRASE;                                              08530000
   POINTER LPHRASE = PHRASE;                                            08535000
   INTEGER DIRECT = STRING1;                                            08540000
   INTEGER ARRAY STRINGARRAY(*) = DIRECT;                               08545000
   DOUBLE ARRAY NUMARRAY(*) = NUM1;                                     08550000
                                                                        08555000
   TOS := @TEST;    << DESTINATION ADDR >>                              08560000
   TOS := @MESS;    << SOURCE ADDR      >>                              08565000
L: TOS := 2;        << COUNT >>                                         08570000
   ASSEMBLE( MOVE PB,1 );                                               08575000
   IF TEST = %177777 OR TEST > MSGNR THEN RETURN;                       08580000
   IF <> THEN  << CORRECT MESSAGE? >>                                   08585000
      BEGIN                                                             08590000
      ASSEMBLE( DECB,DECB ); << BEGINNING OF TEST >>                    08595000
      TOS := TOS+TEST(1);    << BEGINNING OF NEXT MESSAGE >>            08600000
      GO L;                                                             08605000
      END;                                                              08610000
   @PHRASE := S1;  << SAVE POINTER TO PHRASE NR. >>                     08615000
   TOS := TEST(1); << COUNT >>                                          08620000
   ASSEMBLE( MOVE PB );  << LOAD REMAINDER OF MESSAGE >>                08625000
   IF MSGNR < 2000 THEN                                                 08630000
      BEGIN                                                             08635000
      MOVE BUF := "ERROR #",2;                                          08640000
      TOS := TOS+ASCII(MSGNR,10,BPS0);                                  08645000
      MOVE * := "  ",2;                                                 08650000
      END                                                               08655000
   ELSE                                                                 08660000
      TOS := @BUF;                                                      08665000
                                                                        08670000
   DO BEGIN                                                             08675000
      IF LPHRASE.(1:1) THEN                                             08680000
         BEGIN << ADD PARAMETER TO MESSAGE >>                           08685000
         IF LPHRASE.(12:1) THEN                                         08690000
            BEGIN  << STRING PARAMETER >>                               08695000
            TOS := STRINGARRAY(PHRASE.(13:3));                          08700000
            TOS := BPS0;  << COUNT FOR MOVE >>                          08705000
            ASSEMBLE( INCB ); << START MOVE FROM SECOND BYTE >>         08710000
            ASSEMBLE( MVB 2 );<< MOVE IT >>                             08715000
            END                                                         08720000
         ELSE                                                           08725000
            BEGIN  << NUMBER PARAMETER >>                               08730000
            IF LPHRASE.(11:1) THEN                                      08735000
               BEGIN                                                    08740000
               BPS0 := "%";                                             08745000
               TOS := TOS+1;                                            08750000
               END;                                                     08755000
            TOS := TOS+LDNTOA(NUMARRAY(PHRASE.(13:3)),                  08760000
                   (IF LPHRASE.(11:1) THEN 8 ELSE 10), BPS0);           08765000
            END;                                                        08770000
         END                                                            08775000
      ELSE                                                              08780000
         BEGIN << SEARCH FOR VOCAB WORD >>                              08785000
         TOS := @BTEST;  << DESTINATION ADDR >>                         08790000
         TOS := @VOCAB;  << SOURCE ADDR >>                              08795000
         X := PHRASE.(3:13);                                            08800000
         WHILE > DO                                                     08805000
            BEGIN                                                       08810000
            MOVE * := *PB,(1),1; << LOAD NR. BYTES IN PHRASE >>         08815000
            TOS := TOS+BTEST;  << BEGINNING OF NEXT PHRASE >>           08820000
            ASSEMBLE( DECB,DECX );                                      08825000
            END;                                                        08830000
         MOVE * := *PB,(1),1;                                           08835000
         DELB; << LEAVE POINTER TO PHRASE >>                            08840000
         MOVE * := *PB,(BTEST),2; << PUT PHRASE INTO BUF >>             08845000
         IF LPHRASE.(2:1) THEN                                          08850000
            BEGIN  << APPEND A "S" >>                                   08855000
            BPS0 := "S";                                                08860000
            TOS := TOS+1;                                               08865000
            END;                                                        08870000
         END;                                                           08875000
      BPS0 := " ";  << APPEND A BLANK >>                                08880000
      TOS := TOS+1;                                                     08885000
      @PHRASE := @PHRASE+1;  << NEXT PHRASE NR. >>                      08890000
      TEST(1) := TEST(1)-1; << DEC. NR. PHRASES >>                      08895000
      END UNTIL =;                                                      08900000
   GENMESSAGE := TOS-@BUF-1; << NR. BYTES IN MESSAGE >>                 08905000
END;                                                                    08910000
