*COMDECK  COMSATS 
 ATS      CTEXT  COMSATS - ATS TAPE DEFINITIONS.
          SPACE  4,10 
          IF     -DEF,QUAL$,1 
          QUAL   ATS
          BASE   D
*         COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1978. 
          TITLE  COMSATS - ATS TAPE DEFINITIONS.
 ATS      SPACE  4,10 
***       COMSATS - ATS TAPE DEFINITIONS. 
* 
*         R. A. MATTHEWS.          12/13/77.
          SPACE  4,10 
***       COMSATS - ATS TAPE DEFINITIONS. 
* 
*         COMSATS DEFINES THE SEQUENCER FUNCTIONS AND ASSOCIATED
*         PARAMETER BLOCKS FOR ATS TAPE USAGE (67X). COMSATS ALSO 
*         DEFINES THE AREAS USED IN THE GENERAL AND DETAIL STATUS 
*         BLOCKS RETURNED BY THE SEQUENCER. 
          SPACE  4,10 
**        ATS SEQUENCER FUNCTIONS.
  
  
 ACUN     EQU    0000B             CLEAR TAPE UNIT
 ARCN     EQU    0001B             RELEASE CONNECTED UNIT 
 AFMT     EQU    0004B             FORMAT UNIT
 ASOP     EQU    0005B             SELECT OPPOSITE PARITY 
 ASOD     EQU    0105B             SELECT OPPOSIT DENSITY 
 ASNC     EQU    0006B             SELECT NORMAL READ CLIP
 ASHC     EQU    0106B             SELECT HIGH READ CLIP
 ASLC     EQU    0206B             SELECT LOW READ CLIP 
 ASYC     EQU    0306B             SELECT HYPER READ CLIP 
 AREW     EQU    0010B             REWIND 
 ARWU     EQU    0110B             REWIND/UNLOAD
 ASTM     EQU    0011B             STOP MOTION
 AGST     EQU    0012B             GENERAL STATUS (WORDS 0 - 15)
 ADST     EQU    0112B             DETAILED STATUS (WORDS 2 - 15) 
 AUST     EQU    0212B             UNIT STATUS (WORDS 10 - 15)
 AFOR     EQU    0013B             FORESPACE
 ABCK     EQU    0113B             BACKSPACE
 ACBK     EQU    0114B             CONTROLLED BACKSPACE 
 ASMF     EQU    0015B             SEARCH TAPEMARK FORWARD
 ASMB     EQU    0115B             SEARCH TAPEMARK BACKWARD 
 ACON     EQU    0020B             CONNECT UNIT (002X, X = UNIT 0 - 7)
 ACHN     EQU    0030B             CONNECT HIGH UNIT. X = UNIT 10 - 17
 AWLH     EQU    0120B             WARMSTART LOW UNIT (HIGH DEN.) 
 AWHH     EQU    0130B             WARMSTART HIGH UNIT (HIGH DEN.)
 AWLL     EQU    0320B             WARMSTART LOW UNIT (LOW DEN.)
 AWHL     EQU    0330B             WARMSTART HIGH UNIT (LOW DEN)
 ARFW     EQU    0040B             READ FORWARD 
 ARBK     EQU    0140B             READ BACKWARD
 ACRR     EQU    0047B             COPY CODE TRANSLATION READ RAM 
 ACWR     EQU    0247B             COPY CODE TRANSLATION WRITE RAM
 AWRT     EQU    0050B             WRITE
 AWOL     EQU    0250B             SHORT WRITE
 AWTM     EQU    0051B             WRITE TAPEMARK 
 AERS     EQU    0052B             ERASE
 ADSE     EQU    0252B             DATA SECURITY ERASE
 ALRR     EQU    0057B             LOAD CODE TRANSLATION READ RAM 
 ALWR     EQU    0257B             LOAD CODE TRANSLATION WRITE RAM
 ARET     EQU    0060B             REWIND IF EOT DETECTED 
 AWMS     EQU    0061B             WAIT FOR MOTION TO STOP
 AMCL     EQU    0414B             MASTER CLEAR 
 GST      SPACE  4,10 
