Hauke eingefügt

6 files changed, 414 insertions, 0 deletions

diff --git a/hr/stch/tenor/flora/dynArt.ly b/hr/stch/tenor/flora/dynArt.ly
new file mode 100644
index 0000000..30423d4
--- /dev/null
+++ b/hr/stch/tenor/flora/dynArt.ly
@@ -0,0 +1,21 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+  meta = {
+    %(dynamic) marks global to all voices
+    \dynamicUp
+  }
+
+% articulation
+
+    sopranArt = {
+    }
+
+    altArt = {
+    }
+
+    tenorArt = {
+    }
+
+    bassArt = {
+    }
+
diff --git a/hr/stch/tenor/flora/flora.ly b/hr/stch/tenor/flora/flora.ly
new file mode 100644
index 0000000..3aa2ee2
--- /dev/null
+++ b/hr/stch/tenor/flora/flora.ly
@@ -0,0 +1,75 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+\version "2.14"
+\include "stimmen.ly"
+\include "texte.ly"
+
+\pointAndClickOff
+
+  \header {
+    title = "Les fleurs et les arbres"
+    composer = "Camille Saint-Saëns"
+    opus = "68 No. 2"
+    tagline = \markup {
+      \bold "studentenchor"
+    }
+  }
+
+  \paper {
+    line-width = \paper-width - 30
+    top-margin = 10
+    bottom-margin = 10
+    ragged-last-bottom = #'f
+    system-count = 9
+  }
+
+  \layout {
+    indent = #0
+    \context {
+      \Staff
+      \override VerticalAxisGroup #'minimum-Y-extent = #'(-3 . 3.5)
+    }
+  }
+
+  #(set-global-staff-size 17)
+
+  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 60 2)
+      }
+    %}
+    {
+    }
+    \layout {
+    }
+  }
+
diff --git a/hr/stch/tenor/flora/flora.midi b/hr/stch/tenor/flora/flora.midi
new file mode 100644
index 0000000..febf434
--- /dev/null
+++ b/hr/stch/tenor/flora/flora.midi
diff --git a/hr/stch/tenor/flora/midi.lua b/hr/stch/tenor/flora/midi.lua
new file mode 100644
index 0000000..8aef7d6
--- /dev/null
+++ b/hr/stch/tenor/flora/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/stch/tenor/flora/stimmen.ly b/hr/stch/tenor/flora/stimmen.ly
new file mode 100644
index 0000000..27bf3b2
--- /dev/null
+++ b/hr/stch/tenor/flora/stimmen.ly
@@ -0,0 +1,220 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+  \version "2.12"
+  \include "dynArt.ly"
+
+  global = {
+    \key e \major
+    %\override Staff.TimeSignature #'style = #'()
+    \time 2/4
+    %\autoBeamOff
+  }
+
+% Die Stimmen
+
+  sopranMelodie = \relative c'' {
+    <<
+      { \meta }
+      %\sopranArt
+      %the actual tune
+      {
+	r2 
+        r2 
+        r4 r8 a8 a4 gis8 fis8 a4 gis8 b8 cis4 b8 a8 cis4 b8 b8 dis4 b8 cis8 b4 
+        r8 b8 cis4 cis8 cis8 cis4 b8 b8 b4 b8 b8 b4 a8 a8 
+        gis4( gis'4 ~ gis4 fis8 e8 dis8 cis8 b8) b8 b4 b8 b8 b4 r4 
+        r2 
+        r4 r8 dis8 dis4 cis8 b8 b4 ais8 r8 
+        r2 
+        r4 r8 dis8 dis4 dis8 dis8 dis4 dis8 bis8 cis4 bis8 fis'8 fis4 e4 
+        r2 
+        r2 
+        r2 
+        r4 r8 cis8 b4 b8 b8 b2 ~ b8 r8 r4 
+        r2 
+        r4 r8 cis8 cis4 cis8 cis8 cis4 b8 d8 d4 d8 d8 d4 c8 c8 c4 c8 c8 c2 ~ c8 r8 
+        r8 cis8 cis4 dis8 eis8 eis4.( dis8) cis8 r8 
+        r8 cis8 cis4 dis8 e8 e4.( dis8) cis8 r8 
+        r8 cis8 d2 d4 d4 d2 ~ d8 r8 
+        r8 d8 cis4 cis8 e8 e4 cis8 b8 a4 b8 cis8 cis4 a8 gis8 fis4 gis8 fis8 cis'4 r4 
+        r4 cis4 b2 gis'2 ~ gis2 fis4 e4 dis4( cis4) b4 b4 b2 b4 b4 b4 r4 
+        r2 
+        gis2( a2) a4( gis4) b2 ~ b2 c2 e2 
+      }
+    >>
+  }
+
+  altMelodie = \relative c' {
+    <<
+      { \meta }
+      %\altArt
+      %the actual tune
+      {
+	r2 
+        r2 
+        r4 r8 e8 fis4 e8 dis8 fis4 e8 gis8 fis4 gis8 fis8 fis4 gis8 e8 dis4 dis8 e8 dis4 
+        r8 fis8 gis4 a8 gis8 fis4 fis8 fis8 fis4 gis8 fis8 e4 e8 e8 gis2 ~ gis2 gis4 
+        r8 e8 fis4 cis8 dis8 e4 
+        r8 gis8 gis4 fis8 e8 e4 dis8 b'8 b4 ais8 gis8 gis4 dis8 r8 
+        r2 
+        r4 r8 gis8 fisis4 gis8 ais8 ais4 gis8 gis8 gis4 gis8 gis8 gis4 gis4 
+        r4 e4 e4( cis'4 ~ cis4 b8 a8 gis8 fis8) e8 e8 e4 fis8 dis8 e2 ~ e8 r8 
+        r8 e8 e4 fis8 e8 e4 e8 a8 a4 a8 a8 a4 a8 a8 a4 b8 b8 b4 a8 a8 b4 a8 a8 gis2 ~ gis8 r8 
+        r8 eis8 eis4 fis8 gis8 gis4.( fis8) eis8 r8 
+        r8 e8 e4 fis8 gis8 gis4.( fis8) e8 r8 
+        r8 e8 f2 f4 f4 f2( e8) r8 
+        r8 e8 e4 e8 e8 e4 e8 eis8 fis4 fis8 fis8 fis4 fis8 e8 e4 e8 e8 e4 r4 
+        fis4( fisis4) gis2 ~ gis2 ~ gis4. gis8 
+        r2 
+        r2 
+        r4 e8 e8 fis4 e8 fis8 dis4 cis8 dis8 e4 
+        r8 e8 e4 fis8 e8 d4 e8 d8 c4 d8 c8 b4 r4 
+        gis'2 ~ gis2 fis2 gis2 
+      }
+    >>
+  }
+  
+  tenorMelodie = \relative c' {
+    <<
+      { \meta }
+      %\tenorArt
+      %the actual tune
+      \clef "treble_8"
+      {
+	%r4\ff b4 
+	r4 b4 
+        b2 ~ 
+        b2 ~ 
+        b4 b8 b8 
+        b4 b8 b8 
+        a4 b8 cis8 
+        a4 b8 b8 
+        b4 b8 ais8 
+        b4 r8 dis8 
+        e4 fis8 e8 
+        dis4 dis8 dis8 
+        dis4 e8 dis8 
+        cis4 cis8 cis8 
+        e2 ~ 
+        e2 
+        e4 r8 gis,8 
+        a4 e8 fis8 
+        gis4 r8 e'8 
+        e4 dis8 cis8 
+        cis4 gis8 r8 
+        R2*3 
+        r4 r8 bis8 
+        ais4 bis8 cis8 
+        cis4 bis8 dis8 
+        e4 dis8 dis8 
+        dis4 e4 
+        \break
+        R2*3 
+        r4 r8 gis,8 
+        gis4 a8 fis8 
+        gis2 ~ 
+        gis8 r8 r4 
+        R2 
+        r4 r8 e'8 
+        \break
+        e4 fis8 e8 
+        d4 d8 fis8 
+        fis4 gis8 fis8 
+        e4 e8 e8 
+        eis4 fis8 fis8 
+        eis2 ~ 
+        eis8 r8 r8 gis,8 
+        \break
+        gis4 gis8 cis8 
+        bis2 
+        cis8 r8 r8 gis8 
+        gis4 gis8 cis8 
+        bis2 
+        cis8 r8 r8 gis8 
+        a2 
+        a4 a4 
+        a2( 
+        gis8) r8 r8 gis8 
+        \break
+        a4 a8 cis8 
+        cis4 a8 gis8 
+        fis4 gis8 a8 
+        a4 cis8 cis8 
+        cis4 cis8 cis8 
+        cis4 r4 
+        \break
+        r4 e4 
+        e2 ~ 
+        e2 ~ 
+        e4. e8 
+        R2*2 
+        r4 gis,8 gis8 
+        a4 gis8 a8 
+        fis4 e8 fis8 
+        gis4 r4 
+        \break
+        R2 
+        e'2( 
+        fis2) 
+        fis4( e4) 
+        e2 ~ 
+        e2 
+        c2 
+        b2 
+        \bar "|." 
+      }
+    >>
+  }
+
+  bassMelodie = \relative c {
+    <<
+      { \meta }
+      %\bassArt
+      %the actual tune
+      \clef bass
+      {
+	r2 
+        r2 
+        r4 r8 e8 
+        e4 e8 e8 e4 e8 e8 e4 e8 e8 e4 e8 gis8 fis4 gis8 fis8 b4 
+        r8 b8 a4 a8 a8 a4 a8 a8 gis4 gis8 gis8 a4 
+        <<
+          {
+            a8 a8 b4( bis4 cis4 ais4) 
+            b4 
+          }
+          \\
+          {
+            a,8 a8 b4( bis4 cis4 ais4) 
+            b4 
+          }
+        >>
+        r8 b8 b4 b8 b8 e4 r4 
+        r2 
+        r2 
+        r2 
+        r4 r8 dis8 gis4 fis8 e8 dis2 ~ dis2 
+        r4 r8 gis8 gis4 gis8 bis8 bis4 cis4 
+        r2 
+        r2 
+        r2 
+        r4 r8 ais,8 b4 b8 b8 e2 ~ e8 r8 r4 
+        r2 
+        r4 r8 a8 a4 a8 a8 a4 a8 a8 a4 a8 a8 a4 a8 a8 gis4 fis8 fis8 cis'2 ~ cis8 r8 
+        r8 cis,8 cis4 cis8 cis8 <gis' gis,>2 cis,8 r8 
+        r8 cis8 cis4 cis8 cis8 <gis' gis,>2 cis,8 r8 
+        r8 cis8 b2 b4 b4 b2 ~ b8 r8 
+        r8 b8 a4 a8 a8 a4 a8 a8 a4 a8 a8 a4 a'8 a8 a4 a8 a8 ais4 r4 
+        r4 ais4 b2 ~ b2 ~ b4. b8 
+        r2 
+        r2 
+        r4 b,8 b8 b4 b8 b8 b4 b8 b8 e4 r4 
+        r2 
+        r2 
+        r2 
+        r2 
+        b'2 ~ b2 a2 e2 
+      }
+    >>
+  }
+
diff --git a/hr/stch/tenor/flora/texte.ly b/hr/stch/tenor/flora/texte.ly
new file mode 100644
index 0000000..2e0d8df
--- /dev/null
+++ b/hr/stch/tenor/flora/texte.ly
@@ -0,0 +1,45 @@
+%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+>
+    Les fleurs et les ar -- bres,
+    Les bron -- zes, les mar -- bres,
+    Les ors, les é -- maux,
+    La mer, les fon -- tai -- nes,
+    Les monts et les plai -- nes
+    Con -- so -- lent,
+    con -- so -- lent nos maux.
+    Les fleurs et les ar -- bres,
+    La mer, les fon -- tai -- nes,
+    Les monts et les plai -- nes
+    con -- so -- lent nos maux.
+    Na -- ture é -- ter -- nel -- le,
+    Tu sem -- bles plus bel -- le
+    Au sein des dou -- leurs!
+    Na -- ture é -- ter -- nel -- le,
+    Tu sem -- bles plus bel -- le
+    Au sein des dou -- leurs!
+    Et l’art nous do -- mi -- ne,
+    Sa flamme il -- lu -- mi -- ne
+    Le rire et les pleurs,
+    sa flam -- me il -- lu -- mi -- ne
+    Le rire, et les pleurs,
+    le rire et les pleurs.
+  }
+
+  bassText = \lyrics {
+    %<+hier den Text für den Baß eintragen+>
+  }
+