*COMDECK VAR,NOPROP 
_$J+  PAGE EJECT? 
VAR 
_*****************************
*                            *
*     V A R I A B L E S      *
*                            *
*****************************?
_***********************************************************************
*                                                                      *
*             MULTIPLEX SUBSYSTEM  VARIABLES                           *
*                                                                      *
***********************************************************************?
_ 
*              --- THE VARIABLE #NGA# MUST REMAIN ---                  *
*              ---   AT THE BEGINNING OF GLOBAL   ---                  *
? 
      NGA     : NGAQLT;                     _ A REGISTER PRIME FOR FIRM?
_ 
      **************************************
? 
      NGQ     : NGAQLT;                     _ Q REGISTER PRIME FOR FIRM?
      NQPACKET: NQMUXCMD;                   _MUX COMMAND PACKET        ?
      N1      : INTEGER;                    _ MUX SHARED INTERFACE     ?
  
               _ # PORT TABLE # ? 
  
      NAPORT  : 'SYPRTT;
  
               _ # CHARACTER XMIT CHARACTERISTICS TABLE # ? 
  
      NICTCT  : ARRAY [N0LNSPD] OF NICTCY;
  
               _ # LINE TYPE SEGMENT POINTERS TABLE # ? 
  
      NELTP   : ARRAY [N0LTYP] OF INTEGER;
  
               _ # CE ERROR CODE FOR PMWOLP # ? 
  
      NRCODE  : INTEGER;
  
               _ # MUX CIRCULAR INPUT BUFFER # ?
  
      BQCIBPTR : 'B0CIB;
  
               _ #MUX CIRCULAR INPUT BUFFER SIZE# ? 
  
      B1CIBSIZ : INTEGER; 
  
      B1ODDT   : INTEGER; 
  
               _ #MUX SUBSYSTEM COMMAND PACKET# ? 
  
      TKLIPAK : NKINCOM;
_$J+? 
                  _#'SOFTWARE PRIORITY LEVEL NUMBER#? 
    LEVELNO : B0PRILEVEL; 
                  _#INTERRUPT MASK SAVE AREA#?
    JKTMASK : ARRAY [B0PRILEVEL] OF INTEGER;
               _ # PBTIMER CONTROL TABLE # ?
    CTIMER : PACKED RECORD
              CT100MS : INTEGER;
               END; 
               _ # 100 MS FIRST/LAST POINTERS # ? 
     CATONRP : B0BUFPTR;                    _ NEXT READ/FIRST READ PTR ?
     CATOLRP : B0BUFPTR;                    _ LAST READ POINTER        ?
                                                         _ 05/01/74 ? 
                 _ #REAL TIME CLOCK  AUTO-DATA XFER TABLE  # ?
    CICLKADT:  RECORD                  _     RTC ADT TABLE             ?
                 CIWORD1,              _ CONSTANT -    VALUE IS $80F0  ?
                 CICOUNT,              _ CLOCK COUNT - INCREMENTS EVERY?
                                       _               3 1/3 MS.       ?
                 CILIMIT,              _ CLOCK LIMIT - RTC INTERRUPT   ?
                                       _               WILL OCCUR WHEN ?
                                       _               CICOUNT=CILIMIT ?
                 CISPARE: INTEGER      _ NOT USED -    VALUE IS ZERO   ?
               END; 
_ 
*              ---- COUNTER FORM LOST CLOCK COUNT ERRORS ---- 
? 
      CICECNT : INTEGER;
                                                         _ 10-17-74 ? 
                _ #ADDRESS OF CURRENT LIST ENTRY TO GET/PUT# ?
    CNENTRY: INTEGER; 
  
    PTLINA   :  INTEGER;     _MODEM STATE PTR ADDR FOR PTLINIT - LINE A?
                _ # DATA BUFFER SIZE # ?                                 CC4
    BEDBSIZE : BECTPTR;       _ DATA BLOCK SIZE                        ? CC4
_?                                                                       CC4
                _ #BUFFER SIZE-INDEX PARAMETERS# ?                       CC4
    B0S8 ,                                                               CC4
    B0S16,                                                               CC4
    B0S32,                                                               CC4
    B0S64    : BECTPTR; 
_?                                                                       CC4
                _ #MISCELLANEOUS BUFFER SIZE PARAMETERS# ?               CC4
