song1: stick: Add waltz section.
[music/pretentious.git] / 01-song1 / parts / stick.ly
1 stickIntroLeft = \relative c {
2 b8 cis gis' r gis r gis b, ~ |
3 b8 cis gis' r gis r gis b, ~ |
4 b8 cis gis' r gis r gis r |
5 e8 b' e, b' dis,8 b' dis, b' |
6
7 b,8 cis gis' r gis r gis b, ~ |
8 b8 cis gis' r gis r gis b, ~ |
9 b8 cis gis' r gis r gis r |
10 <e b'>2 <dis b'> |
11 }
12
13 stickIntroRight = \relative c {
14 \repeat unfold 3 { <fis b dis>4 r8 <gis cis e>4 <gis cis e> r8 | }
15 <gis b e>2 <fis b dis> |
16 \repeat unfold 3 { <fis b dis>4 r8 <gis cis e>4 <gis cis e> r8 | }
17 a'8 gis fis e
18 dis16 e dis8 b4
19 }
20
21 stickALeft = \relative c' {
22 \time 2/4
23 cis8 r cis r | r r cis r | r r cis cis |
24 cis8 r cis r | r r cis r |
25 \time 6/8
26 r r cis r cis cis |
27
28 \time 2/4
29 cis8 r cis r | r r cis r | r r cis r |
30 \time 4/4
31 r8 r cis r r cis r r | cis r r cis r cis r cis |
32 }
33
34 stickARight = \relative c' {
35 \time 2/4
36 r4 r | <e gis>4 r8 <dis fis> | r <dis fis> r r |
37 r4 r | <e gis>4 r8 <dis fis> |
38 \time 6/8
39 r <dis fis> r <e gis> r r|
40
41 \time 2/4
42 r4 r | <e gis>4 r8 <dis fis> | r <dis fis> r r |
43 \time 4/4
44 <cis e>4. <dis fis> <e gis>4 ~ | <e gis>8 <fis a>4. <e gis>4 <dis fis> |
45 }
46
47 stickAExtendedLeft = \relative c {
48 \time 4/4
49 r8 r cis r r cis r r | cis r r cis r cis r cis |
50 %% more intense!
51 \repeat unfold 4 {
52 r8 cis cis r cis cis r cis | cis r cis cis r cis r cis |
53 }
54 }
55
56 stickAExtendedRight = \relative c' {
57 \time 4/4
58 <cis e>4. <dis fis> <e gis>4 ~ | <e gis>8 <fis a>4. <e gis>4 <dis fis> |
59 \repeat unfold 4 {
60 <cis e>4. <dis fis> <e gis>4 ~ | <e gis>8 <fis a>4. <e gis>4 <dis fis> |
61 }
62 }
63
64 stickATransitionLeft = \relative c {
65 \time 4/4 cis1 ~ | cis1 |
66 }
67 stickATransitionRight = \relative c' {
68 \time 4/4 <cis e>1 ~ | <cis e> |
69 }
70
71 stickVerseLeft = \relative c {
72 \time 4/4
73 \key cis \minor
74 cis4\sustainOn gis' e' cis, ~ cis gis' e' r\sustainOff |
75 e,,\sustainOn b' gis' b, ~ b fis' dis' b,\sustainOff |
76 cis4\sustainOn gis' e' cis, ~ cis gis' e' r\sustainOff |
77 e,,\sustainOn b' gis'\sustainOff b,\sustainOn ~ b fis' dis' b,\sustainOff |
78 a,2 ~ a4. <a' e' b'>8 ~ <a e' b'>1 |
79 a,2 <a' e' b'>4 b,4 ~ b1 |
80 }
81
82 % TODO
83 stickVerseRight = \relative c {
84 \time 4/4
85 \key cis \minor
86 r1 | r1 | r1 | r1 | r1 | r1 |
87 r1 | r1 | r1 | r1 | r1 | r1 |
88 }
89
90 stickVerseVariantLeft = \relative c {
91 \time 4/4
92 \key bes \minor
93 bes4\sustainOn f' des' bes, ~ bes f' des' r\sustainOff |
94 des,\sustainOn as' f' c,\sustainOff ~ c\sustainOn as' es' c,\sustainOff |
95
96 bes4\sustainOn f' des' bes, ~ bes f' des' r\sustainOff |
97 des,\sustainOn as' f' c,\sustainOff ~ c\sustainOn as' es' c,\sustainOff |
98
99 ges8 r ges r ges r <des' f'>4 ~ | <des f'>1 |
100 ges,,2 <ges' des' as'>4 as,4 ~ | as1 |
101 }
102
103 % TODO
104 stickVerseVariantRight = \relative c {
105 \time 4/4
106 \key cis \minor
107 r1 | r1 | r1 | r1 | r1 | r1 |
108 r1 | r1 | r1 | r1 | r1 | r1 |
109 }
110
111 % TODO
112 stickVerseHarderLeft = \stickVerseLeft
113
114 % TODO
115 stickVerseHarderRight = \stickVerseRight
116
117
118
119 stickNastyLeft = \relative c {
120 \time 6/8
121 \key cis \minor
122 \repeat volta 2 { R2.*8 | R2.*8 |}
123 \repeat volta 2 \repeat unfold 8 {
124 cis8 cis cis r cis cis | cis r cis cis cis r |
125 }
126 cis cis cis r cis cis | cis r cis cis cis r |
127 cis cis cis r cis cis | cis r cis cis cis r |
128 cis cis cis r cis cis | cis r cis cis cis r |
129 cis cis cis r cis cis | bis r bis bis bis r |
130
131 \key e \minor
132 b b b r b b | b r c c c r |
133 a a a r a a | es r es es es r |
134
135 e e e r e e | e r e e fis' g |
136 fis fis fis r fis fis | fis g a b, c b |
137
138 e, e e r e e | e r e e fis' g |
139 ais, ais ais r ais ais | a r a a a r |
140
141 e e e r e e | e r e e fis' g |
142 fis fis fis r fis fis | fis g a b, c b |
143
144 e, e e r e e | e r e e fis' g |
145 fis fis fis r fis fis | fis fis g a4. ~ | a2. |
146 }
147
148 stickNastyRight = \relative c {
149 \time 6/8
150 \key cis \minor
151 \repeat volta 2 { R2.*8 | R2.*8 |}
152 \repeat volta 2 \repeat unfold 2 {
153 e8 e e r e e | e r e e e r |
154 es es es r es es | fis r fis fis fis r |
155 e e e r e e | e r e e e r |
156 e e e r e e | e r e e e r |
157 }
158 e e e r e e | e r e e e r |
159 e e e r e e | e r e e e r |
160 e e e r e e | e r e e e r |
161 e e e r e e | es r es es es r |
162
163 \key e \minor
164 e e e r e e | e r e e e r |
165 e e e r e e | es r es es es r |
166
167 e e e r e e | e r e e a b |
168 a a a r a a | a b c es e es |
169
170 e, e e r e e | e r e e a b |
171 ais ais ais r ais ais | a r a a a r |
172
173 e e e r e e | e r e e a b |
174 a a a r a a | a b c es e es |
175
176 e, e e r e e | e r e e a b |
177 a a a r a a | a16-. r a8 b c4. ~ | c2. |
178 }
179
180 stickWaltzLeft = \relative c {
181 \time 3/4
182 e4 b' g' | es,4 b' g' |
183 d, b' g' | cis,, a' e' |
184 c,\sustainOn g' e' | r2 c,4 | g'2 c,4 |
185 g'2. ~ | g2. | r2 c,4\sustainOff |
186
187 d4\sustainOn a' fis' | r2 d,4 | a'2 d,4 |
188 a'4. d,4.\sustainOff | cis4 c b |
189 \key fis \minor
190 bes4\sustainOn fis' cis' | r2 bes,4 | fis'2.\sustainOff |
191 \time 4/4
192 a,4 e' cis' a, | c gis' dis' c, |
193 }
194
195 stickWaltzRight = \relative c'' {
196 \time 3/4
197 r4 <g b> <g b> | r <g b> <g b> |
198 <g b> c d | <g, b>2. |
199 <g b>2.\arpeggio | <e a> | <b e>2 r4 |
200 <g' b>4. <e a>4. | <b e>4 a' b | c b a |
201
202 <g b>2.\arpeggio | <e a> | <b e>2 fis'4 |
203 <g b>4. <e a>4. | e4 fis g |
204 \key fis \minor
205 <e gis>2. | <cis fis>2. | <gis cis>2 r4 |
206
207 \time 4/4
208 <e' gis>4. <cis fis> cis4 |
209 gis'4. fis c4 |
210 }
211
212 stick = \new PianoStaff <<
213 \set PianoStaff.midiInstrument = #"clav"
214 \set PianoStaff.pedalSustainStyle = #'bracket
215
216 \new Staff \relative c' {
217 \set Staff.midiPanPosition = #-0.7
218 \key cis \minor
219 \clef "treble_8"
220
221 \time 4/4
222 \repeat volta 2 \stickIntroRight
223 \repeat volta 2 \stickARight
224 \stickAExtendedRight
225 \stickATransitionRight
226
227 \repeat volta 2 \stickVerseRight
228 \stickVerseVariantRight
229 \stickVerseHarderRight
230
231 \repeat volta 2 \stickARight
232 \stickAExtendedRight
233 \stickATransitionRight
234
235 \stickNastyRight
236 \stickWaltzRight
237
238 }
239
240 %% staff for left hand side
241 \new Staff \relative c {
242 \set Staff.midiPanPosition = #0.7
243 \key cis \minor
244 \clef "bass"
245
246 \time 4/4
247 \repeat volta 2 \stickIntroLeft
248 \repeat volta 2 \stickALeft
249 \stickAExtendedLeft
250 \stickATransitionLeft
251
252 \repeat volta 2 \stickVerseLeft
253 \stickVerseVariantLeft
254 \stickVerseHarderLeft
255
256 \repeat volta 2 \stickALeft
257 \stickAExtendedLeft
258 \stickATransitionLeft
259
260 \stickNastyLeft
261 \stickWaltzLeft
262
263 }
264 >>
265
266 %% Local Variables:
267 %% compile-command: "make -C .."
268 %% End: