diff options
Diffstat (limited to 'hr/stch/fertig/carol')
-rw-r--r-- | hr/stch/fertig/carol/carol.ly | 61 | ||||
-rw-r--r-- | hr/stch/fertig/carol/dynArt.ly | 178 | ||||
-rw-r--r-- | hr/stch/fertig/carol/midi.lua | 50 | ||||
-rw-r--r-- | hr/stch/fertig/carol/stimmen.ly | 172 | ||||
-rw-r--r-- | hr/stch/fertig/carol/texte.ly | 87 |
5 files changed, 548 insertions, 0 deletions
diff --git a/hr/stch/fertig/carol/carol.ly b/hr/stch/fertig/carol/carol.ly new file mode 100644 index 0000000..d71a67d --- /dev/null +++ b/hr/stch/fertig/carol/carol.ly @@ -0,0 +1,61 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + + \header { + title = "Carol of the Bells" + composer = "M. Leontovich" + %opus = "<+Werk+>" + tagline = "" + } + + \paper { + line-width = \paper-width - 50 + top-margin = 10 + bottom-margin = 10 + ragged-last-bottom = #'f + system-count = 10 + } + + \layout { + indent = #0 + \context { + \Staff + \override VerticalAxisGroup #'minimum-Y-extent = #'(-3 . 3.5) + } + } + + #(set-global-staff-size 11) + + \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/stch/fertig/carol/dynArt.ly b/hr/stch/fertig/carol/dynArt.ly new file mode 100644 index 0000000..55628d6 --- /dev/null +++ b/hr/stch/fertig/carol/dynArt.ly @@ -0,0 +1,178 @@ +%some settings% vim: ai sw=2 lbr nu et + + dec = ^\markup{ \bold \italic "decresc." } + dwr = ^\markup{ \bold \italic "dim. (without ritard.)" } + dm = ^\markup{ \bold \italic "dim." } + sim = ^\markup{ \bold \italic "simile" } + meta = { + %(dynamic) marks global to all voices + \dynamicUp + \repeat unfold 4 { s2. } + \break + \repeat volta 2 { + \repeat unfold 8 { s2. } + \break + s4\mf s2 + \repeat unfold 3 { s2. } + \break + s4\f s2 + \repeat unfold 3 { s2. } + \break + s4\ff s2 + \repeat unfold 9 { s2. } + s2.\dec + s2. + \break + } \alternative { + \repeat unfold 4 { s2. } + \break + \repeat unfold 6 { s2. } + } + } + +% articulation + + sopranArt = { + s4\pp-- s8-.^\markup{ \bold \italic "(staccato)" } s8-. s4-. + \repeat unfold 3 { s4-- s8-. s8-. s4-. } + \repeat volta 2 { + s4\pp-- s8-. s8-. s4-. + s4-- s8-. s8-. s4-. + s4\sim s8 s8 s4 + s4 s8 s8 s4 + s4\p s8 s8 s4 + \repeat unfold 7 { s4 s8 s8 s4 } + \repeat unfold 4 { + s4 s8 s8 s4 + } + s4 s8 s8 s8 s8 + s4 s8 s8 s8 s8 + s4 s8 s8 s8 s8 + s4 s8 s8 s4 + \repeat unfold 2 { + s8\f^\markup{ \bold \italic "cresc." } s8 s8 s8 s8 s8 + s8\dec s8 s4 s4 + } + s4\dwr s8 s8 s4 + s4 s8 s8 s4 + s4 s8 s8 s4 + s4 s8 s8 s4 + } \alternative { + { + s4\pp s8 s8 s4 + \repeat unfold 3 { + s4 s8 s8 s4 + } + } + { + s2.\dwr ~ + s2. ~ + s2. ~ + s2.\fermata\ppp + s4\mf s8 s8\fermata s4-> ~ + s2. + } + } + } + + altArt = { + \repeat unfold 4 { s4 s8 s8 s4 } + \repeat volta 2 { + s2.->\pp + \repeat unfold 3 { s2.-> } + s2.->\p + \repeat unfold 3 { s2.-> } + s4-- s8-. s8-. s4-. + s4-- s8-. s8-. s4-. + s4\sim s8 s8 s4 + s4 s8 s8 s4 + \repeat unfold 8 { s2. } + s2.\f + s2. + s2. + s2. + s2.\dm + s2. + s2. + s2. + } \alternative { + { + \repeat unfold 4 { s2. } + } + { + s2.\dm ~ + s2. ~ + s2. ~ + s2.\fermata\ppp + s4\mf s8 s8\fermata s4-> ~ + s2. + } + } + } + + tenorArt = { + \repeat unfold 4 { s4 s8 s8 s4 } + \repeat volta 2 { + \repeat unfold 4 { s2. } + s2.->\p + \repeat unfold 3 { s2.-> } + s4-- s8-. s8-. s4-. + s4-- s8-. s8-. s4-. + s4\sim s8 s8 s4 + s4 s8 s8 s4 + \repeat unfold 8 { s2. } + s2.\ff + s2. + s2. + s4-> s8 s8 s4 + s2.\dm + s2. + s2. + s2. + } \alternative { + { + \repeat unfold 4 { s2. } + } + { + s2.\dm + s2. + s2. + s4 s8 s8 s4\fermata + s2. + s2. + } + } + } + + bassArt = { + \repeat unfold 4 { s4 s8 s8 s4 } + \repeat volta 2 { + \repeat unfold 8 { s2. } + s4-- s8-. s8-. s4-. + s4-- s8-. s8-. s4-. + s4\sim s8 s8 s4 + s4 s8 s8 s4 + \repeat unfold 8 { s2. } + s2.->\ff + s2.-> + s2.-> + s2-> s4 + s2.\dm + s2. + s2. + s2. + } \alternative { + { + \repeat unfold 4 { s2. } + } + { + s2.\dm ~ + s2. ~ + s2. ~ + s2.\fermata\ppp + s2. + s2.->\fermata + } + } + } + diff --git a/hr/stch/fertig/carol/midi.lua b/hr/stch/fertig/carol/midi.lua new file mode 100644 index 0000000..58e69da --- /dev/null +++ b/hr/stch/fertig/carol/midi.lua @@ -0,0 +1,50 @@ + -- some settings -- vim: ai sw=2 lbr nu 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/stch/fertig/carol/stimmen.ly b/hr/stch/fertig/carol/stimmen.ly new file mode 100644 index 0000000..780dcde --- /dev/null +++ b/hr/stch/fertig/carol/stimmen.ly @@ -0,0 +1,172 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.14" + \include "dynArt.ly" + + global = { + \key bes \major + %\override Staff.TimeSignature #'style = #'() + \time 3/4 + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + \sopranArt + %the actual tune + { + \repeat unfold 4 { bes4 a8 bes8 g4 } + \repeat volta 2 { + \repeat unfold 12 { bes4 a8 bes8 g4 } + \repeat unfold 4 { + d'4 c8 d8 bes4 + } + g'4 g8 g8 f8( ees8) + d4 d8 d8 c8( bes8) + c4 c8 c8 d8( c8) + g4 g8 g8 g4 + \repeat unfold 2 { + d8 e8 fis8 g8 a8 bes8 + c8 d8 c4 bes4 + } + \repeat unfold 4 { + bes4 a8 bes8 g4 + } + } \alternative { + { + \repeat unfold 4 { + bes4 a8 bes8 g4 + } + } + { + g2. ~ + g2. ~ + g2. ~ + g2. + d'4 c8 d8 g,4 ~ + g2. + } + } + \bar "|." + } + >> + } + + altMelodie = \relative c'' { + << + { \meta } + \altArt + %the actual tune + { + \repeat unfold 4 { R2. } + \repeat volta 2 { + \repeat unfold 2 { g2. f2. ees2. d2. } + \repeat unfold 4 { g4 g8 g8 g4 } + \repeat unfold 4 { bes4 a8 bes8 g4 } + \repeat unfold 4 { g4 g8 g8 g4 } + \repeat unfold 2 { d2. e4( fis4) g4 } + d2. c2. + f2. ees2. + } \alternative { + { + d2. ~ + d2. ~ + d2. + R2. + } + { + d2. ~ + d2. ~ + d2. ~ + d2. + bes'4 a8 bes8 g4 ~ + g2. + } + } + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + \tenorArt + %the actual tune + \clef "treble_8" + { + \repeat unfold 4 { R2. } + \repeat volta 2 { + \repeat unfold 4 { R2. } + ees2. d2. c2. bes2. + c4 c8 c8 c4 + d4 d8 d8 d4 + ees4 ees8 ees8 ees4 + d4 d8 d8 d4 + d2. e2. f4( ees4) d4 + g8( f8) ees4 d4 + d4 ees8 ees8 d8( c8) + d4 d8 d8 d4 + ees4 ees8 ees8 f8( ees8) + d4 d8 d8 d4 + \repeat unfold 4 { bes4 a8 bes8 g4 } + \repeat unfold 4 { g2. } + } \alternative { + { + g2. ~ + g2. ~ + g2. + R2. + } + { + \repeat unfold 4 { bes4 a8 bes8 g4 } + R2. + R2. + } + } + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + \bassArt + %the actual tune + \clef bass + { + \repeat unfold 4 { R2. } + \repeat volta 2 { + \repeat unfold 8 { R2. } + ees4 ees8 ees8 ees4 + g4 g8 g8 g4 + c4 c8 c8 c4 + \repeat unfold 5 { g4 g8 g8 g4 } + \repeat unfold 4 { bes4 a8 bes8 g4 } + d2. + d2. + d2. + d2( e4) + f2. ees2. d2. c2. + } \alternative { + { + g2. ~ + g2. ~ + g2. + R2. + } + { + g2. ~ + g2. ~ + g2. ~ + g2. + R2. + g2. + } + } + } + >> + } + diff --git a/hr/stch/fertig/carol/texte.ly b/hr/stch/fertig/carol/texte.ly new file mode 100644 index 0000000..4a6c52f --- /dev/null +++ b/hr/stch/fertig/carol/texte.ly @@ -0,0 +1,87 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + words = \lyricmode { + One seems to hear, Words of good cheer, + From ev’ -- ry -- where Fil -- ling the air + } + pound = \lyricmode { + O, how they pound, Rise -- ing their sound, + O’er hill and dale, Tell -- ing their tale, + } + ring = \lyricmode { + Gay -- ly they ring, While peo -- ple sing + song of good cheer, Christ -- mas is here! + } + song = \lyricmode { + Ding, dong, ding, dong, That is their song, + With joy -- ful ring, All car -- ol -- ign. + } + send = \lyricmode { + On, on they send, on with -- out end + their joy -- ful tone to ev’ -- ry home. + } + +% Die Textaufteilungen + + sopranText = \lyrics { + \override LyricText #'self-alignment-X = #CENTER + %<+hier den Text für den Sopran eintragen+> + Heark! how the bells, sweet sil -- ver bells, + All seem to say “Throw cares a -- way” + Christ -- mas is here Bring -- ing good cheer + To young and old, Meek and the bold, + \song + \words + \pound + \ring + Mer -- ry, mer -- ry, mer -- ry, mer -- ry Christ -- mas! + Mer -- ry, mer -- ry, mer -- ry, mer -- ry Christ -- mas! + \send + Heark! how the bells, sweet sil -- ver bells, + All seem to say “Throw cares a -- way” + dong + Ding, dong, ding, dong. + } + + altText = \lyrics { + \override LyricText #'self-alignment-X = #CENTER + %<+hier den Text für den Alt eintragen+> + Ding, dong, ding, dong, + Ding, dong, ding, dong + \words + \pound + \ring + Ding, ding, dong, + Ding, ding dong, + Ding, dong, ding, ding, dong, + dong + Ding, dong, ding, dong. + } + + tenorText = \lyrics { + \override LyricText #'self-alignment-X = #CENTER + %<+hier den Text für den Tenor eintragen+> + Ding, dong, ding, dong + \words + O, how hap -- py are their tones, + \ring + \song + Ding, dong, ding, ding, + dong, + \send + } + + bassText = \lyrics { + \override LyricText #'self-alignment-X = #CENTER + %<+hier den Text für den Baß eintragen+> + \words + \pound + \ring + Ding, dong, ding, dong, + Ding, dong, ding, ding, dong, + dong + Bohm! + } + |