2014-03-04 21:45 GMT+01:00 Karol Majewski <karo...@wp.pl>:
> Hi Harm,
>
> this is nice workaround, indeed.
>
> But how can I modify it to have different glyph for each duration-log? The 
> original code was:
[...]


If you only want noteheads of doThin-type, try:

\version "2.18.0"

#(define nhg
  (lambda (grob)
    (let* ((stil (ly:note-head::print grob))
           (dur-log (ly:grob-property grob 'duration-log))
           (nh-id-nr (if (>= dur-log 2) 2 1))
           (stem (ly:grob-object grob 'stem))
           (stem-dir (ly:grob-property stem 'direction))
           (new-note-head-stil
            (grob-interpret-markup grob
              (markup #:musicglyph (format #f "noteheads.u~adoThin"
nh-id-nr)))))

    (ly:stencil-scale new-note-head-stil 1 stem-dir))))

\layout {
  \context {
    \Voice
    \override NoteHead.stencil = #nhg
  }
}

\relative c '' {
  c1 c2 \repeat unfold 4 c8
  \repeat unfold 64 c4
}


HTH,
  Harm

_______________________________________________
bug-lilypond mailing list
bug-lilypond@gnu.org
https://lists.gnu.org/mailman/listinfo/bug-lilypond

Reply via email to