% display all feta chars in a pretty picture
% GNU LilyPond
% (c) 1998--2000 Jan Nieuwenhuizen <janneke@gnu.org>
%
% urg: fool ls-latex
\def\urg{
\title{The Feta font}
\author{JCN}
\begin{document}
}


\parindent0pt
\nopagenumbers
\newcount\n
\newcount\i

\font\fetatwenty = feta20
\font\fetanumber = feta-nummer12
\font\fetafinger = feta-nummer5
\font\fetadyn = feta-din10 scaled \magstep 2
\font\titlefont = cmbx12 scaled \magstep 4
\font\subtitle = cmr9

\def\lilyfooter{Lily was here}
\def\setchar#1#2{\hbox to\charwidth{\hss{#1\char#2}\hss}}

\def\charsperline{6}
\def\charheight{55pt}
\def\charwidth{60pt}

\def\listfont#1#2#3{
        \n=#2
        \advance\n by-1
        \advance\n by-\charsperline
        \loop\ifnum\n<#3
        \advance\n by\charsperline
        \i=0
        {\vbox to\charheight{\vss\centerline{
        {\loop\ifnum\i<\charsperline
        \advance\i by1
        \advance\n by1
        {\setchar{#1}{\number\n}}
        \repeat}}}}\repeat}

\def\title#1{\centerline{\titlefont #1}}
\def\author#1{\centerline{#1}}

\title{FETA}

\centerline{\subtitle (definitely not an abbreviation for Font-En-Tja)}

\author{Han-Wen Nienhuys and Jan Nieuwenhuizen}


\vskip5mm

\listfont{\fetatwenty}{0}{105}
% urg
\vskip-\charheight
\listfont{\fetanumber}{48}{58}
\vskip-\charheight
\listfont{\fetafinger}{48}{58}
\vskip-\charheight
\listfont{\fetadyn}{0}{6}
\vskip-\charheight

\lilyfooter

\bye