\version "2.16.1"

%% additional definitions required by the score:
%\language "=deutsch"

#(ly:set-option 'point-and-click #f)


%--------------------
% Maintainer: Sven Kaiser / e-mail: noten(at)oemsel.de
% altboehmische_weihnachtslieder-2c_tutti_das_volk.ly
% 2013-11-01
\header {
    dedication = \markup {\with-color #white "Altböhmisches Weihnachtlied"}
    title = \markup {\with-color #white "Die Engel und die Hirten"}
    subtitle = "3: Tutti - Das Volk"
    breakbefore = ##f
    tagline = \markup { \tiny \italic "Rev. 1  -  Notensatzprogrammierung S. Kaiser mit http://lilypond.org   -   Notendownload: www.oemsel.de/noten" }}


#(set-global-staff-size 16)
\paper {
    paper-width = 21.0\cm
    paper-height = 29.7\cm
    top-margin = 0.8\cm
    bottom-margin = 1.3\cm
    left-margin = 2\cm
    right-margin = 2\cm
    print-page-number = ##f
}
\layout {
    \context { \Score
        skipBars = ##t
        autoBeaming = ##f
        }
    }
SopVoice =  \relative c''
{
    \set melismaBusyProperties = #'(melismaBusy beamMelismaBusy)
    % Dicke der Taktlinien
    \override Score.BarLine #'hair-thickness = #1.2
    % Dicke des dicken Striches (End-, Wiederholungstaktlinien
    \override Score.BarLine #'thick-thickness = #3.6
    \overrideProperty #"Score.NonMusicalPaperColumn"
      #'line-break-system-details #'((Y-offset . 14) )
    \clef "treble" \key g \major \time 3/4
    d4( ^\f d8[ b8]) e8([ c8] |
    d4 d8[ b8]) e8[( c8] |
    d4 b8[ d8] a8[ b8] |
    g2) r4 |
    d'4( d8[ b8] e8[ c8] \break |

    \overrideProperty #"Score.NonMusicalPaperColumn"
     #'line-break-system-details #'((Y-offset . 70) )

    d4 d8[ b8] e8[ c8)] |
    d4^> ( b8^>[ d8^>] a8^>[ b8^>] |
    g2) r4 |
    g4 ^\mf b8 g8 b8 ^\> d8 \! |
    g,4 ^\p b8 g8 a8 d,8 \break |

    \overrideProperty #"Score.NonMusicalPaperColumn"
     #'line-break-system-details #'((Y-offset . 131) )

    g4 ^\mf b8 g8 b8 ^- d8 ^- |
    g,4 ^\> b8 \! g8 a8 ^> d,8 |
    \stemDown
    d'4 ^\f b8 ^\< ([ d8]) a8 ^>([ b8]) \! |
    g2 r4 |
    \bar "|."
    }


AltVoiceOne =  \relative c'' 
{
    \set melismaBusyProperties = #'(melismaBusy beamMelismaBusy)
    \clef "treble" \key g \major \time 3/4
    \once \override TextScript #'padding = #3.8
    \slurUp
    g4( ^\f ^\markup{{" "}} b8[ g8]) c8([ a8] |
    b4 b8[ g8]) c8([ a8] |
    g4 g4 fis4 |
    g2) r4 |
    g4( b8[ g8] c8[ a8] |
    \once \override TextScript #'padding = #3.8
    b4 ^\markup{{" "}} b8[ g8] c8 [ a8]) |
    g4^> g8^>[ b8^>] fis4 |
    g2 r4 ^\markup \bold\italic {" a due"} |
    \stemUp
    \once \override TextScript #'X-offset = #2.0
    d4 ^\markup{\dynamic {"mf "}} g8 d8 g8 ^\> b8 \! |
    d,4 ^\p g8 d8 fis8 d8 |
    \once \override TextScript #'padding = #3.8
    d4 ^\mf ^\markup{{" "}} g8 d8 g8 ^- b8^- |
    d,4 ^\> g8 \! d8 fis8 ^> d8 |
    g4 ^\f ^\< g4  fis4 \! |
    d2 r4 |
    \bar "|."
    }

AltVoiceTwo =  \relative c'' 
{
    \set melismaBusyProperties = #'(melismaBusy beamMelismaBusy)
    \clef "treble" \key g \major \time 3/4
    \once \override TextScript #'padding = #3.8
    \slurUp
    \hideNotes
    g4 b8[ g8]) c8([ a8] |
    b4 b8[ g8]) c8([ a8] |
    g4 g4 fis4 |
    g2) r4 |
    g4( b8[ g8] c8[ a8] |
    b4 b8[ g8] c8 [ a8]) |
    g4 g8[ b8] fis4 |
    g2 r4 |
    \unHideNotes
    \stemDown
    b,4 d8 b8 d8 g8 |
    b,4 d8 b8 c8 c8 |
    \once \override TextScript #'padding = #3.8
    b4 d8 b8 d8 g8 |
    b,4 d8 b8 c8 c8 |
    b4 d4 c4 |
    b2 r4 |
    \bar "|."
}

    
TenVoiceOne =  \relative c' 
{
    \set melismaBusyProperties = #'(melismaBusy beamMelismaBusy)
    \clef "treble_8" \key g \major \time 3/4
    \once \override TextScript #'padding = #3.8
    b4( ^\f ^\markup{{" "}} d4 fis4 |
    g4 d4) a4( |
    b4 d4 c4 |
    b2) r4 |
    b4( ^\markup{{" "}} d4 fis4 |
    \once \override TextScript #'padding = #3.8
    g4 d4 a4) |
    b4( d4 c4 |
    b2) r4 ^\markup \bold\italic {" a due"} |
    \stemUp
    \once \override TextScript #'X-offset = #2.0
    b4 ^\markup{\dynamic {"mf "}} d8 b8 d8 ^\tweak #'Y-extent #-1 \> g8\! |
    b,4 ^\p d8 b8 c8 c8 |
    \once \override TextScript #'padding = #3.8
    b4 ^\mf ^\markup{{" "}} d8 b8 d8 ^- g ^- |
    b,4 ^\> d8 \! b8 c8 ^> c8 |
    b4 ^\f ^\< d4 c4 \! |
    b2 r4 |
    \bar "|."
}

TenVoiceTwo =  \relative c' 
{
    \set melismaBusyProperties = #'(melismaBusy beamMelismaBusy tieMelismaBusy )
    \clef "treble_8" \key g \major \time 3/4
    \once \override TextScript #'padding = #3.8
    \stemDown
    \hideNotes
    b4( d4 fis4 |
    g4 d4) a4( |
    b4 d4 c4 |
    b2) r4 |
    b4( d4 fis4 |
    g4 d4 a4) |
    b4( d4 c4 |
    b2) r4 |
    \unHideNotes
    g2. |
    g2. |
    \tieDown
    g2. ~ |
    g2. |
    g2.~ |
    g2 r4 |
    \bar "|."
}


BasVoiceOne =  \relative c' {
    \clef "bass" \key g \major \time 3/4
    g2 ^\f g4 |
    g2 g4 |
    g2 d4 |
    g2 r4 |
    g2 g4 |
    g2 g4 |
    g2 d4 |
    g2 r4 |
    \stemUp
    \once \override TextScript #'X-offset = #2.0
    d2. ^\markup{\dynamic {"mf "} \bold\italic {"dolce"}} |
    d2. ^\p |
    \tieUp
    \once \override TextScript #'padding = #3.8
    d2.~ ^\mf ^\markup{{" "}}  |
    d2. |
    d2.~ ^\f ^\<|
    d2 \! r4 |

    
    \bar "|."
    }

