Wie_lieb_sind_mir_deine_Wohnungen überarbeitet

3 files changed, 300 insertions, 151 deletions

diff --git a/Wie_lieb_sind_mir_deine_Wohnungen/Makefile b/Wie_lieb_sind_mir_deine_Wohnungen/Makefile
new file mode 100644
index 0000000..b888508
--- /dev/null
+++ b/Wie_lieb_sind_mir_deine_Wohnungen/Makefile
@@ -0,0 +1,43 @@
+CURDOC=$(shell basename "$(CURDIR)")
+TRANSPOSE=c
+VARIANTE=1
+
+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
+	pkill -SIGHUP -xf 'mupdf(-x11)? (.*/)?$<' || true
+
+clean:
+	rm -f *.pre
+
+Clean: clean
+	rm -f *.pdf *.midi
+
+%.pre: %.ly
+	sed " \
+		s@%spezifisch%@$(SPEZIFISCH)@ ; \
+		$(KLAVIER_REGEX) \
+		$(MIDI_REGEX) \
+		s@%TRANSPOSE%@$(TRANSPOSE)@g; \
+		s@%VARIANTE_$(VARIANTE)%@@g; \
+	" "$<" > "$@"
+
+%.pdf: %.pre stimmen.pre texte.ly
+	lilypond $<
diff --git a/Wie_lieb_sind_mir_deine_Wohnungen/Wie_lieb_sind_mir_deine_Wohnungen.ly b/Wie_lieb_sind_mir_deine_Wohnungen/Wie_lieb_sind_mir_deine_Wohnungen.ly
index 4bf7618..50487a7 100644
--- a/Wie_lieb_sind_mir_deine_Wohnungen/Wie_lieb_sind_mir_deine_Wohnungen.ly
+++ b/Wie_lieb_sind_mir_deine_Wohnungen/Wie_lieb_sind_mir_deine_Wohnungen.ly
@@ -1,32 +1,38 @@
 \include "deutsch.ly"
-\include "stimmen.ly"
+#(ly:set-option 'relative-includes #t)
+\include "stimmen.pre"
 \include "texte.ly"
+#(ly:set-option 'relative-includes #f)
 
-#(set! paper-alist (cons '("kindle" . (cons (* 210 mm) (* 130 mm))) paper-alist))
-#(set-default-paper-size "kindle")
+%spezifisch%
 
-\pointAndClickOff
-
-\header {
-  tagline = ""
-}
 \paper {
   top-margin = 5
+  print-all-headers = ##t
 }
 
