circus: keys: Add chords to dance section

diff --git a/03-circus/parts/keyboard.ly b/03-circus/parts/keyboard.ly
index d29d6387c8d50b7f5a871905787a5150ec3be769..a5028177b957df129518f1bbcbd0c84468a1ed18 100644 (file)
--- a/03-circus/parts/keyboard.ly
+++ b/03-circus/parts/keyboard.ly
@@ -127,14 +127,14 @@ keysWeirdLower = \relative c {
 
 %% TODO
 keysDanceUpper = \relative c' {
-  \time 5/4 { r2. r2 | r2. r2 | }
-  \time 3/4 { r2. | r2. | }
+  \time 5/4 { <g' b d>2. ~ <fis ais d>2 ~ | <fis b d>2. ~ <f b cis a>2 | }
+  \time 3/4 { <d g b>2. | <e ais fis>2 ~ <d ais' fis>4 | }
 }
 
 %% TODO
 keysDanceLower = \relative c {
-  \time 5/4 { r2. r2 | r2. r2 | }
-  \time 3/4 { r2. | r2. | }
+  \time 5/4 { d2. c2 | d2. cis2 | }
+  \time 3/4 { e2. | e2 d4 | }
 }
 
 keyboard = \new PianoStaff <<
@@ -159,9 +159,10 @@ keyboard = \new PianoStaff <<
 
     %% Half time feel
     \key b \minor
-    \set PianoStaff.midiInstrument = #"reed organ"
     \repeat volta 2 {
+      \set PianoStaff.midiInstrument = #"reed organ"
       \repeat volta 2 \keysHalfUpper
+      \set PianoStaff.midiInstrument = #"choir aahs"
       \keysWeirdUpper
       \keysDanceUpper
     }