COMTCVT 
COMMON
          CTEXT  COMTCVT - CONVERSION SYMBOLS.
          SPACE  4,10 
          IF     -DEF,QUAL$ 
          NOREF  /COMTCVT/
          QUAL   COMTCVT
          ENDIF 
          BASE   O
*         COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992. 
          SPACE  4,10 
***       COMTCVT - CHARACTER COVERSION SYMBOLS.
*         J.    HOLLISTER.   82/03/15.
          SPACE  4,10 
***       *COMTCVT* CREATES IDENTIFIERS SPECIFYING CONVERSIONS
*         BETWEEN VARIOUS CHARACTER CODE SETS AND 8 BIT ASCII.
*         THERE ARE TWO FORMS - 
* 
*         FAAAXXX 
*         TAAAXXX 
* 
*         AAA = 3 CHARACTER MNEMONIC FOR CHARACTER SET. 
*         F   = INDICATES CONVERSION IS FROM THE SPECIFIED
*               CHARACTER SET TO 8 BIT ASCII. 
*         T   = INDICATES CONVERSION IS TO THE SPECIFIED
*               CHARACTER SET FROM 8 BIT ASCII. 
*         XXX = CODE IN SPECIFIED CHARACTER SET.
* 
*         THE VALUES GIVEN TO THESE SYMBOLS REPRESENT THE RESULT
*         OF THE CONVERSION SPECIFIED BY THE IDENTIFIERS THEMSELVES.
*         THESE RESULTS MAY EITHER BE CODES IN THE APPROPRIATE
*         CHARACTER SET OR SPECIAL INSTRUCTIONS FOR THE CONVERSION
*         TO BE USED BY THE PROCESSING PROGRAM. THE VALUES ARE
*         STRUCTURED AS FOLLOWS - 
* 
*         6/OP, 12/DATA 
* 
*         OP = OPTION. MAY HAVE ONE OF THESE VALUES - 
*              0 = NORMAL CONVERSION. DATA FIELD IS CODE TO CONVERT TO. 
*              1 = DOUBLE LENGTH CHARACTER. CODE IN DATA FIELD IS 
*                  TWICE THE STANDARD CHARACTER LENGTH. 
*              2 = IGNORE CHARACTER. THERE IS NO CHARACTER TO CONVERT 
*                  THE CODE TO. IF DATA FIELD IS NOT ZERO, THIS MEANS 
*                  THAT THE INPUT CHARACTER CODE IS NOT PART OF THE 
*                  INPUT CHARACTER SET, AND IS HENCE AN ERROR.
*              4 = SET OFFSET. THE CODE IS A FLAG AFFECTING THE NEXT
*                  CHARACTER. ADD DATA FIELD TO NEXT CODE AND 
*                  USE THIS VALUE AS THE CODE TO CONVERT FROM.
* 
*         DATA = CHARACTER CODE, OFFSET OR ERROR FLAG, SUBJECT TO 
*                THE VALUE OF *OP*. 
* 
*         FOR EXAMPLE - 
* 
*         F64D055  REPRESENTS THE CONVERSION OF 055 IN
*                  64 CHARACTER DISPLAY CODE TO ITS CORRESPONDING 
*                  CODE IN 8 BIT ASCII. ITS VALUE WOULD BE 40.
* 
*         T64D001  REPRESENTS THE CONVERSION OF 001 FROM 8 BIT
*                  ASCII TO 64 CHARACTER DISPLAY CODE. ITS VALUE IS 
*                  20000. THIS INDICATES THAT 001 IN 8 BIT ASCII
*                  STANDS FOR A CHARACTER NOT FOUND IN DISPLAY CODE,
*                  AND THUS SHOULD BE IGNORED.
* 
*         F64A076  REPRESENTS THE CONVERSION FROM ASCII 6/12 TO 
*                  8 BIT ASCII. THE VALUE RESULTING IS 40300. THIS
*                  INDICATES THAT THE NEXT CODE IS OFFSET BY 300. 
*                  THAT IS, IF THE NEXT CODE WAS 30, A CODE OF 330
*                  WOULD BE PROCESSED INSTEAD.
          SPACE  4,10 
**        IDT - GENERATE CONVERSION SYMBOL VALUE. 
* 
*         FORM AN 18 BIT CONVERSION SYMBOL VALUE, CONSISTING
*         OF A 6 BIT OPTION FOLLOWED BY A 12 BIT CHARACTER CODE 
*         OR TABLE OFFSET.
*         SEE *COMTCVT* DOCUMENTATION FOR MORE DETAILS ON THE 
*         CONVERSION SYMBOL VALUES. 
* 
*         CALL -
* 
*LC       IDT    OC,OP
* 
*         ENTRY  OC = CHARACTER CODE OR TABLE OFFSET. 
*                OP = OPTION. 0 (DEFAULT) OR ONE OF THE FOLLOWING.
*                     DB = DOUBLE LENGTH. 
*                     DL = DELETE CHARACTER.
*                     SO = SET OFFSET.
  
  
          PURGMAC  IDT
  
          MACRO  IDT,LC,OC,OP 
          NOREF  .1 
 .1       SET    0
          IFC    EQ,*OP*DB*,1 
 .1       SET    10000
          IFC    EQ,*OP*DL*,1 
 .1       SET    20000
          IFC    EQ,*OP*SO*,1 
 .1       SET    40000
 LC       EQU    OC+.1
          ENDM
          SPACE  4,10 
**        SYMBOLS FOR 64 CHARACTER DISPLAY CODE.
* 
*         CONVERSION TO 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 F64D000  IDT    72          :  
 F64D001  IDT    101         A
 F64D002  IDT    102         B
 F64D003  IDT    103         C
 F64D004  IDT    104         D
 F64D005  IDT    105         E
 F64D006  IDT    106         F
 F64D007  IDT    107         G
 F64D010  IDT    110         H
 F64D011  IDT    111         I
 F64D012  IDT    112         J
 F64D013  IDT    113         K
 F64D014  IDT    114         L
 F64D015  IDT    115         M
 F64D016  IDT    116         N
 F64D017  IDT    117         O
 F64D020  IDT    120         P
 F64D021  IDT    121         Q
 F64D022  IDT    122         R
 F64D023  IDT    123         S
 F64D024  IDT    124         T
 F64D025  IDT    125         U
 F64D026  IDT    126         V
 F64D027  IDT    127         W
 F64D030  IDT    130         X
 F64D031  IDT    131         Y
 F64D032  IDT    132         Z
 F64D033  IDT    60          0
 F64D034  IDT    61          1
 F64D035  IDT    62          2
 F64D036  IDT    63          3
 F64D037  IDT    64          4
 F64D040  IDT    65          5
 F64D041  IDT    66          6
 F64D042  IDT    67          7
 F64D043  IDT    70          8
 F64D044  IDT    71          9
 F64D045  IDT    53          +
 F64D046  IDT    55          -
 F64D047  IDT    52          *
 F64D050  IDT    57          /
 F64D051  IDT    50          (
 F64D052  IDT    51          )
 F64D053  IDT    44          $
 F64D054  IDT    75          =
 F64D055  IDT    40          BLANK
 F64D056  IDT    54          ,
 F64D057  IDT    56          .
 F64D060  IDT    43          #
 F64D061  IDT    133         [
 F64D062  IDT    135         ]
 F64D063  IDT    45          %
 F64D064  IDT    42          "
 F64D065  IDT    137         _
 F64D066  IDT    41          !
 F64D067  IDT    46          &
 F64D070  IDT    47          '
 F64D071  IDT    77          ?
 F64D072  IDT    74          <
 F64D073  IDT    76          >
 F64D074  IDT    100
 F64D075  IDT    134         \
 F64D076  IDT    136
 F64D077  IDT    73          ;
  
 X        SET    100
          DUP    300,3       REMAINING SYMBOLS HAVE IDENTICAL VALUES
 C        OCTMIC X,3
 F64D"C"  IDT    1,DL 
 X        SET    X+1
          SPACE  4,10 
**        SYMBOLS FOR 64 CHARACTER DISPLAY CODE.
* 
*         CONVERSION FROM 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 T64D000  IDT    0,DL        NUL
 T64D001  IDT    0,DL        SOH
 T64D002  IDT    0,DL        STX
 T64D003  IDT    0,DL        ETX
 T64D004  IDT    0,DL        EOT
 T64D005  IDT    0,DL        ENQ
 T64D006  IDT    0,DL        ACK
 T64D007  IDT    0,DL        BEL
 T64D010  IDT    0,DL        BS 
 T64D011  IDT    0,DL        HT 
 T64D012  IDT    0,DL        LF 
 T64D013  IDT    0,DL        VT 
 T64D014  IDT    0,DL        FF 
 T64D015  IDT    0,DL        CR 
 T64D016  IDT    0,DL        SO 
 T64D017  IDT    0,DL        SI 
 T64D020  IDT    0,DL        DLE
 T64D021  IDT    0,DL        DC1
 T64D022  IDT    0,DL        DC2
 T64D023  IDT    0,DL        DC3
 T64D024  IDT    0,DL        DC4
 T64D025  IDT    0,DL        NAK
 T64D026  IDT    0,DL        SYN
 T64D027  IDT    0,DL        ETB
 T64D030  IDT    0,DL        CAN
 T64D031  IDT    0,DL        EM 
 T64D032  IDT    0,DL        SUB
 T64D033  IDT    0,DL        ESC
 T64D034  IDT    0,DL        FS 
 T64D035  IDT    0,DL        GS 
 T64D036  IDT    0,DL        RS 
 T64D037  IDT    0,DL        US 
 T64D040  IDT    55          BLANK
 T64D041  IDT    66          !
 T64D042  IDT    64          "
 T64D043  IDT    60          #
 T64D044  IDT    53          $
 T64D045  IDT    63          %
 T64D046  IDT    67          &
 T64D047  IDT    70          '
 T64D050  IDT    51          (
 T64D051  IDT    52          )
 T64D052  IDT    47          *
 T64D053  IDT    45          +
 T64D054  IDT    56          ,
 T64D055  IDT    46          -
 T64D056  IDT    57          .
 T64D057  IDT    50          /
 T64D060  IDT    33          0
 T64D061  IDT    34          1
 T64D062  IDT    35          2
 T64D063  IDT    36          3
 T64D064  IDT    37          4
 T64D065  IDT    40          5
 T64D066  IDT    41          6
 T64D067  IDT    42          7
 T64D070  IDT    43          8
 T64D071  IDT    44          9
 T64D072  IDT    0           :  
 T64D073  IDT    77          ;
 T64D074  IDT    72          <
 T64D075  IDT    54          =
 T64D076  IDT    73          >
 T64D077  IDT    71          ?
  
 T64D100  IDT    74 
 T64D101  IDT    01          A
 T64D102  IDT    02          B
 T64D103  IDT    03          C
 T64D104  IDT    04          D
 T64D105  IDT    05          E
 T64D106  IDT    06          F
 T64D107  IDT    07          G
 T64D110  IDT    10          H
 T64D111  IDT    11          I
 T64D112  IDT    12          J
 T64D113  IDT    13          K
 T64D114  IDT    14          L
 T64D115  IDT    15          M
 T64D116  IDT    16          N
 T64D117  IDT    17          O
 T64D120  IDT    20          P
 T64D121  IDT    21          Q
 T64D122  IDT    22          R
 T64D123  IDT    23          S
 T64D124  IDT    24          T
 T64D125  IDT    25          U
 T64D126  IDT    26          V
 T64D127  IDT    27          W
 T64D130  IDT    30          X
 T64D131  IDT    31          Y
 T64D132  IDT    32          Z
 T64D133  IDT    61          [
 T64D134  IDT    75          \
 T64D135  IDT    62          ]
 T64D136  IDT    76 
 T64D137  IDT    65          _
 T64D140  IDT    74 
 T64D141  IDT    01          A
 T64D142  IDT    02          B
 T64D143  IDT    03          C
 T64D144  IDT    04          D
 T64D145  IDT    05          E
 T64D146  IDT    06          F
 T64D147  IDT    07          G
 T64D150  IDT    10          H
 T64D151  IDT    11          I
 T64D152  IDT    12          J
 T64D153  IDT    13          K
 T64D154  IDT    14          L
 T64D155  IDT    15          M
 T64D156  IDT    16          N
 T64D157  IDT    17          O
 T64D160  IDT    20          P
 T64D161  IDT    21          Q
 T64D162  IDT    22          R
 T64D163  IDT    23          S
 T64D164  IDT    24          T
 T64D165  IDT    25          U
 T64D166  IDT    26          V
 T64D167  IDT    27          W
 T64D170  IDT    30          X
 T64D171  IDT    31          Y
 T64D172  IDT    32          Z
 T64D173  IDT    61          [
 T64D174  IDT    75          \
 T64D175  IDT    62          ]
 T64D176  IDT    76 
 T64D177  IDT    0,DL 
  
 T64D200  IDT    0,DL        NUL
 T64D201  IDT    0,DL        SOH
 T64D202  IDT    0,DL        STX
 T64D203  IDT    0,DL        ETX
 T64D204  IDT    0,DL        EOT
 T64D205  IDT    0,DL        ENQ
 T64D206  IDT    0,DL        ACK
 T64D207  IDT    0,DL        BEL
 T64D210  IDT    0,DL        BS 
 T64D211  IDT    0,DL        HT 
 T64D212  IDT    0,DL        LF 
 T64D213  IDT    0,DL        VT 
 T64D214  IDT    0,DL        FF 
 T64D215  IDT    0,DL        CR 
 T64D216  IDT    0,DL        SO 
 T64D217  IDT    0,DL        SI 
 T64D220  IDT    0,DL        DLE
 T64D221  IDT    0,DL        DC1
 T64D222  IDT    0,DL        DC2
 T64D223  IDT    0,DL        DC3
 T64D224  IDT    0,DL        DC4
 T64D225  IDT    0,DL        NAK
 T64D226  IDT    0,DL        SYN
 T64D227  IDT    0,DL        ETB
 T64D230  IDT    0,DL        CAN
 T64D231  IDT    0,DL        EM 
 T64D232  IDT    0,DL        SUB
 T64D233  IDT    0,DL        ESC
 T64D234  IDT    0,DL        FS 
 T64D235  IDT    0,DL        GS 
 T64D236  IDT    0,DL        RS 
 T64D237  IDT    0,DL        US 
 T64D240  IDT    55          BLANK
 T64D241  IDT    66          !
 T64D242  IDT    64          "
 T64D243  IDT    60          #
 T64D244  IDT    53          $
 T64D245  IDT    63          %
 T64D246  IDT    67          &
 T64D247  IDT    70          '
 T64D250  IDT    51          (
 T64D251  IDT    52          )
 T64D252  IDT    47          *
 T64D253  IDT    45          +
 T64D254  IDT    56          ,
 T64D255  IDT    46          -
 T64D256  IDT    57          .
 T64D257  IDT    50          /
 T64D260  IDT    33          0
 T64D261  IDT    34          1
 T64D262  IDT    35          2
 T64D263  IDT    36          3
 T64D264  IDT    37          4
 T64D265  IDT    40          5
 T64D266  IDT    41          6
 T64D267  IDT    42          7
 T64D270  IDT    43          8
 T64D271  IDT    44          9
 T64D272  IDT    0           :  
 T64D273  IDT    77          ;
 T64D274  IDT    72          <
 T64D275  IDT    54          =
 T64D276  IDT    73          >
 T64D277  IDT    71          ?
  
 T64D300  IDT    74 
 T64D301  IDT    01          A
 T64D302  IDT    02          B
 T64D303  IDT    03          C
 T64D304  IDT    04          D
 T64D305  IDT    05          E
 T64D306  IDT    06          F
 T64D307  IDT    07          G
 T64D310  IDT    10          H
 T64D311  IDT    11          I
 T64D312  IDT    12          J
 T64D313  IDT    13          K
 T64D314  IDT    14          L
 T64D315  IDT    15          M
 T64D316  IDT    16          N
 T64D317  IDT    17          O
 T64D320  IDT    20          P
 T64D321  IDT    21          Q
 T64D322  IDT    22          R
 T64D323  IDT    23          S
 T64D324  IDT    24          T
 T64D325  IDT    25          U
 T64D326  IDT    26          V
 T64D327  IDT    27          W
 T64D330  IDT    30          X
 T64D331  IDT    31          Y
 T64D332  IDT    32          Z
 T64D333  IDT    61          [
 T64D334  IDT    75          \
 T64D335  IDT    62          ]
 T64D336  IDT    76 
 T64D337  IDT    65          _
 T64D340  IDT    74 
 T64D341  IDT    01          A
 T64D342  IDT    02          B
 T64D343  IDT    03          C
 T64D344  IDT    04          D
 T64D345  IDT    05          E
 T64D346  IDT    06          F
 T64D347  IDT    07          G
 T64D350  IDT    10          H
 T64D351  IDT    11          I
 T64D352  IDT    12          J
 T64D353  IDT    13          K
 T64D354  IDT    14          L
 T64D355  IDT    15          M
 T64D356  IDT    16          N
 T64D357  IDT    17          O
 T64D360  IDT    20          P
 T64D361  IDT    21          Q
 T64D362  IDT    22          R
 T64D363  IDT    23          S
 T64D364  IDT    24          T
 T64D365  IDT    25          U
 T64D366  IDT    26          V
 T64D367  IDT    27          W
 T64D370  IDT    30          X
 T64D371  IDT    31          Y
 T64D372  IDT    32          Z
 T64D373  IDT    61          [
 T64D374  IDT    75          \
 T64D375  IDT    62          ]
 T64D376  IDT    76 
 T64D377  IDT    0,DL 
          SPACE  4,10 
