\version "2.22.1"

\include "deutsch.ly" 

% schaltet Notations-Editorlink-Funktion aus
#(ly:set-option 'point-and-click #f)

#(set-global-staff-size 16)

%--------------------
% Maintainer: Sven Kaiser / e-mail: noten(at)oemsel.de
% General layout: three staffs (soprano/alto/tenor) with four text stanzas under each staff
% lobt_gott_ihr_christen_all_zugleich_herman_dalitz_s-a-t.ly
% 2013-01-04

\header {
 title = "Lobt Gott, ihr Christen all zugleich"
 composer = "Text und Melodie: Nikolaus Herman (1560)"
 poet = "Satz zu drei Stimmen: Christoph Dalitz (1989)"
 tagline = \markup { \column { \tiny \italic \center-align \with-url #"http://creativecommons.org/licenses/by/3.0/de/" \tiny \italic"Urheber / Rechteinhaber / Lizenz: C. Dalitz mit 'Creative Commons BY'" 
                                    \line {\tiny \italic \center-align "Rev. 3  -  Notensatzprogrammierung S. Kaiser mit https://lilypond.org   -   Notendownload: https://www.oemsel.de/noten" }}}
}  

\paper {
    paper-width = 21.00\cm
    paper-height = 29.7\cm
    top-margin = 1\cm
    bottom-margin = 1\cm
    left-margin = 2.0\cm
    right-margin = 1.0\cm
    print-page-number = ##f
    markup-system-spacing = #'((basic-distance . 14) )
    system-system-spacing = #'((minimum-distance . 25) )
%    ragged-bottom = ##t
%    ragged-last-bottom = ##f
    }


global = { \key d \minor \time 4/4 } 

