]> git.donarmstrong.com Git - lilypond.git/commitdiff
lilypond-0.1.26
authorfred <fred>
Sun, 24 Mar 2002 20:01:03 +0000 (20:01 +0000)
committerfred <fred>
Sun, 24 Mar 2002 20:01:03 +0000 (20:01 +0000)
mf/feta-eindelijk.mf
mf/feta-toevallig.mf

index d6d7cfcf5448b752cb7d9d99b477cb7c350a9a9b..bdad5b6ea1faac8278ced9a0c6628fc3c89627b0 100644 (file)
@@ -52,7 +52,8 @@ def block_rest=
        save p;
        path p;
        p:=z1 -- z2 -- z3 -- z4 -- cycle;
-       draw_rounded_path(p, blot_diameter);
+
+       filldraw p;
 enddef;
 
 fet_beginchar( "whole rest", "0", "wholerest");
@@ -148,10 +149,6 @@ fet_beginchar("8th rest","3","eighthrest");
        currentpicture:=currentpicture shifted (0,interline);
        fet_endchar;
 
-def tand(expr alpha) = 
-       (sind alpha/cosd alpha);
-       enddef;
-
 fet_beginchar("16th rest","4","sixteenthrest");
        save alpha,cw,h,w;
        alpha=74;
index 1238eb366b9e0a4ac44f95df18f9c6081a86824f..8528ee47cdda90f07dc9708f09ce72bc0bf902a0 100644 (file)
@@ -50,8 +50,9 @@ fet_beginchar("Sharp" , "1", "sharp");
                +  vspan -- -hspan -vspan -- hspan - vspan -- cycle )
                shifted center;
 
-       draw_rounded_path((beam shifted (0,-interbeam/2)), roundness);
-       draw_rounded_path((beam shifted (0,interbeam/2)), roundness);
+       pickup pencircle scaled roundness;
+       filldraw (beam shifted (0,-interbeam/2));
+       filldraw (beam shifted (0,interbeam/2));
 
        pickup pencircle scaled stemwidth;
        x3 = x4 = xpart center;
@@ -219,9 +220,11 @@ fet_beginchar("Double sharp", "2", "sharpsharp")
        z5 = z1 reflectedabout((0,0), (1,1));
 
        labels(1,2,3,4,5);
-       draw_rounded_path(  
-               z1{dir 45} .. {right}z2 -- z3 -- z4{down} .. {dir 225}z5 .. cycle,
-       1/20 interline);
+       pickup pencircle scaled 1/20 interline;
+       filldraw  
+               z1{dir 45} .. {right}z2 -- z3 -- 
+               z4{down} .. {dir 225}z5 .. cycle;
+       
 
        addto currentpicture also currentpicture yscaled (-d/h);
        addto currentpicture also currentpicture xscaled (-1);