\version "2.22.1"
\language "english"

\header {
  title = "F# minor kinda thing"
  composer = "Tommy Montgomery"
  copyright = "(c) 2022 Tommy Montgomery"
}

global = {
  \key fs \minor
  \set Staff.printKeyCancellation = ##f
  \numericTimeSignature
  \compressEmptyMeasures
  \omit Voice.StringNumber
  \override TupletBracket #'bracket-visibility = #'if-no-beam
  \override MultiMeasureRest.expand-limit = #3
  \override Score.ChordName.font-name = #"Noto Serif"
  \override Score.ChordName.font-size = #0
  \override Score.LyricText.font-name = #"Noto Serif"
  \override Score.LyricText.font-size = #0
}


guitar = \relative c'' {
  \tempo 4 = 80
  \partial 2 \grace { e8\glissando( } fs16 e) cs b\glissando( a) e\glissando( fs) e, ~ | \bar "||"

  e8 <fs cs' fs> \xNotesOn <e a d>16 q q \xNotesOff e ~ e8 <fs cs' fs> \xNotesOn <e a d>16 q q \xNotesOff e ~ |
  e8 <fs cs' fs> \xNotesOn <e a d>16 q q \xNotesOff e ~ e fs cs' e fs c a' e, ~ |
  e8 <fs cs' fs> \xNotesOn <e a d>16 q q \xNotesOff e ~ e8 <fs cs' fs> \xNotesOn <e a d>16 q q \xNotesOff e ~ |
  e8 <fs cs' fs> \xNotesOn <e a d>16 q q \xNotesOff e ~ e fs cs' fs, c' b a e ~ |

  e8 <fs cs' fs> \xNotesOn <e a d>16 q q \xNotesOff e ~ e8 <fs cs' fs> \xNotesOn <e a d>16 q q \xNotesOff e ~ |
  e8 <fs cs' fs> \xNotesOn <e a d>16 q q \xNotesOff e ~ e fs cs' e fs g,8.-> ~ |
  g8 <fs cs' fs> \xNotesOn <e a d>16 q q \xNotesOff e ~ e8 <fs cs' fs> \xNotesOn <e a d>16 q q \xNotesOff e ~ |
  e8 <fs cs' fs> \xNotesOn <e a d>16 q q \xNotesOff e ~ e g as cs e cs as g |

  \repeat unfold 3 { e fs cs' fs, c' b fs as e fs a fs gs g fs f | }
  e fs cs' fs, e'( fs) fs, fs'' ~ fs( e) cs b\glissando( a) e\glissando( fs) e, ~ |
  \repeat unfold 2 { e fs! cs'! fs, c' b fs as e fs a fs gs! g fs f | }
   e fs! cs'! fs, c' b fs as e fs a fs gs! g fs e\laissezVibrer |
   <<
     { r8 r16 fs32 fs fs16 gs a cs fs cs gs' cs, a' fs cs' a | } \\
     { e,8 <fs cs' fs> r4 r2 | }
   >>

   \bar "||"

   \time 12/8
   \tempo \markup {
     \concat {
       \smaller \general-align #Y #DOWN \note {8} #1
       " = "
       \smaller \general-align #Y #DOWN \note {8} #1
     }
   }

   \grace s16 \set Score.tempoHideNote = ##t \tempo 4. = 53

   fs''2. gs4. a | \grace cs8( d2.) cs4. ~ cs8 b16 a gs a |
   b4. e, \grace gs8( a4. gs) | fs4. ~ fs8. fs16( gs fs\glissando) es4. ~ es8 cs16 es b'( a) |

   fs4. r4 gs16( a) \grace a8( b4. a) | \grace cs8( d4. ~ d8 e8. d16) cs4. ~ cs8 b16 a gs a  |
   b4. e, \grace gs8( a4. gs4 a16 gs) | fs2. r2. |

  \repeat unfold 2 {
     <cs, gs' b es>8 \xNotesOn q16 q q q \xNotesOff q\glissando( <d a' cs fs>) \xNotesOn q16 q q q \xNotesOff
     <cs gs' b es>8 \xNotesOn q16 q \xNotesOff <b fs' \xNote a ds>8 <cs gs' b es> \xNotesOn q16 q q q \xNotesOff |
  }
  <cs gs' b es>8 \xNotesOn q16 q q q \xNotesOff q\glissando( <d a' cs fs>) \xNotesOn q16 q q q \xNotesOff
  q\glissando( <e! b' \xNote e gs>) \xNotesOn q q q q \xNotesOff q8 \xNotesOn q16 q q q \xNotesOff |
  <es b' d gs>8 q q q->-. r8 cs'32 es gs cs b8-. a-. gs-.

  a[ \tuplet 3/2 { gs16( a \set stemRightBeamCount = #1 gs) } \set stemLeftBeamCount = #1 fs16( e)] |

  <<
    { fs2. } \\
    { fs,,8 fs16 fs fs e fs8 fs16 fs fs e }
  >>
  fs8 fs16 fs fs e fs a b cs e fs |
  \repeat unfold 3 { fs,8 fs16 fs fs e } fs' e cs b a gs |
  \repeat unfold 3 { fs8 fs16 fs fs e } fs a b cs e fs |
  <a, e' a>2.
  <<
    { fs'16 b cs e fs b cs e fs b a gs } \\
    { <b,,, fs' b>4. e'16( ds) cs( b) a gs | }
  >>

  fs''2. \ottava #1  gs4. a | \grace cs8( d4.) ~ d8. cs16 d b cs4 \tuplet 3/2 { cs16( d cs) } b8 e,16 fs gs a |
  b4. e, \grace gs8( a4. gs8.)( a32 gs fs16) e | fs4. r4. r es,16 gs a\glissando( b) cs( e!) |

  fs4. ~ fs8. cs16 fs gs a8. cs,16 fs a gs8. fs16 gs a | \grace cs8( d4.) ~ d8 \grace d8( e8. d16) cs4. b8. a16 gs a |
  b4. gs4. e8. e,32 gs b e gs a b a gs cs b a b a gs fs e gs | fs4. r8. cs16 fs gs a8. e16 gs a b8. a16 gs fs |

  es4. \ottava #0 r4. r2. |


  <cs,, gs' b es>8 \xNotesOn q16 q q q \xNotesOff q\glissando( <d a' cs fs>) \xNotesOn q16 q q q \xNotesOff
  <cs gs' b es>8 \xNotesOn q16 q \xNotesOff <b fs' \xNote a ds>8 <cs gs' b es> \xNotesOn q16 q q q \xNotesOff |

  <cs gs' b es>8 \xNotesOn q16 q q q \xNotesOff q\glissando( <d a' cs fs>) \xNotesOn q16 q q q \xNotesOff
  q\glissando( <e! b' \xNote e gs>) \xNotesOn q q q q \xNotesOff q8 \xNotesOn q16 q q q \xNotesOff |

  <es b' d gs>8 q q q q q <cs gs' cs>-.-> r r r4. |

  \repeat unfold 3 {
    fs,8 r r fs r r fs r r fs gs a |
    fs r r fs r r fs r r cs' b a |
    fs r r fs r r fs r r fs gs a |
    fs r r fs r r fs r r fs'16( e) cs b a gs |
  }

  \repeat unfold 3 { fs8 fs16 fs fs fs } fs8 gs a |
  \repeat unfold 3 { fs8 fs16 fs fs fs } cs'8 b a |
  \repeat unfold 3 { fs8 fs16 fs fs fs } fs8 gs a |
  \repeat unfold 3 { fs8 fs16 fs fs fs } fs'16( e) cs b a gs |

  <fs cs'>4. <cs'' fs>4 gs,16( e) <fs cs'>4. <cs'' fs>4 gs,16( a) |
  <fs cs'>4. <cs'' fs>4 gs,16( e) <fs cs'>4. <cs'' fs>4 b,16( a) |
  <e b'>2. <b' fs'>4. ~ q8 a gs |
  \repeat unfold 3 { <fs cs'>8. <e b'> }
  <<
    { fs'16 gs a cs fs gs } \\
    { <fs,, cs'>8-.-> r4 }
  >> |  \bar "||"

  a''2. gs4. a | b4. ~ b4 a16( gs) fs4. ~ fs16 b fs e d cs |
  b4. ~ b8. b16 e( fs)\glissando a8 gs-. fs-. gs8. fs16\glissando( e fs) |
  fs4. ~ fs8. fs16( gs fs) es4. cs8. cs16 b( as) |

   \bar "||"

   \key gs \minor

  <<
    { gs4. } \\
    { <gs, ds'>8 gs16 gs gs gs }
  >>
  <gs ds'>8 gs16 gs <fs cs'>8 <gs ds'>8 gs16 gs gs gs gs8 b as |
  <gs ds'>8 gs16 gs gs gs <gs ds'>8 gs16 gs <fs cs'>8 <gs ds'>8 gs16 gs gs gs ds'8 fs gs |
  <gs, ds'>8 gs16 gs gs gs <gs ds'>8 gs16 gs <fs cs'>8 <gs ds'>8 gs16 gs gs gs gs8 b as |
  <gs ds'>8 gs16 gs gs gs <gs ds'>8 gs16 gs <fs cs'>8 <gs ds'>8 gs16 gs gs gs gs16 b cs ds fs gs |

  <gs, ds'>8 gs16 gs gs gs <gs ds'>8 gs16 gs <fs cs'>8 <gs ds'>8 gs16 gs gs gs gs8 b as |
  <gs ds'>8 gs16 gs gs gs <gs ds'>8 gs16 gs <fs cs'>8 <gs ds'>8 gs16 gs gs gs ds'8 fs gs |
  <gs, ds'>8 gs16 gs gs gs <gs ds'>8 gs16 gs <fs cs'>8 <gs ds'>8 gs16 gs gs gs gs8 b as |

  <gs ds'>8 gs16 gs gs gs <gs ds'>8 gs16 gs <fs cs'>8
    \tuplet 9/6 4. {
      gs'16 b cs ds fs gs b( gs) fs
      ds cs b cs ds fs ds cs b
    }
  |

  \key bf \minor

  <<
    { bf4. } \\
    { bf,8 bf16 c df af }
  >>
  bf8 bf16 c df af bf8 bf16 c df af bf c df ef f bf |
  \repeat unfold 3 { bf,8 bf16 c df af } bf' af f af f ef |
  \repeat unfold 3 { bf8 bf16 af f af } bf gf' f ef df c |
  \repeat unfold 3 { bf8 bf16 af f af } bf c df ef f gf |

  bf8 bf16 f bf, f' c'8 c16 f, bf, f' df'8 df16 f, bf, f' c'8 c16 f, bf, f' |
  bf8 bf16 f bf, f' af8 af16 f bf, f' g8 g16 f bf, f' gf f ef df c bf |

  af8. ef' af4. bf8. g ef4. | df8. af' ef'4. d,8. b' es4. |

  \key fs \minor
  \time 9/8
  a,16 gs a fs b gs a fs a gs a fs b gs a fs gs a |
  gs fs gs e a fs gs e gs fs gs e a fs gs e fs gs |
  fs e d e d cs   d e fs gs a gs  fs e d e d cs   |
  d e fs gs a b   gs a b cs d e   b cs d es fs gs  |

  a gs a fs b gs a fs a gs a fs b gs a fs gs a |
  gs fs gs e a fs gs e gs fs gs e a fs gs e fs gs |
  \grace gs8( a4. gs) fs |
  \grace d8( e4. d) cs |

  \time 12/8
  \key b \minor
  %{
  \tempo \markup {
    \concat {
      \smaller \general-align #Y #DOWN \note {4.} #1
      " = "
      \smaller \general-align #Y #DOWN \note {2.} #1
    }
  }


  \grace s16 \set Score.tempoHideNote = ##t \tempo 4. = 106

   \repeat unfold 4 { b,8 b16 b b8 b b b } |


   b8 b16 b b8 fs'8 e d b b16 b b8 cs d a |
   b8 b16 b b8 fs'8 e d b g fs e g a |
   b8 b16 b b8 fs'8 e d b b16 b b8 cs d a |
   b8 b16 b b8 fs'8 e d b g fs e fs g |

   a8 a16 a a8 fs' g d a a16 a a8 e' fs g |
   a,8 a16 a a8 fs' g d e fs g a g fs |
   a,8 a16 a a8 fs' g d a a16 a a8 e' fs g |
   a,8 a16 a a8 fs' g d e fs g a16 g fs e d cs |
  %}

  \bar "||"

  a,16[ <b fs'>16 r <b fs'> r <b fs'>] r <b fs'>[ r <b fs'> r <b fs'>] r <b fs'>[ r <b fs'> r <b fs'>] r <b fs'>[ r b cs( d)] |
  a[ <b fs'>16 r <b fs'> r <b fs'>] r <b fs'>[ r <b fs'> r <b fs'>] r <b fs'>[ r <b fs'> r <b fs'>] r <b fs'>[ r b fs'( e)] |
  a,[ <b fs'>16 r <b fs'> r <b fs'>] r <b fs'>[ r <b fs'> r <b fs'>] r <b fs'>[ r <b fs'> r <b fs'>] r <b fs'>[ r b cs( d)] |
  a[ <b fs'>16 r <b fs'> r <b fs'>] a[ <b fs'> r <b fs'> r <b fs'>] a[ <b fs'> r <b fs'> r a] \tuplet 9/6 { d' cs b a g fs e d cs } |

  \repeat unfold 2 { b cs d fs b cs d cs b fs d cs } |
  b a cs d e g fs d e fs g a b d cs a b a g fs e d cs b |
  <a e' a>2. <e b' e>4. ~ q4 e16( fs) |
  <b fs' b>2. <c fs a ds>4. <ds a' c fs> |

  \key e \minor
}

vocalMelody = \relative c' {
  \partial 2 r2 |
  R1*16 |

  R1.*32 |

  \bar "||"
  fs4.^"verse" ~ fs4 fs8 cs'4. ~ cs8 b a | b4. ~ b8 b a b16( as fs4) r4. |
  r4. fs cs' ~ cs8 cs ds | e4. fs8 e e e16( ds cs4) r4. |
  fs,4. ~ fs4 fs8 cs'4. ~ cs8 b a | b4. ~ b8 b a b16( as) fs4 r4. |
  e2. ds4. r4 b16( cs) | cs2. r2. |

  fs4. ~ fs4 fs8 cs'4. ~ cs8 b a | b4. ~ b4 a8 b16( as fs4) r4. |
  r4. fs4 fs8 cs'4. ~ cs8 cs ds | e4. fs8 e e e16( ds cs4) r4. |
  fs,4. ~ fs4 fs8 cs'4. ~ cs8 b a | b4. ~ b8 b a b16( as) fs4 r4. |
  e2. ds4. r4 b16( cs) | cs2. r2. |

  R1.*4 |

  \key gs \minor

  gs'4. ~ gs4 gs8 ds'4. ~ ds8 cs b | cs4. ~ cs4 b8 cs16( bs gs4) r4. |
  r4. gs4. ds'4. ~ ds8 ds es | fs4. gs8 fs fs fs16( es ds4) r4. |
  gs,4. ~ gs4 gs8 ds'4. ~ ds8 cs b | cs4. ~ cs8 cs b cs16( bs) gs4 r4. |
  fs2. es4. r4 cs16( ds) | ds4. r r2. |

  \key bf \minor

  bf'4. ~ bf4 bf8 f'4. ~ f8 ef df | ef4. ~ ef8 ef df ef16( d bf4) r4. |
  r4. bf4. f'4. ~ f8 f g | af4. bf8 af af af16( g f4) r4. |
  bf,4. ~ bf4 bf8 f'4. ~ f8 ef df | ef4. ~ ef8 ef df ef16( d) bf4 r4. |
  af2. g4. r4 ef16( f) | f4. r4. r2. |

  \key fs \minor
  R1*9/8*8 |

  \key b\minor
  b4. ~ b4 b8 fs'4. ~ fs8 e d | e4. ~ e8 e d e16( ds b4) r4. |
  r4. b4. fs'4. ~ fs8 fs gs | a4. b8 a a a16( gs fs4) r4. |
  b,4. ~ b4 b8 fs'4. ~ fs8 e d | e4. ~ e8 e d e16( ds) b4 r4. |
  a2. gs4. r4 e16( fs) | fs4. r4. r2. |


}

allTheLyrics = \lyricmode {
  Still __ a -- live __ by no means __ of my own. __
  Tied down __ by the threats of the un -- known. __
  Kept __ a -- float __ by the wings __ of the an -- gels,
  wait -- ing for __ you.

  Still __ a -- live __ not yet o -- ver -- thrown. __
  Hyp -- no -- tized __ by the throw of the glass stone. __
  Held __ a -- loft __ by the wings __ of the an -- gels,
  wait -- ing for __ you.

  Still __ a -- live __ but the grass __ has grown. __
  Time flies __ but my bird still has not flown. __
  Picked __ a -- part __ by the whims __ of the an -- gels,
  wait -- ing for __ you.

  Still __ a -- live __ at the feet __ of your throne. __
  Tired eyes, __ seek -- ing peace, reap what they've sown. __
  Gone __ in -- sane __ from the wrath __ of the an -- gels,
  wait -- ing for __ you.

  % --- %

  Still __ a -- live, __ bor -- rowed time, __ not my own. __
  Now mute, __ not a gasp __ can't e -- ven groan. __
  Tor -- tured soul, __ by the hands __ of the an -- gels,
  wait -- ing for __ you.

  Still __ a -- live __ but I won't be a -- lone. __
  And I __ won't for -- get __ all that you've shown. __
  Death __ will come, __ at the will __ of the an -- gels,
  wait -- ing for __ you.

  Still a -- live in the dark and un -- known. __
  Wait -- ing for __ you.
}

guitarStaff = \new Staff \with { midiInstrument = "distorted guitar" midiMaximumVolume = #0.6 } {
  \global
  \guitar
}

vox = \new Staff \with { midiInstrument = "voice oohs" midiMinimumVolume = #0.7 } {
  <<
    \new Voice = "vocalMelody" { \clef treble \global \vocalMelody }
    \new Lyrics \lyricsto "vocalMelody" {
      \allTheLyrics
    }
  >>
}

chordExceptionMusic = {
  <c e g b d'>1-\markup { "maj9" }
  <c e g b fs'>1-\markup { "maj7" \sharp "11" }
  <c ef f g bf>1-\markup { "m7sus4" }
  <c ef gf bff>1-\markup { "°7" }
  <c ef gf bf>1-\markup { \super { "ø7" } }
  <c e g d'>1-\markup { "add9" }
  <c ef g d'>1-\markup { "m(add9)" }
  <c e fs as>1-\markup { \super { \sharp "11" \sharp "13" } }
  <c g>1-\markup { "5" }
  <c e g bf>1-\markup { "7" }
  <c e g b>1-\markup { "maj7" }
  <c ef g bf>1-\markup { "m7" }
  <c f g>1-\markup { "sus4" }
  <c d g>1-\markup { "sus2" }
  <c e g bf df'>1-\markup { "7" \super { \flat "9" } }
  <c e g f'>1-\markup { "add11" }
}

chordExceptions = #(append
  (sequential-music-to-chord-exceptions chordExceptionMusic #t)
  ignatzekExceptions
)

chordValues = \chordmode {
  \set chordNameExceptions = #chordExceptions
  \set majorSevenSymbol = \markup "maj7"

  \partial 2 r2 |
  R1*16 |

  fs1.:m | b:m | e | fs2.:m cs:7 |
  fs1.:m | d2. a | e2. e4.:sus4 e | fs2.:m a4. b |

  \repeat unfold 2 { cs4.:7 q16 d4:maj7 q16 cs4:7 b8 cs4.:7 | }
  cs4.:7 q16 d4.:maj7 e4 q16 q4. | es1.:dim7 |

  fs1.:1.5 | q | q | a2. b |

  fs1.:m | b:m | e | fs2.:m cs:7 |
  fs1.:m | d2. a | e2. e4.:sus4 e | fs2.:m a4. b |

  \repeat unfold 2 { cs4.:7 q16 d4:maj7 q16 cs4:7 b8 cs4.:7 | }
  cs4.:7 q16 d4.:maj7 e4 q16 q4. | es2.:dim7 cs2.:1.5 |

  fs1.:m | q | q | q |

  \repeat unfold 8 fs1.:m |
  \repeat unfold 6 fs1.:m |
  e2. b |
  \repeat unfold 3 { fs8.:1.5 e:1.5 } fs4.:1.5 |

  fs1.:m | b:m | e | fs2.:m cs4. ds:/fss |

  \repeat unfold 8 { gs1.:m }

  \repeat unfold 6 { bf1.:m } | af2. ef | df2. d:dim7 |

  fs2.:m q4. | e2. q4. | d2. q4. | a:maj7 b:m6 cs:7 |
  fs2.:m q4. | e2. q4. | d2.:maj7 q4. | e2.:m6 fs4.:7 |

  b1.:m | q | q | q |



}

chordNames = \new ChordNames {
  \set chordChanges = ##t
  \set chordNameExceptions = #chordExceptions
  \chordValues
}

\score {
  <<
    \chordNames
    \vox
    \guitarStaff
  >>
  \layout {
    \context {
      \Staff \RemoveEmptyStaves
      \override Glissando.minimum-length = #4
      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
      \override Glissando.thickness = #2
      \override VerticalAxisGroup.remove-first = ##t
    }
  }
}

\score {
  \unfoldRepeats {
    <<
      % \vox
      \guitarStaff
    >>
  }
  \midi {}
}