mutopia/Coriolan/coriolan-part-combine-paper.ly

   1 \paper{
   2
   3         textheight = 295.0\mm;
   4         linewidth = 180.0\mm;
   5
   6         \translator{ \HaraKiriStaffContext }
   7         %
   8         % The Voice combine hierarchy
   9         %
  10         \translator{
  11                 \ThreadContext
  12                 \name "VoiceCombineThread";
  13                 \consists "Rest_engraver";
  14         }
  15         \translator{
  16                 \VoiceContext
  17                 \name "VoiceCombineVoice";
  18                 soloText = #"I."
  19                 soloIIText = #"II."
  20                 \remove "Rest_engraver";
  21                 \accepts "VoiceCombineThread";
  22         }
  23         \translator{
  24                 \HaraKiriStaffContext
  25                 \consists "Mark_engraver";
  26                 \name "VoiceCombineStaff";
  27                 \accepts "VoiceCombineVoice";
  28         }
  29
  30         %
  31         % The Staff combine hierarchy
  32         %
  33         \translator{
  34                 \ThreadContext
  35                 \name "StaffCombineThread";
  36         }
  37         \translator{
  38                 \VoiceContext
  39                 \name "StaffCombineVoice";
  40                 \accepts "StaffCombineThread";
  41                 \consists "Thread_devnull_engraver";
  42         }
  43         \translator {
  44                 \HaraKiriStaffContext
  45                 \name "StaffCombineStaff";
  46                 \accepts "StaffCombineVoice";
  47
  48                 soloADue = ##t
  49                 soloText = #""
  50                 soloIIText = #""
  51                 % This is non-conventional, but currently it is
  52                 % the only way to tell the difference.
  53                 aDueText = #"\\`a2"
  54                 splitInterval = #'(1 . 0)
  55                 changeMoment = #`(,(make-moment 1 1) . ,(make-moment 1 1))
  56         }
  57         \translator {
  58                 \StaffGroupContext
  59                 \accepts "VoiceCombineStaff";
  60                 \accepts "StaffCombineStaff";
  61         }
  62         \translator{ \HaraKiriStaffContext }
  63
  64         \translator {
  65                 \ScoreContext
  66                 %\OrchestralScoreContext
  67                 \accepts "VoiceCombineStaff";
  68                 \accepts "StaffCombineStaff";
  69                 skipBars = ##t
  70
  71                 barScriptPadding = #2.0 % dimension \pt
  72                 markScriptPadding = #4.0
  73
  74                 %% urg: in pt?
  75                 barNumberScriptPadding = #15
  76                 %% URG: this changes dynamics too
  77                 %%textStyle = #"italic"
  78                 timeSignatureStyle = #"C"
  79                 marginScriptHorizontalAlignment = #1
  80                 maximumRestCount = #1
  81         }
  82 }