**        SYMBOLS FOR 63 CHARACTER DISPLAY CODE.
* 
*         CONVERSION TO 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 F63D000  IDT    1,DL 
 F63D001  IDT    101         A
 F63D002  IDT    102         B
 F63D003  IDT    103         C
 F63D004  IDT    104         D
 F63D005  IDT    105         E
 F63D006  IDT    106         F
 F63D007  IDT    107         G
 F63D010  IDT    110         H
 F63D011  IDT    111         I
 F63D012  IDT    112         J
 F63D013  IDT    113         K
 F63D014  IDT    114         L
 F63D015  IDT    115         M
 F63D016  IDT    116         N
 F63D017  IDT    117         O
 F63D020  IDT    120         P
 F63D021  IDT    121         Q
 F63D022  IDT    122         R
 F63D023  IDT    123         S
 F63D024  IDT    124         T
 F63D025  IDT    125         U
 F63D026  IDT    126         V
 F63D027  IDT    127         W
 F63D030  IDT    130         X
 F63D031  IDT    131         Y
 F63D032  IDT    132         Z
 F63D033  IDT    60          0
 F63D034  IDT    61          1
 F63D035  IDT    62          2
 F63D036  IDT    63          3
 F63D037  IDT    64          4
 F63D040  IDT    65          5
 F63D041  IDT    66          6
 F63D042  IDT    67          7
 F63D043  IDT    70          8
 F63D044  IDT    71          9
 F63D045  IDT    53          +
 F63D046  IDT    55          -
 F63D047  IDT    52          *
 F63D050  IDT    57          /
 F63D051  IDT    50          (
 F63D052  IDT    51          )
 F63D053  IDT    44          $
 F63D054  IDT    75          =
 F63D055  IDT    40          BLANK
 F63D056  IDT    54          ,
 F63D057  IDT    56          .
 F63D060  IDT    43          #
 F63D061  IDT    133         [
 F63D062  IDT    135         ]
 F63D063  IDT    72          :  
 F63D064  IDT    42          "
 F63D065  IDT    137         _
 F63D066  IDT    41          !
 F63D067  IDT    46          &
 F63D070  IDT    47          '
 F63D071  IDT    77          ?
 F63D072  IDT    74          <
 F63D073  IDT    76          >
 F63D074  IDT    100
 F63D075  IDT    134         \
 F63D076  IDT    136
 F63D077  IDT    73          ;
  
 X        SET    100
          DUP    300,3       REMAINING SYMBOLS HAVE IDENTICAL VALUES
 C        OCTMIC X,3
 F63D"C"  IDT    1,DL 
 X        SET    X+1
          SPACE  4,10 
**        SYMBOLS FOR 63 CHARACTER DISPLAY CODE.
* 
*         CONVERSION FROM 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 T63D000  IDT    0,DL        NUL
 T63D001  IDT    0,DL        SOH
 T63D002  IDT    0,DL        STX
 T63D003  IDT    0,DL        ETX
 T63D004  IDT    0,DL        EOT
 T63D005  IDT    0,DL        ENQ
 T63D006  IDT    0,DL        ACK
 T63D007  IDT    0,DL        BEL
 T63D010  IDT    0,DL        BS 
 T63D011  IDT    0,DL        HT 
 T63D012  IDT    0,DL        LF 
 T63D013  IDT    0,DL        VT 
 T63D014  IDT    0,DL        FF 
 T63D015  IDT    0,DL        CR 
 T63D016  IDT    0,DL        SO 
 T63D017  IDT    0,DL        SI 
 T63D020  IDT    0,DL        DLE
 T63D021  IDT    0,DL        DC1
 T63D022  IDT    0,DL        DC2
 T63D023  IDT    0,DL        DC3
 T63D024  IDT    0,DL        DC4
 T63D025  IDT    0,DL        NAK
 T63D026  IDT    0,DL        SYN
 T63D027  IDT    0,DL        ETB
 T63D030  IDT    0,DL        CAN
 T63D031  IDT    0,DL        EM 
 T63D032  IDT    0,DL        SUB
 T63D033  IDT    0,DL        ESC
 T63D034  IDT    0,DL        FS 
 T63D035  IDT    0,DL        GS 
 T63D036  IDT    0,DL        RS 
 T63D037  IDT    0,DL        US 
 T63D040  IDT    55          BLANK
 T63D041  IDT    66          !
 T63D042  IDT    64          "
 T63D043  IDT    60          #
 T63D044  IDT    53          $
 T63D045  IDT    55          BLANK
 T63D046  IDT    67          &
 T63D047  IDT    70          '
 T63D050  IDT    51          (
 T63D051  IDT    52          )
 T63D052  IDT    47          *
 T63D053  IDT    45          +
 T63D054  IDT    56          ,
 T63D055  IDT    46          -
 T63D056  IDT    57          .
 T63D057  IDT    50          /
 T63D060  IDT    33          0
 T63D061  IDT    34          1
 T63D062  IDT    35          2
 T63D063  IDT    36          3
 T63D064  IDT    37          4
 T63D065  IDT    40          5
 T63D066  IDT    41          6
 T63D067  IDT    42          7
 T63D070  IDT    43          8
 T63D071  IDT    44          9
 T63D072  IDT    63          :  
 T63D073  IDT    77          ;
 T63D074  IDT    72          <
 T63D075  IDT    54          =
 T63D076  IDT    73          >
 T63D077  IDT    71          ?
  
 T63D100  IDT    74 
 T63D101  IDT    01          A
 T63D102  IDT    02          B
 T63D103  IDT    03          C
 T63D104  IDT    04          D
 T63D105  IDT    05          E
 T63D106  IDT    06          F
 T63D107  IDT    07          G
 T63D110  IDT    10          H
 T63D111  IDT    11          I
 T63D112  IDT    12          J
 T63D113  IDT    13          K
 T63D114  IDT    14          L
 T63D115  IDT    15          M
 T63D116  IDT    16          N
 T63D117  IDT    17          O
 T63D120  IDT    20          P
 T63D121  IDT    21          Q
 T63D122  IDT    22          R
 T63D123  IDT    23          S
 T63D124  IDT    24          T
 T63D125  IDT    25          U
 T63D126  IDT    26          V
 T63D127  IDT    27          W
 T63D130  IDT    30          X
 T63D131  IDT    31          Y
 T63D132  IDT    32          Z
 T63D133  IDT    61          [
 T63D134  IDT    75          \
 T63D135  IDT    62          ]
 T63D136  IDT    76 
 T63D137  IDT    65          _
 T63D140  IDT    74 
 T63D141  IDT    01          A
 T63D142  IDT    02          B
 T63D143  IDT    03          C
 T63D144  IDT    04          D
 T63D145  IDT    05          E
 T63D146  IDT    06          F
 T63D147  IDT    07          G
 T63D150  IDT    10          H
 T63D151  IDT    11          I
 T63D152  IDT    12          J
 T63D153  IDT    13          K
 T63D154  IDT    14          L
 T63D155  IDT    15          M
 T63D156  IDT    16          N
 T63D157  IDT    17          O
 T63D160  IDT    20          P
 T63D161  IDT    21          Q
 T63D162  IDT    22          R
 T63D163  IDT    23          S
 T63D164  IDT    24          T
 T63D165  IDT    25          U
 T63D166  IDT    26          V
 T63D167  IDT    27          W
 T63D170  IDT    30          X
 T63D171  IDT    31          Y
 T63D172  IDT    32          Z
 T63D173  IDT    61          [
 T63D174  IDT    75          \
 T63D175  IDT    62          ]
 T63D176  IDT    76 
 T63D177  IDT    0,DL 
  
 T63D200  IDT    0,DL        NUL
 T63D201  IDT    0,DL        SOH
 T63D202  IDT    0,DL        STX
 T63D203  IDT    0,DL        ETX
 T63D204  IDT    0,DL        EOT
 T63D205  IDT    0,DL        ENQ
 T63D206  IDT    0,DL        ACK
 T63D207  IDT    0,DL        BEL
 T63D210  IDT    0,DL        BS 
 T63D211  IDT    0,DL        HT 
 T63D212  IDT    0,DL        LF 
 T63D213  IDT    0,DL        VT 
 T63D214  IDT    0,DL        FF 
 T63D215  IDT    0,DL        CR 
 T63D216  IDT    0,DL        SO 
 T63D217  IDT    0,DL        SI 
 T63D220  IDT    0,DL        DLE
 T63D221  IDT    0,DL        DC1
 T63D222  IDT    0,DL        DC2
 T63D223  IDT    0,DL        DC3
 T63D224  IDT    0,DL        DC4
 T63D225  IDT    0,DL        NAK
 T63D226  IDT    0,DL        SYN
 T63D227  IDT    0,DL        ETB
 T63D230  IDT    0,DL        CAN
 T63D231  IDT    0,DL        EM 
 T63D232  IDT    0,DL        SUB
 T63D233  IDT    0,DL        ESC
 T63D234  IDT    0,DL        FS 
 T63D235  IDT    0,DL        GS 
 T63D236  IDT    0,DL        RS 
 T63D237  IDT    0,DL        US 
 T63D240  IDT    55          BLANK
 T63D241  IDT    66          !
 T63D242  IDT    64          "
 T63D243  IDT    60          #
 T63D244  IDT    53          $
 T63D245  IDT    55          BLANK
 T63D246  IDT    67          &
 T63D247  IDT    70          '
 T63D250  IDT    51          (
 T63D251  IDT    52          )
 T63D252  IDT    47          *
 T63D253  IDT    45          +
 T63D254  IDT    56          ,
 T63D255  IDT    46          -
 T63D256  IDT    57          .
 T63D257  IDT    50          /
 T63D260  IDT    33          0
 T63D261  IDT    34          1
 T63D262  IDT    35          2
 T63D263  IDT    36          3
 T63D264  IDT    37          4
 T63D265  IDT    40          5
 T63D266  IDT    41          6
 T63D267  IDT    42          7
 T63D270  IDT    43          8
 T63D271  IDT    44          9
 T63D272  IDT    63          :  
 T63D273  IDT    77          ;
 T63D274  IDT    72          <
 T63D275  IDT    54          =
 T63D276  IDT    73          >
 T63D277  IDT    71          ?
  
 T63D300  IDT    74 
 T63D301  IDT    01          A
 T63D302  IDT    02          B
 T63D303  IDT    03          C
 T63D304  IDT    04          D
 T63D305  IDT    05          E
 T63D306  IDT    06          F
 T63D307  IDT    07          G
 T63D310  IDT    10          H
 T63D311  IDT    11          I
 T63D312  IDT    12          J
 T63D313  IDT    13          K
 T63D314  IDT    14          L
 T63D315  IDT    15          M
 T63D316  IDT    16          N
 T63D317  IDT    17          O
 T63D320  IDT    20          P
 T63D321  IDT    21          Q
 T63D322  IDT    22          R
 T63D323  IDT    23          S
 T63D324  IDT    24          T
 T63D325  IDT    25          U
 T63D326  IDT    26          V
 T63D327  IDT    27          W
 T63D330  IDT    30          X
 T63D331  IDT    31          Y
 T63D332  IDT    32          Z
 T63D333  IDT    61          [
 T63D334  IDT    75          \
 T63D335  IDT    62          ]
 T63D336  IDT    76 
 T63D337  IDT    65          _
 T63D340  IDT    74 
 T63D341  IDT    01          A
 T63D342  IDT    02          B
 T63D343  IDT    03          C
 T63D344  IDT    04          D
 T63D345  IDT    05          E
 T63D346  IDT    06          F
 T63D347  IDT    07          G
 T63D350  IDT    10          H
 T63D351  IDT    11          I
 T63D352  IDT    12          J
 T63D353  IDT    13          K
 T63D354  IDT    14          L
 T63D355  IDT    15          M
 T63D356  IDT    16          N
 T63D357  IDT    17          O
 T63D360  IDT    20          P
 T63D361  IDT    21          Q
 T63D362  IDT    22          R
 T63D363  IDT    23          S
 T63D364  IDT    24          T
 T63D365  IDT    25          U
 T63D366  IDT    26          V
 T63D367  IDT    27          W
 T63D370  IDT    30          X
 T63D371  IDT    31          Y
 T63D372  IDT    32          Z
 T63D373  IDT    61          [
 T63D374  IDT    75          \
 T63D375  IDT    62          ]
 T63D376  IDT    76 
 T63D377  IDT    0,DL 
          SPACE  4,10 