**        GENERAL STATUS REPLY BLOCK. 
* 
**T  WORD0       12/ GENERAL STATUS.
**T, WORD1       9/ CRC BLOCK ID, 1/ , 1/ EVEN VERT. PARITY, 1/ . 
  
  
GSW0      EQU    0                 GENERAL STATUS WORD 0
 GSAL     DFN    11,1              ALERT
 GSNU     DFN    9,1               NO UNIT IS CURRENTLY CONNECTED 
 GSWR     DFN    7,1               WRITE RING 
 GSUT     DFN    6,1               UNIT TYPE (0 = 7 TRACK, 1 = 9 TRACK) 
 GSCF     DFN    5,1               CHARACTER FILL STATUS
 GSFM     DFN    4,1               FILEMARK 
 GSET     DFN    3,1               END OF TAPE
 GSLP     DFN    2,1               BEGINNING OF TAPE
 GSUB     DFN    1,1               UNIT BUSY
 GSUR     DFN    0,1               UNIT READY 
GSW1      EQU    1                 GENERAL STATUS WORD 1
 GSBI     DFN    3,9               CRC BLOCK ID 
 GSEP     DFN    1,1               EVEN VERTICAL PARITY 
GSBL      EQU    2                 GENERAL STATUS BLOCK LENGTH
 ADS      SPACE  4,10 
**        ATS DETAIL STATUS REPLY BLOCK.
* 
**T  WORD0       5/ ALERT CONDITIONS, 7/ ERROR CODE.
**T, WORD1       3/ ALERT CONDITIONS, 9/ DEAD TRACK REG.
**T, WORD2       12/ TAPE PARITY ERROR CONDITIONS.
**T, WORD3       12/ MISC. ALERT CONDITIONS.
**T, WORD4       3/ TCU PARITY ERRORS, 9/ VALID TRACK POINTERS. 
**T, WORD5       1/ 0, 1/ CT, 1/ AD, 1/ RV, 1/ WR, 1/ CD, 6/ 0. 
*                CT = CODE TRANSLATION SELECTED.
*                AD = ASSEMBLY/DISASSEMBLY MODE SELECTED. 
*                RV = LAST DIRECTION REVERSE. 
*                WR = LAST OPERATION WRITE. 
*                CD = ERROR CORRECTION DISABLED.
**T, WORD6       7/ UNIT ERRORS 3/ , 2/ CLIP LEVEL. 
**T, WORD7       6/ COUNTER 1, 6/ COUNTER 2.
**T, WORD8       12/ UNIT STATUS. 
**T, WORD9       4/ 0, 8/ UNIT STATUS.
**T, WORD10      4/ 0, 4/ UNIT STATUS, 4/ 0.
**T, WORD11      4/ 0, 8/ UNIT STATUS.
**T, WORD12      12/ 0. 
**T, WORD13      4/ 0, 8/ IBG COUNTERS. 
  
  
ADW0      EQU    0                 DETAIL STATUS WORD 0 
 ADLS     DFN    11,1              LOST DATA
 ADUC     DFN    10,1              UNIT CHECK 
 ADTP     DFN    9,1               TAPE PARITY ERROR
 ADCP     DFN    8,1               CHANNEL PARITY ERROR 
 ADSP     DFN    7,1               TCU PARITY ERROR 
 ADEC     DFN    0,7               ERROR CODE 
ADW1      EQU    1                 DETAIL STATUS WORD 1 
 ADPE     DFN    11,1              POINTER ERROR
 ADDC     DFN    10,1              DUAL TRACK CORRECTION
 ADSC     DFN    9,1               SINGLE TRACK CORRECTION
 ADDR     DFN    0,9               DEAD TRACK REGISTER
 ADVP     DFN    11,1              VERTICAL PARITY ERROR
 ADLP     DFN    10,1              LONGITUDINAL PARITY ERROR
 ADCR     DFN    9,1               CRC DETECTED ERROR 
 ADUX     DFN    8,1               AUXILLARY CRC DETECTED ERROR 
 AD12     DFN    7,1               CRC1 CRC2 COMPARE ERROR
 ADSF     DFN    6,1               SINGLE FRAME ERROR 
 ADFE     DFN    5,1               FALSE EOP
 ADVY     DFN    4,1               VELOCITY ERROR 
 ADFR     DFN    3,1               FRAME COUNT ERROR
 ADFB     DFN    2,1               FLAG BIT DETECTED
 ADSS     DFN    1,1               SLOW START ERROR 
 ADSW     DFN    0,                EXCESSIVE SKEW ERROR 
