11 files changed, 658 insertions, 0 deletions
diff --git a/hr/stch/beatles/eleanor/dynArt.ly b/hr/stch/beatles/eleanor/dynArt.ly
new file mode 100644
index 0000000..c8311ed
--- /dev/null
+++ b/hr/stch/beatles/eleanor/dynArt.ly
@@ -0,0 +1,37 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+  meta = {
+    %(dynamic) marks global to all voices
+    \dynamicUp
+    s1*4 \break
+    s1*4 \break
+    s1*5 \break
+    s1*5 \break
+    s1*4 \break
+    s1*4 \break
+    s1*5 \break
+    s1*5 \break
+    s1*4 \break
+    s1*4 \break
+    s1*4 \break
+    s1*4 \break
+    s1*5 \break
+    s1*5 \break
+    s1*4 \break
+    s1*5
+  }
+
+% articulation
+
+    sopranArt = {
+    }
+
+    altArt = {
+    }
+
+    tenorArt = {
+    }
+
+    bassArt = {
+    }
+
diff --git a/hr/stch/beatles/eleanor/eleanor.ly b/hr/stch/beatles/eleanor/eleanor.ly
new file mode 100644
index 0000000..82e5dab
--- /dev/null
+++ b/hr/stch/beatles/eleanor/eleanor.ly
@@ -0,0 +1,71 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+\version "2.14"
+\include "stimmen.ly"
+\include "texte.ly"
+
+  \header {
+    title = "Eleanor Rigby"
+    composer = "Lennon/McCartney"
+    %opus = "<+Werk+>"
+    arranger = "Andreas Kuch"
+    tagline = ""
+  }
+
+  \paper {
+    line-width = \paper-width - 30
+    top-margin = 10
+    bottom-margin = 10
+    ragged-last-bottom = #'f
+    system-count = 16
+    page-count = 4
+  }
+
+  \layout {
+    indent = #0
+    \context {
+      \Staff
+      \override VerticalAxisGroup #'minimum-Y-extent = #'(-3 . 3.5)
+    }
+  }
+
+  #(set-global-staff-size 12)
+
+  sop = \new Staff = sopran <<
+          %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." }
+          \new Voice = "soprane" { \global \sopranMelodie }
+          \addlyrics { \sopranText }
+        >>
+
+  alt = \new Staff = alt <<
+          \new Voice = "alti" { \global \altMelodie }
+          \addlyrics { \altText }
+        >>
+
+  ten = \new Staff = tenor <<
+          \new Voice = "tenoere" { \global \tenorMelodie }
+          \addlyrics { \tenorText }
+        >>
+
+  bas = \new Staff = bass <<
+          \new Voice = "baesse" { \global \bassMelodie }
+          \addlyrics { \bassText }
+        >>
+
+  \score {
+    \new ChoirStaff \with {} <<
+      \sop
+      \alt
+      \ten
+      \bas
+    >>
+    \midi {
+      \context{
+	\Score
+	tempoWholesPerMinute = #(ly:make-moment 100 4)
+      }
+    }
+    %\layout {
+    %}
+  }
+
diff --git a/hr/stch/beatles/eleanor/eleanor.midi b/hr/stch/beatles/eleanor/eleanor.midi
new file mode 100644
index 0000000..9f176a3
--- /dev/null
+++ b/hr/stch/beatles/eleanor/eleanor.midi
diff --git a/hr/stch/beatles/eleanor/midi.lua b/hr/stch/beatles/eleanor/midi.lua
new file mode 100644
index 0000000..44004bb
--- /dev/null
+++ b/hr/stch/beatles/eleanor/midi.lua
@@ -0,0 +1,50 @@
+ -- 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 {
+]]
+
+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/beatles/eleanor/midis/a.midi b/hr/stch/beatles/eleanor/midis/a.midi
new file mode 100644
index 0000000..91c9fd4
--- /dev/null
+++ b/hr/stch/beatles/eleanor/midis/a.midi
diff --git a/hr/stch/beatles/eleanor/midis/b.midi b/hr/stch/beatles/eleanor/midis/b.midi
new file mode 100644
index 0000000..4971ad1
--- /dev/null
+++ b/hr/stch/beatles/eleanor/midis/b.midi
diff --git a/hr/stch/beatles/eleanor/midis/eleanor.midi b/hr/stch/beatles/eleanor/midis/eleanor.midi
new file mode 100644
index 0000000..9f176a3
--- /dev/null
+++ b/hr/stch/beatles/eleanor/midis/eleanor.midi
diff --git a/hr/stch/beatles/eleanor/midis/s.midi b/hr/stch/beatles/eleanor/midis/s.midi
new file mode 100644
index 0000000..50b1fbd
--- /dev/null
+++ b/hr/stch/beatles/eleanor/midis/s.midi
diff --git a/hr/stch/beatles/eleanor/midis/t.midi b/hr/stch/beatles/eleanor/midis/t.midi
new file mode 100644
index 0000000..2c48fdd
--- /dev/null
+++ b/hr/stch/beatles/eleanor/midis/t.midi
diff --git a/hr/stch/beatles/eleanor/stimmen.ly b/hr/stch/beatles/eleanor/stimmen.ly
new file mode 100644
index 0000000..443d934
--- /dev/null
+++ b/hr/stch/beatles/eleanor/stimmen.ly
@@ -0,0 +1,299 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+  \version "2.12"
+  \include "dynArt.ly"
+
+  global = {
+    \key d \major
+    %\override Staff.TimeSignature #'style = #'()
+    \time 4/4
+    %\autoBeamOff
+  }
+
+% Die Stimmen
+
+  stanza = \relative c {
+        e8 e8 fis8 d8 ~ d8 b8 r4 
+        d8 e8 fis8 a8 ~ a8 gis8 fis8 gis8 ~ 
+        gis8 fis8 e8 fis8 ~ fis8 e8 d8 e8 ~ 
+        e2 r2 
+  }
+
+  lonely = \relative c {
+        e4 d8 e8 ~ e8 fis4 d8 ~ 
+        d8 b4. r4 r8 b8 
+        b'4 fis8 e8 ~ e8 d4 b8 ~ 
+        b2 r2 
+        e4 d8 e8 ~ e8 fis4 d8 ~ 
+        d8 b4. r4 r8 b8 
+        d'4 b8 fis8 ~ fis8 e4 
+  }
+
+  sopranI = \relative c'' {
+        b2 ~ b8 cis8 d8 e8 ~ 
+        e8 d4 cis8 ~ cis8 b4 fis8 ~ 
+        fis8 
+  }
+  sopranMelodie = \relative c' {
+    <<
+      { \meta }
+      %\sopranArt
+      %the actual tune
+      {
+        \sopranI d4. r4 fis8 r8 
+        \repeat unfold 4 { fis8 r8 } 
+        \sopranI d4. r4 fis8 r8 
+        \repeat unfold 4 { fis8 r8 } 
+        \bar "||"
+        \transpose e e' {
+          \stanza
+          d8 e8 fis8 g8 ~ g8 fis8 r4 
+          \stanza
+          d8 e8 fis8 g8 ~ g8 fis4 r8 
+        }
+        \bar "||"
+        \repeat unfold 6 {
+          \repeat unfold 4 { fis8 r8 } 
+        }
+        fis8 r8 fis8 r8 fis8 r8 r8 fis8 
+        d'4 b8 fis8 ~ fis8 e4 d8 ~ 
+        \bar "||"
+        d2 b8 r8 b8 r8 
+        \repeat unfold 4 {
+          \repeat unfold 4 { b8 r8 } 
+        }
+        b8 r8 b8 r8 r8 fis'8 b8 cis8 
+        d4.( cis8 ~ cis4. b8 ~ 
+        b4. a8 ~ a4. b8 ~ 
+        b2.) r4 
+        b8( cis8 d4) r4 fis,8 r8 
+        \bar "||"
+        \repeat unfold 3 {
+          \repeat unfold 4 { fis8 r8 } 
+        }
+        b4( cis4 d4 e4 
+        fis1) 
+        \octaveCheck c'
+        \repeat unfold 3 {
+          \repeat unfold 4 { fis8 r8 } 
+        }
+        \repeat unfold 2 {
+          b2 ~ b8 cis8 d8 e8 ~ 
+          e8 d4 cis8 ~ cis8 b4 fis8 ~ 
+          fis8 d4. r4 fis8 r8 
+          fis8 r8 fis8 r8 fis8 r8 fis8 r8 
+        }
+        \bar "||"
+        r8 fis8 b4 fis8 b4 fis8 
+        b4 fis8 b8 ~ b8 fis8 b4 
+        fis8 b4 fis8 b4 fis8 b8 
+        r8 g8 d'4 g,8 d'4 g,8 
+        b4 e,8 b'8 ~ b8 a4 g8 
+        \repeat unfold 3 {
+          \repeat unfold 4 { fis8 r8 } 
+        }
+        g8 r8 g8 r8 g8 r8 g8 r8 
+        g8 r8 g8 r8 fis8 r8 fis8 r8 
+        \bar "||"
+        \sopranI d4. b8 r8 b8 r8 
+        b8 r8 b8 r8 b8 r8 b8 r8 
+        \sopranI d4 r8 b8 r8 b8 r8 
+        b2 fis'4 fis4 
+        fis2 r2 
+        \bar "|."
+      }
+    >>
+  }
+
+  altI = \relative c'' {
+        \repeat unfold 4 { g8 r8 } 
+        fis8 r8 fis8 r8 fis8 r8 e8 fis8 
+        d8 fis8 cis8 fis8 d8 fis8 b,8 fis'8 
+  }
+  altII = \relative c' {
+        \repeat unfold 3 {
+          \repeat unfold 4 { fis8 r8 } 
+        }
+        \repeat unfold 4 { g8 r8 }
+        g8 r8 g8 r8 fis8 r8 fis8 r8 
+  }
+  altMelodie = \relative c'' {
+    <<
+      { \meta }
+      %\altArt
+      %the actual tune
+      {
+        \repeat unfold 4 { g8 r8 } 
+        \altI
+        \repeat unfold 4 { g8 r8 } 
+        \altI
+        %
+        \altII
+        \repeat unfold 3 {
+          \repeat unfold 4 { b,8 fis'8 } 
+        }
+        \repeat unfold 3 {
+          \repeat unfold 4 { g8 } 
+        }
+        r8 fis8 r8 fis8 
+        %
+        \transpose e e' {
+          \lonely d8 ~ 
+          d4 fis8 r8 fis8 r8 fis8 r8 
+        }
+        %
+        \altII
+        \altII
+        \octaveCheck c
+        \repeat unfold 6 {
+          \repeat unfold 4 { b8 r8 } 
+        }
+        b8 r8 b8 r8 b8 r8 r8 fis'8 
+        d'4 b8 fis8 ~ fis8 e4 d8 ~ 
+        d4 g8 r8 g8 r8 g8 r8 
+        \altI
+        \repeat unfold 4 { g8 r8 } 
+        \altI
+        b1( ~ 
+        b4. fis8 ~ fis4. e8 ~ 
+        e4. d8 ~ d2 
+        e2) b'4( a4 
+        g4. fis8 ~ fis8 e8 ~ e4) 
+        \transpose e e' {
+          \stanza
+          d8 e8 fis8 g8 ~ g8 fis4 r8 
+        }
+        \repeat unfold 6 {
+          \repeat unfold 4 { fis8 r8 } 
+        }
+        fis8 r8 fis8 r8 fis8 r8 r8 fis8 
+        d'4 b4 fis4 e4 
+        d2 r2 
+      }
+    >>
+  }
+  
+  tenorMelodie = \relative c' {
+    <<
+      { \meta }
+      %\tenorArt
+      %the actual tune
+      \clef "treble_8"
+      {
+        \repeat unfold 8 {
+          \repeat unfold 4 { b8 r8 } 
+        }
+        \repeat unfold 10 {
+          \repeat unfold 4 { b8 r8 } 
+        }
+        \repeat unfold 2 {
+          a1 
+          gis1 
+          g1 
+          fis1 
+        }
+        \transpose e e {
+          \stanza
+          d8 e8 fis8 g8 ~ g8 fis8 r4 
+          \stanza
+          d8 e8 fis8 g8 ~ g8 fis4 r8 
+        }
+        \lonely d8 ~ 
+        d2 b'8 r8 b8 r8 
+        \repeat unfold 8 {
+          \repeat unfold 4 { b8 r8 } 
+        }
+        b4. b8 ~ b4 b4 ~ 
+        b8 b8 ~ b4 b4. b8 ~ 
+        b4 b4 ~ b8 b4. 
+        g4. g8 ~ g4 g4 ~ 
+        g8 g4. fis4 e4 
+        \octaveCheck c'
+        \repeat unfold 5 {
+          \repeat unfold 4 { b8 r8 } 
+        }
+        \lonely d,8 ~ 
+        d2 b'4 b4 
+        b2 r2 
+      }
+    >>
+  }
+
+  bassI = \relative c {
+	r8 d8 fis8 g8 ~ g2 ~ 
+        g1 
+        fis4 fis8 d8 b2 ~ 
+        b1 ~ 
+        b8 d8 b8 g8 ~ g2 ~ 
+        g1 
+        r8 fis'8 d8 b8 ~ b2 ~ 
+        b1 
+  }
+  bassMelodie = \relative c {
+    <<
+      { \meta }
+      %\bassArt
+      %the actual tune
+      \clef bass
+      {
+        \bassI
+        \repeat unfold 3 {
+          \repeat unfold 4 { b8 r8 } 
+        }
+        g4( d'4 g4 d4) 
+        g,8 r8 a8 r8 b8 r8 b8 r8 
+        \repeat unfold 2 {
+          \repeat unfold 4 { b8 r8 } 
+        }
+        b8 r8 b8 r8 a8 r8 a8 r8 
+        g4 d'4 g4 d4 
+        g,8 r8 a8 r8 b8 r8 b8 r8 
+        \repeat unfold 8 {
+          \repeat unfold 4 { b8 r8 }
+        }
+        \repeat unfold 2 {
+          \repeat unfold 3 {
+            \repeat unfold 4 { b8 r8 }
+          }
+          g8 a8 b8 cis8 d8 e8 fis8 g8 ~ 
+        } \alternative {
+          {
+            g4. b8 ~ b4 r4 
+          }
+          {
+            g4. b8 ~ b4. r8 
+          }
+        }
+        \repeat unfold 2 {
+          a1 
+          gis1 
+          g1 
+          fis1 
+        }
+        \bassI
+        \transpose e e {
+          \stanza
+          d8 e8 fis8 g8 ~ g8 fis4 r8 
+        }
+        r2 r8 fis,8 b8 cis8 
+        d8 e8 fis8 a8 ~ a8 gis8 fis8 gis8 ~ 
+        gis8 fis8 e8 fis8 ~ fis8 e8 d8 e8 ~ 
+        e2 ~ e8 b8 g8 b8 
+        e,4. b'8 ~ b4 r4 
+        \repeat unfold 2 {
+          a'1 
+          gis1 
+          g1 
+        } \alternative {
+          {
+            fis1 
+          }
+          {
+            fis2 d4 cis4 
+          }
+        }
+        b2 r2 
+      }
+    >>
+  }
+
diff --git a/hr/stch/beatles/eleanor/texte.ly b/hr/stch/beatles/eleanor/texte.ly
new file mode 100644
index 0000000..8a0e123
--- /dev/null
+++ b/hr/stch/beatles/eleanor/texte.ly
@@ -0,0 +1,201 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+% Abkürzungen
+
+  ah = \lyricmode {
+    Ah, look at all the lone -- ly peo -- ple
+  }
+
+  plum = \lyricmode {
+    plum plum plum plum
+  }
+  plumm = \lyricmode {
+    \plum \plum
+  }
+  plummm = \lyricmode {
+    \plumm \plum
+  }
+  plummmm = \lyricmode {
+    \plumm \plumm
+  }
+
+  lonely = \lyricmode {
+    All the lone -- ly peo -- ple
+    where do they all come from?
+    All the lone -- ly peo -- ple
+    where do they all be --  long?
+  }
+
+  eleanor = \lyricmode {
+    E -- lea -- nor Rig -- by 
+    picks up the rice in a church where a wed -- ding has been
+    lives in a dream _
+  }
+  waits = \lyricmode {
+    Waits at the win -- dow
+    wea -- ring a face that she keeps in a jar by the door
+    who is it for? _
+  }
+
+  father = \lyricmode {
+    Fa -- ther Mc Ken -- zie
+    wri -- ting the words of a ser -- mon that no -- one will hear
+    no -- one comes near _
+  }
+  look = \lyricmode {
+    look at him wor -- king
+    dar -- ning his socks in the night when there’s no -- bo -- dy there
+    What does he care? _
+  }
+
+  buried = \lyricmode {
+    E -- lea -- nor Rig -- by
+    died in the church and was bu -- ried a -- long with her name
+    no -- bo -- dy came _
+  }
+  grave = \lyricmode {
+    Fa -- ther Mc Ken -- zie
+    wi -- ping the dirt from his hands as he walks from the grave
+    no -- one was saved. _
+  }
+
+% Die Textaufteilungen
+
+  sopranText = \lyrics {
+    %<+hier den Text für den Sopran eintragen+>
+    \ah plum
+    \plum
+    \ah plum
+    \plum
+    \eleanor
+    \waits
+    \plummmm
+    \plumm
+    plum plum plum du
+    du du du du du
+    plum plum
+    \plummmm
+    plum plum da da da
+    da %da da da da
+    da %da da
+    plum
+    \plummm
+    a %(d)a (d)a (d)a (d)a
+    \plummm
+    \ah plum
+    \plum
+    \ah plum
+    \plum
+    … _ _ _ _
+    \repeat unfold 21 { _ }
+    %plum plum plum plum plum
+    %plum plum plum plum plum
+    %plum plum plum plum plum plum
+    %plum plum plum plum plum
+    %plum plum plum plum plum
+    \plummmm
+    \plum
+    \ah plum plum
+    \plum
+    \ah plum plum
+    na da da
+    da
+  }
+
+  plumdi = \lyricmode {
+    \plum
+    plum plum plum di di
+    di di di di di di di di
+  }
+  altText = \lyrics {
+    %<+hier den Text für den Alt eintragen+>
+    \repeat unfold 2 {
+      \plum
+      \plumdi
+    }
+    \plum
+    \plummmm
+    %
+    … _ _ _
+    \repeat unfold 8 { _ _ _ _ }
+    %\plummmm
+    %\plummmm
+    %\plum
+    plum plum
+    \lonely plum plum plum
+    \plummmm
+    \plummmm
+    \plumm
+    \plummmm
+    \plumm
+    plum plum plum du
+    du du du du du
+    plum plum plum
+    \plumdi
+    \plum
+    \plumdi
+    ah
+    na %na da da da
+    \grave
+    \plummmm
+    \plumm
+    plum plum plum da
+    da da da da da
+  }
+
+  tenorText = \lyrics {
+    %<+hier den Text für den Tenor eintragen+>
+    \plummmm
+    \plummmm
+    \plummmm
+    \plumm
+    \plummmm
+    uh _ _ _ uh _ _ _
+    \father
+    \look
+    \lonely plum plum
+    \plummmm
+    \plummmm
+    plum plum plum
+    plum plum plum
+    plum plum
+    plum plum plum
+    plum plum plum
+    \plummmm
+    \plum
+    \lonely da da da
+  }
+
+  badamba = \lyricmode {
+    ba ba ba
+    dam ba ba ba
+    ba ba ba
+    ba ba ba
+  }
+  bassText = \lyrics {
+    %<+hier den Text für den Baß eintragen+>
+    \badamba
+    \plummm
+    na %na na na
+    \plummmm
+    na na na na
+    \plum
+    \plummmm
+    \plummmm
+    \plummm
+    ba ba ba ba ba ba ba ba ba
+    \plummm
+    ba ba ba ba ba ba ba ba ba
+    uh _ _ _ uh _ _ _
+    \badamba
+    \buried
+    bam bam bam
+    … \repeat unfold 17 { _ }
+    %bam bam bam bam bam bam bam
+    %bam bam bam bam bam bam
+    %bam bam bam
+    %bam bam
+    uh _ _ _ uh _ _
+    na da da da
+  }
+