+\header {
+  tagline = ##f
+}
+\pointAndClickOff
+
 \score {
+  \header {
+    title = "Wie lieb sind mir deine Wohnungen"
+    poet = "Text: Psalm 84,2-5,12"
+    composer = "Musik: Matthias Kiemle"
+  }
   \new ChoirStaff <<
     \set Score.skipBars = ##t
-    \new Staff {
-      <<
-	\new Voice = frauen { \generalPausenFrauen \bar "|." }
-	\new Voice = sopran { \voiceOne \sopranMelodie \bar "|." }
-	\new Voice = alt    { \voiceTwo \altMelodie \bar "|." }
-      >>
-    }
+    \new Staff <<
+      \new Voice = frauen { \generalPausenFrauen }
+      \new Voice = sopran { \voiceOne \sopranMelodie }
+      \new Voice = alt    { \voiceTwo \altMelodie }
+    >>
     \new Lyrics \lyricsto alt { \altText }
     \new Staff <<
-      \new Voice = maenner { \generalPausenMaenner \bar "|." }
+      \clef "bass"
+      \new Voice = maenner { \generalPausenMaenner }
       \new Voice = tenor { \voiceOne \tenorMelodie }
       \new Voice = bass  { \voiceTwo \bassMelodie }
     >>
diff --git a/Wie_lieb_sind_mir_deine_Wohnungen/stimmen.ly b/Wie_lieb_sind_mir_deine_Wohnungen/stimmen.ly
index d7b80ba..b188c29 100644
--- a/Wie_lieb_sind_mir_deine_Wohnungen/stimmen.ly
+++ b/Wie_lieb_sind_mir_deine_Wohnungen/stimmen.ly
@@ -1,150 +1,250 @@
 %some settings% vim: ai sw=2 lbr nu et
 
-  \version "2.12"
+\version "2.12"
 
-  globalA = {
-    \key d \major
-    %\override Staff.TimeSignature #'style = #'()
-    \time 6/8
-    %\autoBeamOff
-  }
+globalA = {
+  \key d \major
+  %\override Staff.TimeSignature #'style = #'()
+  \time 6/8
+  \autoBeamOff
+  \partial 8
+}
 
-  globalB = {
-    \key g \minor
-    %\override Staff.TimeSignature #'style = #'()
-    %\autoBeamOff
-  }
+globalB = {
+  \key g \minor
+}
 
-  globalC = {
-    \key g \major
-    %\override Staff.TimeSignature #'style = #'()
-    \time 4/4
-    %\autoBeamOff
-  }
+globalC = {
+  \key g \major
+}
+
+globalD = {
+  \time 4/4
+}
 
 % Die Stimmen
 
-  generalPausenFrauen = {
+generalPausenFrauen = {
   \set Score.skipBars = ##t
-    {
-      \partial 8 s8 |
-      \repeat unfold 27 { s2. | }
-      s4.
-      r4. | R2.*3 |
-      \globalC
-      R1 |
-      \repeat unfold 12 { s1 | }
-    }
-  }
+  \globalA
+  s8 |
+  s2.*16 |
+  \globalB
+  s2.*11 |
+  s4.
+  r4. |
+  \globalC
+  R2.*3 |
+  \globalD
+  R1 |
+  s1*12 | \bar "|."
+}
 
-  generalPausenMaenner = {
+generalPausenMaenner = {
   \set Score.skipBars = ##t
-    {
-      \partial 8 s8 |
-      \repeat unfold 15 { s2. | }
-      s2 s8
-      r8 | R2.*4 |
-      \repeat unfold 7 { s2. | }
-      s4.
-      r4. | R2.*3 |
-      \globalC
-      R1 |
-      \repeat unfold 12 { s1 | }
-    }
-  }
+  \globalA
+  s8 |
+  s2.*15 |
+  s2 s8 r |
+  \globalB
+  R2.*4 |
+  s2.*7 |
+  s4. r |
+  \globalC
+  R2.*3 |
+  \globalD
+  R1 |
+  s1*12 | \bar "|."
+}
+
+sopranMelodie = \relative c' {
+  \globalA
+  d8 |
+  a'4 g8 fis e d |
+  h'4 h8 a4 d8 |
+  cis4 h8 a4 h8 |
+  a4 g8 fis4. |
+  a4 d,8 e fis g |
+  a4 d,8 e[( fis]) g |
+  a4 d8 cis a h |
+  a4.~ a4 a8 |
+  h4 e,8 e[( fis]) g |
+  a4 fis8 d4. |
+  g8 g g h a g |
+  a4.~ a4 a8 |
+  h4 e,8 e[( fis]) g |
+  a4 fis8 d'4. |
+  d8 d d d e cis |
+  d4.~ d4 d,8^\p | \bar "||"
+  \globalB
+  b'4 b8 a4 g8 |
+  a4 d,8 d d d |
+  b' b b b8. b16 a g |
+  a4. d, |
+  d'8^\f d d c c c |
+  es4 es8 d4 b8 |
+  g4 b8 a( b) c |
+  d4.( c) |
+  d8 d d c c c |
+  es4 es8 d4 b8  |
+  g4 b8 a( g) f |
+  g4. s | \bar "||"
+  \globalC
+  s2.*3 |
+  \globalD
+  s1 |
+  g4^\f g fis d |
+  g a h2 |
+  c4 h a h8 c |
+  a2 g |
+  c a4 a |
+  h a g fis |
+  e fis8 g a2 |
+  h1 |
+  c2 a4 a |
+  h a g fis |
+  e fis8 g a2 |
+  g1 | \bar "|."
+}
 
