\version "2.17.24"
\language "english"

 
 
 
  
 #(set-global-staff-size 18)
\header {
  title = "何 等 寶 貴 聖 名"
  subtitle = "How Beautiful Your Name"
  poet = "葉桭邦 詞"
  composer = "Pepper Choplin"
   % Remove default LilyPond tagline
  tagline = ##f
}

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

%\include "include_lyndon-specific.ly"

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
global = {
  \key g \major
  \numericTimeSignature \time 4/4
  %\partial 8
  \tempo "With quiet joy" 4=78
}


soprano =  \relative c'' {  \global
                            
  
  d4. d8 c4 b4 | b8 c8 g2. | r8^\f g8 c8 b8 g4 a4 |\break %m41-43
  b1 | r8^\mf g8 c8 b8 g4 a4 | d2.^\> r4 g,2.^\mp^\!^\markup"rit." g4 |\break %m44-47
%{  c4 b4 g4 a4 | b1~^\p^\> | b1 | r2.^\pp^\! r8  \bar"|."  %}
  \label #'lastPage
}

alto = \relative c'' {  \global

  f4. f8 f4 f4 | e8 e8 e2. | r8 g8 c8 b8 g4 a4 |\break %m41-43
  b1^\markup"     dim." | r8 g8 c8 b8 g4 g4 | g2. r4 | ef2. ef4 |\break %m44-47
%{  ef4 ef4 ef4 f4 | g1~ | g1 | r2. r8   %}
}

tenor = \relative c'{  \global
 
  c4. c8 c4 d4 | c8 c8 c2. | r8 g8 c8 b8 g4 a4 | %m41-43
  b1 | r8 g8 c8 b8 g4 a4 | b2. r4 c2. b4 | %m44-47
%{  a4 g4 g4 ef4 | d1~ | d1 | r2. r8 %m48-51            %}
}

bass = \relative c' {   \global 
 
  a4. a8 g4 g4 | c,8 c8 c2. | r8 g'8 c8 b8 g4 a4 | %m41-43
  b1 | r8 g8 c8 b8 g4 g4 | g2. r4 | g2. g4 | %m44-47
%{  g,4 g4 g4 g4 | g1~ | g1 | r2. r8   %m48-51                 %}
}

verseOne = \lyricmode {  
  %\set stanza = "一"
  滿  有
  尊  貴, 滿  有  光  輝, 耶  穌  於  我  是  活  水  源,
  何  等  寶  貴  聖  名.  滿  有  名.  何  等  寶  貴  尊
}

verseTwo = \lyricmode {
  % \set stanza = "二"
  " "   " " 恩  惠, 滿  有  愛  心, 慈  聲  堪  慰  藉  我  心  靈,
}

verseThree = \lyricmode {
  %\set stanza = "1."
  Bless -- ed  
  Je -- sus, bless -- ed Je -- sus, the foun -- tain of e -- ter -- nal life;  
  How beau -- ti -- ful Your name.  Gen -- tle name.  How beau -- ti -- ful Your
}

verseFour = \lyricmode {
  %\set stanza = "2."
  " "   " " 
  Shep -- herd. Gen -- tle Shep -- herd, the sound can calm all fear and strife;
}

verseAlto = \lyricmode {
  %\set stanza = "2."
  \repeat unfold 121 { " " }
  Al -- le -- lu -- ia,  al -- le -- lu -- ia.
}

verseTenor = \lyricmode {
  %\set stanza = "2."
  \repeat unfold 69 { " " }
  滿 有 能 力, 神
}

verseBass = \lyricmode {
  %\set stanza = "2."
  \repeat unfold 69 { " " }
  Great Mes -- si -- ah, the
  %\repeat unfold 40 { " " }
  \repeat unfold 200 { " " }  
}


