50 lines
1.3 KiB
TeX
50 lines
1.3 KiB
TeX
\ifdim\the\fontdimen2\tenrm=3.33333pt
|
|
% almost definitely using CM fonts
|
|
\font\eightrm cmr8
|
|
\font\eighti cmmi8
|
|
\font\eightsy cmsy8
|
|
\font\eightit cmti8
|
|
\font\eightbf cmbx8
|
|
\font\eighttt cmtt8
|
|
\else\ifx\ljmagnification\undefined
|
|
\def\fontstem#1{\expandafter\fontstemII\fontname#1 \end}%
|
|
\def\fontstemII#1 #2\end{#1 }%
|
|
\font\eightrm \fontstem\tenrm at 8pt
|
|
\font\eighti cmmi8
|
|
\font\eightsy cmsy8
|
|
\font\eightit \fontstem\tenit at 8pt
|
|
\font\eightbf \fontstem\tenbf at 8pt
|
|
\font\eighttt \fontstem\tentt at 8pt
|
|
\else
|
|
\setcountCCLVtoljmag
|
|
\font\eighti cmmi8 scaled \count255
|
|
\font\eightsy cmsy8 scaled \count255
|
|
\multiply\count255 by 4
|
|
\divide\count255 by 5
|
|
\font\eightrm \fontstem\tenrm scaled \count255
|
|
\font\eightit \fontstem\tenit scaled \count255
|
|
\font\eightbf \fontstem\tenbf scaled \count255
|
|
\font\eighttt \fontstem\tentt scaled \count255
|
|
\fi\fi
|
|
|
|
\skewchar\eighti'177
|
|
\skewchar\eightsy'60
|
|
|
|
\def\eightpoint{%
|
|
\textfont0\eightrm
|
|
\textfont1\eighti
|
|
\textfont2\eightsy
|
|
\textfont\itfam\eightit
|
|
\textfont\bffam\eightbf
|
|
\textfont\ttfam\eighttt
|
|
\def\rm{\fam0\eightrm}%
|
|
\def\oldstyle{\fam1\eighti}%
|
|
\def\it{\fam\itfam\eightit}%
|
|
\def\bf{\fam\bffam\eightbf}%
|
|
\def\tt{\fam\ttfam\eighttt}%
|
|
\rm
|
|
\setbox\strutbox\hbox{\vrule height .85em depth .35em width
|
|
0pt }%
|
|
\normalbaselineskip 1.2em
|
|
\normalbaselines}
|