*COMDECK ASYOUCON 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*         ASYNC BLOCK MODE TIP, DEFINITION OF OUTPUT STATES CONSTANTS * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
          SPC    3
          EJT 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*         ASYNC BLOCK MODE TIP, OUTPUT BUFFER FLAG CONSTANTS          * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
          SPC    3
          EQU    BFADELAY(32)          DELAY AFTER TRANSMISSION 
          EQU    BFEOI(16)   -         END OF INFORMATION FLAG
          EQU    BFEOR(8)    -         END OF RECORD FLAG 
          EJT 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*         ASYNC BLOCK MODE TIP, MUX REGISTER FIELD EQUATIONS          * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
          SPC    3
          EQU    ARCURC(0)   -         CURRENT CHARACTER REGISTER 
* 
* * * *   FOLLOWING REGISTERS ARE SET AND PASSED BY PASCAL TIP
* 
          EQU    ARLNCNT(3)  -         CURRENT LINE COUNTER 
          EQU    ARPGLEN(4)  -         PAGE LENGTH
          EQU    ARCRIDL(5)  -         CARRIAGE RETURN IDLE FILL
          EQU    ARLFIDL(6)  -         LINE FEED IDLE FILL
          EQU    ARECRLF(7)  -         EMBEDDED CR/LF 
          EQU    ARCRLF(8)   -         PRE/POST CONTROL CR/LF(S)
          EQU    ARHCLR(9)   -         HOME/CLEAR HOME CONTROL
          EQU    ARXMSZ(10)  -         TRANSMISSION BLOCK SIZE COUNTER
* 
          EQU    ARNRLFS(11) -         NUMBER OF LINE FEEDS TO SEND 
          EQU    ARNRPLF(12) -         NUMBER POST-PRINT LFS
          EQU    ARWCRLF(13) -         WORK REGISTER WITH CR/LF 
          EQU    ARIDLES(14) -         CR/LF IDLE COUNTER 
          EQU    ARCLRH(14)  -         CLEAR/HOME CURSOR CONTROL CHAR 
          EQU    ARZERO(15)  -         ZERO VALUE REGISTER
          EJT 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*         ASYNC BLOCK MODE TIP, MUX LCB FIELD EQUATIONS               * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
          SPC    3
          EQU    NCCNT1(4)   -         CHARACTER COUNT 1 (WORK) 
          EQU    NCUOPS(7)   -         USER OPTION FLAGS
          EQU    NCCRCS(9)   -         CRC WORD (FOR SCRATCH PURPOSES)
          EQU    NCCNT2(10)  -         CHARACTER COUNT 2
          EQU    NCCXLTA(12) -         TRANSLATE TABLE ADDRESS
          EQU    NCBLCNT(14) -         DESTINATION BUFFER COUNTER 
          EJT 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*         ASYNC BLOCK MODE TIP, TEXT PROCESSING USER FLAG CONSTANTS   * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
          SPC    3
          EQU    AFIGNORE(NCUOP1)      IGNORE AFDRLF AT CLEAR HOME PROC 
          EQU    AFNOFES(NCUOP2)       FORMAT EFFECTORS NOT PRESENT 
          EQU    AFPGWT(NCUOP3)        PAGE WAIT ENABLED
          EQU    AFDRLF(NCUOP4)        DROP LF FROM FIRST PRE-PRINT FE
          EQU    AFATEND(NCUOP5)       CURSOR LEFT AT FAR RIGHT AFTER US
          EQU    AFPGWAIT(NCUOP6)      PAGE WAIT CONDITION (RETURNED) 
          EQU    AFPTAPE(NCUOP7)       PAPERTAPE OUTPUT 
          EQU    AFDISPL(NCUOP8)       DISPLAY OUTPUT DEVICE
          EQU    AFNOPRT(AFPTAPE+AFDISPL) NO PRINTER DEVICE 
          EJT 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*         ASYNC BLOCK MODE TIP, DEFINITION OF BITS AND MASKS          * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
          SPC    3
* 
* * * *   FLAGS LOCALLY USED BY THE TEXTPR. STATES (USES NCUOPS FIELD)
*         AB.. IS FOR SET/RSTBIT,  AM.. IS FOR SET/RST/TSTMSK 
*         AF.. IS FOR SET/RSTMXF
* 
          EQU    ABIGNORE(NBUOP1)      IGNORE AFDRLF AT CLR HOME (BIT)
