\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-2b_doppelquartett_die_hirten.ly
% 2013-11-01
\header {
    dedication = \markup {\with-color #white "Altböhmisches Weihnachtlied"}
    title = \markup {\with-color #white "Die Engel und die Hirten"}
    subtitle = "2: Doppelquartett - Die Hirten"
    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( ^\mf 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 . 74) )

    d4 d8[ b8]) e8( ^\pp[ c8] |
    d4 b8[ d8] a8[ b8] |
    g2) r4 |
    g4 ^\markup{\dynamic {f} \bold\italic {" klangvoll"}} b8 g8 b8 ^\> d8 \! |
    g,4 ^> b8 g8 a8 ^> d,8 \break |

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

    g4 b8 g8 ^\< b8 ^- d8 ^- \! |
    g,4 ^\p b8 g8 a8 ^> d,8 |
    \stemDown
    d'4 ^\f b8^>([ d8]) a8([ b8]) |
    g2 r4 |
    \bar "|."
}


AltVoice =  \relative c'' 
{
    \set melismaBusyProperties = #'(melismaBusy beamMelismaBusy)
    \clef "treble" \key g \major \time 3/4
    \once \override TextScript #'padding = #3.8
    g4( ^\mf ^\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 ^\pp ([ a8] |
    g4 g4 fis4 |
    g2) r4 |
    d4 ^\markup{\dynamic {f} \bold\italic {" klangvoll"}} g8 d8 g8 ^\> b8 \! |
    d,4 ^> g8 d8 fis8 d8 |
    \once \override TextScript #'padding = #3.8
    d4 ^\markup{{" "}} g8 d8 ^\< g8 ^- b8^- \! |
    d,4 ^\p g8 d8 fis8 ^> d8 |
    g4 ^\f g4 ^> fis4 |
    d2 r4 |
    \bar "|."
}


TenVoice =  \relative c' 
{
    \set melismaBusyProperties = #'(melismaBusy beamMelismaBusy)
    \clef "treble_8" \key g \major \time 3/4
    \once \override TextScript #'padding = #3.8
    b4( ^\mf ^\markup{{" "}} d4 fis4 |
    g4 d4) a4( |
    b4 d4 c4 |
    b2) r4 |
    b4( ^\markup{{" "}} d4 fis4 |
    \once \override TextScript #'padding = #3.8
    g4 d4) a4( ^\pp |
    b4 d4 c4 |
    b2) r4 |
    b4( ^\markup{\dynamic {f} \bold\italic {" klangvoll"}} g8 b8 d8 ^\> g8)\! |
    b,4(^> d8 b8 c8 c8) |
    \once \override TextScript #'padding = #3.8
    b4( ^\markup{{" "}} g8 b8 ^\< d8 ^- g ^- \! ) |
    b,4 ( ^\p d8 b8 c8 ^> c8) |
    b4 ^\f d4 ^> c4 |
    b2 r4 |
    \bar "|."
}


BasVoiceOne =  \relative c' {
    \clef "bass" \key g \major \time 3/4
    g2 ^\mf g4 |
    g2 g4 |
    g2 d4 |
    g2 r4 |
    g2 g4 |
    g2 g4 ^\pp |
    g2 d4 |
    g2 r4 |
    \stemUp
    \once \override TextScript #'X-offset = #1.0
    d2. ^\markup{\dynamic {"mf "} \bold\italic {"dolce"}} |
    d2. |
    \tieUp
    \once \override TextScript #'padding = #3.8
    d2.~ ^\markup{{" "}}  |
    d2. |
    d2.~ |
    d2 r4 |
    \bar "|."
}

BasVoiceTwo =  \relative c' {
    \clef "bass" \key g \major \time 3/4
    \once \override TextScript #'padding = #3.8
    \hideNotes
    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"} |
    \unHideNotes
    \stemDown
    g,2.  |
    g2. |
    \tieDown
    g2.~ |
    g2. |
    g2.~ |
    g2 r4 |
    \bar "|."
}    
    
TextSopAltTen =  \lyricmode {
  Las -- set uns se -- hen in Bet -- le -- hems Stall,
  was uns ver -- hei -- ßen der himm -- li -- sche Schall,
  was wir dort fin -- den, las -- set uns kün -- den,
  las -- set uns prei -- sen in from -- men Wei -- sen.
  Hal -- le -- lu -- ja!
}

TextBasOne =  \lyricmode {
  Las -- set seh'n in Beth -- l'hems Stall,
  was ver -- hei -- ßen Him -- mels Schall.
  Hal -- le -- lu -- ja! __
}


% 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" \TextSopAltTen
                    >>
                >>
            \new Staff <<
                \set Staff.instrumentName = " Alt "
                \context Staff << 
                    \context Voice = "AltVoice" { \AltVoice }
                    \new Lyrics \lyricsto "AltVoice" \TextSopAltTen
                    >>
                >>
            \new Staff <<
                \set Staff.instrumentName = " Tenor "
                \context Staff << 
                    \context Voice = "TenVoice" { \TenVoice }
                    \new Lyrics \lyricsto "TenVoice" \TextSopAltTen
                    >>
                >>
            \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" { \autoBeamOff \AltVoice }
\new Voice = "Tenor" { \autoBeamOff \TenVoice }
\new Voice = "Bass I" { \autoBeamOff \BasVoiceOne }
\new Voice = "Bass II" { \autoBeamOff \BasVoiceTwo }
>>
\midi { }
}