User:Tsester/Hamabe no Uta (Narita, Tamezō)

%version 0.2
\version "2.16.2"

\header {
  title = "浜辺の歌 Hamabe no Uta"
  subtitle = "(Song of the Seashore)"
  composer = "林 古渓 Hayashi Kokei lyrics"
  arranger = "Narita Tamezō music"
  copyright = "YOKOYAMA Shin-Itchiro‘s Sheet Music Library   http://shin-itchiro.seesaa.net/"
  tagline = "Creative Commons License Attribution 3.0 Unported"
}

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

global = {
  \key f \minor
  \numericTimeSignature
  \time 6/8
}

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

melody = \relative c' {
  \global
  % Music follows here.
  \repeat unfold 3{
    \break
  r4 r8 r4 ees8(\p|
  ees4 aes16 bes16 c4 bes16 aes|
  bes4 f8 aes4) g16\( f|
  \break
  ees4 aes8 c4 bes16 aes|
  bes4.( bes8)\) r8 ees,8(|
  ees4 aes16 bes c4 bes16 aes|
  bes4 f8 aes4) g16\p\( f|
  \break
  ees4 c'8 ees,4 bes'8|
  aes4.( aes8)\) r8 ees'8(|
  ees4 bes8 ees4 b8|
  ees4. c4) f8\(|
  \break
  f4 des8 aes4 bes8|
  ees4.( ees8)\) r8 ees,8\(|
  ees4 aes16 bes c4 bes16 aes|
  \break
  bes4 f8 aes4\) g16\( f|
  ees4 c'8 ees,4 bes'8|
  aes4.( aes8)\) r8 r8|
  r2.|
}
}

verse = \lyricmode {
  % Lyrics follow here.
  \repeat unfold 3{}
  \alternative{
  {
    \set ignoreMelismata = ##t
  \set stanza = "1."
  a -- shi -- ta __ _ ha  -- ma __ _ be __ _ o sa __ _ |
  ma __ _ yo -- e __ _ ba __ _ mu -- ka -- shi _ no ko __ _ to __ _ zo shi __ _ |
  no __ _ ba -- ru -- ru __ _ ka -- ze no o __ _ to yo ku __  |
  mo no sa -- ma yo __ _ yo -- su -- ru __ _ na __ _ _ |
  mi __ _ mo ka __ _ i no i -- ro mo __ _ |
  }
  {
  \set stanza = "2."
  yu -- u -- be _ ha -- ma __ _ be __ _ o mo __ _ |
  to __ _ o -- re __ _ ba __ _ mu -- ka -- shi _ no hi __ _ to __ _ zo shi __ _ |
  no __ _ ba -- ru -- ru __ _ yo -- su -- ru na __ _ mi yo ka __ |
  e -- su na -- mi yo __ _ tsu -- ki no __ _ i __ _ _  |
  ro __ _ mo ho __ _ shi no ka -- ge mo __ _ |
  }
  {  \set stanza = "3."
     ha -- ya -- chi __ _ ta -- chi __ _ ma __ _ chi na __ _ 
     mi _ o hu __ _ ki _ 
     
     a -- ka -- mo _ no su __ _ so _ zo _ nu -- re -- 
     mo hi -- ji -- shi _ ya -- 
     
     mi -- shi wa __ _ re wa su __ 
     de -- ni i -- e -- te _ 
     
     ha -- ma -- be _ no _ _ 
     ma -- sa -- go  _ ma na -- go i -- ma wa __ _
}}
}

