*COMDECK ASYXCORR 
* 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*            C O R R E S P O N D E N C E   -   A S C I I              * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*            THE LOWER $20 WORDS OF THE TABLE ARE FOR LOWER CASE      * 
*            MODE, THE UPPER $20 FOR UPPER CASE MODE                  * 
*                                                                     * 
*            USED BY ASYNC BLOCKMODE TIP INPUT STATES                 * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
* 
          NAM    ATCOAS 
          SPC    3
XLT       MAC    C1,C2
          VFD    X8/$"C1",X8/$"C2"
          EMC 
          EJT 
          ENT    ATCOAS 
* 
ATCOAS    XLT    20,5D       -    SP  - SP       1/2 - ]        00,01 
          XLT    74,6A       -    T   - T        J   - J        02,03 
          XLT    34,6F       -    4   - 4        O   - O        04,05 
          XLT    6C,2F       -    L   - L        /   - /        06,07 
          XLT    35,27       -    5   - 5        '   - '        08,09 
          XLT    65,70       -    E   - E        P   - P        0A,0B 
          XLT    00,00       -    PUN - UND      RST - UND      0C,0D 
          XLT    00,00       -    BY  - UND      PUF - UND      0E,0F 
          XLT    32,2E       -    2   - 2        .   - .        10,11 
          XLT    6E,3D       -    N   - N        =   - =        12,13 
          XLT    7A,00       -    Z   - Z        UND - UND      14,15 
          XLT    00,00       -    UND - UND      UND - UND      16,17 
          XLT    36,69       -    6   - 6        I   - I        18,19 
          XLT    6B,71       -    K   - K        Q   - Q        1A,1B 
          XLT    00,08       -    UCS - UND      BS  - BS       1C,1D 
          XLT    17,00       -    EOB - EOB      LCS - UND      1E,1F 
          XLT    31,6D       -    1   - 1        M   - M        20,21 
          XLT    78,67       -    X   - X        G   - G        22,23 
          XLT    30,73       -    0   - 0        S   - S        24,25 
          XLT    68,79       -    H   - H        Y   - Y        26,27 
          XLT    37,72       -    7   - 7        R   - R        28,29 
          XLT    64,3B       -    D   - D        ;   - ;        2A,2B 
          XLT    14,0D       -    STO - DC4      NL  - CR       2C,2D 
          XLT    0A,09       -    LF  - LF       TAB - TAB      2E,2F 
          XLT    33,76       -    3   - 3        V   - V        30,31 
          XLT    75,66       -    U   - U        F   - F        32,33 
          XLT    39,77       -    9   - 9        W   - W        34,35 
          XLT    62,2D       -    B   - B        -   - -        36,37 
          XLT    38,61       -    8   - 8        A   - A        38,39 
          XLT    63,2C       -    C   - C        ,   - ,        3A,3B 
          XLT    04,00       -    EOT - EOT      NUL - NUL      3C,3D 
          XLT    1B,18       -    PRE - ESC      DEL - CAN      3E,3F 
