summaryrefslogtreecommitdiff
path: root/hr/stch/fertig/dicta
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2014-09-10 17:47:07 +0200
committerErich Eckner <git@eckner.net>2014-09-10 17:47:07 +0200
commit49d14358c33b7d0ba7e7c381f91943617c7723ea (patch)
treefd55f0d3900d53978587d2228553359f86e69bbe /hr/stch/fertig/dicta
parent646f69a657326ca8dd733dfa579a90f89823d677 (diff)
downloadMusik-49d14358c33b7d0ba7e7c381f91943617c7723ea.tar.xz
Hauke eingefügt
Diffstat (limited to 'hr/stch/fertig/dicta')
-rw-r--r--hr/stch/fertig/dicta/dicta.ly87
-rw-r--r--hr/stch/fertig/dicta/dynArt.ly215
-rw-r--r--hr/stch/fertig/dicta/midi.lua53
-rw-r--r--hr/stch/fertig/dicta/stimmen.ly184
-rw-r--r--hr/stch/fertig/dicta/texte.ly100
5 files changed, 639 insertions, 0 deletions
diff --git a/hr/stch/fertig/dicta/dicta.ly b/hr/stch/fertig/dicta/dicta.ly
new file mode 100644
index 0000000..b6d2518
--- /dev/null
+++ b/hr/stch/fertig/dicta/dicta.ly
@@ -0,0 +1,87 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+\version "2.14"
+\include "stimmen.ly"
+\include "texte.ly"
+
+\pointAndClickOff
+
+ \header {
+ title = "Gloriosa dicta sunt Nr. 2"
+ subtitle = "Communio an Mariæ Empfängnis - 8. Dezember"
+ composer = "Vytautas Miškinis"
+ %opus = "<+Werk+>"
+ tagline = \markup {
+ \musicglyph #"scripts.segno"
+ \musicglyph #"noteheads.shufnagel.virga"
+ \musicglyph #"scripts.upedalheel"
+ \musicglyph #"pedal.d"
+ \musicglyph #"pedal.e"
+ \musicglyph #"scripts.dpedalheel"
+ \musicglyph #"noteheads.shufnagel.virga"
+ \musicglyph #"pedal.e"
+ \musicglyph #"scripts.dpedalheel"
+ \musicglyph #"timesig.C44"
+ \musicglyph #"clefs.petrucci.c3_change"
+ \musicglyph #"scripts.flageolet"
+ \dynamic r
+ }
+ }
+
+ \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 14)
+
+ 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
+ beamExceptions = #'()
+ } <<
+ \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/dicta/dynArt.ly b/hr/stch/fertig/dicta/dynArt.ly
new file mode 100644
index 0000000..325b3af
--- /dev/null
+++ b/hr/stch/fertig/dicta/dynArt.ly
@@ -0,0 +1,215 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+ meta = {
+ %(dynamic) marks global to all voices
+ \dynamicUp
+ s1
+ s1
+ s1
+ s1
+ s1
+ \break
+ %
+ s1
+ s1
+ s1
+ s1
+ s1
+ \break
+ %
+ s1^\markup{ \italic "cresc. molto" }
+ s1
+ s1
+ s1
+ s1
+ s1
+ \bar "||"
+ \pageBreak
+ %
+ \key d \major
+ s1\mp
+ s1
+ s2.\< s4\f
+ s1
+ s2.\< s4\ff
+ \break
+ %
+ s4 s2\> s4\f^\markup{ \italic "dim. poco a poco" }
+ s2. s4\mf
+ s2. s4\mp
+ s1
+ s4\p s4 s4\fermata s4\>
+ \breathe
+ \bar "||"
+ \break
+ %
+ s2\! s8 s8\> s4
+ s2\mp s8 s8\> s4
+ s1\!
+ s4\fermata s2\> s4\!
+ \bar "|."
+ }
+
+ mpesp = \markup{ \dynamic "mp" \italic " espr."}
+ % mfesp = \markup{ \center-align \line { \dynamic "mf" \italic " espr."} }
+ mfesp = \markup{ \dynamic "mf" \italic " espr."}
+ ris = \markup{ \italic "risoluto poco a poco" }
+
+% articulation
+
+ oberArt = {
+ \dynamicUp
+ s1
+ s1
+ s1
+ s1
+ s1
+ \break
+ %
+ s1
+ s1
+ s1
+ s1
+ s1
+ \break
+ %
+ s1
+ s1
+ s4 s2.\f
+ s4 s2.^\markup{ \italic "dim." }
+ s1
+ s1
+ \bar "||"
+ \pageBreak
+ %
+ \key d \major
+ s1
+ s1
+ s1
+ s1
+ s1
+ \break
+ %
+ s1
+ s1
+ s1
+ s1
+ s1
+ \bar "||"
+ \break
+ %
+ s2\mp s2
+ s1
+ s1
+ s1
+ \bar "|."
+ }
+
+ sopranArt = << \oberArt {
+ \tempo "Moderato" 4=60
+ s1^\mpesp
+ s1\p
+ s1
+ s1
+ s1\mp
+ s1
+ s1
+ s1
+ s1^\ris
+ s1
+ s1^\ris
+ s1
+ s4 s2.^\markup{ \italic "allargando" }
+ s1
+ s1
+ s1^\markup{ \italic "poco rit." }
+ %
+ s1^\markup{ \italic "più mosso ma leggiero" }
+ s1*6
+ s1^\markup{ \italic "rit." }
+ s1*2
+ %
+ s1^\markup{ \italic "Tempo I" }
+ s1
+ s8^\markup{ \italic "Lento" } s8\p s2 s4
+ s1
+ } >>
+
+ altArt = << \oberArt {
+ s1\p
+ s1
+ s1^\mpesp
+ s1\p
+ s1
+ s1
+ s1
+ s1
+ s1
+ s1
+ s1
+ s1
+ s1
+ s1
+ s1
+ s1
+ %
+ s1*10
+ %
+ s1
+ s1
+ s4 s8 s8\p s2
+ s1
+ } >>
+
+ tenorArt = << \oberArt {
+ s1\p
+ s1^\mpesp
+ s1\p
+ s1
+ s8 s8\mp s2.
+ s1
+ s1
+ s1
+ s1
+ s1
+ s1
+ s1
+ s1
+ s1
+ s1
+ s1
+ %
+ s1*10
+ %
+ s1
+ s1
+ s4 s8 s8\p s2
+ s1
+ } >>
+
+ bassArt = {
+ s1\p
+ s1
+ s1
+ s1^\mpesp
+ s1
+ s1
+ s1
+ s1
+ s1
+ s2. s8 \once \override Staff.TextScript #'extra-offset = #'(8 . 0) \once \override Staff.TextScript #'self-alignment-X = #RIGHT s8^\mfesp
+ s1
+ s1
+ s1\f
+ s1^\markup{ \italic "dim." }
+ s1
+ s1
+ %
+ s1*10
+ %
+ s1\mf
+ s1
+ s4 s8 s8\p s2
+ s1
+ }
+
diff --git a/hr/stch/fertig/dicta/midi.lua b/hr/stch/fertig/dicta/midi.lua
new file mode 100644
index 0000000..8aef7d6
--- /dev/null
+++ b/hr/stch/fertig/dicta/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/fertig/dicta/stimmen.ly b/hr/stch/fertig/dicta/stimmen.ly
new file mode 100644
index 0000000..89cbaf6
--- /dev/null
+++ b/hr/stch/fertig/dicta/stimmen.ly
@@ -0,0 +1,184 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+ \version "2.12"
+ \include "dynArt.ly"
+
+ global = {
+ \key a \major
+ \override Staff.TimeSignature #'style = #'()
+ \time 4/4
+ %\autoBeamOff
+ }
+
+% Die Stimmen
+
+ sopranMelodie = \relative c'' {
+ <<
+ { \meta }
+ \sopranArt
+ %the actual tune
+ {
+ a16 b16 cis8 ~ cis8 a8 gis8 a8 e4
+ a4 a4 gis4 gis4
+ a4 a4 a4 b4
+ cis4 a4 e'4 e4
+ a,16 b16 cis8 ~ cis8 a8 a16 b16 cis8 ~ cis8 a8
+ a16 b16 cis8 ~ cis8 a8 a16 b16 cis8 ~ cis8 a8
+ b8 a8 a4 b8 a8 a4
+ b8 a8 a4 b8 a8 b4
+ cis4. a8 b8 cis8 ~ cis8 a8
+ b8 cis8 ~ cis8 a8 b8 cis8 ~ cis4
+ a4 a4 b4 b4
+ cis4 cis4 d4 d4
+ r4 a'4 g4 e4
+ r4 cis4 b4 g4
+ r4 e2 e4
+ e1
+ %
+ fis8 fis4. e8 fis8 g8 g8
+ a8 a4. d8 cis8 b8 b8
+ a4 a2 a4
+ fis'8 e8 d2 a4
+ fis'8 e8 g2 a4
+ g4 fis2 fis4
+ e4 d2 d4
+ cis4 b2 b4
+ a4 g2 g4
+ fis4 e4 e2
+ %
+ fis16 g16 a8 ~ a8 fis8 e8 d8 e4
+ fis16 g16 a8 ~ a8 fis8 e8 d8 e4
+ r8 fis8 e2 fis4 ~
+ fis1
+ }
+ >>
+ }
+
+ altMelodie = \relative c' {
+ <<
+ { \meta }
+ \altArt
+ %the actual tune
+ {
+ e4 e4 e4 e4
+ e4 e4 fis4 e4
+ fis16 e16 d8 ~ d8 fis8 fis8 e8 e4
+ d4 d4 a'4 gis4
+ e4 e4 e4 e4
+ e4 e4 e4 e4
+ fis4 fis4 e4 e4
+ d4 d4 d4 e4
+ e4 e4 d4 d4
+ e4 e4 fis4 fis4
+ e4 e4 fis4 fis4
+ gis4 gis4 a4 a4
+ r4 cis4 d4 b4
+ r4 a4 g4 e4
+ r4 cis2 cis4
+ c1
+ %
+ d8 d4. d8 d8 d8 d8
+ e8 e4. fis8 fis8 fis8 fis8
+ e4 e2 a4
+ a8 a8 g2 a4
+ a8 a8 b2 cis4
+ a2 a4 a4
+ fis2 fis4 fis4
+ d2 d4 d4
+ d2 d4 d4
+ cis2 b2
+ %
+ d8 d8 d8 d8 d8 d8 cis4
+ d8 d8 d8 d8 b8 b8 b4
+ r4 r8 d8 d2
+ d1
+ }
+ >>
+ }
+
+ tenorMelodie = \relative c' {
+ <<
+ { \meta }
+ \tenorArt
+ %the actual tune
+ \clef "treble_8"
+ {
+ cis4 cis4 cis4 cis4
+ a16 b16 cis8 ~ cis8 a8 b8 cis8 cis4
+ b4 a4 b4 a4
+ a4 b4 d4 b4
+ r8 a16 b16 cis8 a8 ~ a8 a16 b16 cis8 a8 ~
+ a8 a16 b16 cis8 a8 ~ a8 a16 b16 cis8 a8 ~
+ a4 b8 a8 a4 b8 a8
+ a4 b8 a8 a4 gis4
+ a4 a4 a4 a4
+ a4 a4 a4 a4
+ cis4 cis4 d4 d4
+ e4 e4 fis4 fis4
+ r4 e4 a4 g4
+ r4 e4 d4 b4
+ r4 a2 a4
+ g1
+ %
+ a8 a4. a8 a8 b8 b8
+ cis8 cis4. d8 d8 e8 d8
+ d4 cis2 a4
+ d8 cis8 b2 a4
+ d8 cis8 d2 e4
+ fis2 fis4 cis4
+ d2 d4 a4
+ b2 b4 b4
+ b2 b4 b4
+ a2 g2
+ %
+ a8 a8 a8 a8 b8 b8 b4
+ a8 a8 a8 a8 g8 g8 g4
+ r4 r8 b8 a2
+ a1
+ }
+ >>
+ }
+
+ bassMelodie = \relative c' {
+ <<
+ { \meta }
+ \bassArt
+ %the actual tune
+ \clef bass
+ {
+ a4 a4 gis4 gis4
+ fis4 fis4 e4 e4
+ d4 d4 cis4 cis4
+ b16 cis16 d8 ~ d8 fis8 fis8 e8 e4
+ a4 a4 gis4 gis4
+ fis4 fis4 e4 e4
+ d4 d4 cis4 cis4
+ b4 b4 e4 e4
+ a,4 a4 b4 b4
+ cis4 cis4 d4 d8 a'8
+ b8 cis8 ~ cis8 a8 b8 cis8 ~ cis8 a8
+ b8 cis8 ~ cis8 a8 b8 cis8 ~ cis8 d8
+ cis2. d4
+ e,2. d4
+ a1 ~
+ a4 a4 b4 c4
+ %
+ d8 d4. cis8 d8 e8 e8
+ fis8 fis4. b8 a8 g8 g8
+ a4 a2 a4
+ d,8 d8 d2 a'4
+ d,8 d8 a'2 a4
+ d2 cis4 fis,4
+ b2 a4 d,4
+ g2 fis4 fis4
+ e2 e4 e4
+ a,2 a2
+ %
+ d16 e16 fis8 ~ fis8 d8 g8 g8 a4
+ d,16 e16 fis8 ~ fis8 d8 b8 b8 a4
+ r4 r8 g'8 g2
+ d1
+ }
+ >>
+ }
+
diff --git a/hr/stch/fertig/dicta/texte.ly b/hr/stch/fertig/dicta/texte.ly
new file mode 100644
index 0000000..7c64510
--- /dev/null
+++ b/hr/stch/fertig/dicta/texte.ly
@@ -0,0 +1,100 @@
+%some settings% vim: ai sw=2 lbr nu et
+
+% Abkürzungen
+
+ Glo = \lyricmode {
+ Glo -- ri -- o -- sa,
+ }
+
+ glo = \lyricmode {
+ glo -- ri -- o -- sa,
+ }
+
+ Dicta = \lyricmode {
+ Glo -- ri -- o -- sa dic -- ta sunt,
+ }
+
+ dicta = \lyricmode {
+ glo -- ri -- o -- sa dic -- ta sunt,
+ }
+
+ Sunt = \lyricmode {
+ Dic -- ta sunt,
+ }
+
+ sunt = \lyricmode {
+ dic -- ta sunt
+ }
+
+ m = \lyricmode {
+ Ma -- ri -- a,
+ }
+
+ inter = \lyricmode {
+ Ma -- ri -- a:
+ qui -- a fe -- cit ti -- bi,
+ qui -- a fe -- cit ti -- bi mag -- na
+ qui pot -- ens est,
+ qui pot -- ens est,
+ \m \m \m \m
+ }
+
+ finis = \lyricmode {
+ \Dicta
+ \dicta
+ Ma -- ri -- a.
+ }
+
+% Die Textaufteilungen
+
+ sopranText = \lyrics {
+ %<+hier den Text für den Sopran eintragen+>
+ \Dicta
+ \glo \glo \glo
+ \glo \glo \glo \dicta dic -- ta sunt,
+ \Sunt dic -- ta de te,
+ \m \m \m
+ te \m te \m \m
+ \m
+ \inter
+ qui pot -- ens est.
+ \finis
+ }
+
+ altText = \lyrics {
+ %<+hier den Text für den Alt eintragen+>
+ \Glo \glo
+ \dicta
+ \glo \glo \glo
+ glo -- ri -- o -- sa \sunt de te,
+ \m te, \m te \m te \m
+ \m \m
+ \inter
+ Ma -- ri -- a.
+ \finis
+ }
+
+ tenorText = \lyrics {
+ %<+hier den Text für den Tenor eintragen+>
+ \Glo
+ \dicta
+ \glo \glo
+ \glo \glo \glo \dicta
+ dic -- ta sunt, \sunt de te,
+ \m te, \m te \m te \m
+ \m \m
+ \inter
+ Ma -- ri -- a.
+ \finis
+ }
+
+ bassText = \lyrics {
+ %<+hier den Text für den Baß eintragen+>
+ \Glo \glo \glo
+ \dicta \glo \glo glo -- ri -- o -- sa \sunt de te, \m te, \m
+ \m \m \m \m de te, de te, de te,
+ \inter
+ Ma -- ri -- a.
+ \finis
+ }
+