]> git.donarmstrong.com Git - lilypond.git/blobdiff - mutopia/Coriolan/coriolan-paper.ly
patch::: 1.3.132.jcn1
[lilypond.git] / mutopia / Coriolan / coriolan-paper.ly
index aec442fd6abc864a315ff384a6a5807272c75f35..b281667604e12f3441f981c216bd2e8e3013e746 100644 (file)
@@ -1,81 +1,55 @@
-\paper{
-       \paper_sixteen
+\version "1.3.120"
+\paper {
+       \paperSixteen
 
-       %textheight = 290.0\mm;
-       %linewidth = 195.0\mm;
-       textheight = 285.0\mm;
-       linewidth = 190.0\mm;
+       % Fine for my a4 laserprinter:
+       %textheight = 285.0\mm;
+       %linewidth = 190.0\mm;
 
-       \translator{ \HaraKiriStaffContext }
-       %
-       % The Voice combine hierarchy
-       %
-       \translator{
+       % Mandatory Mutopia settings:
+       textheight = 270.0\mm;
+       linewidth = 180.0\mm;
+
+       \translator {
                \ThreadContext
-               \name "VoiceCombineThread";
                \consists "Rest_engraver";
+               
+               % Set value for engraver at thread level,
+               % to override the default that is set in ScoreContext
+               % for added engraver at Voice level
+               devNullThread = #'()
        }
-       \translator{
+       \translator {
                \VoiceContext
-               \name "VoiceCombineVoice";
-               soloText = #"I."
-               soloIIText = #"II."
                \remove "Rest_engraver";
-               \accepts "VoiceCombineThread";
-       }
-       \translator{
-               \HaraKiriStaffContext
-               \consists "Mark_engraver";
-               \name "VoiceCombineStaff";
-               \accepts "VoiceCombineVoice";
-       }
 
-       %
-       % The Staff combine hierarchy
-       %
-       \translator{
-               \ThreadContext
-               \name "StaffCombineThread";
-       }
-       \translator{
-               \VoiceContext
-               \name "StaffCombineVoice";
-               \accepts "StaffCombineThread";
+               % The staff combine (bassi part) needs a
+               % thread_devnull_engraver here.  Why?
+               % Instead of maintaining two separate hierarchies,
+               % we switch add it, but switch it off immediately.
+               % --> move to Score level to be able to override
+               % The staff combine part switches it on.
+               
+               %% devNullThread = #'never
                \consists "Thread_devnull_engraver";
        }
        \translator {
                \HaraKiriStaffContext
-               \name "StaffCombineStaff";
-               \accepts "StaffCombineVoice";
-
-               soloADue = ##t
-               soloText = #""
-               soloIIText = #""
-               % This is non-conventional, but currently it is
-               % the only way to tell the difference.
-               aDueText = #"\\`a2"
-               splitInterval = #'(1 . 0)
-               changeMoment = #`(,(make-moment 1 1) . ,(make-moment 1 1))
-       }
-       \translator {
-               \StaffGroupContext
-               \accepts "VoiceCombineStaff";
-               \accepts "StaffCombineStaff";
+               \consists "Mark_engraver";
+               MultiMeasureRest \override #'minimum-width = #6
        }
-       \translator{ \HaraKiriStaffContext }
-
-       \translator {
-               %\ScoreContext
+       \translator  {
                \OrchestralScoreContext
-               \accepts "VoiceCombineStaff";
-               \accepts "StaffCombineStaff";
-               skipBars = ##t 
-
-               barScriptPadding = #2.0 % dimension \pt
-               markScriptPadding = #4.0
+               % skipBars = ##t 
 
-               %% urg: in pt?
-               barNumberScriptPadding = #15
-               maximumRestCount = #1
+               soloText = #"I."
+               soloIIText = #"II."
+               % By default, turn off the Thread_devnull_engraver
+               % at Voice level
+               devNullThread = #'never
+               
+               TimeSignature \override #'style = #'C
+               BarNumber \override #'padding = #3
+               RestCollision \override #'maximum-rest-count = #1
        }
 }