mutopia/Coriolan/coriolan-paper.ly

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