\version "2.14.2"

songTitle = "Introvert at a Halloween Party"
songPoet = "S.W. Black"
songCopyright = "2015 S.W.Black"

tuneArranger = \markup { tune of \italic{ Come Thou Long Expected Jesus } }
tuneComposer = \markup { \italic{Stuttgart}, Christian F. Witt (c. 1660–1716)}
tuneSource = \markup{from \italic{The Church Hymnary}, 1902} %, via \italic{HymnsAndCarolsOfChristmas.com}}
    %source = \markup { "from" \italic "CyberHymnal.org"}

albumProduct = "Halloween Carols"
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 g \major
    \time 4/4
    \autoBeamOff
    \tempo 4 = 105
}

sopMusic = \relative c' {
  d4 d g g |
  a a b g |
  d' d e c |
  a d b2 |
  
  b4 b a b |
  g a g fis |
  g e d g |
  g fis g2 \bar "|."
}

altoMusic = \relative c' {
  d4 d b b |
  e d d d |
  d g g g |
  g fis g2 |
  g4 g fis fis |
  b, e d d |
  d c b d |
  d d d2 \bar "|."
}

tenorMusic = \relative c' {
  b4 a g g |
  g fis g b |
  g b c e |
  d d d2 |
  
  e4 b c b |
  b a a a |
  g g d' b |
  a8[ b] c4 b2 \bar "|."
}

bassMusic = \relative c {
  g'4 fis e d |
  c d g g, |
  b g c a |
  d d g2 |
  
  e4 e e dis |
  e cis d c |
  b c g b8[ c] |
  d4 d g,2 \bar "|."
}

origLyrics = \lyricmode {
  \set stanza = #"O. "
  Come, Thou long ex -- pect -- ed Je -- sus,
  born to set Thy peo -- ple free;
  from our fears and sins re -- lease us, let us find our rest in Thee.
}

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

Goodness knows I don't think I can
keep drinking this swill tonight.
Halloween so long and festive
please bring me some fun tonight.

Do you think the wombat over there
is real or just a gag.
Or maybe the gag's on me and
I should find a myself bag.

Like a wombat, I'm a loner
but I don't choose to eat grass.
I am not a good digger.
A wombat could beat me, and fast.

Wombats kind of look like little teddy bears.
They're not that bad.
Some bears have gone on benders.
Found drinking beers and smashing pads.

Am I going to be a drunken
bear or quiet wombat?
Will my party animal flourish
or will I take a nap?

If I take a nap I could dream
I was a golden wombat.
If dreamed I was a female
my pouch would point to the aft.

Maybe instead of a nap I should
read a book, nice and fun.
It could be something festive
or perhaps I should say I'm done.

}

\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 "sopranos" \origLyrics
                \new Lyrics \lyricsto "sopranos" \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"
            }
        }
    }
}