Messias: XV entdeutscht

2 files changed, 112 insertions, 31 deletions

diff --git a/Messias/parts/stimmenXV.ly b/Messias/parts/stimmenXV.ly
index 8fa5df7..b2cdab3 100644
--- a/Messias/parts/stimmenXV.ly
+++ b/Messias/parts/stimmenXV.ly
@@ -19,25 +19,35 @@ sopranMelodieXV = \relative fis'' {
   d d8. cis16 d4 d8 d |
   cis2 cis |
   R1*6 |
-  a4 d~ d8 cis16[ h] cis8 a |
+  a4 d~ d8 ifdef(`deutsch',`cis16[ h] cis8',`cis16[( h] cis8)') a |
   h4 h8 h a2 |
   r d4 g~ | % Seite 16
-  g8 fis16[ e] fis8 cis d4( e8[ d] |
-  cis4) d2 cis4 |
+  g8 ifdef(`deutsch',`fis16[ e] fis8',`fis16[( e] fis8)') cis ifdef(`deutsch',`
+    d4( e8[ d] |
+    cis4)
+  ',`
+    d4 e8[ d] |
+    cis4
+  ') d2 cis4 |
   d2 r |
   fis4 e8. d16 cis4 r |
   d cis8. h16 a4 d8 d |
   d2 d |
   r r4 d, |
   d2. d4 |
-  d2 d |
+  ifdef(`deutsch',`d2 d',`d1') |
   R1*3 | % Seite 17
   a'4 d r2 |
   h4 e r2 |
   cis4 fis r2 |
-  d4 g~ g8 fis16[ e] fis8 d e4.( fis8 g2) |
+  d4 g~ g8 ifdef(`deutsch',`fis16[ e] fis8',`fis16[( e] fis8)') d |
+  ifdef(`deutsch',`
+    e4.( fis8 g2) |
+  ',`
+    e4. fis8 g2 |
+  ')
   fis4 e8([ d] cis4) d~ |
-  d2 cis |
+  d2 cis\trill |
   d r |
   R1*7 |
   \bar "|." %Seite 18
@@ -55,11 +65,11 @@ altMelodieXV = \relative a' {
   h a8. g16 fis4 a8 a |
   a2 e |
   R1*5 |
-  e4 a~ a8 g16[ fis] g8 e |
+  e4 a~ a8 ifdef(`deutsch',`g16[ fis] g8',`g16[( fis] g8)') e |
   fis4 fis8 fis e2 |
-  d4 g~ g8 fis16[ e] fis8 d |
+  d4 g~ g8 ifdef(`deutsch',`fis16[ e] fis8',`fis16[( e] fis8)') d |
   e2 d4 h' | % Seite 16
-  e, a fis( g) |
+  e, a ifdef(`deutsch',`fis( g)',`fis g') |
   a2 g4. g8 |
   fis2 r |
   a4 a8. h16 e,4 r |
@@ -67,16 +77,16 @@ altMelodieXV = \relative a' {
   h2 a |
   r r4 h,4 |
   h2. h4 |
-  h2 h2 |
+  ifdef(`deutsch',`h2 h2',`h1') |
   R1 |
-  d4 g~ g8 fis16[ e] fis8 d | % Seite 17
-  e4 a~ a8 g16[ fis] g8 e |
+  d4 g~ g8 ifdef(`deutsch',`fis16[ e] fis8',`fis16[( e] fis8)') d | % Seite 17
+  e4 a~ ifdef(`deutsch',`a8 g16[ fis] g8',`a8[ g16( fis] g8)') e |
   fis4 r fis d |
   r2 g4 e |
   r2 a4 fis |
   r2 r4 a |
-  g a d, h' |
-  a( g) a2 |
+  g ifdef(`deutsch',`a',`a8 a') d,4 h' |
+  ifdef(`deutsch',`a( g)',`a g') a2 |
   a2. a4 a2 r |
   R1*7 |
   \bar "|." % Seite 18
@@ -91,7 +101,7 @@ tenorMelodieXV = \relative d' {
   d2 r |
   r r4 a |
   a2. a4 |
-  a2 a2 |
+  ifdef(`deutsch',`a2 a',`a1') |
   R1*2 |
   d4 cis8. h16 a4 r |
   h a8. g16 fis4 r | % Seite 15
@@ -99,13 +109,13 @@ tenorMelodieXV = \relative d' {
   a2 a, |
   r r4 d |
   d2. d,4 |
-  d2 d2 |
+  ifdef(`deutsch',`d2 d',`d1') |
   R1 |
   r2 a'4 d~ |
-  d8 cis16[ h] cis8 a e'2 |
+  d8 ifdef(`deutsch',`cis16[ h] cis8',`cis16[( h] cis8)') a e'2 |
   d4. d8 a2 |
   R1 |
-  e'4 a~ a8 g16[ fis] e8 d | % Seite 16
+  e'4 a~ a8 ifdef(`deutsch',`g16[ fis] e8',`g16[( fis] e8)') d | % Seite 16
   cis2 h |
   e4( d) e4. e8 |
   a,2 r |
@@ -114,15 +124,22 @@ tenorMelodieXV = \relative d' {
   g2 fis |
   r r4 g,4 |
   g2. g4 |
-  g2 g |
-  R1 r2 a4 d~ | % Seite 17
-  d8 cis16[ h] cis8 a h[ a] h cis |
+  ifdef(`deutsch',`g2 g',`g1') |
+  R1 |
+  r2 a4 d~ | % Seite 17
+  d8 ifdef(`deutsch',`cis16[ h] cis8',`cis16[( h] cis8)') a h[ a] h cis |
   d4 r a h |
   r2 e4 cis |
   r2 fis4 d |
   r2 r4 fis |
-  e e8[ cis] d([ cis d e] |
-  fis4) h, e fis |
+  e
+  ifdef(`deutsch',`
+    e8[ cis] d([ cis d e] |
+    fis4) h, e fis |
+  ',`
+    e8 cis d[ cis d e] |
+    fis4 h, e( fis) |
+  ')
   e2. e4 |
   fis2 r |
   R1*7 |
@@ -135,33 +152,45 @@ bassMelodieXV = \relative a {
   R1*4 |
   r2 r4 a |
   a2. a,4 |
-  a2 a2 |
+  ifdef(`deutsch',`a2 a',`a1') |
   R1*6 | % Seite 15
   r2 r4 d'4 |
   d2. d,4 |
-  d2 d |
+  ifdef(`deutsch',`d2 d',`d1') |
   R1 |
-  d4^\fff g~ g8 fis16[ e] fis8 d |
+  d4 g~ g8 ifdef(`deutsch',`fis16[ e] fis8',`fis16[( e] fis8)') d |
   a'2 r2 |
   R1 |
   r2 a4 d~ |
   d8 cis16[ h] cis8 a h2 | % Seite 16
-  a2. g4~( |
-  g fis) e4. e8 |
+  a2. ifdef(`deutsch',`
+    g4~( |
+    g fis)
+  ',`
+    g4~ |
+    g fis
+  ') e4. e8 |
   d2 r |
   d'4 cis8. h16 a4 r |
   h a8. g16 fis4 fis8 fis |
   g2 d |
   r r4 g |
   g2. g,4 |
-  g2 g2 |
+  ifdef(`deutsch',`g2 g2',`g1') |
   R1*3 | % Seite 17
   r2 d'4 g |
   r2 e4 a |
   r2 fis4 h |
   r2 a4 d~ |
-  d8 cis16[ h] cis8 a h([ a h cis] |
-  d4) g,2 fis4 |
+  d8 ifdef(`deutsch',`cis16[ h] cis8',`cis16[( h] cis8)') a
+  ifdef(`deutsch',`
+    h([ a h cis] |
+    d4)
+  ',`
+    h[ a h cis] |
+    d4
+  ')
+  g,2 fis4 |
   a2. a4 |
   d,2 r |
   R1*7 |
diff --git a/Messias/parts/texteXV.ly b/Messias/parts/texteXV.ly
index 3d22b35..e0a8f12 100755
--- a/Messias/parts/texteXV.ly
+++ b/Messias/parts/texteXV.ly
@@ -1,6 +1,27 @@
 
 % XV % {{{
+GtGgtGith = \lyricmode {
+  Glo -- ry to God, glo -- ry to God in the high -- est,
+}
+
+GtGgtGgtGith = \lyricmode {
+  Glo -- ry to God, glo -- ry to God, glo -- ry to God in the high -- est,
+}
+
+GtGgtGithapoe = \lyricmode {
+  \GtGgtGith
+  and peace on earth,
+}
+
 sopranTextXVEng = \lyricmode {
+  \GtGgtGith
+  \GtGgtGgtGith
+  good will to -- wards men, to -- wards men,
+  good will to -- wards men, __ _ _ to -- wards men.
+  \GtGgtGithapoe
+  good will, good will, good will,
+  good will to -- wards men, __ _ _
+  good will to -- wards men.
 }
 
 sopranTextXVDeu = \lyricmode {
@@ -17,6 +38,16 @@ sopranTextXVDeu = \lyricmode {
 }
 
 altTextXVEng = \lyricmode {
+  \GtGgtGith
+  \GtGgtGgtGith
+  good will to -- wards men, to -- wards men,
+  good will to -- wards men, to -- wards men,
+  good will __ _ _ to -- wards men.
+  \GtGgtGithapoe
+  good will to -- wards men, to -- wards men,
+  good will, good will, good will,
+  good will to -- wards men,
+  good will __ _ _ to -- wards men.
 }
 
 altTextXVDeu = \lyricmode {
@@ -35,6 +66,18 @@ altTextXVDeu = \lyricmode {
 }
 
 tenorTextXVEng = \lyricmode {
+  \GtGgtGith
+  and peace on earth,
+  \GtGgtGgtGith
+  and peace on earth,
+  good will to -- wards men, to -- wards men,
+  good will to -- wards men,
+  good will to -- wards men.
+  \GtGgtGithapoe
+  good will to -- wards men, to -- wards men,
+  good will, good will, good will,
+  good will to -- wards men, __ _
+  good will to -- wards men.
 }
 
 tenorTextXVDeu = \lyricmode {
@@ -55,6 +98,15 @@ tenorTextXVDeu = \lyricmode {
 }
 
 bassTextXVEng = \lyricmode {
+  And peace on earth,
+  and peace on earth,
+  good will to -- wards men,
+  good will to -- _ wards men,
+  good will __ _ to -- wards men.
+  \GtGgtGithapoe
+  good will, good will, good will,
+  good will to -- wards men, __ _
+  good will to -- wards men.
 }
 
 bassTextXVDeu = \lyricmode {