initialer Commit

3 files changed, 240 insertions, 0 deletions

diff --git a/Wohl_mir_dass_ich_Jesum_habe/Wohl_mir_dass_ich_Jesum_habe.ly b/Wohl_mir_dass_ich_Jesum_habe/Wohl_mir_dass_ich_Jesum_habe.ly
new file mode 100644
index 0000000..7c25fa3
--- /dev/null
+++ b/Wohl_mir_dass_ich_Jesum_habe/Wohl_mir_dass_ich_Jesum_habe.ly
@@ -0,0 +1,41 @@
+\include "deutsch.ly"
+\include "stimmen.ly"
+\include "texte.ly"
+
+#(set! paper-alist (cons '("kindle" . (cons (* 210 mm) (* 130 mm))) paper-alist))
+#(set-default-paper-size "kindle")
+
+\header {
+  tagline = ""
+}
+\paper {
+  top-margin = 5
+}
+
+\score {
+  <<
+    \set Score.skipBars = ##t
+    \new ChoirStaff <<
+      \new Staff <<
+        \new Voice = frauen       { \global \pausen }
+        \new Voice = sopran       { \global \voiceOne \sopranMelodie }
+        \new Voice = alt          { \global \voiceTwo \altMelodie }
+      >>
+      \new Lyrics \lyricsto sopran { \textI }
+      \new Lyrics \lyricsto sopran { \textII }
+      \new Staff <<
+        \new Voice = maenner      { \clef "bass" \global \pausen }
+        \new Voice = tenor        { \clef "bass" \global \voiceOne \tenorMelodie }
+        \new Voice = bass         { \clef "bass" \global \voiceTwo \bassMelodie }
+      >>
+    >>
+    \new PianoStaff <<
+      \new Voice = links          { \global \autoBeamOn \klavierLinksMelodie }
+      \new Voice = rechts         { \clef "bass" \global \autoBeamOn \klavierRechtsMelodie }
+    >>
+  >>
+  \layout {
+    indent = #0
+    \context { \Staff \RemoveEmptyStaves }
+  }
+}
diff --git a/Wohl_mir_dass_ich_Jesum_habe/stimmen.ly b/Wohl_mir_dass_ich_Jesum_habe/stimmen.ly
new file mode 100644
index 0000000..294cccd
--- /dev/null
+++ b/Wohl_mir_dass_ich_Jesum_habe/stimmen.ly
@@ -0,0 +1,171 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+  global = {
+    \key g \major
+    %\override Staff.TimeSignature #'style = #'()
+    \time 9/8
+    \autoBeamOff
+  }
+
+% Die Stimmen
+
+  pausen = {
+    R8*9*7 | \repeat volta 2 { R8*9 |
+      s8*9*3 | s2. r4. | R8*9 |
+      s8*9*3 | s2. r4. | R8*9*6 | s8*9*3 | s2. r4. |
+      R8*9 | s8*9*3 | s2. r4. | R8*9*7 |
+      s8*9*3 | s2. r4. |
+      R8*9*2 | s8*9*3 | s2. r4. | R8*9*2 |
+      s8*9*3 | s2. r4. | R8*9 |
+      s8*9*4 | R8*9*9 |
+    }
+    \alternative { {
+      R8*9 |
+    } {
+      R8*9*2 | \bar "|."
+    } }
+  }
+
+
+  sopranMelodie = \relative h' {
+    s8*9*7 | \repeat volta 2 { s8*9 |
+      h2. c4. | d2. d4. | c2. h4. | a a s | s2. s4. |
+      h2. c4. | d2. h4. | a4( h16[ c]) h4.( a) | g2. s4. |
+      s8*9*6 | h2. c4. | d2. d4. | c2. h4. | a a s | s2. s4. |
+      h2. c4. | d2. h4. | a4( h16[ c]) h4.( a) | g2. s4. |
+      s8*9*7 | a2. h4. | c2. c4. | h~( h4 c16[ d]) h4. | a a s |
+      s8*9*2 | c2. d4. | e2. e4. |
+      d~( d4 e16[ f]) d4. | c c s | s8*9*2 |
+      h2. c4. | d2. d4. | c4. h2. | a s4. | s8*9 |
+      h2. c4. | d2. h4. | a4( h16[ c]) a2. | g2.~ g4. | s8*9*9 |
+    }
+    \alternative { {
+      s8*9 |
+    } {
+      s8*9*2 | \bar "|."
+    } }
+  }
+
+  altMelodie = \relative g' {
+    s8*9*7 | \repeat volta 2 { s8*9 |
+      g2. g4. | a( g) fis | g d2. | d4. d s | s2. s4. |
+      g2. g4. | g( d) e | e fis4( e8 fis4.) | d2. s4. |
+      s8*9*6 | g2. g4. | a( g) fis | g d2. | d4. d s | s2. s4. |
+      g2. g4. | g( d) e | e fis4( e8 fis4.) | d2. s4. |
+      s8*9*7 | fis2. gis4. | a2. a4. | a2. gis4. | a a s |
+      s8*9*2 | a2. g4. | g( c) g |
+      f( a) g | g g s | s8*9*2 |
+      g2. g4. | g2. g4. | g4( fis8) g2. | fis s4. | s8*9 |
+      g2. g4. | g( d) e | e fis4( e8 fis4.) | d2.~ d4. | s8*9*9 |
+    }
+    \alternative { {
+      s8*9 |
+    } {
+      s8*9*2 | \bar "|."
+    } }
+  }
+
+  tenorMelodie = \relative d' {
+    s8*9*7 | \repeat volta 2 { s8*9 |
+      d2. e4. | a,2. h4. | h( a) g | fis a s | s2. s4. |
+      d2. e4. | d( h) h | c4( a8) d4( h8 c4.) | h2. s4. |
+      s8*9*6 | d2. e4. | a,2. h4. | h( a) g | fis a s | s2. s4. |
+      d2. e4. | d( h) h | c4( a8) d4( h8 c4.) | h2. s4. |
+      s8*9*7 | d2. d4. | e2. f4. | f( d) e | c c s |
+      s8*9*2 | e2. d4. | c2. c4. |
+      a2. h4. | e e s | s8*9*2 |
+      d2. e4. | d( h) h | c( d) e | a,2. s4. | s8*9 |
+      d2. e4. | d( h) h | c4( a8) d4( h8 c4.) | h2.~ h4. | s8*9*9 |
+    }
+    \alternative { {
+      s8*9 |
+    } {
+      s8*9*2 | \bar "|."
+    } }
+  }
+
+  bassMelodie = \relative g {
+    s8*9*7 | \repeat volta 2 { s8*9 |
+      g4.( fis) e | fis( e) d | e( fis) g | d d s | s2. s4. |
+      g( fis) e | h'( h,) e | c( d) d | g,2. s4. |
+      s8*9*6 | g'4.( fis) e | fis( e) d | e( fis) g | d d s | s2. s4. |
+      g( fis) e | h'( h,) e | c( d) d | g,2. s4. |
+      s8*9*7 | d'4.( c) h | a( a'4 g8) f4( e8) | d4.( h) e | a, a s |
+      s8*9*2 | a'2. h4. | c( a) e |
+      f( d) g | c, c s | s8*9*2 |
+      g'2. e4. | h( e) e | a,( h) c | d2. s4. | s8*9 |
+      g4.( fis) e | h'( h,) e | c d2. | g,2.~ g4. | s8*9*9 |
+    }
+    \alternative { {
+      s8*9 |
+    } {
+      s8*9*2 | \bar "|."
+    } }
+  }
+
+  klavierLinksMelodie = \relative g' {
+    r8 g a << \new Voice { \voiceOne h8( d c) c( e d) | d( g fis) g( d h) g( a h) | c( d e) d( c h) a( h g) | fis( g a) d,( fis a) c( h a) | }
+      \new Voice { \voiceTwo g4. g | g h4 r8 g4. | e g e | fis d fis | } >>
+    <g h>8( g a) << \new Voice { \voiceOne h8( d c) c( e d) | d( g fis) g( d h) g( a h) | e,( d' c) h( a g) d( g fis) | }
+      \new Voice { \voiceTwo g4. e | g h4 r8 g4. | e e d | } >>
+    \repeat volta 2 {
+      << \new Voice { \voiceOne g8( h d) g( d h) g( h d) | g4. } \new Voice { \voiceTwo g,4.~ g g~ | g } >> r4. g |
+      <a d,>2. <fis h>4. | << \new Voice { \voiceOne c'2. h4. } \new Voice { \voiceTwo g4. d2. } >> |
+      r8 d e << \new Voice { \voiceOne fis( a g) a( c h) | c( a fis) d( fis a) c( h a) |
+        h( g a) h( d c) c( e d) | d( g fis) g( d h) g( a h) | e,( d' c) h( a g) }
+        \new Voice { \voiceTwo d4 e8 fis4 g8 | fis4 r8 d4. fis |
+        g g g | g~ g g | e fis4 g8 } >>
+      d( g fis) | g( h a) << \new Voice { \voiceOne h( d c) c( e d) | d( g fis) g( d h) g( a h) | c( d e) d( c h) a( h g) | fis( g a) d,( fis a) c( h a) | }
+        \new Voice { \voiceTwo g4. g | g h4 r8 g4. | e g e | fis d fis } >> | <g h>8( g a)
+      << \new Voice { \voiceOne h( d c) c( e d) | d( g fis) g( d h) g( a h) | e,( d' c) h( a g) d( g fis) | g4. }
+        \new Voice { \voiceTwo g4. e | g h4 r8 g4. | e e d4 c8 | h4. } >> r4. g' | <a d,>2. <h fis>4. | << \new Voice { \voiceOne c2. h4. } \new Voice { \voiceTwo g4. d2. } >> |
+      r8 d8 e << \new Voice { \voiceOne fis8( a g) a( c h) | c( a fis) d( fis a) c( h a) | h( g a) h( d c) c( e d) | d(g fis) g( d h) g( a h) | e,( d' c) h( a g) }
+        \new Voice { \voiceTwo d4 e8 fis4 g8 | fis4 r8 d4. fis | g g g | g~ g g | e fis4 g8 } >> d8( g fis) | g( h a)
+      << \new Voice { \voiceOne h( d c) c( e d) | d( g fis) g( d h) g( a h) | c( d e) d( c h) a( h g) | fis( g a) d,( fis a) c( h a) }
+        \new Voice { \voiceTwo g4. g | g h4 r8 g4. | e g e | fis d fis } >> |
+      <g h>8( g a) << \new Voice { \voiceOne h( d c) c( e d) | d( g fis) g( d h) g( a h) | e,( d' c) h( a g) d( g fis) }
+        \new Voice { \voiceTwo g4. e | g h4 r8 g4. | e e d } >> | g8( h d) g( d h) << \new Voice { \voiceOne g( h cis) } \new Voice { \voiceTwo g4. } >> |
+      d'8( d, e) << \new Voice { \voiceOne fis( a gis) gis( h a) | a( c h) c( a e) } \new Voice { \voiceTwo d4. d | c d4 } >> c8( d e) |
+      << \new Voice { \voiceOne f8( d' c) d( h gis) e( fis gis) | a( c h) c( e d) d( f e) | e( a gis) a( e c) a( h c) | f( e d) c( h a) }
+        \new Voice { \voiceTwo f4.~ f e | a a a | a c a | a fis } >> e8( a gis) | << \new Voice { \voiceOne a( c e) a } \new Voice { \voiceTwo a,4.~ a8 } >> r4 r4. | r8 c d
+      << \new Voice { \voiceOne e8( g f) g( b a) | a( c h) c( a f) d( e f) | e( g f) g( e c) g( a b) | a( c h) c( a f) d( e f) }
+        \new Voice { \voiceTwo c'4. c | c f d | c c g | f f d } >> | e8( c d)
+      << \new Voice { \voiceOne e8( g fis) g( h a) | h( g a) h( d c) c( e d) | d( g fis) g( d h) g( a h) | c( d e) d( c h) a( h g) }
+        \new Voice { \voiceTwo c,4 d8 d4 fis8 | g4. g g | g h g | e g e } >> | <d fis>8( d e) << \new Voice { \voiceOne fis( a g) a( c h) } \new Voice { \voiceTwo d,4 e8 fis4 g8 } >> |
+      <a c>( a fis) << \new Voice { \voiceOne d( fis a) c( h a) } \new Voice { \voiceTwo d,4. d4 fis8 } >> |
+      <g h>( g a) << \new Voice { \voiceOne h( d c) c( e d) | d( g fis) g( d h) g( a h) | e,( d' c) h( a g) }
+        \new Voice { \voiceTwo g4. g | g g g | e fis4 g8 } >> d( g fis) |
+      << \new Voice { \voiceOne g( h d) g( d h) g( h d) | d( g fis) g( d h) g( a h) | c( d e) d( c h) a( h g) | fis( g a) d,( fis a) c( h a) }
+        \new Voice { \voiceTwo g4.~ g g~ | g g~ g | fis g e~ | e d fis | g g g | g h g | e g e | d d fis } >> | <g h>8( g a)
+      << \new Voice { \voiceOne h( d c) c( e d) | d( g fis) g( d h) g( a h) } \new Voice { \voiceTwo g4. e | g h g } >> | }
+    \alternative { {
+      << \new Voice { \voiceOne e8( d' c) h( a g) d( g fis) } \new Voice { \voiceTwo e4. e d } >> |
+    } {
+      << \new Voice { \voiceOne e8( d' c) h( a g) d( g fis) } \new Voice { \voiceTwo e4. e d4 c8 } >> | <h d g>2.~ <h d g>4.^\fermata | \bar "|."
+    } }
+  }
+
+  klavierRechtsMelodie = \relative g, {
+    g4. g' e | h e e, | a h c | d fis d |
+    g e c | h e d | c cis d | \repeat volta 2 { g, r4 g'8 d4 h8 |
+      g4. fis' e | fis e d | e fis g | d r4 d8 d4 d8 | d4. r4 d8 d4 d8 |
+      g4. fis e | h' h, e | c d d, | g g' e |
+      h e e, | a h c | d fis d | g e c |
+      h e d | c cis d | g, fis' e | fis e d | e fis g | d r4 d8 d4 d8 |
+      d4. r4 d8 d4 d8 | g4. fis e | h' h, e | c d d, |
+      g g' e | h e e, | a h c | d fis d |
+      g e c | h e d | c cis d | g, r4 g'8 fis4 e8 |
+      d4. c h | a a'4 g8 f4 e8 | d4. h e | a, f' d |
+      c f e | d dis e | a, a' h | c a e |
+      f d g | c, e c | f d g | c, r4 c8 h4 d8 |
+      g,4. g' e | h e e, | a h c | d r4 d8 d4 d8 | d,4. r4 d'8 d4 d8 |
+      g4. fis e | h' h, e | c d d, | g2.~ g4.~ |
+      g2.~ g4. | g2.~ g4.~ | g2.~ g4.~ | g g' e |
+      h e e, | a h c | d fis d | g e c |
+      h e d | }
+    \alternative { {
+      c cis d |
+    } {
+      c cis d^\markup { \italic rit. } | g,2.~ g4._\fermata | \bar "|."
+    } }
+  }
diff --git a/Wohl_mir_dass_ich_Jesum_habe/texte.ly b/Wohl_mir_dass_ich_Jesum_habe/texte.ly
new file mode 100644
index 0000000..8820148
--- /dev/null
+++ b/Wohl_mir_dass_ich_Jesum_habe/texte.ly
@@ -0,0 +1,28 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+% Abkürzungen
+
+% Die Textaufteilungen
+
+  textI = \lyricmode {
+    \set stanza = "1."
+    Wohl mir, dass ich Je -- sum ha -- be,
+    o wie fes -- te halt ich ihn,
+    dass er mir mein Herz -- e la -- be,
+    wenn ich krank und trau -- rig bin.
+    Je -- sum hab ich, der mich lie -- bet
+    und sich mir zu ei -- gen gi -- bet,
+    ach drum lass ich Je -- sum nicht,
+    wenn mir gleich mein Her -- ze bricht.
+  }
+  textII = \lyricmode {
+    \set stanza = "2."
+    Je -- sus blei -- bet mei -- ne Freu -- de,
+    mei -- nes Her -- zens Trost und Saft.
+    Je -- sus weh -- ret al -- lem Lei -- de,
+    er ist mei -- nes Le -- bens Kraft,
+    mei -- ner Au -- gen Lust und Son -- ne,
+    mei -- ner See -- le Schatz und Won -- ne;
+    da -- rum lass ich Je -- sum nicht
+    aus dem Her -- zen und Ge -- sicht.
+  }