tex/fetdefs.tex

   1 % fetdefs.tex
   2 % encapsulating tex backend for auto-generated font-en-tja definitions
   3
   4 \def\fetsixteendefs{
   5         \font\fontentja=font-en-tja16
   6         \font\vetfont=vette-beams16
   7         \font\fetanummer=feta-nummer8
   8 }
   9 \def\fettwentydefs{
  10         \font\fontentja=font-en-tja20
  11         \font\vetfont=vette-beams20
  12         \font\fetanummer=feta-nummer10
  13 }
  14
  15 % \def\fetdef#1#2{\def#1{\fetchar{#2}}}
  16 % ugh, linewidth, ugh, tablexx.ly balldims not used!
  17 \def\fetdef#1#2{\def#1{\lower.3884\staffrulethickness\hbox{\fetchar{#2}}}}
  18 \def\fetchar#1{\fontentja\char#1}
  19
  20 %\input font-en-tja16
  21 \input font-en-tja20
  22
  23 \def\beamslope#1#2{{\count0=#2\advance\count0 by#1
  24         \advance\count0by128
  25         {\vetfont\char\count0}}}
  26
  27 % stacked numbers; overrules def in lilyponddefs
  28 % oeps: \meter 12/8;
  29 \def\generalmeter#1#2{%
  30         \vbox to 0pt{\vss%
  31         \hbox to0.42\balkheight{\hss\fetanummer\char#1\hss}%
  32         \nointerlineskip%
  33         \hbox to0.42\balkheight{\hss\fetanummer\char#2\hss}%
  34         \vss}}