ER19  EQU * 
      OCT 0 
      LDA D19 
      JSB ERR 
ER23  EQU * 
      OCT 0 
      LDA D23 
      JSB ERR 
ER24  EQU * 
      OCT 0 
      LDA D24 
      JSB ERR 
ER25  EQU * 
      OCT 0 
      LDA D25 
      JSB ERR 
ER26  EQU * 
      OCT 0 
      LDA D26 
      JSB ERR 
ER29  EQU * 
      OCT 0 
      LDA D29 
      JSB ERR 
ERR   NOP 
      LDB ERR 
      ADB MD3 
      LDB B,I       PICK UP LOC OF ERROR
      JMP ERROR 
      SKP 
A     EQU 0 
B     EQU 1 
.     EQU 53B 
SECTR EQU 116B
SYSSC EQU 155B
H8BT EQU 75B
INVCH EQU 75B 
      SPC 1 
MD12  DEC -12 
MD10  EQU .-10
MD8   EQU .-8 
MD7   EQU .-7 
MD5   EQU .-5 
MD4   EQU .-4 
MD3   EQU .-3 
MD2   EQU .-2 
MD1   EQU .-1 
D1    EQU .+1 
D2    EQU .+2 
D3    EQU .+3 
D4    EQU .+4 
D5    EQU .+5 
D6    EQU .+6 
D7    EQU .+7 
D8    EQU .+8 
D9    EQU .+9 
D10   EQU .+10
D11   DEC 11
D12   DEC 12
D14   DEC 14
D15   DEC 15
D16   DEC 16
D17   DEC 17
D18   DEC 18
D19   DEC 19
D23   DEC 23
D24   DEC 24
D25   DEC 25
D26   DEC 26
D29   DEC 29
D126  DEC 126                                   7905                            
D128  DEC 128 
MXWPE DEC 9         WORDS/DIRECTORY ENTRY 
PNESW BSS 1         PACK NO. ENTRY SWITCH 
WPOTE DEC 16        WORDS/OPEN TABLE ENTRY
MWPOT DEC -16       NEG. WORDS/OPEN TABLE ENTRY 
TWTRB OCT 0         TOTAL WORDS IN ALL TRB'S
AARG1 DEF ARG1
ARG1  OCT 0 
ARG2  OCT 0 
ARG3  OCT 0 
ARG4  OCT 0 
ARG5  OCT 0 
ARG6  OCT 0 
ARG7  OCT 0 
ARG8  OCT 0 
      END 
                                                                                                                                                                                                                                                    