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