2 marks consécutifs

Bonjour

suite à une "rejet d'un événement : « mark-event »"

http://lilybin.com/znmpug/1
%------------------------
\version "2.23.2"

\relative c' {
c1
\tweak #'break-visibility #end-of-line-visible
\mark "Fin" \bar "|.|"
\break
% 2 \mark simultanés le 2e suivant le break est supprimé
\mark "2e Partie" e
}

%---------------------------

Y-a-t-il une autre solution plus simple que celle-ci :

https://lists.gnu.org/archive/html/lilypond-user-fr/2011-08/msg00026.html

Lilydialement

···

Martial Rameaux

Oui, il y a ça : https://lsr.di.unimi.it/LSR/Snippet?id=977

un exemple tout simple

\version "2.22.1"

% doubleMark permet d'écrire des mark en fin de ligne ET en début de ligne suivante
% ex:
% \once\override Score.RehearsalMark.break-visibility = #end-of-line-visible
% \once\override Score.RehearsalMark.self-alignment-X = #RIGHT
% \doubleMark
% \markup {\bold "D.S. al Coda"}
% \markup { \box \fontsize #2 \musicglyph "scripts.coda" }

#(define-public (string-or-markup-or-boolean? e)
(or (string? e) (markup? e) (boolean? e)))

#(define (double-rehearsalmark-stencil grob)
(let*
((grobs-event (ly:grob-property grob 'cause '()))
(left-label (ly:event-property grobs-event 'left-label))
(right-label (ly:event-property grobs-event 'right-label))
(gap (ly:grob-property grob 'gap 1.4)))
(case (ly:item-break-dir grob)
((-1)
(if (boolean? left-label) empty-stencil
(grob-interpret-markup grob
(make-right-align-markup left-label))))
((1)
(if (boolean? right-label) empty-stencil
(grob-interpret-markup grob
(make-left-align-markup right-label))))
(else
(if (boolean? left-label)
(grob-interpret-markup grob
(if left-label
(make-center-align-markup right-label)
(make-left-align-markup right-label)))
(if (boolean? right-label)
(grob-interpret-markup grob
(if right-label
(make-center-align-markup left-label)
(make-right-align-markup left-label)))
(ly:stencil-add
(ly:stencil-translate
(grob-interpret-markup grob
(make-right-align-markup left-label))
(cons (* -0.5 gap) 0.0))
(ly:stencil-translate
(grob-interpret-markup grob
(make-left-align-markup right-label))
(cons (* 0.5 gap) 0.0)))))))))

doubleMark =
#(define-music-function
(left-string right-string)
(string-or-markup-or-boolean? string-or-markup-or-boolean?)
(if (and (boolean? left-string) (boolean? right-string))
(ly:warning "~a \\doubleMark - at least one string or markup required" (*location*)))
(make-music 'SequentialMusic
'elements (list
(make-music 'ContextSpeccedMusic
'context-type 'Score
'element
(make-music 'OverrideProperty
'symbol 'RehearsalMark
'grob-value double-rehearsalmark-stencil
'grob-property-path (list 'stencil)
'pop-first #t
'once #t))
(make-music 'ContextSpeccedMusic
'context-type 'Score
'element
(make-music 'OverrideProperty
'symbol 'RehearsalMark
'grob-value #f
'grob-property-path (list 'self-alignment-X)
'pop-first #t
'once #t))
(make-music 'ContextSpeccedMusic
'context-type 'Score
'element
(make-music 'OverrideProperty
'symbol 'RehearsalMark
'grob-value `#(,(not (boolean? left-string))
#t
,(not (boolean? right-string)))
'grob-property-path (list 'break-visibility)
'pop-first #t
'once #t))
(make-music 'MarkEvent
'label #f
'left-label (if (string? left-string)
(make-simple-markup left-string)
left-string)
'right-label (if (string? right-string)
(make-simple-markup right-string)
right-string)
'origin (*location*)))))

\relative c'' {

\repeat unfold 4 c1 \break \bar ".|"
\doubleMark
\markup {\with-color #red \bold "D.S. al Coda"}
\markup { \with-color #red \musicglyph "scripts.coda" }

\repeat unfold 4 c1 \bar ".."
}

···

Le 22/09/2021 à 16:48, Martial R a écrit :

Bonjour
suite à une "rejet d'un événement : « mark-event »"

lilybin.com
%------------------------
\version "2.23.2"
\relative c' {
c1
\tweak #'break-visibility #end-of-line-visible
\mark "Fin" \bar "|.|"
\break
% 2 \mark simultanés le 2e suivant le break est supprimé
\mark "2e Partie" e
}
%---------------------------

Y-a-t-il une autre solution plus simple que celle-ci :
Indications de repères simultanées : solution – merci Neil !

Lilydialement
--
Martial Rameaux

--
Vincent Gay
Envoyé depuis mon saxo-phone :slight_smile:
https://myrealbook.vintherine.org/ -http://photos.vintherine.org/

Ha j'avais vu, mais mal utilisé.

J'ai compris le système.

C'est plus simple je reprends mon fichier.

Merci

http://lilybin.com/tg6v0t/2

···

Martial Rameaux