1 
 2 /* special characters include file -------------------------------------------- */
 3 dcl (nl initial("
 4 "),                                     /* new line character */
 5      return_char initial("^M"
 6 ), /* return character */
 7      print_on initial("^F"),  /* turn printer on */
 8      print_off initial("^U"), /* ^F turn printer off */
 9      red_shift initial("^N"), /* red ribbon */
10      black_shift initial("^O"),         /* black ribbon shift */
11      tab initial("  "),       /* tab character */
12      quote initial(""""),     /* double quote */
13      apostrophe initial("'"), /* single quote */
14      backspace initial("^H"), /* backspace */
15      del_char initial("¿")    /* delimiter - six seven seven character */
16           ) static internal char(1) aligned;
17 /* end of special characters include file ------------------------------------- */
18