circus: keys: Add half time feel section.

diff --git a/03-circus/parts/keyboard.ly b/03-circus/parts/keyboard.ly
index 473573acda9b95c2ac2b9e4a1183f501857eabae..d29d6387c8d50b7f5a871905787a5150ec3be769 100644 (file)
--- a/03-circus/parts/keyboard.ly
+++ b/03-circus/parts/keyboard.ly
@@ -78,6 +78,64 @@ keysSpookyLower = \relative c {
   d2 ~ | d ~ | d ~ | d ~ | d |
 }
 
+keysHalfUpper = \relative c' {
+  \time 2/4
+  r4 <d fis b>8-. r |
+  r4 <d fis b>8-. r |
+  r4 <d fis b>8-. r |
+  \time 3/4
+  r4 <d fis b>8-. r <d fis b>-. r |
+  \time 2/4
+  r4 <d g bes>8-. r |
+  r4 <d g bes>8-. r |
+  r4 <d g bes>8-. r |
+  r4 <d g bes>8-. r |
+  r4 <d g bes>8-. r |
+}
+
+keysHalfLower = \relative c {
+  \time 2/4
+  b4. r8 | b4. r8 | b4. r8 |
+  \time 3/4
+  b4-. r r |
+  \time 2/4
+  g-. r | g-. r | g-. r |
+  g-. r | g-. r8 g-. |
+}
+
+%% TODO
+keysWeirdUpper = \relative c' {
+  \repeat volta 2 {
+    \time 5/4 { r2. r2 |}
+    \time 9/8 { r1 r8 | }
+  } \alternative {
+    { r1 r8 |}
+    { r1 r8 |}
+  }
+}
+
+%% TODO
+keysWeirdLower = \relative c {
+  \repeat volta 2 {
+    \time 5/4 { r2. r2 |}
+    \time 9/8 { r1 r8 | }
+  } \alternative {
+    { r1 r8 |}
+    { r1 r8 |}
+  }
+}
+
+%% TODO
+keysDanceUpper = \relative c' {
+  \time 5/4 { r2. r2 | r2. r2 | }
+  \time 3/4 { r2. | r2. | }
+}
+
+%% TODO
+keysDanceLower = \relative c {
+  \time 5/4 { r2. r2 | r2. r2 | }
+  \time 3/4 { r2. | r2. | }
+}
 
 keyboard = \new PianoStaff <<
   \set PianoStaff.midiInstrument = #"reed organ"
@@ -99,6 +157,14 @@ keyboard = \new PianoStaff <<
     \set PianoStaff.midiInstrument = #"choir aahs"
     \repeat volta 2 \keysSpookyUpper
 
+    %% Half time feel
+    \key b \minor
+    \set PianoStaff.midiInstrument = #"reed organ"
+    \repeat volta 2 {
+      \repeat volta 2 \keysHalfUpper
+      \keysWeirdUpper
+      \keysDanceUpper
+    }
   }
 
   \new Staff \relative c {
@@ -117,5 +183,12 @@ keyboard = \new PianoStaff <<
     \key fis \minor
     \repeat volta 2 \keysSpookyLower
 
+    %% Half time feel
+    \key b \minor
+    \repeat volta 2 {
+      \repeat volta 2 \keysHalfLower
+      \keysWeirdLower
+      \keysDanceLower
+    }
   }
 >>