SopNote = \relative c'
	{ 
          % Dicke des dicken Striches (End-, Wiederholungstaktlinien
          \override Score.BarLine #'thick-thickness = #4.2

%         \overrideProperty #"Score.NonMusicalPaperColumn"
%          #'line-break-system-details #'((Y-offset . 12))

          \partial 4 f4 |
          c'4 c c c |
          d c8 b a4 a |
          g4. a8 b4 b |
          a4. b8 c4 c |
 
%          \overrideProperty #"Score.NonMusicalPaperColumn"
%           #'line-break-system-details #'((Y-offset . 73))

          d c2 h4 |
          c2 r4 c |
          c c c a8 b |
          c4 b8 a g4 c |

%          \overrideProperty #"Score.NonMusicalPaperColumn"
%          #'line-break-system-details #'((Y-offset . 134))

          a g8 f g4 g |
          f2 r2 |
          r2 r4 g4 |
          g a8 b c4. b8 |
          a2. \bar "|."
      	} 

AltNote = \relative c' 
	{ 
	\partial 4 r4 |
        r2 r4 c4 |
        f f f f |
        f e8 d e4 e |
        f4. g8 a4 a |
        g g f f |
        e4. f8 g4 f |
        e e e f8 g |
        a4 g8 f e4 f |
        f2 e |
        r4 f2 e4 |
        f2 e |
        d4 f f e |
        f2.
	} 

TenNote = \relative c
	{ 
	\partial 4 r4 |
        r1 |
        r2 r4 f4 |
        c' c c c |
        d c8 b a4 a |
        b c d d |
        c2. r4 |
        r2 r4 c4 |
        c c c a8 b |
        c4 b8 a g4 c |
        a g8 f g4 g |
        f8 g a b c4 c |
        b a8 g a4 g |
        f2.
	} 

SopTxtLnA = \lyricmode {
	\set stanza = "1. " 
        Lobt Gott, ihr Chri -- sten |
        all - _ - zu -- |
        gleich, _ _ in |
        sei - - nem |
        hö -- _ chsten |
        Thron, der |
        heut schließt auf sein _ |
        Him -- mel -- _ reich und |
        schenkt uns _ sei -- nen |
        Sohn,
        und |
        schenkt uns _ sei -- nen |
        Sohn.
        } 

SopTxtLnB = \lyricmode {
	\set stanza = "2. " 
        Er kommt aus sei -- nes |
        Va - _ -  ters |
        Schoß _ _ und |
        wird _ _ ein |
        Kind -_ lein |
        klein. Er |
        liegt dort e -- _ lend, |
        nackt und _ bloß in |
        ei -- nem _ Krip -- pe -- | 
        lein,
        in ei -- nem _ Krip -- pe -- |
        lein. |
} 

SopTxtLnC = \lyricmode {
	\set stanza = "3. " 
        Ent -- äu -- ßert sich all |
        sei - _ - ner |
        G’walt, _ _ wird |
        nie - - drig |
        und _ ge -- |
        ring, und |
        nimmt an ei -- nes _ |
        Knechts Ge -- stalt, _  der |
        Schö -- pfer _ al -- ler  |
        Ding,
        der
        Schö -- pfer _ al -- ler |
        Ding.
} 

SopTxtLnD = \lyricmode {
	\set stanza = "4. " 
        Heut schließt er wie -- der |
        auf _ _ _ die |
        Tür _ _  zum |
        schö - - nen |
        Pa - ra- |
        deis. Der |
        Che -- rub steht nicht _ |
        mehr da - für. Gott |
        sei Lob, _ Ehr und |
        Preis,
        Gott |
        sei Lob, _ Ehr und |
        Preis.
} 

AltTxtLnA = \lyricmode {
	\set stanza = "1. " 
        Lobt Gott, ihr Chri -- sten |
        all _ _ _ zu -- |
        gleich, _ _ in |
        sei -- nem hö -- chsten |
        Thron, _ _ der |
        heut schließt auf sein _ |
        Him -- mel -- _ reich und |
        schenkt uns sei -- nen |
        Sohn,
        und |
        schenkt uns  sei -- nen |
        Sohn.        
} 

AltTxtLnB = \lyricmode {
	\set stanza = "2. " 
        Er kommt aus sei -- nes |
        Va - _ -  ters |
        Schoß _ _ und |
        wird ein Kind -- lein |
        klein. _ _ Er |
        liegt dort e -- _ lend, |
        nackt und _ bloß in |
        ei -- nem
        Krip -- pe -- | 
        lein, in |
        ei -- nem Krip -- pe -- |
        lein. |
} 

AltTxtLnC = \lyricmode {
	\set stanza = "3. " 
        Ent -- äu -- ßert sich all |
        sei - _ - ner |
        G’walt, _ _ wird |
        nie -- drig und ge -- |
        ring, _ _ und |
        nimmt an ei -- nes _ |
        Knechts Ge -- stalt, _  der |
        Schö -- pfer
        al -- ler |
        Ding, der |
        Schö -- pfer al -- ler |
        Ding.
} 


AltTxtLnD = \lyricmode {
	\set stanza = "4. " 
        Heut schließt er wie -- der |
        auf _ _ _ die |
        Tür _ _  zum |
        schö -- nen Pa -- ra -- |
        deis. _ _ Der |
        Che -- rub steht nicht _ |
        mehr da - für. Gott |
        sei Lob,
        Ehr und |
        Preis, Gott |
        sei Lob, Ehr und |
        Preis.
}


TenTxtLnA = \lyricmode {
	\set stanza = "1. " 
        Lobt Gott, ihr Chri -- sten |
        all  zu -- _ gleich, in |
        sei -- nem hö -- chsten |
        Thron, der |
        heut schließt auf sein _ |
        Him -- mel -- _ reich und |
        schenkt uns _ sei -- nen |
        Sohn, _ _ _ _ und |
        schenkt uns _ sei -- nen
        Sohn.
} 

TenTxtLnB = \lyricmode {
	\set stanza = "2. " 
        Er kommt aus sei -- nes |
        Va -- ters _ Schoß und |
        wird ein Kind -- lein |
        klein. Er |
        liegt dort e -- _ lend, |
        nackt und _ bloß in |
        ei -- nem _ Krip -- pe -- | 
        lein, _ _ _ _ in |
        ei -- nem _ Krip -- pe -- |
        lein. |
} 

TenTxtLnC = \lyricmode {
	\set stanza = "3. " 
        Ent -- äu -- ßert sich all |
        sei -- ner _ G’walt, wird |
        nie -- drig und ge -- |
        ring,
        und |
        nimmt an ei -- nes _ |
        Knechts Ge -- stalt, _  der |
        Schö -- pfer _ al -- ler  |
        Ding, _ _ _ _ der |
        Schö -- pfer _ al -- ler |
        Ding.
} 

TenTxtLnD = \lyricmode {
	\set stanza = "4. " 
        Heut schließt er wie -- der |
        auf die _ Tür zum |
        schö -- nen Pa -- ra -- |
        deis.
        Der |
        Che -- rub steht nicht _ |
        mehr da - für. Gott |
        sei Lob, _ Ehr und |
        Preis, _ _ _ _ Gott |
        sei Lob, _ Ehr und |
        Preis.
}


% Aufbau SATB mit einzelnen Notenzeilen und (mehrstrophigen) Text unter jeder Notenzeile
\score {
	\new ChoirStaff << 
		\new Staff = "SopStf" \with { \consists "Ambitus_engraver"} <<
                        \clef "G2"
			\set Staff.instrumentName = \markup {\center-align {"Sopran"}}
			\new Voice = "SopVce" {\global \SopNote} 
		>>
			\new Lyrics = SopTxtLnA { s1 }
			\new Lyrics = SopTxtLnB { s1 }
			\new Lyrics = SopTxtLnC { s1 }
			\new Lyrics = SopTxtLnD { s1 }

		\new Staff ="AltStf" \with { \consists "Ambitus_engraver"} <<
                        \clef "G2"
			\set Staff.instrumentName = \markup {\center-align {"Alt "}}
			\new Voice = "AltVce" {\global \AltNote} 
		>>
			\new Lyrics = AltTxtLnA { s1 }
			\new Lyrics = AltTxtLnB { s1 }
			\new Lyrics = AltTxtLnC { s1 }
			\new Lyrics = AltTxtLnD { s1 }
                        
		\new Staff ="TenStf" \with { \consists "Ambitus_engraver"} <<
			\clef "G2_8"
			\set Staff.instrumentName = \markup {\center-align {"Tenor "}}
			\new Voice = "TenVce" {\global \TenNote} 
		>>
			\new Lyrics = TenTxtLnA { s1 }
			\new Lyrics = TenTxtLnB { s1 }
			\new Lyrics = TenTxtLnC { s1 }
			\new Lyrics = TenTxtLnD { s1 }

		% Bei gleichem Text für alle Notenzeilen
		\context Lyrics = SopTxtLnA \lyricsto SopVce \SopTxtLnA
		\context Lyrics = SopTxtLnB \lyricsto SopVce \SopTxtLnB
		\context Lyrics = SopTxtLnC \lyricsto SopVce \SopTxtLnC
                \context Lyrics = SopTxtLnD \lyricsto SopVce \SopTxtLnD
		\context Lyrics = AltTxtLnA \lyricsto AltVce \AltTxtLnA
		\context Lyrics = AltTxtLnB \lyricsto AltVce \AltTxtLnB
		\context Lyrics = AltTxtLnC \lyricsto AltVce \AltTxtLnC
                \context Lyrics = AltTxtLnD \lyricsto AltVce \AltTxtLnD
		\context Lyrics = TenTxtLnA \lyricsto TenVce \TenTxtLnA
		\context Lyrics = TenTxtLnB \lyricsto TenVce \TenTxtLnB
		\context Lyrics = TenTxtLnC \lyricsto TenVce \TenTxtLnC
                \context Lyrics = TenTxtLnD \lyricsto TenVce \TenTxtLnD
	>>

   	%\midi { \context { \Score tempoWholesPerMinute = #(ly:make-moment 120 4) } }

    \layout { 
  	% Steuert die Höhe der Taktnummerierung über dem System        
        \context { \Score \override BarNumber #'padding = #2.0 } 
        % steuert die Einrückung des ersten Systems; Standardwert = automatisch eingerückt
        indent = #10
    }	

}