\include "../include/global.ly"
\include "../include/common.ly"

lcl = { }

vI = \lyricmode {
  \set stanza = "Bach. "
  Mer _ hahn en neu -- e _ O -- ber -- keet an un -- sern _ Kam -- mer -- _ herrn.
  Ha _ gicht uns Bier, das _ steigt in's Heet, das ist der _ kla -- re _ Kern.
  Der Pfarr mag im -- mer bü -- se thun; ihr Speel -- leut _ halt _ euch _ flink!
  Der _ Kit -- tel _ wa -- _ ckelt _ Mie -- cken _ schun, das kle -- ne _ lu -- se _ Ding.
}

vII = \lyricmode {
  \set stanza = "Lind1. "
  Nu _ gröns -- kar det i _ da -- lens famn nu dof -- tar _ äng och _ lid.
  Kom _ med, kom med på _ vand -- rings -- färd i vå -- rens _ gla -- da _ tid!
  Var dag är som en gyll -- ne skål till bräd -- den _ fylld _ med _ vin.
  Så _ drick, min _ vän, _ drick _ sol och _ doft Ty da -- gen, _ den är _ din!
}

vIII = \lyricmode {
  \set stanza = "Lind2. "
  Långt _ bort från sta -- dens _ grå -- a hus vi glatt vår _ ko -- sa _ styr.
  Och _ föl -- jer vä -- gens _ vi -- ta band mot lju -- sa _ ä -- _ ven -- tyr.
  Med öpp -- na ö -- gon låt oss se på li -- vets _ ri -- _ ke -- _ dom
  som _ gror och _ sju -- _ der _ ö -- ver -- _ allt där vå -- ren _ går i _ blom!
}

%---------------

Msta = { \key a \major \time 2/2 }

top = {
  \mark\markup{ Duett }
  s1 |
}

Ms = \relative c'' {
  \partial 4
  \repeat volta 2 {
    a8 b |
    cis4 cis cis d8 cis |
    b4 b b cis |
    d4 cis8 b cis4 b8 a |
    a2. a8 b |
    cis4 cis cis d8 cis |
    b4 b b cis |
    d4 cis8 b cis4 b8 a |
    a2. e'4 |
    a4 e e e |
    fis4 e e e |
    e4 d8 e fis e d cis |
    b2. a8 b |
    cis4 cis8 b cis b cis a |
    b4 b8 cis b4 cis |
    d4 cis8 b cis4 b8 a |
  } \alternative {
    { 
      \set Timing.measureLength = #(ly:make-moment 3 4)
      a2.
    }
    {
      \set Timing.measureLength = #(ly:make-moment 4 4)
      a2. r4 |
    }
  }
  R1*7 |
  r2.
 \bar "|."
}

Mb = \relative c' {
  \partial 4
  \repeat volta 2 {
    a,4 |
    a'4 a a d, |
    e4 e e a |
    fis d e e |
    a,2. a4 |
    a'4 a a a |
    e'4 e, e a |
    gis a e' e, a2. a8 b |
    cis4 a a a |
    d4 a a cis8 b |
    cis4 a d8 cis b a |
    e2. a8 gis |
    a4 a8 gis a gis a fis |
    gis4 e e a |
    fis d e e |
  } \alternative {
    { 
      \set Timing.measureLength = #(ly:make-moment 3 4)
      a,2.
    }
    {
      \set Timing.measureLength = #(ly:make-moment 4 4)
      a2. r4 |
    }
  }
  R1*7 |
  r2.
}

%---

Mvo = \relative a' {
  \partial 4
  \repeat volta 2 {
    a8 b |
    cis4 r r d8 cis |
    b4 r r cis |
    d cis8 b cis4 b8 a |
    a4 e8 cis a4 a'16( b cis d) |
    e1~ |
    e4 b16( a gis fis) e4 cis' |
    d4 cis8( b) cis( a) b( gis) |
    a2. e'4 |
    a4 a,,8 a a a a a |
    a''4 a,,8 a a a a a |
    a''4 a, fis'8 e d cis |
    b4 b'16( a gis fis) e4 a,8 b |
    cis8( d) cis( b) cis( b) cis( a) |
    b8( a) b( cis) b d cis e |
    d4 cis8 b cis4 b8 a |
  } \alternative {
    { 
      \set Timing.measureLength = #(ly:make-moment 3 4)
      a4 e16 d cis b a4 |
    }
    {
      \set Timing.measureLength = #(ly:make-moment 4 4)
      a'4 e16 d cis b a4 e'' |
    }
  }
  a4 e e\trill d8 e |
  fis4 e e cis8 d |
  e4 d8 e fis e d cis |
  b2. a8 b |
  cis4 b8 cis d cis b a |
  b8 a b cis b4 e |
  cis4 b8 a b4 gis |
  a2.
}

