Re: how to insert text inside a hairpin?

[Aaron Hill]

On 2021-09-03 11:52 am, Kenneth Wolcott wrote:
>   I am engraving some music that has a "poco rit." embedded inside a 
> hairpin.
>
>   See attached image.
>
>   How do I do that in Lilypond?
>
>   I'm using Lilypond 2.22.0

Maybe something like this:

%%%%
\version "2.22.0"

overlayMarkup =
#(define-scheme-function
  (self-x self-y parent-x parent-y markup)
  ((number? 0) (number? 0) (number? 0) (number? 0) markup?)
  (grob-transformer 'stencil
   (lambda (grob orig)
    (let* ((xex (ly:stencil-extent orig X))
           (yex (ly:stencil-extent orig Y))
           (xoff (interval-index xex parent-x))
           (yoff (interval-index yex parent-y))
           (sten (grob-interpret-markup grob markup)))
     (set! sten (ly:stencil-aligned-to sten X self-x))
     (set! sten (ly:stencil-aligned-to sten Y self-y))
     (ly:stencil-add orig
      (ly:stencil-translate sten (cons xoff yoff)))))))

pocoRitMarkup =
 \markup \whiteout \tiny \italic "poco rit."
pocoRit =
 -\tweak stencil \overlayMarkup \pocoRitMarkup \etc

{ b'4 \pocoRit \< 4 4 4 \! }
%%%%

-- Aaron Hill

hairpin-overlay.cropped.png
Description: PNG image