\version "2.12.2"
\header {
  title = "Deo dicamus gratias"
  subtitle = "(Herr, unser Gott, wir danken dir)"
  composer = "Gottfried August Homilius (1714-1785)"
  enteredby = "Matthew Sly"
}

\paper {
  page-count = 2
}
    GlobalKey = {
\key g \major
\time 4/4       }

%{ The parts of the score are called:
One :bars 1 to 4
Two :the next 5 bars
Three: the next four bars
Four:the last 4 bars

then comes a letter 
S :Soprano
Ss:Second Soprano
A :Alto
T :Tenor
Ts:Second Tenor
B :Bass

The parts of the text are called this way:
deoA:One note per syllable
deoB:two notes for both "-ca" and "-mus"
deoC:two notes for both "de" and "-ca"
deoD:Only the "Gratias"

grati : a long "Gratias" a number is typed in for just how long
%}
%{-------------------------- Erste 4 Bars. -------------------------------%}
OneS = \relative g'{
d'4 d8 d\noBeam d4 d
e4. e8 e2
d4 d8 d\noBeam d4 g
fis4. e8 d2
}
OneSs = \relative g'{
b4 b8 c\noBeam b4 d
c4. c8 c2
b4 b8 c\noBeam b8 [d] c b
a4. a8 a2
}
OneA = \relative g'{
g4 g8 a\noBeam g4 g
g4. g8 g2
g4 g8 a\noBeam g4 g
a4. g8 fis2
}
OneT = \relative g'{
d4 d8 d\noBeam d [e] fis g
e4. c8 c2
d4 d8 d\noBeam d4 d
d4. d8 d2
}
OneTs = \relative g{
b4 b8 a\noBeam b [d] c b
c4. g8 g2
b4 b8 a\noBeam b4 d
d4. a8 a2
}
OneB = \relative g{
g4 g8 fis\noBeam g [b] a g
c4. c,8 c2
g'4 g8 fis\noBeam g [b] a g
d'4. d,8 d2
}

deoA = \lyricmode {
  De -- o di -- ca -- mus gra -- ti -- as!
}
deoB = \lyricmode {
  De -- o di -- ca -- _ mus _ gra -- ti -- as!
}

%{-------------------------- Bars 5 bis 9. -------------------------------%}

TwoS = \relative g''{
r2 g4. fis8
e2. fis8 e
d2. e8 d
cis8 b16 a b8 cis d a d4 ~
d cis d2
}
TwoSs = \relative g'{
r2 r4 d'4 ~
d c8 b c2 ~
c4 b8 a b2
a4 b8 cis d a d4 ~
d cis d2
}
TwoA = \relative g'{
r2 b4. a8
g2 a4. g8
fis2 g4. fis8
e4 fis8 g a4. g8 fis4 g fis2
}
TwoT = \relative g{
r2 b2
e4 c ~ c8 [b a c]
d4 b ~ b8 [a g b]
cis4 d8 e fis e d4 ~
d e d2
}
TwoTs = \relative g'{
r4 d8 c b c d b
c4. e8 a, b c a
b4. d8 g, a b g
a2 ~ a8 g a b
a4 a a2
}
TwoB = \relative g'{
d8 c b a g a b g
c b a g fis g a fis
b a g fis e fis g e
a4. g8 fis4. g8
a4 a, d2
}

gratiTwentyeight  = \lyricmode {  gra -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ti -- as! }
gratiTwentytwo  = \lyricmode {  gra -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ti -- as! }
gratiNineteen = \lyricmode {  gra -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ti -- as! }
gratiSixteen  = \lyricmode {  gra -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ti -- as! }
gratiFifteen  = \lyricmode {  gra -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ti -- as! }
gratiThirteen = \lyricmode {  gra -- _ _ _ _ _ _ _ _ _ _ _ _ _ ti -- as! }
gratiTwelve   = \lyricmode {  gra -- _ _ _ _ _ _ _ _ _ _ _ _ ti -- as! }
gratiTen      = \lyricmode {  gra -- _ _ _ _ _ _ _ _ _ _ ti -- as! }
gratiEight    = \lyricmode {  gra -- _ _ _ _ _ _ _ _ ti -- as! }


%{-------------------------- Bars 10 bis 13. -------------------------------%}

ThreeS = \relative g'{
a8 [c!] b d\noBeam c b a4
d4. d8 d2
R1
c4. c8 c2
}
ThreeSs = \relative g'{
fis8 [a] g b\noBeam a g fis4
b4. b8 b2
R1
a4. a8 a2
}
ThreeA = \relative g'{
d4 d8 d\noBeam d4 d
fis4. fis8 fis2
R1
e4. e8 e2
}
ThreeT = \relative g{
R1
d'4. d8 d2
b8 [d] c e\noBeam d c b4
c4. c8 c2
}
ThreeTs = \relative g{
R1
b4. b8 b2
gis8 [b] a c\noBeam b a gis4
a4. a8 a2
}
ThreeB = \relative g{
R1
b4. b,8 b2
e4 e8 e\noBeam e4 e
a4. a,8 a2
}

