Re: Add \mark entries with edition-engraver?

[Urs Liska]

It would be fantastic if that could be integrated in the edition-engraver.  I'm very sorry that I can only express wishes and can't offer any help.
Actually I'm right now busy moving our Fried score to an edition-engraver based set-up, which is more than promising.

Urs

Am 10. Januar 2015 19:21:16 MEZ, schrieb Thomas Morley <address@hidden>:

2015-01-10 15:44 GMT+01:00 Jan-Peter Voigt <address@hidden>:

 So, if one can show a scheme-engraver, that produces marks (or time-sigs)
 programmaticly, I can easily add it to the edition-engraver.


Hi Jan-Peter,

I did not look into your edition-engraver, below you'll find an
engraver printing RehearsalMarks, though. (It's a boiled down version
of some unfinshed own coding)

Obviously you'll need to add an argument (a list, I think) what should
be printed and some conditions when to print.
Nevertheless, maybe it might be helpful.

\version "2.19.15"

#(define (RM-engraver context)
  `((process-music
     .
     ,(lambda (engraver)
        (if (= 0
               (ly:moment-main-numerator
                
(ly:context-property context 'measurePosition)))
            (let* ((event '())
                   (newgrob
                     (ly:engraver-make-grob engraver 'RehearsalMark event)))

            (set! (ly:grob-property newgrob 'text) "XY"))
            #f)))))

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% EXAMPLE
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%


\score {
  \new Staff { \repeat unfold 60 c''4 }
  \layout {
    \context {
      \Score
      \consists #RM-engraver
    }
  }
}

HTH,
 Harm


lilypond-user mailing list
address@hidden
https://lists.gnu.org/mailman/listinfo/lilypond-user