%{
    Wind Waker ocean theme
    Arranged for guitar by Steve Yegge

  compile-command:
  /Applications/LilyPond.app/Contents/Resources/bin/lilypond \
       [-d fret-diagrams] --png windwaker.ly \
    && /Users/stevey/bin/refresh-lilypond \
    && /Users/stevey/bin/midi windwaker.midi
%}

\version "2.26.0"  % necessary for upgrading to future LilyPond versions

\include "english.ly"
\include "common.ly"

intro = \relative c {
  \pOff
  <<
    %% measure 1-2
    \relative c {
      \fingerRight
      <d'-3 fs-4 a-1>1
      <cs-2 e a> ^\markup \barnum #"V" #"2"
    }
    \\ \relative c {
      \fingerDown \stringUp
      <d,-0>8\6 <a'-0> <d-0> ( <e-2\5>4 ) <d-0>4 <a-0>8
      d,8 a' d ( <e-4\5>4 ) d4 a8
    }
  >>
  |
  <<
    %% measure 3-4
    \relative c {
      <c' e a>1 ^\markup \barnum #"V" #"3"
      <b-4 d-2 g-3>
    }
    \\ \relative c {
      \fingerDown \stringUp
      d,8 a' d ( <e-4\5>4 ) d4 a8
      d,8 a' d ( <e-1\4>4 ) d4 a8
    }
  >>
  |
  <<
    %% measure 5-6
    \relative c {
      \fingerUp
      <a'-2 d-4 fs-3>1
      <a-2 cs-3 e-0>
    }
    \\ \relative c {
      d,8 a' d ( <e-1\4>4 ) d4 a8
      d,8 a' d ( <e-1\4>4 ) d4 a8
    }
  >>
  |
  <<
    %% measure 7-8
    \relative c {
      <bf'-4 c-1 e-0>1
      <g-0 c-1 g'-4>
    }
    \\ \relative c {
      d,8 a' d ( <e-2\4>4 ) d4 a8
      d,8 a' d ( <e-2\4>4 ) d4 a8
    }
  >>
  |
}

firstSix = \relative c {
  <<
    %% measures 9-10
    \relative c {
      \barre "II" "3"
      <d' fs>8. \startTextSpan
      <a d>16
      <fs a>2. ~
      q2 ~ q4 \stopTextSpan
      d'16 a d fs
      |
    }
    \\ \relative c {
      d,4.\6
       <d a' fs'>4\6\5\4 _\downStrum
       <d a' fs'>8\6\5\4 _\upStrum
       <d a' fs'>4\6\5\4 _\downStrum
      |
      <d a' fs'>4.\6\5\4 _\downStrum
      <d a' fs'>4\6\5\4 _\upStrum
      d4.\6 _\downStrum
      |
    }
  >>
  |
  <<
    %% measure 11
    \relative c {
      \fingerUp
      <cs'-4 e-2 a-3>4.
      q4 q8 q4
    }
    \\ \relative c {
      \fingerLeft
      <fs,-1 a-0 d-0>4.\6\5\4 _\downStrum
      <fs a d>4\6\5\4 _\downStrum
      <fs a d>8\6\5\4 _\upStrum
      <fs a d>4\6\5\4 _\downStrum
    }
  >>
  |
  <<
    %% measure 12
    \relative c {
      \fingerUp
      <cs'-4 d-1 a'-3>4.
      q4 q4
      g'16-2 ( fs-1 )
    }
    \\ \relative c {
      \fingerLeft
      <fs,-2 a-0 d-0>4.\6\5\4 _\downStrum
      <fs a d>4\6\5\4 _\upStrum
      <fs a d>4.\6\5\4 _\downStrum
    }
  >>
  |
  \break
  <<
    %% measures 13-14
    \relative c {
      \barre "III" "2"
      \fingerLeft
      <b'-2 d g>4. \startTextSpan _\downStrum
      q4 _\downStrum
      q4. _\upStrum
      |
      q4. _\downStrum
      q4 _\downStrum
      q8 _\upStrum
      q4 \stopTextSpan  _\downStrum
    }
    \\ \relative c {
      \fingerLeft
      <g-3 d'-0>4.\6\4
      <g d'>4.\6\4
      <g d' b'>8\6\4\3 _\downStrum
      ( d\6 )
      |
      <g d'>4.\6\4
      <g d'>4\6\4
      <g d'>8\6\4
      <g d'>4\6\4
    }
  >>
  |
}

