(acons 'break-visibility `#(,(not (boolean? left-string)) (acons 'stencil double-rehearsalmark-stencil (ly:music-set-property! ev 'additional-options (ly:music-set-property! ev 'key entry-key)) (if (and (list? key) (symbol? (car key))) (car key) (context-spec-music (make-property-set 'rehearsalMark label) "Make the music for the \\doublePolyMark command." (string-or-markup-or-boolean? #f) (string-or-markup-or-boolean? #f)) (parser location key left-string right-string) % only for use with the poly-mark-engraver, based on a % copy of 'mark' from music-functions.ly, then extended: 'grob-property-path (list 'break-visibility) 'grob-value `#(,(not (boolean? left-string)) 'grob-property-path (list 'self-alignment-X) (ly:warning "~a \\doubleMark - at least one string or markup required" location)) (if (and (boolean? left-string) (boolean? right-string)) (string-or-markup-or-boolean? string-or-markup-or-boolean?) (parser location left-string right-string) (ly:warning "fallback to using \"ly:text-interface::print \".") (ly:warning " \"doubleMark stencil \" did not find \"doubleMark texts \".") (if (not (or (null? left-label) (null? right-label))) (right-label (ly:event-property grobs-event 'right-label)) (left-label (ly:event-property grobs-event 'left-label)) ((grobs-event (ly:grob-property grob 'cause '())) #(define (double-rehearsalmark-stencil grob) (set-object-property! symbol 'music-doc description) (set-object-property! symbol 'music-type? type?)
(ly:error ( _ "symbol ~S redefined") symbol)) (if (not (equal? #f (object-property symbol 'music-doc)))
#(define (music-property-description symbol type? description) (or (string? e) (markup? e) (boolean? e))) #(define-public (string-or-markup-or-boolean? e)
LILYPOND REHEARSAL MARK UPDATE
%by: ArnoldTheresius % update for cooperation with poly-mark-engraver or multi-mark-engraver % see LSR No. 976) a \doublePolyMark command is provided (which otherwise will not work). Override the value of gap in Score.RehearsalMark if you need a different spacing between the two text markups.Īlso providing some functions to separately address RehearsalMarks depending on their break-direction, to tweak direction and padding.Īnd for compatibility when using the poly-mark-engraver (LSR No. a end-of-line-invisible and left aligned rehearsal mark, and if one of the two arguments is the boolean value #t then the remaining text will be centered if it occurs within the line. It takes two arguments (string or markup).Īdditionally one of the two arguments may be the boolean #f to indicate a begin-of-line-invisible and right alinged resp. I'm pretty sure Abraham is looking for an *automated* solution.If you need at a line break at the same time step two rehearsal marks, one rehearsal mark at the end of the line with right aligned text, and another rehearsal mark at the beginning of the next line with left aligned text, but if there is no line break these two marks should be concatenated with a space between, try this \doubleMark command. > I realize this isn't the standard way of notating rehearsal marks,
> it doesn't seem to be an option at the moment. > "scm/translation-functions.scm" to see what's currently available and
LILYPOND REHEARSAL MARK HOW TO
> I am trying to figure out how to make rehearsal mark letters be their
0 kommentar(er)
