*COMDECK ASKPRT 
          NAM    ASKPRT 
*CALL CONVMACRO 
          SPC    3
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
*                                                                     * 
*     MODE 4    ASCII TO ASCII CONVERSION                             * 
*                                                                     * 
*               THE FOLLOWING CODES, WHICH ARE MODE 4 PROTOCOL        * 
*               CHARACTERS, ARE TRANSLATED TO BLANKS ($20).           * 
*                                                                     * 
*                        01  -  SOH                                   * 
*                        02  -  STX                                   * 
*                        03  -  ETX                                   * 
*                        16  -  SYN                                   * 
*                        17  -  ETB                                   * 
*                        1B  -  ESC                                   * 
*                                                                     * 
*                                                                     * 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
          SPC    3
          ENT    ASKPRT 
ASKPRT    VMC    00,20       NUL       , SPACE                ($00-$01) 
          VMC    20,20       SPACE     , SPACE                ($02-$03) 
          VMC    04,05       EOT       , ENQ                  ($04-$05) 
          VMC    06,07       ACK       , BEL                  ($06-$07) 
          VMTI   08          -                                ($08-$0F) 
          VMC    10,11       DLE       , DC1                  ($10-$11) 
          VMC    12,13       DC2       , DC3                  ($12-$13) 
          VMC    14,15       DC4       , NAK                  ($14-$15) 
          VMC    20,20       SPACE     , SPACE                ($16-$17) 
          VMC    18,19       CAN       , EM                   ($18-$19) 
          VMC    1A,20       SUB       , SPACE                ($1A-$1B) 
          VMC    1C,1D       FS        , GS                   ($1C-$1D) 
          VMC    1E,1F       RS        , US                   ($1E-$1F) 
          VMTI   20          -                                ($20-$27) 
          VMTI   28          -                                ($28-$2F) 
          VMTI   30          -                                ($30-$37) 
          VMTI   38          -                                ($38-$3F) 
          VMTI   40          -                                ($40-$47) 
          VMTI   48          -                                ($48-$4F) 
          VMTI   50          -                                ($50-$57) 
          VMTI   58          -                                ($58-$5F) 
          VMTI   60          -                                ($60-$67) 
          VMTI   68          -                                ($68-$6F) 
          VMTI   70          -                                ($70-$77) 
          VMTI   78          -                                ($78-$7F) 
          END 
