stickIntroLeft = \relative c {
  \repeat unfold 2 {
    <b a' d>8 r16 <b a' d>8 r16
    <b gis' d'>4 b8 ~ <b gis' d'> b |
    <b g' d'>8 r16 <b g' d'>8 r16
    <b fis' d'>4 b8 ~ <b fis' d'>4  |

    <b a' d>8 r16 <b a' d>8 r16
    <b gis' d'>4 b8 ~ <b gis' d'> b |
    <b g' d'>8 r16 <b g' d'>8 r16
    <b fis' d'>8 ~ <b fis' d'>2     |
  }
}

stickIntroRight = \relative c' {
  \grace{e16} fis8. fis e4 r16 ais,16 b cis d gis, |
  e'8.  e   d4 ~ d4 r8                 |
  \grace{e16} fis8. fis e4 ~ e4 fis8               |
  d8.   cis b4 r4.                     |

  \grace{e16} fis8. a8 fis16 e4 r16 ais,16 b cis d gis, |
  fis'8. fis8 r16 e d e d8.  r4            |
  \grace{ e8 \glissando s8 } fis8 ~ <fis d'>16 r8 <e cis'>16 r8 <d b'>2 |
  \grace{d32 g32} b16 r8 g r16 fis8 ~ fis2 |
}

stickStanzaLeft = \relative c {
  \repeat unfold 2 {
    <b fis'>8 r16 <b fis'>8 r16
    <b fis'>4 <b fis'>8 r <b fis'>  |
    <b g'>8 r16 <b g'>8 r16
    <b fis'>4 <b fis'>8 ~ <b fis'>4 |

    <b fis'>8 r16 <b fis'>8 r16
    <e b>4 <e b>8 r <e b> |
  } \alternative {
    { <b g'>8 r16 <b g'>8 r16  <b fis'>2 r8 |}
    { <b g' d'>8 r16 <a e'>8 r16 <d, a'>8 ~ <d a'>2 |}
  }
}

stickStanzaRight = \relative c' {
  \repeat unfold 2 {
    <a d>8 r16 <a d>8 r16
    <gis d'>4 r8 <gis d'> r |
    <d' g>8 r16 <d g>8 r16
    <d fis>4 r8 <d fis> r |

    <a d>8 r16 <a d>8 r16
    <gis d'>4 r8 <gis d'> r |
  } \alternative {
    { <d' g>8 r16 <d g>8 r16 <d fis>2 r8 |}
    { <d  g>8 r16 <d g>8 r16 <d fis>8 ~ <d fis>2 |}
  }
}

stickBLeft = \relative c {
  \repeat unfold 2 {
    <cis gis'>4.\arpeggio <fis, cis'>4\arpeggio\sustainOn fis4 cis'8\sustainOff |
  } \alternative {
    { a,8 cis'4 e,4\sustainOn b'8 gis' e,\sustainOff |}
    { cis' r16 dis8 r16 e8 ~ e2 |}
  }
}

stickBRight = \relative c' {
  <b e>8\arpeggio r16 <b e>8 r16
  <ais e'>4 r8 <ais e'> r |
  a8. ~ <a e'>8 a16 gis2 r8 |

  <b e>8 r16 <b e>8 r16 <ais e'>4 r8 <ais e'> r |
  <e' a>8 r16 <fis a>8 r16 <e gis>2 r8 |
}

stickTransitionLeft = \relative c, {
  \repeat volta 2 {
    <fis cis' a>1\arpeggio | <fis cis' a>1\arpeggio |
    <fis d' a>1\arpeggio | <fis cis' a>1\arpeggio |
  }
  \repeat volta 4 {
    r16 <fis cis'>8 <e b'>16 <fis cis'>8 <e b'>16
    <fis cis'>8 <fis cis'>8 r16 r4           |
    r16 <fis cis'>8 <e b'>16 <fis cis'>8 <e b'>16
    <fis cis'>16 r16 <fis cis'>16 <e b'>4 r8 |
  }
}

stickTransitionRight = \relative c' {
  \repeat volta 2 {
    <cis fis a>1\arpeggio | <b e gis>1\arpeggio |
    <a d fis>1\arpeggio   | <a cis fis>1\arpeggio |
  }
  \repeat volta 4 {
    r16 a8 gis16 a8 gis16 a8 a8 r16 r4        |
    r16 a8 gis16 a8 gis16 a16 r16 a16 gis4 r8 |
  }
}

stickThreeLeft = \relative c, {
  \time 6/8
  \repeat unfold 2 {
    b'16  cis8 cis cis16   fis16 gis8 gis gis16 |
    gis16 a8   a   r16     r8 <a dis> <a dis> |
  }

  <a e'>8. r8 <a e'>16    r16 <b fis'>8 <b fis'>8 <b fis'>16 |
  r16 a r  a r a          r16 <b fis'>8 <b fis'>8 <b fis'>16 |
  <a e'>8. r8 <a e'>16    r16 <b fis'>8 <b fis'>8 <b fis'>16 |
  \time 7/8
  cis,16 <cis e'>8 <cis e'> r16 <cis e'>8 <cis e'> a16 b fis8 |
}

stickThreeRight = \relative c' {
  \time 6/8
  \repeat unfold 2 {
    gis16 a8 a a16  a16 b8 b b16 |
    b16 cis8   cis   r16 r8 <a dis> <a dis> |
  }

  r16 <a d>16 r <a d>16 r r   <a d>16 <b e>8 <b e>8 <b e>16 |
  r16 <a d> r <a d> r <a d>   <a d>16 <b e>8 <b e>8 <b e>16 |
  r8. <a d>8 <a d>16          <a d>16 <b e>8 <b e>8 <b e>16 |
  \time 7/8
  r16 <f b>8 <f b> r16 <f b>8 <f b> r4 |
}

stickMartaRekadoLeft = \relative c, {
  \time 5/8
  <fis a' e'>16 r r <fis a' e'> r <fis a' e'>8 r r16 |
  \time 7/8
  <gis b' fis'>4. r16 <gis b' fis'>8 <gis b' fis'>16 r4 |
  \time 2/4
  <fis a' e'>8. r16 b a gis a |

  %% TODO
  \time 5/8
  <d, fis' cis'>16 r r <d fis' cis'> r <d fis' cis'>8 r r16 |
  \time 7/8
  <e b' gis'>4. r16 <e b' gis'>8 <e b' gis'>16 r4 |
  \time 2/4
  <fis a' e'>8. r16 b a gis a |

  \time 3/4
  <a' e'>8. r8 <a e'>16    r16 <b fis'>8 <b fis'>8 <b fis'>16 |
  r16 a r  a r a          r16 <b fis'>8 <b fis'>8 <b fis'>16 |

  %% TODO
  fis16 fis8 fis fis16  fis fis8 fis fis16 |
  \time 7/8
  fis fis8 fis d' d r r8. |
}

stickMartaRekadoRight = \relative c' {
  \repeat unfold 2 {
    \time 5/8
    cis'16 a fis cis r cis8 fis a16  |
    \time 7/8
    gis8 e b e16 e8 fis16 r16 b,8 e16 |
  } \alternative {
    { \time 2/4 cis8. a16 b a gis a |}
    { \time 2/4 cis8. a16 b a gis a |}
  }

  \time 3/4
  r16 <a d>16 r <a d>16 r r   <a d>16 <b e>8 <b e>8 <b e>16 |
  r16 <a d> r <a d> r <a d>   <a d>16 <b e>8 <b e>8 <b e>16 |
  %% TODO
  fis16 fis8 fis fis16  fis fis8 fis fis16 |
  \time 7/8
  fis fis8 fis d' d r r8. |
}

