2014-03-04 21:45 GMT+01:00 Karol Majewski <[email protected]>:
> 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
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user
