\include "deutsch.ly" 

#(ly:set-option 'point-and-click #f)

#(set-default-paper-size "a4")

% Sinnvoller Bereich ca. 17 ... 21
#(set-global-staff-size 18) 


\version "2.16.1" 

global = { \key d \minor \time 2/2 } 


OberStINoten = \relative c''
{ 
  % Dicke des dicken Striches (End-, Wiederholungstaktlinien
  \override Score.BarLine #'thick-thickness = #3.6
 
         \overrideProperty #"Score.NonMusicalPaperColumn"
          #'line-break-system-details #'((Y-offset . 9))
  d2 es8 f g es f a a a b4 f8 g |
  a4 b,8 c d4. c8 h1 \breathe \break |
         \overrideProperty #"Score.NonMusicalPaperColumn"
          #'line-break-system-details #'((Y-offset . 63))
  b2 b4 c8 d es4. f8 g4 f8 g |
  a4 g8 a b2 b1 \breathe |
  b2 a8. b16 a8 g f8. d16 e8 f g8. a16 g8 f |
         \overrideProperty #"Score.NonMusicalPaperColumn"
          #'line-break-system-details #'((Y-offset . 117))

  es2 d4. c8 h1 \breathe |
  g'4. f8 es2 f4. e8 d2 |
  es8 d c b16 c a8 g a4 h1 |
} 

OberStIINoten = \relative c''
{ 
  h2 c8 d es c d f f es d4 d |
  es8 f g2 fis4 g1 \breathe |
  d2 es4. f8 g2 d4. es8 |
  f2 f4 es8 f g1 \breathe |
  d2 f8. g16 f8 e d8. b16 c8 d es8. f16 es8 d |
  c4 g' g fis g1 \breathe |
  es4. f8 g2 d4. e8 f4 f, |
  c'8 b a g d' e fis e16 fis g1|
} 

SopNote = \relative c''
{ 
  g2 g f b |
  a4( g) a2 g1 \breathe |
  g2 b c b |
  c d b1 \breathe |
  b2 c d b |
  c a g1 \breathe |
  g2 g f b |
  a4( g2) fis4 |
  g1 |
  \bar "|."
} 

AltNote = \relative c' 
{ 
  d2 c d f |
  es4( b) d2 d1 |
  d2 g4.( f8) es2 d |
  f f es1 |
  d2 f f es |
  es d d1 |
  es2 c d f |
  es d d1 |
} 

TenNote = \relative c' 
{ 
  h2 c a d |
  c4( g2) fis4 g1 \breathe |
  b2 g g g |
  a b g1 \breathe |
  g2 a b g |
  a4( g2) fis4 g1 \breathe |
  g2 g a d |
  c4 b a2 g1 |
} 

BasNote = \relative c' 
{ 
  g2 es d b |
  c4( es) d2 g,1 |
  g'2 es4.( d8) c2 g' |
  f b, es1 |
  g2 f b, es |
  c d g,1 |
  c2 es d b |
  c d g,1 |
} 

TxtLnA = \lyricmode {
\set stanza = "1. " 
Nun komm, der Hei -- den Hei -- land, 
der Jung -- frau -- en Kind er -- kannt, 
daß sich wun -- der al -- le Welt. 
Gott solch Ge -- burt ihm be -- stellt.
} 

TxtLnB = \lyricmode {
\set stanza = "2. " 
Er ging aus der Kam -- mer sein,
dem könig -- lich -- en Saal so rein,
Gott von Art und Mensch, ein Held,
sein Weg er zu lau -- fen eilt.
} 

TxtLnC = \lyricmode {
\set stanza = "3. " 
Sein Lauf kam vom Va -- ter her
und kehrt wie -- der zum Va -- ter,
fuhr hin -- unt -- er zu der Höll
und wie -- der zu Got -- tes Stuhl.
} 

TxtLnD = \lyricmode {
\set stanza = "4. " 
Dein Krip -- pen glänzt hell und klar,
die Nacht gibt ein neu Licht dar.
Dun -- kel muß nicht kom -- men drein,
der Glaub bleibt im -- mer im Schein.
} 

TxtLnE = \lyricmode {
\set stanza = "5. " 
Lob sei Gott dem Va -- ter g'tan,
Lob sei Gott seim ein -- gen Sohn,
Lob sei Gott dem Heil -- gen Geist
Im -- mer und in Ew -- ig -- keit!
} 


%--------------------
% Maintainer: Sven Kaiser / e-mail: noten(at)oemsel.de
% nun_komm_der_heiden_heiland_johann_crueger.ly
% 2012-12-22

\header {
  title ="Nun komm, der Heiden Heiland"
  subsubtitle =\markup { \normalsize \normal-text "Musik: Einsiedeln 12. Jh.        Tonsatz: Johann Crüger 1649        Text: Martin Luther n. Ambrosius von Mailand"}
 tagline = \markup { \tiny \italic"Rev. 2  -  Notensatzprogramm: http://lilypond.org   -   Notendownload: www.oemsel.de/noten" }
}

% Defintion Formate Seitensatz
\paper{
  top-margin = 0.7\cm
  left-margin = 2\cm
  line-width = 18\cm
  bottom-margin = 1.4\cm  

  % If true, systems not spreaded vertically across all "not-last" pages; def. = false. 
  ragged-bottom = ##t
  print-page-number = ##f
}

% Aufbau SATB mit SA- und TB-Notenzeilen und (mehrstrophigen) Text zwischen den Notenzeilen
\score {
	\new ChoirStaff << 

		\new Staff = "Oberstimme_I_Stf"
                              \with { instrumentName = \markup {
                              \column {\center-align "Ober-"
                              \line {\center-align "stimme I" }}}}
                << 
			\clef "G" 
			\key d \minor
			\OberStINoten
		>> 

		\new Staff = "Oberstimme_II_Stf" 
                       \with { instrumentName = \markup {
                              \column {\center-align "Ober-"
                              \line {\center-align "stimme II" }}}}
                << 
			\clef "G" 
			\key d \minor
			\OberStIINoten
		>> 

		\new Staff = "SopAltStf" 
                      \with { instrumentName = \markup {
                              \column {\center-align "Sopran"
                              \line {\center-align "Alt" }}}}             
                << 
			\clef "G" 
			\new Voice = "SopVce" { \voiceOne << 
				\autoBeamOn 
				{ \global \SopNote } 
				>>
			}
			\new Voice = "AltVce" { \voiceTwo << 
				\autoBeamOff 
				{ \global \AltNote } 
				>>
			} 
		>> 

		\new Lyrics = CenTxtLnA 
		\new Lyrics = CenTxtLnB 
		\new Lyrics = CenTxtLnC 
		\new Lyrics = CenTxtLnD 
		\new Lyrics = CenTxtLnE 
	
		\new Staff = TenBasStf 
                      \with { instrumentName = \markup {
                              \column {\center-align "Tenor"
                              \line {\center-align "Bass" }}}}                             
                << 
			\clef "F" 
			%\set Staff.instrumentName = \markup {\center-align {"Tenor " \line {"Bass"}}}
			\new Voice = "TenVce" { \voiceOne << 
				\autoBeamOff 
				{ \global \TenNote } 
				>>
			} 
			\new Voice = "BasVce" { \voiceTwo << 
				\autoBeamOn 
				{ \global \BasNote } 
				>>
			} 
		>> 
	
	\context Lyrics = CenTxtLnA \lyricsto SopVce \TxtLnA 
	\context Lyrics = CenTxtLnB \lyricsto SopVce \TxtLnB 
	\context Lyrics = CenTxtLnC \lyricsto SopVce \TxtLnC 
	\context Lyrics = CenTxtLnD \lyricsto SopVce \TxtLnD 
	\context Lyrics = CenTxtLnE \lyricsto SopVce \TxtLnE 
	
	>> 

	% erste Zahl: Schläge pro Minute / zweite Zahl: Bezugsnotenlänge, z.B. 4 entsprich Viertelnote
	%\midi { \context { \Score tempoWholesPerMinute = #(ly:make-moTenBasStft 240 12) } }

	\layout { 
        	% erster Parameter: Abstand Notenlinie / Text in einer Stimme ->
	  % Je größer der Zahlenwert desto kleiner der Abstand ; Standardwert -4
        	% zweiter Parameter: Abstand Text / Notenlinie zwischen zwei verschiedenen Stimmen ->
	  % Je größer der Zahlenwert desto größer der Abstand ; Standardwert 4
        	\context { \Staff \override VerticalAxisGroup #'minimum-Y-extent = #'(1 . 4) }

	% schaltet die Nummerierung der Takte aus
	%\context { \Score \remove "Bar_number_engraver" } 

	% Steuert die Höhe der Taktnummerierung über dem System
	\context { \Score \override BarNumber #'padding = #2.0 } 

	}
}