bridge = \relative c {
  <<
    %% measure 17
    \relative c {
      \fingerUp
      b'8-0 b16 ( cs-1 d8-2 ) ~ d2
    }
    \\ \relative c {
      \fingerDown
      <g-4 d'-0 g-0>4.\6\4\3 \arpeggio
      <g d' g>4\6\4\3 _\downStrum
      <d' g>8  _\upStrum
      <g, d' g>4\6\4\3  _\downStrum
    }
  >>
  |
  <<
    %% measure 18
    \relative c {
      \fingerUp
      b8-1 b16 ( cs-3 ) d8-0 ~ d4. e'8
    }
    \\ \relative c {
      \fingerDown
      <g-4>4.
      <g b g' b>4\6\5\3\2 _\downStrum
      <g b g' b>4.\6\5\3\2  _\upStrum
    }
  >>
  |
}

partOneA = \relative c {
  \firstSix
  %% measure 15
  \pOff
  <a-0 e'-1 a-2 d-3 e-0>4. _\downStrum
  q4 _\downStrum
  q8 _\upStrum
  q4 _\downStrum
  |
  %% measure 16
  <a-0 e'-1 a-2 cs-3 e-0>4. _\downStrum
  q4 _\downStrum
  q8 _\upStrum
  q4 _\downStrum
  |
  \bridge
  <<
    %% measure 19
    \relative c {
      \fingerUp
      <d'-2>2. e8-0
    }
    \\ \relative c {
      \fingerDown
      <fs,-3 d'-0 a'-1>4.\6\4\3
      <fs a-0 d a'>4\6\5\4\3  _\upStrum
      <fs a d a'>4.\6\5\4\3 _\downStrum
    }
  >>
  |
  <<
    %% measure 20
    \relative c {
      <a'-2>1
    }
    \\ \relative c {
      \fingerDown
      <fs,-3 d'-0>4.\6\4
      <fs a d>4\6\5\4 _\downStrum
      <fs a d>8\6\5\4  _\upStrum
      <fs a d>4\6\5\4 _\downStrum
    }
  >>
  |
  <<
    %% measure 21
    \relative c {
      \fingerUp
      b'8-0 b16 ( cs-2 d8-4 ) ~ d2
    }
    \\ \relative c {
      \fingerDown
      <e,-1 d'-0 g-0>4. \arpeggio
      q4 _\downStrum
      q8  _\upStrum
      q4  _\downStrum
    }
  >>
  |
  <<
    %% measure 22
    \relative c {
      \fingerUp
      b8-2 b16 ( cs-4 ) d8-0 ~ d4. e'8
    }
    \\ \relative c {
      \fingerDown
      <e,-1>4.
      <e b'>4 _\downStrum
      q4.  _\upStrum
    }
  >>
  |
  %% measure 23
  <a-0 g'-3 b-2 d-1>4.\5\4\3\2
  <a g' b d>4\5\4\3\2 _\downStrum
  <a g' b d>8\5\4\3\2 _\upStrum
  <a g' b d>4\5\4\3\2 _\downStrum
  |
    %% measure 24
  <a-0 a'-3 cs-2 e-1>4.\5\4\3\2
  <a a' cs e>4\5\4\3\2 _\downStrum
  <a a' cs e>8\5\4\3\2 _\upStrum
  <a a' cs e>4\5\4\3\2 _\downStrum
  |
}

bFlatTail = {
  <<
    \relative c {
      \fingerUp
      d'8-4 d16 e-0
      f8-1 _\markup \smaller \center-align { \italic { "(hinge)" } }
      ~ f2 ~ f8
      |
      \fingerUp
      bf,8-4
      bf16 c-1 d-4 ~ d2
    }
    \\ \relative c {
      \fingerDown
      <bf-1 f'-2 bf-3>4.
      <bf f' bf d>4 _\downStrum
      q8  _\upStrum
      q4  _\downStrum
      |
      \fingerDown
      <bf-1 f'-2>4.
      <bf f' bf>4 _\downStrum
      q8  _\upStrum
      q4  _\downStrum
    }
    \\ {
      %% fake measure to make the barre extend properly
      s8.
      s8
      \barre "I" "5"
      s16 \startTextSpan
      s8
      s2
      |
      s2. s4 \stopTextSpan
      |
    }
  >>
  |
  <<
    \relative c {
      \barre "III" "5"
      \fingerDown
      <bf' d>8 \startTextSpan
      q16
      ( <c-4 e-3>16 ) \stopTextSpan
      \pOff
      <bf-4 d-3 f-1>8 ^\upStrum
      \fingerUp
      <bf-4 d-3 f-1>4
      q8
      q4
    }
    \\ \relative c {
      \fingerDown
      <c f>4.
      \arpeggioBracket
      <c-2 f-2>4 \arpeggio _\downStrum
      q8  _\upStrum
      q4  _\downStrum
    }
  >>
  |
  <<
    \relative c {
      <c-3 e-2 g-0 c-1 g'-4>4. _\downStrum
      q4 _\downStrum
      q4. _\upStrum
    }
  >>
  |
}

