Re: Markup à déplacer

[Valentin Villenave]

On 3/20/20, JMarc <address@hidden> wrote:
> Par exemple

Un peu plus robuste :

slashStem = {
  \once \override Stem.stencil =
  #(lambda (grob)
     (let* ((stem (ly:stem::print grob))
            (stem-Y (ly:stencil-extent stem Y))
            (stem-len (- (cdr stem-Y) (car stem-Y))))
       (ly:stencil-combine-at-edge
        (ly:stem::print grob) Y
        (- (ly:grob-property grob 'direction))
        (grob-interpret-markup grob
         (markup #:center-align #:beam 3 0.4 0.4))
        (+ 1 (- (/ stem-len 2))))))
}

{
  \slashStem <c' c''>2
}

V.