blob: f557b47aa2ef49e89da04bb1f3482ac98178924b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
\input fontinst.sty
\input multislot.sty
\mathchardef\apa=0
\catcode`\_=11
\add_to\pre_second_etx_pass_hook{\mathchardef\apa=1}
\catcode`\_=\underscorecatcode
\transformfont{ptmr8r}{\reencodefont{8r}{\fromafm{ptmr8a}}}
\installfonts
\installfamily{XX}{ptm}{}
\installfont{ptmr5z}{ptmr8r,psyr,latin}{multislot} {XX}{ptm}{m}{n}{}
\endinstallfonts
\bye
|