song 1: stick: Reduce repetitive breaks.
[music/pretentious.git] / 01-song1 / music / stick.ly
index 798d2e8..c38a9ec 100644 (file)
@@ -1,3 +1,5 @@
+\include "../stafftab.ly"
+
 stickIntroLeft = \relative c, {
   r8 b\f cis r \parenthesize <cis' gis'>\pp r <cis gis'>\f cis, |
   r8 b   cis r \parenthesize <cis' gis'>\pp r <cis gis'>\f cis, |
@@ -18,18 +20,18 @@ stickIntroRight = \relative c {
   dis16 e dis8 b4
 }
 
-stickALeft = \relative c' {
+stickALeft = \relative c {
   \key cis \minor
   \time 2/4
-  cis8 r cis r | r r cis r | r r cis cis |
-  cis8 r cis r | r r cis r |
+  cis8 r cis r | r4 cis8 r | r4 cis8 cis |
+  cis8 r cis r | r4 cis8 r |
   \time 6/8
-  r r cis r cis cis  |
+  r4 cis8 r cis cis  |
 
   \time 2/4
-  cis8 r cis r | r r cis r | r r cis r   |
+  cis8 r cis r | r4 cis8 r | r4 cis8 r   |
   \time 4/4
-  r8 r r  r r r e4 ~ | e2 e4-. dis-. |
+  r2 r4 e'4 ~ | e2 e4-. dis-. |
 }
 
 stickARight = \relative c {
@@ -90,24 +92,36 @@ stickAExtendedRight = \relative c' {
 }
 
 stickATransitionLeft = \relative c {
-  \time 4/4 r1 | r1 | r1 | r1 |
+  \time 4/4 r1 | r1 | r1 |
 }
 stickATransitionRight = \relative c' {
-  b8 gis e fis gis e <e a cis>4\arpeggio ~ | <e a cis>1 ~
-  \time 4/4 <e a cis>1 ~ | <e a cis> |
+  b'8 gis e fis gis e <e a cis>4\arpeggio ~ | <e a cis>1 ~
+  \time 4/4 <e a cis>1 |
 }
 
 stickATransitionVariantLeft = \relative c {
-  \time 4/4 r1 | r1 | r1 | r1 | r1 | r1 | r1 |
+  \time 4/4 r1 | r1 | r1 | r1 | r1 | r1 |
 }
 
 stickATransitionVariantRight = \relative c' {
-  \time 4/4 \repeat unfold 5 {
+  \time 4/4 \repeat unfold 4 {
     cis8-2 gis-1 e-3 e' c4-.-1 cis4-.-2
   }
   <e gis cis>8-. r r q-. r r r r | r q4. r2 |
 }
 
