white noise: Change ending of thunder before beauty.

3 files changed, 46 insertions, 20 deletions

diff --git a/04-white-noise/music/bass.ly b/04-white-noise/music/bass.ly
index f904526..def22b2 100644
--- a/04-white-noise/music/bass.ly
+++ b/04-white-noise/music/bass.ly
@@ -27,11 +27,18 @@ bassTheme = \relative fis,, {
   r8 d   r4 d'8 d d, e e r8 |
 }
 
+bassThunderRep = \relative fis,, {
+  \repeat unfold 3 { fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |}
+}
+
 bassThunder = \relative fis,, {
-  fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |
-  fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |
-  fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |
-  d-. d-. d-. d-. d-. d-. d-. d-.            |
+  \bassThunderRep
+  d-. d-. d-. d-. d-. d-. d-. d-.   |
+}
+
+bassThunderB = \relative fis,, {
+  \bassThunderRep
+  d-. d-. d-. d ~ d2 |
 }
 
 %% Note: not "bass solo", but "bass" while "solo".
@@ -150,7 +157,7 @@ bassMusic = {
     \time 4/4                 \bassThunder
 
     \time 5/4 \repeat volta 2 \bassTheme
-    \time 4/4                 \bassThunder
+    \time 4/4                 \bassThunderB
 
     \time 4/4 \bassBeauty
 
diff --git a/04-white-noise/music/keys.ly b/04-white-noise/music/keys.ly
index c0ad2cc..5b7db94 100644
--- a/04-white-noise/music/keys.ly
+++ b/04-white-noise/music/keys.ly
@@ -35,11 +35,16 @@ keysPad = \relative c' {
   % }
 }
 
+keysThunderRep = \relative c'' {
+  \repeat unfold 3 { a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |}
+}
 keysThunder = \relative c'' {
-  a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
-  a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
-  a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
-  d-. d-. d-. d-. d-. d-. d-. d-.            |
+  \keysThunderRep
+  d-. d-. d-. d-. d-. d-. d-. d-. |
+}
+keysThunderB = \relative c'' {
+  \keysThunderRep
+  d-. d-. d-. d ~ d2 |
 }
 
 keysBeauty = \keysIntro
@@ -156,7 +161,7 @@ keyboard = {
   \whiteNoise
   \time 4/4 \keysThunder
   \time 5/4 \repeat volta 2 \keysPad
-  \time 4/4 \keysThunder
+  \time 4/4 \keysThunderB
 
   \time 4/4
   \repeat volta 2 \keysBeauty
diff --git a/04-white-noise/music/stick.ly b/04-white-noise/music/stick.ly
index babfd6c..8445aec 100644
--- a/04-white-noise/music/stick.ly
+++ b/04-white-noise/music/stick.ly
@@ -14,21 +14,35 @@ stickIntro = {
 }
 
 %% TODO
+stickThunderLeftRep = \relative c {
+  \repeat unfold 3 { fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |}
+}
+
 stickThunderLeft = \relative c {
-  fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |
-  fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |
-  fis8 e16 fis8 e16 fis8 e16 fis8 e16 fis8 e |
-  d-. d-. d-. d-. d-. d-. d-. d-.            |
+  \stickThunderLeftRep
+  d-. d-. d-. d-. d-. d-. d-. d-. |
+}
+stickThunderLeftB = \relative c {
+  \stickThunderLeftRep
+  d-. d-. d-. d ~ d2 |
 }
 
 %% TODO
+stickThunderRightRep = \relative c'' {
+  \repeat unfold 3 { a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |}
+}
+
 stickThunderRight = \relative c'' {
-  a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
-  a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
-  a8 gis16 a8 gis16 a8 gis16 a8 gis16 a8 gis |
-  d-. d-. d-. d-. d-. d-. d-. d-.            |
+  \stickThunderRightRep
+  d-. d-. d-. d-. d-. d-. d-. d-. |
 }
 
+stickThunderRightB = \relative c'' {
+  \stickThunderRightRep
+  d-. d-. d-. d ~ d2 |
+}
+
+
 stickThemeLeft = \relative c {
   fis'4.\10-1 cis\9-3 r2 | r2. r2 |
   gis'4.\10-1  e\9-4   r2 | r2. r2 |
@@ -233,7 +247,7 @@ stickLeft = {
 
   \time 4/4                 \stickThunderLeft
   \time 5/4 \repeat volta 2 \stickThemeLeft
-  \time 4/4                 \stickThunderLeft
+  \time 4/4                 \stickThunderLeftB
 
   \time 4/4 \stickBeautyLeft
   \stickSoloLeft
@@ -256,7 +270,7 @@ stickRight = {
 
   \time 4/4                 \stickThunderRight
   \time 5/4 \repeat volta 2 \stickThemeRight
-  \time 4/4                 \stickThunderRight
+  \time 4/4                 \stickThunderRightB
 
   \time 4/4 \stickBeautyRight
   \stickSoloRight