|
From: | Andrew Bernard |
Subject: | Flag stencil |
Date: | Thu, 24 Mar 2016 13:00:30 +1100 |
User-agent: | Microsoft-MacOutlook/0.0.0.160212 |
When making a custom flag stencil, how does one go about getting all the flags added to the stem, for the various note values, not just one? Here’s what I have so far, which only makes one flag for any value. I want to draw my own paths, not add glyphs from the font. Andrew — snip \version "2.19.38" #(define flag-stil (lambda (grob) (let* ((stem (ly:grob-parent grob X)) (is-up? (eqv? (ly:grob-property stem 'direction ) UP)) (duration (ly:grob-property stem 'duration-log)) ) (make-path-stencil `(moveto 0 0 lineto 1.5 -1 lineto 1.5 -1.5 lineto 0 -0.5 closepath) 0.1 1 1 #t) ))) notes = { c'4 c'8 c'16 c'32 } { \override Flag.stencil = #flag-stil \notes } — snip |
[Prev in Thread] | Current Thread | [Next in Thread] |