Bewahr_die_Erde neu

5 files changed, 273 insertions, 0 deletions

diff --git a/Bewahr_die_Erde/Bewahr_die_Erde.ly b/Bewahr_die_Erde/Bewahr_die_Erde.ly
new file mode 100644
index 0000000..ccea922
--- /dev/null
+++ b/Bewahr_die_Erde/Bewahr_die_Erde.ly
@@ -0,0 +1,52 @@
+\include "deutsch.ly"
+#(ly:set-option 'relative-includes #t)
+\include "artikulation.ly"
+\include "stimmen.ly"
+\include "texte.ly"
+#(ly:set-option 'relative-includes #f)
+
+%spezifisch%
+
+\version "2.19.80"
+
+\pointAndClickOff
+
+\header {
+  tagline = ""
+}
+\paper {
+  top-margin = 5
+  print-all-headers = ##t
+}
+
+\score {
+  \header {
+    title = "Bewahr die Erde"
+    poet = "Text: Marlies Flesch-Thebesius 1994"
+    composer = "Satz I: überliefert"
+    arranger = "Satz II: Aruim Frischko 2014"
+  }
+  \new ChoirStaff <<
+    \set Score.skipBars = ##t
+    \new Staff <<
+      \new Voice = solo   { \global << \soloMelodie \artikulation >> }
+    >>
+    \new Lyrics \lyricsto solo   { \textSoloDI }
+    \new Lyrics \lyricsto solo   { \textSoloDII }
+    \new Lyrics \lyricsto solo   { \textSoloDIII }
+    \new Staff <<
+      \new Voice = sopran { \global \voiceOne << \sopranMelodie \artikulation >> }
+      \new Voice = alt    { \global \voiceTwo \altMelodie }
+    >>
+    \new Lyrics \lyricsto sopran { \textDI }
+    \new Lyrics \lyricsto sopran { \textDII }
+    \new Lyrics \lyricsto sopran { \textDIII }
+    \new Staff <<
+      \new Voice = tenor   { \global \clef "bass" \voiceOne << \tenorMelodie \artikulation >> }
+      \new Voice = bass    { \global \clef "bass" \voiceTwo \bassMelodie }
+    >>
+  >>
+  \layout {
+    indent = #0
+  }
+}
diff --git a/Bewahr_die_Erde/Makefile b/Bewahr_die_Erde/Makefile
new file mode 100644
index 0000000..8cdc1e0
--- /dev/null
+++ b/Bewahr_die_Erde/Makefile
@@ -0,0 +1,38 @@
+CURDOC=$(shell basename "$(CURDIR)")
+
+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)@ ; \
+		$(KLAVIER_REGEX) \
+		$(MIDI_REGEX) \
+	" "$<" > "$@"
+
+%.pdf: %.pre *.ly
+	lilypond $<
diff --git a/Bewahr_die_Erde/artikulation.ly b/Bewahr_die_Erde/artikulation.ly
new file mode 100644
index 0000000..9d0a6e1
--- /dev/null
+++ b/Bewahr_die_Erde/artikulation.ly
@@ -0,0 +1,8 @@
+artikulation = {
+  s1*4\breathe |
+  s1*4\breathe |
+  \repeat volta 2 {
+    s1*4\breathe |
+    s1*4 |
+  }
+}
diff --git a/Bewahr_die_Erde/stimmen.ly b/Bewahr_die_Erde/stimmen.ly
new file mode 100644
index 0000000..6127bf1
--- /dev/null
+++ b/Bewahr_die_Erde/stimmen.ly
@@ -0,0 +1,116 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+\version "2.18"
+
+global = {
+  \key g \major
+  %\override Staff.TimeSignature #'style = #'()
+  \time 4/4
+  \autoBeamOff
+}
+
+% Die Stimmen
+
+soloMelodie = \relative d'' {
+  R1*2 |
+  d2 d4 d |
+  e8( d4 h8) g4( fis) |
+  e4.( fis8) g[ a] h[ cis] |
+  cis4 d2 h4 |
+  d cis d e |
+  e8( d4 h8 a2) |
+  \repeat volta 2 {
+    r4 h a g |
+    fis4.( g8) a[ h] c[ d] |
+    e4. d8 d4 c8[ a] |
+    a4.( g8) g2 |
+    r4 fis8[ g] a4 h |
+    c4.( d8) e[ d] c[ h] |
+    a4 a8[ h] c4 fis, |
+    g1 |
+  }
+}
+
+sopranMelodie = \relative d' {
+  d2 d4 e |
+  d2 g4 g |
+  g fis g a |
+  h2 h |
+  g g4 a |
+  g2 h4 h |
+  h a h cis |
+  d1 |
+  \repeat volta 2 {
+    d2 g,4 g |
+    c2 c4 c |
+    c a h c |
+    h2 h |
+    g a4 g |
+    g2 e4 e |
+    d d e d |
+    d1 |
+  }
+}
+
+altMelodie = \relative h {
+  h2 h4 h |
+  d2 d4 d |
+  c c c c |
+  d2 d |
+  d d4 d |
+  e2 g4 g |
+  g g g g |
+  fis1 |
+  \repeat volta 2 {
+    g2 d4 d |
+    fis2 e4 e |
+    d d d d |
+    d2 d |
+    h2 h4 h |
+    a2 a4 a |
+    a a c h8[ c] |
+    h1 |
+  }
+}
+  
+tenorMelodie = \relative g {
+  g2 g4 g |
+  g2 g4 g |
+  d d e fis |
+  g2 g |
+  h2 h4 h |
+  h2 h4 h |
+  cis cis h a |
+  a1 |
+  \repeat volta 2 {
+    g2 h4 h |
+    c2 a4 a  |
+    a a fis fis |
+    g2 g |
+    g g4 g |
+    e2 g4 g |
+    fis fis fis fis |
+    g1 |
+  }
+}
+
+bassMelodie = \relative g, {
+  g2 g4 g |
+  h2 h4 h |
+  a a a a |
+  g2 g' |
+  g2 g4 g |
+  e2 e4 e |
+  a a a a |
+  d,1 |
+  \repeat volta 2 {
+    h2 h4 h' |
+    a2 g4 g |
+    fis fis d d |
+    g2 g, |
+    e' e4 e |
+    c2 c4 c |
+    d d d d |
+    g1 |
+  }
+}
diff --git a/Bewahr_die_Erde/texte.ly b/Bewahr_die_Erde/texte.ly
new file mode 100644
index 0000000..7969540
--- /dev/null
+++ b/Bewahr_die_Erde/texte.ly
@@ -0,0 +1,59 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+% Abkürzungen
+
+% Die Textaufteilungen
+
+textDIb = \lyricmode {
+  sei je -- dem na -- he, der sich nach Frei -- heit sehnt.
+  Wir, dei -- ne Kin -- der, und du, un -- ser Er -- lö -- ser:
+  be -- wahr die Er -- de und uns die Mensch -- lich -- keit.
+}
+
+textSoloDI = \lyricmode {
+  \set stanza = "1."
+  Be -- wahr die Er -- de,
+  \textDIb
+}
+
+textDI = \lyricmode {
+  \set stanza = "1."
+  Be -- wahr die Er -- de, Gott, schüt -- ze sie in Gna -- den,
+  \textDIb
+}
+
+textDIIb = \lyricmode {
+  al -- le, die ein -- sam und oh -- ne Hoff -- nung sind.
+  Be -- wahr die Er -- de, Fa -- mi -- lien oh -- ne Frie -- den,
+  all dei -- ne Kin -- der, vom Ster -- ben stets be -- droht.
+}
+
+textSoloDII = \lyricmode {
+  \set stanza = "2."
+  Be -- wahr die Er -- de,
+  \textDIIb
+}
+
+textDII = \lyricmode {
+  \set stanza = "2."
+  Be -- wahr die Er -- de, ver -- letz -- te jun -- ge Men -- schen,
+  \textDIIb
+}
+
+textDIIIb = \lyricmode {
+  Men -- schen als Skla -- ven der Welt, die sich ver -- fehlt.
+  Wir, dei -- ne Kin -- der, und du, un -- ser Er -- lö -- ser:
+  be -- wahr die Er -- de und uns die Mensch -- lich -- keit.
+}
+
+textSoloDIII = \lyricmode {
+  \set stanza = "3."
+  Be -- wahr die Er -- de,
+  \textDIIIb
+}
+
+textDIII = \lyricmode {
+  \set stanza = "3."
+  Be -- wahr die Er -- de, dein Volk, das un -- ter -- wegs ist.
+  \textDIIIb
+}