Hauke eingefügt

6 files changed, 407 insertions, 0 deletions

diff --git a/hr/schott/gloria/dynArt.ly b/hr/schott/gloria/dynArt.ly
new file mode 100644
index 0000000..a46cb75
--- /dev/null
+++ b/hr/schott/gloria/dynArt.ly
@@ -0,0 +1,76 @@
+%some settings% vim: ai sw=2 lbr nu encoding=utf8 et
+
+  meta = {
+    %(dynamic) marks global to all voices
+    \dynamicUp
+  }
+
+% articulation
+
+    sopranArt = {
+    }
+
+    altArt = {
+    }
+
+    tenorArt = {
+    }
+
+    bassArt = {
+      % intro
+      s4-.\pp^\markup{INTRO} s4-. s2 
+      s1 
+      s4-. s4-. s2 
+      s1 
+      s4-. s4-. s2 
+      s1 
+      s4-. s4-. s2 
+      s1 
+      \bar "||"
+      % verse 1,2
+      s1^\markup{VERSE 1/2} 
+      s1 
+      s4-. s4-. s2 
+      s1 
+      s4-. s4-. s2 
+      s1 
+      s4-. s4-. s2 
+      s1 
+      s8-. s8-. s4-. s2 
+      s1 
+      s8-. s8-. s4-. s2 
+      s1 
+      s4 s4-. s2 
+      s1 
+      s4 s4-. s8 s8\p s4 
+      s1 
+      \bar "||"
+      % bridge 1,2
+      s1^\markup{BRIDGE 1/2} 
+      \repeat unfold 7 {
+        s1 
+      }
+      \bar "||"
+      % prechorus
+      s4-.^\markup{PRECHORUS} s4-. s2 
+      s1 
+      s4-. s4-. s2 
+      s1 
+      s4-. s4-. s2 
+      s1 
+      s4-. s4-. s2 
+      s1 
+      s4-. s4-. s2 
+      s1 
+      \repeat unfold 4 {
+        s1 
+      }
+      \bar "||"
+      % chorus
+      s1^\markup{CHORUS} 
+      \repeat unfold 15 {
+        s1 
+      }
+      \bar "||"
+    }
+
diff --git a/hr/schott/gloria/gloria.ly b/hr/schott/gloria/gloria.ly
new file mode 100644
index 0000000..a8d7a27
--- /dev/null
+++ b/hr/schott/gloria/gloria.ly
@@ -0,0 +1,60 @@
+%some settings% vim: ai sw=2 lbr nu encoding=utf8 et
+
+\version "2.12"
+\include "stimmen.ly"
+\include "texte.ly"
+
+  \header {
+    title = "Gloria"
+    composer = "Bigazzi/Tozzi"
+    %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)
+
+  \score {
+    \new ChoirStaff \with {} <<
+%      \new Staff = sopran <<
+	%\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." }
+	%\new Voice = "soprane" { \global \sopranMelodie }
+	%\addlyrics { \sopranText }
+      %>>
+      %\new Staff = alt <<
+	%\new Voice = "alti" { \global \altMelodie }
+	%\addlyrics { \altText }
+      %>>
+      %\new Staff = tenor <<
+	%\new Voice = "tenoere" { \global \tenorMelodie }
+	%\addlyrics { \tenorText }
+      %>>
+      \new Staff = bass <<
+	\new Voice = "baesse" { \global \bassMelodie }
+	\addlyrics { \bassText }
+      >>
+    >>
+    \midi {
+      \context{
+	\Score
+	tempoWholesPerMinute = #(ly:make-moment 130 4)
+      }
+    }
+    %\layout {
+    %}
+  }
+
diff --git a/hr/schott/gloria/gloria.midi b/hr/schott/gloria/gloria.midi
new file mode 100644
index 0000000..2d715a4
--- /dev/null
+++ b/hr/schott/gloria/gloria.midi
diff --git a/hr/schott/gloria/midi.lua b/hr/schott/gloria/midi.lua
new file mode 100644
index 0000000..f8b2520
--- /dev/null
+++ b/hr/schott/gloria/midi.lua
@@ -0,0 +1,50 @@
+ -- some settings -- vim: ai sw=2 lbr nu encoding=utf8 et
+
+pre=[[
+%some settings% vim: ai sw=2 lbr nu encoding=utf8 et
+
+\version "2.12"
+\include "stimmen.ly"
+
+  \score {
+]]
+
+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/schott/gloria/stimmen.ly b/hr/schott/gloria/stimmen.ly
new file mode 100644
index 0000000..20a2dd0
--- /dev/null
+++ b/hr/schott/gloria/stimmen.ly
@@ -0,0 +1,135 @@
+%some settings% vim: ai sw=2 lbr nu encoding=utf8 et
+
+  \version "2.12"
+  \include "dynArt.ly"
+
+  global = {
+    \key f \major
+    %\override Staff.TimeSignature #'style = #'()
+    \time 4/4
+    %\autoBeamOff
+  }
+
+% Die Stimmen
+
+  sopranMelodie = \relative c' {
+    <<
+      { \meta }
+      %\sopranArt
+      %the actual tune
+      {
+	r1 
+      }
+    >>
+  }
+
+  altMelodie = \relative c' {
+    <<
+      { \meta }
+      %\altArt
+      %the actual tune
+      {
+	r1 
+      }
+    >>
+  }
+  
+  tenorMelodie = \relative c' {
+    <<
+      { \meta }
+      %\tenorArt
+      %the actual tune
+      \clef "treble_8"
+      {
+	r1 
+      }
+    >>
+  }
+
+  bassf = {
+    r4 r8 f8 ~ f8 f8 e8 e8 
+  }
+
+  bassd = {
+    r4 r8 d8 ~ d8 d8 c8 c8 
+  }
+
+  bassMelodie = \relative c {
+    <<
+      { \meta }
+      \bassArt
+      %the actual tune
+      \clef bass
+      {
+	f4 e4 r8 f8 r8 e8 
+        \bassf
+	f4 e4 r8 f8 r8 e8 
+        \bassf
+        d4 c4 r8 f8 r8 f8 
+        \bassd
+        d4 c4 r8 f8 r8 f8 
+        r4 f8 e8 r8 f8 d8 r8 
+        % gloria
+        f4\segno e4 r8 f8 r8 e8 
+        \bassf
+        d4 c4 r8 d8 d8 c8 
+        \tieDashed
+        \bassd
+        f4 e4 r8 f8 r8 e8 
+        \bassf
+        d4 c4 r8 d8 d8 c8 
+        \bassd
+        c8 ~ c8 c4 r8 c8 r8 c8 
+        r4 r8 c8 c8 c8 c8 c8 
+        f8 ~ f8 f4 r8 f8 r8 f8 
+        r4 r8 f8 f8 e8 d8 d8 
+        d8 c8 c4 r8 d8 c8 c8 
+        r4 r8 c8 c8 c8 c8 c8 
+        f8 f8 f4 r8 f8 f8 f8 
+        r4 c4 cis4 cis4 
+        % bridge
+        \tieSolid
+        d4. d8 d2 
+        g4. g8 g2 
+        c,4. c8 c2 
+        f4. f8 f2 
+        bes,4. bes8 bes2 
+        c2 c2 
+        f2 g4 g8 f8 ~ 
+        f2.-\bendAfter #-2 r4 
+        % prechorus
+        c4 c4 r8 c8 r8 c8 
+        r8 c8 r8 c8 ~ c8 c8 c8 c8 
+        f4 f4 r8 f8 r8 f8 
+        r8 f8 r8 f8 ~ f8 f8 e8 d8 
+        c4 c4 r8 c8 r8 c8 
+        r8 c8 r8 c8 ~ c8 e8 g8 a8 
+        g4 f4 r8 f8 r8 f8 
+        r8 f8 r8 f8 ~ f8 f8 f8 f8 
+        c4 c4 r8 g'8 a8 bes8 ~ 
+        bes2 g4 ees4 
+        bes4 bes4 bes4 c4 ~ 
+        c1 
+        r4 d4. ees8 ~ ees4 
+        f4 r8 f8 a,4 bes4 
+        % chorus
+        c8 c4 c4 c4 c8 ~ 
+        c8 c4 c4 c16 c16 c4 
+        f8 f4 f4 f4 f8 ~ 
+        f8 f4 f4 f16 f16 f4 
+        c8 c4 c4 c4 c8 ~ 
+        c8 c4 c4 c16 c16 c4 
+        f8 f4 f4 f4 f8 ~ 
+        f8 f4 f8 e4 a,4 
+        r4 d4 f4 a4 
+        b2( g2) 
+        r4 c,4 e4 g4 
+        a2( f2) 
+        r4 d4 bes'4 a4 
+        g8 g8 g8 g8 a8 bes4 c8 ~ 
+        c2 bes4 bes8 f8 ~ 
+        f4 r4 r2 
+      }
+    >>
+  }
+
diff --git a/hr/schott/gloria/texte.ly b/hr/schott/gloria/texte.ly
new file mode 100644
index 0000000..e7dd437
--- /dev/null
+++ b/hr/schott/gloria/texte.ly
@@ -0,0 +1,86 @@
+%some settings% vim: ai sw=2 lbr nu encoding=utf8 et
+
+% Abkürzungen
+
+  bta = \lyricmode {
+    doob doob doob doob
+  }
+
+  btb = \lyricmode {
+    doo doo doo doo
+    doob doob doob doob
+  }
+
+  btc = \lyricmode {
+    doon doon doon doon
+    doon doon doon doo dl doo
+  }
+
+  intro = \lyricmode {
+    Doob doob doob doob
+    \btb
+    \btb
+    \btb
+    doo doob doo doob
+  }
+
+  gloriaA = \lyricmode {
+    Glo -- ria, doop doop,
+    man -- chi tu nell' a -- ria, doo doo doop
+    man chi_ad u -- na ma -- no doop doop
+    che la -- vo -- ra pia -- no doo doo doop
+    man -- chi_a ques -- ta boc -- ca boc -- ca
+    che ci -- bo più non toc -- ca toc -- ca
+    e sem -- pre ques -- ta sto -- ri -- a sto -- ri -- a
+    che lei la chia -- mo Glo -- ri -- a
+  }
+
+  prechorus = \lyricmode {
+    Glo -- ria, Glo -- ri -- a
+    man -- chi tu nell' a -- ria,
+    Glo -- ri -- a
+    man -- chi co -- me_il sa -- le
+    Glo -- ri -- a
+    man -- chi più del so -- le
+    Glo -- ri -- a
+    sco -- gli que -- sta ne -- ve
+    Glo -- ri -- a mi -- o pet -- to a ha
+  }
+
+% 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+>
+    \intro
+    \gloriaA
+    Glo -- ri -- a Glo -- ri -- a
+    Glo -- ri -- a Glo -- ri -- a
+    Glo -- ri -- a Glo -- ri -- a
+    Glo -- ri -- a
+    Glo -- ri -- a Glo -- ri -- a
+    \prechorus
+    Glo -- ri -- a bah doon doon
+    \btc
+    \btc
+    \btc
+    doon doon doon doon
+    doon doon doon doon doon
+    O Glo -- ri -- a
+    O Glo -- ri -- a
+    O Glo -- ri -- a
+    t'as -- pet -- to Glo -- ri -- a,
+    Glo -- ri -- a
+  }
+