\version "2.18.2"

#(ly:set-option 'point-and-click #f)

%--------------------
% Maintainer: Sven Kaiser / e-mail: noten(at)oemsel.de
% vinum_schenk_ein_widmann.ly
% 2020-01-02


\header {
    composer = "Erasmus Widmann (1572 - 1634)"
    title = "Vinum schenk ein"
    poet =  "Aus 'Die musikalische Kurzweil' (1611)"
    tagline = \markup { \tiny \italic"Diese Noten sind gemeinfrei  -  Rev. 1  -  Notensatzprogrammierung S. Kaiser mit http://lilypond.org   -   Notendownload: www.oemsel.de/noten" }    
    }

#(set-global-staff-size 18.5)

\paper {
    paper-width = 21.0\cm
    paper-height = 29.7\cm
    top-margin = 1.5\cm
    bottom-margin = 2.0\cm
    left-margin = 2\cm
    right-margin = 2\cm
    print-page-number = ##f
    markup-system-spacing = #'((basic-distance . 5) (padding . 1.6) (stretchability . 30))
    system-system-spacing #'basic-distance = #0
    ragged-right = ##f
    ragged-last = ##f
}



PartPOneVoiceOne =  \relative b' {
    \clef "treble" \key g \major \time 6/4 r2. b4 b4 b4 | % 2
    b2. r2. | % 3
    b4 b4 b4 b2. | % 4
    b4 a4 g4 fis2. | % 5
    g4 g4 fis4 g2. | % 6
    r2. a4 a4 a4 | % 7
    a2. r2. | % 8
    a4 a4 a4 a2. | % 9
    d4 c4 a4 b4. a8 g4 | \barNumberCheck #10
    d'2 cis4 d2. \repeat volta 2 {
        | % 11
        g,4 g4 a4 b2. | % 12
        a4 g4 g4 fis2. | % 13
        g4 a4 b4 c2. | % 14
        a4 g4 a4 b4 ( a8 g8 fis4 ) | % 15
        g4 g4 fis4 g2. }
    }

PartPOneVoiceOneLyricsOne =  \lyricmode { Vi -- num schenk "ein!" Laß
    Was -- ser "sein!" \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4
    \skip4 Der Re -- ben -- saft gibt gu -- te "Kraft," \skip4
    \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4
    macht jung und alt fröh -- lich gar "bald," drum meid das "Bier,"
    trink Wein da -- "für, " __ }
PartPOneVoiceOneLyricsTwo =  \lyricmode { Der Wein ist "gut," macht
    fri -- schen "Mut!" Fa la la "la," fa la la "la."
    Me -- lan -- cho -- ley ver -- treibt er "frei," fa la la la la "la," fa -- la "la," "ab'r" Was
    -- ser -- "güss'" ma -- chen viel "Flüss'," käl -- ten den "Leib,"
    beim Wein drum "bleib, " __ fa la la "la." }
PartPOneVoiceOneLyricsFour =  \lyricmode { Drum Bru -- der "mein," weich
    nit vom "Wein!" \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4
    \skip4 Ver -- red ihn "nit," das ist mein "Bitt." \skip4 \skip4
    \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 Ich rat für --
    "wahr:" den Wein nicht "spar." Wein gnug du findst wanns Geld nur
    "gwinnst." __ }
PartPTwoVoiceOne =  \relative g' {
    \clef "treble" \key g \major \time 6/4 r2. g4 g4 g4 | % 2
    g2. r2. | % 3
    g4 g4 g4 g2. | % 4
    g4 fis4 d4 d2. | % 5
    d4 e4 d4 d2. | % 6
    r2. fis4 fis4 fis4 | % 7
    fis2. r2. | % 8
    fis4 fis4 fis4 fis2. | % 9
    a4 g4 fis4 e4 d4 e4 | \barNumberCheck #10
    fis4 e2 fis2. \repeat volta 2 {
        | % 11
        d4 e4 e4 g2. | % 12
        fis4 d4 e4 a,2. | % 13
        c4 e4 fis4 g2. | % 14
        fis4 e4 d4 g4 c,4 d4 | % 15
        d4 e4 d4 d2. }
    }

PartPTwoVoiceOneLyricsOne =  \lyricmode { Vi -- num schenk "ein!" Laß
    Was -- ser "sein!" \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4
    \skip4 Der Re -- ben -- saft gibt gu -- te "Kraft," \skip4
    \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 macht
    jung und alt fröh -- lich gar "bald," drum meid das "Bier," trink
    Wein da -- "für,"  }