partOneB = \relative c {
  \firstSix \pOff
  %% measure 31
  <<
    \relative c {
      \fingerUp
      <e'-0>4. ~ e4 ~ e8
      \tuplet 3/2 { <a-4>8 a a }
    }
    \\ \relative c {
      \fingerDown
      <a-0 e'-1 a-2 d-3>4. _\downStrum
      q4 _\downStrum
      q4. _\upStrum
    }
  >>
  |
  %% measure 32
  <<
    \relative c {
      \fingerRight
      <a''-4>1
    }
    \\ \relative c {
      \fingerDown
      \barre "II" "4"
      <a e' a cs>4.\5\4\3\2 \startTextSpan _\downStrum
      <a e' a cs>4\5\4\3\2 _\downStrum
      <a e' a cs>8\5\4\3\2 _\upStrum
      <a e' a cs>4\5\4\3\2 \stopTextSpan _\downStrum
    }
  >>
  |
  \pOff
  \bridge
  |
  %% measure 35
  <<
    \relative c {
      <d'>2
      <fs>4 ^\markup \barnum #"I" #"3"
      \fingerUp
      e-0
    }
    \\ \relative c {
      \fingerDown
      <fs,-3 d'-0 a'-1>2\6\4\3
      <fs a-0 d a' d>2\6\5\4\3\2
    }
  >>
  |
  %% measure 36
  \fingerDown
  <b fs' b d>4.
  q4 _\downStrum
  q8  _\upStrum
  q4 _\downStrum
  |
  \bFlatTail
}

interim = \relative c {
  %% measure 41-42
  <<
    \relative c {
      \fingerRight
      <a'-2 d-4 fs-3>1
      <b-2 e-4 gs-3>
    }
    \\ \relative c {
      \fingerDown
      d,8 a' d ( <e-1\4>4 ) d4 a8
      d,8 a' d ( <e-1\4>4 ) d4 a8
    }
  >>
  |
  %% measure 43-44
  <<
    \relative c {
      \fingerRight
      <a'-2 d-4 fs-3>1
      <cs e a>
    }
    \\ \relative c {
      \fingerDown
      d,8 a' d ( <e-1\4>4 ) d4 a8
      \barre "V" "2"
      d,8\6 \startTextSpan
      a'\5 d\4 ( <e-4\5>4 ) d4\4 a8\5 \stopTextSpan
    }
  >>
  | \pOff
  %% measure 45-46
  <<
    \relative c {
      \fingerRight
      <a'-2 d-4 fs-3>1
      <b-2 e-4 gs-3>
    }
    \\ \relative c {
      \fingerDown
      d,8 a' d ( <e-1\4>4 ) d4 a8
      d,8 a' d ( <e-1\4>4 ) d4 a8
    }
  >>
  %% measure 47-48
  |
  <<
    \relative c {
      \fingerRight
      <a'-2 d-4 fs-3>1
      <e'-2 a-3 cs-4>
    }
    \\ \relative c {
      \fingerDown
      d,8 a' d ( <e-1\4>4 ) d4 a8
      d,8 a' d ( <e-1\5>4 ) d4 a8
    }
  >>
  |
}

