white noise: increase speed earlier.
[music/pretentious.git] / 04-white-noise / music / stick.ly
1 \include "../stafftab.ly"
2
3 stickIntro = {
4 \time 4/4 { R1*8 }
5 %% silly but I have to mimick the repeats for the other voices to
6 %% make the notes line up.
7 \time 5/4 \repeat volta 2 {
8 R4*35
9 }
10 \alternative {
11 {R4*5 | }
12 {\time 2/4 R4*2 | }
13 }
14 }
15
16 %% TODO
17 stickThunderLeft = \relative c {
18 fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |
19 fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |
20 fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |
21 d-. d-. d-. d-. d-. d-. d-. d-. |
22 }
23
24 %% TODO
25 stickThunderRight = \relative c'' {
26 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
27 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
28 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
29 d-. d-. d-. d-. d-. d-. d-. d-. |
30 }
31
32 stickThemeLeft = \relative c {
33 fis'4.\10-1 cis\9-3 r2 | r2. r2 |
34 gis'4.\10-1 e\9-4 r2 | r2. r2 |
35 fis4.\10-1 d\9-4 r2 | r2. r2 |
36 fis4.\10-1 d\9-4 r2 | r2. r2 |
37 }
38
39 stickThemeRight = \relative c' {
40 s4. s a'\4-3 cis8\3-1 ~ | cis2. d2\3-2 |
41 s4. s d\3-1 cis8\4-3 ~ | cis2. a4\4-1 gis\4-1 |
42 s4. s gis\4-1 a8\4-2 ~ | a2. ~ a4. r8 |
43 s4. s gis\4-1 e8\5-3 ~ | e2 gis4\4-1 a4.\4-2 r8 |
44 }
45
46 %% TODO
47 stickBeautyLeft = \relative c {
48 \repeat volta 2 {
49 R1*4
50 }
51 \repeat unfold 2 {
52 R1*4
53 }
54 }
55 stickBeautyRight = \relative c'' {
56 \repeat volta 2 {
57 %% TODO: too robotic
58 %% fis8 a d e, a cis a e |
59 %% gis b e gis, b fis' e b |
60 %% fis a d a fis a d a |
61 %% gis a cis fis, ~ fis2 |
62 r2 d8 cis d a' ~ | a gis ~ gis cis, ~ cis b ~ b4 |
63 a2 r8 b8 ~ b4 | fis1 |
64 }
65
66 %% quiet!
67 \repeat unfold 2 {
68 <a\4-1 cis\3-3>4. b a4 | <gis\4-1 b\3-3>4. a <e\4-1 gis\3-3>4 |
69 <fis\4-1 a\3-3>2 ~ q4 <e\4-1 gis\3-3>4 | <fis\4-1 a\3-3>1 |
70 }
71 }
72
73 %% TODO
74 stickSoloLeft = \relative c {
75 r1 | r1 |
76 r1 | r1 |
77 r1 | r1 |
78 r1 | r1 |
79 }
80
81 stickSoloRight = \relative c'' {
82 \grace{a16 d} fis2 r8 gis8 a \grace{fis16} gis8 ~ |
83 gis4 e4 cis8 fis gis fis ~ |
84 fis4. r4 e8\2-1 fis\2-2 \grace{b,16} cis8\3-1 ~ |
85 %% bending isn't working in MIDI :(
86 %%b\bendAfter #+2 b
87 cis b\3-1 a16\4-3 gis\4-2 fis\4-1 e\5-3 fis8\4-1
88 a16\4-3 b\3-1 cis\3-2 d\3-3 e\2-1 f\2-2 |
89 fis4.\2-3 r4 gis,8\4-2 a\4-3 e'\2-1 ~ |
90 e fis4\2-3 cis4.\3-2 r8 b16\3-1 cis\3-2 |
91
92 d8\3-3
93 \tuplet 3/2 {
94 \change Staff = "stick left"
95 gis,16\10-1 b\10-4
96 \change Staff = "stick right"
97 e\3-3
98 } gis16\2-2 r16
99 \tuplet 3/2 {
100 \change Staff = "stick left"
101 a,16\10-1 cis\10-4
102 \change Staff = "stick right"
103 fis\3-3
104 } a4\2-1 b8\2-2
105 \tuplet 3/2 {
106 %% TODO: this is the left hand on the right side
107 cis,16\3-1 fis\2-2
108 %% back to right hand
109 a\2-2
110 } | cis4.\1-1 cis8\1-1 fis2\1-3 |
111 }
112
113 stickTransitionLeft = \relative fis,, {
114 \time 4/4 R1 |
115 \time 2/4 R2 |
116 }
117
118 %% TODO: played with left hand!
119 stickTransitionRight = \relative fis' {
120 \time 4/4
121 fis8.\3-1 cis\4-2 d\4-3 gis,\5-2 a8\5-3 gis\5-2 |
122 \time 2/4
123 fis\5-1 r4. |
124 }
125
126 stickFastLeft = \relative fis' {
127 \time 4/4
128 %% TODO: this doesn't render well
129 \change Staff = "stick right"
130 <a\2 cis\1>8_\markup {\italic { both hands on melody side }} s s s <a\2 cis\1> s s s |
131 <b\2 e\1> s s s <b\2 e\1> s s s |
132 \change Staff = "stick left"
133 <d,\9-4 fis\10-1> s s s <d\9-4 fis\10-1> s s s |
134 <b\9-1 fis\10-1>8 q q q q q r4 |
135
136 \change Staff = "stick right"
137 <a'\2 cis\1>8 s s s <a\2 cis\1> s s s |
138 <b\2 e\1> s s s <b\2 e\1> s s s |
139 \change Staff = "stick left"
140 <d,\9-4 fis\10-1> s s s <d\9-4 fis\10-1> s s s |
141 <b\9-1 fis\10-1>8 q q q <cis\9-1 gis\10-1>4-. r |
142 }
143
144 stickFastRight = \relative fis' {
145 \time 4/4
146 r8 fis16\5-3 a\4-2 cis8\3-1-. <fis,\5-3 a\4-2 cis\3-1>-. r fis\5-3 <a\4-2 cis\3-1> r |
147 r8 gis16\4-3 cis\3-2 e8\2-1-. <gis,\4-3 cis\3-2 e\2-1>-. r e'\2-1 fis4\2-3 |
148 r8 r16 fis,\4-4 a8\3-2 <fis\4-4 a\3-2 cis\2-1>8 ~ q8 d'8\2-2 cis4\2-1 |
149 <gis\3-1 d'\2-2>8 q q q <gis\3-1 e'\2-3> q <gis\3-2 c\2-1>4 |
150
151 r8 fis16\5-3 a\4-2 cis8\3-1-. <fis,\5-3 a\4-2 cis\3-1>-. r fis\5-3 <a\4-2 cis\3-1> r |
152 r8 gis16\4-3 cis\3-2 e8\2-1-. <gis,\4-3 cis\3-2 e\2-1>-. r e'\2-1 fis4\2-3 |
153 r8 r16 fis,\4-4 a8\3-2 <fis\4-4 a\3-2 cis\2-1>8 ~ q8 d'8\2-2 cis4\2-1 |
154 <gis\3-1 d'\2-2>8 q q q <eis\4-3 gis\3-1 cis\2-1>4-. r |
155 }
156
157 %% TODO: rhythm is wrong
158 stickTotoLeft = \relative c {
159 <fis a'>1 | <e gis'> |
160 <fis a'>1 | <e gis'>1 |
161 }
162
163 %% TODO: fingering
164 stickTotoRight = \relative fis'' {
165 fis8 cis4 a gis8 a cis |
166 b e4 e, fis8 gis a |
167 fis4 a'8 gis fis cis4 e8 |
168 r1 |
169 }
170
171 stickShifterLeft = \relative c {
172 \time 4/4
173 e8 g' e, g' e, g' e, <e g'> |
174 <d fis'> r <d fis'> r <d fis'> r4. |
175 e8 g' e, g' e, g' e, <e g'> |
176 \time 2/4
177 <d fis'> r <d fis'> r |
178
179 \time 4/4
180 fis8 a' fis, a' fis, a' fis, <fis a'> |
181 <e gis'> r <e gis'> r <e gis'> r4. |
182 fis8 a' fis, a' fis, a' fis, <fis a'> |
183 \time 2/4
184 <e gis'> r <e gis'> r |
185
186 \time 4/4
187 e8 g' e, g' e, g' e, <e g'> |
188 <d fis'> r <d fis'> r <d fis'> r4. |
189 e8 g' e, g' e, g' e, <e g'> |
190 \time 2/4
191 <d fis'> r <d fis'> r |
192
193 \time 4/4
194 fis8 a' fis, a' fis, a' fis, <fis a'> |
195 <e gis'> r <e gis'> r <e gis'> r4. |
196 fis8 a' fis, a' fis, a' fis, <fis a'> |
197 <e gis'> r <e gis'> r r2 |
198 }
199
200 %% TODO
201 stickShifterRight = \relative c {
202 \time 4/4 R1*3
203 \time 2/4 R4*2
204 \time 4/4 R1*3
205 \time 2/4 R4*2
206
207 \time 4/4 R1*3
208 \time 2/4 R4*2
209 \time 4/4 R1*3
210 \time 4/4 R1
211 }
212
213
214 stickLeft = {
215 \key fis \minor
216 \clef "bass"
217 \stickIntro
218 \time 4/4 r1
219 \whiteNoise
220
221 \time 4/4 \stickThunderLeft
222 \time 5/4 \repeat volta 2 \stickThemeLeft
223 \time 4/4 \stickThunderLeft
224
225 \time 4/4 \stickBeautyLeft
226 \stickSoloLeft
227 \stickTransitionLeft
228 \stickFastLeft
229 \repeat volta 2 \stickTotoLeft
230 \transpose c d { \stickTotoLeft }
231 \stickTotoLeft
232 \transpose c d {
233 \stickShifterLeft
234 }
235 }
236
237 stickRight = {
238 \key fis \minor
239 \stickIntro
240 \time 4/4 R1
241 \whiteNoise
242
243 \time 4/4 \stickThunderRight
244 \time 5/4 \repeat volta 2 \stickThemeRight
245 \time 4/4 \stickThunderRight
246
247 \time 4/4 \stickBeautyRight
248 \stickSoloRight
249 \stickTransitionRight
250 \stickFastRight
251 \repeat volta 2 \stickTotoRight
252 \transpose c d { \stickTotoRight }
253 \stickTotoRight
254 \transpose c d {
255 \stickShifterRight
256 }
257 }
258
259 stick = <<
260 \set PianoStaff.midiInstrument = #"electric guitar (jazz)"
261 \set PianoStaff.pedalSustainStyle = #'bracket
262
263 \new StaffTab = "stick right" {
264 \set Staff.stringTunings = #alto-stick-bobs-expanded-tuning
265 \stickRight
266 }
267 \new StaffTab = "stick left" {
268 \set Staff.stringTunings = #alto-stick-bobs-expanded-tuning
269 \stickLeft
270 }
271 >>