X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Ffeta-generic.mf;h=1fca5618a39723b5a4be2916f3a205f6e439e99e;hb=8d4c8ba8a9b7f269bdfc42cbba8975f7cfdb206e;hp=72a00dbac0d01fbf5c7a26be38e3cccf542d15b8;hpb=ce521e79fd7669b45c8c1132e4b5693a03b5d90a;p=lilypond.git

diff --git a/mf/feta-generic.mf b/mf/feta-generic.mf
index 72a00dbac0..1fca5618a3 100644
--- a/mf/feta-generic.mf
+++ b/mf/feta-generic.mf
@@ -1,11 +1,11 @@
 % 
-% feta-generic.mf --  implement generic stuff: include lots of files, but don't
+% 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--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+% (c) 1997--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
 % 
 
 
@@ -13,21 +13,26 @@ if test = -1:
 	mode := smoke;
 fi
 
+staffsize# := design_size * pt#;
+
 mode_setup;
-%
 
 input feta-macros;
 
-make_pen_stack;
-make_picture_stack;
 input feta-params;
 
-font_x_height  staff_space#;
-font_coding_scheme "feta music";
+font_x_height staff_space#;
+
+%% this is a fallback so we can run the font without including feta-bolletjes.
+black_notehead_width# := 1.0 staff_space#;
+
+
+fet_beginfont ("feta", design_size, "fetaMusic");
 
 if test = 0: 
 	input feta-eindelijk;
 	input feta-toevallig;
+	input feta-arrow;
 	input feta-puntje;
 	input feta-bolletjes;
 	input feta-schrift;
@@ -35,19 +40,18 @@ if test = 0:
 	input feta-klef;
 	input feta-timesig;
 	input feta-pendaal;
+	input feta-haak;
 	input feta-accordion;
-	input feta-solfa;
-	
 else:
-%	input feta-bolletjes;	
-%	input feta-banier;
-%	input feta-eindelijk;
-%	input feta-klef;
-%	input feta-toevallig;
-%	input feta-schrift;
-%	input feta-haak;
-%	input feta-timesig;
-%	input feta-pendaal;
-%	input feta-accordion;
-	input feta-solfa;
+	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;