Hauke eingefügt

7 files changed, 603 insertions, 0 deletions

diff --git a/hr/stch/fertig/adeste/Adeste Fideles 1.PNG b/hr/stch/fertig/adeste/Adeste Fideles 1.PNG
new file mode 100644
index 0000000..ab43ded
--- /dev/null
+++ b/hr/stch/fertig/adeste/Adeste Fideles 1.PNG
diff --git a/hr/stch/fertig/adeste/Adeste fideles - 2.JPG b/hr/stch/fertig/adeste/Adeste fideles - 2.JPG
new file mode 100644
index 0000000..dac21f6
--- /dev/null
+++ b/hr/stch/fertig/adeste/Adeste fideles - 2.JPG
diff --git a/hr/stch/fertig/adeste/adeste.ly b/hr/stch/fertig/adeste/adeste.ly
new file mode 100644
index 0000000..aaa7f0a
--- /dev/null
+++ b/hr/stch/fertig/adeste/adeste.ly
@@ -0,0 +1,81 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+\version "2.14"
+\include "stimmen.ly"
+\include "texte.ly"
+
+  \header {
+    title = "Adeste fideles"
+    %composer = "<+Komponist+>"
+    arranger = "Carl Thiel"
+    text = "Adeste fideles um 1790, Abbé Borderies"
+    opus = "Opus 7"
+    tagline = ""
+  }
+
+  \paper {
+    print-page-number = ##f
+    line-width = \paper-width - 30
+    top-margin = 15
+    bottom-margin = 25
+    top-system-spacing #'minimum-distance = 17
+    ragged-last-bottom = #'f
+    system-count = 5
+  }
+
+  \layout {
+    indent = #0
+    \context {
+      \Staff
+      \override VerticalAxisGroup #'minimum-Y-extent = #'(-3 . 3.5)
+    }
+  }
+
+  \pointAndClickOff
+
+  #(set-global-staff-size 16)
+
+  sop = \new Staff = sopran <<
+          %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." }
+          \new Voice = "soprane" { \global \sopranMelodie }
+          \addlyrics { \sopOne }
+          \addlyrics { \sopThree }
+          \new Voice { \global \sopTwo }
+        >>
+
+  alt = \new Staff = alt <<
+          \new Voice = "alti" { \global \altMelodie }
+          %\addlyrics { \altText }
+        >>
+
+  ten = \new Staff = tenor <<
+          \new Voice = "tenoere" { \global \tenorMelodie }
+          \addlyrics { \tenOne }
+          \addlyrics { \tenThree }
+          \new Voice { \global \tenorTwo }
+          %\addlyrics { \tenorText }
+        >>
+
+  bas = \new Staff = bass <<
+          \new Voice = "baesse" { \global \bassMelodie }
+          %\addlyrics { \bassText }
+        >>
+
+  \score {
+    \new ChoirStaff \with {} <<
+      \sop
+      \alt
+      \ten
+      \bas
+    >>
+    %\midi {
+      %\context{
+	%\Score
+	%tempoWholesPerMinute = #(ly:make-moment 72 4)
+      %}
+    %}
+    \layout {
+    }
+  }
+  \texte
+
diff --git a/hr/stch/fertig/adeste/dynArt.ly b/hr/stch/fertig/adeste/dynArt.ly
new file mode 100644
index 0000000..a4158e3
--- /dev/null
+++ b/hr/stch/fertig/adeste/dynArt.ly
@@ -0,0 +1,75 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+  meta = {
+    %(dynamic) marks global to all voices
+    \dynamicUp
+    s4 
+    s1 
+    s1 
+    s1 
+    s2. s4\mf 
+    s1 
+    s1 
+    s1 
+    s1 
+    s1\f 
+    s1 
+    s4 s2.\> 
+    s2. s4\p
+    s1 
+    s1 
+    s1 
+    s2. s4\f 
+    s2 s4^\markup{ \italic "poco" } s4\> 
+    s2\! s4\< s4\! 
+    s1 
+    s2.%\fermata
+    \bar "|."
+  }
+
+% articulation
+
+    mep = \markup{ \italic "meno" \dynamic "p" }
+    unterArt = {
+      s4^\markup{ \italic "poco" \dynamic "f" } 
+      s2 s4\< s4\! 
+      s2 s4\> s4\! 
+      s2\! s2\!
+      s2\> s4\! s4
+    }
+
+    sopranArt = {
+      s4^\markup{ \bold "Mit freudigem Ausdruck" } 
+      \repeat unfold 13 { s1 }
+      s2. s4^\mep
+      \repeat unfold 4 { s1 }
+      s2^\markup{ \italic "poco rit." }
+    }
+
+    altArt = {
+      s4 
+      \repeat unfold 13 { s1 }
+      s2. s4^\mep
+    }
+
+    tenorArt = {
+      <<
+        \unterArt
+        {
+          s4 
+          \repeat unfold 13 { s1 }
+          s2. s4^\mep
+        }
+      >>
+    }
+
+    bassArt = {
+      <<
+        \unterArt
+        {
+          s4 
+          \repeat unfold 13 { s1 }
+        }
+      >>
+    }
+
diff --git a/hr/stch/fertig/adeste/midi.lua b/hr/stch/fertig/adeste/midi.lua
new file mode 100644
index 0000000..58e69da
--- /dev/null
+++ b/hr/stch/fertig/adeste/midi.lua
@@ -0,0 +1,50 @@
+ -- some settings -- vim: ai sw=2 lbr nu et
+
+pre=[[
+%some settings% vim: ai sw=2 lbr nu encoding=utf8 et
+
+\version "2.12"
+\include "stimmen.ly"
+
+  \score {
+]]
+
+post=[[
+    \midi {
+      \context{
+	%\Score
+	%tempoWholesPerMinute = #(ly:make-moment 72 4)
+      }
+    }
+  }
+]]
+
+voices={ "s", "a", "t", "b" }
+expand = { s="sopran", a="alt", t="tenor", b="bass" }
+map = { sopran="soprane", alt="alti", tenor="tenoere", bass="baesse" }
+
+function text(stimme)
+  return
+[[
+    \new Staff = ]]..stimme..[[ <<
+      %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." }
+      \new Voice = "]]..map[stimme]..[[" { \global \]]..stimme..[[Melodie }
+    >>
+]]
+end
+
+function err() print("oops") os.exit() end
+
+which=which or "satb"
+if type(which)~="string" then err() end
+
+for _,v in pairs(voices) do
+  if string.find(which, v) then pre=pre..text(expand[v]) end
+end
+
+input=pre..post
+
+--os.execute(lilypond -...)
+io.stdout:write(input)
+os.exit()
+
diff --git a/hr/stch/fertig/adeste/stimmen.ly b/hr/stch/fertig/adeste/stimmen.ly
new file mode 100644
index 0000000..e59b986
--- /dev/null
+++ b/hr/stch/fertig/adeste/stimmen.ly
@@ -0,0 +1,256 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+  \version "2.12"
+  \include "dynArt.ly"
+
+  global = {
+    \key b \major
+    %\override Staff.TimeSignature #'style = #'()
+    \time 4/4
+    %\autoBeamOff
+    \partial 4
+  }
+
+% Die Stimmen
+
+  sopranMelodie = \relative c'' {
+    <<
+      { \meta }
+      \sopranArt
+      %the actual tune
+      {
+        \oneVoice
+	r4 
+        r1 
+        r1 
+        r1 
+        r2 r4 b4 
+        b2 ais4 gis4 
+        ais4( b4) cis4 dis4 
+        ais4( b4) gis2 
+        fis2. r4 
+          {
+            \voiceOne
+            fis'2 e4 dis4 
+            e2 dis2 
+            cis4 dis4 b4 cis4 
+            ais4( gis4) fis4 
+          }
+        % Venite
+        \oneVoice
+        b4 
+        b4 ais4 b4 cis4 
+        b2 fis4 
+            \voiceOne
+            dis'4 
+            dis4 cis4 dis4 e4 
+            dis2 cis4 fis4 
+            e4 dis4 cis4 b4 
+            ais2 b4( e4) 
+            dis2 cis2 
+            b2.\fermata 
+      }
+    >>
+  }
+  sopTwo = \relative c'' {
+    <<
+      {
+        \oneVoice
+	r4 
+        r1 
+        r1 
+        r1 
+        r2 r4 b4 
+        b2 ais4 gis4 
+        ais4( b4) cis4 dis4 
+        ais4( b4) gis2 
+        fis2 s4 r4 
+            \voiceTwo
+            % \dynamicOff
+            dis'2 b4 b4 
+            b4( ais4) b2 
+            ais4 ais4 gis4 gis4 
+            ais4( gis4) fis4 
+        % Venite
+        \oneVoice
+        b4 
+        b4 ais4 b4 cis4 
+        b2 fis4 
+            \voiceTwo
+            b4 
+            b4 ais4 b4 gis8 ais8 
+            b2 ais4 b4 
+            ais4 b4 cis4 b4 
+            ais2 b2 
+            b2. ais4 b2. 
+      }
+    >>
+  }
+
+  altMelodie = \relative c' {
+    <<
+      { \meta }
+      \bassArt
+      %the actual tune
+      {
+	r4 
+        r1 
+        r1 
+        r1 
+        r2 r4 fis4 
+        dis4( eis4) fis4 eis4 
+        fis2 fis4 fis4 
+        fis2 fis4( eis4) 
+        fis2. r4 
+        <fis b>2 fis4 fis4 
+        fis2 fis2 
+        fis4 dis4 dis4 gis4 
+        fis4( eis4) cis4 
+        % Venite
+        fis4 
+        fis4 fis4 fis4 fis4 
+        fis2 fis4 fis4 
+        fis4 fis4 fis4 e4 
+        fis4( gis4) ais4 fis4 
+        fis4 fis4 gis4 gis4 
+        gis4( fisis4) gis2 
+        fis2( eis4) fis4 fis2.\fermata 
+      }
+    >>
+  }
+  
+  tenorMelodie = \relative c'' {
+    <<
+      { \meta }
+      \tenorArt
+      {
+        {
+          \voiceOne
+          b4 
+          b2 fis4 b4 
+          cis2( fis,4) gis8 ais8 
+          b4( cis4) dis4 e4 
+          dis2 cis4 
+        }
+        \oneVoice
+        b4 
+        b2 cis4 cis4 
+        cis2 cis4 b4 
+        dis2 cis2 
+        ais2. r4 
+        { \voiceOne dis2 cis4 b4 }
+        \oneVoice
+        cis2 b2 
+        cis4 ais4 b4 gis4 
+        cis4( b4) ais4 
+        % Venite
+        b4 
+        b4 cis4 dis4 cis4 
+        dis2 dis4 b4 
+        b4 fis4 b4 cis4 
+        dis4( e4) fis4 dis4 
+        e4 fis4 e4 dis4 
+        dis2 dis4( e4) 
+        b2. cis4 dis2.\fermata 
+      }
+    >>
+  }
+  tenorTwo = \relative c'' {
+    <<
+      {
+        {
+          \voiceTwo
+          b4 
+          b2 fis4 b4 
+          cis2( fis,4) gis8 ais8 
+          b4( ais4) b4 b4 
+          b2 ais4 
+        }
+        \oneVoice
+        b4 
+        b2 cis4 cis4 
+        cis2 cis4 b4 
+        dis2 cis2 
+        ais2 s4 r4 
+        { \voiceTwo b2 fis4 b4 }
+      }
+    >>
+  }
+
+  bassMelodie = \relative c {
+      \clef bass
+    <<
+      { \meta }
+      \altArt
+      {
+        <<
+          {
+            \voiceOne
+            b'4 
+            b2 fis4 b4 
+            cis2 fis,4 ~ fis4 
+            fis4 ~ fis4 fis4 gis4 
+            fis2 fis4 
+          }
+          \\
+          \new Voice \with {\remove Dynamic_engraver } 
+          {
+            \voiceTwo
+            b4 
+            b2 fis4 b4 
+            cis2 fis,4( e4) 
+            dis4( fis4) b,4 e4 
+            b4( dis4) fis4 
+          }
+        >>
+        dis4 
+        gis2 fis4 cis4 
+        fis4( gis4) ais4 b4 
+        dis,4( gis4) cis2 
+        fis,2. r4 
+        <<
+          {
+            \voiceOne
+            fis2 fis4 fis4 
+            fis2 fis2 
+          }
+          \\
+          \new Voice \with {\remove Dynamic_engraver } 
+          {
+            \voiceTwo
+            b,2 cis4 dis4 
+            cis4( fis4) b,2 
+          }
+        >>
+        fis'4 fisis4 gis4 eis4 
+        fis4( cis4) fis4 
+        % Venite
+        dis4 
+        dis4 fis4 b4 ais4 
+        b2 b4 r4 
+        r1 
+        r2 r4 
+        <<
+          {
+            \voiceOne
+            fis4 
+            fis4 b4 e,4 gis4 
+            ais2 gis2 
+            b4( fis4 gis4) fis4 
+            fis2.\fermata 
+          }
+          \\
+          \new Voice \with {\remove Dynamic_engraver } 
+          {
+            \voiceTwo
+            b,4 
+            cis4 dis4 e4 gis4 
+            dis2 gis4( cis,4) 
+            dis2( gis4) fis4 
+            b,2. 
+          }
+        >>
+      }
+    >>
+  }
+
diff --git a/hr/stch/fertig/adeste/texte.ly b/hr/stch/fertig/adeste/texte.ly
new file mode 100644
index 0000000..754a3e2
--- /dev/null
+++ b/hr/stch/fertig/adeste/texte.ly
@@ -0,0 +1,141 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+% Abkürzungen
+
+% Die Textaufteilungen
+
+  sopVerseOne = \lyricmode {
+    \set stanza = "1."
+    Ve -- ni -- te
+  }
+  tenVerseOne = \lyricmode {
+    \set stanza = "1."
+    Ad -- es -- te fi -- de -- les
+    læ -- ti tri -- um -- phan -- tes;
+    ve -- ni -- te
+  }
+  sopVerseThree = \lyricmode {
+    \set stanza = "3."
+    ve -- la -- tum
+  }
+  tenVerseThree = \lyricmode {
+    \set stanza = "3."
+    Æ -- ter -- ni pa -- ren -- tis
+    splen -- do -- rem æ -- ter -- num
+    ve -- la -- tum
+  }
+  verseOne = \lyricmode {
+    ve -- ni -- te in Beth -- le -- hem.
+    Na -- tum vi -- de -- te
+    re -- gem An -- ge -- lo -- rum.
+  }
+  verseThree = \lyricmode {
+    sub car -- ne vi -- de -- bi -- mus;
+    De -- um in -- fan -- tem
+    pa -- nis in -- vo -- lu -- tum.
+  }
+  refr = \lyricmode {
+    Ve -- ni -- te ad -- o -- re -- mus.
+    Ve -- ni -- te ad -- o -- re -- mus.
+    Ve -- ni -- te ad -- o -- re -- mus Do -- mi -- num.
+  }
+  sopOne = \lyrics {
+    \sopVerseOne
+    \verseOne
+    \refr
+  }
+  sopThree = \lyrics {
+    \sopVerseThree
+    \verseThree
+    %\refr
+  }
+  tenOne = \lyrics {
+    \tenVerseOne
+    \verseOne
+    \refr
+  }
+  tenThree = \lyrics {
+    \tenVerseThree
+    \verseThree
+    %\refr
+  }
+  texte = \markup {
+    \fill-line {
+      " "
+      \column {
+        \line {
+          \bold " "%1."
+          \column {
+            " "%Herbei o ihr Gläubigen, fröhlich triumphierend"
+            " "%o kommet, o kommet nach Bethlehem"
+            " "%sehet das Kindlein uns zum Heil geboren!"
+            " "%O lasset uns anbeten, o lasset uns anbeten,"
+            " "%o lasset uns anbeten den König, den Herrn."
+            " "
+            " "
+            " "
+          }
+        }
+        \line {
+          \bold "2."
+          \column {
+            "Engrege relicto humiles ad cunas"
+            "vocati pastores ad properant;"
+            "nosque ovanti gradu festinemus:"
+          }
+        }
+      }
+      " "
+      \column {
+        \line {
+          \bold "1."
+          \column {
+            "Herbei o ihr Gläubigen, fröhlich triumphierend"
+            "o kommet, o kommet nach Bethlehem"
+            "sehet das Kindlein uns zum Heil geboren!"
+            "O lasset uns anbeten, o lasset uns anbeten,"
+            "o lasset uns anbeten den König, den Herrn."
+            " "
+            " "
+            " "
+          }
+        }
+        \line {
+          \bold "2."
+          \column {
+            "Der König der Ehren, Herrscher der Heerscharen"
+            "er ruht in der Krippe gering und arm:"
+            "Er, unser Gott, von Ewigkeit geboren."
+            " "
+            " "
+            " "
+          }
+        }
+        \line {
+          \bold "3."
+          \column {
+            "Kommt, singet dem Herren, o ihr Engelschöre,"
+            "frohlocket, frohlocket ihr Seligen:"
+            "Ehre sei Gott im Himmel und auf Erden."
+          }
+        }
+      }
+      " "
+    }
+  }
+  sopranText = \lyrics {
+    %<+hier den Text für den Sopran eintragen+>
+  }
+
+  altText = \lyrics {
+    %<+hier den Text für den Alt eintragen+>
+  }
+
+  tenorText = \lyrics {
+    %<+hier den Text für den Tenor eintragen+>
+  }
+
+  bassText = \lyrics {
+    %<+hier den Text für den Baß eintragen+>
+  }
+