*
* $Id: e0c0.inc,v 1.1.1.1 1996/02/15 17:47:40 mclareni Exp $
*
* $Log: e0c0.inc,v $
* Revision 1.1.1.1  1996/02/15 17:47:40  mclareni
* Kernlib
*
*
*
* e0c0.inc
*
          MACRO
&L        E0C0
          SPACE
&L        DS        0C                  BYTE ALIGNMENT ONLY
          SPACE
*         THIS TRANSLATE TABLE CONVERTS CERN EBCDIC TO CERN
*         CDC DISPLAY CODE.
*         LOWER CASE CHARACTERS ARE CONVERTED INTO UPPER CASE
*         PERCENT (HEX 6C) AND COLON (HEX 7A) ARE BOTH CONVERTED
*         TO PERCENT (HEX 33, 63B)
*         VERTICAL BAR (HEX 4F) AND BACKSLASH (HEX E0) ARE BOTH
*         CONVERTED TO BACKSLASH (HEX 3D, 75B)
*         LOGICAL NOT/TILDE (HEX 5F) AND CIRCUMFLEX (HEX 6A) ARE
*         BOTH CONVERTED TO CIRCUMFLEX (HEX 3E, 76B)
*         LEFT AND RIGHT BRACE (HEX 4D, 5D) AND LEFT AND RIGHT
*         SQUARE BRACKETS(HEX AD,BD) ARE BOTH CONVERTED TO SQUARE
*         BRACKETS (HEX 31,32, 61B,62B)
          SPACE
          DC        X'30303030303030303030303030303030'
          DC        X'30303030303030303030303030303030'
          DC        X'30303030303030303030303030303030'
          DC        X'30303030303030303030303030303030'
          DC        X'30303030303030303030302F3A29253D'
          DC        X'37303030303030303030362B272A3F3E'
          DC        X'262830303030303030303E2E33353B39'
          DC        X'3030303030303030303033303C382C34'
          DC        X'30010203040506070809303130303030'
          DC        X'300A0B0C0D0E0F101112303230303030'
          DC        X'3030131415161718191A303030313030'
          DC        X'30303030303030303030303030323030'
          DC        X'30010203040506070809303030303030'
          DC        X'300A0B0C0D0E0F101112303030303030'
          DC        X'3D30131415161718191A303030303030'
          DC        X'1B1C1D1E1F2021222324303030303030'
          SPACE
          MEND