*COMDECK  COMSMTS 
 MTS      CTEXT  COMSMTS - MTS TAPE DEFINITIONS.
          SPACE  4,10 
          IF     -DEF,QUAL$,1 
          QUAL   MTS
          BASE   D
*         COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1978. 
          TITLE  COMSMTS - MTS TAPE DEFINITIONS.
 MTS      SPACE  4,10 
***       COMSMTS - MTS TAPE DEFINITIONS. 
* 
*         R. A. MATTHEWS.          12/12/77.
          SPACE  4,10 
***       COMSMTS - MTS TAPE DEFINITIONS. 
* 
*         COMSMTS DEFINES THE CONTROLLER FUNCTIONS AND ASSOCIATED 
*         PARAMETER BLOCKS FOR MTS TAPE USAGE (66X). COMSMTS ALSO 
*         DEFINES THE AREAS USED IN THE GENERAL AND DETAIL STATUS 
*         BLOCKS RETURNED BY THE CONTROLLER.
          SPACE  4,10 
**        MTS CONTROLLER FUNCTIONS. 
  
  
 MRUN     EQU    0001B             RELEASE UNIT 
 MCAR     EQU    0002B             CLEAR ALL RESERVES 
 MCOR     EQU    0003B             CLEAR OPPOSITE RESERVE 
 MSOP     EQU    0005B             SELECT OPPOSITE PARITY MODE
 MSOD     EQU    0105B             SELECT OPPOSITE DENSITY
 MSNC     EQU    0006B             SELECT NORMAL READ CLIP
 MSHC     EQU    0106B             SELECT HIGH READ CLIP
 MSLC     EQU    0206B             SELECT LOW READ CLIP 
 MSYC     EQU    0306B             SELECT HYPER READ CLIP 
 MNRD     EQU    0007B             NOMINAL READ SPROCKET DELAY
 MIRD     EQU    0107B             INCREASE READ SPROCKET DELAY 
 MDRD     EQU    0207B             DECREASE READ SPROCKET DELAY 
 MREW     EQU    0010B             REWIND 
 MRWU     EQU    0110B             REWIND/UNLOAD
 MSTM     EQU    0011B             STOP MOTION
 MGST     EQU    0012B             GENERAL STATUS 
 MDST     EQU    0112B             DETAILED STATUS
 MCST     EQU    0212B             CUMULATIVE STATUS
 MUST     EQU    0312B             UNITS READY STATUS 
 MFOR     EQU    0013B             FORESPACE
 MBCK     EQU    0113B             BACKSPACE
 MLFR     EQU    0213B             LONG FORESPACE 
 MLBK     EQU    0313B             LONG BACKSPACE 
 MCFR     EQU    0014B             CONTROLLED FORESPACE 
 MCBK     EQU    0114B             CONTROLLED BACKSPACE 
 MSMF     EQU    0015B             SEARCH TAPEMARK FORWARD
 MSMB     EQU    0115B             SEARCH TAPEMARK BACKWARD 
 MERP     EQU    0016B             ERASE REPOSITION 
 MERE     EQU    0116B             ERASE REPOSITION TO ERASE
 MWRP     EQU    0017B             WRITE REPOSITION 
 MWRE     EQU    0117B             WRITE REPOSITION TO ERASE
 MCON     EQU    0020B             CONNECT UNIT (002X, X = UNIT NO.)
 MFMT     EQU    0030B             FORMAT UNIT
 MST1     EQU    0131B             CODE TRANSLATION TABLE 1 TO MEMORY 
 MST2     EQU    0231B             CODE TRANSLATION TABLE 2 TO MEMORY 
 MST3     EQU    0331B             CODE TRANSLATION TABLE 3 TO MEMORY 
 MLRR     EQU    0132B             LOAD READ RAM
 MLWR     EQU    0232B             LOAD WRITE RAM 
 MLRW     EQU    0332B             LOAD READ/WRITE RAM
 MCRR     EQU    0133B             COPY READ RAM
 MCWR     EQU    0233B             COPY WRITE RAM 
 MFTS     EQU    0034B             FORMAT TCU STATUS
 MCTS     EQU    0035B             COPY TCU STATUS
 MSTC     EQU    0036B             SEND TCU COMMAND 
 MRFW     EQU    0040B             READ FORWARD 
 MRBK     EQU    0140B             READ BACKWARD
 MRBO     EQU    0340B             READ BACKWARD WITH ODD LENGTH PARITY 
 MRRF     EQU    0041B             REREAD FORWARD 
 MRRB     EQU    0141B             REREAD BACKWARD
 MRBL     EQU    0341B             REREAD BACKWARD WITH ODD LENGTH PAR. 
 MRPT     EQU    0042B             REPEAT READ
 MWRT     EQU    0050B             WRITE
 MWOL     EQU    0250B             WRITE ODD LENGTH 
 MWTM     EQU    0051B             WRITE TAPEMARK 
 MERS     EQU    0052B             ERASE
 MEET     EQU    0152B             ERASE TO END OF TAPE 
 GST      SPACE  4,10 
