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
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user
