* lily/vaticana-ligature-engraver.cc (need_extra_space): renamed

[lilypond.git] / mf / feta-generic.mf

diff --git a/mf/feta-generic.mf b/mf/feta-generic.mf
index 01d1cb2c7a9f7a09f73f5b764b5330fedb84c396..0afbcdd9a0710342fbebdf589177c1e93d8a4932 100644 (file)
--- a/mf/feta-generic.mf
+++ b/mf/feta-generic.mf
@@ -1,10 +1,11 @@
-i% 
-% feta-generic.mf --  implement 
 % 
+% feta-generic.mf --  implement generic stuff: include lots of files, but don't
+%  set dims.
+%
 % source file of the Feta (defintively not an abbreviation for Font-En-Tja)
 % music font
 % 
-% (c) 1997, 1998 Han-Wen Nienhuys <hanwen@stack.nl>
+% (c) 1997--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 % 
 
 
@@ -12,18 +13,19 @@ if test = -1:
        mode := smoke;
 fi
 
-mode_setup;
+staffsize# := design_size * pt#;
 
+mode_setup;
 
 input feta-macros;
 
-make_pen_stack;
-make_picture_stack;
 input feta-params;
 
+font_x_height  staff_space#;
 
 
 
+fet_beginfont("feta", design_size, "fetaMusic");
 if test = 0: 
        input feta-eindelijk;
        input feta-toevallig;
@@ -33,14 +35,20 @@ if test = 0:
        input feta-banier;
        input feta-klef;
        input feta-timesig;
+       input feta-pendaal;
+       input feta-accordion;
 else:
-       input feta-bolletjes;   
-%      input feta-banier;
-%      input feta-eindelijk;
-%      input feta-klef;
-%      input feta-toevallig;
-%      input feta-schrift;
-%      input feta-schrift;
-%      input feta-haak;
-%      input feta-timesig;
+       input feta-test-generic.mf;
+
 fi
+
+autometric_parameter("staffsize", staffsize#);
+autometric_parameter("stafflinethickness", stafflinethickness#);
+autometric_parameter("staff_space", staff_space#)
+autometric_parameter("linethickness", linethickness#)
+autometric_parameter("black_notehead_width", black_notehead_width#);
+autometric_parameter("ledgerlinethickness", ledgerlinethickness#);
+autometric_parameter("blot_diameter", blot_diameter#);
+
+fet_endfont;
+