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

\header {
  title = "Dorian Skyline"
  composer = "Tommy Montgomery"
  copyright = "(c) 2016 Tommy Montgomery"
}

globalConfig = {
  \key d \dorian
  \time 4/4
  \numericTimeSignature
  \tempo 4 = 160
  \omit Voice.StringNumber
  \override TupletBracket #'bracket-visibility = #'if-no-beam
  \set TabStaff.restrainOpenStrings = ##t
  \set Staff.stringTunings = \stringTuning <d, a, d g b e'>
}

mainRiff = {
  \repeat unfold 2 {
    f8 d f g c(\glissando b) d, f |
    d'\5 d, r d r d r d16 d |
  }
}

guitarOne = {
  \relative c, {
    r2 r4 r8 d^"w/ dist" |
    \mainRiff
    f8 d f g c g'\4 c, d\5 |
    f c'\3 f,(\glissando e) c g f d |

    f d f g c( b) d, f |
    d'\5 d, r d r d r d |

    d'\5 d\5 d\5 <d\5 d'\3> ~ q <d\5 d'\3>4 d16\5 d\5 |
    d8\5 d\5 d\5 <d\5 c'\3> ~ q <d\5 c'\3>4 d16\5 d\5 |
    d8\5 d\5 d\5 <d\5 b'\3> ~ q <d\5 b'\3>4 d16\5 d\5 |
    d8\5 d\5 d\5 <d\5 bf'\4> ~ q <d\5 bf'\4>4 d16\5 d\5 |

    d8\5 d\5 d\5 <d\5 d'\3> ~ q <d\5 d'\3>4 d16\5 d\5 |
    d8\5 d\5 d\5 <c'\3 f\2> ~ q <c\3 f\2>4 d,16\5 d\5 |
    d8\5 d\5 d\5 <g\4 d'\3 g\2> ~ q <g\4 d'\3 g\2>4 d16\5 d\5 |
    d8\5 d\5 d\5 <a'\4 d\3 fs\2> ~ q <a\4 d\3 fs\2>4. |

    g'8^"doubled (acoustic and lo-gain dist.)"\2 d\3 bf\4 g'8\2 d\3 bf\4 d\3 g\2 |
    \repeat unfold 2 { fs\2 c\3 a\4 } c\3 fs\2 |
    \repeat unfold 2 { g8\2 d\3 bf\4 } d\3 g\2 |
    \repeat unfold 2 { a\2 ef\3 c\4 } ef\3 a\2 |
    \repeat unfold 2 { g8\2 d\3 bf\4 } d\3 g\2 |
    \repeat unfold 2 { fs\2 c\3 a\4 } c\3 fs\2 |
    \repeat unfold 2 { ef\2 c\3 g\4 } c\3 ef\2 |
    \repeat unfold 2 { d\2 c\3 fs,\4 } c'\3 d\2 |
    \repeat unfold 2 { c\3 g\4 ef\5 } g\4 c\3 |
    \repeat unfold 2 { b\3 g\4 d\5 } g\4 b\3 |
    \repeat unfold 2 { bf\3 g\4 cs,\5 } g'\4 bf\3 |
    a\3 ef\4 c!\5 a'\3 ef\4 c\5 ef\4 a\3 |

    bf, f' g f d' g, e'! d |
    c, g'\4 g\3 g\4 e'\2 g, e' e\2 |
    \repeat unfold 2 { d,\5 a'\4 g a\4 fs'\2 g, e' fs\2 } |
    bf,, f'! g f d' g, e' d |
    c, g'\4 g\3 g\4 e'\2 g, e' e\2 |
    a,, e' bf' cs g' cs, bf e, |
    a, e' g cs e cs g e |
    <a, e' g cs e>1\arpeggio ~ | q |
    <a g'\4 g e'\2 e>1\arpeggio ~ | q |

    \transpose d d' { \relative c \mainRiff }
    f''8 d f g c g' c, d |
    f c'( f, e) f16( g f e) d^"+"( a) g^"+"( d) |
    f8 d f g c( b) d, f |
    d' d, d d' ~ d4. ~ \afterGrace d8\glissando { \hideNotes a' } \unHideNotes |
  }
}

guitarTwo = {
  \relative c, {
    \textSpannerDown
    \override TextSpanner.bound-details.left.text = \markup { \normal-text \teeny "P.M." }
    r2 r4 r8 d^"w/ dist"\startTextSpan |
    \repeat unfold 2 {
      f d f g c b d, f |
      d'\5 d, r d r d r d16 d |
    }
    f8 d f g\stopTextSpan f' c'\3 f, g\4 |
    bf f'\2 bf,(\glissando a g) e c g |
    f\startTextSpan d f g c b d, f |
    d'\5 d, r d r d r d\stopTextSpan |

    \repeat unfold 2 {
      \repeat unfold 13 {
        r <d a' d>
      }
      r d \tuplet 3/2 4 { d( f g) a( c d\5) }
    }

    g,^"palm muted" a\6 bf\6 g a\6 bf\6 a\6 g |
    \repeat unfold 2 { fs\6 g\6 a\6 } g fs\6 |
    g a\6 bf\6 g bf\6 g a\6 bf\6 |
    c d\5 ef\5 c d\5 c bf\6 a\6 |
    \repeat unfold 2 { g a\6 bf\6 } a\6 g |
    \repeat unfold 2 { fs\6 g\6 a\6 } g fs\6 |
    ef f! g ef f g f ef |
    d fs g a\6 g fs d'4\5 |

    \repeat unfold 8 { <g\4 ef'\3>8 } |
    \repeat unfold 8 { <g\4 d'\3>8 } |
    <g\4 cs\3> <g\4 cs\3>-> <g\4 cs\3> <g\4 cs\3> <g\4 cs\3>-> <g\4 cs\3> <g\4 cs\3> <g\4 cs\3>-> |
    <g\4 c!\3> <g\4 c\3> <g\4 c\3>-> <g\4 c\3> <g\4 c\3> <g\4 c\3>-> <g\4 c\3> <g\4 c\3> |

    <bf, f' bf>1 |
    <c g'\4 c\3> |
    <d, a' d>2 fs8 a\6 g fs |
    <d a' d>2 d8( f!) g a |

    <bf f' bf>1 |
    <c g'\4 c\3> |
    <a e' a>8 q r <a e' a> <bf f' bf> <a e' a> r <a e' a> |
    r <a e' a> r a bf d cs bf |
    <a e' a>1 ~ | q ~ | q |
    a4 g f e |

    \mainRiff
    f8 d f g c g' c, d |
    f c' f,(\glissando e) f16( g f e) d( a) g( d) |
    f8 d f g c( b) d, f |
    d' d, r d r d r d |
  }
}

guitarOneTab = {

}

\score {
  <<
    \new Staff \with { \clef "G_8" } {
      \globalConfig
      \guitarOne
    }
    \new TabStaff \with {
      \globalConfig
      \clef moderntab
      \guitarOneTab
    }
    \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
    }
  }
}