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 <thomasmorle...@gmail.com>: >2015-01-10 15:44 GMT+01:00 Jan-Peter Voigt <jp.vo...@gmx.de>: > >> 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 >lilypond-user@gnu.org >https://lists.gnu.org/mailman/listinfo/lilypond-user
_______________________________________________ lilypond-user mailing list lilypond-user@gnu.org https://lists.gnu.org/mailman/listinfo/lilypond-user