*** empty log message ***

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

diff --git a/mf/feta-nummer.mf b/mf/feta-nummer.mf
index 476a2c43fa33232cdde885f3e80b2d06770b913e..7b1778b15b009ebee631edddec30b7571ef48809 100644 (file)
--- a/mf/feta-nummer.mf
+++ b/mf/feta-nummer.mf
@@ -1,11 +1,17 @@
-% feta-nummer-generic.mf
+% feta-nummer.mf
 % part of LilyPond's pretty-but-neat music font
 
 test:=0;
 
 input feta-autometric;
 input feta-macros;
-input feta-params;
+
+
+
+%%%
+% TODO: make sure font size  for text and
+% font size for music both jibe with the number font.
+%%%
 
 %blot_diameter# = .4pt#;
 
@@ -13,18 +19,34 @@ fet_beginfont("feta-nummer", design_size);
 mode_setup;
 
 height#:=designsize;
+space# := design_size/2;
 
 font_x_height height#;
+font_normal_space space#;
+font_coding_scheme "feta number";
+
+
+%
+% DOCME!
+%ugh. b and h are reused.
+%
 
 save b,h; 4h+b=1.15; 10h+b=1;
 fatten:=designsize*h+b;
+
 save b,h; 4h+b=1.05; 10h+b=1;
 widen:=designsize*h+b;
+
 tense=0.85;
 thick#:=7/30height#*fatten;
-thin#:=thick#/4*fatten;
-hair#:=blot_diameter#;
-flare#:=9/8thick#/fatten;
+thin#:=thick#/4*fatten  + max(.1 (height# / 10 - 1), 0);
+
+%% sqrt(.8 * blot_diameter#* thin#) ;
+hair#:= thin# * .8 ;
+
+
+flare#:=9/8 thick# + .75 (height# / 10 - 1);
+
 save b,h; 4h+b=1/8; 10h+b=1/6;
 kuulleke#:=thick#*designsize*h+b;
 foot_top#:=thick#;