[ << Scheme ]	[Top][Contents]	[ Spacing >> ]
[ < Imprimir el árbol genealógico de un grob ]	[ Up: Scheme ]	[ Rodear diversos objetos con una circunferencia > ]

---

Trazar circunferencias alrededor de la cabeza de las notas

Se puede trazar una circunferencia alrededor de la cabeza de una nota aportando una función de Scheme personalizada para sobreescribir temporalmente la propiedad stencil.

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'' }