**        SYMBOLS FOR ASCII 6/12 CODE BASED ON 64 CHARACTER SET.
* 
*         CONVERSION TO 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 F64A000  IDT    72          :  
 F64A001  IDT    101         A
 F64A002  IDT    102         B
 F64A003  IDT    103         C
 F64A004  IDT    104         D
 F64A005  IDT    105         E
 F64A006  IDT    106         F
 F64A007  IDT    107         G
 F64A010  IDT    110         H
 F64A011  IDT    111         I
 F64A012  IDT    112         J
 F64A013  IDT    113         K
 F64A014  IDT    114         L
 F64A015  IDT    115         M
 F64A016  IDT    116         N
 F64A017  IDT    117         O
 F64A020  IDT    120         P
 F64A021  IDT    121         Q
 F64A022  IDT    122         R
 F64A023  IDT    123         S
 F64A024  IDT    124         T
 F64A025  IDT    125         U
 F64A026  IDT    126         V
 F64A027  IDT    127         W
 F64A030  IDT    130         X
 F64A031  IDT    131         Y
 F64A032  IDT    132         Z
 F64A033  IDT    60          0
 F64A034  IDT    61          1
 F64A035  IDT    62          2
 F64A036  IDT    63          3
 F64A037  IDT    64          4
 F64A040  IDT    65          5
 F64A041  IDT    66          6
 F64A042  IDT    67          7
 F64A043  IDT    70          8
 F64A044  IDT    71          9
 F64A045  IDT    53          +
 F64A046  IDT    55          -
 F64A047  IDT    52          *
 F64A050  IDT    57          /
 F64A051  IDT    50          (
 F64A052  IDT    51          )
 F64A053  IDT    44          $
 F64A054  IDT    75          =
 F64A055  IDT    40          BLANK
 F64A056  IDT    54          ,
 F64A057  IDT    56          .
 F64A060  IDT    43          #
 F64A061  IDT    133         [
 F64A062  IDT    135         ]
 F64A063  IDT    45          %
 F64A064  IDT    42          "
 F64A065  IDT    137         _
 F64A066  IDT    41          !
 F64A067  IDT    46          &
 F64A070  IDT    47          '
 F64A071  IDT    77          ?
 F64A072  IDT    74          <
 F64A073  IDT    76          >
 F64A074  IDT    200,SO 
 F64A075  IDT    134         \
 F64A076  IDT    300,SO 
 F64A077  IDT    73          ;
  
 X        SET    100
          DUP    100,3       NEXT 100 SYMBOLS HAVE IDENTICAL VALUES 
 C        OCTMIC X,3
 F64A"C"  IDT    1,DL 
 X        SET    X+1
  
 F64A200  IDT    1,DL 
 F64A201  IDT    100
 F64A202  IDT    136
 F64A203  IDT    1,DL 
 F64A204  IDT    72          :  
 F64A205  IDT    1,DL 
 F64A206  IDT    1,DL 
 F64A207  IDT    140
  
 X        SET    210
          DUP    70,3        NEXT 70 SYMBOLS HAVE IDENTICAL VALUES
 C        OCTMIC X,3
 F64A"C"  IDT    1,DL 
 X        SET    X+1
  
 F64A300  IDT    1,DL 
 F64A301  IDT    141         A
 F64A302  IDT    142         B
 F64A303  IDT    143         C
 F64A304  IDT    144         D
 F64A305  IDT    145         E
 F64A306  IDT    146         F
 F64A307  IDT    147         G
 F64A310  IDT    150         H
 F64A311  IDT    151         I
 F64A312  IDT    152         J
 F64A313  IDT    153         K
 F64A314  IDT    154         L
 F64A315  IDT    155         M
 F64A316  IDT    156         N
 F64A317  IDT    157         O
 F64A320  IDT    160         P
 F64A321  IDT    161         Q
 F64A322  IDT    162         R
 F64A323  IDT    163         S
 F64A324  IDT    164         T
 F64A325  IDT    165         U
 F64A326  IDT    166         V
 F64A327  IDT    167         W
 F64A330  IDT    170         X
 F64A331  IDT    171         Y
 F64A332  IDT    172         Z
 F64A333  IDT    173         L BRACE
 F64A334  IDT    174         V LINE 
 F64A335  IDT    175         R BRACE
 F64A336  IDT    176         TILDE
 F64A337  IDT    177         DEL
 F64A340  IDT    4000        NULL 
 F64A341  IDT    01          SOH
 F64A342  IDT    02          STX
 F64A343  IDT    03          ETX
 F64A344  IDT    04          EOT
 F64A345  IDT    05          ENQ
 F64A346  IDT    06          ACK
 F64A347  IDT    07          BEL
 F64A350  IDT    10          BS 
 F64A351  IDT    11          HT 
 F64A352  IDT    12          LF 
 F64A353  IDT    13          VT 
 F64A354  IDT    14          FF 
 F64A355  IDT    15          CR 
 F64A356  IDT    16          SO 
 F64A357  IDT    17          SI 
 F64A360  IDT    20          DLE
 F64A361  IDT    21          DC1
 F64A362  IDT    22          DC2
 F64A363  IDT    23          DC3
 F64A364  IDT    24          DC4
 F64A365  IDT    25          NAK
 F64A366  IDT    26          SYN
 F64A367  IDT    27          ETB
 F64A370  IDT    30          CAN
 F64A371  IDT    31          EM 
 F64A372  IDT    32          SUB
 F64A373  IDT    33          ESC
 F64A374  IDT    34          FS 
 F64A375  IDT    35          GS 
 F64A376  IDT    36          RS 
 F64A377  IDT    37          US 
          SPACE  4,10 
**        SYMBOLS FOR ASCII 6/12 CODE BASED ON 64 CHARACTER SET.
* 
*         CONVERSION FROM 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 T64A000  IDT    7640,DB     NUL
 T64A001  IDT    7641,DB     SOH
 T64A002  IDT    7642,DB     STX
 T64A003  IDT    7643,DB     ETX
 T64A004  IDT    7644,DB     EOT
 T64A005  IDT    7645,DB     ENQ
 T64A006  IDT    7646,DB     ACK
 T64A007  IDT    7647,DB     BEL
 T64A010  IDT    7650,DB     BS 
 T64A011  IDT    7651,DB     HT 
 T64A012  IDT    7652,DB     LF 
 T64A013  IDT    7653,DB     VT 
 T64A014  IDT    7654,DB     FF 
 T64A015  IDT    7655,DB     CR 
 T64A016  IDT    7656,DB     SO 
 T64A017  IDT    7657,DB     SI 
 T64A020  IDT    7660,DB     DLE
 T64A021  IDT    7661,DB     DC1
 T64A022  IDT    7662,DB     DC2
 T64A023  IDT    7663,DB     DC3
 T64A024  IDT    7664,DB     DC4
 T64A025  IDT    7665,DB     NAK
 T64A026  IDT    7666,DB     SYN
 T64A027  IDT    7667,DB     ETB
 T64A030  IDT    7670,DB     CAN
 T64A031  IDT    7671,DB     EM 
 T64A032  IDT    7672,DB     SUB
 T64A033  IDT    7673,DB     ESC
 T64A034  IDT    7674,DB     FS 
 T64A035  IDT    7675,DB     GS 
 T64A036  IDT    7676,DB     RS 
 T64A037  IDT    7677,DB     US 
 T64A040  IDT    55          BLANK
 T64A041  IDT    66          !
 T64A042  IDT    64          "
 T64A043  IDT    60          #
 T64A044  IDT    53          $
 T64A045  IDT    63          %
 T64A046  IDT    67          &
 T64A047  IDT    70          '
 T64A050  IDT    51          (
 T64A051  IDT    52          )
 T64A052  IDT    47          *
 T64A053  IDT    45          +
 T64A054  IDT    56          ,
 T64A055  IDT    46          -
 T64A056  IDT    57          .
 T64A057  IDT    50          /
 T64A060  IDT    33          0
 T64A061  IDT    34          1
 T64A062  IDT    35          2
 T64A063  IDT    36          3
 T64A064  IDT    37          4
 T64A065  IDT    40          5
 T64A066  IDT    41          6
 T64A067  IDT    42          7
 T64A070  IDT    43          8
 T64A071  IDT    44          9
 T64A072  IDT    7404,DB     :  
 T64A073  IDT    77          ;
 T64A074  IDT    72          <
 T64A075  IDT    54          =
 T64A076  IDT    73          >
 T64A077  IDT    71          ?
  
 T64A100  IDT    7401,DB
 T64A101  IDT    01          A
 T64A102  IDT    02          B
 T64A103  IDT    03          C
 T64A104  IDT    04          D
 T64A105  IDT    05          E
 T64A106  IDT    06          F
 T64A107  IDT    07          G
 T64A110  IDT    10          H
 T64A111  IDT    11          I
 T64A112  IDT    12          J
 T64A113  IDT    13          K
 T64A114  IDT    14          L
 T64A115  IDT    15          M
 T64A116  IDT    16          N
 T64A117  IDT    17          O
 T64A120  IDT    20          P
 T64A121  IDT    21          Q
 T64A122  IDT    22          R
 T64A123  IDT    23          S
 T64A124  IDT    24          T
 T64A125  IDT    25          U
 T64A126  IDT    26          V
 T64A127  IDT    27          W
 T64A130  IDT    30          X
 T64A131  IDT    31          Y
 T64A132  IDT    32          Z
 T64A133  IDT    61          [
 T64A134  IDT    75          \
 T64A135  IDT    62          ]
 T64A136  IDT    7402,DB
 T64A137  IDT    65          _
 T64A140  IDT    7407,DB
 T64A141  IDT    7601,DB     A
 T64A142  IDT    7602,DB     B
 T64A143  IDT    7603,DB     C
 T64A144  IDT    7604,DB     D
 T64A145  IDT    7605,DB     E
 T64A146  IDT    7606,DB     F
 T64A147  IDT    7607,DB     G
 T64A150  IDT    7610,DB     H
 T64A151  IDT    7611,DB     I
 T64A152  IDT    7612,DB     J
 T64A153  IDT    7613,DB     K
 T64A154  IDT    7614,DB     L
 T64A155  IDT    7615,DB     M
 T64A156  IDT    7616,DB     N
 T64A157  IDT    7617,DB     O
 T64A160  IDT    7620,DB     P
 T64A161  IDT    7621,DB     Q
 T64A162  IDT    7622,DB     R
 T64A163  IDT    7623,DB     S
 T64A164  IDT    7624,DB     T
 T64A165  IDT    7625,DB     U
 T64A166  IDT    7626,DB     V
 T64A167  IDT    7627,DB     W
 T64A170  IDT    7630,DB     X
 T64A171  IDT    7631,DB     Y
 T64A172  IDT    7632,DB     Z
 T64A173  IDT    7633,DB     L BRACE
 T64A174  IDT    7634,DB     V LINE 
 T64A175  IDT    7635,DB     R BRACE
 T64A176  IDT    7636,DB     TILDE
 T64A177  IDT    7637,DB     DEL
  
 T64A200  IDT    7640,DB     NUL
 T64A201  IDT    7641,DB     SOH
 T64A202  IDT    7642,DB     STX
 T64A203  IDT    7643,DB     ETX
 T64A204  IDT    7644,DB     EOT
 T64A205  IDT    7645,DB     ENQ
 T64A206  IDT    7646,DB     ACK
 T64A207  IDT    7647,DB     BEL
 T64A210  IDT    7650,DB     BS 
 T64A211  IDT    7651,DB     HT 
 T64A212  IDT    7652,DB     LF 
 T64A213  IDT    7653,DB     VT 
 T64A214  IDT    7654,DB     FF 
 T64A215  IDT    7655,DB     CR 
 T64A216  IDT    7656,DB     SO 
 T64A217  IDT    7657,DB     SI 
 T64A220  IDT    7660,DB     DLE
 T64A221  IDT    7661,DB     DC1
 T64A222  IDT    7662,DB     DC2
 T64A223  IDT    7663,DB     DC3
 T64A224  IDT    7664,DB     DC4
 T64A225  IDT    7665,DB     NAK
 T64A226  IDT    7666,DB     SYN
 T64A227  IDT    7667,DB     ETB
 T64A230  IDT    7670,DB     CAN
 T64A231  IDT    7671,DB     EM 
 T64A232  IDT    7672,DB     SUB
 T64A233  IDT    7673,DB     ESC
 T64A234  IDT    7674,DB     FS 
 T64A235  IDT    7675,DB     GS 
 T64A236  IDT    7676,DB     RS 
 T64A237  IDT    7677,DB     US 
 T64A240  IDT    55          BLANK
 T64A241  IDT    66          !
 T64A242  IDT    64          "
 T64A243  IDT    60          #
 T64A244  IDT    53          $
 T64A245  IDT    63          %
 T64A246  IDT    67          &
 T64A247  IDT    70          '
 T64A250  IDT    51          (
 T64A251  IDT    52          )
 T64A252  IDT    47          *
 T64A253  IDT    45          +
 T64A254  IDT    56          ,
 T64A255  IDT    46          -
 T64A256  IDT    57          .
 T64A257  IDT    50          /
 T64A260  IDT    33          0
 T64A261  IDT    34          1
 T64A262  IDT    35          2
 T64A263  IDT    36          3
 T64A264  IDT    37          4
 T64A265  IDT    40          5
 T64A266  IDT    41          6
 T64A267  IDT    42          7
 T64A270  IDT    43          8
 T64A271  IDT    44          9
 T64A272  IDT    7404,DB     :  
 T64A273  IDT    77          ;
 T64A274  IDT    72          <
 T64A275  IDT    54          =
 T64A276  IDT    73          >
 T64A277  IDT    71          ?
  
 T64A300  IDT    7401,DB
 T64A301  IDT    01          A
 T64A302  IDT    02          B
 T64A303  IDT    03          C
 T64A304  IDT    04          D
 T64A305  IDT    05          E
 T64A306  IDT    06          F
 T64A307  IDT    07          G
 T64A310  IDT    10          H
 T64A311  IDT    11          I
 T64A312  IDT    12          J
 T64A313  IDT    13          K
 T64A314  IDT    14          L
 T64A315  IDT    15          M
 T64A316  IDT    16          N
 T64A317  IDT    17          O
 T64A320  IDT    20          P
 T64A321  IDT    21          Q
 T64A322  IDT    22          R
 T64A323  IDT    23          S
 T64A324  IDT    24          T
 T64A325  IDT    25          U
 T64A326  IDT    26          V
 T64A327  IDT    27          W
 T64A330  IDT    30          X
 T64A331  IDT    31          Y
 T64A332  IDT    32          Z
 T64A333  IDT    61          [
 T64A334  IDT    75          \
 T64A335  IDT    62          ]
 T64A336  IDT    7402,DB
 T64A337  IDT    65          _
 T64A340  IDT    7407,DB
 T64A341  IDT    7601,DB     A
 T64A342  IDT    7602,DB     B
 T64A343  IDT    7603,DB     C
 T64A344  IDT    7604,DB     D
 T64A345  IDT    7605,DB     E
 T64A346  IDT    7606,DB     F
 T64A347  IDT    7607,DB     G
 T64A350  IDT    7610,DB     H
 T64A351  IDT    7611,DB     I
 T64A352  IDT    7612,DB     J
 T64A353  IDT    7613,DB     K
 T64A354  IDT    7614,DB     L
 T64A355  IDT    7615,DB     M
 T64A356  IDT    7616,DB     N
 T64A357  IDT    7617,DB     O
 T64A360  IDT    7620,DB     P
 T64A361  IDT    7621,DB     Q
 T64A362  IDT    7622,DB     R
 T64A363  IDT    7623,DB     S
 T64A364  IDT    7624,DB     T
 T64A365  IDT    7625,DB     U
 T64A366  IDT    7626,DB     V
 T64A367  IDT    7627,DB     W
 T64A370  IDT    7630,DB     X
 T64A371  IDT    7631,DB     Y
 T64A372  IDT    7632,DB     Z
 T64A373  IDT    7633,DB     L BRACE
 T64A374  IDT    7634,DB     V LINE 
 T64A375  IDT    7635,DB     R BRACE
 T64A376  IDT    7636,DB     TILDE
 T64A377  IDT    7637,DB     DEL
          SPACE  4,10 
