*COMDECK  COMS3TP 
 3TP      CTEXT  COMS3TP - 3000 TYPE TAPE DEFINITIONS.
          SPACE  4,10 
          IF     -DEF,QUAL$,1 
          QUAL   3TP
          BASE   D
*         COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1978. 
          TITLE  COMS3TP - 3000 TYPE TAPE DEFINITIONS.
 3TP      SPACE  4,10 
***       COMS3TP - 3000 TYPE TAPE DEFINITIONS. 
* 
*         R. A. MATTHEWS.          12/16/77.
          SPACE  4,10 
***       COMS3TP - 3000 TYPE TAPE DEFINITIONS. 
* 
*         COMS3TP DEFINES THE FUNCTIONS AND STATUS REPLIES FOR
*         6681/84 DATA CHANNEL CONVERTERS AND 60X AND 65X TAPE DRIVES.
 DCC      SPACE  4,10 
**        6681/84 DATA CHANNEL CONVERTER FUNCTION CODES.
  
  
 CSEL     EQU    2000B             SELECT 6681/6684 
 CDSL     EQU    2100B             DESELECT 6681/6684 
 CCON     EQU    1000B             CONNECT EQUIPMENT (MODE II)
*CCON     EQU    NXXXB             CONNECT EQUIPMENT (MODE I) 
*                                  N = EQUIPMENT NO. (4-7), XXX = UNIT
 CFUN     EQU    1100B             FUNCTION INITIATE (MODE II)
*CFUN     EQU    0XXXB             FUNCTION TRANSMIT (MODE I) 
*                                  XXX = 9 BIT FUNCTION CODE. 
 CCST     EQU    1200B             REQUEST CONVERTER STATUS 
 CEST     EQU    1300B             REQUEST EQUIPMENT STATUS 
 CMCL     EQU    1700B             FUNCTION MASTER CLEAR
 CDAC     EQU    0060B             DEACTIVATE OPTION, INTERRUPT OVERRIDE
 CDCN     EQU    0040B             DEACTIVATE OPT. NO INTERRUPT OVERRIDE
  
*         THE FOLLOWING FUNCTIONS ARE MODIFIED BY 6684 MODE SELECT BITS 
*         AND NEGATE CONVERSION BIT, DEFINED LATER. 
  
 CIEI     EQU    1400B             INPUT EOR INITIATE 
 CIIN     EQU    1500B             INPUT INITIATE 
 COIN     EQU    1600B             OUTPUT INITIATE
  
*         THE FOLLOWING ARE ADDED TO INPUT AND OUTPUT FUNCTIONS,
*         SPECIFYING CONVERSION MODES.
  
 CMDA     EQU    0000B             SELECT CONVERSION MODE A 
 CMDB     EQU    0010B             SELECT CONVERSION MODE B 
 CNCN     EQU    0001B             NEGATE BCD CONVERSION
 CST      SPACE  4,10 
**        6681/6684 DATA CHANNEL CONVERTER STATUS RESPONSES.
  
  
 CSRJ     DFN    0,1               REJECT, INTERNAL OR EXTERNAL 
 CSIR     DFN    1,1               INTERNAL REJECT
 CSTP     DFN    2,1               TRANSMISSION PARITY ERROR
 CSE0     DFN    3,1               EQUIPMENT 0 INTERRUPT
 CSE1     DFN    4,1               EQUIPMENT 1 INTERRUPT
 CSE2     DFN    5,1               EQUIPMENT 2 INTERRUPT
 CSE4     DFN    7,1               EQUIPMENT 4 INTERRUPT
 CSE5     DFN    8,1               EQUIPMENT 5 INTERRUPT
 CSE6     DFN    9,1               EQUIPMENT 6 INTERRUPT
 CSE7     DFN    10,1              EQUIPMENT 7 INTERRUPT
 3TP      SPACE  4,10 
**        60X AND 65X TAPE FUNCTIONS. 
  
  
 TREL     EQU    0000B             RELEASE UNIT 
 TBIN     EQU    0001B             SELECT BINARY MODE 
 TBCD     EQU    0002B             SELECT BCD MODE
 TD56     EQU    0003B             SELECT 556 DENSITY 
 TD20     EQU    0004B             SELECT 200 DENSITY 
 TCLR     EQU    0005B             CLEAR
 TD80     EQU    0006B             SELECT 800 DENSITY 
 TD16     EQU    0007B             SELECT 1600 DENSITY
 TREW     EQU    0010B             REWIND 
 TUNL     EQU    0011B             REWIND/UNLOAD
 TBSP     EQU    0012B             BACKSPACE
 TPMK     EQU    0015B             WRITE TAPEMARK 
 TSKP     EQU    0016B             SKIP BAD SPOT
 TCMM     EQU    0042B             CLEAR MEMORY MODE
 TSMM     EQU    0043B             SET MEMORY MODE
 TCCM     EQU    0044B             CLEAR CONVERSION MODE
 TSCM     EQU    0045B             SET CONVERSION MODE
 TC32     EQU    0052B             CLEAR 3N+2 MODE
 TCS2     EQU    0056B             CLEAR STATUS 2 ON MMTC (65X) 
 TSS2     EQU    0057B             SET STATUS 2 ON MMTC 
 3TP      SPACE  4,10 
**        60X AND 65X TAPE STATUS REPLIES.
 TSRY     DFN    0,1               READY
 TSBS     DFN    1,1               BUSY 
 TSWE     DFN    2,1               WRITE ENABLE 
 TSFM     DFN    3,1               FILE MARK
 TSLP     DFN    4,1               LOAD POINT 
 TSET     DFN    5,1               END OF REEL
 TSFS     DFN    5,1               CHARACTER FILL STATUS (MMTC ONLY)
 TSDN     DFN    7,2               DENSITY FLAGS
 TSLD     DFN    8,1               LOST DATA
 TSEO     DFN    9,1               END OF OPERATION 
 TSPE     DFN    10,1              PARITY ERROR 
 MSC      SPACE  4,10 
**        MISC. DEFINITIONS.
* 
* 
  
  
 MBLN     EQU    3                 NO. OF BYTES IN MIN. DATA BLOCK
          SPACE  4,10 
          BASE   *
          IF     -DEF,QUAL$,1 
          QUAL   *
          ENDX
