\version "2.19.0"
\language "english"


\header {
  % Remove default LilyPond tagline
  title = "The Rock"
  tagline = ##f
}
#(set-global-staff-size 19.0)
\paper {
  #(set-paper-size "letter")
}

 
global = {
  \key g \major
  \time 4/4
  \partial 4
  \tempo "Allegretto risoluto" 4=116
}

%soprano Solo
sopranoVoiceI =  {
  \global
  \dynamicUp
  r4  R1*6 %m00-06
  R1*3   r2^\markup"Soprano Solo"r4 g'8 a'8 |%m07-10 
  b'4. d'8~ d'4 b'8( a'8) | a'2 r4 a'8 b'8 |%m11-12
  c''4. c''8\tuplet 3/2 {c''4 b'4 a'4} |%m13

}

verseSopranoVoiceI = \lyricmode {
  縱 使 風 雲 色 變, 幻 變
 
}

%Tenor Solo
tenorVoiceI =  {
  \global
  \dynamicUp
  r4   R1*6 |%m00-06
  R1*3   r2^\markup"Tenor Solo" r4 g8 a8 |%m07-10 
  b4. b8~ b4 d'4 | d'2 r4 c'8 b8 |%m11-12
  a4. a8\tuplet 3/2 {a4b4c'4} |%m13
  b2 r4 b8 a8 |%m14

}

verseTenorVoiceI = \lyricmode {
  
}

%Soprano & Alto
sopranoVoiceII =   {
  \global
  \dynamicUp
  r4   R1*6 |%m00-06
  R1*7 %m07-13
  
  
}

verseSopranoVoiceII = \lyricmode {
  縱 使 風 雲 色 燮, 幻 變 中 主 基 督 看 顧, 縱 遇
 
}

%Men
tenorVoiceII =   { 
  \global
  \dynamicUp
  r4   R1*6 |%m00-06
  R1*7 %m07-13
  
}

verseTenorVoiceII = \lyricmode {
  %\repeat unfold 63 {" "}
  在 世 間 面 對 種 種 挑 戰, 或 會 嗟 歎 屡 戰 屡 敗. 作 主
 
}

%Unison Voice
bassVoice =   {
  \global \clef treble
  \dynamicUp
  r4   R1*6 |%m00-06
  R1*7 %m07-13
 
  
}

verseBassVoice = \lyricmode {
  Ooo 主 基 督 看 顧,   Ooo
 
}

right =  {
  \global
  g''8( a''8 | b''4. d''4 g''8 a''8 b''8 | a''2.) a''8( b''8 | %m00-02
  c'''4. e''4 c'''8 b''8 a''8 | b''2.) c'''8( d''' | %m03-04
  <e''' c''' g''>4. g''4 e'''8 d'''8 c'''8) |%m05 
  <d''' a'' fs''>8 d'''8 e'''8 <g'' d'' b'>4 e''8( g''8 b''8) |\break %m06
  <c''' g'' e'' c''>8([ b''8] g''8) q4 (b''8 g''8[) <c'''~g'' e'' c''>8 (] |%M07 
  q8[ b''8] g''8) q4( b''8 <g'' e'' c''>4) |%m08
  <g'' e'' d'' c''>1 |%m09
  <fs'' d'' a'>4 <e'' c'' g'>8 <d'' a' fs'>4. <c'' a' fs' d'>4 |%m10
  <b' a' g' d'>2 <d'' b' a' g' d'>2 |%m11
  <a' fs' d'>2 <d'' a' fs'>2 |\break %m12
  <c'' a' e'>2 <b' a' ds'>2 |%m13

  \label #'lastPage
}

left =   {
  \global
  r4 | \clef treble g8( d' g' a' b'2) |%m00-01
  fs8( d'8 e' a' d''2) |%m02
  a8( e'8 a' b' c''2) |%m03
  \clef bass e8( b8 e' fs' g'2) %m04
  c8( g8 c'8 d'8 e'2) |%m05
  <b fs b,>4. <d'b e>4. e4 |%m06
  a,8( e8 a8 b8 c'8 b8 a8 e8) |%m07
  d,8( a,8 d8 a8 c'4) <c' d>4 |%m08
  <c c,>8( g,8 c8 d8 e8 g8 c'8 g'8) |%m09
  d,8[( a,8] d8) <d d,>4 a,8 d8[ d,8] |%m10
  g,8( d8 g8 a8 b2) %m11
  g,8( d8 a8 fs8 d'2) |%m12
  fs,8( e8 a8 c'8 <a b,>2) %m13
  
 
}

sopranoVoiceIPart = \new Staff \with {
  instrumentName = "S. Solo"
  shortInstrumentName = \markup \center-column{"S." "sol"}
  midiInstrument = "choir aahs"
} { \sopranoVoiceI }
\addlyrics { \verseSopranoVoiceI }

tenorVoiceIPart = \new Staff \with {
  instrumentName = "T. Solo"
  shortInstrumentName = \markup \center-column{"T." "sol"}
  midiInstrument = "choir aahs"
} { \clef "treble_8" \tenorVoiceI }
\addlyrics { \verseTenorVoiceI }

sopranoVoiceIIPart = \new Staff \with {
  instrumentName = "S. & A."
  shortInstrumentName = "SA"
  midiInstrument = "choir aahs"
} { \sopranoVoiceII }
%\addlyrics { \verseSopranoVoiceII }

tenorVoiceIIPart = \new Staff \with {
  instrumentName = "Men"
  shortInstrumentName = "Men"
  midiInstrument = "choir aahs"
} { \clef "treble_8" \tenorVoiceII }
%\addlyrics { \verseTenorVoiceII }

bassVoicePart = \new Staff \with {
  instrumentName = "Unison"
  shortInstrumentName = "Uni"
  midiInstrument = "choir aahs"
} { \clef bass \bassVoice }
%\addlyrics { \verseBassVoice }

pianoPart = \new PianoStaff \with {
  instrumentName = "Pno."
  shortInstrumentName = "Pno."
} <<
  \new Staff = "right" \with {
    midiInstrument = "acoustic grand"
  } \right
  \new Staff = "left" \with {
    midiInstrument = "acoustic grand"
  } { \clef bass \left }
>>
% {
\score {
  <<
    \sopranoVoiceIPart
    \tenorVoiceIPart
    \sopranoVoiceIIPart
    \tenorVoiceIIPart
    \bassVoicePart
    \pianoPart
  >>
  \layout { }
  \midi { }
}
%}
% {

rehearsalMidi = #
(define-music-function
 (parser location name midiInstrument lyrics) (string? string? ly:music?)
 #{
   \unfoldRepeats <<
     \new Staff = "sopranoVoiceI" \new Voice = "sopranoVoiceI" { <>\f \sopranoVoiceI }
     \new Staff = "tenorVoiceI" \new Voice = "tenorVoiceI" { <>\f \tenorVoiceI }
     \new Staff = "sopranoVoiceII" \new Voice = "sopranoVoiceII" { <>\f \sopranoVoiceI  }
     \new Staff = "tenorVoiceII" \new Voice = "tenorVoiceII" { <>\f \tenorVoiceI  }
     \new Staff = "bassVoice" \new Voice = "bassVoice" { <>\f \tenorVoiceI }
     \context Staff = $name {
       \set Score.midiMinimumVolume = #0.5
       \set Score.midiMaximumVolume = #0.5
       \set Score.tempoWholesPerMinute = #(ly:make-moment 116 4)
       \set Staff.midiMinimumVolume = #0.8
       \set Staff.midiMaximumVolume = #1.0
       \set Staff.midiInstrument = $midiInstrument
     }
     \new Lyrics \with {
       alignBelowContext = $name
     } \lyricsto $name $lyrics
   >>
 #})

% { Rehearsal MIDI files:
\book {
  \bookOutputSuffix "sopranoVoiceI"
  \score {
    \rehearsalMidi "sopranoVoiceI" "soprano sax" \sopranoVoiceI
    \midi { }
  }
}

\book {
  \bookOutputSuffix "tenorVoiceI"
  \score {
    \rehearsalMidi "tenorVoiceI" "soprano sax" \tenorVoiceI
    \midi { }
  }
}

\book {
  \bookOutputSuffix "sopranoVoiceII"
  \score {
    \rehearsalMidi "sopranoVoiceII" "soprano sax" \sopranoVoiceI 
    \midi { }
  }
}

\book {
  \bookOutputSuffix "tenorVoiceII"
  \score {
    \rehearsalMidi "tenorVoiceII" "soprano sax" \tenorVoiceI 
    \midi { }
  }
}

\book {
  \bookOutputSuffix "bassVoice"
  \score {
    \rehearsalMidi "bassVoice" "soprano sax" \tenorVoiceI
    \midi { }
  }
}


%}