_?                                                                       CC4
    R0BUFSZE,                                                            CC4
    S0BUFSZE,                                                            CC4
    R1SBFSZE,                                                            CC4
    R1SZE    : BECTPTR;                                                  CC4
                  _#TYPE 2 TABLE BUFFER SIZE#?
    J0T2BFSZE : BECTPTR;
            _ # BUFFER MAINTENANCE BIT MAP # ?
_ 
            THIS TABLE IS A BIT MAP OF THE LOWER 64K OF MEMORY. 
            EACH BIT IN THE TABLE CORRESPONDS TO 8 WORDS OF MAIN
            MEMORY. 
  
            BIT = 0  -  8 WORD AREA AVAILABLE 
            BIT = 1  -  8 WORD AREA ALREADY BEING USED
? 
    BEBITMAP : PACKED ARRAY [0..1023] OF CHAR;
  
  
    BEMSK8   : ARRAY [0..15] OF INTEGER;    _ MASK TABLE FOR 8 WORD BUF?
    BEMSK16  : ARRAY [0..7] OF INTEGER;     _ MASK TABLE FOR 16 WORD B ?
  
  
            _ # PHASE 1 BUFFER INITIALIZATION # ? 
  
    B3NBUF : INTEGER;                       _ NR OF BUFFERS TO RELEASE ?
  
                                                         _ 08-20-74 ? 
                _ #* BUFFER AREA ADDRESS LIMITS# ?
  
    B3SBUF,             _ LOWER LIMIT OF BUFFER AREA                   ?
    B3EBUF: B0OVERLAY;  _ UPPER LIMIT OF BUFFER AREA                   ?
  
                 _#*CORE SIZE OF BASE PROCESSOR#? 
    J1CORESIZE : B018BITS;
  
               _ # FIRMWARE ENTRY POINT ADDRESSES # ? 
  
    PFLSGET   : INTEGER;               _ LIST GET                      ?
    PFLSPUT   : INTEGER;               _ LIST PUT                      ?
    PFBURLS   : INTEGER;               _ BUFFER RELEASE                ?
    PFBUGET   : INTEGER;               _ BUFFER GET                    ?
    PFBUEXT   : INTEGER;               _ BUFFER EXTRACT                ?
    PFCOPY    : INTEGER;               _ PBFCOPY ENTER ADDRESS         ?
    N1FIRMAD  : INTEGER;               _ OUTPUT TO CLA SEQUENCE        ?
    N1INFLG   : INTEGER;               _ RESET NAION FOR NKINOUT CMD   ?
    N2P3INTAD : INTEGER;               _ P3 INTERRUPT GENERATION       ?
    N3P3INTAD : INTEGER;               _ RESET P3 INTERRUPT            ?
    PFLINTO   : INTEGER;               _ DECREMENT LINE TIMEOUT        ?
    PFSR2SM   : INTEGER;               _ SET/RESET STATUS MODE 2 BIT(S)?
    B1DMTA    : INTEGER;                _DEADMAN TIMER RESET           ?
    N2CHARTO  : INTEGER;               _ TIMEOUT FIRMWARE ADDRESS      ?
_?                                                                       CC4
                _ # LINE TYPE TABLE # ?                                  CC4
_                                                                      ? CC4
    NBLTYT : SYLTYT;                                                     CC4
_?                                                                       CC4
                  _#BASE IDLE TIME COUNTER#?
    BTLOOP : INTEGER; 
  
    B6OSERR:BOOLEAN;    _ ERROR INDICATOR UPON SUBROUTINE   ? 
                        _ RETURN: T=ERROR , F=NO ERROR      ? 
                                                          _09-06-76?
                  _#POST MORTEM PARAMETER DELIMITERS#?
     QENTLIM : INTEGER;  _NO OF ENTRIES IN EWLQ CONSIDERED AS FLOODED  ?
                _ #'BYTE MASKS# ? 
  
                _ #'BIT 0 THRU 15 MASK ARRAY#?
    BITMASK:ARRAY[B04BITS] OF SETWORD;
                _ #* LARGEST BUFFER# ?
    B3UPPER: B0BUFSIZES;
                _ #* SMALLEST BUFFER# ? 
    B3LOWER: B0BUFSIZES;
              _ TEXT PROCESSING BUFFER SIZE ? 
    BETPSIZE : BECTPTR; 
    TPBUFLENGTH : INTEGER;                  _ TEST PROCESSING BUFFER   ?
                                            _    LENGTH                ?
                _ #* FIRST WORK LIST# ? 
    B4FSTL: B0WKLSTS; 
                _#BIP INTERFACE GLOBALS#? 
    B1TCB   : B0BUFPTR;                     _GLOBAL BIP TCB PTR        ?
    B1BUFF  : B0BUFPTR;                     _BIP BUFFER PTR            ?
    B1FLGWD : KTULTSFLAG;                   _BIP INTERFACE FLAGS? 
                  _#DATA MESSAGE TYPES#?                                 UPDATES
    J0DATAMSG : SET OF 0..$F;                                            31OCT75
                  _#CE ERROR MESSAGE OVERLAYS#? 
    CNCEOVLY : ARRAY [B0PRILEVEL] OF CNCEFILE;                           31OCT75
