bassIntro = \relative fis, {
  \time 4/4
  R1*4 |
  cis8 r r4 r4 r8 b |
  cis8 r r4 r4 r8 b |
  cis8 r4 cis4 cis r8 | r1 |

  cis8 r r4 r4 r8 b |
  cis8 r r4 r4 r8 b |
  cis8 r4 cis4 cis r8 | r1 |

  cis8 r r4 r4 r8 b |
  cis8 r r4 r4 r8 b |
  cis8 r4 cis4 cis r8 | r1 |
}

bassA = \relative fis,, {
  \time 2/4
  cis4 cis | cis'4 r8 b | r b r cis, |
  cis4 cis | cis'4 r8 b |
  \time 6/8
  r b r cis r r|

  \time 2/4
  cis,4 cis | cis'4 r8 b | r b r r |
  \time 4/4
  cis,4. dis e4 ~ | e8 fis4. e4 dis |
}

bassAExtended = \relative fis,, {
  \time 4/4
  cis4. dis e4 ~ | e8 fis4. e4 dis |
  %% more intense!
  \repeat unfold 4 {
    cis4. dis e4 ~ | e8 fis4. e4 dis |
  }
}

bassATransition = \relative fis,, {
  \time 4/4 cis1 ~ | cis |
}

bassVerse = \relative fis, {
  \time 4/4
  \key cis \minor
  cis1 ~ | cis2. cis4 |
  e,4. e gis4 ~ | gis2 gis |
  cis1 ~ | cis2 cis4 cis |
  e,4. e gis4 ~ | gis2. gis4 |
  a1 ~ | a1 |
  a4. cis b4 ~ | b1 |
}

bassVerseVariant = \relative fis,, {
  \time 4/4
  \key bes \minor
  bes4 bes bes bes8 bes8 | bes4 bes4 bes2 |
  des,4. des f4 ~ | f2 f |
  bes4 bes bes bes8 bes8 | bes4 bes4 bes2 |
  des,4. des f4 ~ | f2 f |
  ges8 r ges r ges r ges4 ~ | ges1 |
  ges4. bes as4 ~ | as1 |
}

%% TODO
bassVerseHarder = \bassVerse

%% TODO
bassNasty = \relative c, {
  \time 6/8
  \key cis \minor
  \repeat unfold 2 {
    R2. | R2. |
    R2. | R2. |
    R2. | R2. |
    R2. | R2. |

    R2. | R2. |
    R2. | R2. |
    R2. | R2. |
    R2. | R2. |
  }

  cis8 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 |

  cis8 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 |

  \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 |
  fis fis fis r fis fis | fis16-. r fis8 g a4. ~ | a2. |
}

%% TODO
bassWaltz = \relative c, {
  \time 3/4
  e2. | es2.  |
  d2. | cis2. |
  c2. ~ | c2. ~ | c2 c4 |
  c4. c4. | c2. ~ | c2. |

  d2. ~ | d2. ~ | d2 d4 |
  d4. d4. | cis4 c b |
  \key fis \minor
  bes2. ~ | bes2. ~ | bes2 bes4 |
  \time 4/4
  a4. a a4 |
  c4. c c4 |
}

%% TODO
bassB = \relative c, {
  \key cis \minor
  \time 2/4
  cis4 cis, | cis'4 r8 b | r b r cis, |
  cis4 cis | cis'4 r8 b |
  \time 6/8
  r b r cis r r|

  \time 2/4
  cis,4 cis | cis'4 r8 b | r b r r |
  \time 4/4
  cis,4. dis e4 ~ | e8 fis4. e4 dis |
}

bassBTransition = \relative c,, {
  \time 4/4 e4. dis cis4 ~ | cis8 dis4. e4 dis4 |
}

bassEnd = \relative fis, {
  \time 4/4
  \repeat unfold 3 { cis8 b r b cis r cis r |}
  e e e e b b b b |
  \repeat unfold 3 { cis8 b r b cis r cis r |}
  e e e e fis fis fis gis |
}


bassMusic = {
  \set Staff.midiInstrument = #"electric bass (finger)"
  \set Staff.pedalSustainStyle = #'bracket
  \set Staff.midiMinimumVolume = #1.0
  \clef "bass_8"

  \key cis \minor
  \bassIntro
  \repeat volta 2 \bassA
  \bassAExtended
  \bassATransition

  \repeat volta 2 \bassVerse
  \bassVerseVariant
  \bassVerseHarder

  \repeat volta 2 \bassA
  \bassAExtended
  \bassATransition

  \nastyPause
  \bassNasty
  \bassWaltz

  \repeat volta 2 \bassB
  \bassBTransition
  \repeat volta 2 \bassEnd
}

bass = <<
  \new Staff {
    \bassMusic
  }
  \new TabStaff \with {
    stringTunings = #bass-five-string-tuning
  } {
    \override Stem #'transparent = ##t
    \override Beam #'transparent = ##t
    \bassMusic
  }
>>