7c6707e75d13058c9a455810c96e38a526239af9
[music/pretentious.git] / 03-circus / music / keys.ly
1 keyboardIntroUpper = \relative c' {
2 <cis e g>8 ~ <cis e gis>-. r <cis e gis>-. r <cis e gis>-. r <cis e gis>-.
3 r <cis e gis>-. r <cis e gis>-. r <cis e gis>-. r
4
5 <cis e g>8 ~
6 <cis e g>8 ~ <cis e gis>-.
7 r <cis e gis>-. r <cis e gis>-. r <cis e gis>-.
8 r <cis e gis>-. r <cis e gis>-.
9
10 <dis fis ais>8 r r <d fis ais>8 ~ <d fis ais>2 |
11 <dis fis ais>8 r r <d fis ais>8 ~ <d fis ais>2 |
12 }
13
14 keyboardIntroLower = \relative c {
15 cis4-. gis'-. cis,-. gis'-.
16 cis,-. gis'-. cis,-. r8 cis ~
17 cis4 gis'-. cis,-. gis'-.
18 cis,-. gis'-.
19 dis8 r r d ~ d2 |
20 dis8 r r d ~ d2 |
21 }
22
23 keysIntroEndUpper = \relative c' {
24 r8 <cis e gis>-. r <cis e gis>-. |
25 r <cis e gis>-. r <cis e gis>-. |
26 r <cis e gis>-. r <cis e gis>-. |
27 r <cis e gis>-. r <cis e gis>-. |
28 }
29
30 keysIntroEndLower = \relative c {
31 cis4-. gis'-. | cis,-. gis'-. |
32 cis,-. gis'-. | cis,-. gis'-. |
33 }
34
35 keysSoloUpper = \relative c' {
36 \time 2/4
37 r8 <cis e gis>-. r <cis e gis>-. |
38 r <cis e gis>-. r <cis e gis>-. |
39 r <cis e gis>-. r <cis e gis>-. |
40 \time 3/4
41 r <cis e gis>-. r r <cis e gis>-. r |
42 \time 2/4
43 r8 <c e a>-. r <c e a>-. |
44 r <c e a>-. r <c e a>-. |
45 r <c e a>-. r <c e a>-. |
46 r <c e a>-. r r |
47 <c e a>-. r r <c e a>-. |
48 }
49
50 keysSoloLower = \relative c {
51 \time 2/4
52 cis4-. gis-. | cis-. gis-. |
53 cis-. gis-. |
54 \time 3/4
55 cis8 r gis gis r gis |
56 \time 2/4
57 a4-. e-. | a-. e-. | a-. e-. |
58 a-. c8 b | r f f r |
59 }
60
61 keysSpookyUpper = \relative c' {
62 \time 2/4
63 <cis fis a>2 ~ | <cis fis a> ~ | <cis fis a> ~ |
64 \time 3/4
65 <cis fis a>2. |
66 \time 2/4
67 <d f a>2 ~ | <d f a> ~ |
68 <d f a> ~ | <d f a> ~ |
69 <d f a> |
70 }
71
72 keysSpookyLower = \relative c {
73 \time 2/4
74 fis2 ~ | fis ~ | fis ~ |
75 \time 3/4
76 fis2. |
77 \time 2/4
78 d2 ~ | d ~ | d ~ | d ~ | d |
79 }
80
81 keysHalfUpper = \relative c' {
82 \time 2/4
83 r4 <d fis b>8-. r |
84 r4 <d fis b>8-. r |
85 r4 <d fis b>8-. r |
86 \time 3/4
87 r4 <d fis b>8-. r <d fis b>-. r |
88 \time 2/4
89 r4 <d g bes>8-. r |
90 r4 <d g bes>8-. r |
91 r4 <d g bes>8-. r |
92 r4 <d g bes>8-. r |
93 r4 <d g bes>8-. r |
94 }
95
96 keysHalfLower = \relative c {
97 \time 2/4
98 b4. r8 | b4. r8 | b4. r8 |
99 \time 3/4
100 b4-. r r |
101 \time 2/4
102 g-. r | g-. r | g-. r |
103 g-. r | g-. r8 g-. |
104 }
105
106 keysWeirdUpper = \relative c' {
107 \repeat volta 2 {
108 \time 5/4 { <d g b>8 r <d g b> r <d g b> r <d g b> r <d g b> r |}
109 \time 9/8 { <d fis b>8 r <d fis b> r <d fis b> r <d fis b> r r |}
110 } \alternative {
111 { <d fis b>8 r <d fis b> r <d fis b> r <d fis b> r r |}
112 { <d fis b>8 r <d fis b> r <d fis b> r <d fis b> r r |}
113 }
114 }
115
116 keysWeirdLower = \relative c {
117 \repeat volta 2 {
118 \time 5/4 { g8 r g r g r g r g r |}
119 \time 9/8 { b8 r b r b r b r b | }
120 } \alternative {
121 { b8 r b r b r b r b |}
122 { b8 r b r b r b r b |}
123 }
124 }
125
126 keysDanceUpper = \relative c' {
127 \time 5/4 { <d g b>4 r2 r2 | <d fis b>4 r2 r2 | }
128 \time 3/4 { <d g b>2. | <e ais fis>4 ~ <d ais' fis>4 r4 | }
129 }
130
131 keysDanceLower = \relative c {
132 \time 5/4 { d4 r2 r2 | d4 r2 r2 | }
133 \time 3/4 { e2. | e4 d4 r4 | }
134 }
135
136 keysBeautyUpper = \relative c' {
137 \repeat unfold 3 {
138 \time 4/4 { r1 |}
139 \time 3/4 { r2. |}
140 }
141
142 \time 4/4
143 b'4.-> a a8-> g8 ~ |
144 \time 6/8
145 g4. r8 g8 fis |
146 \time 9/8
147 e2 r4 d8 r cis |
148
149 \repeat volta 2 {
150 \time 7/8 { r8*7 |}
151 \time 3/4 { r2. |}
152
153 \repeat unfold 2 {
154 \time 4/4 { r1 |}
155 \time 3/4 { r2. |}
156 }
157 \time 4/4
158 b'4.-> a a8-> g8 ~ |
159 } \alternative {
160 { \time 6/8 g4. r8 g8 fis |
161 \time 9/8 e2 r4 d8 r cis |}
162 { \time 6/8 g'4. r8 g8 fis |}
163 }
164 }
165
166 keysBeautyLower = \relative c {
167 \repeat unfold 3 {
168 \time 4/4 { b1 | }
169 \time 3/4 { d4. cis | }
170 }
171 \time 4/4 { R1 |}
172 \time 6/8 R8*6 |
173 \time 9/8 R8*9 |
174
175 \repeat volta 2 {
176 \time 7/8 { b8*7 | }
177 \time 3/4 { d4. cis | }
178
179 \repeat unfold 2 {
180 \time 4/4 { b1 | }
181 \time 3/4 { d4. cis | }
182 }
183 \time 4/4 { R1 |}
184 } \alternative {
185 { \time 6/8 R8*6 |
186 \time 9/8 R8*9 | }
187 { \time 6/8 { R8*6 |} }
188 }
189 }
190
191 keysBeforeArpeggioUpper = \relative c' {
192 \time 3/4 r2. | r2. | r2. | r2. |
193 }
194
195 keysBeforeArpeggioLower = \relative c {
196 \time 3/4 r2. | r2. | r2. | r2. |
197 }
198
199 keysArpeggioUpper = \relative c' {
200 <e g b>2. ~ | q ~ | q2 r4 | r2. |
201 <d fis a>2. ~ | q ~ | q2 r4 | r2. |
202 <e g b>2. ~ | q ~ | q ~ | q |
203 <d fis a>2. ~ | q ~ | q ~ | q |
204 }
205
206 keysArpeggioLower = \relative c {
207 e2. ~ | e ~ | e ~ | e |
208 d2. ~ | d ~ | d ~ | d |
209 e2. ~ | e ~ | e ~ | e |
210 d2. ~ | d ~ | d ~ | d |
211 }
212
213 keysArpeggioHigherUpper = \relative c' {
214 <e g b>2. ~ | q ~ | q2 r4 | r2. |
215 <d fis a>2. ~ | q ~ | q2 r4 | r2. |
216 }
217
218 keysArpeggioHigherLower = \relative c {
219 e2. ~ | e ~ | e ~ | e |
220 d2. ~ | d ~ | d ~ | d |
221 }
222
223 keysArpeggioLongerUpper = \relative c' {
224 <e g b>2. ~ | q ~ | q2 r4 | r2. |
225 <d fis a>2. ~ | q ~ | q2 r4 | r2. | r2. |
226 <e g b>2. ~ | q ~ | q ~ | q |
227 <d fis a>2. ~ | q ~ | q ~ | q |
228 }
229 keysArpeggioLongerLower = \relative c {
230 e2. ~ | e ~ | e ~ | e |
231 d2. ~ | d ~ | d ~ | d ~ | d |
232 e2. ~ | e ~ | e ~ | e |
233 d2. ~ | d ~ | d ~ | d |
234 }
235
236 keysDramaUpper = \relative c'' {
237 \repeat unfold 2 {
238 <g b e>2 r4 | q2 r4 | q2 r4 | <g b>2 <a cis>4 |
239 <b d>2. | q2. | q2. | R2. |
240 }
241 }
242 keysDramaLower = \relative c {
243 \repeat unfold 2 {
244 e2 r4 | e2 r4 | e2 r4 | e2 r4 |
245 b2. | b2. | b2. | b2. |
246 }
247 }
248
249 keysDramaEndingUpper = \relative c' {
250 <a e' cis'>2. | q2. | q2. | q2. |
251 <e b' gis'>2. | q2. | q2. | q2. |
252 }
253 keysDramaEndingLower = \relative c {
254 a2. | a2. | a2. | a2. |
255 e2. | e2. | e2. | e2. |
256 }
257
258 keysFinalUpper = \relative c' {
259 <a e' cis'>2. | q2. | q2. | q2. |
260 <e b' gis'>2. | <cis>2. | <d a' fis'>2. | q2. |
261 q2. | q2. |
262 }
263 keysFinalLower = \relative c {
264 a2. | R2. | R2. | R2. |
265 e2. | cis2. | d2. | d2. |
266 d2. | d2. |
267 }
268
269 keyboardUpper = \relative c' {
270 \set Staff.midiInstrument = #"reed organ"
271 \time 2/4
272 \key cis \minor
273 R2 | r4 r8 <cis e g> ~ |
274 \repeat volta 2 \keyboardIntroUpper
275 \alternative {
276 { r2 | }
277 { \keysIntroEndUpper }
278 }
279
280 %% Stick solo
281 \repeat unfold 2 \keysSoloUpper
282
283 %% Spooky!
284 \key fis \minor
285 \set Staff.midiInstrument = #"choir aahs"
286 \repeat volta 2 \keysSpookyUpper
287
288 %% Half time feel
289 \key b \minor
290 \repeat volta 2 {
291 \set Staff.midiInstrument = #"reed organ"
292 \repeat volta 2 \keysHalfUpper
293 \keysWeirdUpper
294 \keysDanceUpper
295 }
296
297 %% Beauty
298 \set Staff.midiInstrument = #"string ensemble 1"
299 \keysBeautyUpper
300
301 %% Arpeggio
302 \set Staff.midiInstrument = #"pad 3 (polysynth)"
303 \set Staff.midiMinimumVolume = #0.2
304 \set Staff.midiMaximumVolume = #0.2
305
306 \key e \minor
307 \keysBeforeArpeggioUpper
308 \keysArpeggioUpper
309
310 \key fis \minor
311 \transpose c d { \keysArpeggioHigherUpper }
312 \keysDramaUpper
313 \keysDramaEndingUpper
314
315 \keysArpeggioLongerUpper
316 \key fis \minor
317 \transpose c d { \keysArpeggioHigherUpper }
318 \keysDramaUpper
319 \keysFinalUpper
320 }
321
322 keyboardLower = \relative c {
323 \set Staff.midiInstrument = #"reed organ"
324 \key cis \minor
325 r2 | r2 |
326 \repeat volta 2 \keyboardIntroLower
327 \alternative {
328 { r2 | }
329 { \keysIntroEndLower }
330 }
331
332 \repeat unfold 2 \keysSoloLower
333
334 %% Spooky!
335 \key fis \minor
336 \set Staff.midiInstrument = #"choir aahs"
337 \repeat volta 2 \keysSpookyLower
338
339 %% Half time feel
340 \key b \minor
341 \repeat volta 2 {
342 \set Staff.midiInstrument = #"reed organ"
343 \repeat volta 2 \keysHalfLower
344 \keysWeirdLower
345 \keysDanceLower
346 }
347
348 %% Beauty
349 \set Staff.midiInstrument = #"string ensemble 1"
350 \keysBeautyLower
351
352 %% Arpeggio
353 \set Staff.midiInstrument = #"pad 3 (polysynth)"
354 \set Staff.midiMinimumVolume = #0.2
355 \set Staff.midiMaximumVolume = #0.2
356
357 \key e \minor
358 \keysBeforeArpeggioLower
359 \keysArpeggioLower
360
361 \key fis \minor
362 \transpose c d { \keysArpeggioHigherLower }
363 \keysDramaLower
364 \keysDramaEndingLower
365
366 \keysArpeggioLongerLower
367 \key fis \minor
368 \transpose c d { \keysArpeggioHigherLower }
369 \keysDramaLower
370 \keysFinalLower
371 }