white noise: Adjust timing of silence.
[music/pretentious.git] / 04-white-noise / music / keys.ly
1 keysIntro = \relative c' {
2 <d fis a>2 <cis fis a> |
3 <b e gis> ~ <b e a> |
4 <d fis a>1 |
5 <cis fis a> |
6 % \chordmode {
7 % d2 fis:m e1
8 % d1 fis:m
9 % }
10 }
11
12 keysPadWithoutEnd = \relative c' {
13 <cis fis a>2. ~ <cis fis a>2 ~ | <cis fis a>2. ~ <cis fis a>2 |
14 <b e gis>2. ~ <b e gis>2 ~ | <b e gis>2. ~ <b e gis>2 |
15 <b d fis>2. ~ <b d fis>2 ~ | <b d fis>2. ~ <b d fis>2 |
16 <a d fis>2. ~ <a d fis>2 ~ |
17 % \chordmode {
18 % fis4*10:m
19 % e4*10
20 % b4*10:m
21 % d4*5
22 % }
23 }
24
25 keysPad = \relative c' {
26 <cis fis a>2. ~ <cis fis a>2 ~ | <cis fis a>2. ~ <cis fis a>2 |
27 <b e gis>2. ~ <b e gis>2 ~ | <b e gis>2. ~ <b e gis>2 |
28 <b d fis>2. ~ <b d fis>2 ~ | <b d fis>2. ~ <b d fis>2 |
29 <a d fis>2. ~ <a d fis>2 ~ | <a d fis>2. ~ <a d fis>2 |
30 % \chordmode {
31 % fis4*10:m
32 % e4*10
33 % b4*10:m
34 % d4*10
35 % }
36 }
37
38 keysThunder = \relative c'' {
39 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
40 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
41 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
42 d-. d-. d-. d-. d-. d-. d-. d-. |
43 }
44
45 keysArpeggio = \relative d' {
46 d8 a' d a e' a, d e,
47 fis cis gis' a gis cis, fis e
48 d a' d a e' a, d e,
49 fis cis gis' a gis cis, fis e
50 }
51
52 keysTransition = \relative c' {
53 \time 3/4
54 fis'8. cis d gis, | a8 gis fis r4. |
55 }
56
57 keysFast = \relative c'' {
58 \time 4/4
59 <a cis fis>1 |
60 <gis b cis e>1 |
61 <fis a d>1 |
62 <fis gis b d>2 <gis b e> |
63 <fis a cis>1 |
64 <gis cis e>1 |
65 <a d fis>4\arpeggio <fis a d>\arpeggio <fis a> <d fis> |
66 <d f gis>2 <cis f gis cis>4 r4 |
67 }
68
69 keysEleven = \relative c' {
70 \key e \minor
71 \time 11/8
72 \repeat unfold 3 { <e g b dis>4 r4 r4 r4 r4 r8 |}
73 r8 r4 r4 r4 r4 r4
74 }
75
76 keysElevenTransition = \relative c' {
77 \time 9/8
78 r4. r4. r4.
79 }
80
81 keysShifter = \relative c' {
82 \key e \minor
83 \time 4/4
84 <g e'>4. b'4 <e, b'>4. ~ |
85 <e b'>8 <d b'>4 <d a'>4 d'8 r4 |
86 <g,, e'>4. b'4 <e, b'>4. ~ |
87 \time 7/8
88 <e b'>8 <d b'>4 <d a'>4 d'8 r8 |
89
90 \key fis \minor
91 \time 4/4
92 <fis, a,>4. cis'4 <cis fis,>4. ~ |
93 <cis fis,>8 <cis e,>4 <b e,>4 e8 r4 |
94 <fis, a,>4. cis'4 <cis fis,>4. ~ |
95 \time 7/8
96 <cis fis,>8 <cis e,>4 <b e,>4 e8 r8 |
97 }
98
99 keysEnding = \relative c' {
100 \time 4/4
101 \repeat unfold 2 {
102 <a d fis>4. cis'4 <d, fis cis'>4. ~ |
103 <d fis cis'>8 <e gis cis>4 <e gis b>4 e'8 r4 |
104 }
105 <d, fis a cis>4.\arpeggio b' a4 |
106 <e gis b>4. a gis4 | <cis, fis a>1 ~ | <cis fis a>2 ~ <cis e a>2 |
107 <d fis a cis>4.\arpeggio b' a4 |
108 <e gis b>4. a gis4 | <cis, fis a>1 ~ | <cis fis a>1 |
109
110 <d fis a>2 <d fis a cis> | <e gis b>1 ~ | <e gis b>1 |
111
112 \tempo 4 = 120
113 <fis, cis fis>1 ~ | <fis cis fis> ~ |
114 <fis cis fis>1 ~ | <fis cis fis> |
115
116 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
117 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
118 a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
119 }
120
121 keyboard = {
122 \set Staff.midiInstrument = #"pad 3 (polysynth)"
123 \set Staff.midiMinimumVolume = #0.4
124 \set Staff.midiMaximumVolume = #0.6
125
126 \key fis \minor
127 \time 4/4 \repeat unfold 2 \keysIntro
128 \time 5/4 \repeat volta 2 \keysPadWithoutEnd
129 \alternative {
130 {
131 \relative c' {
132 <a d fis>2.\repeatTie ~ <a d fis>2 |
133 }
134 }
135 {
136 \time 2/4
137 \relative c' {
138 <a d fis>2\repeatTie |
139 }
140 }
141 }
142 \time 4/4 \relative c' {<cis fis a>1}
143 \whiteNoise
144 \time 4/4 \keysThunder
145 \time 5/4 \repeat volta 2 \keysPad
146 \time 4/4 \keysThunder
147
148 \time 4/4
149 \repeat volta 2 \keysIntro
150 \repeat unfold 2 \keysArpeggio
151
152 \keysTransition
153 \tempo 4 = 160
154 \keysFast
155 \repeat volta 2 \keysEleven
156 \keysElevenTransition
157 \repeat unfold 2 \keysShifter
158 \keysEnding
159 }
160