Marcar notas de las partes habladas con unas aspas en la plica ¶
Este ejemplo muestra cómo añadir aspas sobre las plicas. Marcamos
el comienzo de una sección hablada con la instrucción
\speakOn, y el final con \speakOff.
speakOn = \override Stem.stencil =
#(lambda (grob)
(let* ((x-parent (ly:grob-parent grob X))
(is-rest? (ly:grob? (ly:grob-object x-parent 'rest))))
(if is-rest?
empty-stencil
(ly:stencil-combine-at-edge
(ly:stem::print grob)
Y
(- (ly:grob-property grob 'direction))
(grob-interpret-markup
grob
(markup #:center-align #:fontsize -4
#:musicglyph "noteheads.s2cross"))
-1.7))))
speakOff = \revert Stem.stencil
\new Staff {
\relative c'' {
a4 b a c
\speakOn
g4 f r g8 a
b4 r r8 d e4
\speakOff
c4 a g f
}
}