1 %% 11:08 PM Tuesday, July 4, 2023
   2 %% Yukio Yoshida.
   3 %% If you want to change of color, then do see! in "define-grobs.scm"(lilypond's system file)
   4 \version "2.24.0"
   5 %% This is system-files and for midi`s effect
   6 \include "articulate.ly" %% But here isn't use.
   7 %%%%% See----> midi block
   8 %% for sheet-music
   9 #(set-default-paper-size "letter")
  10 #(set-global-staff-size 18)
  11 
  12 %% 45-49 refer
  13 %% warning: this Voice needs a \voiceXx or \shiftXx setting
  14 %%  in [Collision resolution], page 205).natation.pdf(ver2.24.0)
  15 voiceFive = #(context-spec-music (make-voice-props-set 4) 'Voice)
  16 
  17 mf = #(make-dynamic-script "mf")
  18 VoiceColorBlue = {
  19                    \override Staff.StaffSymbol.color = #blue
  20                    \override Staff.LedgerLineSpanner.color = #blue
  21                    \override Staff.Clef.color = #blue
  22                    \override Staff.TimeSignature.color = #blue
  23                    \override Staff.KeySignature.color = #blue
  24                    \override Staff.BarLine.color = #blue
  25                    \override Voice.NoteHead.color = #blue
  26                    \override Voice.Rest.color = #blue
  27                    \override Voice.Stem.color = #blue
  28                    \override Voice.Flag.color = #blue
  29                    \override Voice.Beam.color = #blue
  30                    \override Voice.Slur.color = #blue
  31                    \override Voice.PhrasingSlur.color = #blue
  32                    \override Voice.Tie.color = #blue
  33                    \override Voice.Dots.color = #blue
  34                    \override Voice.Script.color = #blue
  35                    \override Voice.Accidental.color = #blue
  36                    \override Voice.DynamicLineSpanner.color = #blue
  37                    \override Voice.DynamicText.color = #blue
  38                    \override Voice.DynamicTextSpanner.color = #blue
  39                    \override Voice.TupletNumber.color = #blue
  40                    \override Voice.TupletBracket.color = #blue
  41                    \override Voice.BreathingSign.color = #blue
  42 }
  43 VoiceColorBlueRevert = {
  44                    \revert Voice.NoteHead.color
  45                    \revert Voice.Rest.color
  46                    \revert Voice.Stem.color
  47                    \revert Voice.Flag.color
  48                    \revert Voice.Beam.color
  49                    \revert Voice.Slur.color
  50                    \revert Voice.PhrasingSlur.color
  51                    \revert Voice.Tie.color
  52                    \revert Voice.Dots.color
  53                    \revert Voice.Script.color
  54                    \revert Voice.Accidental.color
  55                    \revert Voice.DynamicLineSpanner.color
  56                    \revert Voice.DynamicTextSpanner.color
  57                    \revert Voice.DynamicText.color
  58                    \revert Voice.TupletNumber.color
  59                    \revert Voice.TupletBracket.color
  60                    \revert Voice.BreathingSign.color
  61 }
  62 
  63 BlueRest = { \override Voice.Rest.color = #blue
  64              \override Voice.Dots.color = #blue }
  65 BlueOff = { \revert Voice.Rest.color
  66             \revert Voice.Dots.color }
  67 
  68 AddChorus = {
  69                    \override Staff.StaffSymbol.color = #red
  70                    \override Staff.LedgerLineSpanner.color = #red
  71                    \override Staff.Clef.color = #red
  72                    \override Staff.TimeSignature.color = #red
  73                    \override Staff.KeySignature.color = #red
  74                    \override Staff.BarLine.color = #red
  75                    \override Voice.NoteHead.color = #red
  76                    \override Voice.Rest.color = #red
  77                    \override Voice.Stem.color = #red
  78                    \override Voice.Flag.color = #red
  79                    \override Voice.Beam.color = #red
  80                    \override Voice.Slur.color = #red
  81                    \override Voice.PhrasingSlur.color = #red
  82                    \override Voice.Tie.color = #red
  83                    \override Voice.Dots.color = #red
  84                    \override Voice.Script.color = #red
  85                    \override Voice.Accidental.color = #red
  86                    \override Voice.TupletNumber.color = #red
  87                    \override Voice.TupletBracket.color = #red
  88                    \override Voice.BreathingSign.color = #red
  89 }
  90 
  91 \paper {
  92         %% ragged-last-bottom = ##f
  93 }
  94 
  95 \header {
  96  dedication = \markup { \center-column { "  " "  " "  " "The Story of A Lady" } }
  97  title = \markup{ \line { \italic \huge "My son?! Oh, God! I belive you!"} }
  98  subtitle = \markup{ \center-column {\italic "g major; c d e fis g a b" } }
  99  %% subsubtitle = #(string-append "LilyPond version " (lilypond-version))
 100  subsubtitle = \markup{\center-column {
 101                    \italic "mezzosoprano; C clef on 2nd line,"
 102 %%                   "soprano; C clef on 1st line,       alto; C clef on 3rd line."
 103 %%                   "       bass; F clef on 4th line,    tenor; C clef on 4th line."}}
 104   \line { soprano; C clef on 1st line,\hspace #4 alto; C clef on 3rd line.}
 105   \line { \hspace #2 bass; F clef on 4th line,\hspace #4 %%
 106                           tenor; C clef on 4th\with-color #blue "(& Solo;Vocal)" } } }
 107  composer = \markup{ \line {\italic "Yukio Yoshida"}}
 108  arranger = "April 30, 2014"
 109  poet = ""
 110  opus = "Op.80"
 111  meter = " Vocal Message "
 112  copyright = "public Domain"
 113  %% tagline = " "
 114 }
 115 
 116 %%%%%%%%% ! Revert mezzosoprano part %%%%%%%%%%%%%%%%%%%%%
 117 mezzosoprano = {
 118     \autoBeamOff
 119    \partial 2 r2 |
 120 %% 1-4
 121 
 122 }%% end mezzospprano sheet
 123 
 124 mezzosopranoL = \lyricmode {
 125     \override Lyrics.LyricText.color = #blue
 126     \override Lyrics.LyricHyphen.color = #blue
 127     \override Lyrics.LyricExtender.color = #blue
 128     \override Score.LyricText.font-shape = #'italic
 129     \tiny
 130 
 131 }
 132 
 133 mezzosopranoM = {
 134     \autoBeamOff
 135    \partial 2 r2 |
 136 %% 1-4
 137 
 138 }%% end mezzosoprano-midi
 139 %%%%%%% End Revert Part %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 140 
 141 %%%%%%%%% soprano part %%%%%%%%%%%%%%%%%%%%%
 142 sopranoVoice = {
 143     \autoBeamOff
 144    \partial 2 r2 |
 145 %% 1-4(repeat;1-7)
 146    \repeat volta 2 { g'2^\markup { \hspace #-5 \with-color #red \italic
 147                                           "Start is from Repeat Part" }
 148                          r4. a'2 g'8 | g'2 r2 f'2 | a'2 \tweak Accidental.color #red bis' c'' | }
 149       \alternative { { r1. | \break }
 150 %% 5-9
 151    { a'4. \tweak Accidental.color #red bis'8 c''2. r4 } } |
 152    c''1.^\dim\melisma | b'1. | \noBreak e''1. | e''2 * 2/3 s2 * 1/3\!\melismaEnd r1 | \break
 153 %% 10-13
 154    r1. | r1. | r1. | r1. | \break
 155    %% \repeat percent 4 { r1. } \break
 156 %% 14
 157    \time 4/1
 158    b'4 c''4 c''8 d''4. d''8 e''2.. r\breve | \break
 159 %% 15-18
 160    \time 3/2
 161    r1. | r1. | r1. | r1. | \break
 162 %% 19-22
 163    r1. | r1. | r1. | r1. | \break
 164 %% 23-26
 165    g''1^\pp^\dim\melisma fis''2 | a''1. | g''1 fis''2 | a''1. | \break
 166 %% 27-30
 167    fis''1 a''2 | g''1. | fis''1. | e''1 * 3/4 s1 * 1/4 r2^\ppppp\!\melismaEnd | \break
 168 %% 31-34
 169    r1. | r1. | r1. | r1. | \break
 170 %% 35-38
 171    r1. | r1. | r1. | r1. | \break
 172 %% 39-42
 173    r1. | r1. | r1. | r1. | \break
 174 %% 43-46
 175    r1. | r1. | r1. | r1. | \break
 176 %% 47-50
 177    r2^\markup { \hspace #-6 \teeny \with-color #blue \italic "Only; Voice group song"
 178                                    \teeny "(for 47bar ~ 50bar)" }
 179    b'4 b'8 c''4 r8 fis'4 | fis'8 g'4 r8 b'8 c''4. g'8 b'4. |
 180    r8 fis'8 g'4. d'8 fis'2 r8 a'8 | g'8 d''2..^\fermata r2^\fermata | \break
 181 %% End.
 182 }
 183 
 184 sopranoVoiceL = \lyricmode {
 185     \override Lyrics.LyricText.color = #blue
 186     \override Lyrics.LyricHyphen.color = #blue
 187     \override Lyrics.LyricExtender.color = #blue
 188     \override Score.LyricText.font-shape = #'italic
 189     \teeny
 190 King! King of Kings.
 191 "Right now," "your child" was born.
 192 "Your baby" is "a boy!"
 193 m __
 194 Is it the voice of happiness?
 195 %% Is it the voice of fear?
 196 ə __
 197 Let's and listen! Let's and listen!
 198 The words "of the" king, the words "of the" king in the kingdom.
 199 }
 200 
 201 sopranoVoiceM = {
 202     \autoBeamOff
 203    \partial 2 r2 |
 204 %% 1-4(repeat;1-7)
 205    r1. | r1. | r1. | r1  r2 | g'2 r4. a'2 g'8 | g'2 r2 f'2 | a'2 bis' c'' | \break
 206 %% 5-9
 207    a'4. bis'8 c''2. r4 | c''1.^\pp\melisma | b'1.^\ppp | \noBreak e''1.^\pppp |
 208    e''2^\ppppp\melismaEnd r1 | \break
 209 %% 10-13
 210    r1. | r1. | r1. | r1. | \break
 211 %% 14
 212    \time 4/1
 213    b'4^\mf c''4 c''8 d''4. d''8 e''2.. r\breve | \break
 214 %% 15-18
 215    \time 3/2
 216    r1. | r1. | r1. | r1. | \break
 217 %% 19-22
 218    r1. | r1. | r1. | r1. | \break
 219 %% 23-26
 220    g''1^\pp fis''2 | a''1. | g''1^\ppp fis''2 | a''1. | \break
 221 %% 27-30
 222    fis''1 a''2^\pppp | g''1. | fis''1. | e''1^\ppppp r2 | \break
 223 %% 31-34
 224    r1. | r1. | r1. | r1. | \break
 225 %% 35-38
 226    r1. | r1. | r1. | r1. | \break
 227 %% 39-42
 228    r1. | r1. | r1. | r1. | \break
 229 %% 43-46
 230    r1. | r1. | r1. | r1. | \break
 231 %% 47-50
 232    r2 b'4 b'8 c''4 r8 fis'4 | fis'8 g'4 r8 b'8 c''4. g'8 b'4. |
 233    r8 fis'8 g'4. d'8 fis'2 r8 a'8 | g'8 d''2..^\fermata r2^\fermata | \break
 234 %% End.
 235 }
 236 
 237 %%% Instruments part
 238 soprano = {
 239     \autoBeamOff
 240    \partial 2 r2^\markup { \hspace #-6 \column { \tiny \bold  \italic "Only; Instruments" "  " } } |
 241 %% 1-4
 242    \repeat volta 2 { e''1.^\< | d'' | c'' | }
 243       \alternative { { d''1 * 3/4 s1 * 1/4\! r2 | \break }
 244 %% 5-9
 245    { d''1^\> c''2 ~ } } | c''1. | b'1. | \noBreak e''1. * 3/4 r1. * 1/4\! | r1. | \break
 246 %% 10-13
 247    fis'2^\markup { \musicglyph #"p" } g'8[ a'] b'2. | c''2. b'8[ a'] g'2 ~ |
 248    g'2 a'8[ b'] c''2. | \pitchedTrill e''1 \startTrillSpan fis'' fis''2\stopTrillSpan ~ | \break
 249 %% 14
 250    \time 4/1
 251    fis''\breve r\breve | \break
 252 %% 15-18
 253    \time 3/2
 254    e''2 fis'' c'' | <b' g'>2.. <a' fis'>4 <b' e''>16[ <c'' fis''> <d'' a''>] ~ a''8. ~ |
 255    a''8. ~ <a'' a'>8[ <g'' g'> <fis'' fis'> <e'' e'>8.] ~ e''4 <c'' c'>2 |
 256    g'1 <e' b'>2 | \break
 257 %% 19-22
 258    r2.. \repeat percent 2 { <fis'' c''>8 <e'' b'> } r8 |
 259    <c'' a'>1 ~ <c'' a'>8[ <b' g'> <a' fis'> <g' e'>16 <fis' d'> |
 260    <e' c'>] r4.. c''8 d'' e''2. ~ | <b' e''>1. | \break
 261 %% 23-26
 262    r1. | r1. | r1. | r1. | \break
 263 %% 27-30
 264    r1. | r1. | r1. | r1. | \break
 265 %% 31-34
 266    r1. | r1. | r1. | r1. | \break
 267 %% 35-38
 268    r1. | r1. | r1. | r1. | \break
 269 %% 39-42
 270    << {c''2^\markup { \teeny
 271           \italic "Only" \teeny "(Upper of Soprano part)"\teeny \italic " play; One instrument" }
 272             e'' g'' ~ | g'' e'' c'' ~ | c'' r4 d''8[ e'' fis''] g''4. |
 273        fis''8[ e'' d'' c''] b'2 a'8[ g' fis' e'] | } \\
 274       {c'16[ d' e' fis'] g'4. fis'8[ e' d' c'] ~ c'4. | e'8[ fis' g'8.] a'4.. r8 c''2 |
 275        d'2 e' fis' ~ | fis'2 e'8.[ d' c'] r8. e'4 | } >> \break
 276 %% 43-46
 277    c'4 r4. c'2.. ~ | <c' fis'>1._~ | <fis' c''>1.\( | g'1.\)^\fermata | \break
 278 %% 47-50
 279    r1. | r1. | r1. | r1. | \break
 280 %% 51-55
 281    r1. | r1. | r1. | r1. | r1. | \break
 282 %% 56-60
 283    r2. e' ~ | \repeat percent 5 { <e' a'>8[ <fis' b'> <g' c''>] ~ c''4. }
 284    r4 e''2 | fis''1. | \break
 285 %% 61
 286    \time 4/1
 287    c''\breve fis''\breve | \break
 288 %% 62-63
 289    c''\longa | \time 3/2 <fis' a' c''>1\bar "|." \break
 290 }%% end soprano sheet
 291 
 292 sopranoM = {
 293     \autoBeamOff
 294    \partial 2 r2 |
 295 %% 1-4
 296    \repeat volta 2 { e''1.^\pppp | d''^\ppp | c''^\pp | }
 297       \alternative { { d''1^\p r2 | \break }
 298 %% 5-9
 299    { d''1^\mf c''2^\pp ~ } } | c''1. | b'^\ppp | \noBreak e''1.\pppp | r1. | \break
 300 %% 10-13
 301    fis'2^\p g'8[ a'] b'2. | c''2. b'8[ a'] g'2 ~ | g'2 a'8[ b'] c''2. |
 302    \pitchedTrill e''1 \startTrillSpan fis'' fis''2\stopTrillSpan ~ | \break
 303 %% 14
 304    \time 4/1
 305    fis''\breve r\breve \break
 306 %% 15-18
 307    \time 3/2
 308    e''2 fis'' c'' | <b' g'>2.. <a' fis'>4 <b' e''>16[ <c'' fis''> <d'' a''>] ~ a''8. |
 309    a''8. ~ <a'' a'>8[ <g'' g'> <fis'' fis'> <e'' e'>8.] ~ e''4 <c'' c'>2 |
 310    g'1 <e' b'>2 | \break
 311 %% 19-22
 312    r2.. \repeat percent 2 { <fis'' c''>8^\pp <e'' b'>^\pp } r8 |
 313    <c'' a'>1^\pp ~ <c'' a'>8[ <b' g'> <a' fis'> <g' e'>16 <fis' d'>] |
 314    <e' c'>]^\p^\< r4.. c''8d'' e''2.^\mf\! ~ | <b' e''>1. | \break
 315 %% 23-26
 316    r1. | r1. | r1. | r1. | \break
 317 %% 27-30
 318    r1. | r1. | r1. | r1. | \break
 319 %% 31-34
 320    r1. | r1. | r1. | r1. | \break
 321 %% 35-38
 322    r1. | r1. | r1. | r1. | \break
 323 %% 39-42
 324    << {c''2 e'' g'' ~ | g'' e'' c'' ~ | c'' r4 d''8[ e'' fis''] g''4. |
 325        fis''8[ e'' d'' c''] b'2 a'8[ g' fis' e'] | } \\
 326       {c'16[ d' e' fis'] g'4. fis'8[ e' d' c'] ~ c'4. | e'8[ fis' g'8.] a'4.. r8 c''2 |
 327        d'2 e' fis' ~ | fis'2 e'8.[ d' c'] r8. e'4 | } >> \break
 328 %% 43-46
 329    c'4 r4. c'2.. ~ | <c' fis'>1._~ | <fis' c''>1.\( | g'1.\)^\fermata | \break
 330 %% 47-50
 331    r1. | r1. | r1. | r1. | \break
 332 %% 51-55
 333    r1. * 5 | \break
 334 %% 56-60
 335    r2. e' ~ | \repeat percent 5 { <e' a'>8[ <fis' b'> <g' c''>] ~ c''4. }
 336    r4 e''2 | fis''1. | \break
 337 %% 61
 338    \time 4/1
 339    c''\breve fis''\breve | \break
 340 %% 62-63
 341    c''\longa | \time 3/2 <fis' a' c''>1 \bar "|." \break
 342 }%% end soprano-midi
 343 
 344 %%%%%%%%%% alto part %%%%%%%%%%%%%%%%%%%%%b
 345 altoVoice = {
 346     \autoBeamOff
 347    \partial 2 r2 |
 348 %% 1-4(repeat;1-7)
 349    \repeat volta 2 { a2^\markup { \hspace #-5 \with-color #red \italic
 350                                           "Start is from Repeat Part" }
 351                          r4. b2 a8 | a2 r2 ges2 | b2 \tweak Accidental.color #red cis' d' | }
 352       \alternative { { r1. | \break }
 353 %% 5-9
 354    { b4. \tweak Accidental.color #red cis'8 d'2. r4 } } |
 355    d'1.^\dim\melisma | c'1. | \noBreak fis'1. | fis'2 * 2/3 s2 * 1/3\!\melismaEnd r1 | \break
 356 %% 10-13
 357    r1. | r1. | r1. | r1. | \break
 358 %% 14
 359    \time 4/1
 360    b4 c'4 c'8 d'4. d'8 e'2.. r\breve |
 361 %% 15-18
 362    \time 3/2
 363    r1. | r1. | r1. | r1. | \break
 364 %% 19-22
 365    r1. | r1. | r1. | r1. | \break
 366 %% 23-26
 367    g'1^\pp^\dim\melisma fis'2 | a'1. | g'1 fis'2 | a'1. | \break
 368 %% 27-30
 369    fis'1 a'2 | g'1. | fis'1. | e'1 * 3/4 s1 * 1/4 r2^\ppppp\!\melismaEnd | \break
 370 %% 31-34
 371    r1. | r1. | r1. | r1. | \break
 372 %% 35-38
 373    r1. | r1. | r1. | r1. | \break
 374 %% 39-42
 375    r1. | r1. | r1. | r1. | \break
 376 %% 43-46
 377    r1. | r1. | r1. | r1. | \break
 378 %% 47-50
 379    r2 %%^\markup { \hspace #-6 \teeny \with-color #blue \italic "Only; Voice group song"
 380       %%                             \teeny "(for 47bar ~ 50bar)" }
 381    e'4 e'8 fis'4 r8 b4 | b8 c'4 r8 e'8 fis'4. c'8 e'4. |
 382    r8 b8 c'4. g8 b2 r8 d'8 | c'8 g'2..^\fermata r2^\fermata | \break
 383 %% End.
 384 }
 385 
 386 altoVoiceL = \lyricmode {
 387     \override Lyrics.LyricText.color = #blue
 388     \override Lyrics.LyricHyphen.color = #blue
 389     \override Lyrics.LyricExtender.color = #blue
 390     \override Score.LyricText.font-shape = #'italic
 391     \teeny
 392 King! King of Kings.
 393 "Right now," "your child" was born.
 394 "Your baby" is "a boy!"
 395 m __
 396 Is it the voice of happiness?
 397 %% Is it the voice of fear?
 398 ə __
 399 Let's and listen! Let's and listen!
 400 The words "of the" king, the words "of the" king in the kingdom.
 401 }
 402 
 403 altoVoiceM = {
 404     \autoBeamOff
 405    \partial 2 r2 |
 406 %% 1-4(repeat;1-7)
 407    r1. | r1. | r1. | r1  r2 | a2 r4. b2 a8 | a2 r2 ges2 | b2 cis' d' | \break
 408 %% 5-9
 409    b4. cis'8 d'2. r4 | d'1.^\pp\melisma | c'1.^\ppp | \noBreak fis'1.^\pppp |
 410    fis'2^\ppppp\melismaEnd r1 | \break
 411 %% 10-13
 412    r1. | r1. | r1. | r1. | \break
 413 %% 14
 414    \time 4/1
 415    b4^\mf c'4 c'8 d'4. d'8 e'2.. r\breve |
 416 %% 15-18
 417    \time 3/2
 418    r1. | r1. | r1. | r1. | \break
 419 %% 19-22
 420    r1. | r1. | r1. | r1. | \break
 421 %% 23-26
 422    g'1^\pp fis'2 | a'1. | g'1^\ppp fis'2 | a'1. | \break
 423 %% 27-30
 424    fis'1 a'2^\pppp | g'1. | fis'1. | e'1^\ppppp r2 | \break
 425 %% 31-34
 426    r1. | r1. | r1. | r1. | \break
 427 %% 35-38
 428    r1. | r1. | r1. | r1. | \break
 429 %% 39-42
 430    r1. | r1. | r1. | r1. | \break
 431 %% 43-46
 432    r1. | r1. | r1. | r1. | \break
 433    r2 e'4 e'8 fis'4 r8 b4 | b8 c'4 r8 e'8 fis'4. c'8 e'4. |
 434    r8 b8 c'4. g8 b2 r8 d'8 | c'8 g'2..^\fermata r2^\fermata | \break
 435 %% End.
 436 }
 437 
 438 %%% Instruments
 439 alto = {
 440      \autoBeamOff
 441    \partial 2 r2 |
 442 %% 1-4
 443    \repeat volta 2 { fis'1.^\< | g' | fis' | }
 444       \alternative { { g'1 * 3/4 s1 * 1/4\! r2 | \break }
 445 %% 5-9
 446    { g'1^\> fis'2 ~ } } | fis'1. | e'1. | fis'1. * 3/4 r1. * 1/4\! | r1. | \break
 447 %% 10-13
 448    fis'2^\markup { \musicglyph #"p" } e'8[ d'] c'2. | b1 r2 | e'2 d'8[ c'] b2. |
 449    \pitchedTrill d'1 \startTrillSpan e' e'2\stopTrillSpan ~ | \break
 450 %% 14
 451    \time 4/1
 452    e'\breve r\breve | \break
 453 %% 15-18
 454    \time 3/2
 455    <g c'>8.[ <a d'> <b e'>] ~ e'4.. r8 <d' b>8[ <c' a> <b g>] |
 456    <a fis>8[ <a c'> r] e'4. r8 a'2 ~ <a' a>8 |
 457    <g' b>16[ <fis' c'> <e' d'> r] a2 <fis' fis>2. | c'1 <a e'>2 | \break
 458 %% 19-22
 459    r2. \repeat percent 2 { <c' g>8.[ <b fis>] } | <a g>1 r4.. <fis a>16_~ |
 460    <fis a>^~ <g a>1 r16 a8.[ b]^~ | <b fis>1. | \break
 461 %% 23-26
 462    r1. | r1. | r1. | r1. | \break
 463 %% 27-30
 464    r1. | r1. | r1. | r1. | \break
 465 %% 31-34
 466    r1. | r1. | r1. | r1. | \break
 467 %% 35-38
 468    r1. | r1. | r1. | r1. | \break
 469 %% 39-42
 470    <ces' f'>8[ <b e'> <a d'>] r8. g8. f2. ~ | f2. <g b>8.[ <a ces'> <b d'>] e'8. ~ |
 471    e'8. <ces' f'>_~ <ces' g'>_~ <ces' a'> f'2. | r4 <f a>8[ <g b> <a ces'>] ces'2.. | \break
 472 %% 43-46
 473    c'4 r4. c'2.._~ | <c' fis'>1._~ | fis'1.\( | c'1.\)^\fermata | \break
 474 %% 47-50
 475    r1. | r1. | r1. | r1. | \break
 476 %% 51-55
 477    r1. | r1. | r1. | r1. | r1. | \break
 478 %% 56-60
 479    r2 c'1_~ | \repeat percent 2 { <c' fis'>2._~ <c' e'> } | <c' fis'>2. r4 e'2 |
 480    fis'1. | \break
 481 %% 61
 482    \time 4/1
 483    c'\breve fis'\breve | \break
 484 %% 62-63
 485    c'\longa | \time 3/2 <fis a c'>1 \bar "|." \break
 486 }%% end alto sheet
 487 
 488 altoM = {
 489      \autoBeamOff
 490    \partial 2 r2
 491 %% 1-4
 492    \repeat volta 2 { fis'1.^\pppp | g'^\ppp | fis'^\pp | }
 493       \alternative { { g'1^\p r2 | \break }
 494 %% 5-9
 495    { g'1^mf fis'2^\pp ~ } } | fis'1. | e'1.^\ppp | fis'1.^\pppp | r1. | \break
 496 %% 10-13
 497    fis'2^\p e'8[ d'] c'2. | b1 r2 | e'2 d'8[ c'] b2. |
 498       \pitchedTrill d'1 \startTrillSpan e' e'2\stopTrillSpan ~ | \break
 499 %% 14
 500    \time 4/1
 501    e'\breve r\breve | \break
 502 %% 15-
 503    \time 3/2
 504    <g c'>8.[ <a d'> <b e'>] ~ e'4.. r8 <d' b>8[ <c' a> <b g>] |
 505    <a fis>8[ <a c'> r] e'4. r8 a'2 ~ <a' a>8 |
 506    <g' b>16[ <fis' c'> <e' d'> r] a2 <fis' fis>2. | c'1 <a e'>2 | \break
 507 %% 19-22
 508    r2. \repeat percent 2 { <c' g>8.[ <b fis>] } | <a g>1 r4.. <fis a>16_~ |
 509    <fis a>^~ <g a>1 r16 a8.[ b]^~ | <b fis>1. | \break
 510 %% 23-26
 511    r1. | r1. | r1. | r1. | \break
 512 %% 27-30
 513    r1. | r1. | r1. | r1. | \break
 514 %% 31-34
 515    r1. | r1. | r1. | r1. | \break
 516 %% 35-38
 517    r1. | r1. | r1. | r1. | \break
 518 %% 39-42
 519    <ces' f'>8[ <b e'> <a d'>] r8. g8. f2. ~ | f2. <g b>8.[ <a ces'> <b d'>] e'8. ~ |
 520    e'8. <ces' f'>_~ <ces' g'>_~ <ces' a'> f'2. | r4 <f a>8[ <g b> <a ces'>] ces'2.. | \break
 521 %% 43-46
 522    c'4 r4. c'2.._~ | <c' fis'>1._~ | fis'1.\( | c'1.\)^\fermata | \break
 523 %% 47-50
 524    r1. | r1. | r1. | r1. | \break
 525 %% 51-55
 526    r1. * 5 | \break
 527 %% 56-60
 528    r2 c'1_~ | \repeat percent 2 { <c' fis'>2._~ <c' e'> } | <c' fis'>2. r4 e'2 |
 529    fis'1. | \break
 530 %% 61
 531    \time 4/1
 532    c'\breve fis'\breve | \break
 533 %% 62-63
 534    c'\longa | \time 3/2 <fis a c'>1 \bar "|." \break
 535 }%% end alto-midi
 536 
 537 %%%%%%%% tenor part %%%%%%%%%%%%%%%%%%%%%%%
 538 tenorVoice = {
 539     \autoBeamOff
 540    \partial 2 r2 |
 541 %% 1-4(repeat;1-7)
 542    \repeat volta 2 { d'1.^\markup { \hspace #-5 \with-color #red \italic
 543                                           "Start is from Repeat Part" }^\dim\melisma
 544                          | e' | d'1.* 3/4 r1. * 1/4\!\melismaEnd | }
 545       \alternative { { r1. | \break }
 546 %% 5-9
 547    { r2 e4^\cresc r4 e4 r8 d8 | } } c2 d4 d'2\mf r4 | c4.-. r4. c4^\cresc c2 |
 548    g8 c'4 d'2.\mf d'4. ~ | d'2 r1 | \break
 549 %% 10-13
 550    r1. | r1. | r1. | r1. | \break
 551 %% 14
 552    \time 4/1
 553    r\breve b4 c'4 d'8 e'4. e'8 fis'2.. |
 554 %% 15-18
 555    \time 3/2
 556    r1. | r1. | r1. | r1. | \break
 557 %% 19-22
 558    r1. | r1. | r1. | r1. | \break
 559 %% 23-26
 560    g'1^\pp^\dim\melisma fis'2 | a'1. | g'1 fis'2 | a'1. | \break
 561 %% 27-30
 562    fis'1 a'2 | g'1. | fis'1. | e'1 * 3/4 s1 * 1/4 r2^\ppppp\!\melismaEnd | \break
 563 %% 31-34
 564    r1. | r1. | r1. | r1. | \break
 565 %% 35-38
 566    r1. | r1. | r1. | r1. | \break
 567 %% 39-42
 568    r1. | r1. | r1. | r1. | \break
 569 %% 43-46
 570    r1. | r1. | r1. | r1. | \break
 571 %% 47-50
 572    r2 %%^\markup { \hspace #-6 \teeny \with-color #blue \italic "Only; Voice group song"
 573       %%                             \teeny "(for 47bar ~ 50bar)" }
 574    a4 a8 b4 r8 e4 | e8 fis4 r8 a8 b4. fis8 a4. |
 575    r8 e8 fis4. c8 e2 r8 g8 | fis8 c'2..^\fermata r2^\fermata | \break
 576 %% End.
 577 }
 578 
 579 tenorVoiceL = \lyricmode {
 580     \override Lyrics.LyricText.color = #blue
 581     \override Lyrics.LyricHyphen.color = #blue
 582     \override Lyrics.LyricExtender.color = #blue
 583     \override Score.LyricText.font-shape = #'italic
 584     \teeny
 585 m __
 586 Now, listen!
 587 The words "of the" king. Listen!
 588 The words of the king "of kings."
 589 %% Is it the voice of happiness?
 590 Is it the voice of fear?
 591 ou __
 592 Let's and listen! Let's and listen!
 593 The words "of the" king, the words "of the" king in the kingdom.
 594 }
 595 tenorVoiceM = {
 596     \autoBeamOff
 597    \partial 2 r2 |
 598 %% 1-4(repeat;1-7)
 599    r1. | r1. | r1. | r1  r2 | d'1.^\pp\melisma | e'^\ppp | d'^\pppp\melismaEnd | \break
 600 %% 5-9
 601    r2 e4^\pppp r4 e4^\ppp r8 d8^\pp | c2 d4^\p d'2\mf r4 | c4.-.^\f r4. c4^\pppp c2^\ppp |
 602    g8^\pp c'4^\p d'2.\mf d'4. ~ | d'2 r1 | \break
 603 %% 10-13
 604    r1. | r1. | r1. | r1. | \break
 605 %% 14
 606    \time 4/1
 607    r\breve b4 c'4 d'8 e'4. e'8 fis'2.. |
 608 %% 15-18
 609    \time 3/2
 610    r1. | r1. | r1. | r1. | \break
 611 %% 19-22
 612    r1. | r1. | r1. | r1. | \break
 613 %% 23-26
 614    g'1^\pp fis'2 | a'1. | g'1^\ppp fis'2 | a'1. | \break
 615 %% 27-30
 616    fis'1 a'2^\pppp | g'1. | fis'1. | e'1^\ppppp r2 | \break
 617 %% 31-34
 618    r1. | r1. | r1. | r1. | \break
 619 %% 35-38
 620    r1. | r1. | r1. | r1. | \break
 621 %% 39-42
 622    r1. | r1. | r1. | r1. | \break
 623 %% 43-46
 624    r1. | r1. | r1. | r1. | \break
 625 %% 47-50
 626    r2 a4 a8 b4 r8 e4 | e8 fis4 r8 a8 b4. fis8 a4. |
 627    r8 e8 fis4. c8 e2 r8 g8 | fis8 c'2..^\fermata r2^\fermata | \break
 628 %% End.
 629 }
 630 
 631 %%% Instruments
 632 tenor = {
 633      \autoBeamOff
 634    \partial 2 r2 |
 635 %% 1-4
 636    \repeat volta 2 { d'1.^\< | e' | d' | }
 637       \alternative { { e'1 * 3/4 s1 * 1/4\! r2 | \break }
 638 %% 5-9
 639    { e'1^\> d'2 ~ } } | d'1. | c'1. | d' | e'1 * 3/4 s1 * 1/4\! r2 | \break
 640 %% 10-13
 641    r2. <g b>8[^\markup { \dynamic mf } <a c'>]
 642                 \once \override Glissando.style = #'zigzag b2\glissando |
 643    e'2 <b d'>8[ <a c'> <g b>] ~ <g b>8[ <a c'> <b d'>] <c' e'>4 ~ |
 644    <c' e'>4 <d' b>8[ <c' a> <b g> <a fis>]
 645               \once \override Glissando.style = #'zigzag e2.\glissando | g1 r2 | \break
 646 %% 14
 647    \time 4/1
 648    r\breve e'\breve | \break
 649 %% 15-18-23-27-31-34
 650    \time 3/2
 651    r4^\markup { \column { \line { " " }
 652                           \line { \tiny \italic \with-color #blue "Bule-Notes are notes of"
 653                  \large \italic \with-color #blue "\"Tenor Sol(Vocal)\"" } } }
 654        c'4. e' << { c'2 ~ } \\ { s2 } >> |
 655    << { c'4. ~ <c' a fis>16[ <b g e> <a fis d> <g e c>] ~ c2 ~ <c e g>8[ <d fis a > <e g b>] |
 656         <fis a c'>16[ <g b d'> <a c' e'> <b d' fis'>8.] ~ <c' fis'>4. ~ fis'16[ e' d' c'] b8[ a g fis] |
 657         <e c>2. ~ c2. | \break
 658         %% 19-22
 659         c'1\rest <e b>2 ~ | <e b>2 <fis c'>2.. r8 |
 660         <d d'>16[ <e e'> <fis fis'> <g g'>8.] r16 <fis' fis>8[ <e' e> <d' d> <c' c>8.] r8
 661         <d d'>16[ <e e'> <fis fis'> <g g'>8.] ~ | g'1. | \break
 662         %% 23-26
 663         r1. | r1. | r1. | r1. | \break
 664         %% 27-30
 665         r1. | r1. | r1. | r1. | \break
 666         %% 31-34
 667         r1. | r1. | r1. | r1. | \break
 668         %% 35-38
 669         r1. * 2 | <e c>1.^\markup { \teeny \italic "(Only play; Instruments of tenor parts)" }_~ |
 670         c1. | \break
 671         } \\
 672           %%%%% Sol tenor part #1 %%%%%
 673       { \new Voice = "Soltenor" \voiceFive { \VoiceColorBlue \revert Staff.BarLine.color
 674                                                   \revert Staff.Clef.color
 675                                                   \revert Staff.KeySignature.color
 676         c8\rest a4. r8 g4( c'2) r8 | fis'4. fis4. c2. | r1. | \break
 677         %%% 19-22
 678         f8\rest g4. a2. r4 | g8 g4 a4 r8 b2. | r8 g8 g4. a8 b2. ~ | b2 r1 | \break
 679         %%% 23-26
 680                    \override Staff.Clef.color = #blue
 681                    \override Staff.KeySignature.color = #blue
 682                    \override Staff.BarLine.color = #blue
 683         e'4.^\markup { \hspace #-4 \with-color #blue \italic "Tenor Sol; No play instruments" }
 684              r8 g'2.. r8 |
 685         fis'4 a'2 r8 d' b2 | g8 e2.. r2 | a4. a2 r8 g4 g'4 ~ | \break
 686         %%% 27-30
 687         g'4 e'2 r4. c'4. | c'2 r8 b4. a'2 | fis'4 fis'4. e'8 g'2. | r1.^\fermata | \break
 688         %% 31-34
 689         b4.^\markup { \hspace #-4 \with-color #blue \italic "Only; Tenor Sol" }
 690             r8 c'2 b4 g4 ~ | g4 r4 a8 b4. c'4. r8 | d'2. r2. | d'4. e'2. c'4 r8 | \break
 691         %% 35-38
 692         c'2 r8 b4 r8 b4\( a | g4.\) fis4. e2. | b1.\rest | b1.\rest | \break
 693         \revert Staff.Clef.color
 694         \revert Staff.KeySignature.color
 695         \revert Staff.BarLine.color
 696           } } >> %%%%% End Sol tenor part #1 %%%%%
 697 %% 39-42
 698    c'4. ~ <c' g>8.[ <b fis>] <a e>8[ <g d> <fis c>] r8 <g c'>8[ <a d'>] |
 699    <b e'>8[ <c' fis'> <d' g'>8.] r16 a'1 |
 700    \repeat percent 3 { <g' e'>16[ <ges' ees'> <fis' d'>8 <ees' c'>8 <d' b>] } |
 701    \repeat percent 3 { <c' a>16[ <ces' aes> <b g>8 <a fis> <g e>] } | \break
 702 %% 43-46
 703    c4 r4. c2.. ~ | <c fis>1. ~ | <fis c'>1.\( | g1.\)^\fermata | \break
 704 %% 47-50
 705    r1. | r1. | r1. | r1. | \break
 706 %% 51-55
 707 %%%%% Sol tenor part #2 %%%%%
 708    \new Voice = "SoltenorII" {
 709                    \override Staff.Clef.color = #blue
 710                    \override Staff.KeySignature.color = #blue
 711                    \override Staff.BarLine.color = #blue
 712                    \override Voice.NoteHead.color = #blue
 713                    \override Voice.Rest.color = #blue
 714                    \override Voice.Stem.color = #blue
 715                    \override Voice.Flag.color = #blue
 716                    \override Voice.Beam.color = #blue
 717                    \override Voice.Slur.color = #blue
 718                    \override Voice.PhrasingSlur.color = #blue
 719                    \override Voice.Tie.color = #blue
 720                    \override Voice.Dots.color = #blue
 721                    \override Voice.Script.color = #blue
 722                    \override Voice.Accidental.color = #blue
 723 %%    r2_\fermata^\markup { \hspace #-4 \with-color #blue \italic "Only; Tenor Sol" }
 724     r4.^\markup { \column {
 725                  \line { \hspace #-4 \with-color #blue \italic "Only; Tenor Sol" }
 726                  \line { \with-color #blue \fermata } } }
 727         a4 c'2 d'8 e'4 ~ | e'2 r4 a4 g2 | r8 a4 e'2.. r4 |
 728         a4 c'2.. r8 d'4 | e'2 a1^\fermata | } \break
 729 %% 56-
 730         \revert Staff.TimeSignature.color %%This is need!
 731         \revert Staff.Clef.color
 732         \revert Staff.KeySignature.color
 733         \revert Staff.BarLine.color
 734    a1. ~ | \repeat percent 3 { <fis a c'>8.[ <g b d'> <a c' e'>] d'4 r4 e'4.. } |
 735    fis'1. | \break
 736 %% 61
 737    \time 4/1
 738    fis\breve c'\breve | \break
 739 %% 62-63
 740    fis'\longa | \time 3/2 <fis d a>1 \bar "|." \break
 741 } %% end tenor sheet
 742 
 743 SoltenorL = \lyricmode {
 744     \override Lyrics.LyricText.color = #blue
 745     \override Lyrics.LyricHyphen.color = #blue
 746     \override Lyrics.LyricExtender.color = #blue
 747     \override Score.LyricText.font-shape = #'italic
 748     \teeny
 749 Oh! God! I pray you.
 750 My "baby....," that has my blood,
 751 that inherit the kingdom!
 752 
 753 Oh! God! I beleve and pray to you.
 754 My son will grow well.
 755 My son will grow "as the" king of Kings.
 756 
 757 "It's" been my dream to get my son!
 758 My son was born and in -- her -- it my blood!
 759 }
 760 SoltenorLII = \lyricmode {
 761     \override Lyrics.LyricText.color = #blue
 762     \override Lyrics.LyricHyphen.color = #blue
 763     \override Lyrics.LyricExtender.color = #blue
 764     \override Score.LyricText.font-shape = #'italic
 765     \teeny
 766 I'll build the "Ca -- thedral!" For thanks to God!
 767 Oh, God! I pray you.
 768 }
 769 
 770 tenorM = {
 771      \autoBeamOff
 772    \partial 2 r2
 773 %% 1-4
 774    \repeat volta 2 { d'1.^\pppp | e'^\ppp | d'^\pp | }
 775       \alternative { { e'1^\p r2 | \break }
 776 %% 5-9
 777    { e'1^mf d'2^\pp ~ } } | d'1. | c'1.^\ppp | d' | e'1^\pppp r2 | \break
 778 %% 10-13
 779    r2. <g b>8[^\mf <a c'>] \once \override Glissando.style = #'zigzag b2\glissando |
 780    e'2 <b d'>8[ <a c'> <g b>] ~ <g b>8[ <a c'> <b d'>] <c' e'>4 |
 781    <c' e'>4 <d' b>8[ <c' a> <b g> <a fis>]
 782               \once \override Glissando.style = #'zigzag e2.\glissando | g1 r2 | \break
 783 %% 14
 784    \time 4/1
 785    r\breve e'\breve | \break
 786 %% 15-18-23-
 787    \time 3/2
 788    r4 c'4. e' << { c'2 ~ } \\ { s2 } >> |
 789    << { c'4. ~ <c' a fis>16[ <b g e> <a fis d> <g e c>] ~ c2 ~ <c e g>8[ <d fis a > <e g b>] |
 790         <fis a c'>16[ <g b d'> <a c' e'> <b d' fis'>8.] ~ <c' fis'>4. ~ fis'16[ e' d' c']
 791                                                                                b8[ a g fis] |
 792         <e c>2. ~ c2. | \break
 793         %% 19-22
 794         r1 <e b>2 ~ | <e b>2 <fis c'>2.. r8 |
 795         <d d'>16[ <e e'> <fis fis'> <g g'>8.] r16 <fis' fis>8[ <e' e> <d' d> <c' c>8.] r8
 796         <d d'>16[ <e e'> <fis fis'> <g g'>8.] ~ | g'1. | \break
 797         %% 23-26
 798         r1. | r1. | r1. | r1. | \break
 799         %% 27-30
 800         r1. | r1. | r1. | r1. | \break
 801         %% 31-34
 802         r1. | r1. | r1. | r1. | \break
 803         %% 35-38
 804         r1. * 2 | <e c>1. ~ | c1. | \break
 805         } \\
 806       { r8 a4. r8 g4( c'2) r8 | fis'4. fis4. c2. | r1. | \break
 807         %%% 19-22
 808         r8 g4. a2. r4 | g8 g4 a4 r8 b2. | r8 g8 g4. a8 b2. ~ | b2 r1 | \break
 809         %%% 23-26
 810         e'4. r8 g'2.. r8 | fis'4 a'2 r8 d' b2 | g8 e2.. r2 | a4. a2 r8 g4 g'4 ~ | \break
 811         %%% 27-30
 812         g'4 e'2 r4. c'4. | c'2 r8 b4. a'2 | fis'4 fis'4. e'8 g'2. | r1.^\fermata | \break
 813         %%% 31-34
 814         b4. r8 c'2 b4 g4 ~ | g4 r4 a8 b4. c'4. r8 | d'2. r2. | d'4. e'2. c'4 r8 | \break
 815         %% 35-38
 816         c'2 r8 b4 r8 b4\( a | g4.\) fis4. e2. | r1. | r1. | \break
 817       } >>
 818 %% 39-42
 819    c'4. ~ <c' g>8.[ <b fis>] <a e>8[ <g d> <fis c>] r8 <g c'>8[ <a d'>] |
 820    <b e'>8[ <c' fis'> <d' g'>8.] r16 a'1 |
 821    \repeat percent 3 { <g' e'>16[ <ges' ees'> <fis' d'>8 <ees' c'>8 <d' b>] } |
 822    \repeat percent 3 { <c' a>16[ <ces' aes> <b g>8 <a fis> <g e>] } | \break
 823 %% 43-46
 824    c4 r4. c2.. ~ | <c fis>1. ~ | <fis c'>1.\( | g1.\)^\fermata | \break
 825 %% 47-50
 826    r1. | r1. | r1. | r1. | \break
 827 %% 51-55
 828     r4._\fermata a4 c'2 d'8 e'4 ~ | e'2 r4 a4 g2 | r8 a4 e'2.. r4 |
 829     a4 c'2.. r8 d'4 | e'2 a1^\fermata | \break
 830 %% 56-60
 831    a1. ~ | \repeat percent 3 { <fis a c'>8.[ <g b d'> <a c' e'>] d'4 r4 e'4.. } |
 832    fis'1. | \break
 833 %% 61
 834    \time 4/1
 835    fis\breve c'\breve | \break
 836 %% 62-63
 837    fis'\longa | \time 3/2 <fis d a>1 \bar "|." \break
 838 } %% end tenor midi
 839 
 840 %%%%%%% bass; part %%%%%%%%%%%%%%%%
 841 bassVoice = {
 842     \autoBeamOff
 843    \partial 2 r2 |
 844 %% 1-4(repeat;1-7)
 845    \repeat volta 2 { d1.^\markup { \hspace #-5 \with-color #red \italic
 846                                           "Start is from Repeat Part" }^\dim\melisma
 847                          | e | d1.* 3/4 r1. * 1/4\!\melismaEnd | }
 848       \alternative { { r1. | \break }
 849 %% 5-9
 850    { r2 b,4^\cresc r4 b,4 r8 c8 | } } d2 e4 e2\mf r4 | b,4.-. r4. c4^\cresc c2 |
 851    d8 e4 fis2.\mf e4. ~ | e2 r1 | \break
 852 %% 10-13
 853    r1. | r1. | r1. | r1. | \break
 854 %% 14
 855    \time 4/1
 856    r\breve b,4 c4 d8 e4. e8 fis2.. |
 857 %% 15-18
 858    \time 3/2
 859    r1. | r1. | r1. | r1. | \break
 860 %% 19-22
 861    r1. | r1. | r1. | r1. | \break
 862 %% 23-26
 863    g1^\pp^\dim\melisma fis2 | a1. | g1 fis2 | a1. | \break
 864 %% 27-30
 865    fis1 a2 | g1. | fis1. | e1 * 3/4 s1 * 1/4 r2^\ppppp\!\melismaEnd | \break
 866 %% 31-34
 867    r1. | r1. | r1. | r1. | \break
 868 %% 35-38
 869    r1. | r1. | r1. | r1. | \break
 870 %% 39-42
 871    r1. | r1. | r1. | r1. | \break
 872 %% 43-46
 873    r1. | r1. | r1. | r1. | \break
 874 %% 47-50
 875    r2 %%^\markup { \hspace #-6 \teeny \with-color #blue \italic "Only; Voice group song"
 876       %%                             \teeny "(for 47bar ~ 50bar)" }
 877    d4 d8 e4 r8 a,4 | a,8 b,4 r8 d8 e4. b,8 d4. |
 878    r8 a,8 b,4. fis,8 a,2 r8 c8 | b,8 fis2..^\fermata r2^\fermata | \break
 879 %% End.
 880 }
 881 
 882 bassVoiceL = \lyricmode {
 883     \override Lyrics.LyricText.color = #blue
 884     \override Lyrics.LyricHyphen.color = #blue
 885     \override Lyrics.LyricExtender.color = #blue
 886     \override Score.LyricText.font-shape = #'italic
 887     \teeny
 888 m __
 889 Now, listen!
 890 The words "of the" king. Listen!
 891 The words of the king "of kings."
 892 %% Is it the voice of happiness?
 893 Is it the voice of fear?
 894 ou __
 895 Let's and listen! Let's and listen!
 896 The words "of the" king, the words "of the" king in the kingdom.
 897 }
 898 
 899 bassVoiceM = {
 900     \autoBeamOff
 901    \partial 2 r2 |
 902 %% 1-4(repeat;1-7)
 903    r1. | r1. | r1. | r1  r2 | d1.^\pp\melisma | e^\ppp | d^\pppp\melismaEnd | \break
 904 %% 5-9
 905    r2 b,4^\pppp r4 b,4^\ppp r8 c8^\pp | d2 e4^\p e2\mf r4 | b,4.-.\f r4. c4^\pppp c2^\ppp |
 906    d8^\pp e4^\p fis2.\mf e4. ~ | e2 r1 | \break
 907 %% 10-13
 908    r1. | r1. | r1. | r1. | \break
 909 %% 14
 910    \time 4/1
 911    r\breve b,4 c4 d8 e4. e8 fis2.. |
 912 %% 15-18
 913    \time 3/2
 914    r1. | r1. | r1. | r1. | \break
 915 %% 19-22
 916    r1. | r1. | r1. | r1. | \break
 917 %% 23-26
 918    g1^\pp fis2 | a1. | g1^\ppp fis2 | a1. | \break
 919 %% 27-30
 920    fis1 a2^\pppp | g1. | fis1. | e1^\ppppp r2 | \break
 921 %% 31-34
 922    r1. | r1. | r1. | r1. | \break
 923 %% 35-38
 924    r1. | r1. | r1. | r1. | \break
 925 %% 39-42
 926    r1. | r1. | r1. | r1. | \break
 927 %% 43-46
 928    r1. | r1. | r1. | r1. | \break
 929 %% 47-50
 930    r2 %%^\markup { \hspace #-6 \teeny \with-color #blue \italic "Only; Voice group song"
 931       %%                             \teeny "(for 47bar ~ 50bar)" }
 932    d4 d8 e4 r8 a,4 | a,8 b,4 r8 d8 e4. b,8 d4. |
 933    r8 a,8 b,4. fis,8 a,2 r8 c8 | b,8 fis2..^\fermata r2^\fermata | \break
 934 %% End.
 935 }
 936 
 937 %%% Instruments
 938 bass = {
 939    \autoBeamOff
 940    \partial 2 r2 |
 941 %% 1-4
 942    \repeat volta 2 { b1.^\< | a | g | }
 943       \alternative { { a1 * 3/4 s1 * 1/4\! r2 | \break }
 944 %% 5-9
 945    { a1^\> g2 ~ } } | g1. | fis1. | b | c'1 * 3/4 s1 * 1/4\! r2 | \break
 946 %% 10-13
 947    r2 <b fis>4^\markup { \dynamic mf } <a e>8[ <g d> <fis c>8]
 948                              \once \override Glissando.style = #'zigzag  b,4.\glissando |
 949    c'2 <b e>8[ <a d> <g c>] <b, fis>[ <c g> <d a>] <e b>4_~ |
 950    <c' e>4. <b d>8[ <a c> <g b,>] \once \override Glissando.style = #'zigzag c2.\glissando |
 951    c'1 r2 | \break
 952 %% 14
 953    \time 4/1
 954    r\breve e\breve | \break
 955 %% 15-18
 956    \time 3/2
 957    \repeat percent 4 { <g, c>8.-.[ <a, d>-.] } |
 958    \repeat percent 4 { r8.[ <fis, a, c>16-. <g, b, d>-. <a, c e>-.] } |
 959    \repeat percent 4 { <e c a,>-.[ <d b, g,>16-. <c a, fis,>-. r8.] } |
 960    \repeat percent 4 { <d a,>8.-.[ <c g,>8.-.] } |
 961 %% 19-22
 962    \once \override Glissando.style = #'zigzag e,1_\markup { \hspace #-8 \column { " " " "
 963        \with-color #blue \bold  \italic
 964          "Only; Voice Group and Tenor Solo" \teeny "(For 23bar ~ 36bar No play Instruments!)" } }\glissando c2 ~ |
 965    <g, c>1. ~ | \repeat percent 6 { <g, c>16[ <a, d> r8] } | <e, g,>1. | \break
 966 %% 23-26
 967    r1. | r1. | r1. | r1. | \break
 968 %% 27-30
 969    r1. | r1. | r1. | r1. | \break
 970 %% 31-34
 971    r1. | r1. | r1. | r1. | \break
 972 %% 35-38
 973    r1. | r1. | r1. | r1. | \break
 974 %% 39-42
 975    \repeat percent 4 { <a, c>16_\markup {
 976                                  \tiny \musicglyph #"m"\hspace #-1 \musicglyph #"f" }[
 977                                <b, d> c8. r16] } |
 978    \repeat percent 4 { r16[ <g, b,>16 <a, c> b,8.] } |
 979    \repeat percent 4 { <g, c>16[ <a, d> cis8.] r16 } |
 980    \repeat percent 4 { <a, d>16[ <b, e> dis8.] r16 } | \break
 981 %% 43-46
 982    c4 r4. c2.. ~ | <c fis>1._~ | c1.^\( | g,1.\)^\fermata | \break
 983 %% 47-50
 984    r1. | r1. | r1. | r1. | \break
 985 %% 51-55
 986    r1. | r1. | r1. | r1. | r1. | \break
 987 %% 56-60
 988    r4 fis2 ~ <fis d>2. ~ | <fis c>8[ <e b,> <d a,>] r8 g,2 ~ <g, d>2 ~ |
 989    d2. <c e>2. | d2. r4 e2 | fis1. | \break
 990 %% 61
 991    \time 4/1
 992    c\breve fis\breve | \break
 993 %% 62-63
 994    c\longa | \time 3/2 <fis, a, c>1 \bar "|." \break
 995 } %%end bass-sheet
 996 
 997 bassM = {
 998    \autoBeamOff
 999    \partial 2 r2
1000 %% 1-4
1001    \repeat volta 2 { b1.^\pppp | a^\ppp | g^\pp | }
1002       \alternative { { a1^\p r2 | \break }
1003 %% 5-9
1004    { a1^\mf g2^\pp ~ } } | g1. | fis^\ppp | b | c'1\pppp r2 | \break
1005 %% 10-
1006    r2 <b fis>4^mf <a e>8[ <g d> <fis c>8]
1007            \once \override Glissando.style = #'zigzag  b,4.\glissando |
1008    c'2 <b e>8[ <a d> <g c>] <b, fis>[ <c g> <d a>] <e b>4 ~ |
1009    <c' e>4. <b d>8[ <a c> <g b,>] \once \override Glissando.style = #'zigzag c2.\glissando |
1010    c'1 r2 | \break
1011 %% 14
1012    \time 4/1
1013    r\breve e\breve | \break
1014 %% 15-18
1015    \time 3/2
1016    \repeat percent 4 { <g, c>8.-.[ <a, d>-.] } |
1017    \repeat percent 4 { r8.[ <fis, a, c>16-. <g, b, d>-. <a, c e>-.] } |
1018    \repeat percent 4 { <e c a,>-.[ <d b, g,>16-. <c a, fis,>-. r8.] } |
1019    \repeat percent 4 { <d a,>8.-.[ <c g,>8.-.] } |
1020 %% 19-22
1021    \once \override Glissando.style = #'zigzag e,1\glissando c2 |
1022    <g, c>1. ~ | \repeat percent 6 { <g, c>16[ <a, d> r8] } | <e, g,>1. | \break
1023 %% 23-26
1024    r1. | r1. | r1. | r1. | \break
1025 %% 27-30
1026    r1. | r1. | r1. | r1. | \break
1027 %% 31-34
1028    r1. | r1. | r1. | r1. | \break
1029 %% 35-38
1030    r1. | r1. | r1. | r1. | \break
1031 %% 39-42
1032    \repeat percent 4 { <a, c>16^\mf[ <b, d> c8.] r16 } |
1033    \repeat percent 4 { r16 <g, b,>16[ <a, c> b,8.] } |
1034    \repeat percent 4 { <g, c>16[ <a, d> cis8.] r16 } |
1035    \repeat percent 4 { <a, d>16[ <b, e> dis8.] r16 } | \break
1036 %% 43-46
1037    c4 r4. c2.. ~ | <c fis>1._~ | c1.^\( | g,1.\)^\fermata | \break
1038 %% 47-50
1039    r1. | r1. | r1. | r1. | \break
1040 %% 51-55
1041    r1. * 5 | \break
1042 %% 56-60
1043    r4 fis2 ~ <fis d>2. ~ | <fis c>8[ <e b,> <d a,>] r8 g,2 ~ <g, d>2 |
1044    d2. <c e>2. | d2. r4 e2 | fis1. | \break
1045 %% 61
1046    \time 4/1
1047    c\breve fis\breve | \break
1048 %% 62-63
1049    c\longa | \time 3/2 <fis, a, c>1 \bar "|." \break
1050 }%% end bass-midi
1051 
1052 %% get sheet music -------------------------------------------------
1053 \score {
1054   %% \new Score \with { \override VerticalAlignment.max-stretch = #4 }
1055          <<
1056           %% \new Voice = "mezzosoprano" {
1057           %%                    \clef mezzosoprano \key g\major \time 3/2
1058           %%       \set Staff.instrumentName = \markup { \tiny "mezzosoprano" }
1059           %%                            \VoiceColorBlue {\mezzosoprano} }
1060           %% \new Lyrics = "mainSL" \lyricsto "mezzosopranoL" { \mezzosopranoL }
1061 
1062            \context ChoirStaff = "FourPartStaffaddchorus" <<
1063            \new Voice = "soprano" { \clef soprano \key g\major \time 3/2
1064                              \set Staff.instrumentName = "soprano" \soprano }
1065            \new Voice = "sopranoVocal" { \clef soprano \key g\major \time 3/2
1066                    \set Staff.fontSize = #-4
1067                    \override Staff.StaffSymbol.staff-space = #(magstep -4)
1068                    \override Staff.StaffSymbol.thickness = #(magstep -4)
1069                              \set Staff.instrumentName = "Voice; sop "
1070                                                           \VoiceColorBlue { \sopranoVoice } }
1071            \new Lyrics = "mainSL" \lyricsto "sopranoVocal" { \sopranoVoiceL }
1072 
1073            \new Voice = "alto" { \clef alto \key g\major \time 3/2
1074                         \set Staff.instrumentName = "alto   " \alto }
1075            \new Voice = "altoVocal" { \clef alto \key g\major \time 3/2
1076                    \set Staff.fontSize = #-4
1077                    \override Staff.StaffSymbol.staff-space = #(magstep -4)
1078                    \override Staff.StaffSymbol.thickness = #(magstep -4)
1079                         \set Staff.instrumentName = "Voice; alt "
1080                                                      \VoiceColorBlue { \altoVoice } }
1081            \new Lyrics = "mainSL" \lyricsto "altoVocal" { \altoVoiceL }
1082 
1083            \new Voice = "tenor" { \clef tenor \key g\major \time 3/2
1084                         \set Staff.instrumentName = "tenor  " \tenor }
1085 %%           \new Lyrics = "mainTL" \lyricsto "Soltenor" { \SoltenorL }
1086            \new Lyrics = "mainTL" \lyricsto "SoltenorII" { \SoltenorLII }
1087            \new Voice = "tenorVocal" { \clef tenor \key g\major \time 3/2
1088                    \set Staff.fontSize = #-4
1089                    \override Staff.StaffSymbol.staff-space = #(magstep -4)
1090                    \override Staff.StaffSymbol.thickness = #(magstep -4)
1091                         \set Staff.instrumentName = "Voice; tenor "
1092                                                      \VoiceColorBlue { \tenorVoice } }
1093            \new Lyrics = "mainTL" \lyricsto "tenorVocal" { \tenorVoiceL }
1094 
1095            \new Voice = "bass" { \clef bass \key g\major \time 3/2
1096                         \set Staff.instrumentName = "bass   " \bass }
1097            \new Voice = "bassVocal" { \clef bass \key g\major \time 3/2
1098                    \set Staff.fontSize = #-4
1099                    \override Staff.StaffSymbol.staff-space = #(magstep -4)
1100                    \override Staff.StaffSymbol.thickness = #(magstep -4)
1101                         \set Staff.instrumentName = "Voice; bass "
1102                                                      \VoiceColorBlue { \bassVoice } }
1103            \new Lyrics = "mainBL" \lyricsto "bassVocal" { \bassVoiceL }
1104                 >>
1105             >>
1106 
1107   \layout {  \context { \Staff \RemoveEmptyStaves }
1108                    %% \context {
1109                                          %% Supports up to lilypond ver 2.22.2-1: Removed support(don't run) from lilypond ver 2.24.0
1110                               %% lilypond ver 2.22.2-1 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1111                               %% Rests(bars) are typeset (indicated) exactly with rest notes.
1112                                           %% \Staff \RemoveEmptyStaves
1113                               %%     \override VerticalAxisGroup.remove-fisst = ##t
1114                              %% It can get effect by using for instance "r1." or "s1."
1115                              %% Don't using "r1."
1116                       %%           }
1117            }
1118      %%%%%% Don't output Score-sheet %%%%%%%%%%%%%%%%%%%%%%%%
1119      %% \layout { \context { \Score skipTypesetting = ##t } }
1120 }
1121 
1122 %% get midi music --------------------------------------------------
1123 \score {
1124          %% \unfoldRepeats \articulate
1125          <<
1126            %% \new Staff { \clef mezzosoprano \key g\major \time 3/2 \tempo 4 = 58
1127            %%              \set Staff.midiInstrument = "pad 2 (warm)"
1128            %%                              \unfoldRepeats       \mezzosopranoM }
1129 
1130            \new Staff { \clef soprano \key g\major \time 3/2 \tempo 4 = 58
1131                          \set Staff.midiInstrument = "pad 2 (warm)"
1132                                          \unfoldRepeats       \sopranoM }
1133            \new Staff { \clef soprano \key g\major \time 3/2 \tempo 4 = 58
1134                          \set Staff.midiInstrument = "pad 2 (warm)"
1135                                          \unfoldRepeats       \sopranoVoiceM }
1136 
1137            \new Staff { \clef alto \key g\major \time 3/2 \tempo 4 = 58
1138                          \set Staff.midiInstrument = "pad 2 (warm)"
1139                                          \unfoldRepeats          \altoM }
1140            \new Staff { \clef alto \key g\major \time 3/2 \tempo 4 = 58
1141                          \set Staff.midiInstrument = "pad 2 (warm)"
1142                                          \unfoldRepeats          \altoVoiceM }
1143 
1144            \new Staff { \clef tenor \key g\major \time 3/2 \tempo 4 = 58
1145                          \set Staff.midiInstrument = "pad 2 (warm)"
1146                                          \unfoldRepeats       \tenorM }
1147            \new Staff { \clef tenor \key g\major \time 3/2 \tempo 4 = 58
1148                          \set Staff.midiInstrument = "pad 2 (warm)"
1149                                          \unfoldRepeats       \tenorVoiceM }
1150 
1151            \new Staff { \clef bass \key g\major \time 3/2 \tempo 4 = 58
1152                         \set Staff.midiInstrument = "pad 2 (warm)"
1153                                          \unfoldRepeats          \bassM }
1154            \new Staff { \clef bass \key g\major \time 3/2 \tempo 4 = 58
1155                          \set Staff.midiInstrument = "pad 2 (warm)"
1156                                          \unfoldRepeats          \bassVoiceM }
1157 
1158            %%\new Staff { \clef treble \key g\major \time 3/2 \tempo 4 = 58
1159            %%             \set Staff.midiInstrument = "acoustic grand"
1160            %%                                \unfoldRepeats       \pianoUPm }
1161            %%\new Staff { \clef bass \key g\major \time 3/2 \tempo 4 = 58
1162            %%             \set Staff.instrumentName = "acoustic grand"
1163            %%                                \unfoldRepeats     \pianoDownm }
1164          >>
1165 
1166    \midi { tempoWholesPerMinute = #(ly:make-moment 58 4) }
1167 }
1168 \markup { " " }
1169 \markup { \column { \line {
1170 About location \hspace #3 \musicglyph #"noteheads.uM2"(longa) \hspace #2 and \hspace #3 \musicglyph #"noteheads.sM1"(breve) }
1171 \line { \italic " Please, Breath of longa and breve do in the members alternating(But, like Don't stand out). " } } }
1172 \markup { " " }
1173 \markup { \vspace #2 }
1174 \markup { \line {\hspace #8 \bold "My son?! Oh, God! I belive you!"} }
1175 \markup { " " }
1176 \markup { \hspace #8 \tiny \italic \column {
1177 \bold "Tenor; Vocal Words"
1178 " "
1179 "Oh! God! I pray you."
1180 "My baby...., that has my blood,"
1181 "That inherit the kingdom!"
1182 %% " "
1183 %% "It's building a church! As thanks to God."
1184 %% "All things of the kingdom's Conforming to my child!"
1185 %% "All things that I have built."
1186 %% " "
1187 " "
1188 "Oh! God! I beleve and pray you."
1189 "My son will grow well."
1190 "My son will grow as the king of Kings."
1191 " "
1192 "It's been my dream to get my son!"
1193 "My son was born and inherited my blood!"
1194 " "
1195 "I'll build the Cathedral! For thanks to God!"
1196 "Oh, God! I pray you."
1197 }\hspace #12
1198    \teeny \italic \column {
1199 \bold "Chours; Vocal Words"
1200 "King! King of Kings!"
1201 "Right now, your child was born."
1202 "Your baby is a boy."
1203 " "
1204 "Now, listen!"
1205 "The words of the king. Listen!"
1206 "The words of the king of Kings."
1207 "Is it the voice of happiness?"
1208 "Is it the voice of fear?"
1209 %% "Ruler of the underworld are not showing true purpose."
1210 %% "Because hiding in darkness."
1211 " "
1212 "Let's and listen! (Let's and listen!)"
1213 "The words of the king(,the words of the king) in the kingdom."
1214 }}
1215 \markup { \vspace #12 }
1216 %%%%%%%%%%%%%%%%%%%% All End %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%