X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=mf%2Ffeta-macros.mf;h=e0b10ca4479455eaff7a4cde80d1994933d190eb;hb=ea2977bafe0df23e13a7249a9fbf522b1a2f12d3;hp=5a322a75e29e6d951ce7db56c79d078a98af910a;hpb=de55ca814fe6cf872710e485fa2d39fa739b929e;p=lilypond.git

diff --git a/mf/feta-macros.mf b/mf/feta-macros.mf
index 5a322a75e2..e0b10ca447 100644
--- a/mf/feta-macros.mf
+++ b/mf/feta-macros.mf
@@ -17,6 +17,14 @@ def treq =
 enddef;
 
 
+def draw_staff(expr first, last, offset)=
+	pickup pencircle scaled stafflinethickness;
+	for i:= first step 1 until last:
+		draw (- interline, (i + offset) * interline) .. (4 interline,( i+ offset)* interline);
+	endfor
+	enddef;
+
+
 %
 % Transforms
 %
@@ -161,7 +169,9 @@ def brush(expr a,w,b,v) =
 enddef;
 
 %
-%
+% Draw a (rest) crook, starting at thickness STEM in point A,
+% ending a ball W to the left, diameter BALLDIAM
+% ypart of the center of the ball is BALLDIAM/4 lower than ypart A
 %
 def balled_crook(expr a, w, balldiam, stem) =
 begingroup;