**        SYMBOLS FOR ASCII 6/12 CODE BASED ON 63 CHARACTER SET.
* 
*         CONVERSION TO 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 F63A000  IDT    1,DL 
 F63A001  IDT    101         A
 F63A002  IDT    102         B
 F63A003  IDT    103         C
 F63A004  IDT    104         D
 F63A005  IDT    105         E
 F63A006  IDT    106         F
 F63A007  IDT    107         G
 F63A010  IDT    110         H
 F63A011  IDT    111         I
 F63A012  IDT    112         J
 F63A013  IDT    113         K
 F63A014  IDT    114         L
 F63A015  IDT    115         M
 F63A016  IDT    116         N
 F63A017  IDT    117         O
 F63A020  IDT    120         P
 F63A021  IDT    121         Q
 F63A022  IDT    122         R
 F63A023  IDT    123         S
 F63A024  IDT    124         T
 F63A025  IDT    125         U
 F63A026  IDT    126         V
 F63A027  IDT    127         W
 F63A030  IDT    130         X
 F63A031  IDT    131         Y
 F63A032  IDT    132         Z
 F63A033  IDT    60          0
 F63A034  IDT    61          1
 F63A035  IDT    62          2
 F63A036  IDT    63          3
 F63A037  IDT    64          4
 F63A040  IDT    65          5
 F63A041  IDT    66          6
 F63A042  IDT    67          7
 F63A043  IDT    70          8
 F63A044  IDT    71          9
 F63A045  IDT    53          +
 F63A046  IDT    55          -
 F63A047  IDT    52          *
 F63A050  IDT    57          /
 F63A051  IDT    50          (
 F63A052  IDT    51          )
 F63A053  IDT    44          $
 F63A054  IDT    75          =
 F63A055  IDT    40          BLANK
 F63A056  IDT    54          ,
 F63A057  IDT    56          .
 F63A060  IDT    43          #
 F63A061  IDT    133         [
 F63A062  IDT    135         ]
 F63A063  IDT    72          :  
 F63A064  IDT    42          "
 F63A065  IDT    137         _
 F63A066  IDT    41          !
 F63A067  IDT    46          &
 F63A070  IDT    47          '
 F63A071  IDT    77          ?
 F63A072  IDT    74          <
 F63A073  IDT    76          >
 F63A074  IDT    200,SO 
 F63A075  IDT    134         \
 F63A076  IDT    300,SO 
 F63A077  IDT    73          ;
  
 X        SET    100
          DUP    100,3       NEXT 100 SYMBOLS HAVE IDENTICAL VALUES 
 C        OCTMIC X,3
 F63A"C"  IDT    1,DL 
 X        SET    X+1
  
 F63A200  IDT    1,DL 
 F63A201  IDT    100
 F63A202  IDT    136
 F63A203  IDT    1,DL 
 F63A204  IDT    45          %
 F63A205  IDT    1,DL 
 F63A206  IDT    1,DL 
 F63A207  IDT    140
  
 X        SET    210
          DUP    70,3        NEXT 70 SYMBOLS HAVE IDENTICAL VALUES
 C        OCTMIC X,3
 F63A"C"  IDT    1,DL 
 X        SET    X+1
  
 F63A300  IDT    1,DL 
 F63A301  IDT    141         A
 F63A302  IDT    142         B
 F63A303  IDT    143         C
 F63A304  IDT    144         D
 F63A305  IDT    145         E
 F63A306  IDT    146         F
 F63A307  IDT    147         G
 F63A310  IDT    150         H
 F63A311  IDT    151         I
 F63A312  IDT    152         J
 F63A313  IDT    153         K
 F63A314  IDT    154         L
 F63A315  IDT    155         M
 F63A316  IDT    156         N
 F63A317  IDT    157         O
 F63A320  IDT    160         P
 F63A321  IDT    161         Q
 F63A322  IDT    162         R
 F63A323  IDT    163         S
 F63A324  IDT    164         T
 F63A325  IDT    165         U
 F63A326  IDT    166         V
 F63A327  IDT    167         W
 F63A330  IDT    170         X
 F63A331  IDT    171         Y
 F63A332  IDT    172         Z
 F63A333  IDT    173         L BRACE
 F63A334  IDT    174         V LINE 
 F63A335  IDT    175         R BRACE
 F63A336  IDT    176         TILDE
 F63A337  IDT    177         DEL
 F63A340  IDT    4000        NULL 
 F63A341  IDT    01          SOH
 F63A342  IDT    02          STX
 F63A343  IDT    03          ETX
 F63A344  IDT    04          EOT
 F63A345  IDT    05          ENQ
 F63A346  IDT    06          ACK
 F63A347  IDT    07          BEL
 F63A350  IDT    10          BS 
 F63A351  IDT    11          HT 
 F63A352  IDT    12          LF 
 F63A353  IDT    13          VT 
 F63A354  IDT    14          FF 
 F63A355  IDT    15          CR 
 F63A356  IDT    16          SO 
 F63A357  IDT    17          SI 
 F63A360  IDT    20          DLE
 F63A361  IDT    21          DC1
 F63A362  IDT    22          DC2
 F63A363  IDT    23          DC3
 F63A364  IDT    24          DC4
 F63A365  IDT    25          NAK
 F63A366  IDT    26          SYN
 F63A367  IDT    27          ETB
 F63A370  IDT    30          CAN
 F63A371  IDT    31          EM 
 F63A372  IDT    32          SUB
 F63A373  IDT    33          ESC
 F63A374  IDT    34          FS 
 F63A375  IDT    35          GS 
 F63A376  IDT    36          RS 
 F63A377  IDT    37          US 
          SPACE  4,10 
**        SYMBOLS FOR ASCII 6/12 CODE BASED ON 63 CHARACTER SET.
* 
*         CONVERSION FROM 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 T63A000  IDT    7640,DB     NUL
 T63A001  IDT    7641,DB     SOH
 T63A002  IDT    7642,DB     STX
 T63A003  IDT    7643,DB     ETX
 T63A004  IDT    7644,DB     EOT
 T63A005  IDT    7645,DB     ENQ
 T63A006  IDT    7646,DB     ACK
 T63A007  IDT    7647,DB     BEL
 T63A010  IDT    7650,DB     BS 
 T63A011  IDT    7651,DB     HT 
 T63A012  IDT    7652,DB     LF 
 T63A013  IDT    7653,DB     VT 
 T63A014  IDT    7654,DB     FF 
 T63A015  IDT    7655,DB     CR 
 T63A016  IDT    7656,DB     SO 
 T63A017  IDT    7657,DB     SI 
 T63A020  IDT    7660,DB     DLE
 T63A021  IDT    7661,DB     DC1
 T63A022  IDT    7662,DB     DC2
 T63A023  IDT    7663,DB     DC3
 T63A024  IDT    7664,DB     DC4
 T63A025  IDT    7665,DB     NAK
 T63A026  IDT    7666,DB     SYN
 T63A027  IDT    7667,DB     ETB
 T63A030  IDT    7670,DB     CAN
 T63A031  IDT    7671,DB     EM 
 T63A032  IDT    7672,DB     SUB
 T63A033  IDT    7673,DB     ESC
 T63A034  IDT    7674,DB     FS 
 T63A035  IDT    7675,DB     GS 
 T63A036  IDT    7676,DB     RS 
 T63A037  IDT    7677,DB     US 
 T63A040  IDT    55          BLANK
 T63A041  IDT    66          !
 T63A042  IDT    64          "
 T63A043  IDT    60          #
 T63A044  IDT    53          $
 T63A045  IDT    7404,DB     %
 T63A046  IDT    67          &
 T63A047  IDT    70          '
 T63A050  IDT    51          (
 T63A051  IDT    52          )
 T63A052  IDT    47          *
 T63A053  IDT    45          +
 T63A054  IDT    56          ,
 T63A055  IDT    46          -
 T63A056  IDT    57          .
 T63A057  IDT    50          /
 T63A060  IDT    33          0
 T63A061  IDT    34          1
 T63A062  IDT    35          2
 T63A063  IDT    36          3
 T63A064  IDT    37          4
 T63A065  IDT    40          5
 T63A066  IDT    41          6
 T63A067  IDT    42          7
 T63A070  IDT    43          8
 T63A071  IDT    44          9
 T63A072  IDT    63          :  
 T63A073  IDT    77          ;
 T63A074  IDT    72          <
 T63A075  IDT    54          =
 T63A076  IDT    73          >
 T63A077  IDT    71          ?
  
 T63A100  IDT    7401,DB
 T63A101  IDT    01          A
 T63A102  IDT    02          B
 T63A103  IDT    03          C
 T63A104  IDT    04          D
 T63A105  IDT    05          E
 T63A106  IDT    06          F
 T63A107  IDT    07          G
 T63A110  IDT    10          H
 T63A111  IDT    11          I
 T63A112  IDT    12          J
 T63A113  IDT    13          K
 T63A114  IDT    14          L
 T63A115  IDT    15          M
 T63A116  IDT    16          N
 T63A117  IDT    17          O
 T63A120  IDT    20          P
 T63A121  IDT    21          Q
 T63A122  IDT    22          R
 T63A123  IDT    23          S
 T63A124  IDT    24          T
 T63A125  IDT    25          U
 T63A126  IDT    26          V
 T63A127  IDT    27          W
 T63A130  IDT    30          X
 T63A131  IDT    31          Y
 T63A132  IDT    32          Z
 T63A133  IDT    61          [
 T63A134  IDT    75          \
 T63A135  IDT    62          ]
 T63A136  IDT    7402,DB
 T63A137  IDT    65          _
 T63A140  IDT    7407,DB
 T63A141  IDT    7601,DB     A
 T63A142  IDT    7602,DB     B
 T63A143  IDT    7603,DB     C
 T63A144  IDT    7604,DB     D
 T63A145  IDT    7605,DB     E
 T63A146  IDT    7606,DB     F
 T63A147  IDT    7607,DB     G
 T63A150  IDT    7610,DB     H
 T63A151  IDT    7611,DB     I
 T63A152  IDT    7612,DB     J
 T63A153  IDT    7613,DB     K
 T63A154  IDT    7614,DB     L
 T63A155  IDT    7615,DB     M
 T63A156  IDT    7616,DB     N
 T63A157  IDT    7617,DB     O
 T63A160  IDT    7620,DB     P
 T63A161  IDT    7621,DB     Q
 T63A162  IDT    7622,DB     R
 T63A163  IDT    7623,DB     S
 T63A164  IDT    7624,DB     T
 T63A165  IDT    7625,DB     U
 T63A166  IDT    7626,DB     V
 T63A167  IDT    7627,DB     W
 T63A170  IDT    7630,DB     X
 T63A171  IDT    7631,DB     Y
 T63A172  IDT    7632,DB     Z
 T63A173  IDT    7633,DB     L BRACE
 T63A174  IDT    7634,DB     V LINE 
 T63A175  IDT    7635,DB     R BRACE
 T63A176  IDT    7636,DB     TILDE
 T63A177  IDT    7637,DB     DEL
  
 T63A200  IDT    7640,DB     NUL
 T63A201  IDT    7641,DB     SOH
 T63A202  IDT    7642,DB     STX
 T63A203  IDT    7643,DB     ETX
 T63A204  IDT    7644,DB     EOT
 T63A205  IDT    7645,DB     ENQ
 T63A206  IDT    7646,DB     ACK
 T63A207  IDT    7647,DB     BEL
 T63A210  IDT    7650,DB     BS 
 T63A211  IDT    7651,DB     HT 
 T63A212  IDT    7652,DB     LF 
 T63A213  IDT    7653,DB     VT 
 T63A214  IDT    7654,DB     FF 
 T63A215  IDT    7655,DB     CR 
 T63A216  IDT    7656,DB     SO 
 T63A217  IDT    7657,DB     SI 
 T63A220  IDT    7660,DB     DLE
 T63A221  IDT    7661,DB     DC1
 T63A222  IDT    7662,DB     DC2
 T63A223  IDT    7663,DB     DC3
 T63A224  IDT    7664,DB     DC4
 T63A225  IDT    7665,DB     NAK
 T63A226  IDT    7666,DB     SYN
 T63A227  IDT    7667,DB     ETB
 T63A230  IDT    7670,DB     CAN
 T63A231  IDT    7671,DB     EM 
 T63A232  IDT    7672,DB     SUB
 T63A233  IDT    7673,DB     ESC
 T63A234  IDT    7674,DB     FS 
 T63A235  IDT    7675,DB     GS 
 T63A236  IDT    7676,DB     RS 
 T63A237  IDT    7677,DB     US 
 T63A240  IDT    55          BLANK
 T63A241  IDT    66          !
 T63A242  IDT    64          "
 T63A243  IDT    60          #
 T63A244  IDT    53          $
 T63A245  IDT    7404,DB     %
 T63A246  IDT    67          &
 T63A247  IDT    70          '
 T63A250  IDT    51          (
 T63A251  IDT    52          )
 T63A252  IDT    47          *
 T63A253  IDT    45          +
 T63A254  IDT    56          ,
 T63A255  IDT    46          -
 T63A256  IDT    57          .
 T63A257  IDT    50          /
 T63A260  IDT    33          0
 T63A261  IDT    34          1
 T63A262  IDT    35          2
 T63A263  IDT    36          3
 T63A264  IDT    37          4
 T63A265  IDT    40          5
 T63A266  IDT    41          6
 T63A267  IDT    42          7
 T63A270  IDT    43          8
 T63A271  IDT    44          9
 T63A272  IDT    63          :  
 T63A273  IDT    77          ;
 T63A274  IDT    72          <
 T63A275  IDT    54          =
 T63A276  IDT    73          >
 T63A277  IDT    71          ?
  
 T63A300  IDT    7401,DB
 T63A301  IDT    01          A
 T63A302  IDT    02          B
 T63A303  IDT    03          C
 T63A304  IDT    04          D
 T63A305  IDT    05          E
 T63A306  IDT    06          F
 T63A307  IDT    07          G
 T63A310  IDT    10          H
 T63A311  IDT    11          I
 T63A312  IDT    12          J
 T63A313  IDT    13          K
 T63A314  IDT    14          L
 T63A315  IDT    15          M
 T63A316  IDT    16          N
 T63A317  IDT    17          O
 T63A320  IDT    20          P
 T63A321  IDT    21          Q
 T63A322  IDT    22          R
 T63A323  IDT    23          S
 T63A324  IDT    24          T
 T63A325  IDT    25          U
 T63A326  IDT    26          V
 T63A327  IDT    27          W
 T63A330  IDT    30          X
 T63A331  IDT    31          Y
 T63A332  IDT    32          Z
 T63A333  IDT    61          [
 T63A334  IDT    75          \
 T63A335  IDT    62          ]
 T63A336  IDT    7402,DB
 T63A337  IDT    65          _
 T63A340  IDT    7407,DB
 T63A341  IDT    7601,DB     A
 T63A342  IDT    7602,DB     B
 T63A343  IDT    7603,DB     C
 T63A344  IDT    7604,DB     D
 T63A345  IDT    7605,DB     E
 T63A346  IDT    7606,DB     F
 T63A347  IDT    7607,DB     G
 T63A350  IDT    7610,DB     H
 T63A351  IDT    7611,DB     I
 T63A352  IDT    7612,DB     J
 T63A353  IDT    7613,DB     K
 T63A354  IDT    7614,DB     L
 T63A355  IDT    7615,DB     M
 T63A356  IDT    7616,DB     N
 T63A357  IDT    7617,DB     O
 T63A360  IDT    7620,DB     P
 T63A361  IDT    7621,DB     Q
 T63A362  IDT    7622,DB     R
 T63A363  IDT    7623,DB     S
 T63A364  IDT    7624,DB     T
 T63A365  IDT    7625,DB     U
 T63A366  IDT    7626,DB     V
 T63A367  IDT    7627,DB     W
 T63A370  IDT    7630,DB     X
 T63A371  IDT    7631,DB     Y
 T63A372  IDT    7632,DB     Z
 T63A373  IDT    7633,DB     L BRACE
 T63A374  IDT    7634,DB     V LINE 
 T63A375  IDT    7635,DB     R BRACE
 T63A376  IDT    7636,DB     TILDE
 T63A377  IDT    7637,DB     DEL
          SPACE  4,10 