* 
          EQU    ABDRLF(NBUOP4)        DROP PRE-PRINT LF         (BIT)
          EQU    AMDRLF(NMUOP4)                                  (MASK) 
* 
          EQU    ABATEND(NBUOP5)       CURSOR AT FAR RIGHT       (BIT)
          EQU    AMATEND(NMUOP5)                                 (MASK) 
* 
          EQU    ABPGWAIT(NBUOP6)      PAGE WAIT                 (BIT)
          EQU    AMPGWAIT(NMUOP6)                                (MASK) 
* 
          EQU    ABFOLD(NBUOPB)        LINE FOLD                 (BIT)
          EQU    AMFOLD(NMUOPB)                                  (MASK) 
* 
          EQU    ABPOST(NBUOPC)        POST FE ACTION REQUIRED   (BIT)
          EQU    AMPOST(NMUOPC)                                  (MASK) 
* 
          EQU    ABSTCR(3)   -         STORE CR                  (BIT)
          EQU    AMSTCR(8)   -                                   (MASK) 
* 
          EQU    ABEMBCL(2)  -         EMBEDDED CR OR LF         (BIT)
          EQU    AMEMBCL(4)  -                                   (MASK) 
* 
          EQU    ABUPPER(1)  -         2741 UPPER CASE           (BIT)
          EQU    AMUPPER(2)  -                                   (MASK) 
          EJT 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*         ASYNC BLOCK MODE TIP, DEFINITION OF CHARACTER COUNTERS      * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
          SPC    3
          EQU    CCWORK(1)   -         WORK COUNTER 
          EQU    CCPGWTH(2)  -         PAGE WIDTH COUNTER 
          EQU    CCXXMSZ(2)  -         TRANSPARENT XMIT BLOCK SIZE
          EJT 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*         ASYNC BLOCK MODE TIP, ASCII CHARACTER CONSTANTS             * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
          SPC    3
          EQU    ACNUL($00)  -         NULL 
          EQU    ACBS($08)   -         BACK SPACE 
          EQU    ACLF($0A)   -         LINE FEED
          EQU    ACFF($0C)   -         FORM FEED
          EQU    ACCR($0D)   -         CARRIAGE CONTROL 
          EQU    ACXON($11)  -         XON
          EQU    ACXOFF($13) -         XOFF 
          EQU    ACESC($1B)  -         ESCAPE 
          EQU    ACUS($1F)   -         UNIT SEPARATOR 
          EQU    ACBLANK($20)          BLANK
          EQU    ACO($4F)    -         O
          EQU    ACV($56)    -         V
          EQU    ACE($45)    -         E
          EQU    ACR($52)    -         R
          EQU    ACDOT($2E)  -         .
          EQU    ACDEL($7F)  -         DEL
          EQU    ACCS75X($18)          75X CLEAR SCREEN 
          EQU    ACRS75X($19)          75X RESET SCREEN 
          EQU    ACCSX364($5B)         X3.64 CLEAR SCREEN 
          EQU    ACLB($5B)   -         LEFT BRACKET 
          EQU    ACH($48)    -         H
          EQU    ACJ($4A)    -         J
          EJT 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*         ASYNC BLOCK MODE TIP, 2741 CHARACTER CONSTANTS              * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
          SPC    3
          EQU    C2LOWER($1F)          LOWER CASE SHIFT 
          EQU    C2UPPER($1C)          LOWER CASE SHIFT 
          EJT 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*         ASYNC BLOCK MODE TIP, IVT FORMAT EFFECTORS                  * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
          SPC    3
          EQU    FPRSNGL($20)          SINGLE SPACE PRE-PRINT 
          EQU    FPRDBLE($30)          DOUBLE SPACE PRE-PRINT 
          EQU    FPRTRPL($2D)          TRIPLE SPACE PRE-PRINT 
          EQU    FPRSCLN($2B)          POSITION AT START LINE PRE-PRINT 
          EQU    FPRHOME($2A)          HOME CURSOR PRE-PRINT
          EQU    FPRHCLR($31)          HOME CURSOR, CLEAR PRE-PRINT 
          EQU    FPRNOOP($2C)          NO ACTION
          EQU    FPOSNGL($2E)          SINGLE SPACE POST-PRINT
          EQU    FPOSCLN($2F)          POSITION AT START LINE POST-PRINT
          EJT 