partTwo = \relative c {
  <<
    %% measures 49-50
    \relative c {
      \barre "II" "3"
      <d' fs>8. \startTextSpan
      <a d>16
      <fs a>2. ~
      |
      q2 ~
      r8 \stopTextSpan
      a8 d fs
      |
    }
    \\ \relative c {
      d,4.\6
      \override TextScript.outside-staff-priority = #-100
       <d a' fs'>4\6\5\4 ^\downStrum
       <d a' fs'>8\6\5\4 ^\upStrum
       <d a' fs'>4\6\5\4 ^\downStrum
      |
      <d a' fs'>4.\6\5\4 ^\downStrum
      <d a' fs'>4\6\5\4 ^\upStrum
      s4.
      |
    }
  >>
  |
  <<
    %% measures 51-52
    \relative c {
      \fingerUp
      \stringDown
      \barre "II" "5"
      fs'8 \startTextSpan
      <e-4\2>16 ( ds-3 e8-4 \stopTextSpan )
      \once \override Fingering.outside-staff-priority = #-100
      <e-0>4\1 ^\markup \smaller { \italic { "(hinge)" } }
      e8\1 e8\1 e8\1
      |
      e4.\1 e4\1 e8\1 e8\1 e8\1
    }
    \\ \relative c {
      \fingerRight
      <cs-2 e a cs>4. \arpeggio
      <cs-2 e-1 a-1 e'-4>4 _\downStrum
      q8 _\upStrum
      q8 _\downStrum
      q8 _\upStrum
      |
      q4. _\downStrum
      q4 _\downStrum
      q8 _\upStrum
      q8 _\downStrum
      q8 _\upStrum
    }
    \\ {
      s4.
      \hideNotes
      \once \override NoteColumn.force-hshift = #-0.0
      \arpeggioBracket <e'>4\1 \arpeggio
      \unHideNotes
      s4.
    }
  >>
  |
  <<
    %% measure 53
    \relative c {
      \fingerUp
      \stringDown
      \barre "II" "5"
      fs'8 \startTextSpan
      <e-4\2>16 ( d-3 ) a8 \stopTextSpan
      \once \override Fingering.outside-staff-priority = #-100
      <e'-0>4 ^\markup \smaller { \italic { "(hinge)" } }
      r4.
    }
    \\ \relative c {
      \fingerDownRight
      <c-2 e a d>4. \arpeggio
      <c-2 e-1 a-1 d-3>4 _\downStrum
      q8 _\upStrum
      q8 _\downStrum
      q8 _\upStrum
    }
    \\ {
      s4.
      \hideNotes
      \once \override NoteColumn.force-hshift = #-0.0
      \arpeggioBracket <e'>4 \arpeggio
      \unHideNotes
      s4.
    }
  >>
  |
  %% measure 54
  \pOff <c,,-2 d-0 a'-1 d-3>4. _\downStrum
  _\markup { \vspace #1 }  %% spacer for staff below
  <d a' d>4 _\downStrum
  <d'-2>8 d16 e-0 ( fs-1 g-3 )
  |
  <<
    %% measures 55-56
    \relative c {
      <a''-4>4.
      <g-4>16 ( fs-2 g8 ) ~ g4. ~  g1
    }
    \\ \relative c {
      \fingerDownRight
      <b-1 d-0 g-0 b-0>4. \arpeggio
      <b d g d'-3 g-4>4 \arpeggio
      <b d g d'>8 _\upStrum
      q8 _\downStrum
      q8 _\upStrum
      |
      q4. _\downStrum
      q4 _\downStrum
      <d g d'>8 _\upStrum
      q8 _\downStrum
      q8 _\upStrum
    }
  >>
  |
  %% measures 57-58
  \fingerUpLeft
  <g,,-2 d'-0 g-0 b-0 b'-4>8.\6\4\3\2\1 \arpeggio
  \barre "II" "2"
  <g''-1>16 \startTextSpan <d-1>8
  \fingerLeft
  <g,,-3 d'-0 b'-2 d g>4\6\4\3\2\1 _\downStrum
  <g d' b' d g>8\6\4\3\2\1 _\upStrum
  <g d' b' d g>8\6\4\3\2\1 _\downStrum
  ( d\6 )
  |
  \fingerUnset
  <g-3 d'-0 b' d g>4.\6\4\3\2\1 _\downStrum
  <g d' b' d g>4\6\4\3\2\1 _\downStrum
  d''8 g \stopTextSpan
  b-4
  | \pOff
  <<
    %% measure 59
    \relative c {
      %% Might be better to use an ossia or embedded score, but I had trouble
      %% getting it working.
      s2. s8
      \once \override NoteHead.font-size = #-5
      \once \override Stem.font-size = #-5
      \once \override Fingering.font-size = #-5
      \once \override TextScript.extra-offset = #'(0 . -4)
      \fingerLeft
      <d''-4>8
      ^\markup {
        \hspace #1
        \fontsize #-4
        { \italic "(2nd time)" }
      }
    }
    \\ \relative c {
      \fingerUpLeft
      <fs,-1 a-0 d-0 cs'-3 e-2 b'-4>8\6\5\4\3\2\1 \arpeggio
      <a''-2>16 ( <gs-1> <a-2>8 )
      \fingerUpDown
      <fs,,-1 a-0 d-0 cs'-4 e-3 a-2>4\6\5\4\3\2\1 \arpeggio
      <d' cs' e a>4\4\3\2\1 _\upStrum
      \fingerLeft \stringDown
      <fs'-1\1>8
    }
  >>
  |
  %% measure 60
  <b,, fs' b d>4. _\downStrum
  q4 _\downStrum
  q8 _\upStrum
  q4
  _\markup { \vspace #1.2 }  %% spacer for staff below
  _\downStrum
  |
}

partTwoA = \relative c {
  <<
    \relative c {
      \fingerUpLeft
      <e,-1 fs'-3 b-4 d-2>8 \arpeggio
      d''16 e-0 _\markup \tiny { \italic { "(hinge)" } }
      \barre "II" "6"
      <fs-1>8 \startTextSpan
      <e,, b' fs' b d fs>4 \arpeggio
      <b' fs' b d fs>8 _\upStrum
      q8 _\downStrum
      q8 _\upStrum
      |
      \fingerUpLeft
      <e,-1 fs'-3 b-4>8 \arpeggio
      \fingerUp
      b''16 ( cs-1 d8-2 )
      <e,, b' fs' b d>4 \arpeggio
      <b' fs' b d>8 _\upStrum
      q8 _\downStrum
      q8 _\upStrum \stopTextSpan
    }
  >>
  | \pOff
  <a e'-1 g-0 d'-3>8 \arpeggio
  d'16 e-0
  ( <fs-2>8 )
  <a,, e' g d' fs>4 \arpeggio
  q8 _\upStrum
  q8 _\downStrum
  q8 _\upStrum
  |
  <a e' g cs-2 g'-4>4. \arpeggio
  q4 _\downStrum
  q8 _\upStrum
  q4 _\markup { \vspace #.5 }  %% spacer for staff below
  _\downStrum
  |
}

finale = \relative c {
  \midiTempoChange \tempo 4=120
  \barre "II" "3"
  <d, a'' d fs>8.\6\3\2\1 \startTextSpan \ff
  <a'' d>16
  _\markup \smaller { \italic { "rall. -  -  -  -" } }
  \midiTempoChange \tempo 4=110
  <c,-3 f-4 a-1>4 \stopTextSpan \pOff
  \midiTempoChange \tempo 4=100
  <bf f' a d>
  \midiTempoChange \tempo 4=120
  <a a' d fs>
  |
  \midiTempoChange \tempo 4=80
  <d, a' d d' fs a>1\6\5\4\3\2\1 \arpeggio \fermata
  |
}

music = {
  \key d \major
  \override Score.MetronomeMark.extra-offset = #'(0 . 2)
  \tempo 4=143
  \intro
  \partOneA
  \partOneB
  \break
  \interim
  \break
  \repeat volta 2 { \partTwo }
  \alternative {
    \partTwoA
    \bFlatTail
  }
  \break
  \interim
  \finale
  \bar "||"
}

\header {
  title = "Legend of Zelda:  The Wind Waker"
  subtitle = "The Great Sea"
  composer = "Composed by Koji Kondo"
  arranger = "Arranged for guitar by Steve Yegge"
  opus = #(strftime "%Y-%m-%d" (localtime (current-time)))
  copyright = "sites.google.com/site/steveysguitarsite"
  piece = \dropD
}

\score {
  <<
    \new Staff {
      \commonSetup
      \maybeFretDiagrams \music
    }
    \new TabStaff {
      \set TabStaff.stringTunings = #guitar-drop-d-tuning
      \music
    }
  >>
}

\score {
  \unfoldRepeats
  \music
  \midi {
    \context {
      \Score
      midiInstrument = #"acoustic guitar (steel)"
      tempoWholesPerMinute = #90/4
    }
    \context {
      \Voice
      \remove "Dynamic_performer"
    }
  }
}

\paper {
   indent = 8\mm
   % markup-system-spacing =
   % #'((basic-distance . 0) (padding . 1.5) (stretchability . 3) (minimum-distance . 0))
   % last-bottom-spacing =
   % #'((basic-distance . 0) (padding . 1.5) (stretchability . 3) (minimum-distance . 0))
   ragged-last-bottom = ##f
   min-systems-per-page = 4
   max-systems-per-page = 4
   page-count = 5
}