_?
                _ #WORK LIST INTERMEDIATE ARRAY#? 
_*                                                                     ?
_ THE LIST SERVICE INTERMEDIATE ARRAY IS AN AREA IN CORE INTO WHICH THE?
_ GET ROUTINE MOVES ENTRIES FROM A GIVEN WORKLIST,AND FROM WHICH THE   ?
_ PUT ROUTINE MOVES ENTRIES INTO A GIVEN WORKLIST. THERE ARE 17 ENTRIES?
_ IN THE INTERMEDIATE ARRAY,ONE FOR EACH INTERRUPT LEVEL AND EACH ENTRY?
_ HAS ALL THE NECESSARY OVERLAYS ASSOCIATED W/IT TO RENDER IT CAPABLE  ?
_ TO ASSUME THE FORMAT OF ANY ONE AND ALL THE WORKLISTS IN THE SYSTEM  ?
_*                                                                     ?
      BWWLENTRY : SYENTY; 
                                                         _ 04-03-74 ? 
                _ #WORK LIST CONTROL BLOCKS#? 
    BYWLCB : BYWLTY;
                _ #CURRENTLY ACTIVE WLCB POINTER# ? 
    BYCURWLP : BYCBPTR; 
                _ #MONITOR ACTIVE FLAG# ? 
    BYMONACT : BOOLEAN; 
                _ #BUFFER THRESHOLDS# ? 
    BFTHRESH : ARRAY[B0BUFLEVELS] OF INTEGER; 
                _ #'BUFFER LENGTHS ARRAY# ? 
    BUFLENGTH : ARRAY [B0BUFSIZES] OF INTEGER;
                _ #'TCB LENGTHS ARRAY# ?
    TCBLENGTH : ARRAY[B0TCBSIZES] OF INTEGER; 
             _ #'BUFFER CHARACTER LIMITS#?
    BUFLCD : ARRAY [B0BUFSIZES] OF INTEGER; 
                  _#CONVERT TO ASCII HEX/DECIMAL TABLE#?
    JMCNVTO : ARRAY [B04BITS] OF CHAR;
                  _#CONVERT FROM ASCII HEX/DECIMAL TABLE#?
    JNCNVTFROM : ARRAY [#0#..#F#] OF INTEGER; 
                  _#SOFTWARE INTERRUPT MASKS#?
   _HARDWARE   SOFTWARE 
    LINE NO.   PRIORITY  DESCRIPTION
       0          P1      INTERNAL
       1          P6      TELETYPE
       2          P2      MUX LOOP ERROR
       3          P3      MUX LEVEL 2 
       4          P16     1742-30 LINE PRINTER
       5          P5      SPARE 
       6          P7      COUPLER 
       7          P8      SPARE 
       8          P9      CLOCK 
       9          P10     1742 LINE PRINTER 
      10          P11     SPARE 
      11          P12     SPARE 
      12          P13     MLIA ODD INT PARALLEL 
      13          P14     MLIA INPUT LINE FRAME INT PARALLEL
      14          P15     SPARE 
      15          ---     HARDWARE BREAKPOINT 
      --          P17     OPS LEVEL PROGRAMS? 
_?
    JKMASK : ARRAY [B0PRILEVEL] OF INTEGER; 
*IF DEF,CONSOLE 
_$J+? 
                                                          _05-06-74?
                  _#SPECIAL TELETYPE CHARACTERS#? 
    J1CR,            _CARRIAGE RETURN?
    J1LF,            _LINE FEED?
    J1CTLH,          _CONTROL H - TREATED AS BACKSPACE? 
    J1BCKSPCE,       _BACKSPACE = ? 
    J1TUPEOM,        _TUP MESSAGE EOM = /?
    J1TUPCAN,        _TUP CANCEL INPUT = QUESTION MARK? 
    J1ENTERTUP,      _ENTER TUP MODE = CONTROL A? 
    J1LVETUP,        _LEAVE TUP MODE = CONTROL D? 
    J2ENTERMP,       _ENTER MAINT PANEL MODE = ESCAPE?
    J2LVEMP,         _LEAVE MAINT PANEL MODE = AT SIGN? 
    J1ICR,           _CONTROL SHIFT N, REPLACE WITH CR? 
    J1ILF,           _CONTROL SHIFT M, REPLACE WITH LF? 
    J1IDISCARD,      _DISCARD CONSOLE INPUT?
    J1SYSEOM : CHAR; _SYSTEM EOM = CONTROL D? 
                                                          _05-06-74?
                  _#PD CONTROLLER TABLES#?
    JACT : ARRAY [TTY..LP1742] OF JACONTROLLERTABLE;
                  _#LIO-PD ASSIGNMENT TABLE#? 
    JBASSIGNTABLE : ARRAY [J0LIO] OF INTEGER; 
                  _#WAIT FOR I/O COMPLETION FLAGS#? 
    JDWAITFLAGS : ARRAY [B0PGMS] OF BOOLEAN;
                  _#'DEVICE DIRECTOR FUNCTIONS#?
   _1713 TELETYPE DIRECTOR FUNCTION 
       BIT15,14 = BAUD RATE SELECTOR   BIT 7 = NOT USED 
       BIT 13 = DISCONNECT PRINTER     BIT 6 = ADT MODE 
       BIT 12 = EIGHT BIT WORD         BIT 5 = NOT USED 
       BIT 11 = DE-SELECT PARITY       BIT 4 = INT ON ALARM 
       BIT 10 = CONNECT PRINTER        BIT 3 = INT ON END-OF-OPERATION
       BIT  9 = SELECT READ MODE       BIT 2 = INT ON DATA
       BIT  8 = SELECT WRITE MODE      BIT 1 = CLEAR INTERRUPT
                                       BIT 0 = CLEAR CONTROLLER?
_?
    TTYCLR,          _TTY CLEAR INT, CONTROLLER?
    TTYREAD,         _TTY SELECT READ MODE, ALARM INT, DATA INT?
    TTYRITE,         _TTY SELECT WRITE MODE, NO INT?
    TTYWRITE,        _TTY SELECT WRITE MODE, ALARM INT, DATA INT? 
    TTYEOP : CHAR;   _CLEAR INT SELECT EOP INT? 
                  _#WRITE MODE MESSAGE#?
    J6WMSG : J0ML6; 
    J0ERRMSG, 
    J0SETUP : J0ML6;
                  _#CONSOLE LOGICAL I/O REQ PACKETS#? 
      JCOPSLRP,          _ OPS LEVEL LRP        ? 
      RCLRP,             _ SET MODE LRP         ? 
      RCLRP1 : JCPACKET; _ INTERRUPT HANDLER LRP? 
*ENDIF
*IF DEF,TUP 
                 _#DEBUG AID LOGICAL I/O REQ PACKETS#?
      RCLRP2,            _ DUMP REGISTERS SNAPSHOT LRP ?
      SCLRP : JCPACKET;  _ SNAPSHOT 1 LRP              ?
                  _#OPS PROGRAM BASE ADDRESSES#?
    JZOPSBASE : ARRAY [B0PGMS] OF B018BITS; 
    JUTUPTABLE : JUTESTUTILITYPACKAG; 
    J1TUPBFRS : ARRAY [1..64] OF INTEGER;  _TUP BUFFERS (IN/OUT)? 
    JEBPTABLE : JEBREAKTABLE;                          _BREAKPT TABLE?
    JRLEVELFLG : ARRAY [B0PRILEVEL] OF BOOLEAN;        _INT LEVEL FLAGS?
    JF1SNPTABLE : JFSNAPTABLE;                         _SNAP TABLE? 
    JF3SNPTABLE : JFSNAPTABLE;
    JGTESTABLE : ARRAY [BOOLEAN,BOOLEAN,BOOLEAN] OF J0COMPADDR; 
    JIPRINTREGS : ARRAY [B0REGISTERS] OF CHAR;
     J0HLTMSG : J0ML13;                     _ BREAKPOINT HALT MSG      ?
*ENDIF
_ 
*              ---- DEBUG AID VARIABLES AND TABLES ---- 
? 
      ZERO     : B018BITS;                  _ DUMPING 18 BIT ADDRESSES ?
      ONE      : B018BITS;                  _ DUMPING 18 BIT ADDRESSES ?
      MINUSONE : B018BITS;                  _ DUMPING 18 BIT ADDRESSES ?
                  _#CONSOLE TCB ADDRESS#? 
    C0CNSLTCB : B0BUFPTR; 
                  _#MAX NO. OF OUTSTANDING CONSOLE MSGS#? 
    C0THRESH : INTEGER; 
      TOTUP     : BOOLEAN;                  _TUP PRESENT               ?
      TOCONSOLE : BOOLEAN;                  _CONSOLE PRESENT           ?
  
                _ #MONITOR-S OWN TABLE# ? 
     BTMONOWN : SMONT ;           _PRIORITY SEGMENTS CONTROL BLOCK     ?
_?
                  _#ACTIVE LCB CHAIN ADDRESSES#?
    CELCBACT : RECORD 
                 CEFRST,           _ FIRST LCB IN CHAIN ? 
                 CELST : BZLCBP;   _ LAST  LCB IN CHAIN ? 
               END; 
*CALL VARTIMER
_ 
*              ---- 100 MS TIMING FOR TTY --- 
? 
    MSTFRST : BZLCBP;                       _ FIRST ENTRY IN CHAIN     ?
_ 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*                  ONE SECOND CLOCK                                   * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
? 
      CASECNTR       : INTEGER; 
  
                _ #USED BY PBTIMAL TO CONTROL TIMING # ?
  
      CBTIMTBL: ARRAY [C0TDPGMS] OF CBSYTMT;
  
                 _ #ARRAY OF LINE CONTROL BLOCKS   # ?
    CGLCBP : 'C0LCBS; 
_?
    C4LCBS : INTEGER;                        _NUMBER OF LCB#S          ?
                 _ SUB LCB VARIABLES ?
    CSUBLCBP : CHSUBP;                      _POINTER TO SUB LCB ARRAY  ?
    C4SUBLCBS : INTEGER;                    _ NUMBER OF SUB LCBS       ?
    SIZLCB   : INTEGER;                     _SIZE OF AN LCB            ?
                _ #ARRAY OF FIXED TCBS# ? 
    CGTCBS : ARRAY[0..C4TCM1] OF
             ARRAY[1..32] OF INTEGER; 
  
               _ # LINE TIMING CONTROL TABLE # ?
  
    BLTIMTBL : 'SYTIMTBL; 
  
    BLSTIMTBL : ARRAY[1..C4MAXSUBLCB]       _ SUB LINE CONTROL         ?
                OF BZLTIME; 
                                                         _ 10-07-74 ? 
                _ #C E ERROR MESSAGE CONTROL COUNTER  # ? 
    CNCECNT : INTEGER;
    CNCEALARM : INTEGER;                    _ ALARM OVERFLOW COUNTER   ?
  
                _ #C E ERROR MESSAGE CONTROL LIMIT # ?
    CNCELIMIT: INTEGER; 
_$J+? 
BJTIPTYPT : SYTIPTYPT;                 _ TIP TYPE TABLE                ?
  
  
                _ #BUFFER MAINTENANCE CONTROL BLOCK ARRAY # ? 
  
    BECTLBK : ARRAY [B0BUFSIZES] OF BECTRL; _ USED BY BUFFER MAINT.    ?
  
  
                                                        _ 06-24-74 ?
                _ #TOTAL AVAILABLE BUFFER SPACE INDICATOR# ?
  
    CLBFSPACE : INTEGER;     _ TOTAL SPACE IN UNITS OF SMALLEST BUFFER ?
  
                                                         _ 10-10-74 ? 
_********************************************************************** 
*                                                                     * 
*                        LOCAL NPUID NODES                            * 
*                                                                     * 
**********************************************************************? 
    CKLOCNODE : INTEGER;                    _LOCAL NODE NUMBER         ?
                _ # NODE TRUNK COUNT # ?
    C0NPBL : INTEGER; 
  
                 _ # NODE COUPLER COUNT # ? 
    C0NCPLR : INTEGER;
  
                 _ # POINTER(S) TO COUPLER(S) LLCB(S) # ? 
    GCLLCB : ARRAY [1..2] OF B0BUFPTR;
  
               _ # LOCAL NPU REGULATION LEVEL # ? 
  
    NPUREG : INTEGER; 
  
                 _ # MAXIMUM NODE COUNT # ? 
    C0NNODE : INTEGER;
                                                         _ 09 26 79 ? 
                _ # CONTROL BLOCK SIZE # ?
    NHCCBSIZE  : INTEGER;                   _ CPLR CTRL BLK SIZE       ?
    NHTRCBSIZE : INTEGER;                   _ TRNK CTRL BLK SIZE       ?
                                                         _ 10 04 79 ? 
  
                                                           _10-4-74?
                  _#MULTI-WORD ASCII SETS#? 
    JSDELIMSET,               _DELIMITER SET (COMMA,BLANK,TUP EOM)? 
    JSHEXSET   : JSASCIISET;  _HEX CHARACTER SET? 
_$J+? 
        _#TERMINAL CHARACTERISTICS TABLE#?
    NJTECT : SYTECT;
_?
           _#CANNED RESPONSES TO CONSOLE? 
      J0ERRFOR:J0ML14;
      J0ERRNOO : J0ML19;
_?
_?
_?
_?
     NPINTAB:NPINTYPE;     _INITIALIZATION SEQUENCE COMPLETION AND ERR.?
                           _TABLE                                      ?
  
         _# PAGE VALUE OF ROUTINE TABLE        #? 
         _# FOR PAGING BASE SYSTEM ENHANCEMENT #? 
      BPGSWITCH : B0SWITCH;                 _ 1 WORD ENTRY A PAGE VALUE?
                                            _   OF ROUTINES            ?
         _# SAVE HALT ADDRESS #?
      B0ORGHALT : INTEGER;                  _ TEMPORARY LOCATION       ?
                                            _   TO KEEP A HALT ADDRESS ?
      T7PGCNFCARD : INTEGER;                _PAGE OF PGCNFCARD ROUTINE ?
_ 
******************************
*                            *
*  FOLLOWING VARIABLES ARE   *
*  USED BY PGIVTCMD AND      *
*  PTIVTPRSR TO PASS FN AND  *
*  FV VALUES                 *
*                            *
******************************
? 
      IVTNM   : B0OVERLAY;                  _IVT CMD NMENOMIC          ?
_ 
******************************
*                            *
*  THIS VARIABLE IS USED BY  *
*  PBOFMT.                   *
*                            *
******************************
? 
      BABUFOFMT : B0BUFPTR;                 _ SOURCE BUFFER POINTER    ?
_ 
******************************
*                            *
*  FOLLOWING VARIABLES ARE   *
*  USED AS PASSING PARA-     *
*  METERS TO PBSTARTIO       *
*                            *
******************************
? 
      BIODEVICE : INTEGER;                  _ DIVICE NUMBER            ?
      BIOPRP    : B0BUFPTR;                 _ I/O REQUEST (PRP ADDRESS)?
_*****************************
*                            *
*    STRUCTURE SERVICES      *
*        VARIABLES           *
*                            *
*****************************?
                  _#TYPE 1 END OF TABLE#? 
    BREND : BRDIRCTRY;
    DESUPDN : B0BUFPTR;                     _ SUPERVISOR TABLE POINTER ?
    DELOCDN : B0BUFPTR;                     _ LOCAL DN TABLE POINTER.  ?
    DEHOSTABLE : B0BUFPTR;                  _ LOCAL HOST TABLE POINTER ?
_?
         _# ROUTINE PAGE VALUE AND ENTRY ADDRESS TABLE #? 
         _# FOR 8K/PAGE SYSTEM                         #? 
      BRTNJUMP : PAGEJUMPTBL;               _ 2 WORD ENTRIES A PAGE    ?
                                            _   VALUE AND AN ENTRY ADDR?
                                            _   OF ROUTINES            ?
