\version "2.12.2"

#(set-global-staff-size 19)

\header {
  title = "Rue Des Cascades"
  composer = "Yann Tiersen"
  %arranger = \markup \line { "piano transcription by" \with-url #"http://www.youtube.com/user/PhilippeLernould" "Philippe Lernould" }  
  tagline = \markup \override #'(box-padding . 1.0) \override #'(baseline-skip . 2.7) \box \column { { \small \line { Reconstructed by \with-url #"mailto:treitmayr@devbase.at" "Thomas Reitmayr" ", 2010 • " \with-url #"http://www.devbase.at/" "www.devbase.at" • Typeset using \with-url #"http://www.LilyPond.org" "LilyPond.org" } } }
}

\paper {
  #(set-paper-size "a4")
  line-width    = 180\mm
  left-margin   = 15\mm
  top-margin    = 15\mm
  bottom-margin = 20\mm
  %%indent = 50\mm 
  %%set to ##t if your score is less than one page: 
  %ragged-last = ##t
  ragged-last-bottom = ##t
  %%ragged-bottom = ##t
}

global = {
  \key e \major
  \time 6/8
  %%\override Fingering #'stencil = ##f
  %%\override Fingering #'add-stem-support = ##t
  %%\override Fingering #'staff-padding = #'()
}

right = \relative c' {
  \global
  %\set Score.doubleRepeatType = #":|.|:"

  \clef bass

  r2. | % 1
  r2. | % 2
  
  \repeat volta 2 {
    \repeat unfold 2 { e,16 gis e' dis, gis dis' } | % 3
    \repeat unfold 2 { cis,16 gis' cis dis, gis dis' } | % 4
    \repeat unfold 2 { cis,16 fis cis' dis, fis dis' } | % 5
  }
  \alternative {
    { \repeat unfold 4 { cis,16 a' cis } | } % 6
    { \repeat unfold 3 { cis,16 a' cis } cis,16 a' r16 | } % 7
  }

  \repeat volta 2 {
    dis,16 gis b 
    \repeat unfold 3 { dis,16 gis b } | % 8
    \repeat unfold 4 { dis,16 fis b } | % 9
    \repeat unfold 4 { cis,16 fis a } | % 10
    \repeat unfold 4 { cis,16 e gis } | % 11
  }

  \clef treble
  \repeat volta 2 {
    r8 <gis' cis e gis>8
    \repeat unfold 3 { <gis cis e gis>8 }
    <gis dis' gis>8 | % 12
    r8 \repeat unfold 5 { <gis b e gis>8 } | % 13
    r8 \repeat unfold 4 { <gis b dis gis>8 }
    <fis b dis fis>8 | % 14
  }
  \alternative {
    { <fis a cis fis>2. | } % 15
    { <cis fis a cis>2. | } % 15
  }
  
  \repeat volta 2 {
    r8 <gis' cis e gis>8
    \repeat unfold 3 { <gis cis e gis>8 }
    <gis dis' gis>8 | % 12
    r8 \repeat unfold 5 { <gis b e gis>8 } | % 13
    r8 \repeat unfold 4 { <gis b dis gis>8 }
    <fis b dis fis>8 | % 14
  }
  \alternative {
    { <fis a cis fis>2. | } % 15
    { <cis fis a cis>2. | } % 15
  }

  \repeat volta 2 {
    \repeat unfold 2 { e'16-> gis, e dis'16-> gis, dis } |
    \repeat unfold 2 { cis'16-> gis cis, dis'16-> gis, dis } |
    \repeat unfold 2 { cis'16-> fis, cis dis'16-> fis, dis } |
  }
  \alternative {
    { \repeat unfold 3 { cis'16-> a cis, } b'-> a8-> | }
    { cis16-> a cis, \repeat unfold 2 { cis'16-> a cis, } cis'-> a r16 | }
  }

  \repeat volta 2 {
    b8 b16 fis e b b'8 b16 fis e b | % 27
    b'8 b16 gis fis dis b'8 b16 gis fis dis | % 28
    a'8 a16 fis e a, a'8 a16 fis e a, | % 29
    gis'16 cis, gis' a gis a gis16 cis, gis' a gis a | % 27
  }

  \repeat volta 2 {
    r8 <gis cis e gis>8
    \repeat unfold 3 { <gis cis e gis>8 }
    <gis dis' gis>8 | % 12
    r8 \repeat unfold 5 { <gis b e gis>8 } | % 13
    r8 \repeat unfold 4 { <gis b dis gis>8 }
    <fis b dis fis>8 | % 14
  }
  \alternative {
    { <fis a cis fis>2. | } % 15
    { <cis fis a cis>2. | } % 15
  }

  \repeat volta 2 {
    r8 <gis' cis e gis>8
    \repeat unfold 3 { <gis cis e gis>8 }
    <gis dis' gis>8 | % 12
    r8 \repeat unfold 5 { <gis b e gis>8 } | % 13
    r8 \repeat unfold 4 { <gis b dis gis>8 }
    <fis b dis fis>8 | % 14
  }
  \alternative {
    { <fis a cis fis>2. | } % 15
    { <cis fis a cis>2. | } % 15
  }
  \repeat unfold 4 { r2. | }
}


left = \relative c {
  \global

  \clef bass

  \repeat unfold 2 { <cis cis,>16-> r16 <cis cis,>16 r16 <cis cis,>16 r16 } | % 1 
  \repeat unfold 2 { <cis cis,>16-> r16 <cis cis,>16 r16 <cis cis,>16 r16 } | % 2 

  \repeat volta 2 {
    \repeat unfold 2 { <cis cis,>16-> r16 <cis cis,>16 r16 <cis cis,>16 r16 } | % 3 
    \repeat unfold 2 { <e e,>16-> r16 <e e,>16 r16 <e e,>16 r16 } | % 4
    \repeat unfold 2 { <b b,>16-> r16 <b b,>16 r16 <b b,>16 r16 } | % 5 
  }
  \alternative {
    { <a a,>16-> r16 <a a,>16 r16 <a a,>16 r16 <a a,>16-> r16 <a a,>4 | } % 6
    { <a a,>16-> r16 <a a,>16 r16 <a a,>16 r16 <a a,>16-> r16 <a a,>4 | } % 7
  }

  \repeat volta 2 {
    \repeat unfold 6 { <gis gis,>16 r16 } | % 8
    \repeat unfold 6 { <b b,>16 r16 } | % 9
    \repeat unfold 6 { <fis fis,>16 r16 } | % 10 
    \repeat unfold 3 { <cis cis,>16 r16 }
    \repeat unfold 3 { <cis cis,>16 r16 } | % 11 
  }

  \repeat volta 2 {
    <cis cis'>8-> \repeat unfold 4 { <cis cis'>8 } <dis dis'> | % 12
    <e e'>8-> \repeat unfold 5 { <e e'>8 } | % 13
    <b b'>8-> \repeat unfold 5 { <b b'>8 } | % 14
    %<cis cis'>4.\sustainOn <cis cis'>4 <dis dis'>8 | % 12
    %<e e'>4. <e e'>4. | % 13
    %<b b'>4. <b b'>4. | % 14
  }
  \alternative {
    { <fis fis'>8-> \repeat unfold 5 { <fis fis'>8 } | } % 15
    { <fis fis'>8-> \repeat unfold 5 { <fis fis'>8 } | } % 16
  }
  
  \repeat volta 2 {
    <cis' cis'>8 \repeat unfold 4 { <cis cis'>8 } <dis dis'> | % 17
    \repeat unfold 6 { <e e'>8 } | % 18
    \repeat unfold 6 { <b b'>8 } | % 19
    %<cis' cis'>4. <cis cis'>4 <dis dis'>8 | % 17
    %<e e'>4. <e e'>4. | % 18
    %<b b'>4. <b b'>4. | % 19
  }
  \alternative {
    { \repeat unfold 6 { <fis fis'>8 } | } % 20
    { \repeat unfold 6 { <fis fis'>8 } | } % 21
  }
  
  \repeat volta 2 {
    <cis'' cis,>8
    \repeat unfold 5 { <cis cis,>8 } | % 22 
    \repeat unfold 6 { <e e,>8 } | % 23
    \repeat unfold 6 { <b b,>8 } | % 24 
  }
  \alternative {
    { \repeat unfold 6 { <fis fis'>8 } | } % 25
    { \repeat unfold 6 { <fis fis'>8 } | } % 26
  }

  \repeat volta 2 {
    { \repeat unfold 6 { <gis gis'>8 } | } % 27
    { \repeat unfold 6 { <b b'>8 } | } % 28
    { \repeat unfold 6 { <fis fis'>8 } | } % 29
    { \repeat unfold 6 { <cis cis'>8 } | } % 30
  }

  \repeat volta 2 {
    <cis cis'>8-> \repeat unfold 4 { <cis cis'>8 } <dis dis'> | % 12
    <e e'>8-> \repeat unfold 5 { <e e'>8 } | % 13
    <b b'>8-> \repeat unfold 5 { <b b'>8 } | % 14
    %<cis cis'>4. <cis cis'>4 <dis dis'>8 | % 12
    %<e e'>4. <e e'>4. | % 13
    %<b b'>4. <b b'>4. | % 14
  }
  \alternative {
    { <fis fis'>8-> \repeat unfold 5 { <fis fis'>8 } | } % 15
    { <fis fis'>8-> \repeat unfold 5 { <fis fis'>8 } | } % 16
  }
  
  \repeat volta 2 {
    <cis' cis'>8 \repeat unfold 4 { <cis cis'>8 } <dis dis'> | % 17
    \repeat unfold 6 { <e e'>8 } | % 18
    \repeat unfold 6 { <b b'>8 } | % 19
    %<cis' cis'>4. <cis cis'>4 <dis dis'>8 | % 17
    %<e e'>4. <e e'>4. | % 18
    %<b b'>4. <b b'>4. | % 19
  }
  \alternative {
    { \repeat unfold 6 { <fis fis'>8 } | } % 20
    { \repeat unfold 6 { <fis fis'>8 } | } % 21
  }
  
  \repeat unfold 6 { <fis fis'>8 } | % 41
  \repeat unfold 6 { <fis fis'>8 } | % 42
  <fis fis'>8\cresc
  \repeat unfold 5 { <fis fis'>8 } | % 43
  fis'8 cis fis,2\fermata | % 44

}

dynamics = {
  s2.\f s2.*10
  s2.\sfz s2.*4
  s2.\p s2.*4
  s2.\mf s2.*8
  s2.\sfz s2.*4
  s2.\pp
}

pedal = {
  s2.*5
  s4. s16*5\sustainOn s16\sustainOff
  s4. s16*5\sustainOn s16\sustainOff
  s2.
  s4. s16*5\sustainOn s16\sustainOff
  s2.
  s4. s16*5\sustainOn s16\sustainOff
  s2.\sustainOn
}


pianoPart = \new PianoStaff \with {
  instrumentName = "Klavier"
} <<
  \new Staff = "right" \with {
    midiInstrument = "acoustic grand"
  } \right
  \new Dynamics = "Dynamics_pf" \dynamics
  \new Staff = "left" \with {
    midiInstrument = "acoustic grand"
  } { \clef bass \left }
  \new Dynamics = "pedal" \pedal
>>

\score {
  <<
    %\override pianoPart.BarLine #'hair-thickness = #1.0
    \pianoPart
  >>
  \layout {
    % define Dynamics context
    \context {
      \type "Engraver_group"
      \name Dynamics
      \alias Voice
      \consists "Output_property_engraver"
      \consists "Piano_pedal_engraver"
      \consists "Script_engraver"
      \consists "New_dynamic_engraver"
      \consists "Dynamic_align_engraver"
      \consists "Text_engraver"
      \consists "Skip_event_swallow_translator"
      \consists "Axis_group_engraver"

      pedalSustainStrings = #'("Ped." "*Ped." "*")
      pedalUnaCordaStrings = #'("una corda" "" "tre corde")
      \override DynamicLineSpanner #'Y-offset = #0
      \override TextScript #'font-size = #2
      \override TextScript #'font-shape = #'italic
      \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1)
    }
    % modify PianoStaff context to accept Dynamics context
    \context {
      \PianoStaff
      \accepts Dynamics
    }
  }
  \midi {
    \context {
      \Score
      tempoWholesPerMinute = #(ly:make-moment 110 4)
    }
  }
}