**        SYMBOLS FOR 7 BIT SUBSET OF 8 BIT ASCII.
* 
*         CONVERSION FROM 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 T8AS000  IDT   4000         NUL
 T8AS001  IDT    001         SOH
 T8AS002  IDT    002         STX
 T8AS003  IDT    003         ETX
 T8AS004  IDT    004         EOT
 T8AS005  IDT    005         ENQ
 T8AS006  IDT    006         ACK
 T8AS007  IDT    007         BEL
 T8AS010  IDT    010         BS 
 T8AS011  IDT    011         HT 
 T8AS012  IDT    012         LF 
 T8AS013  IDT    013         VT 
 T8AS014  IDT    014         FF 
 T8AS015  IDT    015         CR 
 T8AS016  IDT    016         SO 
 T8AS017  IDT    017         SI 
 T8AS020  IDT    020         DLE
 T8AS021  IDT    021         DC1
 T8AS022  IDT    022         DC2
 T8AS023  IDT    023         DC3
 T8AS024  IDT    024         DC4
 T8AS025  IDT    025         NAK
 T8AS026  IDT    026         SYN
 T8AS027  IDT    027         ETB
 T8AS030  IDT    030         CAN
 T8AS031  IDT    031         EM 
 T8AS032  IDT    032         SUB
 T8AS033  IDT    033         ESC
 T8AS034  IDT    034         FS 
 T8AS035  IDT    035         GS 
 T8AS036  IDT    036         RS 
 T8AS037  IDT    037         US 
 T8AS040  IDT    040         BLANK
 T8AS041  IDT    041         !
 T8AS042  IDT    042         "
 T8AS043  IDT    043         #
 T8AS044  IDT    044         $
 T8AS045  IDT    045         %
 T8AS046  IDT    046         &
 T8AS047  IDT    047         '
 T8AS050  IDT    050         (
 T8AS051  IDT    051         )
 T8AS052  IDT    052         *
 T8AS053  IDT    053         +
 T8AS054  IDT    054         ,
 T8AS055  IDT    055         -
 T8AS056  IDT    056         .
 T8AS057  IDT    057         /
 T8AS060  IDT    060         0
 T8AS061  IDT    061         1
 T8AS062  IDT    062         2
 T8AS063  IDT    063         3
 T8AS064  IDT    064         4
 T8AS065  IDT    065         5
 T8AS066  IDT    066         6
 T8AS067  IDT    067         7
 T8AS070  IDT    070         8
 T8AS071  IDT    071         9
 T8AS072  IDT    072         :  
 T8AS073  IDT    073         ;
 T8AS074  IDT    074         <
 T8AS075  IDT    075         =
 T8AS076  IDT    076         >
 T8AS077  IDT    077         ?
  
 T8AS100  IDT    100
 T8AS101  IDT    101         A
 T8AS102  IDT    102         B
 T8AS103  IDT    103         C
 T8AS104  IDT    104         D
 T8AS105  IDT    105         E
 T8AS106  IDT    106         F
 T8AS107  IDT    107         G
 T8AS110  IDT    110         H
 T8AS111  IDT    111         I
 T8AS112  IDT    112         J
 T8AS113  IDT    113         K
 T8AS114  IDT    114         L
 T8AS115  IDT    115         M
 T8AS116  IDT    116         N
 T8AS117  IDT    117         O
 T8AS120  IDT    120         P
 T8AS121  IDT    121         Q
 T8AS122  IDT    122         R
 T8AS123  IDT    123         S
 T8AS124  IDT    124         T
 T8AS125  IDT    125         U
 T8AS126  IDT    126         V
 T8AS127  IDT    127         W
 T8AS130  IDT    130         X
 T8AS131  IDT    131         Y
 T8AS132  IDT    132         Z
 T8AS133  IDT    133         [
 T8AS134  IDT    134         \
 T8AS135  IDT    135         ]
 T8AS136  IDT    136
 T8AS137  IDT    137         _
 T8AS140  IDT    140
 T8AS141  IDT    141         A
 T8AS142  IDT    142         B
 T8AS143  IDT    143         C
 T8AS144  IDT    144         D
 T8AS145  IDT    145         E
 T8AS146  IDT    146         F
 T8AS147  IDT    147         G
 T8AS150  IDT    150         H
 T8AS151  IDT    151         I
 T8AS152  IDT    152         J
 T8AS153  IDT    153         K
 T8AS154  IDT    154         L
 T8AS155  IDT    155         M
 T8AS156  IDT    156         N
 T8AS157  IDT    157         O
 T8AS160  IDT    160         P
 T8AS161  IDT    161         Q
 T8AS162  IDT    162         R
 T8AS163  IDT    163         S
 T8AS164  IDT    164         T
 T8AS165  IDT    165         U
 T8AS166  IDT    166         V
 T8AS167  IDT    167         W
 T8AS170  IDT    170         X
 T8AS171  IDT    171         Y
 T8AS172  IDT    172         Z
 T8AS173  IDT    173
 T8AS174  IDT    174
 T8AS175  IDT    175
 T8AS176  IDT    176
 T8AS177  IDT    177
  
 T8AS200  IDT   4000         NUL
 T8AS201  IDT    001         SOH
 T8AS202  IDT    002         STX
 T8AS203  IDT    003         ETX
 T8AS204  IDT    004         EOT
 T8AS205  IDT    005         ENQ
 T8AS206  IDT    006         ACK
 T8AS207  IDT    007         BEL
 T8AS210  IDT    010         BS 
 T8AS211  IDT    011         HT 
 T8AS212  IDT    012         LF 
 T8AS213  IDT    013         VT 
 T8AS214  IDT    014         FF 
 T8AS215  IDT    015         CR 
 T8AS216  IDT    016         SO 
 T8AS217  IDT    017         SI 
 T8AS220  IDT    020         DLE
 T8AS221  IDT    021         DC1
 T8AS222  IDT    022         DC2
 T8AS223  IDT    023         DC3
 T8AS224  IDT    024         DC4
 T8AS225  IDT    025         NAK
 T8AS226  IDT    026         SYN
 T8AS227  IDT    027         ETB
 T8AS230  IDT    030         CAN
 T8AS231  IDT    031         EM 
 T8AS232  IDT    032         SUB
 T8AS233  IDT    033         ESC
 T8AS234  IDT    034         FS 
 T8AS235  IDT    035         GS 
 T8AS236  IDT    036         RS 
 T8AS237  IDT    037         US 
 T8AS240  IDT    040         BLANK
 T8AS241  IDT    041         !
 T8AS242  IDT    042         "
 T8AS243  IDT    043         #
 T8AS244  IDT    044         $
 T8AS245  IDT    045         %
 T8AS246  IDT    046         &
 T8AS247  IDT    047         '
 T8AS250  IDT    050         (
 T8AS251  IDT    051         )
 T8AS252  IDT    052         *
 T8AS253  IDT    053         +
 T8AS254  IDT    054         ,
 T8AS255  IDT    055         -
 T8AS256  IDT    056         .
 T8AS257  IDT    057         /
 T8AS260  IDT    060         0
 T8AS261  IDT    061         1
 T8AS262  IDT    062         2
 T8AS263  IDT    063         3
 T8AS264  IDT    064         4
 T8AS265  IDT    065         5
 T8AS266  IDT    066         6
 T8AS267  IDT    067         7
 T8AS270  IDT    070         8
 T8AS271  IDT    071         9
 T8AS272  IDT    072         :  
 T8AS273  IDT    073         ;
 T8AS274  IDT    074         <
 T8AS275  IDT    075         =
 T8AS276  IDT    076         >
 T8AS277  IDT    077         ?
  
 T8AS300  IDT    100
 T8AS301  IDT    101         A
 T8AS302  IDT    102         B
 T8AS303  IDT    103         C
 T8AS304  IDT    104         D
 T8AS305  IDT    105         E
 T8AS306  IDT    106         F
 T8AS307  IDT    107         G
 T8AS310  IDT    110         H
 T8AS311  IDT    111         I
 T8AS312  IDT    112         J
 T8AS313  IDT    113         K
 T8AS314  IDT    114         L
 T8AS315  IDT    115         M
 T8AS316  IDT    116         N
 T8AS317  IDT    117         O
 T8AS320  IDT    120         P
 T8AS321  IDT    121         Q
 T8AS322  IDT    122         R
 T8AS323  IDT    123         S
 T8AS324  IDT    124         T
 T8AS325  IDT    125         U
 T8AS326  IDT    126         V
 T8AS327  IDT    127         W
 T8AS330  IDT    130         X
 T8AS331  IDT    131         Y
 T8AS332  IDT    132         Z
 T8AS333  IDT    133         [
 T8AS334  IDT    134         \
 T8AS335  IDT    135         ]
 T8AS336  IDT    136
 T8AS337  IDT    137         _
 T8AS340  IDT    140
 T8AS341  IDT    141         A
 T8AS342  IDT    142         B
 T8AS343  IDT    143         C
 T8AS344  IDT    144         D
 T8AS345  IDT    145         E
 T8AS346  IDT    146         F
 T8AS347  IDT    147         G
 T8AS350  IDT    150         H
 T8AS351  IDT    151         I
 T8AS352  IDT    152         J
 T8AS353  IDT    153         K
 T8AS354  IDT    154         L
 T8AS355  IDT    155         M
 T8AS356  IDT    156         N
 T8AS357  IDT    157         O
 T8AS360  IDT    160         P
 T8AS361  IDT    161         Q
 T8AS362  IDT    162         R
 T8AS363  IDT    163         S
 T8AS364  IDT    164         T
 T8AS365  IDT    165         U
 T8AS366  IDT    166         V
 T8AS367  IDT    167         W
 T8AS370  IDT    170         X
 T8AS371  IDT    171         Y
 T8AS372  IDT    172         Z
 T8AS373  IDT    173         L BRACE
 T8AS374  IDT    174         V LINE 
 T8AS375  IDT    175         R BRACE
 T8AS376  IDT    176         TILDE
 T8AS377  IDT    177         DEL
          SPACE  4,10 
