*COMDECK VARBSC 
_***********************************************************************
*                                                                      *
*     BSC VARIABLES                                                    *
*                                                                      *
***********************************************************************?
_ 
* * *     ACTION TABLE FOR OUTPUT CANNED MESSAGE
? 
        BYS3ACT   : BYSACTT;                _ACTION TABLE              ?
  
_ 
* * *     CODE TRANSLATION TABLE POINTERS 
? 
        BYOXLTA   : ARRAY[B9026..B9TRANS]   _TRANSLATE TABLE ADDRESSES ?
                     OF INTEGER;            _ B9026,B9029,             ?
                                            _ B9ASCII,B9TRANS          ?
        BYLPXLTA  : ARRAY[BOOLEAN]          _LP - DISPLAY CODE (FALSE) ?
                     OF INTEGER;            _ OR ASCII (TRUE)          ?
  
        BY4XLTA   : ARRAY[BOOLEAN]          _CARD READER - 029(0)      ?
                     OF INTEGER;            _ OR 026(1)                ?
_ 
* * *     STATE PROGRAM ADDRESS POINTERS
? 
        BYCNSPTA  : INTEGER;                _ CONSOLE                  ?
        BYCPSPTA  : INTEGER;                _ CARD PUNCH               ?
        BYLPSPTA  : ARRAY[BOOLEAN]          _ LINE PRINTER - DISP CODE ?
                     OF INTEGER;            _ OR ASCII (TRUE)          ?
        BYXPSPTA  : INTEGER;                _ TRANSPARENT DATA         ?
        BYSUPSPTA : INTEGER;                _ SUPPRESS CARRIAGE CONTROL?
  
_***********************************************************************
*                                                                      *
*     BSC GLOBAL VARIABLES                                             *
*                                                                      *
***********************************************************************?
        S2SYTABL  : INTEGER;                _POINTER TO STATE TABLE    ?
                                            _ USED BY STATE PROGRAM    ?
        BYS2CAN   : ARRAY[0..7]             _BSC L2 CANNED MESSAGES    ?
                     OF B0BUFPTR; 
  
_********************************** 
*                                 * 
*   USER VARIABLES DEFINITIONS    * 
*                                 * 
*********************************** 
? 