stickRepriseLeft = \relative c, {
  \time 4/4
  \repeat unfold 2 {
    <fis cis'>8 r16 <b fis'>16 r16 <fis cis'> <fis dis' a'>8 ~
    <fis dis' a'>8 fis <dis' a'> fis, <f d' a'> r16 <f d' a'>8 r16 <fis cis' a'>8 ~
    <fis cis' a'>2 |
  } \alternative {
    { <fis cis'>8 r16 <b fis'>16 r16 a, b4 fis'8 <b fis'> cis,
      <d d' a'>8 r16 a8 r16 fis4. ~ fis4 | }
    { <fis' cis'>8 r16 <b fis'>16 r16 a, b4 fis'8 <b fis'> r
      <f d' a'>8 r16 <f d' a'>8 r16 <fis cis' a'>4. ~ <fis cis' a'>4 | }
  }
}

stickRepriseRight = \relative c' {
  \time 4/4
  \repeat unfold 2 {
    r8 <a cis fis>16-. r r r <a cis fis>8 ~
    <a cis fis>4 ~ <a cis fis>4
    <f' a d>8 r16 <f a d>8 r16 <fis gis cis>8 ~ <fis a cis>2 |

    r8 <a, cis fis>16-. r r r <dis fis b>8 ~
    <dis fis b>4 ~ <dis fis b>4
    <a d f>8 r16 <a d f>8 r16 <a cis fis>4. ~ <a cis fis>4 |
  }
}

stickFinalLeft = {}
stickFinalRight = {}


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

  \new Staff \relative c' {
    \set Staff.midiPanPosition = #-0.5
    \key b \minor
    \clef "treble_8"

    %% intro
    \time 4/4
    \stickIntroRight
    \stickStanzaRight

    \key e \major
    \stickBRight

    \key b \minor
    \stickStanzaRight

    \key e \major
    \stickBRight

    \key fis \minor
    \stickTransitionRight
    \stickThreeRight

    \stickMartaRekadoRight

    \stickRepriseRight
    \stickFinalRight
  }

  %% staff for left hand side
  \new Staff \relative c  {
    \set Staff.midiPanPosition = #0.5
    \key b \minor
    \clef "bass"

    %% intro
    \time 4/4
    \stickIntroLeft
    \stickStanzaLeft

    \key e \major
    \stickBLeft

    \key b \minor
    \stickStanzaLeft

    \key e \major
    \stickBLeft

    \key fis \minor
    \stickTransitionLeft
    \stickThreeLeft

    \stickMartaRekadoLeft

    \stickRepriseLeft
    \stickFinalLeft
  }
>>