**        SYMBOLS FOR 7 BIT SUBSET OF 8 BIT ASCII.
* 
*         CONVERSION TO 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 F8AS000  IDT   4000         NUL
 F8AS001  IDT    001         SOH
 F8AS002  IDT    002         STX
 F8AS003  IDT    003         ETX
 F8AS004  IDT    004         EOT
 F8AS005  IDT    005         ENQ
 F8AS006  IDT    006         ACK
 F8AS007  IDT    007         BEL
 F8AS010  IDT    010         BS 
 F8AS011  IDT    011         HT 
 F8AS012  IDT    012         LF 
 F8AS013  IDT    013         VT 
 F8AS014  IDT    014         FF 
 F8AS015  IDT    015         CR 
 F8AS016  IDT    016         SO 
 F8AS017  IDT    017         SI 
 F8AS020  IDT    020         DLE
 F8AS021  IDT    021         DC1
 F8AS022  IDT    022         DC2
 F8AS023  IDT    023         DC3
 F8AS024  IDT    024         DC4
 F8AS025  IDT    025         NAK
 F8AS026  IDT    026         SYN
 F8AS027  IDT    027         ETB
 F8AS030  IDT    030         CAN
 F8AS031  IDT    031         EM 
 F8AS032  IDT    032         SUB
 F8AS033  IDT    033         ESC
 F8AS034  IDT    034         FS 
 F8AS035  IDT    035         GS 
 F8AS036  IDT    036         RS 
 F8AS037  IDT    037         US 
 F8AS040  IDT    040         BLANK
 F8AS041  IDT    041         !
 F8AS042  IDT    042         "
 F8AS043  IDT    043         #
 F8AS044  IDT    044         $
 F8AS045  IDT    045         %
 F8AS046  IDT    046         &
 F8AS047  IDT    047         '
 F8AS050  IDT    050         (
 F8AS051  IDT    051         )
 F8AS052  IDT    052         *
 F8AS053  IDT    053         +
 F8AS054  IDT    054         ,
 F8AS055  IDT    055         -
 F8AS056  IDT    056         .
 F8AS057  IDT    057         /
 F8AS060  IDT    060         0
 F8AS061  IDT    061         1
 F8AS062  IDT    062         2
 F8AS063  IDT    063         3
 F8AS064  IDT    064         4
 F8AS065  IDT    065         5
 F8AS066  IDT    066         6
 F8AS067  IDT    067         7
 F8AS070  IDT    070         8
 F8AS071  IDT    071         9
 F8AS072  IDT    072         :  
 F8AS073  IDT    073         ;
 F8AS074  IDT    074         <
 F8AS075  IDT    075         =
 F8AS076  IDT    076         >
 F8AS077  IDT    077         ?
  
 F8AS100  IDT    100
 F8AS101  IDT    101         A
 F8AS102  IDT    102         B
 F8AS103  IDT    103         C
 F8AS104  IDT    104         D
 F8AS105  IDT    105         E
 F8AS106  IDT    106         F
 F8AS107  IDT    107         G
 F8AS110  IDT    110         H
 F8AS111  IDT    111         I
 F8AS112  IDT    112         J
 F8AS113  IDT    113         K
 F8AS114  IDT    114         L
 F8AS115  IDT    115         M
 F8AS116  IDT    116         N
 F8AS117  IDT    117         O
 F8AS120  IDT    120         P
 F8AS121  IDT    121         Q
 F8AS122  IDT    122         R
 F8AS123  IDT    123         S
 F8AS124  IDT    124         T
 F8AS125  IDT    125         U
 F8AS126  IDT    126         V
 F8AS127  IDT    127         W
 F8AS130  IDT    130         X
 F8AS131  IDT    131         Y
 F8AS132  IDT    132         Z
 F8AS133  IDT    133         [
 F8AS134  IDT    134         \
 F8AS135  IDT    135         ]
 F8AS136  IDT    136
 F8AS137  IDT    137         _
 F8AS140  IDT    140
 F8AS141  IDT    141         A
 F8AS142  IDT    142         B
 F8AS143  IDT    143         C
 F8AS144  IDT    144         D
 F8AS145  IDT    145         E
 F8AS146  IDT    146         F
 F8AS147  IDT    147         G
 F8AS150  IDT    150         H
 F8AS151  IDT    151         I
 F8AS152  IDT    152         J
 F8AS153  IDT    153         K
 F8AS154  IDT    154         L
 F8AS155  IDT    155         M
 F8AS156  IDT    156         N
 F8AS157  IDT    157         O
 F8AS160  IDT    160         P
 F8AS161  IDT    161         Q
 F8AS162  IDT    162         R
 F8AS163  IDT    163         S
 F8AS164  IDT    164         T
 F8AS165  IDT    165         U
 F8AS166  IDT    166         V
 F8AS167  IDT    167         W
 F8AS170  IDT    170         X
 F8AS171  IDT    171         Y
 F8AS172  IDT    172         Z
 F8AS173  IDT    173         L BRACE
 F8AS174  IDT    174         V LINE 
 F8AS175  IDT    175         R BRACE
 F8AS176  IDT    176         TILDE
 F8AS177  IDT    177         DEL
  
 F8AS200  IDT   4000         NUL
 F8AS201  IDT    001         SOH
 F8AS202  IDT    002         STX
 F8AS203  IDT    003         ETX
 F8AS204  IDT    004         EOT
 F8AS205  IDT    005         ENQ
 F8AS206  IDT    006         ACK
 F8AS207  IDT    007         BEL
 F8AS210  IDT    010         BS 
 F8AS211  IDT    011         HT 
 F8AS212  IDT    012         LF 
 F8AS213  IDT    013         VT 
 F8AS214  IDT    014         FF 
 F8AS215  IDT    015         CR 
 F8AS216  IDT    016         SO 
 F8AS217  IDT    017         SI 
 F8AS220  IDT    020         DLE
 F8AS221  IDT    021         DC1
 F8AS222  IDT    022         DC2
 F8AS223  IDT    023         DC3
 F8AS224  IDT    024         DC4
 F8AS225  IDT    025         NAK
 F8AS226  IDT    026         SYN
 F8AS227  IDT    027         ETB
 F8AS230  IDT    030         CAN
 F8AS231  IDT    031         EM 
 F8AS232  IDT    032         SUB
 F8AS233  IDT    033         ESC
 F8AS234  IDT    034         FS 
 F8AS235  IDT    035         GS 
 F8AS236  IDT    036         RS 
 F8AS237  IDT    037         US 
 F8AS240  IDT    040         BLANK
 F8AS241  IDT    041         !
 F8AS242  IDT    042         "
 F8AS243  IDT    043         #
 F8AS244  IDT    044         $
 F8AS245  IDT    045         %
 F8AS246  IDT    046         &
 F8AS247  IDT    047         '
 F8AS250  IDT    050         (
 F8AS251  IDT    051         )
 F8AS252  IDT    052         *
 F8AS253  IDT    053         +
 F8AS254  IDT    054         ,
 F8AS255  IDT    055         -
 F8AS256  IDT    056         .
 F8AS257  IDT    057         /
 F8AS260  IDT    060         0
 F8AS261  IDT    061         1
 F8AS262  IDT    062         2
 F8AS263  IDT    063         3
 F8AS264  IDT    064         4
 F8AS265  IDT    065         5
 F8AS266  IDT    066         6
 F8AS267  IDT    067         7
 F8AS270  IDT    070         8
 F8AS271  IDT    071         9
 F8AS272  IDT    072         :  
 F8AS273  IDT    073         ;
 F8AS274  IDT    074         <
 F8AS275  IDT    075         =
 F8AS276  IDT    076         >
 F8AS277  IDT    077         ?
  
 F8AS300  IDT    100
 F8AS301  IDT    101         A
 F8AS302  IDT    102         B
 F8AS303  IDT    103         C
 F8AS304  IDT    104         D
 F8AS305  IDT    105         E
 F8AS306  IDT    106         F
 F8AS307  IDT    107         G
 F8AS310  IDT    110         H
 F8AS311  IDT    111         I
 F8AS312  IDT    112         J
 F8AS313  IDT    113         K
 F8AS314  IDT    114         L
 F8AS315  IDT    115         M
 F8AS316  IDT    116         N
 F8AS317  IDT    117         O
 F8AS320  IDT    120         P
 F8AS321  IDT    121         Q
 F8AS322  IDT    122         R
 F8AS323  IDT    123         S
 F8AS324  IDT    124         T
 F8AS325  IDT    125         U
 F8AS326  IDT    126         V
 F8AS327  IDT    127         W
 F8AS330  IDT    130         X
 F8AS331  IDT    131         Y
 F8AS332  IDT    132         Z
 F8AS333  IDT    133         [
 F8AS334  IDT    134         \
 F8AS335  IDT    135         ]
 F8AS336  IDT    136
 F8AS337  IDT    137         _
 F8AS340  IDT    140
 F8AS341  IDT    141         A
 F8AS342  IDT    142         B
 F8AS343  IDT    143         C
 F8AS344  IDT    144         D
 F8AS345  IDT    145         E
 F8AS346  IDT    146         F
 F8AS347  IDT    147         G
 F8AS350  IDT    150         H
 F8AS351  IDT    151         I
 F8AS352  IDT    152         J
 F8AS353  IDT    153         K
 F8AS354  IDT    154         L
 F8AS355  IDT    155         M
 F8AS356  IDT    156         N
 F8AS357  IDT    157         O
 F8AS360  IDT    160         P
 F8AS361  IDT    161         Q
 F8AS362  IDT    162         R
 F8AS363  IDT    163         S
 F8AS364  IDT    164         T
 F8AS365  IDT    165         U
 F8AS366  IDT    166         V
 F8AS367  IDT    167         W
 F8AS370  IDT    170         X
 F8AS371  IDT    171         Y
 F8AS372  IDT    172         Z
 F8AS373  IDT    173         L BRACE
 F8AS374  IDT    174         V LINE 
 F8AS375  IDT    175         R BRACE
 F8AS376  IDT    176         TILDE
 F8AS377  IDT    177         DEL
          SPACE  4,10 
**        SYMBOLS FOR FULL 8 BIT ASCII. 
* 
*         CONVERSION FROM 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 TASC000  IDT    000         NUL
 TASC001  IDT    001         SOH
 TASC002  IDT    002         STX
 TASC003  IDT    003         ETX
 TASC004  IDT    004         EOT
 TASC005  IDT    005         ENQ
 TASC006  IDT    006         ACK
 TASC007  IDT    007         BEL
 TASC010  IDT    010         BS 
 TASC011  IDT    011         HT 
 TASC012  IDT    012         LF 
 TASC013  IDT    013         VT 
 TASC014  IDT    014         FF 
 TASC015  IDT    015         CR 
 TASC016  IDT    016         SO 
 TASC017  IDT    017         SI 
 TASC020  IDT    020         DLE
 TASC021  IDT    021         DC1
 TASC022  IDT    022         DC2
 TASC023  IDT    023         DC3
 TASC024  IDT    024         DC4
 TASC025  IDT    025         NAK
 TASC026  IDT    026         SYN
 TASC027  IDT    027         ETB
 TASC030  IDT    030         CAN
 TASC031  IDT    031         EM 
 TASC032  IDT    032         SUB
 TASC033  IDT    033         ESC
 TASC034  IDT    034         FS 
 TASC035  IDT    035         GS 
 TASC036  IDT    036         RS 
 TASC037  IDT    037         US 
 TASC040  IDT    040         BLANK
 TASC041  IDT    041         !
 TASC042  IDT    042         "
 TASC043  IDT    043         #
 TASC044  IDT    044         $
 TASC045  IDT    045         %
 TASC046  IDT    046         &
 TASC047  IDT    047         '
 TASC050  IDT    050         (
 TASC051  IDT    051         )
 TASC052  IDT    052         *
 TASC053  IDT    053         +
 TASC054  IDT    054         ,
 TASC055  IDT    055         -
 TASC056  IDT    056         .
 TASC057  IDT    057         /
 TASC060  IDT    060         0
 TASC061  IDT    061         1
 TASC062  IDT    062         2
 TASC063  IDT    063         3
 TASC064  IDT    064         4
 TASC065  IDT    065         5
 TASC066  IDT    066         6
 TASC067  IDT    067         7
 TASC070  IDT    070         8
 TASC071  IDT    071         9
 TASC072  IDT    072         :  
 TASC073  IDT    073         ;
 TASC074  IDT    074         <
 TASC075  IDT    075         =
 TASC076  IDT    076         >
 TASC077  IDT    077         ?
  
 TASC100  IDT    100
 TASC101  IDT    101         A
 TASC102  IDT    102         B
 TASC103  IDT    103         C
 TASC104  IDT    104         D
 TASC105  IDT    105         E
 TASC106  IDT    106         F
 TASC107  IDT    107         G
 TASC110  IDT    110         H
 TASC111  IDT    111         I
 TASC112  IDT    112         J
 TASC113  IDT    113         K
 TASC114  IDT    114         L
 TASC115  IDT    115         M
 TASC116  IDT    116         N
 TASC117  IDT    117         O
 TASC120  IDT    120         P
 TASC121  IDT    121         Q
 TASC122  IDT    122         R
 TASC123  IDT    123         S
 TASC124  IDT    124         T
 TASC125  IDT    125         U
 TASC126  IDT    126         V
 TASC127  IDT    127         W
 TASC130  IDT    130         X
 TASC131  IDT    131         Y
 TASC132  IDT    132         Z
 TASC133  IDT    133         [
 TASC134  IDT    134         \
 TASC135  IDT    135         ]
 TASC136  IDT    136
 TASC137  IDT    137         _
 TASC140  IDT    140
 TASC141  IDT    141         A
 TASC142  IDT    142         B
 TASC143  IDT    143         C
 TASC144  IDT    144         D
 TASC145  IDT    145         E
 TASC146  IDT    146         F
 TASC147  IDT    147         G
 TASC150  IDT    150         H
 TASC151  IDT    151         I
 TASC152  IDT    152         J
 TASC153  IDT    153         K
 TASC154  IDT    154         L
 TASC155  IDT    155         M
 TASC156  IDT    156         N
 TASC157  IDT    157         O
 TASC160  IDT    160         P
 TASC161  IDT    161         Q
 TASC162  IDT    162         R
 TASC163  IDT    163         S
 TASC164  IDT    164         T
 TASC165  IDT    165         U
 TASC166  IDT    166         V
 TASC167  IDT    167         W
 TASC170  IDT    170         X
 TASC171  IDT    171         Y
 TASC172  IDT    172         Z
 TASC173  IDT    173         L BRACE
 TASC174  IDT    174         V LINE 
 TASC175  IDT    175         R BRACE
 TASC176  IDT    176         TILDE
 TASC177  IDT    177         DEL
  
 TASC200  IDT    200
 TASC201  IDT    201
 TASC202  IDT    202
 TASC203  IDT    203
 TASC204  IDT    204
 TASC205  IDT    205
 TASC206  IDT    206
 TASC207  IDT    207
 TASC210  IDT    210
 TASC211  IDT    211
 TASC212  IDT    212
 TASC213  IDT    213
 TASC214  IDT    214
 TASC215  IDT    215
 TASC216  IDT    216
 TASC217  IDT    217
 TASC220  IDT    220
 TASC221  IDT    221
 TASC222  IDT    222
 TASC223  IDT    223
 TASC224  IDT    224
 TASC225  IDT    225
 TASC226  IDT    226
 TASC227  IDT    227
 TASC230  IDT    230
 TASC231  IDT    231
 TASC232  IDT    232
 TASC233  IDT    233
 TASC234  IDT    234
 TASC235  IDT    235
 TASC236  IDT    236
 TASC237  IDT    237
 TASC240  IDT    240
 TASC241  IDT    241
 TASC242  IDT    242
 TASC243  IDT    243
 TASC244  IDT    244
 TASC245  IDT    245
 TASC246  IDT    246
 TASC247  IDT    247
 TASC250  IDT    250
 TASC251  IDT    251
 TASC252  IDT    252
 TASC253  IDT    253
 TASC254  IDT    254
 TASC255  IDT    255
 TASC256  IDT    256
 TASC257  IDT    257
 TASC260  IDT    260
 TASC261  IDT    261
 TASC262  IDT    262
 TASC263  IDT    263
 TASC264  IDT    264
 TASC265  IDT    265
 TASC266  IDT    266
 TASC267  IDT    267
 TASC270  IDT    270
 TASC271  IDT    271
 TASC272  IDT    272
 TASC273  IDT    273
 TASC274  IDT    274
 TASC275  IDT    275
 TASC276  IDT    276
 TASC277  IDT    277
  
 TASC300  IDT    300
 TASC301  IDT    301
 TASC302  IDT    302
 TASC303  IDT    303
 TASC304  IDT    304
 TASC305  IDT    305
 TASC306  IDT    306
 TASC307  IDT    307
 TASC310  IDT    310
 TASC311  IDT    311
 TASC312  IDT    312
 TASC313  IDT    313
 TASC314  IDT    314
 TASC315  IDT    315
 TASC316  IDT    316
 TASC317  IDT    317
 TASC320  IDT    320
 TASC321  IDT    321
 TASC322  IDT    322
 TASC323  IDT    323
 TASC324  IDT    324
 TASC325  IDT    325
 TASC326  IDT    326
 TASC327  IDT    327
 TASC330  IDT    330
 TASC331  IDT    331
 TASC332  IDT    332
 TASC333  IDT    333
 TASC334  IDT    334
 TASC335  IDT    335
 TASC336  IDT    336
 TASC337  IDT    337
 TASC340  IDT    340
 TASC341  IDT    341
 TASC342  IDT    342
 TASC343  IDT    343
 TASC344  IDT    344
 TASC345  IDT    345
 TASC346  IDT    346
 TASC347  IDT    347
 TASC350  IDT    350
 TASC351  IDT    351
 TASC352  IDT    352
 TASC353  IDT    353
 TASC354  IDT    354
 TASC355  IDT    355
 TASC356  IDT    356
 TASC357  IDT    357
 TASC360  IDT    360
 TASC361  IDT    361
 TASC362  IDT    362
 TASC363  IDT    363
 TASC364  IDT    364
 TASC365  IDT    365
 TASC366  IDT    366
 TASC367  IDT    367
 TASC370  IDT    370
 TASC371  IDT    371
 TASC372  IDT    372
 TASC373  IDT    373
 TASC374  IDT    374
 TASC375  IDT    375
 TASC376  IDT    376
 TASC377  IDT    377
          SPACE  4,10 
