% hpfontshow.tex to do one-line or full showings of builtin LJ 4 fonts.

\newif\ifoneline \onelinefalse % one-line showings, or full tables?
\input fontabbrev 

\def\startfamily#1{\def\family{#1}\bigbreak} % glue disappears at page breaks

% Print a one-line sample of the font #1.
\def\fontline#1{%
  \def\variant{#1}%
  \font\testfont = \family\variant
  \testfont
  \vskip3pt
  \line{%
    \hbox to 42pt{\tt \fontname\testfont\hfil}%
    \fullname
    \hfil
    ABCDEFGHIJKLMNOPQRSTUVWXYZ
    abcdefghijklmnopqrstuvwxyz
    0123456789%
  }
  \vfil
}

\def\fullname{%
  \csname \family family\endcsname
  \space
  \csname \variant variant\endcsname
  \space
}


\startfamily{cal}
\dofont{m}
\dofont{x}

\startfamily{cao}
\dofont{r}
\dofont{ri}
\dofont{b}

\startfamily{ccd}
\dofont{rrc}

\startfamily{ccr}
\dofont{r}
\dofont{ri}
\dofont{b}
\dofont{bi}

\startfamily{cgm}
\dofont{r}
\dofont{ri}
\dofont{b}
\dofont{bi}

\startfamily{clg}
\dofont{r}
\dofont{ri}
\dofont{b}

\startfamily{cmg}
\dofont{r}

\startfamily{cop}
\dofont{r}
\dofont{ri}
\dofont{b}
\dofont{bi}

\startfamily{cot}
\dofont{r}

\startfamily{ctm}
\dofont{r}
\dofont{ri}
\dofont{b}
\dofont{bi}

\startfamily{cun}
\dofont{m}
\dofont{mi}
\dofont{b}
\dofont{bi}

\startfamily{cun}
\dofont{mrc}
\dofont{mic}
\dofont{brc}
\dofont{bic}

\startfamily{hwi}
\dofont{r}

\startfamily{mhv}
\dofont{r}
\dofont{ri}
\dofont{b}
\dofont{bi}

\startfamily{mnt}
\dofont{r}
\dofont{ri}
\dofont{b}
\dofont{bi}

\startfamily{msy}
\dofont{r}

\bye
