Hauke eingefügt

5 files changed, 390 insertions, 0 deletions

diff --git a/hr/stch/fertig/riverside/dynArt.ly b/hr/stch/fertig/riverside/dynArt.ly
new file mode 100644
index 0000000..ca8ed9e
--- /dev/null
+++ b/hr/stch/fertig/riverside/dynArt.ly
@@ -0,0 +1,55 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+  meta = {
+    %(dynamic) marks global to all voices
+    \dynamicUp
+  }
+
+% articulation
+
+    pat = {
+      s2 s8-- s8-. s8 s8-. 
+    }
+    dot = {
+      s2 s8-- s8-. s8 s8-> 
+    }
+    sopranArt = {
+      s4. 
+      \repeat unfold 16 s1 
+      \repeat unfold 16 s1 
+      \dot
+    }
+
+    altArt = {
+      s4. 
+      \repeat unfold 16 s1 
+      \repeat unfold 14 s1 
+      \pat
+      \pat
+      \dot
+    }
+
+    tenorArt = {
+    }
+
+    bassArt = {
+      s4. 
+      s4-. s2. 
+      \repeat unfold 3 {
+        s1 
+        s1-> 
+      }
+      s1 
+      s4-. s2. 
+      \override BreathingSign #'text = \markup { \musicglyph #"scripts.caesura" }
+      s2. \breathe s4-> 
+      s1-> 
+      \repeat unfold 5 s1 
+      \repeat unfold 6 s1 
+      s4 s2-> s4 
+      \repeat unfold 7 s1 
+      \pat
+      \pat
+      \dot
+    }
+
diff --git a/hr/stch/fertig/riverside/midi.lua b/hr/stch/fertig/riverside/midi.lua
new file mode 100644
index 0000000..8d7d5be
--- /dev/null
+++ b/hr/stch/fertig/riverside/midi.lua
@@ -0,0 +1,51 @@
+ -- 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 72 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/fertig/riverside/riverside.ly b/hr/stch/fertig/riverside/riverside.ly
new file mode 100644
index 0000000..510b853
--- /dev/null
+++ b/hr/stch/fertig/riverside/riverside.ly
@@ -0,0 +1,75 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+\version "2.14"
+\include "stimmen.ly"
+\include "texte.ly"
+
+  \header {
+    title = "Down By The Riverside"
+    composer = "Traditional"
+    arranger = "Carsten Gerlitz"
+    %opus = "<+Werk+>"
+    tagline = ""
+  }
+
+  \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 17)
+
+  sop = <<
+          %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." }
+          \partcombine
+          { \sopranMelodie }
+          { \altMelodie }
+          %\new Voice = "soprane" { \voiceOne \sopranMelodie }
+          %\new Voice = "alti" { \voiceTwo \altMelodie }
+          %\addlyrics { \sopranText }
+        >>
+
+  alt = <<
+          %\addlyrics { \altText }
+        >>
+
+  ten = <<
+          \new Voice = "tenoere" { \tenorMelodie }
+          %\addlyrics { \tenorText }
+        >>
+
+  bas = <<
+          \new Voice = "baesse" { \bassMelodie }
+          \addlyrics { \bassText }
+          \addlyrics { \second }
+          \addlyrics { \third  }
+          \addlyrics { \fourth }
+        >>
+
+  \score {
+    \new ChoirStaff \with { printPartCombineTexts = ##f } <<
+      \new Staff = sopran { \global \sop }
+      %\new Staff = alt { \global \alt }
+      %\new Staff = tenor { \global \ten }
+      \new Staff = bass { \global \bas }
+    >>
+    %\midi {
+      %\context{
+	%\Score
+	%tempoWholesPerMinute = #(ly:make-moment 72 4)
+      %}
+    %}
+    \layout {
+    }
+  }
+
diff --git a/hr/stch/fertig/riverside/stimmen.ly b/hr/stch/fertig/riverside/stimmen.ly
new file mode 100644
index 0000000..5114868
--- /dev/null
+++ b/hr/stch/fertig/riverside/stimmen.ly
@@ -0,0 +1,163 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+  \version "2.12"
+  \include "dynArt.ly"
+
+  global = {
+    \key g \major
+    %\override Staff.TimeSignature #'style = #'()
+    \time 4/4
+    %\autoBeamOff
+    \partial 4.
+  }
+
+% Die Stimmen
+
+  sopranMelodie = \relative c' {
+    <<
+      { \meta }
+      \sopranArt
+      %the actual tune
+      {
+	r8 r4 
+        r2 b'4 g4 
+        d4 e4 g4 fis4 
+        r4 b4 b4. ais8 
+        b8 a4 g8 ~ g4 r4 
+        r4 a4 a4. gis8 
+        a8 g4 fis8 ~ fis4 r4 
+        r4 b4 b4. ais8 
+        b8 a4 g8 ~ g4 r4 
+        r2 b4 g4 
+        g4 g4 a2 
+        r4 b4 b4. ais8 
+        b8 a4 g8 ~ g4 g4 
+        a4 a8 a8 a4 c4 
+        b2 a2 
+        g1 ~ 
+        g4 s8 g8 a4 b8 b8 
+        %
+        c8 c4 c8 ~ c4 c4 
+        c4 d4 g,4 a8 ais8 
+        b8 b4 b8 ~ b4 a4 
+        g2. g4 
+        a2 a4 a4 
+        a8 a4. g4 a4 
+        b1 ~ 
+        b4 s8 g8 a4 b8 b8 
+        c8 c4 c8 ~ c4 c4 
+        c4 d4 g,4 a8 ais8 
+        b8 b4 b8 ~ b4 a4 
+        g2. g4 
+        a2 a4 a4 
+        a8 c4. b4 a4 
+        g1 ~ 
+        g1 ~ 
+        g2 g8 g8 r8 b8 
+      }
+    >>
+  }
+
+  altMelodie = \relative c' {
+    <<
+      { \meta }
+      \altArt
+      %the actual tune
+      {
+	r8 r4 
+        r2 d4 c4 
+        c4 c4 c4 d4 
+        r4 d4 d4. cis8 
+        d8 c4 b8 ~ b4 s4 
+        r4 c4 c4. b8 
+        c8 e4 d8 ~ d4 s4 
+        r4 d4 d4. cis8 
+        d8 c4 b8 ~ b4 r4 
+        r2 d4 c4 
+        e4 c4 fis2 
+        r4 d4 d4. cis8 
+        d8 c4 b8 ~ b4 b4 
+        c4 c8 c8 c4 a4 
+        d4( g4) c,4( e4) 
+        b2 e4 ees4 
+        d4 s8 g8 a4 b8 b8 
+        %
+        r4 fis4 e8 e4 g8 ~ 
+        g4. e8 ~ e4 f8 fis8 
+        g4 g4 ~ g8 fis4 fis8 
+        d1 
+        e1( 
+        c1 
+        g'4) g2 a4 
+        b4 s8 g8 a4 b8 b8 
+        r4 f4 e8 e4 g8 ~ 
+        g4. e8 ~ e4 f8 fis8 
+        g4 g4 ~ g8 fis4 fis8 
+        d1 
+        e1 
+        e8 e4. e8( eis8) fis4 
+        r2 e8 e8 r8 d8 
+        r2 e8 e8 r8 d8 
+        r2 e8 e8 r8 d8 
+      }
+    >>
+  }
+  
+  tenorMelodie = \relative c' {
+    <<
+      { \meta }
+      %\tenorArt
+      %the actual tune
+      \clef "treble_8"
+      {
+	r1 
+      }
+    >>
+  }
+
+  bassMelodie = \relative c' {
+    <<
+      { \meta }
+      \bassArt
+      %the actual tune
+      \clef bass
+      {
+	b8 b8 ais8 
+        b4 d,2 e4 
+        g4 g4 a2 
+        g1 ~ 
+        g2 r8 g8 fis8 e8 
+        d1 ~ 
+        d2 r8 d8 e8 fis8 
+        g1 ~ 
+        g2 r8 b8 b8 ais8 
+        b4 d,2 e4 
+        c4 e4 d4 d4 
+        g1 ~ 
+        g2. f4 
+        e2 ees2 
+        d2 d2 
+        g2 c4 c4 
+        b4 r8 g8 a4 b8 b8 
+        \bar "||"
+        r4 a4 g8 g4 e8 ~ 
+        e4. c8 ~ c4 ees8 ees8 
+        d4 d4 ~ d8 dis4 dis8 
+        e1 
+        c1( d2 e4 fis4 
+        g4) b2 c4 
+        d4 r8 g,8 a4 b8 b8 
+        r4 a4 g8 g4 e8 ~ 
+        e4. c8 ~ c4 ees8 ees8 
+        d4 d4 ~ d8 dis4 dis8 
+        e1 
+        c1 
+        c4 c4 d4 d4 
+        g,2 c8 c8 r8 b8 
+        r2 c8 c8 r8 b8 
+        r2 c'8 c8 r8 g8 
+        \bar "|."
+      }
+    >>
+  }
+
diff --git a/hr/stch/fertig/riverside/texte.ly b/hr/stch/fertig/riverside/texte.ly
new file mode 100644
index 0000000..773465f
--- /dev/null
+++ b/hr/stch/fertig/riverside/texte.ly
@@ -0,0 +1,46 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+% Abkürzungen
+
+          second = \lyrics { I’m gon -- na put on my trave -- lin’ shoes }
+          third  = \lyrics { I’m gon -- na put on my long white robe }
+          fourth = \lyrics { I’m gon -- na put on my star -- ry crown }
+
+% 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+>
+  }
+
+  bassText = \lyrics {
+    %<+hier den Text für den Baß eintragen+>
+    I’m gon -- na lay down my sword and shield
+    down,
+    gon -- na lay down,
+    gon -- na lay down,
+    I’m gon -- na lay down my sword and shield,
+    lay down
+    I gon -- na war no more,
+    war no more.
+    I ain’t gon -- na
+    stud -- y war no more,
+    gon -- na stud -- y war no more,
+    ooh war no more.
+    I ain’t gon -- na
+    stud -- y war no more,
+    gon -- na stud -- y war no more,
+    ooh
+    stud -- y war no more,
+    war no more,
+    war no more,
+    war no more.
+  }
+