summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/csplain/base/fonttabs.tex
blob: 825bf2022a20212c5a9bbe143c9439b9a177e5c9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
% This macro prints font tables using of Knuth's TESTFONT macro
% March 25 1993                                         Petr Olsak

% In plain write following commands:
%
%       \input fonttabs
%       cmr10
%       cmbx10
%       ... etc.
%       \end
%
% The names of fonts are separed by space or endline.
% All fonts must been loadable.
% Each font takes place on one table on one page.

\let\noinit!
\input testfont
\vsize=24cm

\long\def\start#1{\expandafter\if\noexpand#1\relax
     \let\next\relax \let\nextnext\start
     \else \let\next\newtab \let\nextnext\relax
   \fi \next#1\nextnext}
\def\newtab#1\nextnext#2 {\message{font: #1#2}%
  \def\fontname{#1#2 }\startfont\table \vfill\eject \start}

\everypar={\egroup\everypar={} \start} \setbox0=\vbox\bgroup