white noise: Fix shifter.
[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 fis \grace{b,16} cis8 ~ |
85 %% bending isn't working in MIDI :(
86 %%b\bendAfter #+2 b
87 cis b a16 gis fis e fis8
88 a16 b cis d e f |
89 fis4. r4 gis8 a e' ~ |
90 e fis4 cis4. r8 b16 cis |
91 %% TODO
92 d2 cis4. b8 | cis1 |
93 }
94
95 %% TODO
96 stickTransitionLeft = \relative fis,, {
97 \time 3/4
98 fis'8. cis d gis, | a8 gis fis r4. |
99 }
100
101 %% TODO
102 stickTransitionRight = \relative fis {
103 \time 3/4
104 fis'8. cis d gis, | a8 gis fis r4. |
105 }
106
107 %% TODO
108 stickFastLeft = \relative fis,, {
109 \time 4/4
110 r1 | r1 | r1 | r1 | r1 | r1 | r1 | r1 |
111 }
112
113 %% TODO
114 stickFastRight = \relative fis {
115 \time 4/4
116 r1 | r1 | r1 | r1 | r1 | r1 | r1 | r1 |
117 }
118
119 stickShifterLeft = \relative c {
120 \time 4/4
121 e8\mp g' e, g' e, g' e, <e g'> |
122 <d fis'> r <d fis'> r <d fis'> r4. |
123 e8 g' e, g' e, g' e, <e g'> |
124 \time 2/4
125 <d fis'> r <d fis'> r |
126
127 \time 4/4
128 fis8 a' fis, a' fis, a' fis, <fis a'> |
129 <e gis'> r <e gis'> r <e gis'> r4. |
130 fis8 a' fis, a' fis, a' fis, <fis a'> |
131 \time 2/4
132 <e gis'> r <e gis'> r |
133 }
134
135 %% TODO
136 stickShifterRight = \relative c {
137 \time 4/4 R1*3
138 \time 2/4 R4*2
139 \time 4/4 R1*3
140 \time 2/4 R4*2
141 }
142
143
144 stickLeft = {
145 \key fis \minor
146 \clef "bass"
147 \stickIntro
148 \time 4/4 r1
149 \whiteNoise
150
151 \time 4/4 \stickThunderLeft
152 \time 5/4 \repeat volta 2 \stickThemeLeft
153 \time 4/4 \stickThunderLeft
154
155 \time 4/4 \stickBeautyLeft
156 \stickSoloLeft
157 \stickTransitionLeft
158 \stickFastLeft
159 \transpose c d {
160 \repeat unfold 2 \stickShifterLeft
161 }
162 }
163
164 stickRight = {
165 \key fis \minor
166 \stickIntro
167 \time 4/4 R1
168 \whiteNoise
169
170 \time 4/4 \stickThunderRight
171 \time 5/4 \repeat volta 2 \stickThemeRight
172 \time 4/4 \stickThunderRight
173
174 \time 4/4 \stickBeautyRight
175 \stickSoloRight
176 \stickTransitionRight
177 \stickFastRight
178 \transpose c d {
179 \repeat unfold 2 \stickShifterRight
180 }
181 }
182
183 stick = <<
184 \set PianoStaff.midiInstrument = #"electric guitar (jazz)"
185 \set PianoStaff.pedalSustainStyle = #'bracket
186
187 \new StaffTab = "stick right" {
188 \set Staff.stringTunings = #alto-stick-bobs-expanded-tuning
189 \stickRight
190 }
191 \new StaffTab = "stick left" {
192 \set Staff.stringTunings = #alto-stick-bobs-expanded-tuning
193 \stickLeft
194 }
195 >>