*COMDECK DC4BCD 
         NAM   DC4BCD 
*CALL CONVMACRO 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*        DISPLAY CODE (64 CHAR SET) TO BCD CONVERSION TABLE           * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
         ENT   DC4BCD 
DC4BCD   VMC   40,31          COLON         , A               ($00-$01) 
         VMC   32,B3          B             , C               ($02-$03) 
         VMC   34,B5          D             , E               ($04-$05) 
         VMC   B6,37          F             , G               ($06-$07) 
         VMC   38,B9          H             , I               ($08-$09) 
         VMC   A1,A2          J             , K               ($0A-$0B) 
         VMC   23,A4          L             , M               ($0C-$0D) 
         VMC   25,26          N             , O               ($0E-$0F) 
         VMC   A7,A8          P             , Q               ($10-$11) 
         VMC   29,52          R             , S               ($12-$13) 
         VMC   D3,54          T             , U               ($14-$15) 
         VMC   D5,D6          V             , W               ($16-$17) 
         VMC   57,58          X             , Y               ($18-$19) 
         VMC   D9,4A          Z             , 0               ($1A-$1B) 
         VMC   C1,C2          1             , 2               ($1C-$1D) 
         VMC   43,C4          3             , 4               ($1E-$1F) 
         VMC   45,46          5             , 6               ($20-$21) 
         VMC   C7,C8          7             , 8               ($22-$23) 
         VMC   49,B0          9             , +               ($24-$25) 
         VMC   20,2C          -             , *               ($26-$27) 
         VMC   51,DC          /             , (               ($28-$29) 
         VMC   BC,AB          )             , $               ($2A-$2B) 
         VMC   CB,D0          =             , SPACE           ($2C-$2D) 
         VMC   5B,3B          ,             , .               ($2E-$2F) 
         VMC   5E,4F          #             , [               ($30-$31) 
         VMC   DA,CE          ]             , PERCENT         ($32-$33) 
         VMC   4C,5D          "             , RIGHT ARROW     ($34-$35) 
         VMC   2A,DF          !             , &               ($36-$37) 
         VMC   AD,AE          '             , DOWN ARROW      ($38-$39) 
         VMC   BA,2F          <             , >               ($3A-$3B) 
         VMC   CD,3D          @             , \               ($3C-$3D) 
          VMC    D0,BF       NOT SIGN      , ;
          END 
