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