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