PartPTwoVoiceOneLyricsTwo =  \lyricmode { Der Wein ist "gut," macht
    fri -- schen "Mut!" Fa la la "la," fa la la "la." Me -- lan -- cho -- ley ver -- treibt er "frei," fa la la la la "la," fa la "la," "ab'r" Was
    -- ser -- "güss'" ma -- chen viel "Flüss'," käl -- ten den "Leib,"
    beim Wein drum "bleib," fa la la la la "la." }
PartPTwoVoiceOneLyricsFour =  \lyricmode { Drum Bru -- der "mein," weich
    nit vom "Wein!" \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4
    \skip4 Ver -- red ihn "nit," das ist mein "Bitt." \skip4 \skip4
    \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 Ich rat für --
    "wahr:" den Wein nicht "spar." Wein gnug du findst wanns Geld nur
    "gwinnst." \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 }
PartPThreeVoiceOne =  \relative d' {
    \clef "treble_8" \key g \major \time 6/4 d4 d4 d4 d2. | % 2
    r2. d4 d4 d4 | % 3
    d2. r2. | % 4
    b4 d4 b4 a2. | % 5
    b4 a2 b2. | % 6
    d4 d4 d4 d2. | % 7
    r2. d4 d4 d4 | % 8
    d2. r2. | % 9
    fis4 e4 d4 b4 b4. cis8 | \barNumberCheck #10
    d4 a2 a2. \repeat volta 2 {
        | % 11
        b4 b4 cis4 d2. | % 12
        d4 d4 cis4 d2. | % 13
        e4 c4 d4 e2. | % 14
        d4 b4 a4 d4 a4 a4 | % 15
        b4 a2 b2. }
    }

PartPThreeVoiceOneLyricsOne =  \lyricmode { Vi -- num schenk "ein!" Laß
    Was -- ser "sein!" \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4
    Der Re -- ben -- saft gibt gu -- te "Kraft," \skip4 \skip4
    \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 macht jung
    und alt fröh -- lich gar "bald," drum meid das "Bier," trink Wein da
    -- "für," \skip4 \skip4 \skip4 \skip4 \skip4 }
PartPThreeVoiceOneLyricsTwo =  \lyricmode { Der Wein ist "gut," macht
    fri -- schen "Mut!" Fa la la "la," fa la "la." 
    Me -- lan -- cho -- ley ver -- treibt er "frei;" fa la la "la," fa la la la "la," "ab'r" Was -- ser
    -- "güss'" ma -- chen viel "Flüss'," käl -- ten den "Leib," beim
    Wein drum "bleib,"  fa la la la "la." }
PartPThreeVoiceOneLyricsFour =  \lyricmode { Drum Bru -- der "mein,"
    weich nit vom "Wein!" \skip4 \skip4 \skip4 \skip4 \skip4 \skip4
    \skip4 Ver -- red ihn "nit," das ist mein "Bitt." \skip4 \skip4
    \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 Ich rat für --
    "wahr:" den Wein nicht "spar." Wein gnug du findst wanns Geld nur
    "gwinnst." \skip4 \skip4 \skip4 \skip4 \skip4 }
PartPFourVoiceOne =  \relative g, {
    \clef "bass" \key g \major \time 6/4 r2. g4 g4 g4 | % 2
    g2. r2. | % 3
    g4 g4 g4 g2. | % 4
    e'4 fis4 g4 d2. | % 5
    b4 c4 d4 g,2. | % 6
    r2. d'4 d4 d4 | % 7
    d2. r2. | % 8
    d4 d4 d4 d2. | % 9
    d4 e4 fis4 g4. fis8 e4 | \barNumberCheck #10
    d4 a'4 a,4 d2. \repeat volta 2 {
        | % 11
        g4 e4 a4 g2. | % 12
        d4 b4 e4 d2. | % 13
        c4 a4 d4 c2. | % 14
        d4 e4 fis4 g4 ( fis8 e8 d4 ) | % 15
        b4 c4 d4 g,2. }
    }

PartPFourVoiceOneLyricsOne =  \lyricmode { Vi -- num schenk "ein!" Laß
    Was -- ser "sein!"  \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4
    \skip4 Der Re -- ben -- saft gibt gu -- te "Kraft," \skip4
    \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4
    macht jung und alt fröh -- lich gar "bald," drum meid das "Bier,"
    trink Wein da -- "für, " __ }
