song2: stick: Alternate hands more often.
[music/pretentious.git] / 02-song2 / music / stick.ly
1 stickIntroLeft = \relative c {
2 \repeat unfold 2 {
3 <b a' d>8 r16 q8 r16
4 <b gis' d'>4 b8 ~ q b |
5 <b g' d'>8 r16 q8 r16
6 <b fis' d'>4 b8 ~ q4 |
7
8 <b a' d>8 r16 q8 r16
9 <b gis' d'>4 b8 ~ q b |
10 <b g' d'>8 r16 q8 r16
11 <b fis' d'>8 ~ q2 |
12 }
13 }
14
15 stickIntroRight = \relative c' {
16 fis8. fis e4 r16 ais,16 b cis d gis, |
17 e'8. e d4 ~ d4 r8 |
18 \grace{e16} fis8. fis e4 ~ e4 fis8 |
19 d8. cis b4 r4. |
20
21 \grace{e16} fis8. a8 fis16 e4 r16 ais,16 b cis d gis, |
22 fis'8. fis8 r16 e d e d8. r4 |
23 \grace{ e8 \glissando s8 } fis8 ~ <fis d'>16 r8 <e cis'>16 r8 <d b'>2 |
24 \grace{d32 g32} b16 r8 g r16 fis8 ~ fis2 |
25 }
26
27 stickStanzaLeft = \relative c {
28 \repeat unfold 2 {
29 <b fis'>8 r16 q8 r16
30 <b fis'>4 q8 r q |
31 <b g'>8 r16 q8 r16
32 <b fis'>4 q8 ~ q4 |
33
34 <b fis'>8 r16 q8 r16
35 <e b>4 q8 r q |
36 } \alternative {
37 { <b g'>8 r16 q8 r16 <b fis'>2 r8 |}
38 { <b g' d'>8 r16 <a e'>8 r16 <d, a'>8 ~ <d a'>2 |}
39 }
40 }
41
42 stickStanzaRight = \relative c' {
43 \repeat unfold 2 {
44 <a d>8 r16 <a d>8 r16
45 <gis d'>4 r8 <gis d'> r |
46 <d' g>8 r16 <d g>8 r16
47 <d fis>4 r8 <d fis> r |
48
49 <a d>8 r16 <a d>8 r16
50 <gis d'>4 r8 <gis d'> r |
51 } \alternative {
52 { <d' g>8 r16 <d g>8 r16 <d fis>2 r8 |}
53 { <d g>8 r16 <d g>8 r16 <d fis>8 ~ <d fis>2 |}
54 }
55 }
56
57 stickBLeft = \relative c {
58 \repeat unfold 2 {
59 <cis gis'>4.\arpeggio <fis, cis'>4\arpeggio\sustainOn fis4 cis'8\sustainOff |
60 } \alternative {
61 { a,8 cis'4 e,4\sustainOn b'8 gis' e,\sustainOff |}
62 { cis' r16 dis8 r16 e8 ~ e2 |}
63 }
64 }
65
66 stickBRight = \relative c' {
67 <b e>8\arpeggio r16 <b e>8 r16
68 <ais e'>4 r8 <ais e'> r |
69 a8. ~ <a e'>8 a16 gis2 r8 |
70
71 <b e>8 r16 <b e>8 r16 <ais e'>4 r8 <ais e'> r |
72 <e' a>8 r16 <fis a>8 r16 <e gis>2 r8 |
73 }
74
75 %% switch to acoustic guitar here
76 stickTransitionLeft = \relative c, {
77 \repeat volta 2 { R1*4 }
78 \repeat volta 4 { R1*2 }
79 }
80
81 stickTransitionRight = \relative c' {
82 \repeat volta 2 { R1*4 }
83 \repeat volta 4 { R1*2 }
84 }
85
86 stickThreeLeft = \relative c, {
87 \time 6/8
88 \repeat volta 2 { R2.*2 }
89 R2.*4
90 }
91
92 stickThreeRight = \relative c' {
93 \time 6/8
94 \repeat volta 2 { R2.*2 }
95 R2.*4
96 }
97
98 stickMartaRekadoLeft = \relative c, {
99 \time 5/8 R8*5 |
100 \time 7/8 R8*7 |
101 \time 2/4 R4*2 |
102
103 \time 5/8 R8*5 |
104 \time 7/8 R8*7 |
105 \time 2/4 R4*2 |
106
107 \time 3/4
108 R4*3 | R4*3 | R4*3 |
109 \time 7/8 R8*7 |
110 }
111
112 stickMartaRekadoRight = \relative c' {
113 \time 5/8 R8*5 |
114 \time 7/8 R8*7 |
115 \time 2/4 R4*2 |
116
117 \time 5/8 R8*5 |
118 \time 7/8 R8*7 |
119 \time 2/4 R4*2 |
120
121 \time 3/4
122 R4*3 | R4*3 | R4*3 |
123 \time 7/8 R8*7 |
124 }
125
126 stickRepriseLeft = \relative c, {
127 \time 4/4
128 \repeat unfold 2 {
129 <fis cis'>8 r16 <b fis'>16 r16 <fis cis'> <fis dis' a'>8 ~
130 <fis dis' a'>8 fis <dis' a'> fis, <f d' a'> r16 <f d' a'>8 r16 <fis cis' a'>8 ~
131 <fis cis' a'>2 |
132 } \alternative {
133 %% TODO: some notes are too low
134 { <fis cis'>8 r16 <b fis'>16 r16 a, b4 fis'8 <b fis'> cis,
135 <d d' a'>8 r16 a8 r16 fis4. ~ fis4 | }
136 { <fis' cis'>8 r16 <b fis'>16 r16 a, b4 fis'8 <b fis'> r
137 <f d' a'>8 r16 <f d' a'>8 r16 <fis cis' a'>4. ~ <fis cis' a'>4 | }
138 }
139 }
140
141 stickRepriseRight = \relative c' {
142 \time 4/4
143 \repeat unfold 2 {
144 r8 <a cis fis>16-. r r r <a cis fis>8 ~
145 <a cis fis>4 ~ <a cis fis>4
146 <f' a d>8 r16 <f a d>8 r16 <fis gis cis>8 ~ <fis a cis>2 |
147
148 r8 <a, cis fis>16-. r r r <dis fis b>8 ~
149 <dis fis b>4 ~ <dis fis b>4
150 <a d f>8 r16 <a d f>8 r16 <a cis fis>4. ~ <a cis fis>4 |
151 }
152 }
153
154 stickFinalLeft = \relative c, {
155 \time 4/4
156 \repeat volta 4 { R1*4 }
157 R1
158 %% alternate right and left hand
159 %% keep this bar alive; it's filled later
160 s1
161 }
162
163 stickFinalRight = \relative c' {
164 \time 4/4
165 \repeat volta 4 { R1*4 }
166
167 b'16 a fis dis
168 b' fis dis fis
169 dis b fis b
170 fis dis b
171
172 %% alternate right and left hand
173 \change Staff = "stick left" fis-1
174 \tuplet 6/4 {
175 \change Staff = "stick right" d''\2-1 % fret: 7
176 \change Staff = "stick left" a\11-2 % fret: 5
177 \change Staff = "stick right" fis\4-3 % fret: 9
178 \change Staff = "stick left" a\11-2
179 \change Staff = "stick right" fis\4-2
180 \change Staff = "stick left" d\10-1 % fret: 5
181 }
182 \tuplet 6/4 {
183 \change Staff = "stick right" fis\4-1
184 \change Staff = "stick left" d\10-1
185 \change Staff = "stick right" a\6-3
186 \change Staff = "stick left" d\10-1
187 \change Staff = "stick right" a\6-3
188 \change Staff = "stick left" e'\10-3
189 }
190 \tuplet 6/4 {
191 \change Staff = "stick right" fis\4-1
192 \change Staff = "stick left" a\10-1
193 \change Staff = "stick right" cis\3-3
194 \change Staff = "stick left" a\10-1
195 \change Staff = "stick right" cis\3-3
196 \change Staff = "stick left" e\11-2
197 }
198 \tuplet 3/2 {
199 \change Staff = "stick right" cis\3-3
200 \change Staff = "stick left" e\11-2
201 \change Staff = "stick right" fis\2-3
202 }
203 gis16\1-2 a\1-2 |
204
205 b16 a fis dis b' fis dis fis
206 dis b fis b fis dis b fis
207
208 f8 b' r8 d16 f gis1.
209 }
210
211 stick = <<
212 \new Staff = "stick right" \relative c' {
213 \clef "treble_8"
214 \set Staff.midiPanPosition = #-0.5
215 \key b \minor
216
217 %% intro
218 \time 4/4
219 \stickIntroRight
220 \stickStanzaRight
221
222 \key e \major
223 \stickBRight
224
225 \key b \minor
226 \stickStanzaRight
227
228 \key e \major
229 \stickBRight
230
231 \key fis \minor
232 \set PianoStaff.midiInstrument = #"electric guitar (jazz)"
233 \stickTransitionRight
234 \stickThreeRight
235
236 \stickMartaRekadoRight
237
238 \set PianoStaff.midiInstrument = #"clav"
239 \stickRepriseRight
240 \stickFinalRight
241 }
242
243 %% staff for left hand side
244 \new Staff = "stick left" \relative c {
245 \clef "bass"
246 \set Staff.midiPanPosition = #0.5
247 \key b \minor
248
249 %% intro
250 \time 4/4
251 \stickIntroLeft
252 \stickStanzaLeft
253
254 \key e \major
255 \stickBLeft
256
257 \key b \minor
258 \stickStanzaLeft
259
260 \key e \major
261 \stickBLeft
262
263 \key fis \minor
264 \stickTransitionLeft
265 \stickThreeLeft
266
267 \stickMartaRekadoLeft
268
269 \stickRepriseLeft
270 \stickFinalLeft
271 }
272 >>