ADW3      EQU    3                 DETAIL STATUS WORD 3 
 ADPM     DFN    11,1              POINTER MERGE ERROR
 ADWP     DFN    10,1              WRITE PATH PARITY ERROR
 ADWR     DFN    9,1               WRITE REG. PARITY ERROR
 ADRT     DFN    8,1               READ CODE TRANSLATION PARITY ERROR 
 ADWT     DFN    7,1               WRITE CODE TRANSLATION PARITY ERROR
 ADRB     DFN    6,1               READ BUS PARITY ERROR
 ADGP     DFN    5,1               GCR WRITE PATH PARITY ERROR
 ADGB     DFN    4,1               GCR WRITE BUS PARITY ERROR 
 ADNP     DFN    3,1               NZRI WRITE PATH PARITY ERROR 
 ADND     DFN    2,1               NRZI READ PATH PARITY ERROR
 ADBR     DFN    1,1               BAD RESYNC BURST 
 ADPI     DFN    0,1               POWER INTERRUPT
 ADUR     DFN    11,1              UPPER ROM PARITY ERROR 
 ADLR     DFN    10,1              LOWER ROM PARITY ERROR 
 ADSQ     DFN    9,1               SEQUENCE COMMAND ERROR 
 ADVT     DFN    0,9               VALID TRACK POINTERS 
ADW5      EQU    5                 DETAIL STATUS WORD 5 
 ADTR     DFN    10,1              CODE TRANSLATION 
 ADAD     DFN    9,1               ASSEMBLY/DISASSEMBLY MODE
 ADRV     DFN    8,1               LAST DIRECTION REVERSE 
 ADOW     DFN    7,1               LAST OPERATION WRITE 
 ADCD     DFN    6,1               ERROR CORRECTION DISABLED
ADW6      EQU    6                 DETAIL STATUS WORD 6 
 ADBY     DFN    11,1              FALSE GAP BYPASSED 
 ADNB     DFN    10,1              NOISE BYPASSED 
 ADCC     DFN    9,1               CRCC CORRECTABLE ERROR 
 ADLD     DFN    8,1               LATE DATA
 ADSL     DFN    7,1               CAPSTAN SLIP 
 ADER     DFN    6,1               EARLY READ AFTER WRITE EOP 
 ADEE     DFN    5,1               ERASE ERROR
 ADCL     DFN    0,2               CLIP LEVEL 
ADW7      EQU    7                 DETAIL STATUS WORD 7 
 ADC1     DFN    6,6               COUNTER ONE
 ADC2     DFN    0,6               COUNTER TWO
ADW8      EQU    8                 DETAIL STATUS WORD 8 
AUW0      EQU    0                 UNIT STATUS WORD 0 
 ADGC     DFN    11,1              GCR CAPABILITY 
 ADNZ     DFN    10,1              IF 0, NRZI CAPABILITY
 AD7D     DFN    8,1               SEVEN TRACK DENSITY, 1 = 556 BPI.
 AD7T     DFN    7,1               SEVEN TRACK UNIT 
 ADIF     DFN    6,1               WRITE CURRENT FAILURE
 ADDD     DFN    5,1               DUAL DENSITY 
 ADDN     DFN    3,2               DENSITY
*                                  0, 1 = 1600 CPI (PE).
*                                  2 = 800 CPI (NRZI).
*                                  3 = 6250 CPI (GCR).
 ADUS     DFN    0,3               TAPE UNIT SPEED CAPABILITY 
