lilypond-user
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Flag stencil


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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]