[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Denemo-devel] Need help with file
From: |
Richard Shann |
Subject: |
Re: [Denemo-devel] Need help with file |
Date: |
Sun, 07 Feb 2016 16:16:10 +0000 |
On Sun, 2016-02-07 at 15:42 +0000, Richard Shann wrote:
> On Sun, 2016-02-07 at 09:03 +0000, Richard Shann wrote:
> >
> > Let me know if you don't find a quick solution to the clef size
> > problem.
> I found them both next to each other
> http://lsr.di.unimi.it/LSR/Item?id=673
>
> http://lsr.di.unimi.it/LSR/Item?id=717
>
> So I put all this together into a single command script:
>
>
> (let ((tag1 "StartBreak")(tag2 "StopBreak"))
> (d-InsertMeasureBefore)
> (d-DirectivePut-standalone tag1)
> (d-DirectivePut-standalone-minpixels tag1 30)
> (d-DirectivePut-standalone-graphic tag1 "\nX\nDenemo\n48")
> (d-DirectivePut-standalone-postfix tag1 "\\hideNotes \\stopStaff ")
> (d-WholeMeasureSpacer)
> (d-DirectivePut-standalone tag2)
> (d-DirectivePut-standalone-postfix tag2 (string-append
> "\\unHideNotes \\startStaff \\set Staff.forceClef = ##t \\bar ""
> \\set Staff.forceClef = ##t \\once \\override Staff.Clef.full-size-change =
> ##t \\clef " (d-GetPrevailingClef) " "))
> (d-DirectivePut-standalone-minpixels tag2 30)
> (d-DirectivePut-standalone-graphic tag1 "\nY\nDenemo\n48")
> (d-RefreshDisplay)
> (d-SetSaved #f))
>
> This creates a break before the current measure and re-starts the clef that
> is prevailing.
And I've added this as a new command to the Measures menu. It should be
built tonight.
Richard