]> git.donarmstrong.com Git - lilypond.git/blob - input/test/hara-kiri.ly
579935774021218e55191f23211bf0aae419f149
[lilypond.git] / input / test / hara-kiri.ly
1
2 \header {
3 texidoc = "Hara kiri staffs disappear when empty ";
4 }
5
6
7 % todo: use partcombine?, junk?
8
9 toeterI =  \notes\relative c <{
10                 \property Staff.instrument = #"Toeters"
11                 \property Staff.instr = #"Ttr." }
12         \context Voice = lower { \stemDown s1*6 }
13         \context Voice = upper { \stemUp s1*6 }
14         \context Voice = together  { 
15
16         c'''4^"toet I" c c c 
17         d d d d \break
18         R1 
19         \context Voice = upper {
20                 e4 e e e \break }
21         f f f f
22         g g g g 
23 }>
24
25 toeterIi =  \notes \relative c \context Voice = together { 
26         c''4^"toet II" c c c 
27         d d d d 
28         R1 
29         \context Voice = lower {
30                 \stemDown 
31                 e4 e e e 
32         }
33         f f f f 
34         g g g g
35 }
36
37 toeters =  \context Staff = toeters <
38         \toeterI
39         \toeterIi
40 >
41  
42 zager =  \context Staff = zager \notes \relative c'' {
43         \clef treble;
44         \property Staff.instrument = #"Zager"
45         \property Staff.instr = #"Zag."
46         c4^"zag" d e f 
47         \property Staff.instr = #"Zag. \\& Zog."
48         f e d c 
49         c d e f 
50         \property Staff.instr = #"Zag."
51         \stemUp
52         f e d c 
53         c d e f 
54         f e d c
55 }
56
57 zoger =  \context Staff = zoger \notes \relative c'' {
58         \clef treble;
59         \property Staff.instrument = #"Zoger"
60         \property Staff.instr = #"Zog."
61         c4^"zog" d e f 
62         \skip 1*2;
63
64         \translator Staff=zager
65         \stemDown 
66         c2 g2
67         
68         a4 b c d 
69         \skip 1*1;
70 }
71
72 zagers =  \context GrandStaff <
73         \zager
74         \zoger
75 >
76  
77 \score{
78         <
79                 \context StaffGroup = toeters <
80                         \toeters
81                 >
82                 \context StaffGroup = zagers <
83                         \zagers
84                 >
85         >
86         \paper{
87                 linewidth = 80.0\mm;
88                 \translator { \HaraKiriStaffContext }
89 %uh?
90                 \translator { \OrchestralScoreContext }
91 %               \translator { \OrchestralPartStaffContext }
92         }
93 }
94
95