Hauke eingefügt

9 files changed, 510 insertions, 0 deletions

diff --git a/hr/stch/fertig/ride/a.midi b/hr/stch/fertig/ride/a.midi
new file mode 100644
index 0000000..0c2b5c4
--- /dev/null
+++ b/hr/stch/fertig/ride/a.midi
diff --git a/hr/stch/fertig/ride/b.midi b/hr/stch/fertig/ride/b.midi
new file mode 100644
index 0000000..7837da5
--- /dev/null
+++ b/hr/stch/fertig/ride/b.midi
diff --git a/hr/stch/fertig/ride/dynArt.ly b/hr/stch/fertig/ride/dynArt.ly
new file mode 100644
index 0000000..1aad1d7
--- /dev/null
+++ b/hr/stch/fertig/ride/dynArt.ly
@@ -0,0 +1,83 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+  meta = {
+    %(dynamic) marks global to all voices
+    \dynamicUp
+    \override BreathingSign #'text = \markup { \musicglyph #"scripts.caesura.straight" }  % caesura-like? double-slash!
+    s4. 
+    \mark \markup { \smaller \musicglyph #"scripts.segno" } 
+    \repeat volta 2 {
+      s8 s4-> s8 s2 
+      s4. s8-> s2 
+      s8 s4-> s8 s2 
+      s4. s8-> s2 
+      s1 
+      s4. s8-> s2 
+      s4. s8-> s2 
+    } \alternative {
+      {
+        s4. s8-> s2 
+      }
+      {
+        s4. s8-> s2 
+      }
+    }
+    s1 
+    s4.-> s8\fp s2\< 
+    s1 
+    s4.->\> s8\fp s4 s4\cresc 
+    s1 
+    s4.->\! s8 s2 
+    s1 
+    s2.. s8 
+    \bar "|." 
+    s2. \bar "||" s4 
+    \repeat volta 2 {
+      s2.\< s4\! 
+      s2.\< s4\! 
+      s1\< 
+      s4.\! s8-> s2 
+      s2.\> s4\! 
+      s2.\> s4\! 
+      s8 s2..\cresc 
+    } \alternative {
+      {
+        s4. s8-> s2 
+      }
+      {
+        s1\! 
+      }
+    }
+    s8 s4-> s8\cresc s2 
+    s2. s4\! 
+    s8 s4-> s8 s2 
+    s4. s8-> s2 
+    s1 
+    s4. s8-> s2 
+    s4.->\f s8 s2 
+    s4.->\mf s8-> s2 
+    s8 s4\mf s8 s2\cresc 
+    s4. s8-> s2 
+    s8 s4\mf s8\cresc s2 
+    s4. s8-> s8 \breathe s8--\! s8-- s8-- 
+    s8-> s4-> s8-> s8-> s8-> s8-> s8-> 
+    s2-> s2-> 
+    s1 
+    s1->\fermata\f 
+    \bar "|." 
+  }
+
+% articulation
+
+    sopranArt = {
+    }
+
+    altArt = {
+    }
+
+    tenorArt = {
+    }
+
+    bassArt = {
+    }
+
diff --git a/hr/stch/fertig/ride/midi.lua b/hr/stch/fertig/ride/midi.lua
new file mode 100644
index 0000000..e22ba8e
--- /dev/null
+++ b/hr/stch/fertig/ride/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 120 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/ride/ride.ly b/hr/stch/fertig/ride/ride.ly
new file mode 100644
index 0000000..2cde048
--- /dev/null
+++ b/hr/stch/fertig/ride/ride.ly
@@ -0,0 +1,77 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+\version "2.14"
+\include "stimmen.ly"
+\include "texte.ly"
+
+\pointAndClickOff
+
+  \header {
+    title = "Ride the Chariot"
+    %composer = "<+Komponist+>"
+    arranger = "William Henry Smith"
+    %opus = "<+Werk+>"
+    tagline = ""
+  }
+
+  \paper {
+    line-width = \paper-width - 30
+    top-margin = 10
+    bottom-margin = 10
+    ragged-last-bottom = #'f
+    page-count = 2
+  }
+
+  \layout {
+    indent = #0
+    \context {
+      \Staff
+      \RemoveEmptyStaves
+      \override VerticalAxisGroup #'minimum-Y-extent = #'(-3 . 3.5)
+      \override VerticalAxisGroup #'remove-first = ##t
+    }
+  }
+
+  #(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 Staff { \new Voice { \global \soloMelodie } }
+      \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/stch/fertig/ride/s.midi b/hr/stch/fertig/ride/s.midi
new file mode 100644
index 0000000..56de4b9
--- /dev/null
+++ b/hr/stch/fertig/ride/s.midi
diff --git a/hr/stch/fertig/ride/stimmen.ly b/hr/stch/fertig/ride/stimmen.ly
new file mode 100644
index 0000000..629086e
--- /dev/null
+++ b/hr/stch/fertig/ride/stimmen.ly
@@ -0,0 +1,217 @@
+%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. 
+    \override DynamicTextSpanner #'style = #'none
+  }
+
+% Die Stimmen
+
+  soloMelodie = \relative c' {
+    <<
+      % { \meta } nope!
+      {
+        s4. 
+        s1*4 
+        \break 
+        s1*4 
+        \break 
+        r4. r4. d8\f d8 
+        g8 g8 g4 b8 d4. ~ 
+        d2 r4 d,8 d8 
+        g8 g8 g8 a8 b8 g4. ~ 
+        g2. d8 d8 
+        g8 g8 g8 g8 b8 d4. ~ 
+        d2 r4 c4 
+        b8 b8 b8 b8 b8 a8 g8 g8 
+        a8 a4 a8 g2^\markup { \italic "D.S." } 
+        a8 a4 a8 g4 
+        g'4 
+        \break
+        g4 d4 d4 d8 ~ d8 
+        d8( c8) b4 g2 
+        d'1\< ~ 
+        d2.\! g4 
+        \break
+        g4 d4 d4 d4 
+        d8( c8) b4 g2 
+        d'1\< ~ 
+        d2.\! g4 
+        d2. \repeatTie r4 
+        \break
+        <<d2\mf { s4. s8\cresc }>> e2 
+        e2( fis2) 
+        <<d2\mf { s4. s8\cresc }>> g2 
+        e2( fis2) 
+        g1\f 
+        g1 
+        d4.\f e8( e2) 
+        d4.->\mf <d g,>8-> ~ q8 g,8->\f g8-> g8-> 
+        g'1-> ~ 
+        g2 ~ g8 g,8-> g8-> g8-> 
+        g'1-> ~ 
+        g2 ~ g8 r8 r4 
+        \break
+        s1*4 
+      }
+    >>
+  }
+
+  sopranMelodie = \relative c' {
+    <<
+      { \meta }
+      %\sopranArt
+      %the actual tune
+      {
+	r1 
+      }
+    >>
+  }
+
+  altMelodie = \relative c' {
+    <<
+      { \meta }
+      %\altArt
+      %the actual tune
+      {
+	r1 
+      }
+    >>
+  }
+  
+  tenorPartI = \relative c' {
+        r8 b4 b8 e8 e8 e8 d8 
+        c4 c8 c8-> ~ c4 r4 
+        r8 b4 b8 g8 g8 g8 g8 
+        a4 g8 fis8 ~ fis4 r4 
+        r8 d'8 d8 d8 d8 c8 b8 b8 
+        c4 b8 e8 ~ e2 
+        d4. cis8 ~ cis2 
+        c4. b8 ~ b4 r4 
+  }
+
+  tenorMelodie = \relative c' {
+    <<
+      { \meta }
+      %\tenorArt
+      %the actual tune
+      \clef "treble_8"
+      {
+	r8 r4 
+        \tenorPartI
+        c4. b8 ~ b4 r4 
+        r1 
+        b4. b8 ~ b2 ~ 
+        b1 
+        c4. b8 ~ b2 ~ 
+        b1 
+        d4. d8 ~ d4 e4 
+        d8 d8 d8 d8 d8 c8 b8 b8 
+        c8 c4 c8 b2 
+        c8 c4 c8 b4 r4 
+        b1 
+        c1 
+        b8 b4 b8 d8 d8 d8 d8 
+        c4 c8 b8 ~ b2 
+        b1 
+        g1 
+        b8 b4 b8 d8 d8 d8 d8 
+        c4 c8 b8 ~ b2 
+        c4 c8 b8-> ~ b2 
+        \tenorPartI
+        r8 d4 d8 c8 c8 c8 c8 
+        bes4 bes8 b8 ~ b2 
+        r8 d4 d8 c8 c8 c8 c8 
+        d4 d8 e8 ~ e8 d8 d8 d8 
+        b8 b4 b8 b8 b8 c8 d8 
+        c2 c2 
+        b4-> b4-> c4-> a4-> 
+        b1 
+      }
+    >>
+  }
+
+  ride = \relative c' {
+        g8 g4 g8 e8 e8 e8 e8 
+        a4 e8 d8 ~ d8 d8-> e8-> fis8-> 
+        g8 e4 d8 b8 b8 b8 b8 
+        a4 a8 d8 ~ d8 d8-> e8-> fis8-> 
+        g4 g4 f4 f4 
+        e4 d8 c8 ~ c2 
+        d4. e8 ~ e4( a,4) 
+  }
+  bassMelodie = \relative c {
+    <<
+      { \meta }
+      %\bassArt
+      %the actual tune
+      \clef bass
+      {
+	d8-> e8-> fis8-> 
+        \ride
+        d4. g,8 ~ g8 d'8-> e8-> fis8-> 
+        d4. g,8 ~ g4 r4 
+        r1 
+        g'4. g8 ~ g2 ~ 
+        g1 
+        c,4. <g g'>8 ~ q2 ~ 
+        q1 
+        <b b'>4. <g g'>8 ~ q4 c4 
+        d8 d8 d8 d8 d8 dis8 e8 e8 
+        a,8 a4 d8 <g, g'>8 d'8-> e8-> fis8-> 
+        a,8 a4 d8 <g, g'>4 
+        r4 
+        g'1 
+        g1 
+        g8 g4 e8 d8 d8 d8 d8 
+        d4 d8 <g, g'>8 ~ q2 
+        g'2( f2) 
+        e2( ees2) 
+        d8 d4 e8 d8 d8 d8 d8 
+        d4 d8 <g, g'>8 ~ q2 
+        d'4 d8 g,8 ~ g8 d'8-> e8-> fis8-> 
+        \ride
+        d4. g,8 ~ g4 r4 
+        r8 f'4 f8 e8 e8 e8 e8 
+        ees4 ees8 d8 ~ d2 
+        r8 f4 f8 e8 e8 e8 e8 
+        d4 g8 <c, c'>8 ~ q8 
+        %\partcombine
+        <<
+          \relative c' { %\voiceOne
+            c8 b8 a8 
+            g8 g4 g8 g8 g8 g8 g8 
+            e2 a2 
+          }
+          %\\
+          \relative c' { %\voiceTwo
+            c8 b8 a8 
+            g8 g4 fis8 e8 d8 c8 b8 
+            a2 b2 
+          }
+        >>
+        <<
+          \relative c' {
+            \voiceOne
+            g1-> ~ 
+            g1-> 
+          }
+          \\
+          \relative c' {
+            \voiceTwo
+            g2. g4-> 
+            g,1 
+          }
+          \addlyrics { Lord, my Lord }
+        >>
+      }
+    >>
+  }
+
diff --git a/hr/stch/fertig/ride/t.midi b/hr/stch/fertig/ride/t.midi
new file mode 100644
index 0000000..8af95e7
--- /dev/null
+++ b/hr/stch/fertig/ride/t.midi
diff --git a/hr/stch/fertig/ride/texte.ly b/hr/stch/fertig/ride/texte.ly
new file mode 100644
index 0000000..8ec4a3a
--- /dev/null
+++ b/hr/stch/fertig/ride/texte.ly
@@ -0,0 +1,82 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+% Abkürzungen
+
+  gonna = \lyricmode {
+    I’m gon -- na ride in the char -- iot in the morn -- ing, Lord,
+  }
+  ride = \lyricmode {
+    Ride, ride,
+    Ride in the char -- i -- ot to see my Lord.
+  }
+  ready = \lyricmode {
+    I’m get -- tin’ read -- y for the judg -- ment day,
+  }
+  Ride = \lyricmode {
+    Ride the char -- iot in the morn -- ing,
+  }
+  waiting = \lyricmode {
+    I’m wait -- in’ for the char -- iot ’cause I’m read -- y to go.
+  }
+
+% 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+>
+    \Ride Lord,
+    \Ride Lord,
+    \ready my Lord, my Lord.
+    my Lord.
+    Oh yes
+    Oh, yes,
+    Oh, yes,
+    \waiting
+    read -- y to go.
+    \ride
+    \ride
+    see my Lord.
+    \Ride Lord,
+    \Ride Lord,
+    \ready
+    My Lord, my Lord,
+    \Ride Lord,
+    \Ride Lord,
+    I’m gon -- na ride in the char -- i -- ot to see my Lord,
+    to see my Lord.
+  }
+
+  bassText = \lyrics {
+    %<+hier den Text für den Baß eintragen+>
+    \gonna
+    \gonna
+    \ready
+    my Lord, my Lord. Im gon -- na
+    my Lord.
+    Oh yes
+    Oh, yes,
+    Oh, yes,
+    \waiting
+    I’m gon -- na
+    read -- y to go.
+    \ride
+    \ride
+    see my Lord.
+    \gonna
+    \gonna
+    \ready
+    my Lord, my Lord,
+    \Ride Lord,
+    \Ride
+    %\set associatedVoice = upper
+    Lord,
+    I’m gon -- na ride in the char -- i -- ot to see my Lord, my Lord.
+  }
+