]> git.donarmstrong.com Git - lilypond.git/blobdiff - mf/feta-nummer-code.mf
2003 -> 2004
[lilypond.git] / mf / feta-nummer-code.mf
index cafc8a7aaab2cd72a490d9b056006ec94d3182bf..0f0646a16da2fbc803e43d7935fa24bdbd312362 100644 (file)
@@ -4,7 +4,7 @@
 %
 % source file of the Feta (not the Font-En-Tja) music font
 % 
-% (c) 1997--2002 Jan Nieuwenhuizen <janneke@gnu.org>
+% (c) 1997--2004 Jan Nieuwenhuizen <janneke@gnu.org>
 
 %
 % These numbers were taken from a part that that the EJE violas played
@@ -175,7 +175,7 @@ save dot_diam;
 dot_diam# = 7/8flare#;
 define_pixels(dot_diam);
 
-code := 32;
+code := 31; % , 32
 fet_beginchar("Space", "space", "space")
        set_char_box(0, space#,  0,height#);
 fet_endchar;
@@ -317,6 +317,11 @@ fet_beginchar("Numeral 2", "2", "two")
 
 fet_endchar;
 
+
+%%
+% TODO: should widen a bit. The right edge of the 3 bumps into next glyph in
+% combinations 
+%
 fet_beginchar("Numeral 3", "3", "three")
        set_char_box(0, 2/3height#*widen, 0, height#);
        message "w:"&decimal w;
@@ -324,12 +329,13 @@ fet_beginchar("Numeral 3", "3", "three")
        penpos1(hair,-90);
 
 %      flare_start = 0.25 ;
-       x1l = 35/80 w;
+       x1l = 36/80 w;
        y1l = h;
        
 %      z1l=(17/16thick,h);
        penpos2(7/8thick,180);
-       z2l=(w-thick/8,3/4h+thick/16);
+       x2l= w-thick/8;
+       y2l = 3/4h + thick*  3/32; 
        penpos3(thin,90);
        z3=(w/2,h/2+1/8thick);
        penpos4(thin,90);
@@ -343,7 +349,8 @@ fet_beginchar("Numeral 3", "3", "three")
        x6r= 37/80 w;
        y6r = 0;
        penpos7(3/2thin,90);
-       z7=(x5,y3);
+       x7 = .83 w ;
+       y7 = y3;
        penlabels(1,2,3,4,5,6,7);
        save alpha; alpha=25;
        save t; t=tense;
@@ -577,3 +584,6 @@ fet_endchar;
 
 fet_endgroup("number")
 
+ligtable "3" : "3" kern 0.1 space#,  "0" kern 0.1 space#; 
+ligtable "2" : "7" kern 0.15 space#;
+