diff options
author | Erich Eckner <git@eckner.net> | 2014-09-10 17:47:07 +0200 |
---|---|---|
committer | Erich Eckner <git@eckner.net> | 2014-09-10 17:47:07 +0200 |
commit | 49d14358c33b7d0ba7e7c381f91943617c7723ea (patch) | |
tree | fd55f0d3900d53978587d2228553359f86e69bbe /hr/stch/fertig/dicta | |
parent | 646f69a657326ca8dd733dfa579a90f89823d677 (diff) | |
download | Musik-49d14358c33b7d0ba7e7c381f91943617c7723ea.tar.xz |
Hauke eingefügt
Diffstat (limited to 'hr/stch/fertig/dicta')
-rw-r--r-- | hr/stch/fertig/dicta/dicta.ly | 87 | ||||
-rw-r--r-- | hr/stch/fertig/dicta/dynArt.ly | 215 | ||||
-rw-r--r-- | hr/stch/fertig/dicta/midi.lua | 53 | ||||
-rw-r--r-- | hr/stch/fertig/dicta/stimmen.ly | 184 | ||||
-rw-r--r-- | hr/stch/fertig/dicta/texte.ly | 100 |
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 + } + |