right = \relative c' {
  \global
  % Music follows here.
  \repeat unfold 3{
  r8\p c16( ees aes8-.) r8 c,16( ees c'8)-.\<|
  <<{r8 c,16( ees aes8-.) r8 c,16( ees c'8-.)\>}
    {s16 s16 s8 s16 s16\!}>>|
  <<{r8 f,16( bes des8-.) r8 f,16( aes c8-.)}
    {s8 s8 s16 s16\!}>>|
  
  r8\< ees,16( aes c8-.)\! r8 ees,16( aes c8-.)\>|
  <<{r8 ees,16( g bes8-.)\! r8 ees,16( g ees'8-.)}
    {s4 s4 s8 s16 s16}
  >>|
  <<{r8\< c16( ees aes8-.) r8 c,16( ees aes8-.)}
    {s8 s8 s16 s16\! s4 s8|}
  >>
  r8\> f,16( bes des8-.) r8\! f,16( aes c8-.)\p|

  r8 aes16( c ees8-.) r8 g,16( bes ees8-.)\>|
  r8 aes,16( c aes'8-.) r8\! ees,16( c' ees8-.)|
  r8\< g,16( bes ees8-.)\! r8\< g,16( b ees8-.)\!|
  r8 aes,16( c ees8-.) r8 aes,16( c f8-.)\f|


  f4( des8 aes4 bes8|
  <<{<g ees'>4.)}{s4 s8 s16\> s16 s8 s16 s16\!\p}>>
  <<{r8\< c,16( ees aes8-.) r8 c16( ees aes8-.)}
    {s8 s8 s16 s16\! s8 s8 s8\>}>>|
  
  <<{r8 f,16( bes des8-.) r8 f16( aes c8-.)}
    {s4 s16 s16\!}>>|
  <<{r8 aes,16( c ees8-.) r8 g,16( bes <des ees>8-.)\(}
    {s4 s4 s8 s8\>}>>|
  <<{\stemUp <c ees>4 <c aes'>16 <des bes'> <ees c'>4 <des bes'>8\pp}
  {s8 s16 s16\!}>>|
  <c aes'>4. <ees aes>4.\fermata\) \bar "|." |
  }
}

left = \relative c {
  \global
  % Music follows here.
  \repeat unfold 3{
  <<{
    aes4. aes4. | aes4. aes4.	|des4. des4.	|

    c4. aes4.	|ees4. ees4.	| aes4. aes4.	| des4. des4.	|

    ees4. ees4.	|aes,4. aes4.	|ees4. ees4.	|aes4. aes4.	|
    }
    \\
    {
      aes16 ees'~ ees8( aes16 ees) aes,16 ees'~ ees8( aes16 ees)|
      aes,16 ees'~ ees8( aes16 ees) aes,16 ees'~ ees8( aes16 ees)|
      des16 des'~ des8( bes16 f) des16 c'~ c8( aes16 f)|

      c16 c'16~ c8( aes16 ees) aes, ees'~ ees8( aes16 ees)|
      ees,16 ees'~ ees8( des'16 ees,) ees,16 ees'~ ees8( des'16 ees,)|
      aes,16 ees'16~ ees8( aes16 ees) aes,16 ees'~ ees8( aes16 ees)|
      des16 des'~ des8( bes16 f) des c'~ c8( aes16\p f)

      ees16 ees'~ ees8( c16 aes) ees ees'~ ees8( bes16 ees,)|
      aes,16 ees'~ ees8( c'16 ees,) aes, ees'~ ees8( c'16 ees,)|
      ees,16 ees'~ ees4 ees,16 ees'~ ees4|
      aes,16 ees'~ ees4 aes,16 ees'~ ees4|
    }
    {s16\p s s8 s16 s s s s8 s16\< s|
     s16 s16 s8 s16 s16\! s16 s16 s8 s16\> s16|
    s16 s16 s8 s16 s16\! s16 s16 s8 s16 s16|
    
    s16\< s16 s8 s16\! s16 s16 s16 s8 s16\> s16|
    s4 s16\! s16 s4 s8|
    s16\< s s8 s16 s\! s s s8 s16 s|
    s16\> s s8 s16 s s\! s s8 s16 s|

    s16 s s8 s16 s s s s8 s16\> s16|
    s4 s8 s16\! s16 s4|
    s4\< s8\! s4\< s8\!|
    s4 s4 s8 s8\f|
    }
  >>
  des,16( aes' des f aes des) f\( des aes f des bes|
  ees, bes' ees g bes ees \change Staff = right g\> bes ees g bes ees\!\p\)\change Staff = left|
  <<\new Voice {\voiceOne aes,,,,4. aes4.	|des!4. des4.	|ees4. ees4.	|
    } \new Voice \voiceTwo
  {aes,16 d ees8( aes16 ees) aes, d! ees8( aes16 ees)|
   des16 bes' des8( bes16 f) des aes' c8( aes16 f)|
   ees16 ees'~ ees8( c16 aes) ees ees'~ ees8( bes16 ees,)|
  }
  {s4\< s16 s16\! s4 s8\>|
   s4 s16 s16\! s4 s8|
  s4 s4 s8 s16\> s16|}>>
  aes,16_(_[ ees' aes c\! \change Staff = right ees aes)] c_\(_[ aes ees \change Staff = left c bes^\pp ees,]|
  aes,16_[ ees' aes c \change Staff = right ees aes] c4._\fermata \) \change Staff = left|
  }
}

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

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

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