]> git.donarmstrong.com Git - lilypond.git/blob - input/test/part-combine-moments.ly
patch::: 1.3.134.jcn1
[lilypond.git] / input / test / part-combine-moments.ly
1
2 \score{
3         \context PianoStaff <
4                 \context StaffCombineStaff=one \skip 1*2;
5                 \context StaffCombineStaff=two \skip 1*2;
6                 \context StaffCombineStaff=one \partcombine StaffCombineStaff
7                         \context StaffCombineVoice=one \notes\relative c''
8                                 {
9                                         c4 d e f\break
10                                         c2 e4 f\break
11                                 }
12                         \context StaffCombineVoice=two \notes\relative c''
13                                 {
14                                         c4 d e f
15                                         c2 e2
16                                 }
17                 >
18         \paper {
19
20                 textheight = 295.0\mm;
21                 linewidth = 180.0\mm;
22
23                 \translator{ \HaraKiriStaffContext }
24                 %
25                 % The Voice combine hierarchy
26                 %
27                 \translator{
28                         \ThreadContext
29                         \name "VoiceCombineThread";
30                         \consists "Rest_engraver";
31                 }
32                 \translator{
33                         \VoiceContext
34                         \name "VoiceCombineVoice";
35                         soloText = #"I."
36                         soloIIText = #"II."
37                         \remove "Rest_engraver";
38                         \accepts "VoiceCombineThread";
39                 }
40                 \translator{
41                         \HaraKiriStaffContext
42                         \consists "Mark_engraver";
43                         \name "VoiceCombineStaff";
44                         \accepts "VoiceCombineVoice";
45                 }
46
47                 %
48                 % The Staff combine hierarchy
49                 %
50                 \translator{
51                         \ThreadContext
52                         \name "StaffCombineThread";
53                 }
54                 \translator{
55                         \VoiceContext
56                         \name "StaffCombineVoice";
57                         \accepts "StaffCombineThread";
58                         \consists "Thread_devnull_engraver";
59                 }
60                 \translator {
61                         \HaraKiriStaffContext
62                         \name "StaffCombineStaff";
63                         \accepts "StaffCombineVoice";
64
65                         soloADue = ##t
66                         soloText = #""
67                         soloIIText = #""
68                         aDueText = #""
69                         splitInterval = #'(1 . 0)
70                         changeMoment = #`(,(make-moment 1 1) . ,(make-moment 1 1))
71
72                 }
73                 \translator {
74                         \StaffGroupContext
75                         \accepts "VoiceCombineStaff";
76                         \accepts "StaffCombineStaff";
77                 }
78                 \translator{ \HaraKiriStaffContext }
79
80                 \translator {
81                         \ScoreContext
82                         \accepts "VoiceCombineStaff";
83                         \accepts "StaffCombineStaff";
84                         skipBars = ##t 
85
86                         barScriptPadding = #2.0 % dimension \pt
87                         markScriptPadding = #4.0
88
89                         %% urg: in pt?
90                         barNumberScriptPadding = #15
91                         %% URG: this changes dynamics too
92                         %%textStyle = #"italic"
93                         TimeSignature \override #'style = #'C
94                         maximumRestCount = #1
95                 }
96         }
97 }