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

   1 \version "1.3.120"
   2 \paper{
   3
   4         textheight = 295.0\mm;
   5         linewidth = 180.0\mm;
   6
   7         \translator{ \HaraKiriStaffContext }
   8         %
   9         % The Voice combine hierarchy
  10         %
  11         \translator{
  12                 \ThreadContext
  13                 \name "VoiceCombineThread";
  14                 \consists "Rest_engraver";
  15         }
  16         \translator{
  17                 \VoiceContext
  18                 \name "VoiceCombineVoice";
  19                 soloText = #"I."
  20                 soloIIText = #"II."
  21                 \remove "Rest_engraver";
  22                 \accepts "VoiceCombineThread";
  23         }
  24         \translator{
  25                 \HaraKiriStaffContext
  26                 \consists "Mark_engraver";
  27                 \name "VoiceCombineStaff";
  28                 \accepts "VoiceCombineVoice";
  29         }
  30
  31         %
  32         % The Staff combine hierarchy
  33         %
  34         \translator{
  35                 \ThreadContext
  36                 \name "StaffCombineThread";
  37         }
  38         \translator{
  39                 \VoiceContext
  40                 \name "StaffCombineVoice";
  41                 \accepts "StaffCombineThread";
  42                 \consists "Thread_devnull_engraver";
  43         }
  44         \translator {
  45                 \HaraKiriStaffContext
  46                 \name "StaffCombineStaff";
  47                 \accepts "StaffCombineVoice";
  48
  49                 soloADue = ##t
  50                 soloText = #""
  51                 soloIIText = #""
  52                 % This is non-conventional, but currently it is
  53                 % the only way to tell the difference.
  54                 aDueText = #"\\`a2"
  55                 splitInterval = #'(1 . 0)
  56                 changeMoment = #`(,(make-moment 1 1) . ,(make-moment 1 1))
  57         }
  58         \translator {
  59                 \StaffGroupContext
  60                 \accepts "VoiceCombineStaff";
  61                 \accepts "StaffCombineStaff";
  62         }
  63         \translator{ \HaraKiriStaffContext }
  64
  65         \translator {
  66                 \ScoreContext
  67                 %\OrchestralScoreContext
  68                 \accepts "VoiceCombineStaff";
  69                 \accepts "StaffCombineStaff";
  70                 skipBars = ##t
  71                 TimeSignature \override #'style = #'C
  72                 BarNumber \override #'padding = #3
  73                 RestCollision \override #'maximum-rest-count = #1
  74         }
  75 }