COMSSCR 
COMMON
          CTEXT  COMSSCR - S/C REGISTER EQUIVALENCES. 
          BASE   M
          SPACE  4,10 
*         COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992. 
          SPACE  4,10 
***       COMSSCR - S/C REGISTER EQUIVALENCES.
*         J. D. LANGE        74/05/10.
*         C. R. LUND         80/01/07.
          SPACE  4,10 
***              COMSSCR DEFINES EQUIVALENCES WHICH ARE USED
*         FOR PROGRAMMING THE STATUS/CONTROL (S/C) REGISTER 
*         ON THE CYBER 70, 170, 700 SERIES, AND 865/875.
          SPACE  4,10 
****
  
**        S/C REGISTER EQUIVALENCES.
  
  
*         DESCRIPTOR FUNCTIONS. 
  
 FCRD     EQU    0000        READ WORD
 FCTB     EQU    1000        TEST BIT 
 FCCL     EQU    2000        CLEAR BIT
 FCTC     EQU    3000        TEST AND CLEAR BIT 
 FCSB     EQU    4000        SET BIT
 FCTS     EQU    5000        TEST AND SET BIT 
 FCCA     EQU    6000        CLEAR ALL
 FCTE     EQU    7000        TEST ERROR 
  
*         BIT NAMES.
  
 SECD     EQU    3           CM SECDED ERROR
 PPUE     EQU    4           PPU ERROR FOR FLPP-S (176 ONLY)
 CMCE     EQU    5           CMC PARITY ERROR 
 EISP     EQU    10D         ERROR IN SECOND PPS
 LSCD     EQU    11D         LCME SECDED ERROR (176 ONLY) 
 MAPF     EQU    36D         MAINS POWER FAILURE
 SHIM     EQU    37D         SHUTDOWN IMMINENT
 EXBB     EQU    54D         EXCHANGE BUFFER BIAS BIT 0 (176 ONLY)
 DSFP     EQU    58D         DEADSTART FLPP (176 ONLY)
 DDFP     EQU    59D         DUMP FLPP (176 ONLY) 
 SCSL     EQU    72D         SCANNER SELECT BIT 0 (176 ONLY)
 BCXC     EQU    76D         BLOCK COPY EXIT CONTROL
 DSCU     EQU    77D         DEADSTART CPU (176 ONLY) 
 ENSC     EQU    82D         ENABLE SCANNER INTERFACE (176 ONLY)
 CPUE     EQU    83D         CLEAR PPU (FLPP) PARITY ERROR (176 ONLY) 
 PPCT     EQU    84D         PPU MAJOR CYCLE TIME SELECT
 PPCM     EQU    94D         STOP ON CM READ ERROR
 PPPE     EQU    95D         STOP ON PP MEMORY PARITY ERROR 
 DSBL     EQU    118D        DISABLE SINGLE BIT LOGGING 
 PCMP     EQU    119D        PPU CM READ PARITY ERROR 
 PPSC     EQU    120D - 123D PP SELECT CODE 
 AMMS     EQU    124D        AUTO/MANUAL MODE PP SELECT 
 CCIO     EQU    127D        CPU CLEAR I/O (176 ONLY) 
 SPUM     EQU    137D        STOP ON PPU MEMORY PARITY ERROR (176 ONLY) 
 CCRT     EQU    168D        CM CLEAR RANK II ERROR (176 ONLY)
 CCRO     EQU    169D        CM CLEAR RANK I ERROR (176 ONLY) 
 LCRT     EQU    176D        LCME CLEAR RANK II ERROR (176 ONLY)
 DLSL     EQU    178D        DISABLE LCME SINGLE BIT LOGGING (176 ONLY) 
 C2BB     EQU    179D        CHANNEL 2,3 BUFFER BIAS BIT 0 (176 ONLY) 
 SDSC     EQU    183D        CM DOUBLE BIT SECDED ERROR 
 C4BB     EQU    184D        CHANNEL 4-7 BUFFER BIAS BIT 0 (176 ONLY) 
 ESMM     EQU    202D        ESM MODE 
 LDSC     EQU    196D        LCME DOUBLE BIT SECDED ERROR (176 ONLY)
  
