diff options
Diffstat (limited to 'hr/quartett/avc')
-rw-r--r-- | hr/quartett/avc/ave.ly | 56 | ||||
-rw-r--r-- | hr/quartett/avc/dynArt.ly | 21 | ||||
-rw-r--r-- | hr/quartett/avc/midi.lua | 50 | ||||
-rw-r--r-- | hr/quartett/avc/stimmen.ly | 243 | ||||
-rw-r--r-- | hr/quartett/avc/texte.ly | 36 |
5 files changed, 406 insertions, 0 deletions
diff --git a/hr/quartett/avc/ave.ly b/hr/quartett/avc/ave.ly new file mode 100644 index 0000000..45183df --- /dev/null +++ b/hr/quartett/avc/ave.ly @@ -0,0 +1,56 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.12" +\include "stimmen.ly" +\include "texte.ly" + + \header { + title = "Ave verum corpus" + composer = "Wolfgang Amadeus Mozart" + opus = "KV 618, 1791" + 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 = "fP" { \frauenPausen } + \new Voice = "soprane" { \global \voiceOne \sopranMelodie } + \new Voice = "alti" { \global \voiceTwo \altMelodie } + \addlyrics { \altText } + >> + \new Staff = maenner << + \new Voice = "mP" { \maennerPausen } + \new Voice = "tenoere" { \global \voiceOne \tenorMelodie } + \new Voice = "baesse" { \global \voiceTwo \bassMelodie } + %\addlyrics { \bassText } + >> + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + \layout { + } + } + diff --git a/hr/quartett/avc/dynArt.ly b/hr/quartett/avc/dynArt.ly new file mode 100644 index 0000000..30423d4 --- /dev/null +++ b/hr/quartett/avc/dynArt.ly @@ -0,0 +1,21 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + \dynamicUp + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/quartett/avc/midi.lua b/hr/quartett/avc/midi.lua new file mode 100644 index 0000000..f8b2520 --- /dev/null +++ b/hr/quartett/avc/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/quartett/avc/stimmen.ly b/hr/quartett/avc/stimmen.ly new file mode 100644 index 0000000..b0ee87e --- /dev/null +++ b/hr/quartett/avc/stimmen.ly @@ -0,0 +1,243 @@ +%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 + + frauenPausen = \relative c' { + \compressFullBarRests + R1*2 + s1*8 + \break + s1*8 + R1*3 + \break + s1*16 + \break + s1*6 + R1*3 + } + + sopranMelodie = \relative c'' { + << + % { \meta } + %\sopranArt + %the actual tune + { + s1*2 + a2 d4( fis,4) + a4( gis4) g2 + g4( b4) a4( g4) + g4( fis4) fis2 + e2. e4 + fis4 fis4 g4 g4 + g2( fis4) fis4 + e1 + e2. a4 + a4( gis4) gis2 + e4( gis2) b4 + b4( a4) a4 a4 + d1( ~ + d4 cis4) b4 a4 + a2( gis4) gis4 + a1 + s1*3 + a2. a4 + a4( bes4) bes2 + bes4( d4) c4( bes4) + bes4( a4) a2 + g2. g4 + g4( bes4) a4 g4 + g2( f8 e8) f4 + e2 r2 + fis2. fis4 + fis4( e4) d4( g4) + g2. g4 + g4( fis4) e4 a4 + a1( ~ + a4 g4) a4 b4 + fis2( e4.) fis8 + g2 g2 + d'1( ~ + d2 dis2 + e4 b4 cis4 d4 + cis4 b8 a8) d4 g,4 + fis2( e4.) e8 + d1 + s1*3 + } + >> + } + + altMelodie = \relative c' { + << + % { \meta } + %\altArt + %the actual tune + { + s1*2 + fis2 fis2 + e2 e2 + e4( g4) fis4( e4) + e4( d4) d2 + cis2. cis4 + d4 d4 e4 e4 + e2( d4) d4 + cis1 + e2. e4 + e2 e2 + e2. gis4 + gis4( a4) a2 + r2 gis2 + a2 fis4 fis4 + e2. e4 + e1 + s1*3 + e2. e4 + e2 e2 + e2. e4 + e4( f4) f2 + d2. d4 + e4( f4) e4 e4 + e2( d8 cis8) d4 + cis2 r2 + d2. d4 + d4( cis4) b4( e4) + e2. e4 + e4( d4) cis4 fis4 + fis1( ~ + fis4 g4) fis4 e4 + d2( cis4.) cis8 + d2 r2 + r2 fis2 + g2( fis2 + e1 ~ + e4 d8 cis8) d4 d4 + d2( cis4.) cis8 + d1 + s1*3 + } + >> + } + + maennerPausen = \relative c' { + \compressFullBarRests + R1*2 + s1*16 + R1*3 + s1*22 + R1*3 + } + + tenorMelodie = \relative c' { + << + % { \meta } + %\tenorArt + %the actual tune + \clef "treble_8" + { + s1*2 + a2 a2 + b2 b2 + a2 a2 + a2 a2 + a2. a4 + a4 a4 a4 a4 + a2. a4 + a1 + cis2. cis4 + cis4( d4) d2 + b2. d4 + d4( cis4) cis2 + r2 d2 + e2 d4 cis4 + b2. b4 + cis1 + s1*3 + cis2. cis4 + cis2 cis4( c4) + c4( bes4 a4) g4 + g4( a4) a2 + b2. b4 + cis4( d4) e4 cis4 + cis2( d4) b4 + e,2 r2 + r1 + b'2. b4 + b4( a4) g4( cis4) + cis2. cis4 + cis4( b4) a4 d4 + d2 d4 d4 + a2. a4 + g2 r2 + r2 c2 + d2( c2 + b4 d4 cis4 b4 + a2) a4 g4 + a2( g4.) g8 + fis1 + s1*3 + } + >> + } + + bassMelodie = \relative c { + << + % { \meta } + %\bassArt + %the actual tune + \clef bass + { + s1*2 + d2 d2 + d2 d2 + cis2 cis2 + d2 d2 + a2. a4 + d4 d4 cis4 cis4 + d2. d4 + a1 + a'2. a4 + a4( b4) b2 + gis2 e2 + eis4( fis4) fis2 + r2 b,2 + cis2 d4 d4 + e2. e4 + a,1 + s1*3 + a'2. a4 + a4( g4) g2 + c,2. c4 + c4( f4) f2 + f2. f4 + e4( d4) cis4 a4 + bes2( a4) gis4 + a2 r2 + r1 + g'2. g4 + g4( fis4) e4( a4) + a2. a4 + a4( g4) fis4 b4 + b2 a4 gis4 + a2 a,2 + b2 r2 + r2 a'2 + bes2( a2 + gis1 + g2) fis4 b,4 + a2. a4 + d1 + s1*3 + } + >> + } + diff --git a/hr/quartett/avc/texte.ly b/hr/quartett/avc/texte.ly new file mode 100644 index 0000000..3ab9e34 --- /dev/null +++ b/hr/quartett/avc/texte.ly @@ -0,0 +1,36 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + text = \lyricmode { + A -- ve, a -- ve ve -- rum cor -- pus + na -- tum de Ma -- ri -- a vir -- gi -- ne, + ve -- re, pas -- sum im -- mo -- la -- tum + in cru -- ce pro ho -- mi -- ne. + Cu -- jus la -- tus + per -- fo -- ra -- tum + un -- da flu -- xit et san -- gui -- ne, + e -- sto no -- bis præ -- gu -- sta -- tum + in mor -- tis ex -- a -- mi -- ne, + in mor -- tis ex -- a -- mi -- ne. + } + +% Die Textaufteilungen + + sopranText = \lyrics { + %<+hier den Text für den Sopran eintragen+> + } + + altText = \lyrics { + %<+hier den Text für den Alt eintragen+> + \text + } + + tenorText = \lyrics { + %<+hier den Text für den Tenor eintragen+> + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + |