*COMDECK A128EBC
********************************************* 
*                                           * 
* ASCII (128) TO EBCDIC CONVERSION TABLE    * 
*                                           * 
********************************************* 
          NAM    A128EBC
          SPC    2
*CALL HASPMACRO 
          SPC    4
          ENT    A128EBC
A128EBC   VMC    00,01        NUL           , SOH              ($00-$01)
          VMC    02,03        STX           , ETX              ($02-$03)
          VMC    37,2D        EOT           , ENQ              ($04-$05)
          VMC    2E,2F        ACK           , BEL              ($06-$07)
          VMC    16,05        BS            , HT               ($08-$09)
          VMC    25,0B        LF            , VT               ($0A-$0B)
          VMC    0C,0D        FF            , CR               ($0C-$0D)
          VMC    0E,0F        SO            , SI               ($0E-$0F)
          VMC    10,11        DLE           , DC1              ($10-$11)
          VMC    12,13        DC2           , DC3              ($12-$13)
          VMC    3C,3D        DC4           , NAK              ($14-$15)
          VMC    32,26        SYN           , ETB              ($16-$17)
          VMC    18,19        CAN           , EM               ($18-$19)
          VMC    3F,27        SUB           , ESC              ($1A-$1B)
          VMC    1C,1D        FS - IFS      , GS - IGS         ($1C-$1D)
          VMC    1E,1F        RS - IRS      , US - IUS         ($1E-$1F)
          VMC    40,4F        SPACE         , EXCLAIM PT-VERT  ($20-$21)
          VMC    7F,7B        QUOTE         , POUND            ($22-$23)
          VMC    5B,6C        DOLLAR        , PERCENT          ($24-$25)
          VMC    50,7D        AMPERSAND     , APOSTROPHE       ($26-$27)
          VMC    4D,5D        L PAREN.      , R PAREN.         ($28-$29)
          VMC    5C,4E        ASTERISK      , PLUS             ($2A-$2B)
          VMC    6B,60        COMMA         , MINUS            ($2C-$2D)
          VMC    4B,61        PERIOD        , SLASH            ($2E-$2F)
          VMTI   F0           0 THRU 7                         ($30-$37)
          VMC    F8,F9        8             , 9                ($38-$39)
          VMC    7A,5E        COLON         , SEMI COLON       ($3A-$3B)
          VMC    4C,7E        LESS THAN     , EQUAL            ($3C-$3D)
          VMC    6E,6F        GREATER THAN  , QUESTION MARK    ($3E-$3F)
          VMC    7C,C1        AT SIGN       , A                ($40-$41)
          VMTI   C2           B THRU I                         ($42-$49)
          VMTI   D1           J THRU Q                         ($4A-$51)
          VMC    D9,E2        R             , S                ($52-$53)
          VMC    E3,E4        T             , U                ($54-$55)
          VMC    E5,E6        V             , W                ($56-$57)
          VMC    E7,E8        X             , Y                ($58-$59)
          VMC    E9,4A        Z             , L BRACKET - CENT ($5A-$5B)
          VMC    E0,5A        REVERSE SLASH , R BRACKET - EXCL ($5C-$5D)
          VMC    5F,6D        & - NOT SIGN  , UNDERLINE        ($5E-$5F)
          VMC    79,81        ACCENT        , SM A             ($60-$61)
          VMTI   82           SM B - SM I   , SM B - SM I      ($62-$69)
          VMTI   91           SM J - SM Q   , SM J - SM Q      ($6A-$71)
          VMC    99,A2        SM R          , SM S             ($72-$73)
          VMC    A3,A4        SM T          , SM U             ($74-$75)
          VMC    A5,A6        SM V          , SM W             ($76-$77)
          VMC    A7,A8        SM X          , SM Y             ($78-$79)
          VMC    A9,C0        SM Z          , L BRACE          ($7A-$7B)
          VMC    6A,D0        SPLIT VERT    , R BRACE          ($7C-$7D)
          VMC    A1,07        TILDE         , DEL              ($7E-$7F)
          END    A128EBC
