stickA = \relative c'' {
  g8 gis-. g-. gis-. | a-. gis16 g8.-. gis8-. |
  r gis g gis        | e4 r8 g~               |

  g  gis-. g-. gis-. | a-. gis16 g8.-. gis8-. |
  g gis g gis        |

  <fis ais>8 r r <fis ais> ~ | <fis ais>2 |
  <fis ais>8 r r <fis ais> ~ | <fis ais>2 |
}

stickHalfTimeFeel = \relative c' {
  \time 2/4
  b8 d r b16 d         |
  fis8-. r8 r4         |
  r8 b,16 d fis g fis8 |
  \time 3/4
  e16 d cis b d cis c b
  \tuplet 3/2 { fis8 g b } |
  \time 2/4
  ais8 r8. g16 a ais d4 r8*5
  d,4 dis eis fis r8 |
}

stickWeird = \relative c' {
  \repeat volta 2 {
    \time 5/4 {g4. fis16 g cis8 d r g, fis cis |}
    \time 9/8 {cis'4. b16 fis a8 b2 | }
  } \alternative {
    {r2 r8 b8 a g fis  |}
    {r2 r8 b cis d fis |}
  }
}

%% TODO
stickWeirdLeft = \relative c, {
  \repeat volta 2 {
    \time 5/4 { r2. r2 |}
    \time 9/8 { r1 r8 | }
  } \alternative {
    { r1 r8 |}
    { r1 r8 |}
  }
}

stickDance = \relative c' {
  \time 5/4
  g'4. fis8 e4 r2
  fis4. e16 d b4
  %% TODO
  \tuplet 3/2 { f8 b d }
  fis4

  \time 3/4
  e2. | d8 cis ais4 r4
}

%% TODO
stickDanceLeft = \relative c, {
  \time 5/4 { r2. r2 | r2. r2 | }
  \time 3/4 { r2. | r2. | }
}


stickBeautyLeft = \relative c, {
  \repeat unfold 3 {
    \time 4/4
    b8\sustainOn fis' cis' d8 ~ d2 |
    \time 3/4
    g,8\sustainOff d' b'
    a, e' cis' |
  }

  \time 4/4
  <b, d'>4.-> <a cis'> <a cis'>8-> <g b'>8 ~ |
  \time 5/8
  <g b'>4 r8 g8 fis |
  \time 4/4
  e4. r4 d8 r cis |

  \repeat volta 2 {
    \time 7/8
    b4\sustainOn d'8 ~ d2 |
    \time 3/4
    g,8\sustainOff d' b'
    a, e' cis' |

    \repeat unfold 2 {
      \time 4/4
      b,,8\sustainOn fis' cis' d8 ~ d2 |
      \time 3/4
      g,8\sustainOff d' b'
      a, e' cis' |
    }

    \time 4/4
    <b, d'>4.-> <a cis'> <a cis'>8-> <g b'>8 ~ |
  } \alternative {
    {
      \relative c, {
        \time 5/8
        <g' b'>4 r8 g8 fis |
        \time 4/4
        e4. r4 d8 r cis |
      }
    }
    {
      \relative c, {
        \time 5/8
        <g' b'>4 r8 g8 fis |
      }
    }
  }
}

stickBeautyRight = \relative c' {
  \repeat unfold 3 {
    \time 4/4 { R1 | }
    \time 3/4 { R2. | }
  }
  \time 4/4 { R1 |}
  \time 5/8 R8*5 |
  \time 4/4 R1 |

  \repeat volta 2 {
    \time 7/8 { R8*7 | }
    \time 3/4 { R2. | }

    \repeat unfold 2 {
      \time 4/4 { R1 | }
      \time 3/4 { R2. | }
    }
    \time 4/4 { R1 |}
  } \alternative {
    { \time 5/8 R8*5 |
      \time 4/4 R1 | }
    { \time 5/8 { R8*5 |} }
  }
}

stickArpeggioLeft = \relative c, {
  \time 3/4
  e8\sustainOn b' g' ~ g4.
  e,8 b' g' ~ g4.
  e,8 b' g' ~ g4.
  e,8 b' g' ~ g4.

  d,8\sustainOff\sustainOn a' fis' ~ fis4.
  d,8 a' fis' ~ fis4.
  d,8 a' fis' ~ fis4.
  d,8 a' fis' ~ fis4.\sustainOff
}

stickArpeggioRight = \relative c' {
  \time 3/4
  \repeat unfold 8 {
    r4.\sustainOn d,8 b' fis
  }
}

