145fbf5af7806bbcb74eaa893354c07a2ef6d849
[music/pretentious.git] / 04-white-noise.ly
1 \version "2.19.27"
2
3 \header {
4 title = "White Noise"
5 composer = "The very pretentious elephlies"
6 arranger = "Ricardo Wurmus"
7 copyright = "2002--2015 Ricardo Wurmus"
8 }
9
10 \f
11 bassBeautyA = \relative fis,, {
12 d4. fis ~ fis4 | e4. gis a4 |
13 d,2. cis4 | fis1 |
14 }
15
16 bassBeautyB = \relative fis,, {
17 d4. fis fis4 | e4. gis a4 |
18 d,4. d cis4 | fis8 fis fis fis cis' b a b |
19 }
20
21 bassThemeWithoutEnd = \relative fis,, {
22 fis8 fis r4 e'8 fis fis, r4 fis8 | r8 fis r4 a'8 b fis, r8 a4 |
23 fis8 fis r4 e'8 fis fis, r4 fis8 | r8 fis r4 e'8 fis fis, e e r8 |
24 b8 b r4 e'8 fis b,, r4 b8 | r8 b r4 a''8 b b,, r8 cis4 |
25 d8 d r4 e'8 fis d r4 d,8 |
26 }
27
28 bassTheme = \relative fis,, {
29 \bassThemeWithoutEnd
30 r8 d r4 d'8 d d, e e r8 |
31 }
32
33 bassThunder = \relative fis,, {
34 fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |
35 fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |
36 fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |
37 d-. d-. d-. d-. d-. d-. d-. d-. |
38 }
39
40 \f
41 keysIntro = \relative c' {
42 <d fis a>2 <cis fis a> <b e gis>1
43 <d fis a> <cis fis a>
44 % \chordmode {
45 % d2 fis:m e1
46 % d1 fis:m
47 % }
48 }
49
50 keysPadWithoutEnd = \relative c' {
51 <cis fis a>2. ~ <cis fis a>2 ~ | <cis fis a>2. ~ <cis fis a>2 |
52 <b e gis>2. ~ <b e gis>2 ~ | <b e gis>2. ~ <b e gis>2 |
53 <b d fis>2. ~ <b d fis>2 ~ | <b d fis>2. ~ <b d fis>2 |
54 <a d fis>2. ~ <a d fis>2 ~ |
55 % \chordmode {
56 % fis4*10:m
57 % e4*10
58 % b4*10:m
59 % d4*5
60 % }
61 }
62
63 keysPad = \relative c' {
64 <cis fis a>2. ~ <cis fis a>2 ~ | <cis fis a>2. ~ <cis fis a>2 |
65 <b e gis>2. ~ <b e gis>2 ~ | <b e gis>2. ~ <b e gis>2 |
66 <b d fis>2. ~ <b d fis>2 ~ | <b d fis>2. ~ <b d fis>2 |
67 <a d fis>2. ~ <a d fis>2 ~ | <a d fis>2. ~ <a d fis>2 |
68 % \chordmode {
69 % fis4*10:m
70 % e4*10
71 % b4*10:m
72 % d4*10
73 % }
74 }
75
76 keysThunder = \relative c'' {
77 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
78 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
79 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
80 d-. d-. d-. d-. d-. d-. d-. d-. |
81 }
82
83 %% TODO
84 stickThunder = \relative c'' {
85 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
86 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
87 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
88 d-. d-. d-. d-. d-. d-. d-. d-. |
89 }
90
91
92 whiteNoise = { R1*5 } % TODO: how long?
93
94 \f
95 bass = {
96 \set Staff.midiInstrument = #"electric bass (finger)"
97 \clef "bass_8"
98 \key fis \minor
99
100 \relative fis,, {
101 \time 4/4 R1*4 \bassBeautyA
102
103 \time 5/4 \repeat volta 2 \bassThemeWithoutEnd
104 \alternative {
105 { r8 d r4 d'8 d d, e e r8 | }
106 { r8 d r4 fis4 ~ fis2 | }
107 }
108 \whiteNoise
109
110 \time 4/4 \bassThunder
111
112 \time 5/4 \repeat volta 2 \bassTheme
113 \time 4/4 \bassThunder
114
115 \time 5/4 \repeat volta 2 \bassTheme
116 \time 4/4 \repeat volta 2 \bassBeautyB
117
118 %% TODO
119 %% solo
120 %% sweet and quiet
121 %% solo
122
123 %% april?
124 \relative fis,, {
125 d,2 r8 e4. | fis2. r4 |
126 d2 e fis r8 gis a cis
127 d2 r8 e4 b8 cis2. r4 b2
128
129 r8 cis4 e,8 fis1
130 d2 r8 e4. fis2. r4 fis8 e r4 e2 fis r8 gis a cis d2 r8 e4 b8 cis2. r4 b2 r8 cis4 e,8 fis1 fis8 r8*5
131 }
132
133 %{
134 %% fast and weird
135 fis8 e fis a4 gis8 fis e
136 cis cis cis gis' cis b a16 b a8
137 d, d d d d d d d
138 cis f b fis' b a gis a
139 fis cis fis b4 a8 gis a
140 cis b a b a gis fis gis
141 d b a gis fis gis a b
142 gis gis gis gis cis cis,4*80/960 r4*400/960 cis4
143 %}
144 }
145 }
146
147 keyboard = {
148 \set Staff.midiInstrument = #"pad 8 (sweep)"
149 \set Staff.midiMinimumVolume = #0.4
150 \set Staff.midiMaximumVolume = #0.6
151
152 \key fis \minor
153 \time 4/4 \repeat unfold 2 \keysIntro
154 \time 5/4 \repeat volta 2 \keysPadWithoutEnd
155 \alternative {
156 {
157 \relative c' {
158 <a d fis>2.\repeatTie ~ <a d fis>2 |
159 }
160 }
161 {
162 \relative c' {
163 <a d fis>2\repeatTie <cis fis a>2. | % TODO
164 }
165 }
166 }
167
168 \whiteNoise
169 \time 4/4 \keysThunder
170 \time 5/4 \repeat volta 2 \keysPad
171 \time 4/4 \keysThunder
172 \time 5/4 \repeat volta 2 \keysPad
173 }
174
175 %% TODO
176 stickTheme = \relative c {
177 fis'4. cis a' cis8*7 d2
178 gis,4. e d' cis8*7 a4 gis
179 fis4. d gis a8*9 r4
180 fis4. d gis e8*5 gis4 a4. r8
181 }
182
183 stick = {
184 \set Staff.midiInstrument = #"electric guitar (jazz)"
185 \key fis \minor
186 \time 4/4 { R1*8 }
187 %% silly but I have to mimick the repeats for the other voices to
188 %% make the notes line up.
189 \time 5/4 \repeat volta 2 {
190 r2. r2 | r2. r2 | r2. r2 | r2. r2 |
191 r2. r2 | r2. r2 | r2. r2 |
192 }
193 \alternative {
194 {r2. r2 | }
195 {r2. r2 | }
196 }
197
198 \whiteNoise
199 \stickThunder
200 \repeat volta 2 \stickTheme
201 \stickThunder
202 \repeat volta 2 \stickTheme
203
204 %% TODO: this is terrible and I would never play this
205 \relative c' {
206 <d a >2
207 <cis fis, >2 <gis' fis, >2
208 <a e, >2 d,1 cis
209
210 <d a >2
211 <cis fis, >2 <gis' fis, >2
212 <a e, >2 d,1 cis
213 }
214
215 %% TODO: move to keyboard?
216 \repeat unfold 4 \relative c'' {
217 d'8 a' d a e' a, d e,,
218 fis, cis' gis' a gis cis, fis, e
219 d' a' d a e' a, d e,,
220 fis cis' gis' a gis cis, fis, e
221 }
222 }
223
224
225 \f
226 %% Two scores are needed: one with unfolded repeats for MIDI and the
227 %% other with regular repeats for notation.
228 \score {
229 \unfoldRepeats {
230 <<
231 \new Staff \keyboard
232 \new Staff \bass
233 \new Staff \stick
234 >>
235 }
236 \midi {
237 \tempo 4 = 120
238 }
239 }
240
241 \score {
242 <<
243 \new Staff = "keyboard" { \keyboard }
244 \new Staff = "bass" { \bass }
245 \new Staff = "grand stick" { \stick }
246 >>
247 \layout {
248 \tempo 4 = 120
249 \context {
250 %% add the RemoveEmptyStaffContext that erases rest-only staves
251 \Staff \RemoveEmptyStaves
252 }
253 \context {
254 \Score
255 %% Remove all-rest staves also in the first system
256 \override VerticalAxisGroup.remove-first = ##t
257 %% If only one non-empty staff in a system exists, still print the starting bar
258 \override SystemStartBar.collapse-height = #1
259 }
260 }
261 }