Mva = \relative cis' {
  \partial 4
  \repeat volta 2 {
    cis8 d |
    e4 r r fis |
    gis4 r r e |
    a4 a a gis |
    cis,2. cis8 b |
    a4 cis e a |
    gis4 e8 b gis4 e' |
    e4 e8 fis e4 d |
    cis2. cis8 d |
    e4 a,8 a a a a a |
    fis'4 a,8 a a a a a |
    e'4 cis b e |
    gis4 e8 b gis4 e' |
    e1~ |
    e4 e e e |
    a4 a a gis |
  } \alternative {
    { 
      \set Timing.measureLength = #(ly:make-moment 3 4)
      cis,2.
    }
    {
      \set Timing.measureLength = #(ly:make-moment 4 4)
      cis2. cis8 d |
    }
  }
  e4 a8 gis a4 a |
  d,4 cis8 b cis b a4 |
  a'4 a a a |
  gis2. e4 |
  a4 gis8 a b a gis fis |
  gis8 fis gis a gis4 b |
  e,4 d8 cis d4 b |
  cis2.
}

Mbc = \relative f {
  \partial 4
  \repeat volta 2 {
    a,4 |
    a'4 r r d, |
    e4 r r a |
    fis d e e, |
    a4 cis8 e a4 a, |
    a'8 gis fis e d cis b a |
    e'4 gis8 b e4 a, |
    gis8 e a d, e4 e, |
    a4 cis8 e a gis a b |
    cis4 cis8 b cis4 a |
    d4 cis8 b cis4 a8 b |
    cis4 a gis a |
    e4 gis8 b e d cis b |
    a4 e cis a |
    e'4 gis8 fis gis4 a |
    fis d e e, |
  } \alternative {
    { 
      \set Timing.measureLength = #(ly:make-moment 3 4)
      a4 cis8 e a4
    }
    {
      \set Timing.measureLength = #(ly:make-moment 4 4)
      a,4 cis8 e a8 gis a b |
    }
  }
  cis8( b) cis( b) cis a b cis |
  d4 a8 gis a( gis) a( b) |
  cis8( a) b( cis) d cis b a |
  e'4 e,8 fis e d cis b |
  a4 a' gis a |
  e4 e, e gis |
  a4 fis d e |
  a2.
}

\score {
  <<
    \ss
    \new ChoirStaff \transpose a f <<
      \new Staff \context Voice = Vs { \lcl \Msta \clefcs \Ms }
      \lyricsto Vs \context Lyrics = LI   { \vI }
%      \lyricsto Vs \context Lyrics = LII  { \vII }
%      \lyricsto Vs \context Lyrics = LIII { \vIII }
      \new Staff \context Voice = Vb { \lcl \Msta \clefcb \Mb }
    >>
    \new GrandStaff \transpose a f <<
      \new Staff \context Voice = Vvo { \lcl \Msta \clefcs << \Mvo \\ \Mva >> }
      %\new Staff \context Voice = Vva { \lcl \Msta \clefca \Mva }
      \new Staff \context Voice = Vbc { \lcl \Msta \clefcb \Mbc }
    >>
  >>
  \layout { }
}

\include "../include/articulate.ly"

\score { \unfoldRepeats \articulate
  <<
    \ss
    \transpose a f <<
      \new Staff \context Voice = Vs { \lcl \Msta \clefcs \Ms }
      \new Staff \context Voice = Vb { \lcl \Msta \clefcb \Mb }

      \new Staff \context Voice = Vvo { \lcl \Msta \clefcs \Mvo }
      \new Staff \context Voice = Vva { \lcl \Msta \clefca \Mva }
      \new Staff \context Voice = Vbc { \lcl \Msta \clefcb \Mbc }
    >>
  >>
  \midi { }
}