*COMDECK INTRAPS
         NAM   PBINTRAPS     INTERRUPT TRAPS TABLE (LOAD AT $100) 
         ENT   PBINTRAPS
         EXT   PBLN00        MEM PARITY, PROG PROTECT, POWER FAIL 
         EXT   PBLN01        TELETYPE 
         EXT   PBLN02        MUX LOOP ERROR 
         EXT   PBLN03        MUX LEVEL 2
          EXT    PBLN06      COUPLER 1&2 (PORTS 5&6)
          EXT    PBLN08      CLOCK
          EXT    PBLNILL     ILLEGAL INTERRUPT LINES
* 
PBINTRAPS NUM  0         RETURN ADDR- LINE 00 
          JMP  PBLN00 
          NUM  0
          NUM  0         RETURN ADDR- LINE 01 
          JMP  PBLN01 
          NUM  0
          NUM  0         RETURN ADDR- LINE 02 
          JMP  PBLN02 
          NUM  0
          NUM  0         RETURN ADDR- LINE 03 
          JMP  PBLN03 
          NUM  0
          NUM  0         RETURN ADDR- LINE 04 
          RTJ    PBLNILL
          EXI    $10
          NUM  0         RETURN ADDR- LINE 05 
          RTJ    PBLN06            CALL HIP INTERRUPT ROUTINE 
          EXI    $14               RETURN TO EXITED PROGRAM 
          NUM  0         RETURN ADDR- LINE 06 
          RTJ    PBLN06            CALL HIP INTERRUPT ROUTINE 
          EXI    $18               RETURN TO EXITED PROGRAM 
          NUM  0         RETURN ADDR- LINE 07 
          RTJ    PBLNILL
          EXI    $1C
          NUM  0         RETURN ADDR- LINE 08 
          JMP  PBLN08 
          NUM  0
          NUM  0         RETURN ADDR- LINE 09 
          RTJ    PBLNILL
          EXI    $24
          NUM  0         RETURN ADDR- LINE 10 
          RTJ    PBLNILL
          EXI    $28
          NUM  0         RETURN ADDR- LINE 11 
          RTJ    PBLNILL
          EXI    $2C
          NUM  0         RETURN ADDR- LINE 12 
          RTJ    PBLNILL
          EXI    $30
          NUM  0         RETURN ADDR- LINE 13 
          RTJ    PBLNILL
          EXI    $34
          NUM  0         RETURN ADDR- LINE 14 
          RTJ    PBLNILL
          EXI    $38
          NUM  0         RETURN ADDR- LINE 15 
          RTJ    PBLNILL
          EXI    $3C
          END 
          NAM    PBLNILL
          ENT    PBLNILL
* 
* 
PBLNILL   NOP    0
          STA*   SAVEA       SAVE A REGISTER
          LDA    =N$016F     ILLEGAL PORTS: 4,7,9,10,11,12,13,14,15 
          LAM    M           TURN OFF MASK-BITS FOR ILLEGAL PORTS 
          LDA*   SAVEA       RESTORE A REGISTER 
          JMP*   (PBLNILL)   RETURN TO INTERRUPTED PROGRAM
* 
SAVEA     NUM    0
          END 
