input/test/part-combine-score.ly

   1 \score{
   2         <
   3         \context VoiceCombineStaff = flauti <
   4                 \time 4/4;
   5
   6                 \context VoiceCombineThread=one \skip 1*9;
   7                 \context VoiceCombineThread=two \skip 1*9;
   8
   9                 \context VoiceCombineVoice=one \partcombine VoiceCombineVoice
  10                         \context VoiceCombineThread=one \notes\relative c''
  11                                 {
  12                                         c4 d e f
  13                                         b,4 d c d
  14                                         r2 e4 f
  15                                         \break
  16                                         c4 d e f
  17                                         c4 r e f
  18                                         c4 r e f
  19                                         \break
  20                                         c4 r a r
  21                                         a a r a
  22                                         a2 \property VoiceCombineThread.soloADue = ##f a
  23                                 }
  24                         \context VoiceCombineThread=two \notes\relative c''
  25                                 {
  26                                         g4 b d f
  27                                         r2 c4 d
  28                                         a c c d
  29                                         a4. b8 c4 d
  30                                         c r e r
  31                                         r2 s2
  32                                         a,4 r a r
  33                                         a r r a
  34                                         a2 \property VoiceCombineThread.soloADue = ##f a
  35                                 }
  36                 >
  37         \context PianoStaff <
  38                 \context StaffCombineStaff=one \skip 1*9;
  39                 \context StaffCombineStaff=two \skip 1*9;
  40                 \context StaffCombineStaff=one \partcombine StaffCombineStaff
  41                         \context StaffCombineThread=one \notes\relative c''
  42                                 {
  43                                         c4 d e f
  44                                         c d e f
  45                                         c d e f
  46                                         c d e f
  47                                         c d e f
  48                                         c d e f
  49                                         c4 d e f
  50                                         a8 a a a
  51                                         b b b b
  52                                         d1
  53                                 }
  54                         \context StaffCombineThread=two \notes\relative c''
  55                                 {
  56                                         c4 d e f
  57                                         c d e f
  58                                         c d e f
  59                                         c2 e2
  60                                         c4 d e f
  61                                         c2 e2
  62                                         c,4 d e f
  63                                         a8 a a a
  64                                         b b b b
  65                                         b1
  66                                 }
  67                 >
  68         >
  69         \paper{
  70                 %
  71                 % The Voice combine hierarchy
  72                 %
  73                 \translator{
  74                         \ThreadContext
  75                         \name "VoiceCombineThread";
  76                         \consists "Rest_engraver";
  77                 }
  78                 \translator{
  79                         \VoiceContext
  80                         \name "VoiceCombineVoice";
  81                         \remove "Rest_engraver";
  82                         \accepts "VoiceCombineThread";
  83                 }
  84                 \translator{
  85                         \HaraKiriStaffContext
  86                         \consists "Mark_engraver";
  87                         \name "VoiceCombineStaff";
  88                         \accepts "VoiceCombineVoice";
  89                 }
  90
  91                 %
  92                 % The Staff combine hierarchy
  93                 %
  94                 \translator{
  95                         \ThreadContext
  96                         \name "StaffCombineThread";
  97 %%
  98 %%                      \remove "A2_devnull_engraver";
  99 %%                      \remove "Note_heads_engraver";
 100                 }
 101                 \translator{
 102                         \VoiceContext
 103                         \name "StaffCombineVoice";
 104                         \accepts "StaffCombineThread";
 105
 106                         \remove "Rest_engraver";
 107                         \remove "Dot_column_engraver";
 108                         \remove "Stem_engraver";
 109                         \remove "Beam_engraver";
 110                         \remove "Auto_beam_engraver";
 111                         %\include "auto-beam-settings.ly";
 112
 113                         \remove "Chord_tremolo_engraver";
 114                         \remove "Melisma_engraver";
 115                         \remove "Text_engraver";
 116                         \remove "A2_engraver";
 117
 118                         \remove "Piano_pedal_engraver";
 119                         \remove "Script_engraver";
 120                         \remove "Script_column_engraver";
 121                         \remove "Rhythmic_column_engraver";
 122                         \remove "Slur_engraver";
 123                         \remove "Tie_engraver";
 124
 125 %%                      \consists "A2_devnull_engraver";
 126 %%                      \consists "Note_heads_engraver";
 127                 }
 128                 \translator {
 129                         \HaraKiriStaffContext
 130                         \name "StaffCombineStaff";
 131                         \accepts "StaffCombineVoice";
 132
 133                         \consists "Rest_engraver";
 134                         \consists "Dot_column_engraver";
 135                         \consists "Stem_engraver";
 136                         \consists "Beam_engraver";
 137                         \consists "Auto_beam_engraver";
 138                         \include "auto-beam-settings.ly";
 139
 140                         \consists "Chord_tremolo_engraver";
 141                         \consists "Melisma_engraver";
 142                         \consists "Text_engraver";
 143                         \consists "A2_engraver";
 144
 145                         soloADue = ##f
 146                         %soloADue = ##t
 147
 148                         \consists "Piano_pedal_engraver";
 149                         \consists "Script_engraver";
 150                         \consists "Script_column_engraver";
 151                         \consists "Rhythmic_column_engraver";
 152                         \consists "Slur_engraver";
 153                         \consists "Tie_engraver";
 154                 }
 155                 \translator {
 156                         \StaffGroupContext
 157                         \accepts "VoiceCombineStaff";
 158                         \accepts "StaffCombineStaff";
 159                 }
 160                 \translator {
 161                         \ScoreContext
 162                         \accepts "VoiceCombineStaff";
 163                         \accepts "StaffCombineStaff";
 164                 }
 165 %               linewidth = 40.\mm;
 166         }
 167
 168         \midi{
 169                 \tempo 4 = 150;
 170
 171                 \translator {
 172                         \ThreadContext
 173                         \name "VoiceCombineThread";
 174                 }
 175                 \translator {
 176                         \VoiceContext
 177                         \name "VoiceCombineVoice";
 178                         \accepts "VoiceCombineThread";
 179                 }
 180                 \translator {
 181                         \StaffContext
 182                         \name "VoiceCombineStaff";
 183                         \accepts "VoiceCombineVoice";
 184                 }
 185
 186                 \translator {
 187                         \ThreadContext
 188                         \name "StaffCombineThread";
 189                 }
 190                 \translator {
 191                         \VoiceContext
 192                         \name "StaffCombineVoice";
 193                         \accepts "StaffCombineThread";
 194                 }
 195                 \translator {
 196                         \StaffContext
 197                         \name "StaffCombineStaff";
 198                         \accepts "StaffCombineVoice";
 199                 }
 200                 \translator {
 201                         \ScoreContext
 202                         \accepts "VoiceCombineStaff";
 203                         \accepts "StaffCombineStaff";
 204                 }
 205         }
 206 }