rehearsalMidi = #
(define-music-function
 (parser location name midiInstrument lyrics) (string? string? ly:music?)
 #{
   \unfoldRepeats <<
     \new Staff = "soprano" \new Voice = "soprano" { s1*0\f \soprano }
     \new Staff = "alto" \new Voice = "alto" { s1*0\f \alto }
     \new Staff = "tenor" \new Voice = "tenor" { s1*0\f \tenor }
     \new Staff = "bass" \new Voice = "bass" { s1*0\f \bass }
     \context Staff = $name {
       \set Score.midiMinimumVolume = #0.5
       \set Score.midiMaximumVolume = #0.5
       \set Score.tempoWholesPerMinute = #(ly:make-moment 78 4)
       \set Staff.midiMinimumVolume = #0.8
       \set Staff.midiMaximumVolume = #1.0
       \set Staff.midiInstrument = $midiInstrument
     }
     \new Lyrics \with {
       alignBelowContext = $name
     } \lyricsto $name $lyrics
   >>
 #})

right = \relative c'' {
  \global

  <d' a f d>4 <c a f c>4 q4 <b f d> | %m41
  <<{b8 c8 <g e>4~ q8 g16 a16 b8 g8}\\{<g e>4 s2 e4}>> | %m42
  <g ef c>4 <c g ef>4 <g e>8 c,8 <a' e c>4 | %m43
  <b g d>2~ q8 d,8 g8 b8 | %m44
  <g ef c>4 <c g ef>4 <g ef>8 c,8~ <a' ef c>4 | %m45
  <<{s2 d8 b8 a8 g8}\\{<d' b g>2 g,4 d4}>> %m46
  <g c,>4 q2 q4 | %m47
%{  <<{c4 b4 <g e>4 <a f>4}\\{<g ef>2 c,2}>> | %m48
  <<{b'1}\\{<g b,>4 q2 <d b>4}>> |%m49
  <d b g>4 q2 <b g>4 |%m50
  q2. r8 %m51     %}
}

dynamics = {

  s1*3 |%M41-43
  s4 s2.-\markup"dim."   s1\mf    s2\> s8 s8\! s4     s8\mp s8-\markup"rit." s2. |%M44-47
%{  s1-\markup"dim."    s2.\p s4\>    s2 s8 s8\! s4\pp     s2. s8   %M48-51  %}
}

left = \relative c' {
  \global

  d4. g8 g4. g8 |%m41
  c,8 g' e' g c4 c, |%m42
  c,4. c8 c'2 |%m43
  g8 d' g a b2 |%m44
  <ef, g,>4. g,8 g2 |%m45
  g8 d' g a b2 |%m46
  <ef, g,>4 q2 q4 |%m47
%{  <<{a4 g g ef}\\{g,2 g2}>> |%m48
  <d' g,>4 q2 q4 |%m49
  q4 q2 q4 |%m50
  q2. r8 %m51       %} 
}

choirPart = <<
  \new ChoirStaff <<
    \new Staff \with {  

    } <<
      \new Voice = "soprano"   { \voiceOne \soprano }
      \new Voice = "alto" { \voiceTwo \alto }
    >>
    \new Lyrics \with {
      \override VerticalAxisGroup #'staff-affinity = #CENTER
    } \lyricsto "soprano" \verseOne
    \new Lyrics \with {
      \override VerticalAxisGroup #'staff-affinity = #CENTER
    } \lyricsto "soprano" \verseTwo
    \new Lyrics \with {
      \override VerticalAxisGroup #'staff-affinity = #CENTER
    } \lyricsto "soprano" \verseThree
    \new Lyrics \with {
      \override VerticalAxisGroup #'staff-affinity = #CENTER
    } \lyricsto "soprano" \verseFour
    \new Lyrics \with {
      \override VerticalAxisGroup #'staff-affinity = #CENTER
    } \lyricsto "alto" \verseAlto   
    \new Staff \with {   

    } <<
      \clef bass
      \new Voice = "tenor" { \voiceOne \tenor }
      \new Voice = "bass"   { \voiceTwo \bass }
    >>

  >>
   
>>

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

\score { 
  <<
    \choirPart
    \pianoPart
  >> 
  \layout { indent = 0 
       \context {
          \Voice
          \override TextScript.color = #magenta
          \override Glissando.thickness = #1.5
       }
  }
  \midi { }
}
% {
% Rehearsal MIDI files:
\book {
  \bookOutputSuffix "soprano"
  \score {
    \rehearsalMidi "soprano" "soprano sax" \verseOne
    \midi { }
  }
}

\book {
  \bookOutputSuffix "alto"
  \score {
    \rehearsalMidi "alto" "soprano sax" \verseOne
    \midi { }
  }
}

\book {
  \bookOutputSuffix "tenor"
  \score {
    \rehearsalMidi "tenor" "tenor sax" \verseOne
    \midi { }
  }
}

\book {
  \bookOutputSuffix "bass"
  \score {  
    \rehearsalMidi "bass" "tenor sax" \verseOne  
    \midi { }
    \layout { }
  }
}

%}