\version "2.18.2"
\language "english"

\header {
  title = "I Built the Sky"
  composer = "Tommy Montgomery"
  copyright = "(c) 2017 Tommy Montgomery"
}

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

mainRiffFirstTwoBars = \relative c, {
  e16( a e) a( d e) d( g\glissando fs d) d( a) a'( d,) e( a,) |
  e( a e) a( d a) cs g ~ g a cs d g a cs d |
}

mainRiff = \relative c, {
  \mainRiffFirstTwoBars
  e16( a e) a( d e) d( g\glissando fs d) d( a) a'( d,) e( a,) |
  e16( a e) a( d e) g( a\glissando b) d\glissando( cs g) \tuplet 6/4 { a(g d) e( d a) } |
}

mainRiffTwo = \relative c, {
   \repeat unfold 2 {
    e16( a e) a( d e) d( g\glissando fs d) d( a) a'( d,) e( a,) |
  }
  \alternative {
    { e( a e) a( d a) cs g ~ g a cs d g a cs d | }
    { e,,( a e) a( d e) g( a\glissando b) d\glissando( cs) a\glissando( g fs) d( a) | }
  }
}

eRiff = \relative c, {
  \repeat unfold 2 {
    e4 e'8 e, ~ e e e16 e'8. |
    e,4 e'8 e, ~ e e cs''4\trill |
    e,,4 e'8 e, ~ e e e16 e'8. |
  }
  \alternative {
    { g,8 d' g a a, e' a b | }
    { f,8 c' d c g d' a' b | }
  }
}

aToGToBToCToDRiff = \relative c {
  <a e'>4 a16 a a a << { d8[( e)] } \\ { a,4 } >> r8 <a e'>8 ~ |
  q4 a16 a a a << { d8[( e)] } \\ { a,4 } >> r8 <g d' g>8 ~ |
  q4 g16 g g g << { fs'8[( g)] } \\ { <g, d'>4 } >> r8 <g d' g>8 ~ |
  q4 g16 g g g << { fs'8[( g)] } \\ { <g, d'>4 } >> r8 <a e'>8 ~ |

  q4 a16 a a a << { d8[( e)] } \\ { a,4 } >> r8 <a e'>8 ~ |
  q4 a16 a a a << { d8[( e)] } \\ { a,4 } >> r8 <g d' g>8 ~ |
  q4 g16 g g g << { fs'8[( g)] } \\ { <g, d'>4 } >> r8 <g d' g>8 ~ |
  q4 g16 g g g << { fs'8[( g)] } \\ { <g, d'>4 } >> r8 <e b'>8 ~ |

  q2 <fs cs'> | <g d'>  <a e'>4. <e b'>8 ~ |
  q2 <fs cs'> | <g d'> <a e'>4. b8 ~ |

  \repeat unfold 2 {
    b fs' b fs e' ds b a, ~ |
    a fs' b fs e' ds b gs, ~ |
    gs fs' b fs e' ds b a, ~ |
  }
  \alternative {
    { a fs' b fs e' ds b b, ~ }
    { a fs' b fs e' ds b <c, g'> ~ }
  }

  <c g'>2. ~ q8 q ~ | q q4 <d a'>8 q2 |
}

aPedalRiff = \relative c {
  a16( a' a,) a( g' a,) a( fs' a,) a( e' a,) fs'( a,) e'( a,) |
  a16( g' a,) a( fs' a,) a( e' a,) a( d a) e'( a,) d( a) |
  a16( fs' a,) a( e' a,) a( d a) a( c a) d( a) c( a) |
  a16( e' a,) a( d a) a( c a) a( b a) c( a) b( a) |
}

dMinorPedalRiff = \relative c {
  a16( f' a,) a( e' a,) a( d a) a( cs a) d( a) e'( a,) |
}

guitarOne = \relative c {
  <a a' d e g>1 ~ | q1 |
  \mainRiff
  \mainRiffTwo

  \eRiff
  \aToGToBToCToDRiff

  \bar "||"

  % verse 1
  \repeat unfold 2 {
    <a e' a>4 a16 a a a <a e' a>4 r8 <a e' a>8 ~ |
    q4 a16 a a a <a e' a>4 r8 <a e' a>8 ~ |
  }
  \alternative {
    {
      q4 a16 a a a <a e' a>4 r8 <g d' g>8 ~ |
      q4. fs'16 g d' g, fs g a g fs d |
    }
    {
      <a e' a>4 a16 a a a <a e' a>4 r8 <f c' f>8 ~ |
      q8 c' g' c, g d' g bf, ~ |
    }
  }

  bf8 f' bf a bf4. bf,8 ~ |
  bf f' bf a bf4. c,8 ~ |
  c g' c bf c4. c,8 ~ |
  c g' c bf c4. bf,8 ~ |
  bf8 f' bf a bf4. bf,8 ~ |
  bf f' bf a bf4. c,8 ~ |
  c g' c bf c4. c,8 ~ |
  c g' c bf
  <<
    { c'8\glissando( d) g, a ~ | a2.    ~ a8 b ~ | b2. ~ b8 c ~ | c1     | d1 | } \\
    { c,8\glissando( d) e  d ~ | d2  d8 e fs g ~ | g2. ~ g8 f ~ | f2. e4 | d1 | } \\
  >>

  r1 |
  <<
    { a'2.     ~ a8 b ~ | b2 ~ b8 c d  c ~ | c1   | d1 | } \\
    { d,2 ~ d8 e fs g ~ | g2.     ~ g8 f ~ | f2 g | a1 | }
  >>

  r1 |

  <c,, g' c>2 <bf f' bf>4. <af ef' af>8 ~ | q1 |
  <ef' bf' ef>2 <bf f' bf>4. <gf df' gf>8 ~ | q1 |
  <df' af' df>4. df16 df <df af' df gf>8 <df af' df f>4 <a! e' a>8 ~ |
  <a e' a> e' a e cs' a a, b |
  c16 c c c <c g' c>4 <c g' d'>2 |
  d16 d d d <d a' e'>4 <d a' d>2 |

  \eRiff
  \aToGToBToCToDRiff

  % verse 2
  \repeat unfold 2 { \transpose a e \aPedalRiff }
  \repeat unfold 2 \aPedalRiff

  % bridge
  \repeat unfold 8 \dMinorPedalRiff
  \repeat unfold 8 { \transpose d g \dMinorPedalRiff }

  <d a' d>4. <c g' d'>8 ~ q <f a d>4 <e g d'>8 ~ |
  q <g, d' a' d>4 <a e' a b e>8 ~ q4. q16 q |
  <a e' a g'>8 q q q r <a e' a fs'> r <a e' a e'> |
  r <a e' a fs'> r <a e' a b e> ~ q2 |

  bf16 bf bf bf bf bf bf bf f' bf, bf bf bf' bf, bf bf |
  c c c c c c c c g' c, c c c' c, c c  |

  % chorus
  R1*18 |

  \bar "||"
  \key a \major
  gs''2 gs4( fs8) cs ~ | cs4. e,8 a b cs a |
  b4 b16 cs e fs a b( cs) cs e( cs) b8 ~ |
  b8 a16( gs) e8 e, e' e'4 r8 |
  <fs fs>4. fs8 a8. fs16 ~ fs8 fs( |
  e4.) e16 b a\glissando( gs) a b a( gs) e\glissando( d) |
  cs4. b8 ~ b4 \grace { as16([ b] } as4) ~ | as4. fs16 b cs b fs' e b' as e' cs |

  fs2 fs4( e8) b ~ | b2. ~ b8 \tuplet 3/2 { g16 b cs } |
  d8 \tuplet 3/2 { cs16( d cs) } b8 a ~ a e gs16( a gs8) ~ |
  gs4. \tuplet 3/2 { d16 e fs } gs4 a |
  \repeat unfold 8 r1 |
  \time 3/4 \repeat unfold 15 r2. |


  \time 4/4 r1

}

guitarTwo = \relative c {
  % chord swell
  r1 | r1 |

  % main riff
  \repeat unfold 8 r1 |

  % e thing
  \repeat unfold 8 r1 |

  % a-g maj7 thing
  \repeat unfold 8 r1 |

  % e-f#-g-a thing
  \repeat unfold 4 r1

  % b thing
  \repeat unfold 8 r1 |
  r1 | r1 |

  % verse 1
  \repeat unfold 8 r1 |
  % pre-chorus
  \repeat unfold 7 r1 |
  r2 r4 r8

  % chorus
  <a d a' d>8 ~ |
  \repeat unfold 2 {
    q2. ~ q8 <g d' g d' g> ~ |
    q2. ~ q8 <f c' f> ~ |
    q4 c'8 g' ~ g f4. |

    \transpose a d' \mainRiffFirstTwoBars
  }

  \repeat unfold 8 r1 |

  % interlude
  \repeat unfold 30 r1 |

  % verse 2
  \repeat unfold 16 r1 |

  % bridge
  \repeat unfold 16 r1 |
  \repeat unfold 6 r1 |

  % chorus
  R1*18 |

  \bar "||"
  \key a \major
  <cs gs' cs>2. ~ q8 <a e' a> ~ |
  q4. e8 a b cs a |
  <b fs' b>2. ~ q8 <e, b' e> ~ |
  q1 |
  fs2. ~ fs8 gs ~ |
  gs1 |
  <a e'>4. <e b'>8 ~ q4 <fs cs'>4 ~ |
  q2 fs16 fs fs fs cs' cs cs cs |

  <b fs' b>2. ~ q8 <g d' g d' g> ~ |
  q4. g16 g g8 g16 g g8 g16 g |
  <a e' a>2. ~ q8 <d a' d> ~ |
  q4. d16 d <d gs>8 d16 d <d a'>4 |

  e8 a cs\glissando( b) cs4. e,8 ~ |
  e a cs\glissando( b) cs4. fs,8 ~ |
  fs b d\glissando( cs) d4. fs,8 ~ |
  fs b d\glissando( cs) d4. e,8 ~ |
  e a cs\glissando( b) cs4. e,8 ~ |
  e a cs\glissando( b) cs4. d,8 ~ |
  d gs b\glissando( a) b4. d,8 ~ |
  d gs b\glissando( a) b4. e,8 ~ |

  \time 3/4
  \set Timing.beamExceptions = #'()
  \set Timing.beatStructure = #'(1 1 1)

  e8 a b d cs a | e a b d cs a |
  fs b cs e d b | fs b cs e d b |
  cs, fs gs b a fs | cs fs gs b a fs |
  b, e fs a gs e | b e fs a gs e\glissando |

  e' a b d cs a | e a b d cs a |
  fs b cs e d b | fs b cs e d b |
  cs, fs gs b a fs | cs fs gs b a fs |
  b, e fs a gs e | \time 4/4 b e fs a gs e r8 <a,, e'>8 ~ |

  \key a \mixolydian
  q4 a16 a a a << { d8[( e)] } \\ { a,4 } >> r8 <a e'>8 ~ |
  q4 a16 a a a << { d8[( e)] } \\ { a,4 } >> r8 <g d' g>8 ~ |
  q4 g16 g g g << { fs'8[( g)] } \\ { <g, d'>4 } >> r8 <g d' g>8 ~ |
  q4 g16 g g g << { fs'8[( g)] } \\ { <g, d'>4 } >> r8 <a e'>8 ~ |

  q4 a16 a a a << { d8[( e)] } \\ { a,4 } >> r8 <a e'>8 ~ |
  q4 a16 a a a << { d8[( e)] } \\ { a,4 } >> r8 <g d' g>8 ~ |
  q4 g16 g g g << { fs'8[( g)] } \\ { <g, d'>4 } >> r8 <g d' g>8 ~ |
  q4 g16 g g g << { fs'8[( g)] } \\ { <g, d'>4 } >> r8 <bf f'>8\laissezVibrer |

  R1*8^"pre-chorus" |
  R1*18^"chorus" |
  R1*30^"E riff" |

  <e b'>2 r2 \bar "|." |
}

vocalMelody = \relative c'' {
  % chord swell
  r1 | r1 |

  % main riff
  \repeat unfold 8 r1 |

  % e thing
  \repeat unfold 8 r1 |

  % a-g maj7 thing
  \repeat unfold 8 r1 |

  % e-f#-g-a thing
  \repeat unfold 4 r1

  % b thing
  \repeat unfold 8 r1 |
  r1 | r1 |

  % verse 1
  cs4.^"verse 1" cs8 cs d4 e8 ~ | e4. d8 cs4 b |
  a4 a8 a ~ a b4 g8 ~ | g2 r2 |
  cs4. cs8 cs d4 e8 ~ | e4.( d8) cs4 b |
  a4 a8 a ~ a b4 g8 ~ | g2 r2 |

  % pre-chorus
  r2^"pre-chorus" r8 bf bf4 | d2 bf4. c8 ~ |
  c2 r4 c8 f8 ~ | f4. e8 ~ e d4 c8( |
  bf2) r2 | r4 bf c d8 e ~ |
  e4 e8 d ~ d c4 f8 ~ | f4. f8 e( d4.) |

  % chorus
  fs2.(^"Chorus" ~ fs8 g ~ | g1 ~ | g4.) g8 ~ g g4 g8( | fs2) r2 | r1 |
  fs2.( ~ fs8 g ~ | g1 ~ | g4) g8 g ~ g g4 g8( | fs2) r2 | r2 r4 r8 a,8 |
  c2 d4. ef8 ~ | ef2 r4 r8 ef | ef2 f4. gf8 ~ | gf2. r4 |
  gf4 gf8 f ~ f ef4 cs8 ~ | cs2 r8 cs8 d!4 |
  e2 fs2 | g2 fs2 |

  % interlude
  e1 | \repeat unfold 29 r1 |

  % verse 2
  cs4.^"verse 2" cs8 cs d4 e8 ~ | e4. d8 cs4 b |
  a4 a8 a a b4 g8 ~ | g2 r2 |
  cs2 cs8 d4 e8 ~ | e4. d8 cs4 b |
  a4. a8 ~ a b4 g8 ~ | g2 r2 |

  fs'2 fs8 g4 a8  ~ | a4. g8 fs4 e8 e |
  d2 ~ d8 e4 c8 ~ | c2 r2 |
  fs2 fs8 g4 a8 ~ | a2( g4) fs8 e  |
  d4 d8 d ~ d e4 c8 ~ | c2 r2 |

  d4.^"bridge" e8 ~ e4 cs! | d4. e8 ~ e4 f | g4. f8 ~ f4 e | e2 r2 |
  d4. e8 ~ e4 cs | d4. e8 ~ e4 f | g4. f8 ~ f4 g | a2 r2 |
  g4. a8 ~ a4 fs! | g4. a8 ~ a4 bf | c4. bf8 ~ bf4 a | a2 r2 |
  g4. a8 ~ a4 fs | g4. a8 ~ a4 bf | c4. bf8 ~ bf4 c | d2 r2 |

  r1 | r1 | r1 | r2 r4 r8 a, |
  bf c4 d8 ~ d e4 f8 ~ | f e4 d8 ~ d( c) c4 |

  % chorus
  R1*18^"chorus" |

  \bar "||"
  \key a \major
  % guitar solo
  e2^"guitar solo" r2 |


}

chorusVocals = \lyricmode {
  I __ built __ the sky. __
  I __ ne -- ver __ asked why. __
  And when it falls, __
  and shatt -- ers all. __
  I will not __ de -- spair __
  be -- cause you'll still be right there.
}

vocals = \lyricmode {
  % verse 1
  Once u -- pon a time __ I tried to read be -- tween the lines. __
  All I ev -- er found __ was the emp -- ti -- ness __ in -- side. __

  % pre-chorus
  But still life goes on. __
  And I'll car -- ry on. __
  And still the light __ will ne -- ver fade __ be -- cause __

  % chorus
  \chorusVocals

  % verse 2
  Once u -- pon a time __ I saw the clouds roll a -- cross the sky. __
  As the rain fell __ I felt a pain in __ my eye. __
  When I looked up __ I saw that the sky __ was bare. __
  All of my pain __ was the ab -- sence of __ your stare. __

  % bridge
  There I __ was try -- ing __ to find a __ way out.
  All the __ time wast -- ed __ in fear and __ in doubt.
  Build -- ing __ my pri -- son __ one brick at __ a time.
  You made __ me break through __ and reach for __ the sky.

  And all this time __ I ne -- ver knew __ that

  % chorus
  % ...
  there.

}

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" }
  <c ef f g bf>1-\markup { "m7sus4" }
}

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

eRiffChords = \chordmode {
  \powerChords e1:1.5 | q | q | g2:sus2 a:sus2 |
  \powerChords e1:1.5 | q | q | f2:6 g:1.3.5.9 |
}

aToGToBToCToDRiffChords = \chordmode {
  a2 d8 a4. | a2 d8 a4 g8 | g2 g8:maj7 g4. | g2 g8:maj7 g4 a8 |
  a2 d8 a4. | a2 d8 a4 g8 | g2 g8:maj7 g4. | g2 g8:maj7 g4 \powerChords e8:1.5 |

  e2:1.5 fs:1.5 | g:1.5 a4.:1.5 e8:1.5 |
  q2 fs:1.5 | g:1.5 a4.:1.5 b8 |

  b2.. b8:/a | q2.. b8:/gs | q2.. b8:/a | q2.. b8 |
  b2.. b8:/a | q2.. b8:/gs | q2.. b8:/a | q2.. c8:maj7 |
  q2.. \powerChords c8:1.5 | q4. d8:1.5 q2 |
}

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

  % chord swell
  a1:7sus4 ~ | q 1 |

  % main riff
  \repeat unfold 8 r1 |

  \eRiffChords
  \aToGToBToCToDRiffChords

  % verse 1
  a1 | q | a2.. g8 | g2 d2 |
  a1 | q | a2.. f8 | f2 g4. bf8 |

  % pre-chorus
  bf1 | bf2.. c8 | c1 | c2.. bf8 |
  bf1 | bf2.. c8 | c1 | c2.. d8 |

  % chorus
  \repeat unfold 2 { d2.. g8 | g2.. f8 | f1 | d | d | }
  c2 bf4. af8 ~ | af1 | ef2 bf4. gf8 ~ | gf1 |
  df2.. a8 ~ | a1 | c1 | d1 |

  % interlude

  \eRiffChords
  \aToGToBToCToDRiffChords

  % verse 2
  \repeat unfold 8 a1:/e |
  \repeat unfold 8 d1:/a |

  % bridge
  \repeat unfold 8 d1:m |
  \repeat unfold 8 g1:m |

  \powerChords d4.:1.5 c4:1.3.5.9 d:m/f c8:1.3.5.9/e |
  q g4:sus4 a8:sus2 q2 |
  a2:7 q8 a4:6 \powerChords a8:1.5 |
  q a4:6 a8:sus2 q2 |

  bf1 | c |

  % chorus
  R1*18 |

  % guitar solo
  cs2..:m a8 ~ | a1 | b2.. e8 ~ | e1 |
  fs2..:1.3-.4.5.7 e8:/gs ~ | q1 | a4. e4. fs4:7 ~ | q1 |
  b2..:m g8 ~ | g1 | a2.. d8 ~ | d2 d4:1.3.5.11+ d4 |

  a1 | a2.. b8:m | q1 | q2.. a8 |
  a1 | a2.. e8:7/d | q1 | q2.. a8 |
  \time 3/4
  a2. | a | b:m | b:m | fs:m | fs: m | e | e |
  a2. | a | b:m | b:m | fs:m | fs: m | e | \time 4/4 e2.. a8 |

  a2 d8 a4. | a2 d8 a4 g8 | g2 g8:maj7 g4. | g2 g8:maj7 g4 a8 |
  a2 d8 a4. | a2 d8 a4 g8 | g2 g8:maj7 g4. | g2 g8:maj7 g4 bf8 |

  % pre-chorus
  R1*8 |
  % chorus
  R1*18 |

  R1*30 |
  \powerChords e2:1.5 s2 |

}

\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 {}
}
%}