Veni_Creator_Spiritus fertig

4 files changed, 106 insertions, 29 deletions

diff --git a/Veni_Creator_Spiritus/Makefile b/Veni_Creator_Spiritus/Makefile
index 38c18d6..45c33a3 100644
--- a/Veni_Creator_Spiritus/Makefile
+++ b/Veni_Creator_Spiritus/Makefile
@@ -1,4 +1,5 @@
 CURDOC=$(shell basename "$(CURDIR)")
+STROPHEN=[1-7]
 
 ifeq ($(FUER),ewe)
   SPEZIFISCH=\#(set! paper-alist (cons '(\"kindle\" . (cons (* 210 mm) (* 130 mm))) paper-alist))\n\#(set-default-paper-size \"kindle\")
@@ -33,6 +34,11 @@ Clean: clean
 		s@%spezifisch%@$(SPEZIFISCH)@ ; \
 		$(KLAVIER_REGEX) \
 		$(MIDI_REGEX) \
+		/%STR_\($(STROPHEN)\)%/{ \
+			s/%[A-Z_0-9]\+%//; \
+			p; \
+			d; \
+		}; \
 	" "$<" > "$@"
 
 %.pdf: %.pre *.ly
diff --git a/Veni_Creator_Spiritus/Veni_Creator_Spiritus.ly b/Veni_Creator_Spiritus/Veni_Creator_Spiritus.ly
index f6e9acb..485eb29 100644
--- a/Veni_Creator_Spiritus/Veni_Creator_Spiritus.ly
+++ b/Veni_Creator_Spiritus/Veni_Creator_Spiritus.ly
@@ -31,13 +31,13 @@
       \new Voice = sopran  { \voiceOne \global \sopranMelodie }
       \new Voice = alt     { \voiceTwo \global \altMelodie }
     >>
-    \new Lyrics \lyricsto alt { \textI }
-    \new Lyrics \lyricsto alt { \textII }
-    \new Lyrics \lyricsto alt { \textIII }
-    \new Lyrics \lyricsto alt { \textIV }
-    \new Lyrics \lyricsto alt { \textV }
-    \new Lyrics \lyricsto alt { \textVI }
-    \new Lyrics \lyricsto alt { \textVII }
+    %STR_1% \new Lyrics \lyricsto alt { \textI }
+    %STR_2% \new Lyrics \lyricsto alt { \textII }
+    %STR_3% \new Lyrics \lyricsto alt { \textIII }
+    %STR_4% \new Lyrics \lyricsto alt { \textIV }
+    %STR_5% \new Lyrics \lyricsto alt { \textV }
+    %STR_6% \new Lyrics \lyricsto alt { \textVI }
+    %STR_7% \new Lyrics \lyricsto alt { \textVII }
     \new Staff <<
       \new Voice = pMaenner { \clef "bass" \global \pausen }
       \new Voice = tenor    { \voiceOne \clef "bass" \global \tenorMelodie }
diff --git a/Veni_Creator_Spiritus/stimmen.ly b/Veni_Creator_Spiritus/stimmen.ly
index 4dbc815..488c93a 100644
--- a/Veni_Creator_Spiritus/stimmen.ly
+++ b/Veni_Creator_Spiritus/stimmen.ly
@@ -6,12 +6,15 @@ global = {
   \autoBeamOff
 }
 
