|
From: | Jean Abou Samra |
Subject: | Re: updating "display multi measure rest span" |
Date: | Sun, 25 Apr 2021 18:32:35 +0200 |
User-agent: | Mozilla/5.0 (X11; Linux x86_64; rv:78.0) Gecko/20100101 Thunderbird/78.7.1 |
Le 25/04/2021 à 17:58, fremoin a écrit :
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
The length of the measure is not taken into account at all. Here's a fixed version: \version "2.23.3" \layout { \override Score.BarNumber.break-visibility = ##(#t #t #t) } fancyMultiMeasureRestNumber = { \applyOutput Voice.MultiMeasureRestNumber #(lambda (g c p) (let* ((currentBarNumber (ly:context-property c 'currentBarNumber)) (measureLength (ly:context-property c 'measureLength)) (cause (event-cause g)) (mmr-length (ly:event-property cause 'length)) (mmr-number (ly:moment-main (ly:moment-div mmr-length measureLength)))) (ly:grob-set-property! g 'text #{ \markup \center-column { #(number->string mmr-number) %% 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-number)))) } #}))) \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. } Best, Jean
[Prev in Thread] | Current Thread | [Next in Thread] |