\version "2.18.2"
\language "english"
\include "lib/guitar-bend.ily"

\header {
  title = "Lost in Time"
  composer = "Tommy Montgomery"
  copyright = "(c) 2017 Tommy Montgomery"
}

globalConfig = {
  \key a \minor
  \time 4/4
  \numericTimeSignature
  \tempo 4 = 84
  \omit Voice.StringNumber
  \override TupletBracket #'bracket-visibility = #'if-no-beam
}

tappingRiff = \relative c {
  \times 4/6 { a16( d e a^"+" e d }
  \repeat unfold 3 { \times 4/6 { a d e a^"+" e d } }

  \repeat unfold 4 { \times 4/6 { a e' f c'^"+" f, e } }
  \repeat unfold 4 { \times 4/6 { a, g' a b^"+" a g } }
  \repeat unfold 3 { \times 4/6 { a, fs' a d^"+" a fs } }
  \times 4/6 { a, fs' a d^"+" a fs) }
}

pedalToneRiff = \relative c {
  a16 d e a, a' a, d e a, c a c d c b c |
  a d e a, a' a, d e a, g' a, fs' a, d a e' |
  a, d e a, a' a, d e a, c a c d c b c |
  a d e a, a' a, d e f e a, e' d a d c |

  e, a b e, c' b e, a e a b e, c' b a b |
  e, a b e, d' c e, a e a b e, d' c b c |
  e, a b e, c' b e, a e a b e, c' b a b |
  e, a b e, g a e f \times 4/6 { e a b c b a } \times 4/6 { e b' c d c b } |
}

fToDRiff = \relative c, {
  \repeat volta 2 {
    f16 c' f a c a b g f g f e d b c a |
    g d' g b d b c a g a g f e c d b |
    bf f' bf d f d e c bf\glissando( c) g' d' f d e c |
  }
  \alternative {
    { d2 \times 4/6 { a'16( f) d a f d } \times 2/3 { c b! a } g8 | }
    { d''2 \times 4/6 { bf,16 c d e f g } \times 4/6 { a bf c d e f } | }
  }
}

fToGWeirdTime = \relative c, {
  \time 3/4 f8. c'16 ~ c8 g' ~ g16 c,8. |
  \time 5/8 g8. d'16 ~ d8 c' b |
}

guitarOne = {
  \relative c {
    %{
    \repeat unfold 2 { a16 e' a e a e a, e' }
    c e b' e, b' e, c e c e c' e, c' e, c e
    \repeat unfold 2 { d g a g a g d g }
    \repeat unfold 2 { d fs a fs a fs d fs }

    \repeat unfold 2 { a,16 e' a e a e a, e' }
    c e b' e, b' e, c e c e c' e, c' e, c e
    \repeat unfold 2 { d a' d a d a d, a' }
    \repeat unfold 2 { cs, a' e' a, e' a, cs, a' }

    d, a' d e f( e) d a g' e f d e c d a |
    d, a' d e f( e) d a bf d e f e d c e |
    d, a' d e f( e) d a g' e f d e c d a |
    d, a' d e f( e) d a \times 4/6 { g a bf c d e } \times 4/6 { d e f g a bf } |

    a2. ~ a8 g16( a) |
    bf4. a16( g) f4 e4 |

    \repeat unfold 2 { \transpose a d' \tappingRiff }

    \repeat volta 2 { <d, a'>1 | <d bf'> | <d c'> | <d b'!> | }

    \repeat volta 2 { \repeat unfold 10 { <d a'>16 q r } c'32( g) g( d) | }

    \repeat volta 2 {
      e,32 e e16 e e f( e) e e a32 a gs16 e e b'32 b a16 c b |
    }
    \alternative {
      { e,32 e e16 e e f( e) e <d' a' d> ~ q <c g' c>8 e,16 <g! d' g!>\glissando( <a e' a>) q8 | }
      { e32 e e16 e e f( e) e e \times 4/6 { d' e f gs a b } \times 4/6 { d e f gs a b } }
    }

    e,,,32 e e16 e e f32 f e16 e e a32 a gs16 b32 b a16 c32 c b16 d32 d c16 |
    e,32 e e16 e e f32 f e16 e <d' a' d> ~ q <c g' c>8 e,16 <g! d' g!>\glissando( <a e' a>) q8 |
    e32 e e16 e e f32 f e16 e a32 a gs16 gs b32 b a16 a c32 c b16 b |
    e,32 e e16 e e f32 f e16 e e \times 4/6 { d' e f gs a b } \times 4/6 { d e f e d b } |

    \repeat unfold 2 { \repeat unfold 10 { <a, e'>16 q r } g'32( d) d( a) | }

    % solo
    \repeat unfold 4 { \repeat unfold 10 { <a e'>16 q r } g'32( d) d( a) | }
%}

    \repeat unfold 3 { \tappingRiff }
    a8. ~ <a e'>16 ~ q8 <a e' g>8 ~ q16 ~ <a e' g c>8. ~ <a e' g c g'>4\fermata  |

    \repeat volta 2 \pedalToneRiff

    \repeat volta 2 {
      a8^"clean" e'16 a ~ a b e8 ~ e2 |
      a,,8 f'16 a ~ a b f'8 ~ f2 |
      a,,8 g'16 b ~ b cs e8 ~ e2 |
      g,8 c e c g b d b |
      \fToGWeirdTime
    }

    % verse 1
    \time 4/4
    a,8. e'16 ~ e8 a ~ a16 <b e>8. ~ q4 |
    a,8. f'16 ~ f8 a ~ a16 <b e>8. ~ q4 |
    a,8. g'16 ~ g8 b ~ b16 <b cs e>8. ~ q4 |
    <g c! e>2 <g b d> |
    \fToGWeirdTime

    \time 4/4
    a,8 e' a b e b a e |
    a, f' a b e b a f |
    a, g' b cs e cs b g |
    g c! e c g b d b |
    \fToGWeirdTime

    \time 4/4

    % verse 2
    a8^"w/ dist" a16 \deadNote a a( g) e a ~ a8 a16 \deadNote a a( g) e a ~ |
    a8 a16 \deadNote a a( g) e <g c> ~ q8 a,16 <g' c> ~ q <g b>8. |
    a8 a16 \deadNote a a( g) e a ~ a8 a16 \deadNote a a( g) e a ~ |
    a8 a16 \deadNote a a( g) e <a d> ~ q8 a,16 <a' d> ~ q <g cs>8. |
    a8 a16 \deadNote a a( g) e a ~ a8 a16 \deadNote a a( g) e a ~ |
    a8 a16 \deadNote a a( g) e <g c!> ~ <g c>8 a,16 <g' c> ~ q <g b>8. |
    a8 a16 \deadNote a a( g) e a ~ a8 a16 \deadNote a a( g) e a ~ |
    a8 a16 \deadNote a a( g) e <a d> ~ q8 a,16 <f' c'> ~ q <e c'>8. |
    \time 3/4 <f, c' f>8. q16 ~ q e <f c' f>8 ~ q4 |
    \time 5/8 g16[ a b] d8[ a16] c8 b \bar "||" |

    \time 11/8
    % pre-chorus
    a8.[ a'] a,8[ b] c8.[ e] <b' e>4. |
    d,8.[ g] a[ d,] g,[ b] c8[ b] |
    a8.[ a'] a,8[ b] c8.\glissando[ d] <cs a'>4 d16( e) |
    f8.[ a] b[ c!] <g d'>[ q] <fs d'>4 |

    \time 4/4
    \fToDRiff
    e''1 |

    % chorus
    \time 11/8
  }
}

guitarTwo = {
  \relative c {
    %{

    % a minor pedal tone riff
    \repeat unfold 8 r1
    \repeat unfold 8 r1

    % a minor ascending riff to a major
    \repeat unfold 8 r1

    % d minor stuff
    \repeat unfold 4 r1
    a16 d f a, d e a, d e a, cs e a, cs e cs |
    g a bf a bf c d e f c' f e, c' e g, c, |

    % d minor pedal tone
    \repeat unfold 8 r1

    % d minor pedal chords
    \repeat volta 2 { \repeat unfold 4 r1 }

    % d power chords in three
    \repeat volta 2 { r1 | r1 | }

    % e seventh stuff
    \repeat volta 2 r1
    \alternative {
      { r1 | }
      { r1 | }
    }

    \repeat unfold 4 r1

    % solo
    r1 | r1 | r1 |
    r2 r4 r8 g''32^"solo" a bf g |

    a4. g16 cs ~ cs4 g16 a bf d |
    e4. f16 g ~ g4. d16 g |

    a cs, e a, cs e, a cs, e' a, cs e, a cs, e a, |
    g d' bf g' d bf' g d' e4. d16( c) |

    a8 <c e>16 a <d fs> <c e>8 a16 ~ a a <c e> a \times 4/6 { d( c) a g e c } |
    a8 <c e>16 a <d fs> <c e>8 a16 ~ a a <c e> a g e d e |

    \times 4/6 { g, a bf cs d e } \times 4/6 { g a bf cs d e }
    \times 4/6 { g, a bf cs d e } \times 4/6 { g a bf cs d e } |
    d4 ~ d16 f,16( fs) d ~ d fs c' fs ~ fs8 c |

    %}

    r1 | r1 | r1 | r1 |
    a2 b4 c | b2 c | d1 ~ | d |
    e2 d4 c | d2 c | b1 | a1 ~ |
    a1\fermata |

    % pedal tone riff
    \repeat volta 2 { \repeat unfold 8 r1 }
  }
}

vocalMelody = \relative c'' {
  \repeat unfold 13 r1

  \repeat volta 2 { \repeat unfold 8 r1 }
  \repeat volta 2 { r1 | r1 | r1 | r1 | \time 3/4 r2. | \time 5/8 r2 r8 | }

  a2.^"verse 1" c4 | b2. d4 | cs2. a4 | g1 | \time 3/4 r2. | \time 5/8 r2 r8 |
  a2. c4 | b2. d4 | cs2. f4 | e1 | \time 3/4 r2. | \time 5/8 r2 r8 |

  a,4^"verse 2" b8 c ~ c b4 a8 ~ | a g4 e8 ~ e4 r8 g |
  a4 b8 c ~ c d4 cs8 ~ | cs d4 e8 ~ e f4 e8 ~ |
  e4 r8 a, c!4. b8 ~ | b a4 d8 ~ d4 c8 b ~ |
  b a4 g8 b4 b8 b ~ | b a g a ~ a2 |

  \time 3/4 r2. | \time 5/8 r2 r8 |
  \time 11/8

  % pre-chorus
  c4.^"pre-chorus" d8[ e] c8.[( d)] e4. |
  d8.[ d] c[ c] b4. r4 |
  c8.[ d] e8[ d] c8.[ d] e[ d] |
  c[ a] b[ g] a4. ~ a4 |

  \time 4/4
  \repeat volta 2 { r1 | r1 | r1 } \alternative { { r1 } { r1 } }
  r1 |

  % chorus
  \time 11/8
  a8.[^"chorus" b] c[ a] b[ c] d4 |
  b8.[ c] d[ b] c[ d] e8. e16 |
  cs8.[ d] e[ cs] d[ e] f4 |
  \time 4/4 e2 d2 |

  \time 11/8
  a8.[ b] c[ a] b[ c] d4 |
  b8.[ c] d[ b] c[ d] e4 |
  cs8.[ d] e[ cs] d[ e] f4 |
  \time 4/4 <c e>2 <b d>2 |

  <a c>2 r2 |


}

vocals = \lyricmode {
  % verse 1
  Take a breath and let it out.
  Say the words that won't come out.

  % verse 2
  Once the world __ stops spin -- ing 'round. __
  Will you be -- lieve e -- nough to hold your __ ground? __
  The years wa -- sted, tears cre -- a -- ted will wash a -- way __ in the end. __

  % pre-chorus
  Watch -- ing and wait -- ing
  for the time to come.
  Breath -- ing in then giv -- ing up there's
  no -- thing left to say. __

  % chorus
  All those tears you heard me cry.
  All those times I tried to fly.
  You could not stand for fear to try.
  Lost in %time.

  All those fears you could de -- ny.
  All the love that passed on by.
  Liv -- ing out this con -- stant lie.
  Lost in time.

}

vox = \new Staff { \new Voice = "vocalMelody" \clef treble \globalConfig \vocalMelody }
\addlyrics { \vocals }

chordExceptionMusic = {
  <c e g b d'>1-\markup { "maj9" }
  <c e g b fs'>1-\markup { "maj7" \sharp "11" }
}

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

pedalRiffChords = \chordmode {
  a2:sus4 a:m |
  a:sus4 d:/a |
  a:sus4 a:m |
  a:sus4 d:m |
  a1:m/e | q | q | q |
}

verseOneChords = \chordmode {
  a:sus2 |
  f:1.3.5.7+.11+/a |
  a:9 |
  c2:/g g |
  \time 3/4 f2.:sus2 |
  \time 5/8 g2:sus4 g8 |
}

fToGRiffChords = \chordmode {
  \repeat volta 2 {
    f1 | g | bf2 c |
  }
  \alternative {
    { d2.:m g4 }
    { bf1 }
  }
}

chorusChords = \chordmode {
  \time 11/8
  \repeat unfold 2 {
    f2. g2 ~ g8 ~ |
    g2. c2 ~ c8 |
    a2. d2:m ~ q8 |
    \time 4/4 c2 g:/b |
  }
}

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

  \repeat unfold 3 { a1:sus4 | d:m9/a | g:/a | d:/a | }
  a:m11 |

  \repeat volta 2 \pedalRiffChords

  \repeat volta 2 \verseOneChords

  % verse 1
  \repeat unfold 2 \verseOneChords

  % verse 2
  a1:m7 | q2. ~ q16 g8. |
  a1:m7 | q4 ~ q8. d16:m9/a ~ q4 ~ q16 a8.:7/g |
  a1:m7 | q2. ~ q16 g8. |
  a1:m7 | q4 ~ q8. d16:m9/a ~ q4 ~ q16 c8.:/e |
  \time 3/4 \powerChords f2.:1.5 |
  \time 5/8 g2 ~ g8 |

  % pre-chorus
  \time 11/8
  a2:m ~ q8 c2.:maj7 |
  d2.:sus4 g2 ~ g8 |
  a2:m ~ q8 a4.:m/c a4.:/cs |
  f2.:1.3.5.7-.11+ d4.:sus4/g d4 |

  \fToGRiffChords

  e2:sus4 e:7/d |

  % chorus
  \chorusChords


}

\score {
  <<
    \new ChordNames {
      \set chordChanges = ##t
      \chordValues
    }
    \vox
    \new Staff \with { \clef "G_8" } {
      \globalConfig
      \guitarOne
    }
    \new Staff \with { \clef "G_8" } {
      \globalConfig
      \guitarTwo
    }
  >>
  \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
      \new Staff \with { \clef "G_8" } {
        \globalConfig
        \guitarOne
      }
      \new Staff \with { \clef "G_8" } {
        \globalConfig
        \guitarTwo
      }
    >>
  }
  \midi {}
}
%}