From e34ace359a18d79c63ea07bb680540a2da679544 Mon Sep 17 00:00:00 2001
From: rekado <rekado@elephly.net>
Date: Sat, 16 Apr 2016 12:28:23 +0200
Subject: white-noise: Add fast part.

---
 04-white-noise/parts/keys.ly | 23 ++++++++++++++++++++++-
 1 file changed, 22 insertions(+), 1 deletion(-)

(limited to '04-white-noise/parts/keys.ly')

diff --git a/04-white-noise/parts/keys.ly b/04-white-noise/parts/keys.ly
index 718c99e..d869def 100644
--- 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
 }
 
-- 
cgit v1.2.3