Danket_dem_Herrn neu

4 files changed, 190 insertions, 0 deletions

diff --git a/Danket_dem_Herrn/Danket_dem_Herrn.ly b/Danket_dem_Herrn/Danket_dem_Herrn.ly
new file mode 100644
index 0000000..91e0762
--- /dev/null
+++ b/Danket_dem_Herrn/Danket_dem_Herrn.ly
@@ -0,0 +1,48 @@
+\include "deutsch.ly"
+#(ly:set-option 'relative-includes #t)
+\include "stimmen.ly"
+\include "texte.ly"
+#(ly:set-option 'relative-includes #f)
+
+%spezifisch%
+
+\pointAndClickOff
+
+\header {
+  tagline = ##f
+}
+\paper {
+  top-margin = 5
+  print-all-headers = ##t
+}
+
+\score {
+  \header {
+    tagline = ##f
+    title = "Danket dem Herrn"
+    composer = "Karl Friedrich Schulz"
+  }
+  \layout {
+    indent = #0
+    \context {
+      \Staff
+      \RemoveEmptyStaves
+      \override VerticalAxisGroup #'remove-first = ##t
+    }
+  }
+  \new ChoirStaff <<
+    \set Score.skipBars = ##t
+    \new Staff <<
+      \new Voice = frauen { \global \oneVoice \pausen }
+      \new Voice = sopran { \global \voiceOne \sopranMelodie }
+      \new Voice = alt    { \global \voiceTwo \altMelodie }
+    >>
+    \new Lyrics \lyricsto sopran { \text}
+    \new Staff <<
+      \clef "bass"
+      \new Voice = maenner { \global \oneVoice \pausen }
+      \new Voice = tenor   { \global \voiceOne \tenorMelodie }
+      \new Voice = bass    { \global \voiceTwo \bassMelodie }
+    >>
+  >>
+}
diff --git a/Danket_dem_Herrn/Makefile b/Danket_dem_Herrn/Makefile
new file mode 100644
index 0000000..3fa24ea
--- /dev/null
+++ b/Danket_dem_Herrn/Makefile
@@ -0,0 +1,43 @@
+CURDOC=$(shell basename "$(CURDIR)")
+STROPHEN=[1-9]\|1[01]
+
+ifeq ($(FUER),ewe)
+  SPEZIFISCH=\#(set! paper-alist (cons '(\"kindle\" . (cons (* 210 mm) (* 130 mm))) paper-alist))\n\#(set-default-paper-size \"kindle\")
+else
+  SPEZIFISCH=
+  # \#(set-global-staff-size 14)
+endif
+
+ifeq ($(MIDI),1)
+  MIDI_REGEX=
+else
+  MIDI_REGEX=/\\\\midi/{ :a; s/\\\\midi[^{}]*{/\\\\midi/; tb; N; ba; :b; s/{[^{}]*}//; tb; s/\\\\midi[^{}]*}//; t; N; bb; };
+endif
+
+ifeq ($(KLAVIER),1)
+  KLAVIER_REGEX=
+else
+  KLAVIER_REGEX=/%Klavier%/d;
+endif
+
+all: $(CURDOC).pdf
+
+clean:
+	rm -f *.pre
+
+Clean: clean
+	rm -f *.pdf *.midi
+
+%.pre: %.ly
+	sed " \
+		s@%spezifisch%@$(SPEZIFISCH)@ ; \
+		/%STR_\($(STROPHEN)\)%/{ \
+		  s/%[A-Z_0-9]\+%//; \
+		  p; \
+		  d; \
+		}; \
+		/%[A-Z_0-9]\+%/d \
+	" "$<" > "$@"
+
+%.pdf: %.pre *.ly
+	lilypond $<
diff --git a/Danket_dem_Herrn/stimmen.ly b/Danket_dem_Herrn/stimmen.ly
new file mode 100644
index 0000000..d3b80a5
--- /dev/null
+++ b/Danket_dem_Herrn/stimmen.ly
@@ -0,0 +1,88 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+\version "2.18"
+
+global = {
+  \key b \major
+  %\override Staff.TimeSignature #'style = #'()
+  \time 4/4
+  \autoBeamOff
+}
+
+% Die Stimmen
+
+pausen = {
+  s1 |
+  s2 r4 s |
+  s1 |
+  s2 r4 s |
+  s1*10 | \bar "|."
+}
+
+sopranMelodie = \relative b {
+  b2 d4 b |
+  f'2 s4 f |
+  b2 c4 c |
+  d2 s4 d |
+  es2 d |
+  d c4 c |
+  d c b a |
+  g2 c |
+  c4 b b a |
+  b d d d |
+  es2 c |
+  d4 b b b |
+  c2 a |
+  b1 | \bar "|."
+}
+
+altMelodie = \relative b {
+  b2 d4 b |
+  f'2 s4 f |
+  f2 f4 f |
+  f2 s4 f |
+  f2 f |
+  f f4 f |
+  f es d f |
+  es2 g |
+  f f |
+  f4 f f f |
+  g2 f |
+  f4 d g f |
+  es2 c |
+  d1 | \bar "|."
+}
+
+tenorMelodie = \relative b, {
+  b2 d4 b |
+  f'2 s4 a |
+  b2 a4 a |
+  b2 s4 b |
+  c2 b |
+  b a4 a |
+  b a b d |
+  b2 es |
+  d c |
+  d4 b b b |
+  b2 a |
+  b4 b b b |
+  g2 f |
+  f1 | \bar "|."
+}
+
+bassMelodie = \relative b, {
+  b2 d4 b |
+  f'2 s4 f |
+  d2 f4 f |
+  b,2 s4 b |
+  a2 b |
+  f' f4 f |
+  b f g d |
+  es2 c |
+  f f, |
+  b4 b b b |
+  es2 f |
+  b4 g es d |
+  c2 f |
+  b,1 | \bar "|."
+}
diff --git a/Danket_dem_Herrn/texte.ly b/Danket_dem_Herrn/texte.ly
new file mode 100644
index 0000000..d686e15
--- /dev/null
+++ b/Danket_dem_Herrn/texte.ly
@@ -0,0 +1,11 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+% Abkürzungen
+
+% Die Textaufteilungen
+
+text = \lyricmode {
+  Dan -- ket dem Herrn! Wir dan -- ken dem Herrn,
+  denn er ist freund -- lich und sei -- ne Gü -- te wäh -- ret e -- _ wig -- _ lich,
+  sie wäh -- ret e -- wig -- lich, sie wäh -- ret e -- wig -- lich.
+}