white noise: Add score draft.
[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,4. ~ d 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 e8 |
35 fis8. e16 fis8. e16 fis8. e16 fis8 e8 |
36 fis8. e16 fis8. e16 fis8. e16 fis8 e8 |
37 d8-. d-. d-. d-. d-. d-. d-. d-. |
38 }
39
40 bass = {
41 \clef "bass_8"
42 \key fis \minor
43
44 \relative fis,, {
45 \time 4/4 r1*4 \bassBeautyA
46
47 \time 5/4 \repeat volta 2 \bassThemeWithoutEnd
48 \alternative {
49 { r8 d r4 d'8 d d, e e r8 | }
50 { r8 d r4 fis4 ~ fis2 | }
51 }
52 r1*5 % TODO: white noise, how long?
53
54 \time 4/4 \bassThunder
55
56 \time 5/4 \repeat volta 2 \bassTheme
57 \time 4/4 \bassThunder
58
59 \time 5/4 \repeat volta 2 \bassTheme
60 \time 4/4 \repeat volta 2 \bassBeautyB
61
62 %% TODO
63 %% solo
64 %% sweet and quiet
65 %% solo
66
67
68 %% april?
69 d,2 r8 e4. | fis2. r4 |
70 d2 e fis r8 gis a cis
71 d2 r8 e4 b8 cis2. r4 b2
72
73 r8 cis4 e,8 fis1
74 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
75
76
77 %{
78 %% fast and weird
79 fis8 e fis a4 gis8 fis e
80 cis cis cis gis' cis b a16 b a8
81 d, d d d d d d d
82 cis f b fis' b a gis a
83 fis cis fis b4 a8 gis a
84 cis b a b a gis fis gis
85 d b a gis fis gis a b
86 gis gis gis gis cis cis,4*80/960 r4*400/960 cis4
87 %}
88 }
89 }
90
91 \f
92 keysIntro = <<
93 \chords {
94 d2 fis:m e1
95 d1 fis:m
96 }
97 \relative c'' {
98 r1 r1 r1 r1
99 }
100 >>
101
102 keysPad = <<
103 \chords {
104 fis4*10:m
105 e4*10
106 b4*10:m
107 d4*10
108 }
109 \relative c'' {
110 <cis fis a>2. ~ <cis fis a>2 ~ <cis fis a>2. ~ <cis fis a>2
111 <b e gis>2. ~ <b e gis>2 ~ <b e gis>2. ~ <b e gis>2
112 <b d fis>2. ~ <b d fis>2 ~ <b d fis>2. ~ <b d fis>2
113 <a d fis>2. ~ <a d fis>2 ~ <a d fis>2. ~ <a d fis>2
114 }
115 >>
116
117 keyboard = {
118 \key fis \minor
119 \time 4/4 \repeat unfold 2 \keysIntro
120 \time 5/4 \repeat volta 2 \keysPad
121 }
122
123 \f
124 \score {
125 <<
126 \new Staff \keyboard
127 \new Staff \bass
128 >>
129 }