tex/test-pedal.tex

   1 % pedal.tex
   2
   3 \hsize = 296mm
   4 \vsize = 210mm
   5
   6 % fix chord.cc::banter_str before removing these
   7 \def\fetdef#1#2{%
   8   \def#1{\hbox{\char#2}}}
   9
  10 \fetdef\pedalasterisk{101}
  11 \fetdef\pedaldash{102}
  12 \fetdef\pedaldot{103}
  13 \fetdef\pedalP{104}
  14 \fetdef\pedald{105}
  15 \fetdef\pedale{106}
  16
  17 %\font\fetatwentysixfontt=feta26 scaled \magstep 4
  18 %\font\fetatwentysixfontt=feta26 scaled 18842
  19 \font\fetatwentysixfontt=feta26 scaled 2407
  20 \magnification \magstep 4
  21
  22 \def\fetafont{\fetatwentysixfontt}
  23
  24 \baselineskip 12mm
  25
  26 \vbox{
  27 \kern 20mm
  28
  29 \hbox{
  30 \fetatwentysixfontt
  31 \hbox { \pedalP\kern-0.06ex\pedale\kern -0.55ex\pedald\pedaldot}
  32 \kern 50mm
  33 \pedalasterisk
  34 }
  35 }
  36
  37 \end
  38
  39 %\endinput