**        SYMBOLS FOR FULL 8 BIT ASCII. 
* 
*         CONVERSION TO 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 FASC000  IDT    000         NUL
 FASC001  IDT    001         SOH
 FASC002  IDT    002         STX
 FASC003  IDT    003         ETX
 FASC004  IDT    004         EOT
 FASC005  IDT    005         ENQ
 FASC006  IDT    006         ACK
 FASC007  IDT    007         BEL
 FASC010  IDT    010         BS 
 FASC011  IDT    011         HT 
 FASC012  IDT    012         LF 
 FASC013  IDT    013         VT 
 FASC014  IDT    014         FF 
 FASC015  IDT    015         CR 
 FASC016  IDT    016         SO 
 FASC017  IDT    017         SI 
 FASC020  IDT    020         DLE
 FASC021  IDT    021         DC1
 FASC022  IDT    022         DC2
 FASC023  IDT    023         DC3
 FASC024  IDT    024         DC4
 FASC025  IDT    025         NAK
 FASC026  IDT    026         SYN
 FASC027  IDT    027         ETB
 FASC030  IDT    030         CAN
 FASC031  IDT    031         EM 
 FASC032  IDT    032         SUB
 FASC033  IDT    033         ESC
 FASC034  IDT    034         FS 
 FASC035  IDT    035         GS 
 FASC036  IDT    036         RS 
 FASC037  IDT    037         US 
 FASC040  IDT    040         BLANK
 FASC041  IDT    041         !
 FASC042  IDT    042         "
 FASC043  IDT    043         #
 FASC044  IDT    044         $
 FASC045  IDT    045         %
 FASC046  IDT    046         &
 FASC047  IDT    047         '
 FASC050  IDT    050         (
 FASC051  IDT    051         )
 FASC052  IDT    052         *
 FASC053  IDT    053         +
 FASC054  IDT    054         ,
 FASC055  IDT    055         -
 FASC056  IDT    056         .
 FASC057  IDT    057         /
 FASC060  IDT    060         0
 FASC061  IDT    061         1
 FASC062  IDT    062         2
 FASC063  IDT    063         3
 FASC064  IDT    064         4
 FASC065  IDT    065         5
 FASC066  IDT    066         6
 FASC067  IDT    067         7
 FASC070  IDT    070         8
 FASC071  IDT    071         9
 FASC072  IDT    072         :  
 FASC073  IDT    073         ;
 FASC074  IDT    074         <
 FASC075  IDT    075         =
 FASC076  IDT    076         >
 FASC077  IDT    077         ?
  
 FASC100  IDT    100
 FASC101  IDT    101         A
 FASC102  IDT    102         B
 FASC103  IDT    103         C
 FASC104  IDT    104         D
 FASC105  IDT    105         E
 FASC106  IDT    106         F
 FASC107  IDT    107         G
 FASC110  IDT    110         H
 FASC111  IDT    111         I
 FASC112  IDT    112         J
 FASC113  IDT    113         K
 FASC114  IDT    114         L
 FASC115  IDT    115         M
 FASC116  IDT    116         N
 FASC117  IDT    117         O
 FASC120  IDT    120         P
 FASC121  IDT    121         Q
 FASC122  IDT    122         R
 FASC123  IDT    123         S
 FASC124  IDT    124         T
 FASC125  IDT    125         U
 FASC126  IDT    126         V
 FASC127  IDT    127         W
 FASC130  IDT    130         X
 FASC131  IDT    131         Y
 FASC132  IDT    132         Z
 FASC133  IDT    133         [
 FASC134  IDT    134         \
 FASC135  IDT    135         ]
 FASC136  IDT    136
 FASC137  IDT    137         _
 FASC140  IDT    140
 FASC141  IDT    141         A
 FASC142  IDT    142         B
 FASC143  IDT    143         C
 FASC144  IDT    144         D
 FASC145  IDT    145         E
 FASC146  IDT    146         F
 FASC147  IDT    147         G
 FASC150  IDT    150         H
 FASC151  IDT    151         I
 FASC152  IDT    152         J
 FASC153  IDT    153         K
 FASC154  IDT    154         L
 FASC155  IDT    155         M
 FASC156  IDT    156         N
 FASC157  IDT    157         O
 FASC160  IDT    160         P
 FASC161  IDT    161         Q
 FASC162  IDT    162         R
 FASC163  IDT    163         S
 FASC164  IDT    164         T
 FASC165  IDT    165         U
 FASC166  IDT    166         V
 FASC167  IDT    167         W
 FASC170  IDT    170         X
 FASC171  IDT    171         Y
 FASC172  IDT    172         Z
 FASC173  IDT    173         L BRACE
 FASC174  IDT    174         V LINE 
 FASC175  IDT    175         R BRACE
 FASC176  IDT    176         TILDE
 FASC177  IDT    177         DEL
  
 FASC200  IDT    200
 FASC201  IDT    201
 FASC202  IDT    202
 FASC203  IDT    203
 FASC204  IDT    204
 FASC205  IDT    205
 FASC206  IDT    206
 FASC207  IDT    207
 FASC210  IDT    210
 FASC211  IDT    211
 FASC212  IDT    212
 FASC213  IDT    213
 FASC214  IDT    214
 FASC215  IDT    215
 FASC216  IDT    216
 FASC217  IDT    217
 FASC220  IDT    220
 FASC221  IDT    221
 FASC222  IDT    222
 FASC223  IDT    223
 FASC224  IDT    224
 FASC225  IDT    225
 FASC226  IDT    226
 FASC227  IDT    227
 FASC230  IDT    230
 FASC231  IDT    231
 FASC232  IDT    232
 FASC233  IDT    233
 FASC234  IDT    234
 FASC235  IDT    235
 FASC236  IDT    236
 FASC237  IDT    237
 FASC240  IDT    240
 FASC241  IDT    241
 FASC242  IDT    242
 FASC243  IDT    243
 FASC244  IDT    244
 FASC245  IDT    245
 FASC246  IDT    246
 FASC247  IDT    247
 FASC250  IDT    250
 FASC251  IDT    251
 FASC252  IDT    252
 FASC253  IDT    253
 FASC254  IDT    254
 FASC255  IDT    255
 FASC256  IDT    256
 FASC257  IDT    257
 FASC260  IDT    260
 FASC261  IDT    261
 FASC262  IDT    262
 FASC263  IDT    263
 FASC264  IDT    264
 FASC265  IDT    265
 FASC266  IDT    266
 FASC267  IDT    267
 FASC270  IDT    270
 FASC271  IDT    271
 FASC272  IDT    272
 FASC273  IDT    273
 FASC274  IDT    274
 FASC275  IDT    275
 FASC276  IDT    276
 FASC277  IDT    277
  
 FASC300  IDT    300
 FASC301  IDT    301
 FASC302  IDT    302
 FASC303  IDT    303
 FASC304  IDT    304
 FASC305  IDT    305
 FASC306  IDT    306
 FASC307  IDT    307
 FASC310  IDT    310
 FASC311  IDT    311
 FASC312  IDT    312
 FASC313  IDT    313
 FASC314  IDT    314
 FASC315  IDT    315
 FASC316  IDT    316
 FASC317  IDT    317
 FASC320  IDT    320
 FASC321  IDT    321
 FASC322  IDT    322
 FASC323  IDT    323
 FASC324  IDT    324
 FASC325  IDT    325
 FASC326  IDT    326
 FASC327  IDT    327
 FASC330  IDT    330
 FASC331  IDT    331
 FASC332  IDT    332
 FASC333  IDT    333
 FASC334  IDT    334
 FASC335  IDT    335
 FASC336  IDT    336
 FASC337  IDT    337
 FASC340  IDT    340
 FASC341  IDT    341
 FASC342  IDT    342
 FASC343  IDT    343
 FASC344  IDT    344
 FASC345  IDT    345
 FASC346  IDT    346
 FASC347  IDT    347
 FASC350  IDT    350
 FASC351  IDT    351
 FASC352  IDT    352
 FASC353  IDT    353
 FASC354  IDT    354
 FASC355  IDT    355
 FASC356  IDT    356
 FASC357  IDT    357
 FASC360  IDT    360
 FASC361  IDT    361
 FASC362  IDT    362
 FASC363  IDT    363
 FASC364  IDT    364
 FASC365  IDT    365
 FASC366  IDT    366
 FASC367  IDT    367
 FASC370  IDT    370
 FASC371  IDT    371
 FASC372  IDT    372
 FASC373  IDT    373
 FASC374  IDT    374
 FASC375  IDT    375
 FASC376  IDT    376
 FASC377  IDT    377
          SPACE  4,10 
