[ << Editorial annotations ]	[Top][Contents]	[ Text >> ]
[ < Hacer unas líneas del pentagrama más gruesas que las otras ]	[ Up: Editorial annotations ]	[ Measure counters > ]

---

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