User:Tsester/Jōgashima no Ame (Yanada, Tadashi)

%version 0.4
\version "2.16.2"

\header {
  title = "城ヶ島の雨 Jōgashima no Ame"
  subtitle = "(The Rain on Jogashima Island)"
  composer = "北原 白秋 Kitahara Hakushū lyrics"
  arranger = "Yamada Tadashi music"
}

\paper {
  #(set-paper-size "a4")
}

global = {
  \key c \minor
  \numericTimeSignature
  \time 3/4
%  \tempo "lentamente"
}

right = \relative c' {
  \global
  % Music follows here.
  r4\p <g c ees g>2-\arpeggio |
  r4 <g c ees g>2-\arpeggio |
  \repeat unfold 2{
    r4\p <g c ees g>2-\arpeggio |
    r4 <g c ees g>2-\arpeggio |
    r4 <g c ees g>2-\arpeggio |
    r4 <g c ees g>2-\arpeggio |
    r4 <c d aes'>8.\arpeggio\< <d f c'>16 <f aes d>4~ |
    <f aes d>8. <f f'>16\! <g g'>2 |
  }
  \alternative {
    {
      r4\mf <c, ees g>4\arpeggio\> <c ees aes>4\arpeggio|
      r4 <c ees g>2\arpeggio\!|
      <<{\voiceOne r4 <c ees f>4\arpeggio\> <b g'>4} \new Voice {\voiceTwo s4 s4 ees8. d16}>>|
      <<{<c ees g>4_( <c ees g c>4)\p\! r4|} {}>>
    }
    {
      r4\mf <c ees g>4\arpeggio\> <c ees aes>\arpeggio |
      <c ees f>\! <c ees g> <bes cis ees g>|
      <<{<c! f a>2\arpeggio <b g'>4} {a2 \times 2/3 {ees'4 d8}}>>
      <c ees g>4_( <c ees g c>) r4 \bar "||" |
    }
  }
  \key c \major
  r4\mf <e! g a! c>2\arpeggio|
  r4 <e g a c>2\arpeggio|
  r4 <e g a c>2\arpeggio|
  r4 <f g d'>2\arpeggio|
  r4 <ees g c>2\arpeggio\<|
  r4 <ees f c'>4\arpeggio\! <d f g b>8 r8|
  r4\f <e g a c>2\arpeggio|
  r4 <e g a c>2\arpeggio|
  r4 <f g d'>2\arpeggio\fermata|
  r4 <c e g c>2\arpeggio\>|
  <<{r4 <e g a c>2\arpeggio} { s4 s4 s4\!}>>
  r4\mp\< <e g a c>2\arpeggio |
  <<{r4 <e g a c>2\arpeggio}{s2 s4\!}>>|
  r4 <e g a c>2\arpeggio|
  <<{r4 <d a' c>8\arpeggio r8 <d f g b>8\arpeggio r8} {s4\< s4 s8 s8\!}>>|
  <<{\voiceOne r4 <e g a>2\arpeggio\>} \new Voice {\voiceTwo r4 \times 2/3 {c'8 e d} \times 2/3 {c g a}}>>|
  <<{r4 <c, dis fis a>2\arpeggio\!}  {}>>|
  r4 <c ees g>2|
  r4 <c ees g>2| \bar "||"
  \key c \minor
  r4\p <g c ees g>2\arpeggio|
  r4 <g c ees g>2\arpeggio|
  r4 <g c ees g>2\arpeggio|
  r4 <g c ees g>2\arpeggio|
  r4 <c d aes'>8.\< <d f c'>16 <f aes d>4~|
  <f aes d>8. <f f'>16\! <g g'>2|
  r4\mf <c, ees g>4\arpeggio\> <c ees aes>\arpeggio|
  r4 <c ees g>\arpeggio <bes ees g>\arpeggio\!|
  <<{\voiceOne <c d a'>8.\> g'16  <c, ees g>4-"rit." <b d g>4(} \new Voice {\voiceTwo s4 s4 d8. c16}>>|
  <<{<c ees g>4)_( <c ees g c>)\! r4}{}>>
}

left = \relative c {
  \global
  % Music follows here.
  <c, c'>2\p( \acciaccatura f8 g4)|
  <c, c'>2( \acciaccatura f8 g4)|
  \repeat unfold 2 {
    <c, c'>2\p( \acciaccatura f8 g4)|
    <c, c'>2( \acciaccatura f8 g4)|
    <c, c'>2( \acciaccatura f8 g4)|
    <c, c'>2( \acciaccatura f8 g4)|
    <<{<d d'>2 f4} { s4 s8\< s8}>>|
    <<{<g g,>2( \change Staff=right <d'' f g>4) \change Staff=left \bar "||"}{s8. s16\! s4}>>
  }
  \alternative {
    {
      <<{<c,, c'>2(\mf f4)}{s4 s8\> s8 s4}>> |
      <<{<c c'>2( \acciaccatura f8 g4)}{s4 s2\!}>>|
      <<{aes2 g4}{s4 s8\> s8 s4}>>|
      c,8.( g'16 c8)\p\! r8 \acciaccatura f,8 g4|
    }
    {
      <<{<c, c'>2(\mf f4)}{s4 s8\> s8 s4}>> |
      aes4(\! c4 <ees, ees'>4)|
      <d d'>4( <f f'> <g g'>)|
      c,8.( g'16 c8) r8 \acciaccatura f,8 g4 \bar "||" |
    }
  }
  \key c \major
  <c, c'>2\mf( \acciaccatura e!8 g4)|
  <c, c'>2( \acciaccatura e8 g4)|
  <c, c'>2( \acciaccatura e8 g4)|
  <d d'>2( \acciaccatura f8 g4)|
  <<{<c, c'>2_( \acciaccatura ees'8 g4)}{s4 s2\<}>>|
  <<{<aes, aes'>2 <g g'>8 r8}{s4 s8\! s8 s4}>>|
  <c, c'>2(\f \acciaccatura e8 g4)|
  <c, c'>2( \acciaccatura e8 g4)|
  r4 <g g'>2_\fermata\arpeggio|
  r4 <a e' a>2\>\arpeggio|
  r4 <c g' c>4\arpeggio \acciaccatura f,8 g4\!|
  <c, c'>2\<(\mp \acciaccatura e8 g4)|
  <c, c'>2( \acciaccatura e8 g4)\!|
  <c, c'>2( \acciaccatura e8 g4)|
  <c, c'>4\< <f f'>8 r8 <g g'>8 r8\!|
  <<{<c, c'>2( \acciaccatura e8 g4)}{s4 s8\> s8 s4}>>|
  <<{<d c'>2( \acciaccatura e8 g4)}{s4 s4\! s8 s8}>>|
  <c, c'>2( \acciaccatura f8 g4)|
  <c, c'>2( \acciaccatura f8 g4)|
  \key c \minor
  <c, c'>2(\p \acciaccatura f8 g4)|
  <c, c'>2( \acciaccatura f8 g4)|
  <c, c'>2( \acciaccatura f8 g4)|
  <c, c'>2( \acciaccatura f8 g4)|
  <<{<d d'>2 f4}{s4 s4\< s4}>>|
  <<{<g, g'>2( \change Staff = right <d''' f g>4) \change Staff = left}{s8. s16\! s4 s4}>>|
  <<{<c,, c'>2\mf f4}{s4 s8\> s4.}>> |
  <c c'>2 <cis cis'>4\!|
  <d d'>4\> <g g'>-"rit." <g, g'>4|
  c8. g'16 c8\! r8 r4|
  \bar "|."
}

chordNames = \chordmode {
  \global
  % Chords follow here.

}

melody = \relative c'' {
  \global
  % Music follows here.
  \tempo 4 = 55
  r2. |
  r2. |
  \repeat unfold 2{
    g2-\p \times 2/3 { ees8 c4(} |
    c2) \times 2/3 {ees8 c ees16 d}|
    \break
    c2 r4|
    g'4. ees8 \times 2/3 {g8 c8 ees}|
    d8.^\< c16 d2(|
    d2)\! r8 ees8|
    \break
  }
  \alternative {
    {
      c4.\mf^\> d8 \times 2/3 {aes4 c8-\!}|
      g2 r8 aes8|
      <<{ees4. c8 ees8. d16} {s8 s8^\> s4 s4}>>|
      g2\p\! r4|
      \break
    }
    {
      c4.-\mf^\> d8 \times 2/3 { aes4 c8-\! }|
      \times 2/3 {f,4 aes8} g4 r8 bes8|
      a4. g8 \times 2/3 { ees4 d8}|
      ees2 r4 \bar "||" |
      \break
    }
  }
  \key c \major
  g4-\mf \times 2/3 {a! g8} \times 2/3 {e! c c'}|
  g2 \times 2/3 {g8. c16 d8}|
  e4. c8 \times 2/3 {f8 e c}|
  g2 r4|
  \break
  g4-\mp^\< \times 2/3 {aes g8} \times 2/3 {c8 g8 ees'}|
  c2-\! \times 2/3 {d8\upbow c d}|
  e!2-\f r8 e,8|
  %  <<{g2 r4} {s4 s4 s8 \slashedGrace c8(}>>|
  g2 r4 \acciaccatura c8|
  \afterGrace d2.-\fermata {c16[ d]}|
  \break
  \appoggiatura {e16[ f]} e4.(^\> d16 c) \times 2/3 {a8 g a-\!}|
  c2 r4|
  \times 2/3 {c,4-\mp^\< d8} \times 2/3 {e8 c a'} \times 2/3 {g8 e c'}|
  g2-\! r4|
  g4 \times 2/3 {a g8} \times 2/3 {e8 c c'}|
  \break
  g4^\< \times 2/3 {a8\upbow g a} \times 2/3 {b g\! e'}|
  c2.(|
  c2) r4|
  r2.|
  r2.|
  \break
  \key c \minor g2-\p \times 2/3 {ees!8 c4(}|
  c2) \times 2/3 {ees8 c ees16 d}|
  c2 r4|
  g'4.^\< ees8 \times 2/3 {g8 c ees}|
  <<{d8. c16 d2(} {s4 s4 s8 s8\!}>>|
  \break
  d2) r8 d16-\mf ees^\>|
  c4. d8 \times 2/3 {f,4 aes8}|
  g2-\! r8 bes8|
  <<{a8.^\> g16 ees4-"rit." d8. c16}{\tempo 4 = 52 s8 \tempo 4 = 50 s8 \tempo 4 = 48 s8\tempo 4 = 46 s8\tempo 4 = 44 s8\tempo 4 = 41 s8\tempo 4 = 39}>>|
  <<{c2-\! r4}{s8 \tempo 4 = 37 s8 \tempo 4 =  35 s8 \tempo 4 = 33 s8 \tempo 4 =  30 s8 \tempo 4 = 28 s8 \tempo 4 = 26  }>>|
  \break
}

verseOne = \lyricmode {
  \set stanza = "1."
  % Lyrics follow here.
  \repeat unfold 2 {}
  \alternative {
    {
      \set stanza = "1."
      a -- me wa __ |
      fu -- ru fu __ _ |
      ru |
      jo -- ga -- shi -- ma no |
      i -- so ni __ |
      ri -- |
      kyu -- ne -- zu -- mi |
      no a -- |
      me ga fu __ _ |
      ru |
    }
    {
      \set stanza = "2."
      a -- me wa __ |
      shi -- n -- ju __ _ |
      ka |
      yo -- a -- ke __ _ no |
      ki -- ri ka __ |
      so -- |
      re -- to -- mo wa -- |
      ta -- shi no shi -- |
      no -- _ bi -- na -- |
      ki |
    }
  }
  fu -- ne wa yu -- ku yu -- |
  ku to -- o -- ri -- |
  ya no ha __ _ na |
  o |
  nu -- re -- te ho -- a -- ge -- |
  ta nu __ _ shi |
  no fu -- |
  ne |
  \set includeGraceNotes = ##t
  \set ignoreMelismata = ##t
  e __  _ _ |
  fu ne wa __ _ _ ro de ya -- |
  \set includeGraceNotes = ##f
  \set ignoreMelismata = ##f
  ru |
  ro wa u -- _ ta de _ ya -- |
  ru |
  u -- ta wa sen doo san |
  no ko -- _ ko -- ro -- _ i -- |
  ki __ |
  a -- me wa __ |
  fu -- ru fu -- _ |
  ru |
  hi wa u -- _ su -- |
  gu -- mo -- ru __ |
  fu -- ne |
  wa yu -- ku yu -- |
  ku ho |
  ga __ _ ka -- su __ _ |
  mu |
}

pianoPart = \new PianoStaff \with {
  instrumentName = "Piano"
} <<
  \new Staff = "right" \with {
    midiInstrument = "acoustic grand"
  } \right
  \new Staff = "left" \with {
    midiInstrument = "acoustic grand"
  } { \clef bass \left }
>>

leadSheetPart = <<
  \new ChordNames \chordNames
  \new Staff \with {
    midiInstrument = "trumpet"
  } {\melody }
  \addlyrics { \verseOne }
>>

\score {
  <<
    \leadSheetPart
    \pianoPart
  >>
  \layout { }
  \midi {
    \context {
      \Score
      tempoWholesPerMinute = #(ly:make-moment 100 4)
    }
  }
}