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