]> git.donarmstrong.com Git - lilypond.git/blobdiff - mf/feta-nummer.mf
* GNUmakefile.in (EXTRA_DIST_FILES): remove VIM stuff.
[lilypond.git] / mf / feta-nummer.mf
index 5e9569779d2a6639a55695f8cde648bd79d6cc1e..7b1778b15b009ebee631edddec30b7571ef48809 100644 (file)
@@ -5,10 +5,13 @@ 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#;
 
@@ -20,16 +23,30 @@ 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#;