-  sopranMelodie = \relative c' {
-    <<
-      %the actual tune
-      {
-     \globalA
-     \partial 8 d8 | a'4 g8 fis e d | h'4 h8 a4 d8 | cis4 h8 a4 h8 |
-     a4 g8 fis4. |
-     a4 d,8 e fis g | a4 d,8 e( fis) g | a4 d8 cis a h | a4.~ a4 a8 |
-     h4 e,8 e( fis) g | a4 fis8 d4. | g8 g g h a g | a4.~ a4 a8 |
-     h4 e,8 e( fis) g | a4 fis8 d'4. | d8 d d d e cis | d4.~ d4 d,8 \bar "||"
-     \globalB
-     b'4 b8 a4 g8 | a4 d,8 d d d | b' b b b8. b16 a g | a4. d, |
-     d'8 d d c c c | es4 es8 d4 b8 | g4 b8 a( b) c | d4.( c) |
-     d8 d d c c c | es4 es8 d4 b8  | g4 b8 a( g) f | g4. s |
-     \repeat unfold 3 { s2. | }
-     \globalC
-     s1 |
-     g4 g fis d | g a h2 | c4 h a h8 c | a2 g |
-     c a4 a | h a g fis | e fis8 g a2 | h1 |
-     c2 a4 a | h a g fis | e fis8 g a2 | g1 \bar "|."
-      }
-    >>
-  }
+altMelodie = \relative c' {
+  \globalA
+  d8 |
+  d4 d8 d d d |
+  d4 d8 fis4 a8 |
+  a4 g8 fis4 g8 |
+  e4 e8 d4. |
+  d4 d8 d d e |
+  fis4 d8 d4 d8 |
+  e4 fis8 e e gis |
+  a4.~ a4 e8 |
+  e4 d8 cis[( d]) e |
+  d4 d8 d4 d8 |
+  d4 d8 g fis e |
+  fis4.~ fis4 e8 |
+  d4 d8 cis[( d]) e |
+  d4 d8 d4 d8 g4 g8 g g e |
+  fis4.~ fis4 d8 | \bar "||"
+  \globalB
+  b'4 b8 a4 g8 |
+  a4 d,8 d d d |
+  b' b b b8. b16 a g |
+  a4. d, |
+  f8 f f f f f |
+  g4 g8 f4 f8 |
+  es4 g8 f( g) f |
+  f2. |
+  f8 f f f f f |
+  g4 g8 f4 f8 |
+  es4 g8 f4 f8 |
+  d4. s | \bar "||"
+  \globalC
+  s2.*3 |
+  \globalD
+  s1 |
+  d4 d d d |
+  e d d2 |
+  a'4 g fis g8 g |
+  g4( fis) d2 |
+  e d4 d |
+  d d e e8[ d] |
+  c4 c8 d g[( fis16 e] fis4) |
+  g1 |
+  e2 d4 d |
+  d d e e8[ d] |
+  c4 c8 d g4( fis) |
+  d1 | \bar "|."
+}
 
-  altMelodie = \relative c' {
-    <<
-      %the actual tune
-      {
-     \globalA
-     \partial 8 d8 | d4 d8 d d d | d4 d8 fis4 a8 | a4 g8 fis4 g8 | e4 e8 d4. |
-     d4 d8 d d e | fis4 d8 d4 d8 | e4 fis8 e e gis | a4.~ a4 e8 |
-     e4 d8 cis( d) e | d4 d8 d4 d8 | d4 d8 g fis e | fis4.~ fis4 e8 |
-     d4 d8 cis( d) e | d4 d8 d4 d8 g4 g8 g g e | fis4.~ fis4 d8 \bar "||"
-     \globalB
-     b'4 b8 a4 g8 | a4 d,8 d d d | b' b b b8. b16 a g | a4. d, |
-     f8 f f f f f | g4 g8 f4 f8 | es4 g8 f( g) f | f2. |
-     f8 f f f f f | g4 g8 f4 f8 | es4 g8 f4 f8 | d4. s |
-     \repeat unfold 3 { s2. | }
-     \globalC
-     s1 |
-     d4 d d d | e d d2 | a'4 g fis g8 g | g4( f) d2 |
-     e d4 d | d d e e8 d | c4 c8 d g( fis16 e fis4) | g1 |
-     e2 d4 d | d d e e8 d | c4 c8 d g4( fis) | d1 \bar "|."
-      }
-    >>
-  }
-  
-  tenorMelodie = \relative c {
-    <<
-      %the actual tune
-      \clef "bass"
-      {
-     \globalA
-     \partial 8 d8 | fis4 h8 a g fis | g4 h8 d4 d8 | d4 d8 d4 d8 | cis4 cis8 a4. |
-     a4 a8 h h h | d4 a8 g( a) h | a4 a8 a cis d | cis4.~ cis4 cis8 |
-     d4 h8 a4 a8 | a4 a8 a g fis | h4 h8 cis cis cis | d4.~ d4 cis8 |
-     h4 h8 a4 a8 | a4 a8 fis g a | h4 h8 h h a | a4.~ a4 s8 |
-     \globalB
-     \repeat unfold 4 { s2. | }
-     b8 b b a a a | b4 b8 b4 d8 | b4 e8 c4 a8 | b4.( a) |
-     b8 b b a a a | b4 b8 b4 d8 | b4 d8 c4 a8 | b4. s |
-     \repeat unfold 3 { s2. | }
-     \globalC
-     s1 |
-     h4 h a a | h a g2 | e'4 d d d8 c | d2 h |
-     a fis8( g) a( fis) | g4 fis h h | g a8( h) d2 | d1 |
-     a2 fis8( g) a( fis) | g4 fis h h | g a8 h d4( c) | h1 \bar "|."
-      }
-    >>
-  }
+tenorMelodie = \relative c {
+  \globalA
+  d8 |
+  fis4 h8 a g fis |
+  g4 h8 d4 d8 |
+  d4 d8 d4 d8 |
+  cis4 cis8 a4. |
+  a4 a8 h h h |
+  d4 a8 g[( a]) h |
+  a4 a8 a cis d |
+  cis4.~ cis4 cis8 |
+  d4 h8 a4 a8 |
+  a4 a8 a g fis |
+  h4 h8 cis cis cis |
+  d4.~ d4 cis8 |
+  h4 h8 a4 a8 |
+  a4 a8 fis[ g] a |
+  h4 h8 h h a |
+  a4.~ a4 s8 | \bar "||"
+  \globalB
+  s2.*4 |
+  b8 b b a a a |
+  b4 b8 b4 d8 |
+  b4 es8 c4 a8 |
+  b4.( a) |
+  b8 b b a a a |
+  b4 b8 b4 d8 |
+  b4 d8 c4 a8 |
+  b4. s | \bar "||"
+  \globalC
+  s2.*3 |
+  \globalD
+  s1 |
+  h4 h a a |
+  h a g2 |
+  e'4 d d d8 c |
+  d2 h |
+  a fis8( g) a( fis) |
+  g4 fis h h |
+  g a8( h) d2 |
+  d1 |
+  a2 fis8( g) a( fis) |
+  g4 fis h h |
+  g a8 h d4( c) |
+  h1 | \bar "|."
+}
 