PartPFourVoiceOneLyricsTwo =  \lyricmode { Der Wein ist "gut," macht
    fri -- schen "Mut!" Fa la la "la," fa la la "la." 
    Me -- lan -- cho -- ley ver -- treibt er "frei," fa la la la la "la," fa la la "la,"
    "ab'r" Was -- ser -- "güss'" ma -- chen viel "Flüss'," käl -- ten
    den "Leib," beim Wein drum "bleib, " __ fa la la "la."
    }
PartPFourVoiceOneLyricsFour =  \lyricmode { Drum Bru -- der "mein,"
    weich nicht vom "Wein!" \skip4 \skip4 \skip4 \skip4 \skip4 \skip4
    \skip4 \skip4 Ver -- red ihn "nit," das ist mein "Bitt." \skip4
    \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 \skip4 Ich
    rat für -- "wahr:" den Wein nicht "spar." Wein gnug du findst wanns
    Geld nur "gwinnst. " __ }

% The score definition
\score {
    <<
        \new ChoirStaff \with { \override SpanBar #'transparent = ##t }
        <<
            \new Staff \with { \consists "Ambitus_engraver"} <<
                \set Staff.instrumentName = "Sopran"
                \set Staff.shortInstrumentName = "S"
                \context Staff << 
                    \context Voice = "PartPOneVoiceOne" { \PartPOneVoiceOne }
                    \new Lyrics \lyricsto "PartPOneVoiceOne" \PartPOneVoiceOneLyricsOne
                    \new Lyrics \lyricsto "PartPOneVoiceOne" \PartPOneVoiceOneLyricsTwo
                    \new Lyrics \lyricsto "PartPOneVoiceOne" \PartPOneVoiceOneLyricsFour
                    >>
                >>
            \new Staff \with { \consists "Ambitus_engraver"} <<
                \set Staff.instrumentName = "Alt"
                \set Staff.shortInstrumentName = "A"
                \context Staff << 
                    \context Voice = "PartPTwoVoiceOne" { \PartPTwoVoiceOne }
                    \new Lyrics \lyricsto "PartPTwoVoiceOne" \PartPTwoVoiceOneLyricsOne
                    \new Lyrics \lyricsto "PartPTwoVoiceOne" \PartPTwoVoiceOneLyricsTwo
                    \new Lyrics \lyricsto "PartPTwoVoiceOne" \PartPTwoVoiceOneLyricsFour
                    >>
                >>
            \new Staff \with { \consists "Ambitus_engraver"} <<
                \set Staff.instrumentName = "Tenor"
                \set Staff.shortInstrumentName = "T"
                \context Staff << 
                    \context Voice = "PartPThreeVoiceOne" { \PartPThreeVoiceOne }
                    \new Lyrics \lyricsto "PartPThreeVoiceOne" \PartPThreeVoiceOneLyricsOne
                    \new Lyrics \lyricsto "PartPThreeVoiceOne" \PartPThreeVoiceOneLyricsTwo
                    \new Lyrics \lyricsto "PartPThreeVoiceOne" \PartPThreeVoiceOneLyricsFour
                    >>
                >>
            \new Staff \with { \consists "Ambitus_engraver"} <<
                \set Staff.instrumentName = "Bass"
                \set Staff.shortInstrumentName = "B"
                \context Staff << 
                    \context Voice = "PartPFourVoiceOne" { \PartPFourVoiceOne }
                    \new Lyrics \lyricsto "PartPFourVoiceOne" \PartPFourVoiceOneLyricsOne
                    \new Lyrics \lyricsto "PartPFourVoiceOne" \PartPFourVoiceOneLyricsTwo
                    \new Lyrics \lyricsto "PartPFourVoiceOne" \PartPFourVoiceOneLyricsFour
                    >>
                >>
            
            >>
        
        >>
        \layout { 
  	% Steuert die Hoehe der Taktnummerierung ueber dem System        
        \context { \Score \override BarNumber.padding = #2.0 } 
        % steuert die Einrueckung des ersten Systems; Standardwert = automatisch eingerückt
        indent = #10
    }   
    }

\score {
<<
\new Voice = "Sopran" { \autoBeamOff \PartPOneVoiceOne }
\new Voice = "Alt" { \autoBeamOff \PartPTwoVoiceOne }
\new Voice = "Tenor" { \autoBeamOff \PartPThreeVoiceOne }
\new Voice = "Bass" { \autoBeamOff \PartPFourVoiceOne }
>>
\midi { }
}