deoC = \lyricmode {  De -- _ o di -- ca -- _ mus gra -- ti -- as! }
deoD = \lyricmode {  gra -- ti -- as! }

%{-------------------------- Bars 14 bis ende. -------------------------------%}
FourS = \relative g'{
c2. b8 a
b d g2 fis8 e
fis d e fis g2 ~
g4 fis8 e fis4. g8
}
FourSs = \relative g'{
a2. g8 fis
g4 d'4 ~ d8 c d e
d1 ~
d2 ~ d4. d8
}
FourA = \relative g'{
fis8 g a fis d fis g a
g fis g b a2~
a8 fis g a b g a b
a4. g8 a4. b8
}
FourT = \relative g'{
d2 ~ d8 c d c
d1 ~
d8 a d c b d c b16 cis
d8 a d4 ~ d16 [e d cis d8] d8
}
FourTs = \relative g{
a2 g8 a b c
b c d4 ~ d8 e d cis
d c! b a g b a g
a2 ~ a4. a8
}
FourB = \relative g{
d8 e fis d g2 ~
g8 a b g d'4. d,8
d1 ~
d2 ~ d4. d8
}

gratiEnd = \lyricmode { as! }

%{-------------------------- Und jezt zusammen. -------------------------------%}

{
  \new ChoirStaff <<
    \new Staff<<
      \set Staff.instrumentName = "Sopran I"
      \set Staff.shortInstrumentName = ""
      {\GlobalKey \clef treble 
       \repeat volta 2 { \OneS  \TwoS} 
       \repeat volta 2 {\ThreeS \FourS}
       \alternative { { g''2. r4 } {g''1\fermata \bar"|."} } }
      \addlyrics { \deoA \deoA \gratiFifteen \deoC \deoD \gratiFifteen \gratiEnd}
    >>
    \new Staff<<
      \set Staff.instrumentName = "Sopran II"
      \set Staff.shortInstrumentName = ""
      {\GlobalKey \clef treble 
	  \repeat volta 2 {\OneSs \TwoSs}
 	  \repeat volta 2 {\ThreeSs \FourSs}
       \alternative { { d''2. r4 } {d''1\fermata } } }
      \addlyrics { \deoA \deoB \gratiTwelve \deoC \deoD \gratiEight \gratiEnd}
    >>
    \new Staff<<
      \set Staff.instrumentName = "Alto"
      \set Staff.shortInstrumentName = ""
      {\GlobalKey \clef treble 
	  \repeat volta 2 {\OneA \TwoA} 
	  \repeat volta 2 {\ThreeA \FourA}
       \alternative { { b'2. r4 } {b'1\fermata } } }
      \addlyrics { \deoA \deoA \gratiThirteen \deoA \deoD \gratiTwentytwo \gratiEnd}
    >>
    \new Staff<<
      \set Staff.instrumentName = "Tenor I"
      \set Staff.shortInstrumentName = ""
      {\GlobalKey \clef "treble_8" 
	  \repeat volta 2 {\OneT \TwoT}
	  \repeat volta 2 {\ThreeT \FourT}
       \alternative { { d'2. r4 } {d'1\fermata } } }
      \addlyrics { \deoB \deoA \gratiSixteen \deoD \deoC \gratiNineteen \gratiEnd}
    >>
    \new Staff<<
      \set Staff.instrumentName = "Tenor II"
      \set Staff.shortInstrumentName = ""
      {\GlobalKey \clef "treble_8" 
	  \repeat volta 2 {\OneTs \TwoTs}
	  \repeat volta 2 {\ThreeTs \FourTs}
       \alternative { { g2. r4 } {g1\fermata } } }
      \addlyrics { \deoB \deoA \gratiTwentytwo \deoD \deoC \gratiNineteen \gratiEnd}
    >>
    \new Staff<<
      \set Staff.instrumentName = "Baß"
      \set Staff.shortInstrumentName = ""
      {\GlobalKey \clef "bass" 
	  \repeat volta 2 {\OneB \TwoB}
	  \repeat volta 2 {\ThreeB \FourB}
       \alternative { { g,2. r4 } {g,1\fermata } } }
      \addlyrics { \deoB \deoB \gratiTwentyeight \deoD \deoA \gratiTen \gratiEnd}
    >>

   >>    
}