Re: Whole measure rests in parentheses

[harm6]

Elwro wrote:
> 
> Dear Group,
> 
> I'd like the input
> 
> \parenthesize R1
> 
> to produce a whole measure rest in parentheses. (...)
> 
> Best regards,
> 
> Leszek.
> 

Hi,

here's another, more elaborated workaround:

\version "2.14.2"

parenthesizeMMR =
#(define-music-function (parser location paddings)(list?)
#{
        #(define ((parenthesizedMMR markup) grob)
          (ly:stencil-combine-at-edge 
            (ly:multi-measure-rest::print grob)
            X UP (grob-interpret-markup grob markup) (+ (car $paddings) -2.2) 
0))
            
        #(define parMarkup
            (markup #:line
               (#:parenthesize 
                #:transparent
                #:translate (cons 0 (cadr $paddings))
                #:pad-x 0
               (#:draw-line (cons (caddr $paddings) (+ (cadddr $paddings) 
1.2))))))
       
\once\override Staff.MultiMeasureRest #'stencil = #(parenthesizedMMR
parMarkup)
       
#})

%------------------ Test
-------------------------------------------------------

\paper {
        ragged-right = ##f
}

\relative c' {
\compressFullBarRests
        R1
\parenthesizeMMR #'(0 0 0 0)
        R1
\parenthesizeMMR #'(0.45 0 0 0)
        R1*2
\parenthesizeMMR #'(-2.2 0 2.2 0)
        R1*3
\parenthesizeMMR #'(0.5 -1.1 0 1)
        R1*4
\parenthesizeMMR #'(-4 -1.1 4.2 1)
        R1*7
        R1
        R1
        R1
        R1      
}

HTH,
  Harm

-- 
View this message in context: 
http://old.nabble.com/Whole-measure-rests-in-parentheses-tp32197963p32207902.html
Sent from the Gnu - Lilypond - User mailing list archive at Nabble.com.