song1: stick: Add nasty part.
[music/pretentious.git] / 01-song1 / parts / stick.ly
index 1d9e2d0287a2d5ee43ef4384ff155f589a5f094b..24b48810eb2f2a076c115256818be556ab0a1701 100644 (file)
@@ -28,7 +28,7 @@ stickALeft = \relative c' {
   \time 2/4
   cis8 r cis r | r r cis r | r r cis r   |
   \time 4/4
-  r8 cis cis r  cis cis r cis | cis r cis cis  r cis cis r |
+  r8 r cis r  r cis r r | cis r r cis  r cis r cis |
 }
 
 stickARight = \relative c' {
@@ -44,6 +44,85 @@ stickARight = \relative c' {
   <cis e>4. <dis fis> <e gis>4 ~ | <e gis>8 <fis a>4. <e gis>4 <dis fis> |
 }
 
+stickAExtendedLeft = \relative c {
+  \time 4/4
+  r8 r   cis r  r   cis r r   | cis r r   cis  r cis r  cis |
+  %% more intense!
+  \repeat unfold 4 {
+    r8 cis cis r  cis cis r cis | cis r cis cis  r cis r cis |
+  }
+}
+
+stickAExtendedRight = \relative c' {
+  \time 4/4
+  <cis e>4. <dis fis> <e gis>4 ~ | <e gis>8 <fis a>4. <e gis>4 <dis fis> |
+  \repeat unfold 4 {
+    <cis e>4. <dis fis> <e gis>4 ~ | <e gis>8 <fis a>4. <e gis>4 <dis fis> |
+  }
+}
+
+stickATransitionLeft = \relative c {
+  \time 4/4 cis1 ~ | cis1 |
+}
+stickATransitionRight = \relative c' {
+  \time 4/4 <cis e>1 ~ | <cis e> |
+}
+
+stickVerseLeft = \relative c {
+  \time 4/4
+  \key cis \minor
+  cis4\sustainOn gis' e' cis, ~ cis gis' e' r\sustainOff |
+  e,,\sustainOn b' gis' b, ~ b fis' dis' b,\sustainOff |
+  cis4\sustainOn gis' e' cis, ~ cis gis' e' r\sustainOff |
+  e,,\sustainOn b' gis'\sustainOff b,\sustainOn ~ b fis' dis' b,\sustainOff |
+  a,2 ~ a4. <a' e' b'>8 ~ <a e' b'>1 |
+  a,2 <a' e' b'>4 b,4 ~ b1 |
+}
+
+% TODO
+stickVerseRight  = \relative c {
+  \time 4/4
+  \key cis \minor
+  r1 | r1 | r1 | r1 | r1 | r1 |
+  r1 | r1 | r1 | r1 | r1 | r1 |
+}
+
+stickVerseVariantLeft = \relative c {
+  \time 4/4
+  \key bes \minor
+  bes4\sustainOn f' des' bes, ~ bes f' des' r\sustainOff |
+  des,\sustainOn as' f' c,\sustainOff ~ c\sustainOn as' es' c,\sustainOff |
+
+  bes4\sustainOn f' des' bes, ~ bes f' des' r\sustainOff |
+  des,\sustainOn as' f' c,\sustainOff ~ c\sustainOn as' es' c,\sustainOff |
+
+  ges8 r ges r ges r <des' f'>4 ~ | <des f'>1 |
+  ges,,2 <ges' des' as'>4 as,4 ~  | as1 |
+}
+
+% TODO
+stickVerseVariantRight  = \relative c {
+  \time 4/4
+  \key cis \minor
+  r1 | r1 | r1 | r1 | r1 | r1 |
+  r1 | r1 | r1 | r1 | r1 | r1 |
+}
+
+% TODO
+stickVerseHarderLeft = \stickVerseLeft
+
+% TODO
+stickVerseHarderRight = \stickVerseRight
+
+
+
+stickNastyLeft = \relative c {
+  \time 6/8
+  \key fis \minor
+  \repeat volta 2 { R2.*8 | R2.*8 |}
+  \repeat unfold 16 { cis8 cis cis r cis cis | cis r cis cis cis r | }
+}
+
 stick = \new PianoStaff <<
   \set PianoStaff.midiInstrument = #"clav"
   \set PianoStaff.pedalSustainStyle = #'bracket
@@ -53,10 +132,19 @@ stick = \new PianoStaff <<
     \key cis \minor
     \clef "treble_8"
 
-    %% intro
     \time 4/4
     \repeat volta 2 \stickIntroRight
     \repeat volta 2 \stickARight
+    \stickAExtendedRight
+    \stickATransitionRight
+
+    \repeat volta 2 \stickVerseRight
+    \stickVerseVariantRight
+    \stickVerseHarderRight
+
+    \repeat volta 2 \stickARight
+    \stickAExtendedRight
+    \stickATransitionRight
   }
 
   %% staff for left hand side
@@ -65,10 +153,21 @@ stick = \new PianoStaff <<
     \key cis \minor
     \clef "bass"
 
-    %% intro
     \time 4/4
     \repeat volta 2 \stickIntroLeft
     \repeat volta 2 \stickALeft
+    \stickAExtendedLeft
+    \stickATransitionLeft
+
+    \repeat volta 2 \stickVerseLeft
+    \stickVerseVariantLeft
+    \stickVerseHarderLeft
+
+    \repeat volta 2 \stickALeft
+    \stickAExtendedLeft
+    \stickATransitionLeft
+
+    \stickNastyLeft
   }
 >>