BasVoiceTwo =  \relative c' {
    \clef "bass" \key g \major \time 3/4
    \once \override TextScript #'padding = #3.8
    g2 ^\markup{{" "}} g4 |
    g2 g4 |
    g2 d4 |
    g2 r4 |
    g2 g4 |
    \once \override TextScript #'padding = #3.8
    g2 ^\markup{{" "}} g4 |
    g2 d4 |
    g2 r4 ^\markup \bold\italic {" a due"} |
    \stemDown
    g,2.  |
    g2. |
    \tieDown
    g2.~ |
    g2. |
    g2.~ |
    g2 r4 |
    \bar "|."
    }    
    
TextSopAlt =  \lyricmode {
  Wahr -- lich, die En -- gel ver -- kün -- di -- gen heut Beth -- le -- hems
  Hit -- ten -- volk gar gro -- ße Freud'. Nun soll es wer -- den Frie -- de auf Er -- den
  den Men -- schen al -- len ein Wohl -- ge -- fal -- len. Eh -- re sei Gott!
}

TextTen =  \lyricmode {
  Wahr -- lich, die En -- gel ver -- kün -- di -- gen heut Beth -- le -- hems
  Hit -- ten -- volk gar gro -- ße Freud'. Eh -- re
  sei __ Gott! __
}

TextBasOne =  \lyricmode {
  Wahr, die En -- gel kün -- den heut' Beth -- l'hems
  Hir -- ten gro -- ße Freud'. Eh -- re
  sei __ Gott! __
}


% The score definition
\score {
    <<
        \new ChoirStaff \with { \override SpanBar #'transparent = ##t }
        <<
            \new Staff <<
                \set Staff.instrumentName = " Sopran "
                \context Staff << 
                  \context Voice = "SopVoice" { \SopVoice }
                    \new Lyrics \lyricsto "SopVoice" \TextSopAlt
                    >>
                >>
            \new Staff <<
                \set Staff.instrumentName = " Alt "
                \context Staff << 
                    \context Voice = "AltVoiceOne" { \AltVoiceOne }
                    \new Lyrics \lyricsto "AltVoiceOne" \TextSopAlt
                    \context Voice = "AltVoiceTwo" { \AltVoiceTwo }
                    >>
                >>
            \new Staff <<
                \set Staff.instrumentName = " Tenor "
                \context Staff << 
                    \context Voice = "TenVoiceOne" { \TenVoiceOne }
                    \context Voice = "TenVoiceTwo" { \TenVoiceTwo }
                    \new Lyrics \lyricsto "TenVoiceTwo" \TextTen
                    >>
                >>
            \new Staff << 
		\set Staff.instrumentName = " Bass "
			\context Voice = "BasVoiceOne" { \BasVoiceOne }
                        \new Lyrics \lyricsto "BasVoiceOne" \TextBasOne
                        
			\context Voice = "BasVoiceTwo" { \BasVoiceTwo } 
                        %\new Lyrics \lyricsto "BasVoiceTwo" \TextBasOne
            >>
            
            >>
       
      >>


       \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

        % f (Standardwert) = letzte/s Zeile/System wird auf Zeilenlänge gestreckt
	%ragged-last = ##t
       }

}

\score {
<<
\new Voice = "Sopran " { \autoBeamOff \SopVoice }
\new Voice = "Alt I" { \autoBeamOff \AltVoiceOne }
\new Voice = "Alt II" { \autoBeamOff \AltVoiceTwo }
\new Voice = "Tenor I" { \autoBeamOff \TenVoiceOne }
\new Voice = "Tenor II" { \autoBeamOff \TenVoiceTwo }
\new Voice = "Bass I" { \autoBeamOff \BasVoiceOne }
\new Voice = "Bass II" { \autoBeamOff \BasVoiceTwo }
>>
\midi { }
}