-punktBoegen = {
-  \set melismaBusyProperties = #'()
+punktBoegenA = {
   \slurDashed
   \tieDashed
 }
 
+punktBoegenB = {
+  \set melismaBusyProperties = #'()
+}
+
 strichBoegen = {
   \set melismaBusyProperties = #'(melismaBusy slurMelismaBusy tieMelismaBusy beamMelismaBusy)
   \slurSolid
@@ -31,19 +34,87 @@ pausen = {
 
 sopranMelodie = \relative d'' {
   d4 a h |
-  \punktBoegen cis( e) \strichBoegen d8[ h] |
+  \punktBoegenA \punktBoegenB cis( e) \strichBoegen d8[ h] |
   a4( g) fis |
   e2 s4 |
-  \punktBoegen e'8~ e \strichBoegen h cis |
-  \punktBoegen a( d) \strichBoegen h |
-  g2~ g8\punktBoegenTODO
+  \punktBoegenA \punktBoegenB e'8~ e \strichBoegen h4 cis |
+  \punktBoegenA \punktBoegenB a( d) \strichBoegen h |
+  g2~ \punktBoegenA g8( \punktBoegenB fis) \strichBoegen |
+  fis2 s4 |
+  fis fis \punktBoegenA \punktBoegenB ais8~ ais \strichBoegen |
+  h2 h4 |
+  h2 cis4 |
+  d4 s d |
+  g( d) h |
+  h2 a4 |
+  fis( g) e |
+  d2. | \bar "||"
+  a'2.( g4 a h) |
+  d2. | \bar "|."
 }
 
-altMelodie = \relative g' {
+altMelodie = \relative fis' {
+  fis4 e d |
+  \punktBoegenA \punktBoegenB cis4~ cis \strichBoegen d |
+  e2\punktBoegenA \punktBoegenB d4 \strichBoegen |
+  cis2 s4 |
+  \punktBoegenA \punktBoegenB e8~ e \strichBoegen fis4 a |
+  \punktBoegenA \punktBoegenB e( d) \strichBoegen d |
+  d( \punktBoegenA h)( \punktBoegenB cis) \strichBoegen |
+  d2 s4 |
+  cis cis \punktBoegenA \punktBoegenB fis8~ fis \strichBoegen |
+  fis2 fis4 |
+  g2 g4 |
+  fis s d' |
+  h2 g4 |
+  g2 fis4 |
+  d2 cis4 |
+  a2. | \bar "||"
+  fis'( |
+  d4 fis g) |
+  fis2. | \bar "|."
 }
 
-tenorMelodie = \relative h {
+tenorMelodie = \relative a {
+  a4 g fis |
+  \punktBoegenA \punktBoegenB e( g) \strichBoegen fis |
+  \punktBoegenA \punktBoegenB a2~ a4 \strichBoegen |
+  a2 s4 |
+  \punktBoegenA \punktBoegenB cis8~ cis \strichBoegen d4 e |
+  \punktBoegenA \punktBoegenB a,~ a \strichBoegen a |
+  h( \punktBoegenA g)( \punktBoegenB a) \strichBoegen |
+  a2 s4 |
+  ais ais \punktBoegenA \punktBoegenB cis8~ cis \strichBoegen |
+  d2 d4 |
+  e2 ais,4 |
+  h s d |
+  d2 d4 |
+  e2 fis4 |
+  a,( h) g |
+  fis2. | \bar "||"
+  d'4( a8[ h] c4 |
+  h a g) |
+  a2. | \bar "|."
 }
 
-bassMelodie = \relative g {
+bassMelodie = \relative d {
+  d4 d d |
+  \punktBoegenA \punktBoegenB a~ a \strichBoegen h |
+  cis( \punktBoegenA d)( \punktBoegenB d) \strichBoegen |
+  a2 s4 |
+  \punktBoegenA \punktBoegenB a'8~ a \strichBoegen a4 g |
+  \punktBoegenA \punktBoegenB fis~ fis \strichBoegen fis |
+  \punktBoegenA \punktBoegenB e2( a,4) \strichBoegen |
+  d2 s4 |
+  fis fis \punktBoegenA \punktBoegenB fis8~ fis \strichBoegen |
+  h,2 h'4 |
+  e,2 e4 |
+  h s d' |
+  g,( h) h |
+  cis2 d4 |
+  d,( g,) a |
+  d2. | \bar "||"
+  d2.~ |
+  d |
+  d | \bar "|."
 }
diff --git a/Veni_Creator_Spiritus/texte.ly b/Veni_Creator_Spiritus/texte.ly
index e43021f..57afc96 100644
--- a/Veni_Creator_Spiritus/texte.ly
+++ b/Veni_Creator_Spiritus/texte.ly
@@ -6,10 +6,10 @@
 
 textI = \lyrics {
   \set stanza = "1."
-  Ve -- ni, Cre -- a -- _ tor Spi -- ri -- tus,
-  men -- _ tēs tu -- o -- _ rum vi -- si -- ta:
-  im plē su -- _ per -- na gra -- ti -- a,
-  quae tu cre -- a -- sti pe -- cto -- ra.
+  Ve -- ni, Cre -- a -- _ tor \markup { \underline Spi } -- ri -- tus,
+  men -- _ tēs tu -- o -- _ rum \markup { \underline vi } -- si -- ta:
+  im -- plē su -- _ per -- na \markup { \underline gra } -- ti -- a,
+  quae tu cre -- a -- sti \markup { \underline pe } -- cto -- ra.
 }
 
 textII = \lyrics {
@@ -30,16 +30,16 @@ textIII = \lyrics {
 
 textIV = \lyrics {
   \set stanza = "4."
-  Ac -- cen -- de lu -- _ men sen -- si -- bus,
-  in -- fun -- de a -- mo -- rem cor -- di -- bus,
-  in -- fir -- ma _ no -- stri cor -- po -- ris
-  vir -- tu -- te fir -- mens per -- pē -- ti.
+  Ac -- cen -- de \markup { \underline lu } -- _ men sen -- si -- bus,
+  in -- _ fun -- de a -- mo -- rem \markup { \underline cor } -- di -- bus,
+  in -- fir -- ma _ no -- stri \markup { \underline cor } -- po -- ris
+  vir -- \markup { \underline tu } -- te fir -- mens per -- pe -- ti.
 }
 
 textV = \lyrics {
   \set stanza = "5."
   Ho -- stem re -- pel -- _ las lon -- gi -- us,
-  pa -- cem -- que do -- _ nes pro -- ti -- nus;
+  pa -- _ cem -- que do -- _ nes pro -- ti -- nus;
   duc -- to -- re _ sic te prae -- vi -- o
   vi -- te -- mus o -- mne no -- xi -- um.
 }
@@ -47,16 +47,16 @@ textV = \lyrics {
 textVI = \lyrics {
   \set stanza = "6."
   Per -- te sci -- a -- mus da Pa -- _ trem,
-  no -- sca -- mus at -- _ que Fi -- li -- um,
+  no -- _ sca -- mus at -- _ que Fi -- li -- um,
   te -- que u -- tri -- us -- que Spi -- ri -- tum
   cre -- da -- mus o -- mni tem -- po -- re.
 }
 
 textVII = \lyrics {
   \set stanza = "7."
-  De -- o Pa -- tri _ sit glo - ri -- a,
-  et _ Fi -- li -- o, qui a mor -- tu -- is
+  De -- o Pa -- tri _ sit \markup { \underline glo } -- ri -- a,
+  et _ \markup { \underline Fi } -- li -- o, qui a \markup { \underline mor } -- tu -- is
   sur -- re -- xit, _ ac Pa -- ra -- cli -- to
-  in sae -- cu -- lo -- rum sae -- cu -- la.
+  in sae -- cu -- lo -- rum \markup { \underline sae } -- cu -- la.
   A -- men.
 }