Thanks very much Harm, but as I no longer need it, I shan't go ahead. If I need it later I'll resurrect this thread. The reason I like Jan-Peter's approach is that it appears to abstract the music from the details of presentation. But I've not looked into it much.
Best regards, Peter mailto:lilyp...@ptoye.com www.ptoye.com ------------------------- Thursday, October 7, 2021, 10:46:44 AM, Thomas Morley wrote: > Am Do., 7. Okt. 2021 um 11:30 Uhr schrieb Peter Toye <lilyp...@ptoye.com>: >> The potential need has gone away now - my Sibelius user has told me that he >> uses ScoreMuse to export the PDF into a suitable format for Sibelius. Looks >> to me like an expensive way of doing it, but if he can afford Sibelius he >> can probably afford ScoreMuse as well. >> I agree that exchanging music information between different engravers is an >> extremely complex problem and I don't underestimate the difficulty. >> I tried Jan-Peter's code on Github, but it seems to be broken on recent >> versions of LilyPond. I'm told it works on 19.0 but I don't have that >> version any more. And I don't have a contact for him to ask - is he on this >> mailing list? > Not sure Jan-Peter's approach is the best method ... > Anyway, applying the following diff makes it work with recent versions > (although you'll get a bunch of messages): > ~/openlilylib/lilypond-export (master)$ git diff > diff --git a/api.scm b/api.scm > index 8307dc5..3bfa69a 100644 > --- a/api.scm > +++ b/api.scm > @@ -275,8 +275,8 @@ > (let ((musicstep (ly:context-property context ctprop::export-step)) > (staff-id (ly:context-property context ctprop::staff-id)) > (voice-id (ly:context-property context ctprop::voice-id))) > - (ly:message "stem info ~A" (map car (ly:grob-properties grob))) > - (tree-set! musicstep `(,staff-id ,voice-id stem dir) > (ly:grob-properties grob)) ;(ly:stem::calc-direction grob)) > + (ly:message "stem info ~A" (map car > (ly:grob-basic-properties grob))) > + (tree-set! musicstep `(,staff-id ,voice-id stem dir) > (ly:grob-basic-properties grob)) ;(ly:stem::calc-direction grob)) > )) > ) > Cheers, > Harm