**        SYMBOLS FOR EBDCIC. 
* 
*         CONVERSION FROM 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 TEBC000  IDT    000         NUL
 TEBC001  IDT    001         SOH
 TEBC002  IDT    002         STX
 TEBC003  IDT    003         ETX
 TEBC004  IDT    067         EOT
 TEBC005  IDT    055         ENQ
 TEBC006  IDT    056         ACK
 TEBC007  IDT    057         BEL
 TEBC010  IDT    026         BS 
 TEBC011  IDT    005         HT 
 TEBC012  IDT    045         LF 
 TEBC013  IDT    013         VT 
 TEBC014  IDT    014         FF 
 TEBC015  IDT    015         CR 
 TEBC016  IDT    016         SO 
 TEBC017  IDT    017         SI 
 TEBC020  IDT    020         DLE
 TEBC021  IDT    021         DC1
 TEBC022  IDT    022         DC2
 TEBC023  IDT    023         DC3 (TM) 
 TEBC024  IDT    074         DC4
 TEBC025  IDT    075         NAK
 TEBC026  IDT    062         SYN
 TEBC027  IDT    046         ETB
 TEBC030  IDT    030         CAN
 TEBC031  IDT    031         EM 
 TEBC032  IDT    077         SUB
 TEBC033  IDT    047         ESC
 TEBC034  IDT    034         FS 
 TEBC035  IDT    035         GS 
 TEBC036  IDT    036         RS 
 TEBC037  IDT    037         US 
 TEBC040  IDT    100         BLANK
 TEBC041  IDT    117         !
 TEBC042  IDT    177         "
 TEBC043  IDT    173         #
 TEBC044  IDT    133         $
 TEBC045  IDT    154         %
 TEBC046  IDT    120         &
 TEBC047  IDT    175         '
 TEBC050  IDT    115         (
 TEBC051  IDT    135         )
 TEBC052  IDT    134         *
 TEBC053  IDT    116         +
 TEBC054  IDT    153         ,
 TEBC055  IDT    140         -
 TEBC056  IDT    113         .
 TEBC057  IDT    141         /
 TEBC060  IDT    360         0
 TEBC061  IDT    361         1
 TEBC062  IDT    362         2
 TEBC063  IDT    363         3
 TEBC064  IDT    364         4
 TEBC065  IDT    365         5
 TEBC066  IDT    366         6
 TEBC067  IDT    367         7
 TEBC070  IDT    370         8
 TEBC071  IDT    371         9
 TEBC072  IDT    172         :  
 TEBC073  IDT    136         ;
 TEBC074  IDT    114         <
 TEBC075  IDT    176         =
 TEBC076  IDT    156         >
 TEBC077  IDT    157         ?
 TEBC100  IDT    174
 TEBC101  IDT    301         A
 TEBC102  IDT    302         B
 TEBC103  IDT    303         C
 TEBC104  IDT    304         D
 TEBC105  IDT    305         E
 TEBC106  IDT    306         F
 TEBC107  IDT    307         G
 TEBC110  IDT    310         H
 TEBC111  IDT    311         I
 TEBC112  IDT    321         J
 TEBC113  IDT    322         K
 TEBC114  IDT    323         L
 TEBC115  IDT    324         M
 TEBC116  IDT    325         N
 TEBC117  IDT    326         O
 TEBC120  IDT    327         P
 TEBC121  IDT    330         Q
 TEBC122  IDT    331         R
 TEBC123  IDT    342         S
 TEBC124  IDT    343         T
 TEBC125  IDT    344         U
 TEBC126  IDT    345         V
 TEBC127  IDT    346         W
 TEBC130  IDT    347         X
 TEBC131  IDT    350         Y
 TEBC132  IDT    351         Z
 TEBC133  IDT    112         [
 TEBC134  IDT    340         \
 TEBC135  IDT    132         ]
 TEBC136  IDT    137
 TEBC137  IDT    155         _
 TEBC140  IDT    171
 TEBC141  IDT    201         A LC 
 TEBC142  IDT    202         B LC 
 TEBC143  IDT    203         C LC 
 TEBC144  IDT    204         D LC 
 TEBC145  IDT    205         E LC 
 TEBC146  IDT    206         F LC 
 TEBC147  IDT    207         G LC 
 TEBC150  IDT    210         H LC 
 TEBC151  IDT    211         I LC 
 TEBC152  IDT    221         J LC 
 TEBC153  IDT    222         K LC 
 TEBC154  IDT    223         L LC 
 TEBC155  IDT    224         M LC 
 TEBC156  IDT    225         N LC 
 TEBC157  IDT    226         O LC 
 TEBC160  IDT    227         P LC 
 TEBC161  IDT    230         Q LC 
 TEBC162  IDT    231         R LC 
 TEBC163  IDT    242         S LC 
 TEBC164  IDT    243         T LC 
 TEBC165  IDT    244         U LC 
 TEBC166  IDT    245         V LC 
 TEBC167  IDT    246         W LC 
 TEBC170  IDT    247         X LC 
 TEBC171  IDT    250         Y LC 
 TEBC172  IDT    251         Z LC 
 TEBC173  IDT    300
 TEBC174  IDT    152
 TEBC175  IDT    320
 TEBC176  IDT    241
 TEBC177  IDT    007         DEL
  
 TEBC200  IDT    040         (DS) 
 TEBC201  IDT    041         (SOS)
 TEBC202  IDT    042         (FS) 
 TEBC203  IDT    043
 TEBC204  IDT    044         (BYP)
 TEBC205  IDT    025         (NL) 
 TEBC206  IDT    006         (LC) 
 TEBC207  IDT    027         (IL) 
 TEBC210  IDT    050
 TEBC211  IDT    051
 TEBC212  IDT    052         (SM) 
 TEBC213  IDT    053         (CU2)
 TEBC214  IDT    054
 TEBC215  IDT    011         (RLF)
 TEBC216  IDT    012         (SMM)
 TEBC217  IDT    033         (CUI)
 TEBC220  IDT    060
 TEBC221  IDT    061
 TEBC222  IDT    032         (CC) 
 TEBC223  IDT    063
 TEBC224  IDT    064         (PN) 
 TEBC225  IDT    065         (RS) 
 TEBC226  IDT    066         (UC) 
 TEBC227  IDT    010         (GE) 
 TEBC230  IDT    070
 TEBC231  IDT    071
 TEBC232  IDT    072
 TEBC233  IDT    073         (CU3)
 TEBC234  IDT    004         (PF) 
 TEBC235  IDT    024         (RES)
 TEBC236  IDT    076
 TEBC237  IDT    341
 TEBC240  IDT    101
 TEBC241  IDT    102
 TEBC242  IDT    103
 TEBC243  IDT    104
 TEBC244  IDT    105
 TEBC245  IDT    106
 TEBC246  IDT    107
 TEBC247  IDT    110
 TEBC250  IDT    111
 TEBC251  IDT    121
 TEBC252  IDT    122
 TEBC253  IDT    123
 TEBC254  IDT    124
 TEBC255  IDT    125
 TEBC256  IDT    126
 TEBC257  IDT    127
 TEBC260  IDT    130
 TEBC261  IDT    131
 TEBC262  IDT    142
 TEBC263  IDT    143
 TEBC264  IDT    144
 TEBC265  IDT    145
 TEBC266  IDT    146
 TEBC267  IDT    147
 TEBC270  IDT    150
 TEBC271  IDT    151
 TEBC272  IDT    160
 TEBC273  IDT    161
 TEBC274  IDT    162
 TEBC275  IDT    163
 TEBC276  IDT    164
 TEBC277  IDT    165
  
 TEBC300  IDT    166
 TEBC301  IDT    167
 TEBC302  IDT    170
 TEBC303  IDT    200
 TEBC304  IDT    212
 TEBC305  IDT    213
 TEBC306  IDT    214
 TEBC307  IDT    215
 TEBC310  IDT    216
 TEBC311  IDT    217
 TEBC312  IDT    220
 TEBC313  IDT    232
 TEBC314  IDT    233
 TEBC315  IDT    234
 TEBC316  IDT    235
 TEBC317  IDT    236
 TEBC320  IDT    237
 TEBC321  IDT    240
 TEBC322  IDT    252
 TEBC323  IDT    253
 TEBC324  IDT    254
 TEBC325  IDT    255
 TEBC326  IDT    256
 TEBC327  IDT    257
 TEBC330  IDT    260
 TEBC331  IDT    261
 TEBC332  IDT    262
 TEBC333  IDT    263
 TEBC334  IDT    264
 TEBC335  IDT    265
 TEBC336  IDT    266
 TEBC337  IDT    267
 TEBC340  IDT    270
 TEBC341  IDT    271
 TEBC342  IDT    272
 TEBC343  IDT    273
 TEBC344  IDT    274
 TEBC345  IDT    275
 TEBC346  IDT    276
 TEBC347  IDT    277
 TEBC350  IDT    312
 TEBC351  IDT    313
 TEBC352  IDT    314         (ZIG-ZAG SHAPE)
 TEBC353  IDT    315
 TEBC354  IDT    316         (Y SHAPE)
 TEBC355  IDT    317
 TEBC356  IDT    332
 TEBC357  IDT    333
 TEBC360  IDT    334
 TEBC361  IDT    335
 TEBC362  IDT    336
 TEBC363  IDT    337
 TEBC364  IDT    352
 TEBC365  IDT    353
 TEBC366  IDT    354         (CHAIR SHAPE)
 TEBC367  IDT    355
 TEBC370  IDT    356
 TEBC371  IDT    357
 TEBC372  IDT    372         (V LINE (LVM)) 
 TEBC373  IDT    373
 TEBC374  IDT    374
 TEBC375  IDT    375
 TEBC376  IDT    376
 TEBC377  IDT    377         EO 
          SPACE  4,10 
**        SYMBOLS FOR EBCDIC
* 
*         CONVERSION TO 8 BIT ASCII.
  
*                            CHARACTER REPRESENTED
  
 FEBC000  IDT    000         NUL
 FEBC001  IDT    001         SOH
 FEBC002  IDT    002         STX
 FEBC003  IDT    003         ETX
 FEBC004  IDT    234         PF 
 FEBC005  IDT    011         HT 
 FEBC006  IDT    206         LC 
 FEBC007  IDT    177         DEL
 FEBC010  IDT    227         GE 
 FEBC011  IDT    215         RLF
 FEBC012  IDT    216         SMM
 FEBC013  IDT    013         VT 
 FEBC014  IDT    014         FF 
 FEBC015  IDT    015         CR 
 FEBC016  IDT    016         SO 
 FEBC017  IDT    017         SI 
 FEBC020  IDT    020         DLE
 FEBC021  IDT    021         DC1
 FEBC022  IDT    022         DC2
 FEBC023  IDT    023         TM (DC3) 
 FEBC024  IDT    235         RES
 FEBC025  IDT    205         NL 
 FEBC026  IDT    010         BS 
 FEBC027  IDT    207         IL 
 FEBC030  IDT    030         CAN
 FEBC031  IDT    031         EM 
 FEBC032  IDT    222         CC 
 FEBC033  IDT    217         CU1
 FEBC034  IDT    034         IFS (FS) 
 FEBC035  IDT    035         IGS (GS) 
 FEBC036  IDT    036         IRS (RS) 
 FEBC037  IDT    037         IUS (US) 
 FEBC040  IDT    200         DS 
 FEBC041  IDT    201         SOS
 FEBC042  IDT    202         FS 
 FEBC043  IDT    203
 FEBC044  IDT    204         BYP
 FEBC045  IDT    012         LF 
 FEBC046  IDT    027         ETB
 FEBC047  IDT    033         ESC
 FEBC050  IDT    210
 FEBC051  IDT    211
 FEBC052  IDT    212         SM 
 FEBC053  IDT    213         CU2
 FEBC054  IDT    214
 FEBC055  IDT    005         ENQ
 FEBC056  IDT    006         ACK
 FEBC057  IDT    007         BEL
 FEBC060  IDT    220
 FEBC061  IDT    221
 FEBC062  IDT    026         SYN
 FEBC063  IDT    223
 FEBC064  IDT    224         PN 
 FEBC065  IDT    225         RS 
 FEBC066  IDT    226         UC 
 FEBC067  IDT    004         EOT
 FEBC070  IDT    230
 FEBC071  IDT    231
 FEBC072  IDT    232
 FEBC073  IDT    233         CU3
 FEBC074  IDT    024         DC4
 FEBC075  IDT    025         NAK
 FEBC076  IDT    236
 FEBC077  IDT    032         SUB
  
 FEBC100  IDT    040         SPACE
 FEBC101  IDT    240
 FEBC102  IDT    241
 FEBC103  IDT    242
 FEBC104  IDT    243
 FEBC105  IDT    244
 FEBC106  IDT    245
 FEBC107  IDT    246
 FEBC110  IDT    247
 FEBC111  IDT    250
 FEBC112  IDT    133         CENT SIGN ([)
 FEBC113  IDT    056         .
 FEBC114  IDT    074         <
 FEBC115  IDT    050         (
 FEBC116  IDT    053         +
 FEBC117  IDT    041         VERTICAL LINE (!)
 FEBC120  IDT    046         &
 FEBC121  IDT    251
 FEBC122  IDT    252
 FEBC123  IDT    253
 FEBC124  IDT    254
 FEBC125  IDT    255
 FEBC126  IDT    256
 FEBC127  IDT    257
 FEBC130  IDT    260
 FEBC131  IDT    261
 FEBC132  IDT    135         ! (])
 FEBC133  IDT    044         $
 FEBC134  IDT    052         *
 FEBC135  IDT    051         )
 FEBC136  IDT    073         ;
 FEBC137  IDT    136
 FEBC140  IDT    055         -
 FEBC141  IDT    057         /
 FEBC142  IDT    262
 FEBC143  IDT    263
 FEBC144  IDT    264
 FEBC145  IDT    265
 FEBC146  IDT    266
 FEBC147  IDT    267
 FEBC150  IDT    270
 FEBC151  IDT    271
 FEBC152  IDT    174         VERTICAL LINE
 FEBC153  IDT    054         ,
 FEBC154  IDT    045         %
 FEBC155  IDT    137         _
 FEBC156  IDT    076         >
 FEBC157  IDT    077         ?
 FEBC160  IDT    272
 FEBC161  IDT    273
 FEBC162  IDT    274
 FEBC163  IDT    275
 FEBC164  IDT    276
 FEBC165  IDT    277
 FEBC166  IDT    300
 FEBC167  IDT    301
 FEBC170  IDT    302
 FEBC171  IDT    140         BACKWARDS APOSTROPHE 
 FEBC172  IDT    072         :  
 FEBC173  IDT    043         #
 FEBC174  IDT    100
 FEBC175  IDT    047         '
 FEBC176  IDT    075         =
 FEBC177  IDT    042         "
  
 FEBC200  IDT    303
 FEBC201  IDT    141         A LC 
 FEBC202  IDT    142         B LC 
 FEBC203  IDT    143         C LC 
 FEBC204  IDT    144         D LC 
 FEBC205  IDT    145         E LC 
 FEBC206  IDT    146         F LC 
 FEBC207  IDT    147         G LC 
 FEBC210  IDT    150         H LC 
 FEBC211  IDT    151         I LC 
 FEBC212  IDT    304
 FEBC213  IDT    305
 FEBC214  IDT    306
 FEBC215  IDT    307
 FEBC216  IDT    310
 FEBC217  IDT    311
 FEBC220  IDT    312
 FEBC221  IDT    152         J LC 
 FEBC222  IDT    153         K LC 
 FEBC223  IDT    154         L LC 
 FEBC224  IDT    155         M LC 
 FEBC225  IDT    156         N LC 
 FEBC226  IDT    157         O LC 
 FEBC227  IDT    160         P LC 
 FEBC230  IDT    161         Q LC 
 FEBC231  IDT    162         R LC 
 FEBC232  IDT    313
 FEBC233  IDT    314
 FEBC234  IDT    315
 FEBC235  IDT    316
 FEBC236  IDT    317
 FEBC237  IDT    320
 FEBC240  IDT    321
 FEBC241  IDT    176         TILDE
 FEBC242  IDT    163         S LC 
 FEBC243  IDT    164         T LC 
 FEBC244  IDT    165         U LC 
 FEBC245  IDT    166         V LC 
 FEBC246  IDT    167         W LC 
 FEBC247  IDT    170         X LC 
 FEBC250  IDT    171         Y LC 
 FEBC251  IDT    172         Z LC 
 FEBC252  IDT    322
 FEBC253  IDT    323
 FEBC254  IDT    324
 FEBC255  IDT    325
 FEBC256  IDT    326
 FEBC257  IDT    327
 FEBC260  IDT    330
 FEBC261  IDT    331
 FEBC262  IDT    332
 FEBC263  IDT    333
 FEBC264  IDT    334
 FEBC265  IDT    335
 FEBC266  IDT    336
 FEBC267  IDT    337
 FEBC270  IDT    340
 FEBC271  IDT    341
 FEBC272  IDT    342
 FEBC273  IDT    343
 FEBC274  IDT    344
 FEBC275  IDT    345
 FEBC276  IDT    346
 FEBC277  IDT    347
  
 FEBC300  IDT    173         LEFT BRACKET 
 FEBC301  IDT    101         A
 FEBC302  IDT    102         B
 FEBC303  IDT    103         C
 FEBC304  IDT    104         D
 FEBC305  IDT    105         E
 FEBC306  IDT    106         F
 FEBC307  IDT    107         G
 FEBC310  IDT    110         H
 FEBC311  IDT    111         I
 FEBC312  IDT    350
 FEBC313  IDT    351
 FEBC314  IDT    352         ZIG-ZAG SHAPE
 FEBC315  IDT    353
 FEBC316  IDT    354         Y SHAPE
 FEBC317  IDT    355
 FEBC320  IDT    175         RIGHT BRACKET
 FEBC321  IDT    112         J
 FEBC322  IDT    113         K
 FEBC323  IDT    114         L
 FEBC324  IDT    115         M
 FEBC325  IDT    116         N
 FEBC326  IDT    117         O
 FEBC327  IDT    120         P
 FEBC330  IDT    121         Q
 FEBC331  IDT    122         R
 FEBC332  IDT    356
 FEBC333  IDT    357
 FEBC334  IDT    360
 FEBC335  IDT    361
 FEBC336  IDT    362
 FEBC337  IDT    363
 FEBC340  IDT    134         \
 FEBC341  IDT    237
 FEBC342  IDT    123         S
 FEBC343  IDT    124         T
 FEBC344  IDT    125         U
 FEBC345  IDT    126         V
 FEBC346  IDT    127         W
 FEBC347  IDT    130         X
 FEBC350  IDT    131         Y
 FEBC351  IDT    132         Z
 FEBC352  IDT    364
 FEBC353  IDT    365
 FEBC354  IDT    366         CHAIR SHAPE
 FEBC355  IDT    367
 FEBC356  IDT    370
 FEBC357  IDT    371
 FEBC360  IDT    060         0
 FEBC361  IDT    061         1
 FEBC362  IDT    062         2
 FEBC363  IDT    063         3
 FEBC364  IDT    064         4
 FEBC365  IDT    065         5
 FEBC366  IDT    066         6
 FEBC367  IDT    067         7
 FEBC370  IDT    070         8
 FEBC371  IDT    071         9
 FEBC372  IDT    372         VERTICAL LINE (LVM)
 FEBC373  IDT    373
 FEBC374  IDT    374
 FEBC375  IDT    375
 FEBC376  IDT    376
 FEBC377  IDT    377         (EO) 
          BASE   *
 QUAL$    IF     -DEF,QUAL$ 
          QUAL   *
 QUAL$    ENDIF 
 CVT      ENDX
