lilypond-user
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: updating "display multi measure rest span"


From: fremoin
Subject: Re: updating "display multi measure rest span"
Date: Sun, 25 Apr 2021 19:58:23 +0400
User-agent: Mozilla/5.0 (X11; Linux x86_64; rv:78.0) Gecko/20100101 Thunderbird/78.10.0

Hello,

Le 29/03/2021 à 12:31, Thomas Morley a écrit :
(...)
Here a fixed version:

This version works nicely with \time 4/4 but gives an odd result with other \time :

%%%%%%%%%%%%%%%%%%%%%
\version "2.23.2"

\layout {
  \override Score.BarNumber.break-visibility = ##(#t #t #t)
}

fancyMultiMeasureRestNumber = {
  \applyOutput Voice.MultiMeasureRestNumber
  #(lambda (g c p)
     (let* ((currentBarNumber (ly:context-property c 'currentBarNumber))
            (mmr (ly:grob-parent g X))
            (mmr-length
             (ly:moment-main
              (ly:prob-property (ly:grob-property mmr 'cause) 'length))))
       (ly:grob-set-property! g 'text
         #{
           \markup
           \center-column {
             #(number->string mmr-length)
             %% value found by try and error
             \translate #'(0 . -7.5)
             \with-dimensions #empty-interval #empty-interval
             \halign #CENTER
             \line
             #(list (number->string currentBarNumber)
                " - "
                (number->string (1- (+ currentBarNumber mmr-length))))
           }
         #})))
  \compressEmptyMeasures
}

{
  \time 2/4 c'2 \fancyMultiMeasureRestNumber R2*14 c'2
  \time 4/4 c'1 \fancyMultiMeasureRestNumber R1*14 c'1
  \time 3/4 c'2. \fancyMultiMeasureRestNumber R2.*14 c'2.
  \time 6/8 c'2. \fancyMultiMeasureRestNumber R2.*14 c'2.
}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

But I'm absolutely unable to find what's wrong...

Regards,
Frédéric




reply via email to

[Prev in Thread] Current Thread [Next in Thread]