input/test/part-combine-staff.ly

   1 #(ly:set-option 'old-relative)
   2 \version "1.9.0"
   3 \header { texidoc = "@cindex Part Combine Staff
   4 You can combine parts on two staffs, as well as two voices. "
   5 }
   6
   7 \score{
   8         \context PianoStaff <
   9                 \context StaffCombineStaff=one \skip 1*7
  10                 \context StaffCombineStaff=two \skip 1*7
  11                 \context StaffCombineStaff=one \partcombine StaffCombineStaff
  12                         \context StaffCombineVoice=one \notes\relative c''
  13                                 {
  14                                         c4 d e f\break
  15                                         c d e f\break
  16                                         c d e f
  17                                         c4 d e f\break
  18                                         a8 a a a b b b b
  19                                         a,4 a a a\break
  20                                         c2 e4 f\break
  21                                 }
  22                         \context StaffCombineVoice=two \notes\relative c''
  23                                 {
  24                                         c2 e2
  25                                         c4 d e f
  26                                         c2 e2
  27                                         c,4 d e f
  28                                         a8 a a a b b b b
  29                                         a4 a a a
  30                                         c2 e2
  31                                 }
  32                 >
  33         \paper {
  34                 textheight = 295.0\mm
  35                 linewidth = 180.0\mm
  36
  37                 \translator{ \RemoveEmptyStaffContext }
  38                 %
  39                 % The Voice combine hierarchy
  40                 %
  41                 \translator{
  42                         \ThreadContext
  43                         \name "VoiceCombineThread"
  44                         \consists "Rest_engraver"
  45                 }
  46                 \translator{
  47                         \VoiceContext
  48                         \name "VoiceCombineVoice"
  49                         soloText = #"I."
  50                         soloIIText = #"II."
  51                         \remove "Rest_engraver"
  52                         \accepts "VoiceCombineThread"
  53                 }
  54                 \translator{
  55                         \RemoveEmptyStaffContext
  56                         \consists "Mark_engraver"
  57                         \name "VoiceCombineStaff"
  58                         \accepts "VoiceCombineVoice"
  59                 }
  60
  61                 %
  62                 % The Staff combine hierarchy
  63                 %
  64                 \translator{
  65                         \ThreadContext
  66                         \name "StaffCombineThread"
  67                 }
  68                 \translator{
  69                         \VoiceContext
  70                         \name "StaffCombineVoice"
  71                         \accepts "StaffCombineThread"
  72                         \consists "Thread_devnull_engraver"
  73                 }
  74                 \translator {
  75                         \RemoveEmptyStaffContext
  76                         \name "StaffCombineStaff"
  77                         \accepts "StaffCombineVoice"
  78
  79                         soloADue = ##t
  80                         soloText = #""
  81                         soloIIText = #""
  82                         aDueText = #""
  83                         splitInterval = #'(1 . 0)
  84                         changeMoment = #`(,(ly:make-moment 1 1) . ,(ly:make-moment 1 1))
  85
  86                 }
  87                 \translator {
  88                         \StaffGroupContext
  89                         \accepts "VoiceCombineStaff"
  90                         \accepts "StaffCombineStaff"
  91                 }
  92                 \translator{ \RemoveEmptyStaffContext }
  93
  94                 \translator {
  95                         \ScoreContext
  96                         \accepts "VoiceCombineStaff"
  97                         \accepts "StaffCombineStaff"
  98                         skipBars = ##t
  99
 100                         %%% FIXME barScriptPadding = #2.0 % dimension \pt
 101                         RehearsalMark \override #'padding = #4
 102                         BarNumber \override #'padding = #3
 103
 104                         %% URG: this changes dynamics too
 105                         %%textStyle = #"italic"
 106                         TimeSignature \override #'style = #'C
 107
 108                         RestCollision \set #'maximum-rest-count = #1
 109
 110                 }
 111         }
 112 }
 113