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/quartett/jesu | |
parent | 646f69a657326ca8dd733dfa579a90f89823d677 (diff) | |
download | Musik-49d14358c33b7d0ba7e7c381f91943617c7723ea.tar.xz |
Hauke eingefügt
Diffstat (limited to 'hr/quartett/jesu')
-rw-r--r-- | hr/quartett/jesu/dynArt.ly | 21 | ||||
-rw-r--r-- | hr/quartett/jesu/jesu.ly | 60 | ||||
-rw-r--r-- | hr/quartett/jesu/midi.lua | 50 | ||||
-rw-r--r-- | hr/quartett/jesu/stimmen.ly | 123 | ||||
-rw-r--r-- | hr/quartett/jesu/texte.ly | 22 |
5 files changed, 276 insertions, 0 deletions
diff --git a/hr/quartett/jesu/dynArt.ly b/hr/quartett/jesu/dynArt.ly new file mode 100644 index 0000000..756726f --- /dev/null +++ b/hr/quartett/jesu/dynArt.ly @@ -0,0 +1,21 @@ +%some settings% vim: ai sw=2 lbr nu encoding=utf8 et + + meta = { + %(dynamic) marks global to all voices + \dynamicUp + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/quartett/jesu/jesu.ly b/hr/quartett/jesu/jesu.ly new file mode 100644 index 0000000..5611b0e --- /dev/null +++ b/hr/quartett/jesu/jesu.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 = "Jesu, meine Freude" + composer = "Johann Sebastian Bach, 1685–1750" + opus = "BWV 227" + 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 72 4) + %} + %} + \layout { + } + } + diff --git a/hr/quartett/jesu/midi.lua b/hr/quartett/jesu/midi.lua new file mode 100644 index 0000000..f8b2520 --- /dev/null +++ b/hr/quartett/jesu/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/jesu/stimmen.ly b/hr/quartett/jesu/stimmen.ly new file mode 100644 index 0000000..e1ebbb6 --- /dev/null +++ b/hr/quartett/jesu/stimmen.ly @@ -0,0 +1,123 @@ +%some settings% vim: ai sw=2 lbr nu encoding=utf8 et + + \version "2.12" + \include "dynArt.ly" + + global = { + \key g \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 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + \repeat volta 2 { + e4 d4 c4. b8 + a4( b4) e2 + e4 a8( g8) fis4 g8( fis8) + e8( fis8 g8 a8) b2 + c4 b8( a8) b4 b,4 + e1 + } + e8( fis8) g4 fis4 g4 + c,4 d4 g,2 + g'4 fis8( e8) fis4 g8( fis8) + e4 b4 e4( fis4) + b,2 e4 d4 + c4 b4 a4( b4) + e1 + \bar "||" + \time 3/2 + \repeat unfold 2 { + e2 g2 fis2 + g2 r2 r2 + gis2 r2 r2 + r2 a4( g4) fis4( e4) + dis2. dis4 dis4 b4 + e2. fis4 g4 fis4 + g4 e4 c2. c4 + b2 r2 r2 + } + b2 b'2 a2 + gis2 e'2 e,2 + a4( b4 a4 g4 fis4 e4 + dis4 b4 b'4 a4 g4 fis4 + e2) e2 r2 + R1. + R1. + R1. + R1. + R1. + b4 b4 b4 b4 cis4 dis4 + e4 ais,2 b2 cis4 + d1. ~ + d4( cis8 b8 cis4 d4 e4 fis4 + g4 cis,2 d2 e4 + fis4 b,2 cis2 d4 + e4 d4) e2 r2 + r2 d2 fis2 + g2( e2) fis2 + b1 r2 + \repeat unfold 2 { + b2 d2 cis2 + d2 r2 r2 + dis2 r2 r2 + r2 e4( d4) cis4( b4) + ais2. ais4 ais4 fis4 + b2. cis4 d4 cis4 + d4 b4 g'2. g4 + fis2 r2 r2 + } + R1. + R1. + r4 e4 gis4 fis4 gis4 e4 + a1. ~ + a2. b4 a4 g4 + fis2. e4 fis4 d4 + g4( fis4) g4 a4 + } + >> + } + diff --git a/hr/quartett/jesu/texte.ly b/hr/quartett/jesu/texte.ly new file mode 100644 index 0000000..51d4b6a --- /dev/null +++ b/hr/quartett/jesu/texte.ly @@ -0,0 +1,22 @@ +%some settings% vim: ai sw=2 lbr nu encoding=utf8 et + +% Abkürzungen + +% 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+> + } + |