song1: Shorten transition variant.
[music/pretentious.git] / 01-song1 / music / stick.ly
1 stickIntroLeft = \relative c, {
2 r8 b\f cis r \parenthesize <cis' gis'>\pp r <cis gis'>\f cis, |
3 r8 b cis r \parenthesize <cis' gis'>\pp r <cis gis'>\f cis, |
4 r8 b cis r \parenthesize <cis' gis'>\pp r <cis gis'>\f r |
5 e8 b' e, b' dis,8 b' dis, b' |
6
7 r8 b,, cis r \parenthesize <cis' gis'>\pp r <cis gis'>\f cis, |
8 r8 b cis r \parenthesize <cis' gis'>\pp r <cis gis'>\f cis, |
9 r8 b cis r \parenthesize <cis' gis'>\pp r <cis gis'>\f r |
10 <e b'>2 <dis b'> |
11 }
12
13 stickIntroRight = \relative c {
14 \repeat unfold 3 { <dis fis b>4 r8 <e gis cis>4 <e gis cis> r8 | }
15 <gis b e>2 <dis fis b> |
16 \repeat unfold 3 { <dis fis b>4 r8 <e gis cis>4 <e gis cis> r8 | }
17 a'8 gis fis e
18 dis16 e dis8 b4
19 }
20
21 stickALeft = \relative c {
22 \key cis \minor
23 \time 2/4
24 cis8 r cis r | r r cis r | r r cis cis |
25 cis8 r cis r | r r cis r |
26 \time 6/8
27 r r cis r cis cis |
28
29 \time 2/4
30 cis8 r cis r | r r cis r | r r cis r |
31 \time 4/4
32 r8 r r r r r e'4 ~ | e2 e4-. dis-. |
33 }
34
35 stickARight = \relative c {
36 \key cis \minor
37 \time 2/4
38 r4 r | <e gis cis>4 r8 <dis fis b> | r <dis fis b> r r |
39 r4 r | <e gis cis>4 r8 <dis fis b> |
40 \time 6/8
41 r <dis fis b> r <e gis cis> r r|
42
43 \time 2/4
44 r4 r | <e gis cis>4 r8 <dis fis b> | r <dis fis b> r r |
45 \time 4/4
46 cis'8-2 gis-1 e-3
47 \change Staff = "stick left" dis'-1 \change Staff = "stick right" c-2 fis,-1
48 cis'4-2 ~ | cis2 cis4-.-2 c-.-1 |
49 }
50
51 stickAExtendedLeft = \relative c' {
52 \time 4/4
53 %% Notes come from the right. The left hand only supports the right
54 %% hand line.
55 r1 | r1 |
56
57 r2 r4 e4 ~ | e2 e4-. dis-. |
58 r1 | r1 |
59 }
60
61 stickAExtendedRight = \relative c' {
62 \time 4/4
63 e8-1 cis-3 \change Staff = "stick left" gis-1
64 \change Staff = "stick right"
65 fis'-2 c-1 \change Staff = "stick left" a-2
66 \change Staff = "stick right"
67 <e' gis>4 ~ | <e gis>4.
68
69 \change Staff = "stick left"
70 e8-2
71 \change Staff = "stick right"
72 fis-2
73 \change Staff = "stick left"
74 dis-1
75 \change Staff = "stick right"
76 c-1
77 \change Staff = "stick left"
78 e-2 |
79 \change Staff = "stick right"
80
81 cis8-2 gis-1 e-3
82 \change Staff = "stick left" dis'-1 \change Staff = "stick right" c-2 fis,-1
83 cis'4-2 ~ | cis2 cis4-.-2 c-.-1 |
84
85 e8-1 cis-3 \change Staff = "stick left" gis-1
86 \change Staff = "stick right"
87 fis'-2 c-1 \change Staff = "stick left" a-2
88 \change Staff = "stick right"
89 <e' gis>4 ~ | <e gis>2 r8 fis gis a |
90 }
91
92 stickATransitionLeft = \relative c {
93 \time 4/4 r1 | r1 | r1 | r1 |
94 }
95 stickATransitionRight = \relative c' {
96 b'8 gis e fis gis e <e a cis>4\arpeggio ~ | <e a cis>1 ~
97 \time 4/4 <e a cis>1 ~ | <e a cis> |
98 }
99
100 stickATransitionVariantLeft = \relative c {
101 \time 4/4 r1 | r1 | r1 | r1 | r1 | r1 |
102 }
103
104 stickATransitionVariantRight = \relative c' {
105 \time 4/4 \repeat unfold 4 {
106 cis8-2 gis-1 e-3 e' c4-.-1 cis4-.-2
107 }
108 <e gis cis>8-. r r q-. r r r r | r q4. r2 |
109 }
110
111 stickVerseLeft = \relative c {
112 \time 4/4
113 \key cis \minor
114 cis4\sustainOn gis' e' cis, ~ cis gis' e' r\sustainOff |
115 e,,\sustainOn b' gis' b, ~ b fis' dis' b,\sustainOff |
116 cis4\sustainOn gis' e' cis, ~ cis gis' e' r\sustainOff |
117 e,,\sustainOn b' gis'\sustainOff b,\sustainOn ~ b fis' dis' b,\sustainOff |
118 a,2. <a' e' b'>4 ~ | <a e' b'>1 |
119 a,4. <a' e' b'> b,4 ~ | b1 |
120 }
121
122 % TODO
123 stickVerseRight = \relative c {
124 \time 4/4
125 \key cis \minor
126 r1 | r1 | r1 | r1 | r1 | r1 |
127 r1 | r1 | r1 | r1 | r1 | r1 |
128 }
129
130 stickVerseVariantLeft = \relative c {
131 \time 4/4
132 \key bes \minor
133 bes4\sustainOn f' des' bes, ~ bes f' des' r\sustainOff |
134 des,\sustainOn as' f' c,\sustainOff ~ c\sustainOn as' es' c,\sustainOff |
135
136 bes4\sustainOn f' des' bes, ~ bes f' des' r\sustainOff |
137 des,\sustainOn as' f' c,\sustainOff ~ c\sustainOn as' es' c,\sustainOff |
138
139 ges8 r ges r ges r <des' f'>4 ~ | <des f'>1 |
140 ges,,4. <ges' des' as'>4. as,4 ~ | as1 |
141 }
142
143 % TODO
144 stickVerseVariantRight = \relative c {
145 \time 4/4
146 \key bes \minor
147 r1 | r1 | r1 | r1 | r1 | r1 |
148 r1 | r1 | r1 | r1 | r1 | r1 |
149 }
150
151 % TODO
152 stickVerseHarderLeft = \stickVerseLeft
153
154 % TODO
155 stickVerseHarderRight = \stickVerseRight
156
157 stickNastyLeft = \relative c {
158 \time 6/8
159 \key cis \minor
160 R2.*8 | R2.*8 |
161 \repeat unfold 8 {
162 cis,8 cis' cis, r cis cis' | cis, r cis cis' cis, r |
163 }
164
165 cis' cis cis r cis cis | cis r cis cis cis r |
166 cis cis cis r cis cis | cis r cis cis cis r |
167 cis cis cis r cis cis | cis r cis cis cis r |
168 cis cis cis r cis cis | cis r cis cis cis r |
169
170 cis cis cis r cis cis | cis r cis cis cis r |
171 cis cis cis r cis cis | cis r cis cis cis r |
172 cis cis cis r cis cis | cis r cis cis cis r |
173 cis cis cis r cis cis | cis r cis cis cis r |
174
175 cis cis cis r cis cis | cis r cis cis cis r |
176 cis cis cis r cis cis | cis r cis cis cis r |
177 cis cis cis r cis cis | cis r cis cis cis r |
178 cis cis cis r cis cis | bis r bis bis bis r |
179
180 \key e \minor
181 b b b r b b | b r c c c r |
182 c c c r c c | b r b b b r |
183
184 e, e e r e e | e r e e fis' g |
185 fis fis fis r fis fis | fis g a b, c b |
186
187 e, e e r e e | e r e e fis' g |
188 ais, ais ais r ais ais | a r a a a r |
189
190 e e e r e e | e r e e fis' g |
191 fis fis fis r fis fis | fis g a b, c b |
192
193 e, e e r e e | e r e e fis' g |
194
195 \time 9/8
196 fis fis fis r fis fis fis16-. r fis8 g |
197
198 \time 3/4
199 a2. ~ | a2. |
200 }
201
202 stickNastyRight = \relative c {
203 \time 6/8
204 \key cis \minor
205 \repeat unfold 2 { R2.*8 | R2.*8 |}
206
207 e8 e e r e e | e r e e e r |
208 es es es r es es | fis r fis fis fis r |
209 e e e r e e | e r e e e r |
210 e e e r e e | e r e e e r |
211
212 e8 e e r e e | e r e e e r |
213 es es es r es es | fis r fis fis fis r |
214 e e e r e e | e r e e e r |
215 e e e r e e | e r e e e r |
216
217 e8 e e r e e | e r e e e r |
218 es es es r es es | fis r fis fis fis r |
219 e e e r e e | e r e e e r |
220 e e e r e e | es r es es es r |
221
222 \key e \minor
223 e e e r e e | e r e e e r |
224 e e e r e e | es r es es es r |
225
226 e e e r e e | e r e e a b |
227 a a a r a a | a b c es e es |
228
229 e, e e r e e | e r e e a b |
230 ais ais ais r ais ais | a r a a a r |
231
232 e e e r e e | e r e e a b |
233 a a a r a a | a b c es e es |
234
235 e, e e r e e | e r e e a b |
236
237 \time 9/8
238 a a a r a a a16-. r a8 b |
239
240 \time 3/4
241 c2. ~ | c2. |
242 }
243
244 stickWaltzLeft = \relative c {
245 \time 3/4
246 e4 b' g' | es,4 b' g' |
247 d, b' g' | cis,, a' e' |
248 c,\sustainOn g' e' | r2 c,4 | g'2 c,4 |
249 g'2. ~ | g2. | r2 c,4\sustainOff |
250
251 d4\sustainOn a' fis' | r2 d,4 | a'2 d,4 |
252 a'4. d,4.\sustainOff | cis4 c b |
253 \key fis \minor
254 bes4\sustainOn fis' cis' | r2 bes,4 | fis'2.\sustainOff |
255 \time 4/4
256 cis4 a' e' cis, | c gis' dis' c, |
257 }
258
259 stickWaltzRight = \relative c'' {
260 \time 3/4
261 r4 <g b> <g b> | r <g b> <g b> |
262 <g b> c d | <g, b>2. |
263 <g b>2.\arpeggio | <e a> | <b e>2 r4 |
264 <g' b>4. <e a>4. | <b e>4 a' b | c b a |
265
266 <g b>2.\arpeggio | <e a> | <b e>2 fis'4 |
267 <g b>4. <e a>4. | e4 fis g |
268 \key fis \minor
269 <e gis>2. | <cis fis>2. | <gis cis>2 r4 |
270
271 \time 4/4
272 <e' gis>4. <cis fis> cis4 |
273 gis'4. fis c4 |
274 }
275
276 stickOutroLeft = \relative c, {
277 \time 4/4
278 \repeat unfold 3 { r8 b cis <cis' gis'> r q r r |}
279 <e b'>2 <dis b'> |
280 \repeat unfold 3 { r8 b cis <cis' gis'> r q r r |}
281 <e b'>2 <dis b'> |
282 }
283
284 stickOutroRight = \relative c' {
285 \repeat unfold 3 { <cis e>8 r r r <gis cis> r q r | }
286 <gis b e>2 <dis fis b> |
287 \repeat unfold 3 { <cis e>8 r r r <gis cis> r q r | }
288 <gis b e>2 <dis fis b> |
289 }
290
291 stickEndLeft = {}
292 stickEndRight = {}
293
294
295
296 stick = <<
297 \new Staff = "stick right" \relative c' {
298 \set Staff.midiPanPosition = #-0.7
299 \key cis \minor
300 \clef "treble_8"
301
302 \time 4/4
303 \repeat unfold 2 \stickIntroRight
304 \repeat volta 2 \stickARight
305 \stickAExtendedRight
306 \stickATransitionRight
307
308 \repeat volta 3 \stickVerseRight
309 \stickVerseVariantRight
310 \stickVerseHarderRight
311
312 \repeat volta 2 \stickARight
313 \stickAExtendedRight
314 \stickATransitionVariantRight
315
316 \nastyPause
317 \stickNastyRight
318 \stickWaltzRight
319
320 \repeat volta 2 \stickARight
321 \stickAExtendedRight
322 \repeat volta 2 \stickOutroRight
323 \stickEndRight
324 }
325
326 %% staff for left hand side
327 \new Staff = "stick left" \relative c {
328 \set Staff.midiPanPosition = #0.7
329 \key cis \minor
330 \clef "bass"
331
332 \time 4/4
333 \repeat unfold 2 \stickIntroLeft
334 \repeat volta 2 \stickALeft
335 \stickAExtendedLeft
336 \stickATransitionLeft
337
338 \repeat volta 3 \stickVerseLeft
339 \stickVerseVariantLeft
340 \stickVerseHarderLeft
341
342 \repeat volta 2 \stickALeft
343 \stickAExtendedLeft
344 \stickATransitionVariantLeft
345
346 \nastyPause
347 \stickNastyLeft
348 \stickWaltzLeft
349
350 \repeat volta 2 \stickALeft
351 \stickAExtendedLeft
352 \repeat volta 2 \stickOutroLeft
353 \stickEndLeft
354 }
355 >>
356
357 %% Local Variables:
358 %% compile-command: "make -C .."
359 %% End: