white-noise: Add fast part.

[music/pretentious.git] / 04-white-noise / parts / keys.ly

diff --git a/04-white-noise/parts/keys.ly b/04-white-noise/parts/keys.ly
index 718c99ec8075fdbbbec0ac1deb56e613b6002bb2..d869def18c641238a8941edfb3b2688ec1635b1a 100644 (file)
--- a/04-white-noise/parts/keys.ly
+++ b/04-white-noise/parts/keys.ly
@@ -49,6 +49,23 @@ keysArpeggio = \relative d' {
   fis cis gis' a gis cis, fis e
 }
 
+keysTransition = \relative c' {
+  \time 3/4
+  fis'8. cis d gis, | a8 gis fis r4. |
+}
+
+keysFast = \relative c'' {
+  \time 4/4
+  <a cis fis>1   |
+  <gis b cis e>1  |
+  <fis a d>1     |
+  <fis gis b d>2  <gis b e>  |
+  <fis a cis>1  |
+  <gis cis e>1   |
+  <a d fis>4\arpeggio <fis a d>\arpeggio <fis a> <d fis> |
+  <d f gis>2 <cis f gis cis>4 r4 |
+}
+
 keyboard = {
   \set Staff.midiInstrument = #"pad 3 (polysynth)"
   \set Staff.midiMinimumVolume = #0.4
@@ -77,6 +94,10 @@ keyboard = {
 
   \time 4/4
   \repeat volta 2 \keysIntro
-  \repeat unfold 4 \keysArpeggio
+  \repeat unfold 2 \keysArpeggio
+
+  \keysTransition
+  \tempo 4 = 160
+  \keysFast
 }