Drawing circles around note heads: Difference between revisions
Import snippet from LSR |
mNo edit summary |
||
| (4 intermediate revisions by 2 users not shown) | |||
| Line 1: | Line 1: | ||
A circle can be drawn around a note head by providing a custom Scheme function to temporarily override the <code>stencil</code> property. | |||
<lilypond version="2.24 | <lilypond version="2.24"> | ||
%LSR contributed by Valentin http://lists.gnu.org/archive/html/lilypond-user/2010-10/msg00523.html | % LSR originally contributed by Valentin | ||
% LSR http://lists.gnu.org/archive/html/lilypond-user/2010-10/msg00523.html | |||
circle = | circle = \tweak NoteHead.stencil | ||
\ | #(lambda (grob) | ||
(let* ((note (ly:note-head::print grob)) | (let* ((note (ly:note-head::print grob)) | ||
(combo-stencil (ly:stencil-add | (combo-stencil (ly:stencil-add | ||
| Line 13: | Line 14: | ||
(ly:stencil-extent note X) | (ly:stencil-extent note X) | ||
(ly:stencil-extent note Y)))) | (ly:stencil-extent note Y)))) | ||
\etc | |||
{ \circle c'' } | { \circle c'' } | ||
| Line 18: | Line 20: | ||
[[Category:Editorial annotations]] | [[Category:Editorial annotations]] | ||
[[Category:Scheme]] | |||
[[Category:Included in the official documentation]] | [[Category:Included in the official documentation]] | ||
[[Category:Snippet]] | |||
Latest revision as of 06:53, 12 December 2025
A circle can be drawn around a note head by providing a custom Scheme function to temporarily override the stencil property.
\version "2.24"
% LSR originally contributed by Valentin
% LSR http://lists.gnu.org/archive/html/lilypond-user/2010-10/msg00523.html
circle = \tweak NoteHead.stencil
#(lambda (grob)
(let* ((note (ly:note-head::print grob))
(combo-stencil (ly:stencil-add
note
(circle-stencil note 0.1 0.8))))
(ly:make-stencil (ly:stencil-expr combo-stencil)
(ly:stencil-extent note X)
(ly:stencil-extent note Y))))
\etc
{ \circle c'' }
