Hauke eingefügt

5 files changed, 604 insertions, 0 deletions

diff --git a/hr/michi/mass/dynArt.ly b/hr/michi/mass/dynArt.ly
new file mode 100644
index 0000000..b3027b7
--- /dev/null
+++ b/hr/michi/mass/dynArt.ly
@@ -0,0 +1,81 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+  meta = {
+    %(dynamic) marks global to all voices
+    \dynamicUp
+    s2.
+    \time 7/8
+    s1*7/8*9
+    \bar "||"
+    \time 3/4
+    s2.*2
+    \time 5/4
+    s4*5
+      \break
+    \time 3/4
+    s2.*2
+    \time 5/4
+    s4*5
+    \time 3/4
+    s2.*2
+    \time 5/4
+    s4*5
+    \bar "||"
+    \time 3/4
+    s2.*8
+    \time 4/4
+    s1
+    \time 3/4
+    s2.*2
+    \time 4/4
+    s1
+    \time 7/8
+    s1*7/8*9
+    \bar "||"
+    s1*7/8*4
+    \time 3/4
+    s2.*4
+    \time 7/8
+    s1*7/8*3
+    \time 2/4
+    s2
+    \time 3/4
+    s2.*8
+    \time 4/4
+    s1
+    \time 3/4
+    s2.*2
+    \time 4/4
+    s1
+    \bar "||"
+    \time 3/4
+    s2.*2
+    \time 5/4
+    s4*5
+    \time 3/4
+    s2.*2
+    \time 5/4
+    s4*5
+    \time 3/4
+    s2.*2
+    \time 5/4
+    s4*5
+    \time 3/4
+    s2.*4
+    \bar "|."
+  }
+
+% articulation
+
+    sopranArt = {
+    }
+
+    altArt = {
+    }
+
+    tenorArt = {
+    }
+
+    bassArt = {
+    }
+
diff --git a/hr/michi/mass/mass.ly b/hr/michi/mass/mass.ly
new file mode 100644
index 0000000..2279ed2
--- /dev/null
+++ b/hr/michi/mass/mass.ly
@@ -0,0 +1,72 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+\version "2.14"
+\include "stimmen.ly"
+\include "texte.ly"
+
+\pointAndClickOff
+
+  \header {
+    title = "Kyrie"
+    %composer = "<+Komponist+>"
+    %opus = "<+Werk+>"
+    tagline = \markup {
+      \bold "studentenchor"
+    }
+  }
+
+  \paper {
+    line-width = \paper-width - 30
+    top-margin = 10
+    bottom-margin = 10
+    ragged-last-bottom = #'f
+  }
+
+  \layout {
+    indent = #0
+    \context {
+      \Staff
+      \override VerticalAxisGroup #'minimum-Y-extent = #'(-3 . 3.5)
+    }
+  }
+
+  #(set-global-staff-size 15)
+
+  sop = <<
+          %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." }
+          \new Voice = "soprane" { \global \sopranMelodie }
+          %\addlyrics { \sopranText }
+        >>
+
+  alt = <<
+          \new Voice = "alti" { \global \altMelodie }
+          %\addlyrics { \altText }
+        >>
+
+  ten = <<
+          \new Voice = "tenoere" { \global \tenorMelodie }
+          \addlyrics { \tenorText }
+        >>
+
+  bas = <<
+          \new Voice = "baesse" { \global \bassMelodie }
+          %\addlyrics { \bassText }
+        >>
+
+  \score {
+    \new ChoirStaff \with { printPartCombineTexts = ##f } <<
+      \new Staff = sopran { \sop }
+      \new Staff = alt { \alt }
+      \new Staff = tenor { \ten }
+      \new Staff = bass { \bas }
+    >>
+    %\midi {
+      %\context{
+	%\Score
+	%tempoWholesPerMinute = #(ly:make-moment 72 4)
+      %}
+    %}
+    \layout {
+    }
+  }
+
diff --git a/hr/michi/mass/midi.lua b/hr/michi/mass/midi.lua
new file mode 100644
index 0000000..8aef7d6
--- /dev/null
+++ b/hr/michi/mass/midi.lua
@@ -0,0 +1,53 @@
+ -- some settings -- vim: ai sw=2 lbr nu et
+
+pre=[[
+%some settings% vim: ai sw=2 lbr nu et
+
+\version "2.12"
+\include "stimmen.ly"
+
+  \score {
+    <<
+      \unfoldRepeats
+]]
+
+post=[[
+    >>
+    \midi {
+      \context{
+	%\Score
+	%tempoWholesPerMinute = #(ly:make-moment 100 4)
+      }
+    }
+  }
+]]
+
+voices={ "s", "a", "t", "b" }
+expand = { s="sopran", a="alt", t="tenor", b="bass" }
+map = { sopran="soprane", alt="alti", tenor="tenoere", bass="baesse" }
+
+function text(stimme)
+  return
+[[
+      \new Staff = ]]..stimme..[[ <<
+        %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." }
+        \new Voice = "]]..map[stimme]..[[" { \global \]]..stimme..[[Melodie }
+      >>
+]]
+end
+
+function err() print("oops") os.exit() end
+
+which=which or "satb"
+if type(which)~="string" then err() end
+
+for _,v in pairs(voices) do
+  if string.find(which, v) then pre=pre..text(expand[v]) end
+end
+
+input=pre..post
+
+--os.execute(lilypond -...)
+io.stdout:write(input)
+os.exit()
+
diff --git a/hr/michi/mass/stimmen.ly b/hr/michi/mass/stimmen.ly
new file mode 100644
index 0000000..1923097
--- /dev/null
+++ b/hr/michi/mass/stimmen.ly
@@ -0,0 +1,345 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+  \version "2.12"
+  \include "dynArt.ly"
+
+  global = {
+    \key bes \major
+    %\override Staff.TimeSignature #'style = #'()
+    \time 3/4
+    %\autoBeamOff
+  }
+
+% Die Stimmen
+
+  pause = {
+    \repeat volta 4 {
+      R2. 
+    }
+  }
+  unterPause = {
+    R1*7/8*7
+  }
+  generalA = {
+    R2.*2 
+    R4*5 
+  }
+
+  sopA = \relative c'' {
+        \repeat volta 4 {
+          R1*7/8
+        }
+	r4. r16 des16 c16 bes16 aes16 ges16 f16 ees16 
+        des8. bes16 r8 r16 bes'16 aes16 ges16 f16 ees16 des16 c16 
+        des8. bes16 r8 r16 des'16 c16 bes16 aes16 ges16 f16 ees16 
+        des8. bes16 r8 r16 bes'16 aes16 ges16 f16 ees16 des16 c16 
+        \repeat percent 2 {
+          des8. bes16 r8 r16 <des' bes>16 <c aes>16 <bes ges>16 <aes f>16 <ges ees>16 <f des>16 <ees c>16 
+        }
+        des8. bes16 r8 r16 <des' bes>16 <c aes>16 <bes ges>16 <aes f>16 <ges ees>16 <f des>8 
+        <c' a>16 q16 q8 q16 <d bes>16 q16 <ees c>16 q16 <d bes>16 q8 <c a>8
+  }
+  sopB = \relative c' {
+          r8 f16 ges16 f8 a8 
+          \times 2/3 { c8( des8) bes8 ~ } bes4 ~ bes16 aes16 f16 ees16 ~ 
+          ees16 f16 r8 r8 f16 ges16 f8 a8 
+          \times 2/3 { c8( des8) bes8 ~ } bes4 ~ bes16 aes16 f16 ees16 ~ 
+          ees16 f16 r8 r8 f16 ges16 f8 a8 
+          \times 2/3 { c8( des8) bes8 ~ } bes2 ~ 
+          bes2. ~ 
+          bes2. ~ 
+          bes4 r16 bes16 c16 des16( ~ des16 c16) bes16 c16 ~ c8 bes8 ~ 
+          bes2. ~ 
+          bes2. ~ 
+          bes2 r2 
+  }
+  patAs = \relative c'' {
+        c16 f,16 f8 c'8 c16 des16 des16( c16) f,8 
+  }
+
+  sopranMelodie = \relative c'' {
+    <<
+      { \meta }
+      %\sopranArt
+      %the actual tune
+      {
+        \pause
+        \sopA
+        \generalA
+        \repeat volta 2 {
+          R2. 
+          f,8. bes,16 bes2 ~ 
+          bes4. r8 bes'8 c16 des16 c8.( f,16) f4 ~ 
+          f2 r4 
+          f8. bes16 bes2 
+          bes8. bes,16 bes4 bes'8 c16 des16 c8.( f,16) f4 ~ 
+          f4 
+          \sopB
+        }
+        \sopA
+        R1*7/8*4 
+        \patAs
+        \transpose c cis \patAs
+        \transpose c d \patAs
+        \transpose c ees \relative c'' { c16 f,16 f8 c'8 c16 }
+        e'16 e16( c16) e8 
+        \repeat percent 2 {
+          f16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 
+        }
+        f16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 
+        r2 
+        r4 
+        \sopB
+        f8. bes,16 bes2 ~ 
+        bes2. 
+        f8. bes,16 bes4 bes'8 c16 des16 c8.( f,16) f4 ~ 
+        f2 r4 
+        f8. bes16 bes2 
+        bes8. bes,16 bes4 bes'8 c16 des16 c8.( f,16) f4 ~ 
+        f2. 
+        f8. bes16 bes2 ~ 
+        bes4. r8 bes8 c16 des16 ees8.( f16) f4 ~ 
+        f2. ~ 
+        f2. ~ 
+        f2. 
+        R2. 
+      }
+    >>
+  }
+
+  altB = \relative c' {
+          r8 f16 ges16 f8 f8 
+          \times 2/3 { f4 f8 ~ } f4 ~ f16 ees16 f16 ees16 ~ 
+          ees16 f16 r8 r8 f16 ges16 f8 f8 
+          \times 2/3 { f4 f8 ~ } f4 ~ f16 ees16 f16 ees16 ~ 
+          ees16 f16 r8 r8 f16 ges16 f8 f8 
+          \times 2/3 { f4 f8 ~ } f2 ~ 
+          f2. ~ 
+          f2. ~ 
+          f4 r16 bes16 c16 des16( ~ des16 c16) bes16 c16 ~ c8 bes8 ~ 
+          bes2 ~ bes8 f16 g16 
+          f4 ~ f16 c16 d8 c16 bes16 g16 f16 ~ 
+          f2 r2 
+  }
+  patAa = \relative c'' {
+    c16 f,16 f8 f8 f16 f16 f8 f8 
+  }
+  patBa = \relative c'' {
+    a16 g16 g8 g8 g16 g16 g8 g8 
+  }
+
+  altMelodie = \relative c' {
+    <<
+      { \meta }
+      %\altArt
+      %the actual tune
+      {
+        \pause
+        \repeat volta 4 {
+          f16 f16 f8 f16 f16 f16 ges16 f16 ees16 f8 bes,8 
+        }
+        \unterPause
+        f'16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 
+        \generalA
+        \repeat volta 2 {
+          f8. bes,16 bes2 ~ 
+          bes2 r4 
+          f'8. bes,16 bes4 f'8 f16 f16 f4 f4 
+          f8. bes,16 bes2 ~ 
+          bes2 r4 
+          f'8. bes,16 bes4 f'8 f16 f16 f4 f4 ~ 
+          f4 
+          \altB
+        }
+        \repeat percent 8 {
+          f'16 f16 f8 f16 f16 f16 ges16 f16 ees16 f8 bes,8 
+        }
+        f'16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 
+        R1*7/8*4 
+        \patAa
+        \transpose c cis \patAa
+        \patBa
+        \transpose a bes \patBa
+        \repeat percent 2 {
+          f,16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 
+        }
+        a16 a16 a8 a16 bes16 bes16 c16 c16 bes16 bes8 a8 
+        r2 
+        r4 
+        \altB
+        f8. bes,16 bes2 
+        f'8. bes,16 bes2 
+        f'8. bes,16 bes4 f'8 f16 f16 f4 f4 
+        f8. bes,16 bes2 ~ 
+        bes2. 
+        f'8. bes,16 bes4 f'8 f16 f16 f4 f4 
+        f8. bes,16 bes2 
+        r16 bes16 c16 des16( ~ des16 c16) bes16 c16 ~ c8 bes8 ~ 
+        bes4. r8 f'8 f16 f16 f4 f4 ~ 
+        f2. ~ 
+        f2. ~ 
+        f2. 
+        R2. 
+      }
+    >>
+  }
+
+  tenA = \relative c' {
+        \repeat volta 4 {
+          R1*7/8
+        }
+        \unterPause
+        R1*7/8 
+  }
+  tenB = \relative c {
+          r8 f16 ges16 f8 a8 
+          \times 2/3 { c8( des8) bes8 ~ } bes2 ~ 
+          bes16 c16 r8 r8 f,16 ges16 f8 a8 
+          \times 2/3 { c8( des8) bes8 ~ } bes2 ~ 
+          bes16 c16 r8 r8 f,16 ges16 f8 a8 
+          \times 2/3 { c8( des8) bes8 ~ } bes4( des4 
+          d2.) ~ 
+          d2.( 
+          ees4) r16 bes16 c16 des16( ~ des16 c16) bes16 c16 ~ c8 bes8 ~ 
+          bes2. ~ 
+          bes2. ~ 
+          bes2 r2 
+  }
+  patAt = \relative c' {
+    c16 c16 c8 c16 c16 c8 des8 des8 
+  }
+  
+  tenorMelodie = \relative c' {
+    <<
+      { \meta }
+      %\tenorArt
+      %the actual tune
+      {
+        \clef "treble_8"
+        \pause
+        \tenA
+        \generalA
+        \repeat volta 2 {
+          f8. bes,16 bes2 ~ 
+          bes2 r4 
+          f'8. bes,16 bes4 bes8 c16 des16 c8.( f16) f4 
+          f8. bes,16 bes2 ~ 
+          bes2 r4 
+          f'8. bes,16 bes4 bes8 c16 des16 c8.( f,16) f4 ~ 
+          f4 
+          \tenB
+        }
+        \tenA
+        f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 aes8 
+        f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 a8 
+        f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 bes8 
+        f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 b8 
+        \patAt
+        \transpose c cis \patAt
+        \transpose c d \patAt
+        %\transpose c ees \patAt
+        \transpose c ees \relative c' { c16 c16 c8 c16 c16 c8 }
+        e8 e8 %transponieren erzeugt fes
+        \repeat percent 2 {
+          f16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 
+        }
+        f16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 
+        r2 
+        r4 
+        \tenB
+        f8. bes,16 bes2 
+        f'8. bes,16 bes2 
+        f'8. bes,16 bes4 bes8 c16 des16 c8.( f,16) f4 ~ 
+        f2 r4 
+        f'8. bes,16 bes2 
+        f'8. bes,16 bes4 bes8 c16 des16 c8.( f,16) f4 
+        f'8. bes,16 bes2 
+        r16 bes16 c16 des16( ~ des16 c16) bes16 c16 ~ c8 bes8 ~ 
+        bes4. r8 bes8 c16 des16 ees8.( f16) f4 ~ 
+        f2. ~ 
+        f2. ~ 
+        f2. 
+        R2. 
+      }
+    >>
+  }
+
+  bassA = \relative c {
+        \repeat volta 4 {
+          R1*7/8
+        }
+        \unterPause
+        R1*7/8 
+  }
+  bassB = \relative c {
+          r8 f16 ges16 f8 f8 
+          \times 2/3 { f4 f8 ~ } f2 ~ 
+          f8 r8 r8 f16 ges16 f8 f8 
+          \times 2/3 { f4 f8 ~ } f2 ~ 
+          f8 r8 r8 f16 ges16 f8 f8 
+          \times 2/3 { f4 bes8 ~ } bes2 ~ 
+          bes2. ~ 
+          bes2. ~ 
+          bes4 r16 bes16 c16 des16( ~ des16 c16) bes16 c16 ~ c8 bes8 ~ 
+          bes2 ~ bes8 f16 g16 
+          f4 ~ f16 c'16 d8 c16 bes16 g16 f16 ~ 
+          f2 r2 
+  }
+  patAb = \relative c {
+    e16 f16 f8 f16 f16 f8 f8 f8 
+  }
+
+  bassMelodie = \relative c {
+    <<
+      { \meta }
+      %\bassArt
+      %the actual tune
+      \clef bass
+      {
+        \pause
+        \bassA
+        \generalA
+        \repeat volta 2 {
+          R2. 
+          f8. bes16 bes2 ~ 
+          bes4. r8 bes8 c16 des16 c8.( f,16) f4 ~ 
+          f2 r4 
+          f8. bes16 bes2 ~ 
+          bes2 bes8 c16 des16 c8.( f,16) f4 ~ 
+          f4 
+          \bassB
+        }
+        \bassA
+        f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 aes8 
+        f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 a8 
+        f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 bes8 
+        f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 f8 
+        \patAb
+        \transpose e f \patAb
+        \transpose e fis \patAb
+        \transpose e g \relative c { e16 f16 f8 f16 f16 f8 }
+        g8 g8 
+        \repeat percent 2 {
+          f16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 
+        }
+        c'16 c16 c8 c16 d16 d16 ees16 ees16 d16 d8 c8 
+        r2 
+        r4 
+        \bassB
+        f,8. bes16 bes2 ~ 
+        bes2. 
+        bes8. bes16 bes4 bes8 aes16 ges16 f4 f4 
+        f8. bes,16 bes2 
+        f'8. bes16 bes2 ~ 
+        bes2 bes8 aes16 ges16 f4 f4 
+        f8. bes,16 bes2 
+        f'8. bes16 bes2 ~ 
+        bes4. r8 bes8 aes16 ges16 f4 f4 ~ 
+        f2. ~ 
+        f2. ~ 
+        f2. 
+        R2. 
+      }
+    >>
+  }
+
diff --git a/hr/michi/mass/texte.ly b/hr/michi/mass/texte.ly
new file mode 100644
index 0000000..1471f58
--- /dev/null
+++ b/hr/michi/mass/texte.ly
@@ -0,0 +1,53 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+% Abkürzungen
+
+% Die Textaufteilungen %  -- _
+
+  sopranText = \lyrics {
+    %<+hier den Text für den Sopran eintragen+>
+  }
+
+  altText = \lyrics {
+    %<+hier den Text für den Alt eintragen+>
+  }
+
+  tenorText = \lyrics {
+    %<+hier den Text für den Tenor eintragen+>
+    Ky -- ri -- e
+    Ky -- ri -- e Chris -- te E -- lei -- son
+    Ky -- ri -- e
+    Ky -- ri -- e Chris -- te E -- lei -- son
+    Ky -- ri -- e E -- lei -- son _
+    Ky -- ri -- e E -- lei -- son _
+    Ky -- ri -- e E -- lei -- son
+    Ky -- ri -- e E -- lei -- son
+    Ky -- ri -- e Ky -- ri -- e Chris -- te E -- lei -- son
+    Ky -- ri -- e Ky -- ri -- e Chris -- te E -- lei -- son
+    Ky -- ri -- e Ky -- ri -- e Chris -- te E -- lei -- son
+    Ky -- ri -- e Ky -- ri -- e Chris -- te E -- lei -- son
+    Ky -- ri -- e Ky -- ri -- e Chris -- te
+    Ky -- ri -- e Ky -- ri -- e Chris -- te
+    Ky -- ri -- e Ky -- ri -- e Chris -- te
+    Ky -- ri -- e Ky -- ri -- e Chris -- te
+    Ky -- ri -- e Ky -- ri -- e Chris -- te E -- lei -- son
+    %
+    Ky -- ri -- e Ky -- ri -- e Chris -- te E -- lei -- son
+    Ky -- ri -- e E -- lei -- son _
+    Ky -- ri -- e E -- lei -- son _
+    Ky -- ri -- e E -- lei -- son
+    Ky -- ri -- e E -- lei -- son
+    %
+    Ky -- ri -- e Ky -- ri -- e
+    Ky -- ri -- e Chris -- te E -- lei -- son
+    Ky -- ri -- e
+    Ky -- ri -- e Chris -- te E -- lei -- son
+    Ky -- ri -- e
+    Ky -- ri -- e E -- lei -- son
+    Chris -- te E -- lei -- son
+  }
+
+  bassText = \lyrics {
+    %<+hier den Text für den Baß eintragen+>
+  }
+