**        GENERAL STATUS REPLY WORD.
* 
**T  WORD0       12/ GENERAL STATUS.
  
  
 GSAL     DFN    11,1              ALERT
 GSCS     DFN    10,1              STATUS FROM COUPLER (SEE BITS 0 - 3) 
 GSNU     DFN    9,1               NO UNIT IS CURRENTLY CONNECTED 
 GSNO     DFN    8,1               NOISE RECORD READ
 GSWR     DFN    7,1               WRITE RING IN UNIT 
 GSUT     DFN    6,1               UNIT TYPE (0 = 7 TRACK, 1 = 9 TRACK) 
 GSOC     DFN    5,1               ODD COUNT
 GSTM     DFN    4,1               TAPEMARK 
  
*         THE FOLLOWING ARE FOR COUPLER STATUS *GSCS* = 0.
  
 GSET     DFN    3,1               END OF TAPE
 GSLP     DFN    2,1               TAPE AT LOADPOINT
 GSUB     DFN    1,1               UNIT BUSY (TAPE IN MOTION) 
 GSER     DFN    0,1               UNIT LOADED AND READY
  
*         THE FOLLOWING ARE FOR COUPLER STATUS *GSCS* = 1.
  
 GSME     DFN    3,1               CONTROLLER MEMORY PARITY ERROR 
 GSLA     DFN    2,1               LOCAL AUTOLOAD IS IN PROGRESS
 GSRA     DFN    1,1               REMOTE AUTOLOAD IS IN PROGRESS 
 GSDT     DFN    0,1               DEADMAN TIMEOUT OCCURRED 
 MDS      SPACE  4,10 
**        MTS DETAIL STATUS REPLY BLOCK.
* 
**T  WORD0       6/ ALERT CONDITIONS, 6/ ERROR CODE.
**T, WORD1       12/ PARITY ERROR CONDITIONS. 
**T, WORD2       1/ SEVERE START, 6/ CONTROLLER ERRORS, 5/ UNIT FAULTS. 
**T, WORD3       12/ TRACK ERROR DATA.
**T, WORD4       1/ DIRECTION, 3/ SPEED, 2/ DENSITY, 1/ AE, 1/ WR 
**T,             4/ PHYSICAL ADDRESS. 
*                AE = ACCESS ERROR, WR = WRITE REPLY. 
**T, WORD5       3/ , 5/ LNBL, 4/ TAPE POSITION.
*                LNBL = LARGEST NOISE BLOCK LENGTH. 
**T, WORD6-7     24/ FRAME COUNT. 
  
  
MDAC      EQU    0                 ALERT CONDITIONS 
 MDLD     DFN    11,1              LOST DATA
 MDER     DFN    10,1              ERASE ERROR
 MDPE     DFN    9,1               PARITY ERROR 
 MDNG     DFN    8,1               NOISE IN GAP 
 MDNF     DFN    7,1               NOISE FAULT
 MDLA     DFN    6,1               LATE DATA
 MDEC     DFN    0,6               ERROR CODE 
MDPC      EQU    1                 PARITY ERROR CONDITIONS
 MDF1     DFN    11,1              FRAME COUNT ERROR 1
 MDF2     DFN    10,1              FRAME COUNT ERROR 2
 MDF3     DFN    9,1               FRAME COUNT ERROR 3
 MDSF     DFN    8,1               SINGLE FRAME ERROR 
 MDLR     DFN    7,1               LRCC PARITY ERROR
 MDVP     DFN    6,1               VERTICAL PARITY ERROR
 MDLP     DFN    5,1               LONGITUDINAL PARITY ERROR
 MDCR     DFN    4,1               CRCC PARITY ERROR
 MDFE     DFN    3,1               FALSE EOP
 MDSK     DFN    2,1               SKEW ERROR 
 MDVE     DFN    1,1               VELOCITY ERROR 
 MDPA     DFN    0,1               POSTAMBLE ERROR