* 
* * * *   UPPER CASE PORTION OF CORRESPONDENCE TO ASCII TABLE 
* 
          XLT    20,5B       -    SP  - SP       1/4 - [        00,01 
          XLT    54,4A       -    T   - T        J   - J        02,03 
          XLT    24,4F       -    $   - $        O   - O        04,05 
          XLT    4C,3F       -    L   - L        ?   - ?        06,07 
          XLT    25,22       -    %   - %        "   - "        08,09 
          XLT    45,50       -    E   - E        P   - P        0A,0B 
          XLT    00,00       -    PUN - UND      RST - UND      0C,0D 
          XLT    00,00       -    BY  - UND      PUF - UND      0E,0F 
          XLT    40,2E       -    @   - @        .   - .        10,11 
          XLT    4E,2B       -    N   - N        +   - +        12,13 
          XLT    5A,00       -    Z   - Z        UND - UND      14,15 
          XLT    00,00       -    UND - UND      UND - UND      16,17 
          XLT    21,49       -    CT  - !        I   - I        18,19 
          XLT    4B,51       -    K   - K        Q   - Q        1A,1B 
          XLT    00,08       -    UCS - UND      BS  - BS       1C,1D 
          XLT    17,00       -    EOB - ETB      LCS - UND      1E,1F 
          XLT    7C,4D       -    +/- - LVM      M   - M        20,21 
          XLT    58,47       -    X   - X        G   - G        22,23 
          XLT    29,53       -    )   - )        S   - S        24,25 
          XLT    48,59       -    H   - H        Y   - Y        26,27 
          XLT    26,52       -    &   - &        R   - R        28,29 
          XLT    44,3A       -    D   - D        :   - :        2A,2B 
          XLT    14,0D       -    STO - DC4      NL  - CR       2C,2D 
          XLT    0A,09       -    LF  - LF       TAB - TAB      2E,2F 
          XLT    23,56       -    #   - #        V   - V        30,31 
          XLT    55,46       -    U   - U        F   - F        32,33 
          XLT    28,57       -    (   - (        W   - W        34,35 
          XLT    42,5F       -    B   - B        _   - _        36,37 
          XLT    2A,41       -    *   - *        A   - A        38,39 
          XLT    43,2C       -    C   - C        ,   - ,        3A,3B 
          XLT    04,00       -    EOT - EOT      NUL - NUL      3C,3D 
          XLT    1B,18       -    PRE - ESC      DEL - CAN      3E,3F 
          SPC    3
          END 
* 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*            A S C I I   -   C O R R E S P O N D E N C E              * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*            LOWER CASE ONLY AND UPPER CASE ONLY CHARACTERS ARE       * 
*            MARKED WITH THE ADDITIONAL L/U PARAMETERS                * 
*                                                                     * 
*            USED BY ASYNC BLOCKMODE TIP TEXTPROCESSING STATES        * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
* 
          NAM    ATASCO 
          SPC    3
XLT       MAC    C1,C2,Q1,Q2
          VFD    N2/"Q1",X6/$"C1",N2/"Q2",X6/$"C2"
          EMC 
          SPC    3
B         EQU    B(0)        -         BOTH UPPER/LOWER CASE
L         EQU    L(1)        -         LOWER CASE 
U         EQU    U(2)        -         UPPER CASE 
X         EQU    X(3)        -         UNDEFINED
          NOREF  B,L,U
          EJT 
          ENT    ATASCO 
* 
ATASCO    XLT    3D,00,B,X   -    NUL - NUL      SOH - UND      00,01 
          XLT    00,00,X,X   -    STX - UND      ETX - UND      02,03 
          XLT    3C,00,B,X   -    EOT - EOT      ENQ - UND      04,05 
          XLT    00,00,X,X   -    ACK - UND      BEL - UND      06,07 
          XLT    1D,2F,B,B   -    BS  - BS       HT  - HT       08,09 
          XLT    2E,00,B,X   -    LF  - LF       VT  - UND      0A,0B 
          XLT    00,2D,X,B   -    FF  - UND      CR  - CR       0C,0D 
          XLT    00,00,X,X   -    SO  - UND      SI  - UND      0E,0F 
          XLT    00,00,X,X   -    DLE - UND      DC1 - UND      10,11 
          XLT    00,00,X,X   -    DC2 - UND      DC3 - UND      12,13 
          XLT    2C,00,B,X   -    DC4 - STO      NAK - UND      14,15 
          XLT    00,1E,X,B   -    SYN - UND      ETB - EOB      16,17 
          XLT    3F,00,B,X   -    CAN - DEL      EM  - UND      18,19 
          XLT    00,3E,X,B   -    SUB - UND      ESC - PF       1A,1B 
          XLT    00,00,X,X   -    FS  - UND      GS  - UND      1C,1D 
          XLT    00,00,X,X   -    RS  - UND      US  - UND      1E,1F 
          XLT    00,18,B,U   -    SP  - SP       !   - CT       20,21 
          XLT    09,30,U,U   -    "   - "        #   - #        22,23 
          XLT    04,08,U,U   -    $   - $        %   - %        24,25 
          XLT    28,09,U,L   -    &   - &        '   - '        26,27 
          XLT    34,24,U,U   -    (   - (        )   - )        28,29 
          XLT    38,13,U,U   -    *   - *        +   - +        2A,2B 
          XLT    3B,37,B,L   -    ,   - ,        -   - -        2C,2D 
          XLT    11,07,B,L   -    .   - .        /   - /        2E,2F 
          XLT    24,20,L,L   -    0   - 0        1   - 1        30,31 
          XLT    10,30,L,L   -    2   - 2        3   - 3        32,33 
          XLT    04,08,L,L   -    4   - 4        5   - 5        34,35 
          XLT    18,28,L,L   -    6   - 6        7   - 7        36,37 
          XLT    38,34,L,L   -    8   - 8        9   - 9        38,39 
          XLT    2B,2B,U,L   -    :   - :        ;   - ;        3A,3B 
          XLT    00,13,X,L   -    <   - UND      =   - =        3C,3D 
          XLT    00,07,X,U   -    >   - UND      ?   - ?        3E,3F 
          XLT    10,39,U,U   -    @   - @        A   - A        40,41 
          XLT    36,3A,U,U   -    B   - B        C   - C        42,43 
          XLT    2A,0A,U,U   -    D   - D        E   - E        44,45 
          XLT    33,23,U,U   -    F   - F        G   - G        46,47 
          XLT    26,19,U,U   -    H   - H        I   - I        48,49 
          XLT    03,1A,U,U   -    J   - J        K   - K        4A,4B 
          XLT    06,21,U,U   -    L   - L        M   - M        4C,4D 
          XLT    12,05,U,U   -    N   - N        O   - O        4E,4F 
          XLT    0B,1B,U,U   -    P   - P        Q   - Q        50,51 
          XLT    29,25,U,U   -    R   - R        S   - S        52,53 
          XLT    02,32,U,U   -    T   - T        U   - U        54,55 
          XLT    31,35,U,U   -    V   - V        W   - W        56,57 
          XLT    22,27,U,U   -    X   - X        Y   - Y        58,59 
          XLT    14,01,U,U   -    Z   - Z        [   - 1/4      5A,5B 
          XLT    00,01,X,L   -    \   - UND      ]   - 1/2      5C,5D 
          XLT    00,37,X,U   -    ^   - UND      _   - _        5E,5F 
          XLT    00,39,X,U   -        - UND      A   - A        60,61 
          XLT    36,3A,U,U   -    B   - B        C   - C        62,63 
          XLT    2A,0A,U,U   -    D   - D        E   - E        64,65 
          XLT    33,23,U,U   -    F   - F        G   - G        66,67 
          XLT    26,19,U,U   -    H   - H        I   - I        68,69 
          XLT    03,1A,U,U   -    J   - J        K   - K        6A,6B 
          XLT    06,21,U,U   -    L   - L        M   - M        6C,6D 
          XLT    12,05,U,U   -    N   - N        O   - O        6E,6F 
          XLT    0B,1B,U,U   -    P   - P        Q   - Q        70,71 
          XLT    29,25,U,U   -    R   - R        S   - S        72,73 
          XLT    02,32,U,U   -    T   - T        U   - U        74,75 
          XLT    31,35,U,U   -    V   - V        W   - W        76,77 
          XLT    22,27,U,U   -    X   - X        Y   - Y        78,79 
          XLT    14,00,U,X   -    Z   - Z        _   - UND      7A,7B 
          XLT    20,00,U,X   -    LVM - +/-          - UND      7C,7D 
          XLT    00,3F,X,B   -        - UND      DEL - DEL      7E,7F 
          SPC    3
          END 
* 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*         C O R R E S P O N D E N C E   A P L   -   A S C I I         * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*            THE LOWER $20 WORDS OF THE TABLE ARE FOR LOWER CASE      * 
*            MODE, THE UPPER $20 FOR UPPER CASE MODE                  * 
*                                                                     * 
*            USED BY ASYNC BLOCKMODE TIP INPUT STATES                 * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
* 
          NAM    ATCAPA 
          SPC    3
XLT       MAC    C1,C2
          VFD    X8/$"C1",X8/$"C2"
          EMC 
          EJT 
          ENT    ATCAPA 
* 
ATCAPA    XLT    20,70       -    SP  - SP       P   - P        00,01 
          XLT    54,4A       -    T   - T        J   - J        02,03 
          XLT    34,4F       -    4   - 4        O   - O        04,05 
          XLT    4C,2F       -    L   - L        /   - /        06,07 
          XLT    35,5D       -    5   - 5        ]   - ]        08,09 
          XLT    45,50       -    E   - E        P   - P        0A,0B 
          XLT    00,00       -    UND - UND      UND - UND      0C,0D 
          XLT    00,00       -    UND - UND      UND - UND      0E,0F 
          XLT    32,2E       -    2   - 2        .   - .        10,11 
          XLT    4E,66       -    N   - N        F   - F        12,13 
          XLT    5A,00       -    Z   - Z        UND - UND      14,15 
          XLT    00,00       -    UND - UND      UND - UND      16,17 
          XLT    36,49       -    6   - 6        I   - I        18,19 
          XLT    4B,51       -    K   - K        Q   - Q        1A,1B 
          XLT    00,08       -    UCS - UND      BS  - BS       1C,1D 
          XLT    17,00       -    EOB - ETB      LCS - UND      1E,1F 
          XLT    31,4D       -    1   - 1        M   - M        20,21 
          XLT    58,47       -    X   - X        G   - G        22,23 
          XLT    30,53       -    0   - 0        S   - S        24,25 
          XLT    48,59       -    H   - H        Y   - Y        26,27 
          XLT    37,52       -    7   - 7        R   - R        28,29 
          XLT    44,5B       -    D   - D        [   - [        2A,2B 
          XLT    00,0D       -    UND - UND      CR  - CR       2C,2D 
          XLT    0A,09       -    LF  - LF       HT  - HT       2E,2F 
          XLT    33,56       -    3   - 3        V   - V        30,31 
          XLT    55,46       -    U   - U        F   - F        32,33 
          XLT    39,57       -    9   - 9        W   - W        34,35 
          XLT    42,2B       -    B   - B        +   - +        36,37 
          XLT    38,41       -    8   - 8        A   - A        38,39 
          XLT    43,2C       -    C   - C        ;   - ;        3A,3B 
          XLT    04,00       -    EOT - EOT      NUL - NUL      3C,3D 
          XLT    1B,18       -    PRE - ESC      DEL - CAN      3E,3F 
* 
* * * *   UPPER CASE PORTION OF CORRESPONDENCE APL TO ASCII TABLE 
* 
          XLT    20,71       -    SP  - SP       _   - Q        00,01 
          XLT    74,6A       -    T   - T        .   - J        02,03 
          XLT    40,6F       -    @   -          O   - O        04,05 
          XLT    6C,5C       -    []  - L            -          06,07 
          XLT    3D,29       -    =   - =        )   - )        08,09 
          XLT    65,2A       -    E   - E        *   - *        0A,0B 
          XLT    00,00       -    UND - UND      UND - UND      0C,0D 
          XLT    00,00       -    UND - UND      UND - UND      0E,0F 
          XLT    5E,3A       -        - ^        :   - :        10,11 
          XLT    6E,25       -    N   - N        %   - %        12,13 
          XLT    7A,00       -    Z   - Z        UND - UND      14,15 
          XLT    00,00       -    UND - UND      UND - UND      16,17 
          XLT    7C,69       -    \   -          I   - I        18,19 
          XLT    27,3F       -    '   - '        ?   - ?        1A,1B 
          XLT    00,08       -    UCS - UND      BS  - BS       1C,1D 
          XLT    17,00       -    EOB - ETB      LCS - UND      1E,1F 
          XLT    23,6D       -    #   - #        M   - M        20,21 
          XLT    78,67       -    X   - X        G   - G        22,23 
          XLT    26,73       -    &   - &        S   - S        24,25 
          XLT    68,79       -    H   - H        Y   - Y        26,27 
          XLT    3E,72       -    >   - >        R   - R        28,29 
          XLT    64,28       -    D   - D        (   - (        2A,2B 
          XLT    00,0D       -    UND - UND      CR  - CR       2C,2D 
          XLT    0A,09       -    LF  - LF       HT  - HT       2E,2F 
          XLT    3C,76       -    <   - <        V   - V        30,31 
          XLT    75,5F       -    U   - U        _   - _        32,33 
          XLT    21,77       -    !   - !        W   - W        34,35 
          XLT    62,2D       -    B   - B        -   - -        36,37 
          XLT    22,61       -    "   - "        A   - A        38,39 
          XLT    63,3B       -    C   - C        ;   - ;        3A,3B 
          XLT    04,00       -    EOT - EOT      NUL - NUL      3C,3D 
          XLT    1B,18       -    PRE - ESC      DEL - CAN      3E,3F 
          SPC    3
          END 
* 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*         A S C I I   -   C O R R E S P O N D E N C E   A P L         * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*            LOWER CASE ONLY AND UPPER CASE ONLY CHARACTERS ARE       * 
*            MARKED WITH THE ADDITIONAL L/U PARAMETERS                * 
*                                                                     * 
*            USED BY ASYNC BLOCKMODE TIP TEXTPROCESSING STATES        * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
* 
          NAM    ATACAP 
          SPC    3
XLT       MAC    C1,C2,Q1,Q2
          VFD    N2/"Q1",X6/$"C1",N2/"Q2",X6/$"C2"
          EMC 
          SPC    3
B         EQU    B(0)        -         BOTH UPPER/LOWER CASE
L         EQU    L(1)        -         LOWER CASE 
U         EQU    U(2)        -         UPPER CASE 
X         EQU    X(3)        -         UNDEFINED
          NOREF  B,L,U
          EJT 
          ENT    ATACAP 
* 
ATACAP    XLT    3D,00,B,X   -    NUL - NUL      SOH - UND      00,01 
          XLT    00,00,X,X   -    STX - UND      ETX - UND      02,03 
          XLT    3C,00,B,X   -    EOT - EOT      ENQ - UND      04,05 
          XLT    00,00,X,X   -    ACK - UND      BEL - UND      06,07 
          XLT    1D,2F,B,B   -    BS  - BS       HT  - HT       08,09 
          XLT    2E,00,B,X   -    LF  - LF       VT  - UND      0A,0B 
          XLT    00,2D,X,B   -    FF  - UND      CR  - CR       0C,0D 
          XLT    00,00,X,X   -    SO  - UND      SI  - UND      0E,0F 
          XLT    00,00,X,X   -    DLE - UND      DC1 - UND      10,11 
          XLT    00,00,X,X   -    DC2 - UND      DC3 - UND      12,13 
          XLT    00,00,X,X   -    DC4 - UND      NAK - NAK      14,15 
          XLT    00,1E,X,B   -    SYN - UND      ETB - EOB      16,17 
          XLT    3F,00,B,X   -    CAN - DEL      EM  - UND      18,19 
          XLT    00,3E,X,B   -    SUB - UND      ESC - PF       1A,1B 
          XLT    00,00,X,X   -    FS  - UND      GS  - UND      1C,1D 
          XLT    00,00,X,X   -    RS  - UND      US  - UND      1E,1F 
          XLT    00,34,B,U   -    SP  - SP       !   - !        20,21 
          XLT    38,20,U,U   -    "   - "        #   - #        22,23 
          XLT    39,13,U,U   -    $   - $        %   - %        24,25 
          XLT    24,1A,U,U   -    &   - &        '   - '        26,27 
          XLT    2B,09,U,U   -    (   - (        )   - )        28,29 
          XLT    0B,37,U,L   -    *   - *        +   - +        2A,2B 
          XLT    3B,37,L,U   -    ,   - ,        -   - -        2C,2D 
          XLT    11,07,L,L   -    .   - .        /   -  /       2E,2F 
          XLT    24,20,L,L   -    0   - 0        1   - 1        30,31 
          XLT    10,30,L,L   -    2   - 2        3   - 3        32,33 
          XLT    04,08,L,L   -    4   - 4        5   - 5        34,35 
          XLT    18,28,L,L   -    6   - 6        7   - 7        36,37 
          XLT    38,34,L,L   -    8   - 8        9   - 9        38,39 
          XLT    11,3B,U,U   -    CLN - CL       ;   - ;        3A,3B 
          XLT    30,08,U,U   -    <   - <        =   - =        3C,3D 
          XLT    28,1B,U,U   -    >   - >        ?   - ?        3E,3F 
          XLT    04,39,U,L   -    @   - @        A   - A        40,41 
          XLT    36,3A,L,L   -    B   - B        C   - C        42,43 
          XLT    2A,0A,L,L   -    D   - D        E   - E        44,45 
          XLT    33,23,L,L   -    F   - F        G   - G        46,47 
          XLT    26,19,L,L   -    H   - H        I   - I        48,49 
          XLT    03,1A,L,L   -    J   - J        K   - K        4A,4B 
          XLT    06,21,L,L   -    L   - L        M   - M        4C,4D 
          XLT    12,05,L,L   -    N   - N        O   - O        4E,4F 
          XLT    0B,1B,L,L   -    P   - P        Q   - Q        50,51 
          XLT    29,25,L,L   -    R   - R        S   - S        52,53 
          XLT    02,32,L,L   -    T   - T        U   - U        54,55 
          XLT    31,35,L,L   -    V   - V        W   - W        56,57 
          XLT    22,27,L,L   -    X   - X        Y   - Y        58,59 
          XLT    14,2B,L,L   -    Z   - Z        [   - [        5A,5B 
          XLT    07,09,U,L   -    /   - /        ]   - ]        5C,5D 
          XLT    10,33,U,U   -    ^   -          _   - _        5E,5F 
          XLT    00,39,X,U   -        - UND      A   - A        60,61 
          XLT    36,3A,U,U   -    B   - B        C   - C        62,63 
          XLT    2A,0A,U,U   -    D   - D        E   - E        64,65 
          XLT    13,23,L,U   -    F   - F        G   - G        66,67 
          XLT    26,19,U,U   -    H   - H        I   - I        68,69 
          XLT    03,00,U,X   -    J   - J        K   - UND      6A,6B 
          XLT    06,21,U,U   -    L   - L        M   - M        6C,6D 
          XLT    12,05,U,U   -    N   - N        O   - O        6E,6F 
          XLT    01,01,U,L   -    P   -          Q   - _        70,71 
          XLT    29,25,U,U   -    R   - R        S   - S        72,73 
          XLT    02,32,U,U   -    T   - T        U   - U        74,75 
          XLT    31,35,U,U   -    V   - V        W   - W        76,77 
          XLT    22,27,U,U   -    X   - X        Y   - Y        78,79 
          XLT    14,00,U,X   -    Z   - Z            - UND      7A,7B 
          XLT    18,00,U,X   -        - \            - UND      7C,7D 
          XLT    00,3F,X,B   -        - UND      DEL - DEL      7E,7F 
          SPC    3
          END 
