circus: Add parts.
[music/pretentious.git] / 03-circus / music / 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 }
277 stickDramaEndingLeft = \relative c {
278 <a e' cis'>2.\arpeggio ~ | <a e' cis'>2. ~ | <a e' cis'>2. ~ | <a e' cis'>2. |
279 <e b' gis'>2.\arpeggio ~ | <e b' gis'>2. ~ | <e b' gis'>2. ~ | <e b' gis'>2. |
280 }
281 stickFinalLeft = \relative c {
282 <a e' cis'>2.\arpeggio ~ | <a e' cis'>2. ~ | <a e' cis'>2. ~ | <a e' cis'>2. |
283 <e b' gis'>2.\arpeggio | cis2. | <d a' fis'>2. ~ | <d a' fis'>2. ~ |
284 <d a' fis'>2. ~ | <d a' fis'>2. |
285 }
286
287 stickDramaRight = \relative c' {
288 \key cis \minor
289 \time 3/4
290 \repeat unfold 2 {
291 cis2 b4 | cis2 b4 | cis2 b4 | cis4 d cis |
292 b fis2 ~ | fis2. ~ | fis2. ~ | fis2. |
293 }
294 }
295
296 stickDramaEndingRight = \relative c {
297 cis'2. ~ cis2. ~ cis2. b2 a4
298 gis2. ~ gis2. ~ gis2. ~ gis2.
299 }
300 stickFinalRight = \relative c {
301 cis'2. ~ | cis2. ~ | cis2. | b2 a4 |
302 gis2. | a2. | fis2. ~ | fis2. ~ |
303 fis2. ~ | fis2. |
304 }
305
306 stick = <<
307 \new Staff \relative c' {
308 \key cis \minor
309 \clef "treble_8"
310
311 %% intro
312 \time 2/4
313 \relative c'' { R2 | r4 r8 g ~ | }
314 \repeat volta 2 \stickA
315 \alternative {
316 { r2 | }
317 { r2 | R2*3 }
318 }
319
320 %% solo
321 \relative c' {
322 \time 2/4
323 r4. fis16 e |
324 dis cis b ais e' cis b ais |
325 dis e dis cis b ais b ais |
326 \time 3/4
327 gis2 r8 gis8 |
328 \time 2/4
329 \tuplet 3/2 { ais8 b c } e4 | a,4. r8 |
330 c'4 c16 b ais g | fis f c e dis4 | r4. a'8 |
331
332 \time 2/4
333 e'8 r4 a,16 gis |
334 r8 fis'16 e r8 a,16 gis |
335 r8 r16 fis'16 e fis e r16 |
336 \time 3/4
337 r8 a,16 gis fis e
338 dis r \tuplet 3/2 { r8 c, cis } |
339 \time 2/4
340 \tuplet 3/2 { g' gis a } \tuplet 3/2 { c cis dis ~ } |
341 dis4 r8 ais16 b |
342 c16 r8 g'16 cis,8 r8 |
343 e,16 gis b e gis b gis e |
344 b gis e4 f8 |
345 }
346
347 %% spooky
348 \key fis \minor
349 \repeat volta 2 {
350 \time 2/4
351 <fis, fis'>4. <cis' cis'>8 ~ |
352 <cis cis'>2 ~ | <cis cis'>2 ~ |
353 \time 3/4
354 <cis cis'>4 <d d'>4 <cis cis'>4 |
355 \time 2/4
356 <cis cis'>4. <b b'>8 ~ | <b b'>2 ~ | <b b'>2 |
357 <a a'>4 <gis gis'>4 ~ | <gis gis'>2 |
358 }
359
360 %% Half time feel
361 \key b \minor
362 \repeat volta 2 {
363 \repeat volta 2 \stickHalfTimeFeel
364 \stickWeird
365 \stickDance
366 }
367
368 %% Beauty
369 \stickBeautyRight
370
371 %% Arpeggio
372 \tempo 4 = 170
373 \key e \minor
374 \stickBeforeArpeggioRight
375
376 \stickArpeggioRight
377 \key fis \minor
378 \transpose c d { \stickArpeggioRightHigher }
379 \stickDramaRight
380 \stickDramaEndingRight
381
382 \stickArpeggioRightLonger
383 \key fis \minor
384 \transpose c d { \stickArpeggioRightHigher }
385 \stickDramaRight
386 \stickFinalRight
387 }
388
389 %% staff for left hand side
390 \new Staff \relative c {
391 \key cis \minor
392 \clef "bass_8"
393
394 %% intro
395 \time 2/4 { R2 | R2 |}
396 %% TODO: empty
397 \repeat volta 2 { R2*11 | }
398 \alternative {
399 { R2 | }
400 { R2*4 }
401 }
402
403 %% Solo
404 \repeat unfold 2 {
405 \time 2/4 R2*3
406 \time 3/4 R2.
407 \time 2/4 R2*5
408 }
409
410 %% Spooky
411 \key fis \minor
412 \repeat volta 2 {
413 \time 2/4 R2*3
414 \time 3/4 R2.
415 \time 2/4 R2*5
416 }
417
418 %% Half time feel
419 \key b \minor
420 \repeat volta 2 {
421 \repeat volta 2 {
422 \time 2/4 { R2*3 }
423 \time 3/4 { R2. }
424 \time 2/4 { R2*5 }
425 }
426 \stickWeirdLeft
427 \stickDanceLeft
428 }
429
430 %% Beauty
431 \stickBeautyLeft
432
433 %% Arpeggio
434 \key e \minor
435 \stickBeforeArpeggioLeft
436
437 \stickArpeggioLeft
438 \key fis \minor
439 \transpose c d { \stickArpeggioLeftHigher }
440 \stickDramaLeft
441 \stickDramaEndingLeft
442
443 \stickArpeggioLeftLonger
444 \key fis \minor
445 \transpose c d { \stickArpeggioLeftHigher }
446 \stickDramaLeft
447 \stickFinalLeft
448 }
449 >>