mutopia/Coriolan/coriolan-paper.ly

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