tmac/ec.tmac

   1 .\"@ ec.tmac
   2 .\"@ Switch to EC fonts.
   3 .\"@ Load this file before any language-specific stuff.
   4 .\"@ hcode values are not handled.
   5 .\"
   6 .\" Adapted to S-roff by Steffen (Daode) Nurpmeso <steffen@sdaoden.eu>.
   7 .
   8 .nr _C \n(.C
   9 .cp 0
  10 .
  11 .ftr R REC
  12 .ftr I IEC
  13 .ftr B BEC
  14 .ftr BI BIEC
  15 .
  16 .sty 1 R
  17 .sty 2 B
  18 .sty 3 I
  19 .sty 4 BI
  20 .
  21 .ftr CW CWEC
  22 .ftr CWI CWIEC
  23 .ftr CR CWEC
  24 .ftr C CWEC
  25 .ftr CO CWIEC
  26 .ftr CI CWIEC
  27 .ftr TT CWEC
  28 .ftr H HREC
  29 .
  30 .special MI S
  31 .fspecial TREC TRTC TR
  32 .fspecial TIEC TITC TI
  33 .fspecial TBEC TBTC TB
  34 .fspecial TBIEC TBITC TBI
  35 .fspecial HREC HRTC HR
  36 .fspecial HIEC HITC HI
  37 .fspecial HBEC HBTC HB
  38 .fspecial HBIEC HBIEC HBI
  39 .fspecial CWEC CWTC SC CW
  40 .fspecial CWIEC CWITC SC CWI
  41 .
  42 .\" remove definitions of glyphs which are in TC fonts
  43 .rchar \[co] \[rg]
  44 .rchar \[ct]
  45 .rchar \[tm]
  46 .rchar \[f/]
  47 .rchar \[S1] \[S2] \[S3]
  48 .rchar \[Of] \[Om]
  49 .rchar \[Cs]
  50 .rchar \[de]
  51 .
  52 .\" \[pl] and \[eq] must be roman
  53 .char \[pl] \f[TREC]+
  54 .char \[eq] \f[TREC]=
  55 .
  56 .schar \[nm] \o'\f[TREC]/\[mo]'
  57 .
  58 .\" an ID register
  59 .nr ECFONTS 1
  60 .
  61 .cp \n(_C
  62 .
  63 .\" s-ts-mode