MDUF      EQU    2                 UNIT FAULTS
 MDSS     DFN    11,1              SEVERE START ERROR 
 MDOC     DFN    10,1              ODD FRAME COUNT
 MDPD     DFN    9,1               POSTAMBLE DETECTED 
 MDFS     DFN    8,1               FOUR FRAME SKEW
 MDOD     DFN    7,1               OPPOSITE CHANNEL DOWN
 MDSW     DFN    6,1               SINGLE FRAME SKEW
 MDIC     DFN    5,1               ILLEGAL CHARACTER
 MDLF     DFN    4,1               LOOP FAULT 
 MDAP     DFN    3,1               AIR PRESSURE FAULT 
 MDEF     DFN    2,1               ERASE CURRENT FAULT
 MDLL     DFN    1,1               LOAD FAULT 
 MDAT     DFN    0,1               ABNORMAL TEMPERATURE 
MDTE      EQU    3                 TRACK ERROR CONDITIONS 
 MDTE     DFN    11,1              TRACK IN ERROR 
 MDCD     DFN    10,1              CRC DETECTED ERROR 
 MDMT     DFN    9,1               MULTITRACK ERROR 
 MDTC     DFN    0,9               TRACKS CORRECTED 
MDMS      EQU    4                 MISC. INFO 
 MDTD     DFN    11,1              TAPE DIRECTION, 1 = BACKWARD 
 MDUS     DFN    8,3               UNIT SPEED 
 MDUD     DFN    6,2               UNIT DENSITY 
 MDEA     DFN    5,1               ACCESS ERROR 
 MDWR     DFN    4,1               WRITE REPLY
 MDPY     DFN    0,4               UNIT PHYSICAL ADDRESS
MDNB      EQU    5                 TAPE POSITION AND NOISE INFO 
 MDLN     DFN    4,5               LARGEST NOISE BLOCK LENGTH IN FRAMES 
 MDTP     DFN    0,4               TAPE POSITION
MDC1      EQU    6                 FRAME COUNT WORD 1 
 MDC1     DFN    0,12              UPPER 12 BITS OF FRAME COUNT 
MDC2      EQU    7                 FRAME COUNT
 MDC2     DFN    0,12              LOWER 12 BITS OF FRAME COUNT 
  
 MDBL     EQU    8                 LENGTH OF DETAIL STATUS BLOCK
 FMT      SPACE  4,10 
**        FORMAT PARAMETER ARRAY. 
* 
**T  WORD0       4/ CODE TRANSLATION, 3/ A/D MODE, 5/ UNIT NO.
**T, WORD1       1/ CONNECT, 2/ PARITY, 3/ DENSITY, 6/ MIN. BLOCK LEN.
* 
*         THE LEFTMOST BIT IN EACH DEFINED FIELD INDICATES THAT THIS
*         IS A REDEFINITION FOR THE UNIT, ELSE PREVIOUS VALUES ARE
*         RETAINED. 
  
  
MFW0      EQU    0                 FORMAT PARAMETER WORD 1
 MFCT     DFN    8,4               CODE TRANSLATION FIELD 
 MFAD     DFN    5,3               ASSEMBLY/DISASSEMBLY MODE
 MFUN     DFN    0,5               UNIT NO. 
MFW1      EQU    1                 FORMAT PARAMETER WORD 1
 AFCN     DFN    11,1              CONNECT
 MFVP     DFN    9,2               VERTICAL PARITY
 MFDN     DFN    6,3               DENSITY
 MFNL     DFN    0,6               MIN BLOCK LENGTH (IN FRAMES) 
  
MFBL      EQU    2                 MAX. FORMAT PARAMETER ARRAY LENGTH 
  
 FW0V     EQU    4220B             WORD 0 DEFAULT VALUE LESS UNIT 
 FW1V     EQU    6540B             WORD 1 DEFAULT VALUE 
           SPACE 4,10 
          BASE   *
          IF     -DEF,QUAL$,1 
          QUAL   *
          ENDX
