circus: Fix repetitions and finish tempo track.
[music/pretentious.git] / 03-circus / parts / stick.ly
1 stickA = \relative c'' {
2 g8 gis-. g-. gis-. | a-. gis16 g8.-. gis8-. |
3 r gis g gis | e4 r8 g~ |
4
5 g gis-. g-. gis-. | a-. gis16 g8.-. gis8-. |
6 g gis g gis |
7
8 <fis ais>8 r r <fis ais> ~ | <fis ais>2 |
9 <fis ais>8 r r <fis ais> ~ | <fis ais>2 |
10 }
11
12 stickHalfTimeFeel = \relative c' {
13 \time 2/4
14 b8 d r b16 d |
15 fis8-. r8 r4 |
16 r8 b,16 d fis g fis8 |
17 \time 3/4
18 e16 d cis b d cis c b
19 \tuplet 3/2 { fis8 g b } |
20 \time 2/4
21 ais8 r8. g16 a ais d4 r8*5
22 d,4 dis eis fis r8 |
23 }
24
25 stickWeird = \relative c' {
26 \repeat volta 2 {
27 \time 5/4 {g4. fis16 g cis8 d r g, fis cis |}
28 \time 9/8 {cis'4. b16 fis a8 b2 | }
29 } \alternative {
30 {r2 r8 b8 a g fis |}
31 {r2 r8 b cis d fis |}
32 }
33 }
34
35 %% TODO
36 stickWeirdLeft = \relative c, {
37 \repeat volta 2 {
38 \time 5/4 { r2. r2 |}
39 \time 9/8 { r1 r8 | }
40 } \alternative {
41 { r1 r8 |}
42 { r1 r8 |}
43 }
44 }
45
46 stickDance = \relative c' {
47 \time 5/4
48 g'4. fis8 e4 r2
49 fis4. e16 d b4
50 %% TODO
51 \tuplet 3/2 { f8 b d }
52 fis4
53
54 \time 3/4
55 e2. | d8 cis ais4 r4
56 }
57
58 %% TODO
59 stickDanceLeft = \relative c, {
60 \time 5/4 { r2. r2 | r2. r2 | }
61 \time 3/4 { r2. | r2. | }
62 }
63
64
65 stickBeautyLeft = \relative c, {
66 \repeat unfold 3 {
67 \time 4/4
68 b8\sustainOn fis' cis' d8 ~ d2 |
69 \time 3/4
70 g,8\sustainOff d' b'
71 a, e' cis' |
72 }
73
74 \time 4/4
75 <b, d'>4.-> <a cis'> <a cis'>8-> <g b'>8 ~ |
76 \time 6/8
77 <g b'>4. r8 g8 fis |
78 \time 9/8
79 e2 r4 d8 r cis |
80
81 \repeat volta 2 {
82 \time 7/8
83 b4\sustainOn d'8 ~ d2 |
84 \time 3/4
85 g,8\sustainOff d' b'
86 a, e' cis' |
87
88 \repeat unfold 2 {
89 \time 4/4
90 b,,8\sustainOn fis' cis' d8 ~ d2 |
91 \time 3/4
92 g,8\sustainOff d' b'
93 a, e' cis' |
94 }
95
96 \time 4/4
97 <b, d'>4.-> <a cis'> <a cis'>8-> <g b'>8 ~ |
98 } \alternative {
99 {
100 \relative c, {
101 \time 6/8
102 <g' b'>4. r8 g8 fis |
103 \time 9/8
104 e2 r4 d8 r cis |
105 }
106 }
107 {
108 \relative c, {
109 \time 6/8
110 <g' b'>4. r8 g8 fis |
111 }
112 }
113 }
114 }
115
116 stickBeautyRight = \relative c' {
117 \repeat unfold 3 {
118 \time 4/4 { R1 | }
119 \time 3/4 { R2. | }
120 }
121 \time 4/4 { R1 |}
122 \time 6/8 R8*6 |
123 \time 9/8 R8*9 |
124
125 \repeat volta 2 {
126 \time 7/8 { R8*7 | }
127 \time 3/4 { R2. | }
128
129 \repeat unfold 2 {
130 \time 4/4 { R1 | }
131 \time 3/4 { R2. | }
132 }
133 \time 4/4 { R1 |}
134 } \alternative {
135 { \time 6/8 R8*6 |
136 \time 9/8 R8*9 | }
137 { \time 6/8 { R8*6 |} }
138 }
139 }
140
141
142 stickBeforeArpeggioLeft = \relative c, {
143 \time 3/4
144 e2. ~ | e2. ~ | e2. ~ | e2. |
145 }
146
147 stickArpeggioLeft = \relative c, {
148 e8\sustainOn b' g' ~ g4. |
149 e,8 b' g' ~ g4. |
150 e,4. g'4. | r2. |
151
152 d,8\sustainOff\sustainOn a' fis' ~ fis4.
153 d,8 a' fis' ~ fis4.
154 d,2. ~ d2.
155
156 %% repeat, but with more pathos!
157 e8\sustainOn b' g' ~ g4. |
158 e,8 b' g' ~ g4. |
159 e,8 b' g' ~ g4. |
160 e,8 b' g' ~ g4. |
161
162 d,8\sustainOff\sustainOn a' fis' ~ fis4.
163 d,8\sustainOff\sustainOn a' fis' ~ fis4.
164 d,8\sustainOff\sustainOn a' fis' ~ fis4.
165 d,8\sustainOff\sustainOn a' fis' ~ fis4.
166 }
167
168 stickBeforeArpeggioRight = \relative c' {
169 \time 3/4
170 r2. ~ | r2. ~ | r2. ~ | r2. |
171 }
172
173 stickArpeggioRight = \relative c' {
174 \time 3/4
175 r4.\sustainOn d,8 b' fis
176 r4.\sustainOff\sustainOn d8 b' fis
177 d4 b' fis ~ | fis2.
178
179 r4.\sustainOff\sustainOn d8 b' fis
180 r4.\sustainOff\sustainOn d8 b' fis
181 r2. r2.
182
183 %% repeat, but with more pathos!
184 r4.\sustainOn d8 b' fis
185 r4.\sustainOff\sustainOn d8 b' fis
186 r4.\sustainOff\sustainOn d8 b' fis
187 r4.\sustainOff\sustainOn d8 b' fis
188
189 r4.\sustainOff\sustainOn d8 b' fis
190 r4.\sustainOff\sustainOn d8 b' fis
191 r4.\sustainOff\sustainOn d8 b' fis
192 r4.\sustainOff\sustainOn d8 b' fis
193 }
194
195 stickArpeggioLeftHigher = \relative c, {
196 \time 3/4
197 e8\sustainOn b' g' ~ g4.
198 e,8 b' g' ~ g4.
199 e,8 b' g' ~ g4.
200 e,8 b' g' ~ g4.
201
202 d,8\sustainOff\sustainOn a' fis' ~ fis4.
203 d,8 a' fis' ~ fis4.
204 d,8 a' fis' ~ fis4.
205 d,8 a' fis' ~ fis4.\sustainOff
206 }
207
208 stickArpeggioRightHigher = \relative c' {
209 \time 3/4
210 r4.\sustainOff\sustainOn d,8 b' fis
211 r4.\sustainOff\sustainOn d8 b' fis
212 r4.\sustainOff\sustainOn d8 b' fis
213 r4.\sustainOff\sustainOn d8 b' fis
214
215 r4.\sustainOff\sustainOn d8 b' fis
216 r4.\sustainOff\sustainOn d8 b' fis
217 r4.\sustainOff\sustainOn d8 b' fis
218 r4.\sustainOff\sustainOn d8 b' fis\sustainOff
219 }
220
221 stickArpeggioRightLonger = \relative c' {
222 \time 3/4
223 r4.\sustainOn d,8 b' fis
224 r4.\sustainOff\sustainOn d8 b' fis
225 d4 b' fis ~ | fis2.
226
227 r4.\sustainOff\sustainOn d8 b' fis
228 r4.\sustainOff\sustainOn d8 b' fis
229 r2. r2. r2.
230
231 %% repeat, but with more pathos!
232 r4.\sustainOn d8 b' fis
233 r4.\sustainOff\sustainOn d8 b' fis
234 r4.\sustainOff\sustainOn d8 b' fis
235 r4.\sustainOff\sustainOn d8 b' fis
236
237 r4.\sustainOff\sustainOn d8 b' fis
238 r4.\sustainOff\sustainOn d8 b' fis
239 r4.\sustainOff\sustainOn d8 b' fis
240 r4.\sustainOff\sustainOn d8 b' fis
241 }
242
243 stickArpeggioLeftLonger = \relative c, {
244 e8\sustainOn b' g' ~ g4. |
245 e,8 b' g' ~ g4. |
246 e,4. g'4. | r2. |
247
248 d,8\sustainOff\sustainOn a' fis' ~ fis4.
249 d,8 a' fis' ~ fis4.
250 d,2. ~ d2. ~ d2.
251
252 %% repeat, but with more pathos!
253 e8\sustainOn b' g' ~ g4. |
254 e,8 b' g' ~ g4. |
255 e,8 b' g' ~ g4. |
256 e,8 b' g' ~ g4. |
257
258 d,8\sustainOff\sustainOn a' fis' ~ fis4.
259 d,8\sustainOff\sustainOn a' fis' ~ fis4.
260 d,8\sustainOff\sustainOn a' fis' ~ fis4.
261 d,8\sustainOff\sustainOn a' fis' ~ fis4.
262 }
263
264
265 stickDramaLeft = \relative c, {
266 \key b \minor
267 \time 3/4
268 \repeat unfold 2 {
269 <e b' g'>2 r4
270 <e b' g'>2 r4
271 <e b' g'>2 r4
272 <e b' g'>2 r4
273 <b fis' d'>2 r4
274 b8 fis' cis' d4. ~ | d2. ~ | d2. |
275 }
276 <a e' cis'>2.\arpeggio ~ | <a e' cis'>2. ~ | <a e' cis'>2. ~ | <a e' cis'>2. |
277 <e b' gis'>2.\arpeggio ~ | <e b' gis'>2. ~ | <e b' gis'>2. ~ | <e b' gis'>2. |
278 }
279 stickDramaRight = \relative c' {
280 \key cis \minor
281 \time 3/4
282 \repeat unfold 2 {
283 cis2 b4 | cis2 b4 | cis2 b4 | cis4 d cis |
284 b fis2 ~ | fis2. ~ | fis2. ~ | fis2. |
285 }
286 cis'2. ~ cis2. ~ cis2. b2 a4
287 gis2. ~ gis2. ~ gis2. ~ gis2.
288 }
289
290 stickFinalLeft = \relative c, {
291 \time 5/4
292 d8\sustainOn a' fis'1
293 fis,8\sustainOff\sustainOn cis' a'1
294 e,8\sustainOff\sustainOn b' gis'1
295 r8\sustainOff r d,1
296 }
297
298 %% TODO
299 stickFinalRight = \transpose g d \relative c' {
300 \time 5/4
301 g'4.\sustainOff fis8 e4 cis16 e fis8 g4 |
302 fis4. e16 d b4
303 \tuplet 3/2 { fis8 b d }
304 fis4 |
305
306 e2. ~ e2 |
307 d8 cis bes1 |
308 }
309
310 stick = \new PianoStaff <<
311 \set PianoStaff.midiInstrument = #"clav"
312 \set PianoStaff.pedalSustainStyle = #'bracket
313
314 \new Staff \relative c' {
315 \key cis \minor
316 \clef "treble_8"
317
318 %% intro
319 \time 2/4
320 \relative c'' { R2 | r4 r8 g ~ | }
321 \repeat volta 2 \stickA
322 \alternative {
323 { r2 | }
324 { r2 | R2*3 }
325 }
326
327 %% solo
328 \relative c' {
329 \time 2/4
330 r4. fis16 e |
331 dis cis b ais e' cis b ais |
332 dis e dis cis b ais b ais |
333 \time 3/4
334 gis2 r8 gis8 |
335 \time 2/4
336 \tuplet 3/2 { ais8 b c } e4 | a,4. r8 |
337 c'4 c16 b ais g | fis f c e dis4 | r4. a'8 |
338
339 \time 2/4
340 e'8 r4 a,16 gis |
341 r8 fis'16 e r8 a,16 gis |
342 r8 r16 fis'16 e fis e r16 |
343 \time 3/4
344 r8 a,16 gis fis e
345 dis r \tuplet 3/2 { r8 c, cis } |
346 \time 2/4
347 \tuplet 3/2 { g' gis a } \tuplet 3/2 { c cis dis ~ } |
348 dis4 r8 ais16 b |
349 c16 r8 g'16 cis,8 r8 |
350 e,16 gis b e gis b gis e |
351 b gis e4 f8 |
352 }
353
354 %% spooky
355 \key fis \minor
356 \repeat volta 2 {
357 \time 2/4
358 <fis, fis'>4. <cis' cis'>8 ~ |
359 <cis cis'>2 ~ | <cis cis'>2 ~ |
360 \time 3/4
361 <cis cis'>4 <d d'>4 <cis cis'>4 |
362 \time 2/4
363 <cis cis'>4. <b b'>8 ~ | <b b'>2 ~ | <b b'>2 |
364 <a a'>4 <gis gis'>4 ~ | <gis gis'>2 |
365 }
366
367 %% Half time feel
368 \key b \minor
369 \repeat volta 2 {
370 \repeat volta 2 \stickHalfTimeFeel
371 \stickWeird
372 \stickDance
373 }
374
375 %% Beauty
376 \stickBeautyRight
377
378 %% Arpeggio
379 \tempo 4 = 170
380 \key e \minor
381 \stickBeforeArpeggioRight
382
383 \stickArpeggioRight
384 \key fis \minor
385 \transpose c d { \stickArpeggioRightHigher }
386 \stickDramaRight
387
388 \stickArpeggioRightLonger
389 \key fis \minor
390 \transpose c d { \stickArpeggioRightHigher }
391 \stickDramaRight
392 }
393
394 %% staff for left hand side
395 \new Staff \relative c {
396 \key cis \minor
397 \clef "bass_8"
398
399 %% intro
400 \time 2/4 { R2 | R2 |}
401 %% TODO: empty
402 \repeat volta 2 { R2*11 | }
403 \alternative {
404 { R2 | }
405 { R2*4 }
406 }
407
408 %% Solo
409 \repeat unfold 2 {
410 \time 2/4 R2*3
411 \time 3/4 R2.
412 \time 2/4 R2*5
413 }
414
415 %% Spooky
416 \key fis \minor
417 \repeat volta 2 {
418 \time 2/4 R2*3
419 \time 3/4 R2.
420 \time 2/4 R2*5
421 }
422
423 %% Half time feel
424 \key b \minor
425 \repeat volta 2 {
426 \repeat volta 2 {
427 \time 2/4 { R2*3 }
428 \time 3/4 { R2. }
429 \time 2/4 { R2*5 }
430 }
431 \stickWeirdLeft
432 \stickDanceLeft
433 }
434
435 %% Beauty
436 \stickBeautyLeft
437
438 %% Arpeggio
439 \key e \minor
440 \stickBeforeArpeggioLeft
441
442 \stickArpeggioLeft
443 \key fis \minor
444 \transpose c d { \stickArpeggioLeftHigher }
445 \stickDramaLeft
446
447 \stickArpeggioLeftLonger
448 \key fis \minor
449 \transpose c d { \stickArpeggioLeftHigher }
450 \stickDramaLeft
451 }
452 >>