\version "2.14.2"

songTitle = ""
songPoet = "S.W. Black"
songCopyright = "2015 S.W.Black"

tuneArranger = \markup { tune of \italic{ Watchman, Tell Us of the Night } }
tuneComposer = \markup { \italic {Aberystwyth}, Joseph Parry (1841–1903)}
tuneSource = \markup { "from" \italic {ChristmasCarolMusic.org}}

albumProduct = "Other Carols from 2015"
albumCopyright = \markup {Creative Commons Attribution 4.0 License}
albumTagline = \markup {created for \italic {50/90 2015}}

% Fancier Copyright/Tagline messages
\include "../book/album.ily"


global = {
  \key f \major
  \time 4/4
  \autoBeamOff
  \tempo 4 = 90
}

sopMusic = \relative c' {
  d4 d8[ e] f[ g] a4 |
  f e d2 |
  f4 e d cis |
  d8[ e] f4 e2 | 
  
  d4 d8[ e] f[ g] a4 |
  f e d2 |
  e4 f8[ g] a4 g |
  f e d2 | 
  
  d4 c d e |
  f a8[ g] f2 |
  f4 e f g |
  a c8[ b] a2 | 
  
  d4 d c a |
  f g a2 |
  d,4 d8[ e] f[ g] a4 |
  f e d2 \bar "|."
}
  

altoMusic = \relative c' {
  a4 d8[ cis] d[ e] f4 |
  d cis a2 |
  d4 cis d a |
  a d cis2 |
  
  a4 a8[ cis] d[ e] f4 |
  d cis a2 |
  cis4 d8[ e] f4 e |
  d cis a2 |
  
  bes4 a bes bes |
  c e c2 |
  d4 cis d e8[ c] |
  c4 e8[ d] c2 |
  
  d4 f8[ e] f4 c |
  d d e2 |
  d4 d8[ cis] d[ e] f4 |
  d cis a2 \bar "|."
}

tenorMusic = \relative c {
  f4 a a a |
  a a8[ g] f2 |
  a4 a a a |
  a a a2 |
  
  f8[ g] a4 a a |
  a e8[ g] f2 |
  a4 a8[ c] c4 bes |
  a a8[ g] f2 |
  
  f4 f f g |
  a c8[ bes] a2 |
  a4 a a c8[ e,] |
  f8( a4) gis8 a2 |
  
  f4 bes c f, |
  a d cis2 |
  a8[ bes] a[ g] a4 a |
  a e16[ f g8] f2 \bar "|."
}


bassMusic = \relative c {
  d4 f,8[ a] d4 f,8[ g] |
  a4 a d2 |
  d4 e f g |
  f8[ e] d4 a2 |
  
  d8[ e] f[ e] d4 f,8[ g] |
  a4 a d2 |
  a4 d8[ c] f4 g |
  a a, d2 |
  
  bes4 f bes8[ a] g4 |
  f c' f,2 |
  d'4 a d c |
  f e a,2 |
  
  bes4 bes' a f |
  d bes a2 |
  f'8[ g] f[ e] d4 f,8[ g] |
  a4 a d2 \bar "|."
}



origLyrics = \lyricmode {
  \set stanza = #"O. "
  Watch -- man, tell us of the night,
  What its signs of prom -- ise are.
  Trav -- ’ler, o’er yon moun -- tain’s height,
  See that glo -- ry beam -- ing star.
  Watch -- man, does its beau -- teous ray
  Aught of joy or hope fore -- tell?
  Trav -- ’ler, yes, it brings the day,
  Prom -- ised day of Is -- ra -- el.
}

lyricsA = \lyricmode {
  \set stanza = #"1. "

[Voice 1]
Here I pray to the God of Noise
God of Sound and God of Joy.
I quite hope that I might find sound
that could help my soul be found.
I like to listen and contemplate
all the greats that met their fate.
I like God and God likes me.
But what is this God I see? 
God is Great. He must quiet be.
I think that he must love me.

[God 1]
Your God of Joy I'm here to say
Music's not where you should stay.
Pledge your life to death and rot.
Be without your golden knot.
Go and see things other's did,
you should also leave your kid.
You are better than them all.
Now you must go to the mall.

[Inner Fairy]
Ignore that God, he means naught.
There are many Gods like that.
You can find one fit or fat.
Some of this or some of that.
Gods must be known from within.
Which one knows and loves most your sin?
Gods must love you, that is true.
Which one of them loves the blues?

[Voice 1]
Now I pray to the God of Joy
Listen now this is no ploy.
If there's more than one of Him
how can I protect my sins?
Lost in skin, no god above,
inside, outside, needing love.
If I find this is the case
how can I find a kind space.

[God 2]
Your God of Joy I'm here to say
Music it will save the day.
Pledge your life to song and art.
Share with joy and all your heart.
Go and see things other's did,
take with you your darling kid.
You are better than you were.
Now go in joy, undeterred.

[Voice 1]
Here I pray to a God of Noise
God of Sound and God of Joy.
I quite hope that I might find sound
that could help your God be found.
There are many Gods, don't you see?
Which one of them with you agrees?
Gods must be known first from within.
Why not look inside for a spin?
}

\bookpart{ 
    \tocItem \songTitle
    \header {
        title = \songTitle 
        poet = \songPoet 
        %dedication = \songDedication
        %translator = \songTranslator 
        composer = \tuneComposer 
        arranger = \tuneArranger 
        source = \tuneSource 
        copyright = \albumCopyright
        tagline = \albumTagline
    }

    \score {
        <<
            \new ChoirStaff <<
                \new Staff = women <<
                    \new Voice = "sopranos" { \voiceOne << \global \sopMusic >> }
                    \new Voice = "altos" { \voiceTwo << \global \altoMusic >> }
                >>
                \new Lyrics \lyricsto "altos" \origLyrics
                \new Lyrics \lyricsto "altos" \lyricsA
                \new Staff = men <<
                    \clef bass
                    \new Voice = "tenors" { \voiceOne << \global \tenorMusic >> }
                    \new Voice = "basses" { \voiceTwo << \global \bassMusic >> }
                >>
            >>
        >>
        \layout { }
        \midi {
            \set Staff.midiInstrument = "flute" 
            \context {
                \Staff \remove "Staff_performer"
            }
            \context {
                \Voice \consists "Staff_performer"
            }
        }
    }
}