mf/feta-generic.mf

   1 %
   2 % feta-generic.mf --  implement
   3 %
   4 % source file of the Feta (defintively not an abbreviation for Font-En-Tja)
   5 % music font
   6 %
   7 % (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   8 %
   9
  10
  11 if test = -1:
  12         mode := smoke;
  13 fi
  14
  15 mode_setup;
  16
  17
  18 input feta-macros;
  19
  20 make_pen_stack;
  21 make_picture_stack;
  22 input feta-params;
  23
  24
  25
  26
  27 if test = 0:
  28         input feta-eindelijk;
  29         input feta-toevallig;
  30         input feta-puntje;
  31         input feta-bolletjes;
  32         input feta-schrift;
  33         input feta-banier;
  34         input feta-klef;
  35 else:
  36 %       input feta-bolletjes;
  37 %       input feta-banier;
  38 %       input feta-eindelijk;
  39 %       input feta-klef;
  40 %       input feta-toevallig;
  41 %       input feta-schrift;
  42 %       input feta-schrift;
  43         input feta-haak;
  44 fi