[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Mark Staffs (and Dynamics Staffs) with Mulit-measure rests
From: |
Richard Shann |
Subject: |
Mark Staffs (and Dynamics Staffs) with Mulit-measure rests |
Date: |
Wed, 02 Feb 2022 10:47:20 +0000 |
User-agent: |
Evolution 3.38.3-1 |
If you are using multi-measure rests and create a staff for marks or
dynamics you will find that the multi-measure rests will revert to
whole measure rests unless the multi-measure rests are present in the
marks/dynamics staff. As these staffs have by default blank measures it
is convenient to be able to flood them with multi-measure rests once
you have finished installing the marks/dynamics.
Here is a script that does that:
8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8
(d-GoToEmptyMeasure)
(while (EmptyMeasure?)
(d-PushPosition)
(let loop ((count 1))
(if (and (EmptyMeasure?) (d-MeasureRight))
(loop (1+ count))
(if (EmptyMeasure?)
(begin
(d-PopPosition)
(d-MultiMeasureRests count))
(begin
(d-PopPosition)
(d-MultiMeasureRests (1- count))
(d-GoToEmptyMeasure))))))
8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8><8
You would use this at the final stage, when all your marks/dynamics
were in, otherwise you will have to ungroup the multi measure rests and
re-make them after inserting stuff.
Richard
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- Mark Staffs (and Dynamics Staffs) with Mulit-measure rests,
Richard Shann <=