+stickATransitionVariantPreOutroLeft = \relative c {
+  \time 4/4 r1 | r1 | r1 | r1 |
+}
+
+stickATransitionVariantPreOutroRight = \relative c' {
+  \tempo 4 = 195
+  \time 4/4 \repeat unfold 3 {
+    cis8-2 gis-1 e-3 e' c4-.-1 cis4-.-2
+  }
+  <cis gis>1 |
+}
+
 stickVerseLeft = \relative c {
   \time 4/4
   \key cis \minor
@@ -158,42 +172,36 @@ stickNastyLeft = \relative c {
   \time 6/8
   \key cis \minor
   R2.*8 | R2.*8 |
-  \repeat unfold 8 {
+  \repeat volta 8 {
     cis,8 cis' cis, r cis cis' | cis, r cis cis' cis, r |
   }
 
-  cis' cis cis r cis cis | cis r cis cis cis r |
-  cis cis cis r cis cis | cis r cis cis cis r |
-  cis cis cis r cis cis | cis r cis cis cis r |
-  cis cis cis r cis cis | cis r cis cis cis r |
-
-  cis cis cis r cis cis | cis r cis cis cis r |
-  cis cis cis r cis cis | cis r cis cis cis r |
-  cis cis cis r cis cis | cis r cis cis cis r |
-  cis cis cis r cis cis | cis r cis cis cis r |
-
-  cis cis cis r cis cis | cis r cis cis cis r |
-  cis cis cis r cis cis | cis r cis cis cis r |
-  cis cis cis r cis cis | cis r cis cis cis r |
-  cis cis cis r cis cis | bis r bis bis bis r |
+  \repeat volta 3 {
+    cis' cis cis r cis cis | cis r cis cis cis r |
+    cis cis cis r cis cis | cis r cis cis cis r |
+    cis cis cis r cis cis | cis r cis cis cis r |
+    cis cis cis r cis cis |
+  } \alternative {
+    { cis r cis cis cis r |}
+    { bis r bis bis bis r |}
+  }
 
   \key e \minor
   b b b r b b | b r c c c r |
-  a a a r a a | es r es es es r |
-
-  e e e r e e | e r e e fis' g |
-  fis fis fis r fis fis | fis g a b, c b |
-
-  e, e e r e e | e r e e fis' g |
-  ais, ais ais r ais ais | a r a a a r |
-
-  e e e r e e | e r e e fis' g |
-  fis fis fis r fis fis | fis g a b, c b |
-
-  e, e e r e e | e r e e fis' g |
-
-  \time 9/8
-  fis fis fis r fis fis fis16-. r fis8 g |
+  c c c r c c | b r b b b r |
+
+  \repeat volta 2 {
+    e, e e r e e | e r e e fis' g |
+    fis fis fis r fis fis | fis g a b, c b |
+
+    e, e e r e e | e r e e fis' g |
+  } \alternative {
+    { ais, ais ais r ais ais | a r a a a r |}
+    {
+      \time 9/8
+      fis fis fis r fis fis fis16-. r fis8 g |
+    }
+  }
 
   \time 3/4
   a2. ~ | a2. |
@@ -202,40 +210,35 @@ stickNastyLeft = \relative c {
 stickNastyRight = \relative c {
   \time 6/8
   \key cis \minor
-  \repeat unfold 2 { R2.*8 | R2.*8 |}
-
-  e8 e e r e e | e r e e e r |
-  es es es r es es | fis r fis fis fis r |
-  e e e r e e | e r e e e r |
-  e e e r e e | e r e e e r |
-
-  e8 e e r e e | e r e e e r |
-  es es es r es es | fis r fis fis fis r |
-  e e e r e e | e r e e e r |
-  e e e r e e | e r e e e r |
+  R2.*8 | R2.*8 |
+  \repeat volta 8 { R2.*2 |}
 
-  e8 e e r e e | e r e e e r |
-  es es es r es es | fis r fis fis fis r |
-  e e e r e e | e r e e e r |
-  e e e r e e | es r es es es r |
+  \repeat volta 3 {
+    e8 e e r e e | e r e e e r |
+    es es es r es es | fis r fis fis fis r |
+    e e e r e e | e r e e e r |
+    e e e r e e |
+  }
+  \alternative {
+    { e r e e e r |}
+    { es r es es es r |}
+  }
 
   \key e \minor
   e e e r e e | e r e e e r |
   e e e r e e | es r es es es r |
 
-  e e e r e e | e r e e a b |
-  a a a r a a | a b c es e es |
-
-  e, e e r e e | e r e e a b |
-  ais ais ais r ais ais | a r a a a r |
-
-  e e e r e e | e r e e a b |
-  a a a r a a | a b c es e es |
-
-  e, e e r e e | e r e e a b |
-
-  \time 9/8
-  a a a r a a a16-. r a8 b |
+  \repeat volta 2 {
+    e e e r e e | e r e e a b |
+    a a a r a a | a b c es e es |
+    e, e e r e e | e r e e a b |
+  } \alternative {
+    { ais ais ais r ais ais | a r a a a r |}
+    {
+      \time 9/8
+      a a a r a a a16-. r a8 b |
+    }
+  }
 
   \time 3/4
   c2. ~ | c2. |
@@ -253,7 +256,7 @@ stickWaltzLeft = \relative c {
   \key fis \minor
   bes4\sustainOn fis' cis' | r2 bes,4 | fis'2.\sustainOff |
   \time 4/4
-  a,4 e' cis' a, | c gis' dis' c, |
+  cis4 a' e' cis, | c gis' dis' c, |
 }
 
 stickWaltzRight = \relative c'' {
@@ -273,44 +276,35 @@ stickWaltzRight = \relative c'' {
   gis'4. fis c4 |
 }
 
-stickBLeft = \stickALeft
-stickBRight = \stickARight
-
-%% TODO: just copied from keys
-stickBTransitionLeft = {
-  \time 4/4 <e gis>4. <dis fis> <cis e>4 ~ | <cis e>8 <dis fis>4. e4 dis4 |
-}
-
-stickBTransitionRight = \relative c' {
+stickOutroLeft = \relative c, {
   \time 4/4
-  <e gis>4. <dis fis> <cis e>4 ~ |
-  %% TODO
-  <cis e>8 <dis fis>4. e4 dis4 |
+  \repeat unfold 3 { r8 b cis <cis' gis'> r q r r |}
+  <e b'>2 <dis b'> |
+  \repeat unfold 3 { r8 b cis <cis' gis'> r q r r |}
+  <e b'>2 <dis b'> |
 }
 
-stickOutroLeft = \relative c {
-  \time 4/4
-  \repeat unfold 3 { cis8 b, cis gis' e' cis, e' cis, |}
-  r1 |
-  \repeat unfold 3 { cis'8 b, cis gis' e' cis, e' cis, |}
-  r1 |
+stickOutroRight = \relative c' {
+  \repeat unfold 3 { <cis e>8 r r r <gis cis> r q r | }
+  <gis b e>2 <dis fis b> |
+  \repeat unfold 3 { <cis e>8 r r r <gis cis> r q r | }
+  <gis b e>2 <dis fis b> |
 }
 
-stickOutroRight = {}
-
 stickEndLeft = {}
 stickEndRight = {}
 
 
 
 stick = <<
-  \new Staff = "stick right" \relative c' {
+  \new StaffTab = "stick right" \relative c' {
+    \set Staff.stringTunings = #stick-matched-reciprocal-tuning
     \set Staff.midiPanPosition = #-0.7
     \key cis \minor
     \clef "treble_8"
 
     \time 4/4
-    \repeat unfold 2 \stickIntroRight
+    \repeat volta 2 \stickIntroRight
     \repeat volta 2 \stickARight
     \stickAExtendedRight
     \stickATransitionRight
@@ -327,20 +321,23 @@ stick = <<
     \stickNastyRight
     \stickWaltzRight
 
-    \repeat volta 2 \stickBRight
-    \stickBTransitionRight
+    \tempo 4 = 185
+    \repeat volta 2 \stickARight
+    \stickAExtendedRight
+    \stickATransitionVariantPreOutroRight
     \repeat volta 2 \stickOutroRight
     \stickEndRight
   }
 
   %% staff for left hand side
-  \new Staff = "stick left" \relative c  {
+  \new StaffTab = "stick left" \relative c  {
+    \set Staff.stringTunings = #stick-matched-reciprocal-tuning
     \set Staff.midiPanPosition = #0.7
     \key cis \minor
     \clef "bass"
 
     \time 4/4
-    \repeat unfold 2 \stickIntroLeft
+    \repeat volta 2 \stickIntroLeft
     \repeat volta 2 \stickALeft
     \stickAExtendedLeft
     \stickATransitionLeft
@@ -357,8 +354,9 @@ stick = <<
     \stickNastyLeft
     \stickWaltzLeft
 
-    \repeat volta 2 \stickBLeft
-    \stickBTransitionLeft
+    \repeat volta 2 \stickALeft
+    \stickAExtendedLeft
+    \stickATransitionVariantPreOutroLeft
     \repeat volta 2 \stickOutroLeft
     \stickEndLeft
   }