ADW9      EQU    9                 DETAIL STATUS WORD 9 
AUW1      EQU    1                 UNIT STATUS WORD 1 
 ADLG     DFN    7,1               LAMP FAILURE 
 ADLV     DFN    6,1               LEFT COLUMN FAULT
 ADVR     DFN    5,1               RIGHT COLUMN FAULT 
 ADRS     DFN    4,1               RESET BUTTON 
 ADSE     DFN    3,1               DATA SECURITY ERASE
 ADEI     DFN    2,1               ERASE CURRENT FAILURE
 ADAP     DFN    1,1               AIR PRESSURE FAILURE 
 ADFL     DFN    0,1               LOAD FAULT 
ADW10     EQU    10                DETAIL STATUS WORD 10
AUW2      EQU    2                 UNIT STATUS WORD 2 
 ADTV     DFN    7,1               THERMAL/VOLTAGE CHECK
 ADDG     DFN    6,1               DIAGNOSTIC MODE
 ADPK     DFN    5,1               PARKED 
 ADML     DFN    4,                MULTIPLE BOT 
ADW11     EQU    11                DETAIL STATUS WORD 11
AUW3      EQU    3                 UNIT STATUS WORD 3 
 ADLB     DFN    7,1               LOAD BUTTON
 ADLM     DFN    6,1               LEFT REEL TURNING
 ADRM     DFN    5,1               RIGHT REEL TURNING 
 ADTH     DFN    4,1               TAPE PRESENT 
 ADRA     DFN    3,1               REELS LOADED 
 ADLW     DFN    2,1               LOAD-REWIND
 ADCT     DFN    1,1               LOAD COMPLETE
 ADCK     DFN    0,1               LOAD CHECK 
ADW12     EQU    12                DETAIL STATUS WORD 12
AUW4      EQU    4                 UNIT STATUS WORD 4 
  
ADW13     EQU    13                DETAIL STATUS WORD 13
AUW5      EQU    5                 UNIT STATUS WORD 5 
 ADI1     DFN    4,4               IBG COUNTER 10**1
 ADI0     DFN    0,4               IBG COUNTER 10**0
  
ADBL      EQU    14D               MAX. DETAIL STATUS LENGTH
AUBL      EQU    6                 MAX. UNIT STATUS LENGTH
 FMT      SPACE  4,10 
**        FORMAT PARAMETER ARRAY. 
* 
**T  WORD0       4/ CODE TRANSLATION, 3/ A/D MODE, 5/ LOGICAL UNIT NO.
**T, WORD1       1/ ,2/ VERT. PARITY, 3/ DENSITY, 6/ MIN. BLOCK LEN.
**T, WORD2       2/ DISABLE ERROR CORRECTION. 
* 
*         THE LEFTMOST BIT IN EACH DEFINED FIELD INDICATES THAT THIS
*         IS A REDEFINITION FOR THE UNIT, ELSE PREVIOUS VALUES ARE
*         RETAINED. 
  
  
AFW0      EQU    0                 FORMAT PARAMETER WORD 0
 AFCT     DFN    8,4               CODE TRANSLATION FIELD 
 AFAD     DFN    5,3               ASSEMBLY/DISASSEMBLY MODE
 AFUN     DFN    0,                UNIT NO. 
AFW1      EQU    1                 FORMAT PARAMETER WORD 1
 AFVP     DFN    9,2               VERTICAL PARITY
 AFDN     DFN    6,3               DENSITY
 AFNL     DFN    0,6               MIN BLOCK LENGTH (IN FRAMES) 
AFW2      EQU    2                 FORMAT PARAMETER WORD 2
 AFEC     DFN    10,2              DISABLE ERROR CORRECTION 
  
AFPL      EQU    3                 MAX. FORMAT PARAMETER LENGTH 
  
 FW0V     EQU    4220B             WORD 0 DEFAULT VALUE - UNIT
 FW1V     EQU    2440B             WORD 1 DEFAULT VALUE 
          SPACE  4,10 
          BASE   *
          IF     -DEF,QUAL$,1 
          QUAL   *
          ENDX