stickDramaLeft = \relative c, {
  \key b \minor
  \time 3/4
  \repeat unfold 2 {
    <e b' g'>2\sustainOff r4
    <e b' g'>2 r4
    <e b' g'>2 r4
    <e b' g'>2 r4
    <b fis' d'>2 r4
    b8 fis' cis' d4.
  }
  <a e' cis'>2.\arpeggio ~ | <a e' cis'>2. ~ | <a e' cis'>2. ~ | <a e' cis'>2. |
  <e b' gis'>2.\arpeggio ~ | <e b' gis'>2. ~ | <e b' gis'>2. ~ | <e b' gis'>2. |
}
stickDramaRight = \relative c' {
  \key cis \minor
  \time 3/4
  \repeat unfold 2 {
    cis2\sustainOff b4 | cis2 b4 | cis2 b4 | cis4 d cis |
    b fis2 ~ | fis2. |
  }
  cis'2. ~ cis2. ~ cis2. b2 a4
  gis2. ~ gis2. ~ gis2. ~ gis2.
}

stickFinalLeft = \relative c, {
  \time 5/4
  d8\sustainOn a' fis'1
  fis,8\sustainOff\sustainOn cis' a'1
  e,8\sustainOff\sustainOn b' gis'1
  r8\sustainOff r d,1
}

%% TODO
stickFinalRight = \transpose g d \relative c' {
  \time 5/4
  g'4.\sustainOff fis8 e4 cis16 e fis8 g4 |
  fis4. e16 d b4
  \tuplet 3/2 { fis8 b d }
  fis4 |

  e2.   ~ e2   |
  d8 cis bes1 |
}

stick = \new PianoStaff <<
  \set PianoStaff.midiInstrument = #"clav"
  \set PianoStaff.pedalSustainStyle = #'bracket

  \new Staff \relative c'  {
    \key cis \minor
    \clef "treble_8"

    %% intro
    \time 2/4
    \relative c'' { R2 | r4 r8 g ~ | }
    \repeat volta 2 \stickA
    \alternative {
      { r2 | }
      { r2 | R2*3 }
    }

    %% solo
    \relative c' {
      \time 2/4
      r4. fis16 e |
      dis cis b ais  e' cis b ais  |
      dis e dis cis  b ais b ais |
      \time 3/4
      gis2 r8 gis8 |
      \time 2/4
      \tuplet 3/2 { ais8 b c } e4 | a,4. r8 |
      c'4 c16 b ais g | fis f c e dis4 | r4. a'8 |

      \time 2/4
      e'8 r4 a,16 gis |
      r8 fis'16 e r8 a,16 gis |
      r8 r16 fis'16 e fis e r16 |
      \time 3/4
      r8 a,16 gis fis e
      dis    r \tuplet 3/2 { r8 c, cis } |
      \time 2/4
      \tuplet 3/2 { g' gis a } \tuplet 3/2 { c cis dis ~ } |
      dis4 r8 ais16 b |
      c16 r8 g'16 cis,8 r8 |
      e,16 gis b e gis b gis e |
      b gis e4 f8 |
    }

    %% spooky
    \key fis \minor
    \repeat volta 2 {
      \time 2/4
      <fis, fis'>4. <cis' cis'>8 ~ |
      <cis cis'>2 ~ | <cis cis'>2 ~ |
      \time 3/4
      <cis cis'>4 <d d'>4 <cis cis'>4 |
      \time 2/4
      <cis cis'>4. <b b'>8 ~ | <b b'>2 ~ | <b b'>2 |
      <a a'>4 <gis gis'>4 ~ | <gis gis'>2 |
    }

    %% Half time feel
    \key b \minor
    \repeat volta 2 {
      \repeat volta 2 \stickHalfTimeFeel
      \stickWeird
      \stickDance
    }

    %% Beauty
    \stickBeautyRight

    %% Arpeggio
    \key e \minor
    \stickArpeggioRight

    \repeat volta 2 {
      \stickArpeggioRight
      \stickArpeggioRight
      \key fis \minor
      \transpose c d { \stickArpeggioRight }
    } \alternative {
      { \stickDramaRight }
      { \stickFinalRight }
    }
  }

  %% staff for left hand side
  \new Staff \relative c  {
    \key cis \minor
    \clef "bass_8"

    %% intro
    \time 2/4 { R2 | R2 |}
    %% TODO: empty
    \repeat volta 2 { R2*11 | }
    \alternative {
      { R2 | }
      { R2*4 }
    }

    %% Solo
    \repeat unfold 2 {
      \time 2/4 R2*3
      \time 3/4 R2.
      \time 2/4 R2*5
    }

    %% Spooky
    \key fis \minor
    \repeat volta 2 {
      \time 2/4 R2*3
      \time 3/4 R2.
      \time 2/4 R2*5
    }

    %% Half time feel
    \key b \minor
    \repeat volta 2 {
      \repeat volta 2 {
        \time 2/4 { R2*3 }
        \time 3/4 { R2.  }
        \time 2/4 { R2*5 }
      }
      \stickWeirdLeft
      \stickDanceLeft
    }

    %% Beauty
    \stickBeautyLeft

    %% Arpeggio
    \key e \minor
    \stickArpeggioLeft

    \repeat volta 2 {
      \stickArpeggioLeft
      \stickArpeggioLeft
      \key fis \minor
      \transpose c d { \stickArpeggioLeft }
    } \alternative {
      { \stickDramaLeft }
      { \stickFinalLeft }
    }
  }
>>