Nun_lob_mein_Seel_den_Herren neu

4 files changed, 495 insertions, 0 deletions

diff --git a/Nun_lob_mein_Seel_den_Herren/Makefile b/Nun_lob_mein_Seel_den_Herren/Makefile
new file mode 100644
index 0000000..cb66cc7
--- /dev/null
+++ b/Nun_lob_mein_Seel_den_Herren/Makefile
@@ -0,0 +1,22 @@
+CURDOC=$(shell basename "$(CURDIR)")
+
+all: $(CURDOC).pdf
+	pkill -SIGHUP -xf 'mupdf(-x11)? (.*/)?$<' || true
+
+clean:
+	rm -f *.pre
+
+Clean: clean
+	rm -f *.pdf *.midi
+
+include ../.meta/*.mk
+
+%.pre: %.ly
+	cat "$<" > "$@"
+
+%.post: %.pre $(patsubst %.ly,%.pre, $(shell ls *.ly))
+	m4 <"$<" >"$@"
+
+%.pdf: %.post
+	lilypond $<
+	pkill -SIGHUP -xf "mupdf $@" || true
diff --git a/Nun_lob_mein_Seel_den_Herren/Nun_lob_mein_Seel_den_Herren.ly b/Nun_lob_mein_Seel_den_Herren/Nun_lob_mein_Seel_den_Herren.ly
new file mode 100644
index 0000000..c3d1bcd
--- /dev/null
+++ b/Nun_lob_mein_Seel_den_Herren/Nun_lob_mein_Seel_den_Herren.ly
@@ -0,0 +1,51 @@
+\include "deutsch.ly"
+include(stimmen.pre)
+include(texte.pre)
+
+%spezifisch%
+
+\pointAndClickOff
+
+\header {
+  tagline = ""
+}
+\paper {
+  top-margin = 5
+  print-all-headers = ##t
+}
+
+\score {
+  \header {
+    title = "Nun lob, mein Seel, den Herren"
+    poet = "Text: Johann Gramann 1530; Str. 5 Königsberg 1549"
+    meter = "Musik: 15. Jhd.; geistl. bei Hans Kugelmann 1540"
+    composer = "Satz: Michael Praetorius 1610"
+    arranger = "Einrichtung und Textunterlegung: Erhard Anger"
+  }
+  \new ChoirStaff <<
+    \new Staff <<
+      \set Score.skipBars = ##t
+      \new Voice = sopran { \global \sopranMelodie }
+    >>
+    ifdef(`STR_1',\new Lyrics \lyricsto sopran { \sopranTextI })
+    ifdef(`STR_2',\new Lyrics \lyricsto sopran { \sopranTextIV })
+    ifdef(`STR_3',\new Lyrics \lyricsto sopran { \sopranTextV })
+    \new Staff <<
+      \set Score.skipBars = ##t
+      \new Voice = alt    { \global \altMelodie }
+    >>
+    ifdef(`STR_1',\new Lyrics \lyricsto alt { \altTextI })
+    ifdef(`STR_2',\new Lyrics \lyricsto alt { \altTextIV })
+    ifdef(`STR_3',\new Lyrics \lyricsto alt { \altTextV })
+    \new Staff <<
+      \new Voice = maenner { \global \clef "bass" \maennerMelodie }
+      \new CueVoice = bass    { \global \clef "bass" \bassMelodie }
+    >>
+    ifdef(`STR_1',\new Lyrics \lyricsto maenner { \maennerTextI })
+    ifdef(`STR_2',\new Lyrics \lyricsto maenner { \maennerTextIV })
+    ifdef(`STR_3',\new Lyrics \lyricsto maenner { \maennerTextV })
+  >>
+  \layout {
+    indent = #0
+  }
+}
diff --git a/Nun_lob_mein_Seel_den_Herren/stimmen.ly b/Nun_lob_mein_Seel_den_Herren/stimmen.ly
new file mode 100644
index 0000000..4b3837c
--- /dev/null
+++ b/Nun_lob_mein_Seel_den_Herren/stimmen.ly
@@ -0,0 +1,316 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+\version "2.18"
+
+global = {
+  \key g \major
+  %\override Staff.TimeSignature #'style = #'()
+  \time 3/4
+  \autoBeamOff
+}
+
+punktBoegenA = {
+  \slurDashed
+  \tieDashed
+}
+
+punktBoegenB = {
+  \set melismaBusyProperties = #'(beamMelismaBusy)
+}
+
+punktBoegen = {
+  \punktBoegenA
+  \punktBoegenB
+}
+
+strichBoegen = {
+  \set melismaBusyProperties = #'(melismaBusy slurMelismaBusy tieMelismaBusy beamMelismaBusy)
+  \slurSolid
+  \tieSolid
+}
+
+% Die Stimmen
+
+sopranMelodie = \relative g' {
+  g4 g fis |
+  es2 d4 |
+  g2( a4) |
+  h2\breathe h4 |
+  h2 h4 |
+  h2\breathe g4 |
+  g( d) g |
+  d2 a'4 |
+  g4 a2 |
+  g2. |
+  r2 a4 |
+  g2 fis4 |
+  e2 d4 |
+  g2( a4) |
+  h2\breathe h4 |
+  h2 h4 |
+  h2\breathe g4 |
+  d'( g,) d |
+  g2\breathe h4 |
+  h2 h4 |
+  h2 a4 |
+  g2 fis4 |
+  g2\breathe h4 |
+  h2 h4 |
+  h2\breathe d4 |
+  d( g,) d' |
+  d2 c4 |
+  h a2 |
+  h2 r4 |
+  a a a |
+  a2 r4 |
+  c c c |
+  c2 r4 |
+  h h h |
+  h2 r4 |
+  e e e |
+  e2 r4 |
+  d d d |
+  d2 c4 h a2 | \time 4/4
+  h2 r4 g |
+  g h a2~ |
+  a4 h4 g2( |
+  fis) e |
+  r4 e a a |
+  a2.( g8[ fis] |
+  g2) e | \time 3/4
+  fis\breathe d4 |
+  \punktBoegen g~ g \strichBoegen g |
+  a2 a4 |
+  h4.( a8 h4) |
+  e,2\breathe a4 |
+  d2 d4 |
+  h4.( a8) h4 |
+  g2. |
+  r2 g4 |
+  c2 c4 |
+  h4( a) h |
+  a2. |
+  r2 a4 |
+  h2 h4 |
+  c2 c4 |
+  d2. |
+  g,2\breathe c4 |
+  a2 fis4 |
+  g8[( fis] e4) d |
+  e2\breathe a4 |
+  \punktBoegen h4.( a8) \strichBoegen gis4 |
+  a2. |
+  r2 d,4 |
+  g2 fis4 |
+  e2 d4 |
+  a'2. |
+  a2 r4 |
+  d \punktBoegen e( d) \strichBoegen |
+  c h8[( c] d4 |
+  e2) a,4 |
+  h2 r4 |
+  h2 c4 |
+  h2 a4 |
+  g8[( a] h4 a |
+  g8[ fis] g4) e\breathe |
+  fis fis fis |
+  g2.^\fermata | \bar "|."
+}
+
+altMelodie = \relative d' {
+  d4 e d |
+  cis2 d4 |
+  e2( fis4) |
+  g2\breathe d4 |
+  e8[( fis] g4) e |
+  g2\breathe h4 |
+  h2 h4 |
+  h2 fis4 |
+  e fis2 |
+  g r4 |
+  d4 d d |
+  h( \punktBoegenA c)( \punktBoegenB d) \strichBoegen |
+  c2 d4 |
+  \punktBoegen d2( e4) \strichBoegen |
+  fis2.\breathe |
+  g4 d g, |
+  g'2\breathe h4 |
+  h2 h4 |
+  h2\breathe g4 |
+  d( g) d |
+  e2\breathe e4 |
+  d( e) c |
+  d2\breathe g4 |
+  e( g) d |
+  g2\breathe h4 |
+  h2 h4 |
+  h2 a4 |
+  g2 fis4 |
+  g2 r4 |
+  fis fis fis |
+  fis2 r4 |
+  e e e |
+  e2 r4 |
+  g g g |
+  g2 r4 |
+  g g g |
+  g2 r4 |
+  h h h |
+  h2 a4 |
+  g2 fis4 | \time 4/4
+  g2 r4 d |
+  e8 e g2( fis8[ e] |
+  fis4) fis8 g4( fis8 e4~ |
+  e dis) e2 |
+  r4 cis4. d4 e8 |
+  fis2( e4 d |
+  e8[ d] d2) cis4 | \time 3/4
+  d2 r4 |
+  r2 g,4 |
+  \punktBoegen c~ c \strichBoegen d |
+  d( e) d |
+  c4.( d8[ e fis] |
+  g4) fis\breathe d |
+  g2 g4 |
+  e4.( d8) e4 |
+  d2. |
+  e |
+  g4( e) g |
+  e2\breathe e4 |
+  fis2 fis4 |
+  g2 g4 |
+  a2. |
+  d,2\breathe fis4 |
+  e2 e4 |
+  fis4.( g8) a4 |
+  h2\breathe fis4 |
+  a2 d,4 |
+  d2 e4 |
+  e2\breathe fis4 |
+  d2 r4 |
+  r2 a4 |
+  c2 g'4 |
+  e e fis |
+  e2 r4 |
+  h' \punktBoegen c( h) \strichBoegen |
+  a g8[( a] h4 |
+  a g) fis |
+  g2 r4 |
+  d2 e4 |
+  d2 c4 |
+  \punktBoegen e( d2) \strichBoegen |
+  h\breathe c4 |
+  a2 a4 |
+  h2.^\fermata | \bar "|."
+}
+
+maennerMelodie = \relative g {
+  g4 \voiceOne c d |
+  a2 h4 |
+  e8[( d c h] a4) |
+  g2. | \oneVoice
+  r2. |
+  r2 g4 |
+  e8[( fis] g4) e |
+  g g d |
+  e d2 |
+  r2 g4 |
+  g2 fis4 |
+  e2 d4 |
+  a'2( h4 |
+  g8[ a h g] c4) |
+  h2. |
+  R2.*3 |
+  r2 g4 |
+  g( e) g |
+  g2 c4 |
+  h4 a2 |
+  g2. |
+  R |
+  r2 g4 |
+  g2 g4 |
+  g2 a4 |
+  h( c) d |
+  g,2 r4 | \voiceOne
+  d' d d |
+  d2 \oneVoice r4 | \voiceOne
+  a a a |
+  a2 \oneVoice r4 | \voiceOne
+  e' e e |
+  e2 \oneVoice r4 | \voiceOne
+  c c c |
+  c2 \oneVoice r4 |
+  g g g |
+  g2 a4 |
+  h( c) d | \time 4/4
+  g,2 r4 g |
+  \voiceOne c \oneVoice g \voiceOne d'2~ |
+  d4 h e2( |
+  h) \oneVoice e, |
+  r4 a fis d |
+  d8[( e fis g] a4 h8[ a] |
+  g2) a | \time 3/4
+  d r4 |
+  R2. |
+  r2 d,4 |
+  \punktBoegen g~ g \strichBoegen g |
+  a2 a4 |
+  h4.( a8 h4) |
+  g2\breathe g4 |
+  c2 c4 |
+  h4.( a8) h4 |
+  a2\breathe c4 |
+  g( a) e |
+  a2.( |
+  d) |
+  R |
+  r2 a4 |
+  h2 h4 |
+  c2 c4 |
+  d2. |
+  g,2\breathe h4 |
+  a2 fis4 |
+  g4.( fis8) e4 |
+  a2\breathe d,4 |
+  g2 fis4 |
+  e2\breathe d4 |
+  a'2( h4 |
+  a8[ h] cis4 d) |
+  a2 r4 |
+  g \punktBoegen c( g) \strichBoegen |
+  a \voiceOne e'( d |
+  c2) d4 \oneVoice |
+  g,2 r4 |
+  g2 c,4 |
+  g'2 a4 |
+  e8[( fis] g4) d |
+  e2\breathe c4 |
+  d2 d4 |
+  g2.^\fermata | \bar "|."
+}
+
+bassMelodie = \relative c {
+  \voiceTwo
+  s4 c d |
+  a2 h4 e8[ d c h] a4 |
+  g2. |
+  s2.*25 |
+  d'4 d d |
+  d2 s4 |
+  a a a |
+  a2 s4 |
+  e' e e |
+  e2 s4 |
+  c c c |
+  c2 s4 |
+  s2.*3 | \time 4/4
+  s1 |
+  c4 s d2~ |
+  d4 h e2( |
+  h) s |
+  s1*3 | \time 3/4
+  s2.*28 |
+  s4 e d |
+  c2 d4 |
+  s2.*7 | \bar "|."
+}
diff --git a/Nun_lob_mein_Seel_den_Herren/texte.ly b/Nun_lob_mein_Seel_den_Herren/texte.ly
new file mode 100644
index 0000000..e07ff97
--- /dev/null
+++ b/Nun_lob_mein_Seel_den_Herren/texte.ly
@@ -0,0 +1,106 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+% Abkürzungen
+
+% Die Textaufteilungen
+
+define(textI, `\lyricmode {
+  \set stanza = "1."
+  Nun lob, mein Seel, den Her -- ren,
+  ifelse($1,`maenner',,`was in mir ist,')
+  was in mir ist, den Na -- men sein.
+  Sein Wohl -- tat ifelse($1,`alt',`tut __ _ er,') tut er meh -- ren,
+  ifelse($1,`maenner',,`ver -- giss es nicht, ver -- giss es nicht,')
+  ver -- giss es nicht, o Her -- ze mein,
+  ifelse($1,`sopran',`ver -- giss es nicht,')
+  ifelse($1,`alt',`o Her -- ze mein,')
+  ver -- giss es nicht, o Her -- ze mein,
+  ver -- giss es nicht,
+  ver -- giss es nicht,
+  ver -- giss es nicht,
+  ver -- giss es nicht,
+  ver -- giss es nicht, o Her -- ze mein.
+  Hat dir dein Sünd ver -- ge -- ben
+  und heilt dein Schwach -- heit groß,
+  er -- ret -- tet dein ar -- mes Le -- ben,
+  nimmt dich in sei -- nen Schoß,
+  ifelse($1,`sopran',`nimmt dich') in sei -- nen Schoß,
+  mit rei -- chem Trost be -- schüt -- tet,
+  ifelse($1,`alt',`ver -- jüngt, dem Ad -- ler gleich')
+  ver -- jüngt, ifelse($1,`sopran',`dem Ad -- ler gleich,') dem Ad -- ifelse($1,`sopran',`_') ler gleich;
+  ifelse($1,`alt',`der Herr,')
+  der Herr schafft Recht, be -- hü -- tet,
+  die lei -- den in sei -- nem Reich,
+  die lei -- den in sei -- ifelse($1,`alt',`_') ifelse($1,`maenner',`nem Reich,',`nem,') in sei -- nem Reich.
+}')
+
+define(textIV, `\lyricmode {
+  \set stanza = "4."
+  Die Got -- tes -- gnad al -- lei -- ne
+  ifelse($1,`maenner',,`steht fest und bleibt,')
+  steht fest und bleibt in E -- wig -- keit
+  bei sei -- ner ifelse($1,`alt',`lie -- ben,') lie -- ben Gmei -- ifelse($1,`alt',`_') ne,
+  ifelse($1,`maenner',,`die steht be -- reit, die steht be -- reit,')
+  ifelse($1,`alt',`die steht be -- reit,')
+  die steht in sei -- ner Furcht be -- reit,
+  ifelse($1,`sopran',`die steht be -- reit,')
+  die steht in sei -- ner Furcht be -- reit,
+  die steht be -- reit,
+  die steht be -- reit,
+  die steht be -- reit,
+  die steht be -- reit,
+  die steht in sei -- ner Furcht be -- reit,
+  die sei -- nen Bund be -- hal -- ten.
+  Er herrscht im Him -- mel -- reich.
+  Ihr star -- _ ken En -- gel,
+  wal -- tet seins Lobs und dient zu -- gleich,
+  ifelse($1,`sopran',`seins Lobs') und dient zu -- gleich
+  dem gro -- ßen Herrn zu Eh -- ren
+  und treibt ifelse($1,`maenner',,`sein hei -- ligs Wort,')
+  ifelse($1,`alt',`und treibt') sein hei -- ifelse($1,`sopran',`_') ligs Wort!
+  Mein ifelse($1,`alt',`Seel, mein') Seel soll auch ver -- meh -- ren
+  sein Lob __ _ an al -- lem Ort,
+  Lob an al -- lem, al -- ifelse($1,`alt',`_') ifelse($1,`maenner',`lem Ort,',`lem,') an al -- lem Ort.
+}')
+
+define(textV, `\lyricmode {
+  \set stanza = "5."
+  Sei Lob und Preis mit Eh -- ren
+  ifelse($1,`maenner',,`Gott Va -- ter, Sohn,')
+  Gott Va -- ter, Sohn und Heil -- gem Geist!
+  Der wol -- le in ifelse($1,`alt',`__ _ uns, in') uns meh -- ren,
+  ifelse($1,`maenner',,`was er aus Gnad, was er aus Gnad,')
+  ifelse($1,`alt',`was er aus Gnad,') was er aus Gna -- den uns ver -- heißt,
+  ifelse($1,`sopran',`was er aus Gnad,')
+  was er aus Gna -- den uns ver -- heißt,
+  was er aus Gnad,
+  was er aus Gnad,
+  was er aus Gnad,
+  was er aus Gnad,
+  was er aus Gna -- den uns ver -- heißt,
+  dass wir ihm fest ver -- trau -- en,
+  uns grün -- den ganz auf ihn,
+  von Her -- _ zen auf ihn bau -- en,
+  dass un -- ser Mut und Sinn,
+  ifelse($1,`sopran',`dass un -- ser',`der') Mut und Sinn
+  ihm al -- le -- zeit an -- han -- gen.
+  Drauf sin -- gen wir
+  ifelse($1,`sopran',`zur Stund, wir sin -- gen')
+  ifelse($1,`alt',`zur Stund, drauf sin -- gen wir')
+  zur Stund:
+  ifelse($1,`alt',`A -- men,') A -- men, wir werdns er -- lan -- gen,
+  glau -- ben wir von Her -- zens -- grund,
+  glau -- ben wir von Her -- ifelse($1,`sopran',`zens-,',`zens -- grund,') von Her -- zens -- grund.
+}')
+
+sopranTextI  = textI(`sopran')
+sopranTextIV = textIV(`sopran')
+sopranTextV  = textV(`sopran')
+
+altTextI  = textI(`alt')
+altTextIV = textIV(`alt')
+altTextV  = textV(`alt')
+
+maennerTextI  = textI(`maenner')
+maennerTextIV = textIV(`maenner')
+maennerTextV  = textV(`maenner')