mf/parmesan-generic.mf

   1 % -%-Fundamental-%- -*-Metafont-*-
   2 % parmesan-generic.mf --  implement generic stuff: include lots of files,
   3 % but don't set dims.
   4 %
   5 % source file of LilyPond's pretty-but-neat music font
   6 %
   7 % (c) 2002--2006 Juergen Reuter <reuter@ipd.uka.de>
   8 %
   9
  10
  11 if test = -1:
  12         mode := smoke;
  13 fi
  14
  15 mode_setup;
  16 %
  17 staffsize# := design_size * pt#;
  18
  19 input feta-macros;
  20 input feta-params;
  21
  22
  23 font_x_height  staff_space#;
  24
  25 fet_beginfont("parmesan", design_size, "parmesanMusic")
  26 if test = 0:
  27         input parmesan-rests;
  28         input parmesan-heads;
  29         input parmesan-clefs;
  30         input parmesan-custodes
  31         input parmesan-accidentals;
  32         input parmesan-flags;
  33         input parmesan-timesig;
  34         input parmesan-scripts;
  35         input parmesan-dots;
  36 else:
  37
  38 fi
  39 fet_endfont;
  40