*         WORD NAMES. 
  
 PPEW     EQU    1           PP MEMORY PARITY ERROR WORD
 CPEW     EQU    2           CHANNEL PARITY ERROR WORD
 SYNW     EQU    3           CM SYNDROME BITS WORD
 CMAW     EQU    4           CM SECDED ERROR ADDRESS WORD 
 EBBW     EQU    4           EXCHANGE BUFFER BIAS BIT WORD (176 ONLY) 
 LCAW     EQU    10          LCM SECDED ERROR ADDRESS WORD (176 ONLY) 
 LERW     EQU    11          LCM SECDED ERROR ADDRESS WORD (176 ONLY) 
 FLPW     EQU    13          *FLPP* STATUS (176 ONLY) 
 LSYW     EQU    14          LCME SYNDROME BITS WORD (176 ONLY) 
 LCMW     EQU    15          CM ERROR ADDRESS WORD (176 ONLY) 
 CSEW     EQU    17          CHIP SELECT BITS WORD
 CBBW     EQU    17          819 CHANNEL BUFFER BIAS BIT WORD (176 ONLY)
 CDSW     EQU    17          CM DOUBLE BIT SECDED ERROR WORD
 M875     EQU    17          CYBER 170-865/875 (N/A FOR 176)
 LDSW     EQU    20          LCME DOUBLE BIT SECDED WORD (176 ONLY) 
 PMSW     EQU    20          PP MEMORY SELECT SWITCH WORD (176 ONLY)
  
*         CONSTANTS.
  
 NTEB     EQU    50          NUMBER OF TEST/ERROR BITS
 DSBT     EQU    500D        DEADSTART SINGLE BIT ERROR THRESHOLD 
 NSCB     EQU    21          NUMBER OF S/C REGISTER (BYTES) WORDS 
 NBIT     EQU    314         NUMBER OF S/C REGISTER BITS
 FEM0     EQU    1407        CYBER 170 FATAL ERROR MASK 
 FEM6     EQU    0020        CYBER 176 FATAL ERROR MASK 
 FEM7     EQU    0003        CYBER 170 - 700 SERIES FATAL ERROR MASK
 FEM8     EQU    0007        CYBER 170-865/875 FATAL ERROR MASK 
 ABM0     EQU    7757        CYBER 170 ACTIVE BIT MASK
 ABM6     EQU    6030        CYBER 176 ACTIVE BIT MASK
 ABM7     EQU    6053        CYBER 170 - 700 SERIES ACTIVE BIT MASK 
 ABM8     EQU    7077        CYBER 170 - 865/875 ACTIVE BIT MASK
 INB0     EQU    0001        CPU 0 OFF BIT MASK (BYTE 1)
 INB1     EQU    0002        CPU 1 OFF BIT MASK (BYTE 1)
 INB6     EQU    0003        CYBER 176 INACTIVE BIT MASK (BYTE 1) 
 UIDL     EQU    10D         UNIQUE ID SUMMARY TABLE LENGTH 
  
*         *1MB* FUNCTION CODES. 
*         MULTIPLE FUNCTIONS MAY BE SET FOR ONE CALL TO *1MB*.
  
 SPLG     EQU    0           LOG HARDWARE ERROR 
 SPTP     EQU    1           TIME PROCESSING
 SPLS     EQU    2           LCME SECDED ERROR BIT
 SPCS     EQU    4           CM SECDED ERROR BIT
*         EQU    10          UNUSED 
 SPCP     EQU    20          CHECKPOINT SYSTEM
 SPTH     EQU    40          TIME PROCESSING PART TWO 
 SPMX     EQU    SPTH*2      MAXIMUM *1MB* FUNCTION + 1 
  
****
          SPACE  4,10 
          BASE   *
          ENDX
