mf/dyn.tex

   1 % dyn.tex
   2 % A tex file to help view dynamic letters
   3 %
   4
   5 \font\dynfont=feta-din10 scaled \magstep2
   6 \def\thefont{\dynfont}
   7
   8 \def\mb#1{{\thefont\char#1}}
   9
  10 \def\doitem#1{
  11         #1%
  12 %        \vbox to12pt{\vfill\hbox to0pt{\qquad\kern-1pt\twvrul\hss}}%
  13 %        \hbox to50pt{\qquad\twhrul\mb{#1}\hss}%
  14         \hbox to 30pt{\qquad\mb{#1}\hss}
  15         \setbox0=\hbox{\mb{#1}} width \the\wd0\ depth \the\dp0 \ height \the\ht0}
  16
  17 \newcount\n
  18 \def\charn{\n=-1
  19         \loop\ifnum\n<5\advance\n by1
  20         \doitem{\number\n}\endgraf\repeat}
  21
  22         \charn
  23
  24 \input dyndefs
  25
  26 \hbox{\dynp}
  27 \hbox{\dynpp}
  28 \hbox{\dynppp}
  29 \hbox{\dynmp}
  30 \hbox{\dynmf}
  31 \hbox{\dynff}
  32 \hbox{\dynf}
  33 \hbox{\dynfff}
  34 \hbox{\dynfp}
  35 \hbox{\dynsf}
  36 \hbox{\dynsfz}
  37 \hbox{\dynfz}
  38 \hbox{\dynrf}
  39
  40 \bye