-  bassMelodie = \relative c {
-    <<
-      %the actual tune
-      \clef bass
-      {
-     \globalA
-     \partial 8 d8 | d4 d8 d d d | g4 g8 fis4 fis8 | g4 g8 fis4 g8 | a4 a,8 d4. |
-     fis4 fis8 g g g | a4 a,8 h4 h8 | cis4 d8  e e e | a4.~ a4 a8 |
-     g4 g8 g4 g8 | fis4 fis8 h,4 h8 | e4 e8 a, a a | d4.~ d4 d8 |
-     g4 g8 g( fis) e | fis4 fis8 h,4 h8 | e4 e8 a, a a | d4.~ d4 s8 |
-     \globalB
-     \repeat unfold 4 { s2. | }
-     b8 b b f' f f | es4 es8 b4 b8 | es4 es8 f4 f8 b,4.( f') |
-     b,8 b b f' f f | es4 es8 b4 b8 | es4 es8 f4 f8 g4. s |
-     \repeat unfold 3 { s2. | }
-     \globalC
-     s1 |
-     g,8 a h c d e fis d | e g fis a g2 | a,4 h8 c d4 g8 e | d2 g, |
-     a d8( e) fis( d) | g4 d e h | c a8 g d'2 | g,1 |
-     a2 d8( e) fis( d) | g4 d e h | c a8 g d'2 | g,1 \bar "|."
-      }
-    >>
-  }
+bassMelodie = \relative c {
+  \globalA
+  d8 |
+  d4 d8 d d d |
+  g4 g8 fis4 fis8 |
+  g4 g8 fis4 g8 |
+  a4 a,8 d4. |
+  fis4 fis8 g g g |
+  a4 a,8 h4 h8 |
+  cis4 d8  e e e |
+  a4.~ a4 a8 |
+  g4 g8 g4 g8 |
+  fis4 fis8 h,4 h8 |
+  e4 e8 a, a a |
+  d4.~ d4 d8 |
+  g4 g8 g[( fis]) e |
+  fis4 fis8 h,4 h8 |
+  e4 e8 a, a a |
+  d4.~ d4 s8 | \bar "||"
+  \globalB
+  s2.*4 |
+  b8 b b f' f f |
+  es4 es8 b4 b8 |
+  es4 es8 f4 f8 b,4.( f') |
+  b,8 b b f' f f |
+  es4 es8 b4 b8 |
+  es4 es8 f4 f8 g4. s | \bar "||"
+  \globalC
+  s2.*3 |
+  \globalD
+  s1 |
+  g,8[ a] h[ c] d[ e] fis[ d] |
+  e[ g] fis[ a] g2 |
+  a,4 h8[ c] d4 g8[ e] |
+  d2 g, |
+  a d8[( e]) fis[( d]) |
+  g4 d e h |
+  c a8 g d'2 |
+  g,1 |
+  a2 d8[( e]) fis[( d]) |
+  g4 d e h |
+  c a8 g d'2 |
+  g,1 | \bar "|."
+}