]> git.donarmstrong.com Git - lilypond.git/blobdiff - mf/klef.mf
patch::: 0.1.19.jcn1: tik
[lilypond.git] / mf / klef.mf
index 129c792e61d9d6caa56536e7a8932bba1ca2d919..47980e1a3305ea01b828e61544f4fca97bad4002 100644 (file)
@@ -3,10 +3,11 @@
 fet_begingroup("foobars")
 
 
-fet_beginchar(incr code, "F clef", "bassclef", "bassclef");
-       
+fet_beginchar("F clef", "bassclef", "bassclef");
+       set_char_box(0,0,0,0);
 fet_endchar;
-fet_beginchar(incr code, "G clef", "evolinclef", "evolinclef");
+
+fet_beginchar("G clef", "evolinclef", "evolinclef");
        save tilt;
        tilt = 15;
 
@@ -39,7 +40,7 @@ fet_beginchar(incr code, "G clef", "evolinclef", "evolinclef");
        penpos15(downstroke_thinness, tilt-90);
        set_char_box(0,0,0,0);
 
-%      penstroke z1e{dir 135} .. z3e ..  {left}z5e .. z7e ..  tension 1.2 .. z9e;% & z9e..  z12e .. z13e .. z15e;
-%      penlabels(1,3,5,7, 9,12,13,15);
+       penstroke z1e{dir 135} .. z3e ..  {left}z5e .. z7e ..  tension 1.2 .. z9e;% & z9e..  z12e .. z13e .. z15e;
+       penlabels(1,3,5,7, 9,12,13,15);
 fet_endchar;
 fet_endgroup("foobars");