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/michi | |
| parent | 646f69a657326ca8dd733dfa579a90f89823d677 (diff) | |
| download | Musik-49d14358c33b7d0ba7e7c381f91943617c7723ea.tar.xz | |
Hauke eingefügt
Diffstat (limited to 'hr/michi')
209 files changed, 21127 insertions, 0 deletions
diff --git a/hr/michi/adam/adam.ly b/hr/michi/adam/adam.ly new file mode 100644 index 0000000..1a8e121 --- /dev/null +++ b/hr/michi/adam/adam.ly @@ -0,0 +1,75 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Adam lay ybounden" + composer = "Boris Ord" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \paper { + line-width = \paper-width - 30 + top-margin = 10 + bottom-margin = 10 + ragged-last-bottom = #'f + system-count = 9 + } + + \layout { + indent = #0 + \context { + \Staff + \override VerticalAxisGroup #'minimum-Y-extent = #'(-3 . 3.5) + } + } + + #(set-global-staff-size 17) + + sop = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "soprane" { \global \voiceOne \sopranMelodie } + %\addlyrics { \sopranText } + >> + + alt = << + \new Voice = "alti" { \global \voiceTwo \altMelodie } + %\addlyrics { \altText } + >> + + ten = << + \new Voice = "tenoere" { \global \voiceOne \tenorMelodie } + %\addlyrics { \tenorText } + >> + + bas = << + \new Voice = "baesse" { \global \voiceTwo \bassMelodie } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \new Staff = frauen << \sop \alt >> + \new Lyrics = "tenors" \with { + \override VerticalAxisGroup #'staff-affinity = #DOWN + } + \new Staff = maenner << \ten \bas >> + \context Lyrics = "tenors" \lyricsto "tenoere" \tenorText + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + \layout { + } + } + diff --git a/hr/michi/adam/dynArt.ly b/hr/michi/adam/dynArt.ly new file mode 100644 index 0000000..e5650fb --- /dev/null +++ b/hr/michi/adam/dynArt.ly @@ -0,0 +1,34 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key b \minor + \time 3/4 + s2.*8 + \break + s2.*8 + \break + s2.*8 + \break + s2.*4 + \break + s2.*8 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/adam/midi.lua b/hr/michi/adam/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/adam/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/michi/adam/stimmen.ly b/hr/michi/adam/stimmen.ly new file mode 100644 index 0000000..d7130b4 --- /dev/null +++ b/hr/michi/adam/stimmen.ly @@ -0,0 +1,57 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + b4. b8 a8[ b8] fis4 fis2 b4. d8 cis8[ b8] fis2. d'4 cis4 d4 b4 b2 a8[ a8] b4 gis4 fis2. fis2 fis8[ b8] a4 a4. a8 d4. d8 a8[ b8] a2 r4 a4 a4 b4 a8([ g8)] g2 fis8[ fis8] g4 b4 fis2. d'4 d8[ d8] cis8[ d8] a8[ a8] a4. a8 d4. fis8 e8[ d8] b2. e8[ e8] d8[ d8] e4 a,4 a4. b8 cis4 d8[ e8] fis4 e2. d4 d4 cis8[ b8] a2 a4 fis'4. fis8 e8[ d8] e2. e4. e8 fis8[ d8] e4 e4 e8[ fis8] g4.( fis8 d8[ e8] fis4. e8 cis8)[ d8] e4 fis4 d4 b4.( a8 b8[ d8] cis4.) b8( a4) b2. + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + fis4 fis4 e8[ d8] cis4 cis2 d4 fis4 e8[ d8] d4( cis2) fis4 fis8([ e8)] a4 a2 g4 fis8[ fis8] fis4 e8([ d8)] cis2. d2 cis8[ b8] cis4 cis4. fis8 g4. fis8 e8[ d8] cis2 r4 fis4 fis8([ e8)] fis4 e4 d2 d8[ d8] d4 e4 cis2. fis4 fis8[ g8] a8[ fis8] e8[ e8] e4 fis4 fis4 fis4 g8[ a8] a4( g2) g8[ g8] fis8[ fis8] e4 d4 fis4 fis4 a4 a8[ a8] fis4 a2. d4 d4 cis8[ b8] a2 a4 a4 a4 a8[ gis8] a2. gis4 a4 a8[ fis8] a4 a4 g8[ a8] b4.( a8 fis8)[ g8] a2 a8[ fis8] b4( a4) a4 a4 g4. g8 g2 fis4 dis2. + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + d4 d4 cis8[ b8] b4 ais2 b4 fis4 g8[ g8] b4( ais2) a4 a4 d4 d2 e4 cis8[ cis8] d4 b4 b4( ais4.) fis8 b4. b8 a8[ b8] fis4 fis4. fis8 b4. d8 cis8[ b8] fis2 r4 d'4 cis4 d4 b4 b2 a8[ a8] b4 g4 fis2. a4 d8[ d8] a8[ a8] d8[ d8] cis4 cis4 b4 b4 b8[ a8] d2. b8[ b8] d8[ cis8] b8([ cis8)] d4 cis4 d4 e4 d8[ d8] a8([ b8)] cis2. d4 d4 cis8[ b8] a2 e'4 d4 d4 e8[ e8] cis2. b4 cis4 d8[ d8] d4 cis4 c8[ c8] d2 b4 d4. cis8( a8)[ b8] b8([ cis8] d4.) a8 b8([ cis8)] d4. b8 e4( d4) cis4 b2. + } + >> + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + b4 d,4 e8[ e8] fis4 fis2 b4 d,4 e8[ e8] fis2. d4 a'4 fis4 g2 e4 fis8[ fis8] d4 e4 fis2. R2. R2. R2. R2. d4 a'4 d,4 e4 g2 d8[ d8] b4 e4 fis2. d4 d8[ e8] fis8[ fis8] a8[ a8] a4 fis4 b4 d,4 e8[ fis8] g2. e8[ e8] b'8[ a8] g4 fis4 fis4 d4 a'4 fis8[ fis8] d4 a'2. d4 d4 cis8[ b8] a2 cis4 d4 d4 cis8[ b8] a2. e4 a4 d,8[ b'8] a4 a4 c8[ c8] g8([ a8] b4. g8 d8[ e8] fis4.) b8 g4 d8([ e8)] fis4 g2( fis4 e2) fis4 <fis b,>2. + } + >> + } + diff --git a/hr/michi/adam/stimmen_.ly b/hr/michi/adam/stimmen_.ly new file mode 100644 index 0000000..def71e9 --- /dev/null +++ b/hr/michi/adam/stimmen_.ly @@ -0,0 +1,197 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + b4. b8 a8[ b8] + fis4 fis2 + b4. d8 cis8[ b8] + fis2. + d'4 cis4 d4 + b4 b2 + a8[ a8] b4 gis4 + fis2. + fis2 fis8[ b8] + a4 a4. a8 + d4. d8 a8[ b8] + a2 r4 + a4 a4 b4 + a8([ g8)] g2 + fis8[ fis8] g4 b4 + fis2. + d'4 d8[ d8] cis8[ d8] + a8[ a8] a4. a8 + d4. fis8 e8[ d8] + b2. + e8[ e8] d8[ d8] e4 + a,4 a4. b8 + cis4 d8[ e8] fis4 + e2. + d4 d4 cis8[ b8] + a2 a4 + fis'4. fis8 e8[ d8] + e2. + e4. e8 fis8[ d8] + e4 e4 e8[ fis8] + g4.( fis8 d8[ e8] + fis4. e8 cis8)[ d8] + e4 fis4 d4 + b4.( a8 b8[ d8] + cis4.) b8( a4) + b2. + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + fis4 fis4 e8[ d8] + cis4 cis2 + d4 fis4 e8[ d8] + d4( cis2) + fis4 fis8([ e8)] a4 + a2 g4 + fis8[ fis8] fis4 e8([ d8)] + cis2. + d2 cis8[ b8] + cis4 cis4. fis8 + g4. fis8 e8[ d8] + cis2 r4 + fis4 fis8([ e8)] fis4 + e4 d2 + d8[ d8] d4 e4 + cis2. + fis4 fis8[ g8] a8[ fis8] + e8[ e8] e4 fis4 + fis4 fis4 g8[ a8] + a4( g2) + g8[ g8] fis8[ fis8] e4 + d4 fis4 fis4 + a4 a8[ a8] fis4 + a2. + d4 d4 cis8[ b8] + a2 a4 + a4 a4 a8[ gis8] + a2. + gis4 a4 a8[ fis8] + a4 a4 g8[ a8] + b4.( a8 fis8)[ g8] + a2 a8[ fis8] + b4( a4) a4 + a4 g4. g8 + g2 fis4 + dis2. + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + d4 d4 cis8[ b8] + b4 ais2 + b4 fis4 g8[ g8] + b4( ais2) + a4 a4 d4 + d2 e4 + cis8[ cis8] d4 b4 + b4( ais4.) fis8 + b4. b8 a8[ b8] + fis4 fis4. fis8 + b4. d8 cis8[ b8] + fis2 r4 + d'4 cis4 d4 + b4 b2 + a8[ a8] b4 g4 + fis2. + a4 d8[ d8] a8[ a8] + d8[ d8] cis4 cis4 + b4 b4 b8[ a8] + d2. + b8[ b8] d8[ cis8] b8([ cis8)] + d4 cis4 d4 + e4 d8[ d8] a8([ b8)] + cis2. + d4 d4 cis8[ b8] + a2 e'4 + d4 d4 e8[ e8] + cis2. + b4 cis4 d8[ d8] + d4 cis4 c8[ c8] + d2 b4 + d4. cis8( a8)[ b8] + b8([ cis8] d4.) a8 + b8([ cis8)] d4. b8 + e4( d4) cis4 + b2. + } + >> + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + b4 d,4 e8[ e8] + fis4 fis2 + b4 d,4 e8[ e8] + fis2. + d4 a'4 fis4 + g2 e4 + fis8[ fis8] d4 e4 + fis2. + R2. + R2. + R2. + R2. + d4 a'4 d,4 + e4 g2 + d8[ d8] b4 e4 + fis2. + d4 d8[ e8] fis8[ fis8] + a8[ a8] a4 fis4 + b4 d,4 e8[ fis8] + g2. + e8[ e8] b'8[ a8] g4 + fis4 fis4 d4 + a'4 fis8[ fis8] d4 + a'2. + d4 d4 cis8[ b8] + a2 cis4 + d4 d4 cis8[ b8] + a2. + e4 a4 d,8[ b'8] + a4 a4 c8[ c8] + g8([ a8] b4. g8 + d8[ e8] fis4.) b8 + g4 d8([ e8)] fis4 + g2( fis4 + e2) fis4 + <fis b,>2. + } + >> + } + diff --git a/hr/michi/adam/texte.ly b/hr/michi/adam/texte.ly new file mode 100644 index 0000000..4e811af --- /dev/null +++ b/hr/michi/adam/texte.ly @@ -0,0 +1,40 @@ +%some settings% vim: ai sw=2 lbr nu 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 = \lyricmode { + %<+hier den Text für den Tenor eintragen+> + Ad -- am lay y -- bound -- en, + Bound -- en in a bond; + Four thou -- sand win -- ter + Thought he not too long. + And all was for an ap -- ple, + An ap -- ple that he took, + As clerk -- ès find -- en writ -- ten + In their book. + Ne had the ap -- ple tak -- en been, + The ap -- ple tak -- en been, + Ne had ne -- ver our man -- kind so keen + Free -- dom a -- seen. + Bless -- ed be the time + That free -- dom tak -- en was, + There -- fore we moun sing -- en, + De -- o gra -- ci -- as, + De -- o gra -- ci -- as, + De -- o gra -- ci -- as! + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/bluebird/bluebird.ly b/hr/michi/bluebird/bluebird.ly new file mode 100644 index 0000000..e869376 --- /dev/null +++ b/hr/michi/bluebird/bluebird.ly @@ -0,0 +1,73 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "The Blue Bird" + composer = "Charles Villiers Stanford" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + sop = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "soprane" { \global \sopranMelodie } + %\addlyrics { \sopranText } + >> + + alt = << + \new Voice = "altiI" { \global \voiceOne \altIMelodie } + \new Voice = "altiII" { \global \voiceTwo \altIIMelodie } + %\addlyrics { \altText } + >> + + ten = << + \new Voice = "tenoere" { \global \tenorMelodie } + \addlyrics { \tenorText } + >> + + bas = << + \new Voice = "baesse" { \global \bassMelodie } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \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/michi/bluebird/dynArt.ly b/hr/michi/bluebird/dynArt.ly new file mode 100644 index 0000000..38b59bf --- /dev/null +++ b/hr/michi/bluebird/dynArt.ly @@ -0,0 +1,27 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key ges \major + \time 4/4 + s4 + s1*44 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/bluebird/midi.lua b/hr/michi/bluebird/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/bluebird/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/michi/bluebird/stimmen.ly b/hr/michi/bluebird/stimmen.ly new file mode 100644 index 0000000..1bfb873 --- /dev/null +++ b/hr/michi/bluebird/stimmen.ly @@ -0,0 +1,85 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + \partial 4 + } + +% Die Stimmen + + four = \relative c'' { + r1 + r1 + r1 + ees1 + } + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + r4 + \four \four + r1 + aes4 aes4 r4 aes8 bes8 ces2 r8 bes8 aes8 bes8 aes8 f8 des8 f8 aes4 des4 des2. r4 r4 r8 des8 ges2 ~ ges2 ces,2 ces4( bes4 ees4 des4 aes'4 ges2) aes,4 ees'2. des4 des1 ~ des4 r4 r2 + \four \four + r1 + r4 r8 aes8 ces8 ces8 r4 des,4. f8 aes4 des4 des2. r4 r4 r8 des8 ges2 ~ ges2 ces,2 ces4 bes4 ees4 des4 aes'4 ges2 aes,4 ees'4 des2. ees2. aes,4 des1 ~ des1 + \four + } + >> + } + + altIMelodie = \relative c'' { + << + { \meta } + %\altArt + %the actual tune + { + bes4 + aes2. bes4 aes2 ~ aes4. bes8( aes8 bes8) ces2. ~ ces2. ges4 f2. ges4 f2 ~ f4. ges8( f8 ges8) aes2. ~ aes2 r4 r8 ees8( d8 ees8) f2. ~ f2 ees2 des1 ~ des1 des2. des4 ges2. ges4 ges2. aes4 aes4( bes2) aes4 aes4( ges4) ges2 ges2 f2 ges1 ~ ges4 r4 r4 bes4 aes2. bes4 aes2 ~ aes4. bes8 aes8 bes8 ces2. ~ ces2. ges4 f2. ges4 f2. ges4 f8 ges8 aes2. ~ aes2 r4 ees4 d2. ees4 ees2 des2 ~ des1 des2. des4 ges2. ges4 ges2. aes4 aes4( bes2) aes4 aes4( ges4) ges2 ~ ges4 aes4 ces4 bes4 ges2 f2 ges1 r2 r4 bes4 aes2. bes4 aes2 ~ aes4 r8 bes8( aes8 bes8) ces2. ~ ces2. r4 + } + >> + } + altIIMelodie = \relative c'' { + << + { \meta } + %\altArt + %the actual tune + { + ges4 + ges2. ges4 ges2 ~ ges4. ges8 ges8 ges8 ges2. ~ ges2. ees4 ees2. ees4 ees2 ~ ees4. ees8 ees8 ees8 ees2. ~ ees2 r4 r8 ces8 ces8 ces8 ces2. ~ ces2 ces2 ces1 ~ ces1 ces4( bes2) bes4 des2. des4 des4( ees2) ges4 ges2. f4 f4( ges4) ges2 f4( ees4) f2 des1 ~ des4 r4 r4 ges4 ges2. ges4 ges2 ~ ges4. ges8 ges8 ges8 ges2. ~ ges2. ees4 ees2. ees4 ees2. ees4 ees8 ees8 ees2. ~ ees2 r4 ces4 ces2. ces4 ces1 ~ ces1 ces4( bes2) bes4 des2. des4 des4( ees2) ges4 ges2. f4 f4( ges4) ges2 ~ ges4 ges4 ges4 ges4 f4( ees4) ees4( des4) des1 r2 r4 ges4 ges2. ges4 ges2 ~ ges4 r8 ges8 ges8 ges8 ges2. ~ ges2. r4 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + des4 + ces2. des4 ees2 ~ ees4. ees8( ees8 des8) ces2. ~ ces2. bes4 aes2. bes4 aes2 ~ aes4. bes8( ces8 bes8) aes2. ~ aes2 r4 r8 ges8( f8 ees8) d2. ~ d2 aes'2 aes1 ~ aes1 ges2. ges4 bes2. bes4 bes4( ces2) ces4 ces4( des4 ees4) aes,4 des2 ees2 ces2 ces2 bes1 ~ bes4 r4 r4 des4 ces2. des4 ees2 ~ ees4. ees8 ees8 des8 ces2. ~ ces2. bes4 ces2. bes4 aes2. bes4 ces8 bes8 aes2. ~ aes2 r4 ges4 f2. ges4 aes1 ~ aes1 ges2. ges4 bes2. bes4 bes4( ces2) ces4 ces4( des4 ees4) aes,4 des2 ces2 ~ ces4 ces4 ees4 des4 ces2 ces2 ces2( bes2) r2 r4 ces4 ces2. des4 ees2 ~ ees4 r8 ees8( ees8 des8) ces2. ~ ces2. r4 + } + >> + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + ges4 + ees2. des4 ces2 ~ ces4. bes8( ces8 bes8) aes2. ~ aes2. bes4 ces2. des4 ces2 ~ ces4. bes8( aes8 ges8) f2. ~ f2 r4 r8 ges8( aes8 aes8) aes2. ~ aes2 ges2 f1 ~ f1 fes2. fes'4 ees2. ees4 aes,2. ees'4 des2 ces2 bes2 ces2 aes2 des2 ges,1 ~ ges4 r4 r4 ges'4 ees2. ges4 ces2 ~ ces4. bes8 ces8 bes8 aes2. ~ aes2. bes4 aes2. des,4 ces2. bes4 aes8 ges8 f2. ~ f2 r4 ges4 aes2. ges4 f1 ~ f1 fes2. fes4 fes'2. fes4 ees2 aes,2 des2 ces2 bes2 ees2 des1 ~ des2 des2 fes1 r2 r4 fes4 ees2. des4 ces2 ~ ces4 r8 bes8( ces8 bes8) aes2. ~ aes2. r4 + } + >> + } + diff --git a/hr/michi/bluebird/stimmen_.ly b/hr/michi/bluebird/stimmen_.ly new file mode 100644 index 0000000..6ae56af --- /dev/null +++ b/hr/michi/bluebird/stimmen_.ly @@ -0,0 +1,277 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + \partial 4 + } + +% Die Stimmen + + four = \relative c'' { + r1 + r1 + r1 + ees1 + } + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + r4 + \four \four + r1 + aes4 aes4 r4 aes8 bes8 + ces2 r8 bes8 aes8 bes8 + aes8 f8 des8 f8 aes4 des4 + des2. r4 + r4 r8 des8 ges2 ~ + ges2 ces,2 + ces4( bes4 ees4 des4 + aes'4 ges2) aes,4 + ees'2. des4 + des1 ~ + des4 r4 r2 + \four \four + r1 + r4 r8 aes8 ces8 ces8 r4 + des,4. f8 aes4 des4 + des2. r4 + r4 r8 des8 ges2 ~ + ges2 ces,2 + ces4 bes4 ees4 des4 + aes'4 ges2 aes,4 + ees'4 des2. + ees2. aes,4 + des1 ~ + des1 + \four + } + >> + } + + altIMelodie = \relative c'' { + << + { \meta } + %\altArt + %the actual tune + { + bes4 + aes2. bes4 + aes2 ~ aes4. bes8( + aes8 bes8) ces2. ~ + ces2. ges4 + f2. ges4 + f2 ~ f4. ges8( + f8 ges8) aes2. ~ + aes2 r4 r8 ees8( + d8 ees8) f2. ~ + f2 ees2 + des1 ~ + des1 + des2. des4 + ges2. ges4 + ges2. aes4 + aes4( bes2) aes4 + aes4( ges4) ges2 + ges2 f2 + ges1 ~ + ges4 r4 r4 bes4 + aes2. bes4 + aes2 ~ aes4. bes8 + aes8 bes8 ces2. ~ + ces2. ges4 + f2. ges4 + f2. ges4 + f8 ges8 aes2. ~ + aes2 r4 ees4 + d2. ees4 + ees2 des2 ~ + des1 + des2. des4 + ges2. ges4 + ges2. aes4 + aes4( bes2) aes4 + aes4( ges4) ges2 ~ + ges4 aes4 ces4 bes4 + ges2 f2 + ges1 + r2 r4 bes4 + aes2. bes4 + aes2 ~ aes4 r8 bes8( + aes8 bes8) ces2. ~ + ces2. r4 + } + >> + } + altIIMelodie = \relative c'' { + << + { \meta } + %\altArt + %the actual tune + { + ges4 + ges2. ges4 + ges2 ~ ges4. ges8 + ges8 ges8 ges2. ~ + ges2. ees4 + ees2. ees4 + ees2 ~ ees4. ees8 + ees8 ees8 ees2. ~ + ees2 r4 r8 ces8 + ces8 ces8 ces2. ~ + ces2 ces2 + ces1 ~ + ces1 + ces4( bes2) bes4 + des2. des4 + des4( ees2) ges4 + ges2. f4 + f4( ges4) ges2 + f4( ees4) f2 + des1 ~ + des4 r4 r4 ges4 + ges2. ges4 + ges2 ~ ges4. ges8 + ges8 ges8 ges2. ~ + ges2. ees4 + ees2. ees4 + ees2. ees4 + ees8 ees8 ees2. ~ + ees2 r4 ces4 + ces2. ces4 + ces1 ~ + ces1 + ces4( bes2) bes4 + des2. des4 + des4( ees2) ges4 + ges2. f4 + f4( ges4) ges2 ~ + ges4 ges4 ges4 ges4 + f4( ees4) ees4( des4) + des1 + r2 r4 ges4 + ges2. ges4 + ges2 ~ ges4 r8 ges8 + ges8 ges8 ges2. ~ + ges2. r4 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + des4 + ces2. des4 + ees2 ~ ees4. ees8( + ees8 des8) ces2. ~ + ces2. bes4 + aes2. bes4 + aes2 ~ aes4. bes8( + ces8 bes8) aes2. ~ + aes2 r4 r8 ges8( + f8 ees8) d2. ~ + d2 aes'2 + aes1 ~ + aes1 + ges2. ges4 + bes2. bes4 + bes4( ces2) ces4 + ces4( des4 ees4) aes,4 + des2 ees2 + ces2 ces2 + bes1 ~ + bes4 r4 r4 des4 + ces2. des4 + ees2 ~ ees4. ees8 + ees8 des8 ces2. ~ + ces2. bes4 + ces2. bes4 + aes2. bes4 + ces8 bes8 aes2. ~ + aes2 r4 ges4 + f2. ges4 + aes1 ~ + aes1 + ges2. ges4 + bes2. bes4 + bes4( ces2) ces4 + ces4( des4 ees4) aes,4 + des2 ces2 ~ + ces4 ces4 ees4 des4 + ces2 ces2 + ces2( bes2) + r2 r4 ces4 + ces2. des4 + ees2 ~ ees4 r8 ees8( + ees8 des8) ces2. ~ + ces2. r4 + } + >> + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + ges4 + ees2. des4 + ces2 ~ ces4. bes8( + ces8 bes8) aes2. ~ + aes2. bes4 + ces2. des4 + ces2 ~ ces4. bes8( + aes8 ges8) f2. ~ + f2 r4 r8 ges8( + aes8 aes8) aes2. ~ + aes2 ges2 + f1 ~ + f1 + fes2. fes'4 + ees2. ees4 + aes,2. ees'4 + des2 ces2 + bes2 ces2 + aes2 des2 + ges,1 ~ + ges4 r4 r4 ges'4 + ees2. ges4 + ces2 ~ ces4. bes8 + ces8 bes8 aes2. ~ + aes2. bes4 + aes2. des,4 + ces2. bes4 + aes8 ges8 f2. ~ + f2 r4 ges4 + aes2. ges4 + f1 ~ + f1 + fes2. fes4 + fes'2. fes4 + ees2 aes,2 + des2 ces2 + bes2 ees2 + des1 ~ + des2 des2 + fes1 + r2 r4 fes4 + ees2. des4 + ces2 ~ ces4 r8 bes8( + ces8 bes8) aes2. ~ + aes2. r4 + } + >> + } + diff --git a/hr/michi/bluebird/texte.ly b/hr/michi/bluebird/texte.ly new file mode 100644 index 0000000..28b95d8 --- /dev/null +++ b/hr/michi/bluebird/texte.ly @@ -0,0 +1,43 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + } + + below = \lyricmode { + The lake lay + \set ignoreMelismata = ##t + blue + be_-_low_the + \unset ignoreMelismata + } + + tenorText = \lyrics { + %<+hier den Text für den Tenor eintragen+> + \below hill, + \below hill, + be_-_low_the hill, + lay blue, + Cold and still, + there flew a bird whose wings were pa -- lest blue. + The sky a -- bove was blue at last, + The sky be -- neath me blue in blue, + was blue in blue, + blue in blue, + It caught, it caught his im -- age, + his im -- age as he flew. + \below hill. + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/bogoroditse/bogoroditse.ly b/hr/michi/bogoroditse/bogoroditse.ly new file mode 100644 index 0000000..80faeae --- /dev/null +++ b/hr/michi/bogoroditse/bogoroditse.ly @@ -0,0 +1,72 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Bogoroditse Devo" + composer = "Sergei Rachmaninov" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 15) + + 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 } << + \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/michi/bogoroditse/dynArt.ly b/hr/michi/bogoroditse/dynArt.ly new file mode 100644 index 0000000..855181e --- /dev/null +++ b/hr/michi/bogoroditse/dynArt.ly @@ -0,0 +1,36 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key f \major + \time 4/4 + \partial 2 + s2 + s1*8 + \break + s1*9 + \break + s1*1 + \time 6/4 + s1.*6 + \time 4/4 + s1*3 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/bogoroditse/midi.lua b/hr/michi/bogoroditse/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/bogoroditse/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/michi/bogoroditse/stimmen.ly b/hr/michi/bogoroditse/stimmen.ly new file mode 100644 index 0000000..116b8f5 --- /dev/null +++ b/hr/michi/bogoroditse/stimmen.ly @@ -0,0 +1,137 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + oben = \relative c'' { + c4 a4( c2 e4 d1) d2 d4( c8 bes8) c4( d2) c4 d8( e8 <f d>4) + << + { + \voiceOne + g1 f4( e4) f4( e4) d8( f8 e2) d4 + } + \new Voice { + \voiceTwo + e1 d4 c4 d4 c4 d4 c2 bes4 + } + >> + } + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + a4 a4 a4.( g8) f4 a4 g4.( f8) g2 a8( g8 f8 a8 g8 f8) g4 a2 + a4 g8( a8) bes4( a4 g4) f8( a8) g2( ~ g8 e8) f8( g8) a8( g8 f8 a8 g8 f8 g4) a2 + a2 a2. g4 a1( ~ a2. g4 a8 g8 f8 a8 g8 f8 g4 a1) + c2. a8( bes8) c4( d2) + \oben + c1 c2 c1 c2 c4. r8 + a4( g4) f4( a4) g2( f2) g1 f1 + } + >> + } + + unten = \relative c'' { + a8( bes8 c4.) c8 c8( bes8 a8 c8 bes8 a8) bes4 ~ bes4 bes8 bes8 bes8( a8 g8 bes8 a8 f8 + } + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + f4 f4 f4.( e8) d4 f4 e4.( d8) e2 + f8( e8 d8 f8 ~ f8 d8) e4 f2 + f4 f4 f2. d8( e8) f4( e4 d8 c8) d8( e8) f8( e8 d8 f8 ~ f8 d8 e4) f2 + f2 e4.( f8 e4) d4 c4.( d8 c4 bes4 c4 d2 e4 f8 e8 d8 f8 ~ f8 d8 e4) f4 + << + { + a4 a4 a4 a8( g8 f8 a8 g8 f8 g4) a2 a8( g8 f8 a8) g8( f8 g4) a2 ~ a4 g8( a8) bes4 bes8 bes8 bes8( a8 g8 bes8) a8( g8) a4 a4 g8( a8) bes8( a8) g8( bes8) a8( g8) + } + { + f4 f4 f4 f8( e8 d8 f8 e8 d8 e4) f2 f8( e8 d8 f8) e8( d8 e4) f2 ~ f4 e8( f8) g4 g8 g8 g8( f8 e8 g8) f8( e8) f4 f4 e8( f8) g8( f8) e8( g8) f8 + } + >> + \unten + g4 a4) a8 a8 a8( g8) f8( a8) g8( f8) g4 a2( ~ a8 g8 f8 a8 g8 f8 g4 a4.) r8 + f4( e4) d4( e4) d2( c2) bes1 a1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + c4 c4 c2 a4 c4 c4.( a8) c2 c4( a8 c8 d8 a8) c4 c2 + c4 c4 d4( c4 bes4) a4 bes4( a4 g8 a8) bes4 a4.( c8 d8 a8 c4) c2 + c2 a2. g4 e4.( f8 e4 d4 e4. f8 g8 a8 bes4 c4 a8 c8 d8 a8 c4) c1 + c2. a8 bes8( c4 d2) + \transpose g g, \oben + << + { + \voiceOne + f4( e4) d4( c4) + } + \new Voice { + \voiceTwo + c2 c8( bes8 a4) + } + >> + \oneVoice + bes8( a8) bes4 c4 c8 c8 c8( bes8) a8( c8) bes8( a8) bes4 c4. r8 + << + { + \voiceOne + c2 a2 + } + \new Voice { + \voiceTwo + a4( g4) a2 + } + >> + \oneVoice + g2( f4 e4) d2. c4 f1 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + f4 f4 f4.( c8) d4 a4 c4.( d8) c2 f8( c8 d8 a8 bes8 d8) c4 f2 + f4 e4 d2. c4 d4( c4 bes8 a8) g4 d'4.( a8 bes8 d8 c4) f2 + f4( d4) c4.( d8 c4) bes4 a2.( g4 a4 bes2 c4 f8 c8 d8 a8 bes8 d8 c4) f1 + r1 r1 r1 r1 r1 r1 r4 + \transpose a a, \unten + %a8( bes8 c4.) c8 c8( bes8 a8 c8 bes8 a8) bes4 ~ bes4 bes8 bes8 bes8( a8 g8 bes8 a8 f8 + g4) a4( g4) f4( e4) d4 c4 + << + { + f4( e4 d4 e4) d4( c4) + } \\ + { + f,1 f2 + } + >> + f'4. r8 + f4( e4) d4( c4) bes2( a2) g2. c4 <c f,>1 + } + >> + } + diff --git a/hr/michi/bogoroditse/texte.ly b/hr/michi/bogoroditse/texte.ly new file mode 100644 index 0000000..a46aa97 --- /dev/null +++ b/hr/michi/bogoroditse/texte.ly @@ -0,0 +1,31 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + Bo -- go -- ro -- di -- tse De -- vo, + ra -- dui -- sya, + Bla -- go -- dat -- na -- ya Ma -- ri -- e, + Go -- spod sTo -- bo -- yu, + Bo -- go -- ro -- di -- tse De -- vo, + ra -- dui -- sya, + ra -- dui -- sia, ya -- ko Spa -- sa ro -- di -- la, + ya -- ko Spa -- sa ro -- di -- la + e -- si dush na -- _ shikh. + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/cantate/Cantate Domino in D.PDF b/hr/michi/cantate/Cantate Domino in D.PDF Binary files differnew file mode 100644 index 0000000..210810e --- /dev/null +++ b/hr/michi/cantate/Cantate Domino in D.PDF diff --git a/hr/michi/cantate/cantate.ly b/hr/michi/cantate/cantate.ly new file mode 100644 index 0000000..150a96b --- /dev/null +++ b/hr/michi/cantate/cantate.ly @@ -0,0 +1,88 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Cantate Domino" + composer = "Jan Pieterszoon Sweelinck" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + sopI = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "sopraneI" \with { + \remove Forbid_line_break_engraver + } { \global \sopranIMelodie } + >> + sopII = << + \new Voice = "sopraneII" \with { + \remove Forbid_line_break_engraver + } { \global \sopranIIMelodie } + %\addlyrics { \sopranText } + >> + + alt = << + \new Voice = "alti" \with { + \remove Forbid_line_break_engraver + } { \global \altMelodie } + %\addlyrics { \altText } + >> + + ten = << + \new Voice = "tenoere" \with { + \remove Forbid_line_break_engraver + } { \global \autoBeamOff \tenorMelodie } + \addlyrics { \tenorText } + >> + + bas = << + \new Voice = "baesse" \with { + \remove Forbid_line_break_engraver + } { \global \bassMelodie } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { + \remove Bar_engraver + printPartCombineTexts = ##f } << + \new Staff = sopranA { \sopI } + \new Staff = sopranB { \sopII } + \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/michi/cantate/dynArt.ly b/hr/michi/cantate/dynArt.ly new file mode 100644 index 0000000..4873e92 --- /dev/null +++ b/hr/michi/cantate/dynArt.ly @@ -0,0 +1,22 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + \dynamicUp + %\autoBeamOff + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/cantate/midi.lua b/hr/michi/cantate/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/cantate/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/michi/cantate/stimmen.ly b/hr/michi/cantate/stimmen.ly new file mode 100644 index 0000000..c965f4f --- /dev/null +++ b/hr/michi/cantate/stimmen.ly @@ -0,0 +1,362 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \key c \major + %\override Staff.TimeSignature #'style = #'() + \time 4/2 + %\autoBeamOff + } + +% Die Stimmen + + sopranIMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + r4 g4 g8 a8 b8 c8 b8 c8 d8 e8 d4. c8 + b2 g2 r4 b2 d4 + a2 a8 a8 a4 b4 b4 e8 d8 e4 + d4 b4 c8 b8 c4 b4 g4 d'8 c8 d4 + b4 g4 r4 d'4. c8 d4 b2 + g2 r4 g4 d'2 d2 + e2. d4 d1 + r1 b8 a8 b4 g4 g4 + b8 a8 b4 g4 g4 b8 a8 b4 a4 a4 + d,4 d8 d8 a'2 fis1 + r4 d4 d'4. c16 b16 a4 g4 fis4 g4 + a4 a4 b4. a16 g16 a4 c4 d4 e4 + d2 c1 c2 + b1. b2 + a2. c4 a4 b8 c8 d2 + b1 r1 + r4 g4 g2 g1 + r2 d'2 c8 d8 e8 d8 c4 b8 a8 + b4 d4 d4 cis4 d2 r2 + r2 e2 d8 e8 f8 e8 c4 cis8 b8 + cis4 d4 d4 cis4 d2 r4 d4 + d2 d4 d2 c4 b4 b4. + b8 c4 d2 e4 e4. e8 d4 + d2 cis4 cis4 d2 e4 d2 + cis4 d2 r1 + b4. b8 c2 d2 e2 + r1 c2 c4 c4 + a2 g2 r1 + r2 r4 c4 c2 c4 b4 + b2 a2 r4 c2 c4 + b4 e4 a,2 b4 d2 cis4 + cis4 d4 b2 c4 g4 g4 g4 + f2 e4 c'4 c4 c4 b2 + a4 a4 a4 a4 f2 e4 e'2 + d4 e2 d2 r4 d2 + d4 d2 c2. b8 a8 + b2 r4 c2 c4 c2 + a4 a8 g8 a2 b4 c4 d4 c4 + b4 a4 g4 f4 e4 d4 c4 d4 + e2 a4 b4 c4 a4 d2. + cis8 b8 cis2 d2 r4 d4 + e4. d8 c4 b2 a4 a2 + R1*2 + r4 b4 c4 a4. g8 fis4 g2 + e4 e'2 f4 d4. c8 b4 c4. + d8 c4 a4 d2 b4 g4. f8 + e4 e4 fis4 d'4 b4 c4. d8 e4 + d1 b2 r4 b4 + c4. c8 c4 c2 b4 b2 + r4 b4 c4. d8 e4 d2 d4 + d2 d2 e4 c4. b8 a4 + d2 g,2 r1 + r4 d'4 e4 c4. b8 a4 r4 fis4 + g4 e4. d8 e4 fis2 g2 + r4 b4 c4 a4. g8 fis4 g4. a16 b16 + c4. b8 a4 g2 fis8 e8 fis2 + g2 r4 d'4 e4 c4. d8 e4 + d2 b4 b4 c4 e4. d8 c4 + b8 a8 b8 c8 d2 b1 + \bar "|." + } + >> + } + + sopranIIMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + r2 r4 g4 g8 a8 b8 c8 b8 c8 d8 e8 + d4. c8 b2 g4 g2 g4 + fis2 fis8 e8 fis4 g4 g4 c8 b8 c4 + b4 g4 e'8 d8 e4 d4 b4 r2 + g8 fis8 g4 fis2 g4. f16 e16 d2 + r4 g4 g1 g2 + g2. b4 a1 + b8 a8 b4 a4 a4 d8 d8 d4 e4 e4 + r1 d8 d8 d4 f4 f4 + d4 d8 d8 cis2 d2 r4 a4 + d4. c16 b16 a4 g4 fis4 g4 a4 b8 c8 + d1 r1 + r2 e1 e2 + e1 d1 + d2. e4 d1 + d2 g,2 g2 g2 + r2 r4 d4 e8 d8 c8 d8 e8 f8 g2 + e4 d4 g4 g1 + r2 a2 f8 e8 d8 e8 f8 g8 a2 + f4 e4 a4 a2 r4 a4 + a4 g4 a4 a4 fis2 r4 fis4 + g2 a4 g2 e4 g2 + r1 g4. g8 a4 a2 + gis4 a4 e4 f2 e4 fis2 + g4 a4 b4. b8 c4 d2 + e4 e4. e8 a,4 b2 c4 c4 + c4 c4 a2 g4 g4 g4 g4 + f2 e4 e'4 e2 e4 d4 + d2 c2 r1 + r1 a2. g4 + g4 a4 fis2 g4 b2 a4 + a4 d,4 d'2 g,4 c4 c4 c4 + a2 g2 r4 g4 g4 g4 + f2 e2 r2 a2 + fis4 a4. e8 g4 g1 + r2 r4 a2 a4 a2 + g1 r4 g2 g4 + g4 fis8 e8 fis2 g1 + r1 a4 b4 c4 b4 + a4 g4 f4 e4 a2 g4 f4 + e4 fis8 g8 a2 fis2 r4 a4 + c4. d8 e4 d2 d4 d2 + d2 e4 c4. b8 a4 d2 + b2 r2 r2 r4 d4 + e4 c4. b8 a4 r4 fis4 g4 e4. + d8 e4 fis2 g2 r4 b4 + c4 a4. g8 fis4 g4. a16 b16 c4. b8 + a4 g2 fis4 g2 r4 d4 + f4. g8 a4 g2 g4 g2 + r4 d'4 e4. d8 c4 b2 a4 + a2 r2 r1 + r2 r4 b4 c4 a4. g8 fis4 + g2 e4 e'2 f4 d4. c8 + b4 c4. d8 c4 a4 d2 b4 + g4. f8 e4 e4 fis4 d'4 b4 c4. + d8 e4 d2. a4 d2 + b2 r4 b4 c4 e4. d8 c4 + b2 g2 g1 + s1*2 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + g1 g'1 + g1 e2. b4 + d2 d8 cis8 d4 b4 g4 r2 + g'8 fis8 g4 e4 c4 g'8 fis8 g4 f4 d4 + e8 d8 e4 d2 b2 r4 g4 + g8 a8 b8 c8 b8 c8 d8 e8 d4. c8 b2 + g2 g'4 g4 fis1 + g8 fis8 g4 fis4 fis4 r1 + d8 d8 d4 e4 e4 r4 d4. e8 f4 + g8 fis8 g4 e2 d2 r2 + r2 r4 d4 d4. c16 b16 a4 g4 + g4 fis4 g4 g'4 fis4 g4 g4 g4 + fis2 a1 g2 + g1 g1 + fis2. g4 fis4 g2 fis4 + g2 r4 d4 e8 d8 c8 d8 e8 f8 g2 + e4 d4 g,4 g2 g2 + g2 g4 d'4 e8 f8 g8 f8 e4 d8 c8 + d4 d4 e4 a,4 a2 a2 + a2 a4 e'4 f8 g8 a8 g8 f4 e8 d8 + e4 d4 e4 e4 a1 + r1 r2 r4 g4. + g8 a4 f2 e4 e4. e8 f4 + d2 e4 a4 a2 a4 a2 + g4 fis4 g4. g8 e4 a2 + gis2 r2 r2 g2 + g4 g4 f2 e4 e4 e4 e4 + c2 c8 d8 e8 f8 g4 g4 g2 + g4 f4 f2 e2 r2 + r1 r2 a,4 e'4 + e4 e4 d2 d2 g4 e4 + e4 a4 g2 e2 e2 e2 e2 + c2 c4 e4 e4 e4 d2 + d4 d2 cis4 d2 a2 + r4 d2 cis4 d2 d4 f2 + f4 f2 e1 + r4 e2 e4 e2 + d2 d4 d4 d1. + g,2 r2 + a4 b4 c4 b4 a2. a4 + a2 a2 a2 r4 fis'4 + g4. g8 g4 g2 fis4 fis2 + r4 g2 a4 e4. e8 d4 fis4 + g4 g4 e4 f4. g8 a4 d,2 + g4 g4 a4 f4. e8 d4 g2 + c,2 r2 d2 e2 + c4. b8 a4 a'4 g4 e4. d8 c4 + f8 e8 d8 c8 d2 d2 r4 g4 + a4. g8 f4 e2 d4 d2 + r4 g4 g4. g8 g4 g2 fis4 + fis2 r4 g2 a4 f4. e8 + d4 fis4 g4 g4 e4 f4. g8 a4 + d,2 g4 g4 a4 f4. e8 d4 + g2 c,2 r2 d2 + e2 c4. b8 a4 a'4 g4 e4. + d8 c4 f8 e8 d8 c8 d1 + d2 r4 d4 g4 g4. g8 g4 + g2 d4 d4 e4 c4. d8 e4 + d4. c8 b2 d1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + \clef "treble_8" + { + R1*2 + R1*2 + R1*2 + R1*2 + r1 r4 g4 g8[ a8 b8 c8] + b8[ c8 d8 e8] d4. c8 b2 g2 + b2. d4 d1 + r2 d8 c8 d4 b4 g4 c8 b8 c4 + b4 g4 c8 b8 c4 b4 g4 d'8 c8 d4 + b4 g4 r2 r4 a4 d4. c16[ b16] + a4 g4 fis4 g4 a4 b4 d2 + d2 r4 d4 d4 e4 d4 c4 + a2 a4 b4 c4 d4 e2. + d8[ c8] b2. c4 d2. + c8[ b8] a2. g4 a2 + g2 r4 g4 c8[ d8 e8 d8] c4 b8[ a8] + b4 c4 c4 b4 c2 c4 d2 + g,4 r4 g4 e8[ d8 c8 d8] e8[ f8] g2 + f4 e4 e4 d2 d'4 e2 + a,4 r4 a4 f8[ e8 d8 e8] f8[ g8] a2 + bes4 a4 a4 d,2 r4 a'4 + b2 a4 b2 c4 d2 + R1*2 + r2 r4 a4 d2 cis4 d2 + e4 d4 d4. d8 c4 a2 + b4 e4. e8 f4 d2 c4 e4 + e4 e4 c2 c4 c,4 c4 e4 + f8[ g8 a8 b8] c2 c,2 r2 + r1 r4 e'4 e2 + e4 d4 d2 c2 r2 + r1 r4 g2 a4 + a4 fis4 g2 c1 + r2 r4 c,4 c4 e4 g8[ a8 b8 c8] + d2 a2 r2 r4 a2 + fis4 a2 d,2 f4. g8 + a4 d,4 f4. g8 a2 e2 + r2 e4. f8 g4 c,4 e4. f8 + g2 d2 r2 g2. + a4 b2 c4 d4 e4 d4 + c4 b4 a4 g4 f2 e4 d4 + e1 d2 r4 d'4 + g,4. g8 g4 g2 a4 a2 + r1 r2 r4 d2 + e4 c4. b8 a2 b2 + c4 c4 a4 d4. c8 b4 g2 + a2 r4 a4 b4 g4. f8 e4 + a2 d,2 r4 e4 a4 a4. + a8 bes4 a2 g2 r4 g4 + f4. e8 f4 c2 g'4 g2 + r4 g4 g4. g8 g4 g2 a4 + a2 r2 r1 + r4 d2 e4 c4. b8 a2 + b2 c4 c4 a4 d4. c8 b4 + g2 a2 r4 a4 b4 g4. + f8 e4 a2 d,2 r4 e4 + a4 a4. a8 bes4 a1 + g1 r2 r4 c4 + d4 b4. c8 d4 c2 g2 + g1*2 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + R1*2 + R1*2 + R1*2 + R1*2 + r1 g1 + g'1 g1 + e2. b4 d2 d8 c8 d4 + b4 g4 r2 g'8 fis8 g4 e4 c4 + g'8 fis8 g4 e4 c4 g'8 fis8 g4 f4 d4 + g8 a8 bes4 a2 d,\breve. + % + d2 g4. f16 e16 d4 c4 b4 c4 + d2 a2. b4 c4 d4 + e2. d8 c8 b2. c4 + d2. c4 d1 + g,1 r1 + r2 g2 c8 d8 e8 d8 c4 b8 a8 + b4 c4 c4 b4 c2 r2 + r2 a2 d8 e8 f8 e8 d4 cis8 b8 + cis4 d4 d4 cis4 d2 r2 + r1 r2 d2 + g2 fis4 g2 a4 g2 + r1 r4 c,4. c8 d4 + b2 a2 r1 + r2 r4 g'4. g8 a4 f2 + e2 r2 r2 r4 c4 + c4 e4 f8 g8 a8 b8 c2 g2 + r2 r4 c4 c2 c4 b4 + bes2 a4 a4 a2 a4 g4 + g2 f2 f2. e4 + e4 cis4 d2 g,2 r2 + r1 r4 c4 c4 e4 + f8 g8 a8 b8 c2 g2 r2 + r1 r4 d2 cis4 + d2 a2 f'4. g8 a4 d,4 + f4. g8 a2 a,1 + e'4. f8 g4 c,4 e4. f8 g2 + g,2 r2 g'4 a4 b4 a4 + g4 f4 e4 d4 c4 b4 a1 + a2 a1 + a1 d2 r4 d4 + c4. b8 c4 g2 d'4 d2 + R1*2 + g2 a4 f4. e8 d4 g2 + c,2 r2 d2 e4 c4. + b8 a4 d2 g,2 r2 + r2 r4 d'4 e4 c4. b8 a4 + d1 g,1 + R1*2 + g'2 c,4. b8 c4 g2 d'4 + d2 r2 r1 + r2 g2 a4 f4. e8 d4 + g2 c,2 r2 d2 + e4 c4. b8 a4 d2 g,2 + r1 r4 d'4 e4 c4. + b8 a4 d1. + g,2 r4 g'4 c,4 c4. b8 c4 + g1 c1 + g1*2 + } + >> + } + diff --git a/hr/michi/cantate/texte.ly b/hr/michi/cantate/texte.ly new file mode 100644 index 0000000..302ba60 --- /dev/null +++ b/hr/michi/cantate/texte.ly @@ -0,0 +1,62 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + +% Die Textaufteilungen + + dom = \lyricmode { Do -- mi -- no, } + 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+> + Can -- ta -- _ _ _ _ te \dom + can -- ti -- cum no -- vum, + can -- ti -- cum no -- vum, + can -- ti -- cum no -- vum, + can -- ti -- cum no -- vum, + Can -- ta -- _ _ te \dom + Can -- ta -- te, + Can -- ta -- te \dom + o -- _ _ _ _ _ _ _ _ _ _ mnis ter -- ra, + Can -- ta -- _ _ _ te \dom + Can -- ta -- te, + Can -- ta -- _ _ te \dom + Can -- ta -- te, + Can -- ta -- _ _ te \dom + et be -- ne -- di -- ci -- te + et be -- ne -- di -- ci -- te + no -- mi -- ni e -- jus, + no -- mi -- ni e -- jus, + An -- nun -- ti -- a -- te, + an -- nun -- ti -- a -- _ te, + de di -- e in di -- em, + sa -- lu -- ta -- re e -- jus, + An -- nun -- ti -- a -- _ te, + in -- ter gen -- tes, + in -- _ _ ter gen -- _ _ tes, + in -- _ _ ter gen -- _ _ tes, + Glo -- _ _ _ _ _ _ _ _ _ _ _ ri -- am e -- jus, + in om -- ni -- bus po -- pu -- lis, + mi -- ra -- bi -- li -- a e -- jus, + mi -- ra -- bi -- li -- a e -- jus, + mi -- ra -- bi -- li -- a, e -- jus, + mi -- ra -- bi -- li -- a e -- jus, + in om -- ni -- bus po -- pu -- lis, + in om -- ni -- bus po -- pu -- lis, + mi -- ra -- bi -- li -- a e -- jus, + mi -- ra -- bi -- li -- a e -- jus, + mi -- ra -- bi -- li -- a e -- jus, + mi -- ra -- bi -- li -- a e -- jus, + mi -- ra -- bi -- li -- a e -- _ jus. + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/come/Come in and stay a while (sw) 01.tif b/hr/michi/come/Come in and stay a while (sw) 01.tif Binary files differnew file mode 100644 index 0000000..abfbd12 --- /dev/null +++ b/hr/michi/come/Come in and stay a while (sw) 01.tif diff --git a/hr/michi/come/Come in and stay a while (sw) 02.tif b/hr/michi/come/Come in and stay a while (sw) 02.tif Binary files differnew file mode 100644 index 0000000..e0c84b6 --- /dev/null +++ b/hr/michi/come/Come in and stay a while (sw) 02.tif diff --git a/hr/michi/come/come.ly b/hr/michi/come/come.ly new file mode 100644 index 0000000..f0a891c --- /dev/null +++ b/hr/michi/come/come.ly @@ -0,0 +1,72 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Come in and stay a while" + composer = "Rhonda Polay" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + sop = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "soprane" { \global \voiceOne \sopranMelodie } + %\addlyrics { \sopranText } + >> + + alt = << + \new Voice = "alti" { \global \voiceTwo \altMelodie } + %\addlyrics { \altText } + >> + + ten = << + \new Voice = "tenoere" { \global \voiceOne \tenorMelodie } + %\addlyrics { \tenorText } + >> + + bas = << + \new Voice = "baesse" { \global \voiceTwo \bassMelodie } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \new Staff = frauen << \sop \alt >> + \new Lyrics = "tenors" \with { alignAboveContext = #DOWN } + \new Staff = maenner << \ten \bas >> + \context Lyrics = "tenors" \lyricsto "tenoere" \tenorText + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + \layout { + } + } + diff --git a/hr/michi/come/dynArt.ly b/hr/michi/come/dynArt.ly new file mode 100644 index 0000000..586259c --- /dev/null +++ b/hr/michi/come/dynArt.ly @@ -0,0 +1,35 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key c \major + \time 4/4 + s1*5 + s1*4 + \break + s1*4 + s1*4 + \break + s1*5 + \break + s1*2 + s1*3 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/come/midi.lua b/hr/michi/come/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/come/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/michi/come/stimmen.ly b/hr/michi/come/stimmen.ly new file mode 100644 index 0000000..07fb843 --- /dev/null +++ b/hr/michi/come/stimmen.ly @@ -0,0 +1,77 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + r2 g2 e2 r8 f8 g8[ e8] b'2. c8[ b8] a8[ b8] g2 f4 e1 e4. f8 g8[ c,8] e8[ g8] d'2 e4( d4) d8[ g,8] g2 e4 d1 g4 <bes g>2 ees,4 + <c' g>4 <bes g>8[ <c g>8] \times 2/3 { d4 e4 d4 } + bes4. g8 f4 ees4 f1 f8[ g8] a2 f4 g4 c4 c4 a8[ c8] e4. <c a>8 a4 e4 d1 + r4 c4 d4 e4 g2 ~ g8[ f8] g8[ e8] b'2. c8([ b8)] a8[ b8] g2 f4 <g e>2 r4 c4 + e8[ d8] c4 \times 2/3 { a4 c4 e4 } + <a e>1 r4 r8 c,8 a4 e4 d2 f2 d'1 + } + >> + } + + altMelodie = \relative c'' { + << + { \meta } + %\altArt + %the actual tune + { + r2 g2 <d b>2 r8 f8 g8[ e8] <e b>2. c'8[ b8] e,4 d4 d4 c4 b1 d4. d8 d8[ c8] e8[ g8] <a e>2 <a f>2 <g d>8[ d8] d2 e4 <c a>2( b2) d4 d2 ees4 + ees4 ees8[ ees8] \times 2/3 { <aes f>4 q4 q4 } + <f d>4. g8 f4 ees4 <ees ces>1 d8[ d8] d2 d4 e4 <g e>4 q4 a8[ c8] <c f,>4. e,8 <e c>4 c4 c1 + r4 c4 d4 e4 <e d>2 ~ q8[ f8] g8[ e8] <e c>2. c'8([ b8)] e,4 d4 d4 c4 b2 r4 <g' e>4 + <a e>8 q8 q4 \times 2/3 { a4 c4 e4 } + <c fis,>1 r4 r8 c8 a4 e4 <c a>2 c2 <g' e>1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + r2 g2 g2 r8 f8 g8[ e8] g2. c8[ b8] c4 b4 bes4 aes4 g1 bes4. bes8 bes8[ c,8] e8[ g8] c2 c2 b8[ b8] b2 e,4 f1 bes4 bes2 ees,4 + c'4 c8[ c8] \times 2/3 { ces4 ces4 ces4 } + bes4. g8 f4 ees4 aes1 bes8[ bes8] bes2 bes4 a4 a4 a4 a8[ c8] c4. c8 a4 <a f>4 q1 + r4 c,4 d4 e4 g2 ~ g8[ f8] g8[ e8] g2. c8([ b8)] c4 b4 bes4 aes4 g2 r4 bes4 + c8[ c8] a4 \times 2/3 { a4 c4 e4 } + <fis c>1 r4 r8 c8 a4 e4 f2 aes2 b1 + } + >> + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r2 g2 c,2 r8 f8 g8[ e8] a,2. c'8[ b8] f4 e4 ees4 des4 c1 c4. c8 c8[ c8] e8[ g8] f2 d2 e8[ e8] e2 e4 g,1 ees'4 ees2 ees4 + aes4 aes8[ aes8] \times 2/3 { aes4 aes4 aes4 } + g4. g8 f4 ees4 des1 c8[ c8] c2 c4 c4 c4 c4 a'8[ c8] d,4. d8 d4 d4 g,1 + r4 c4 d4 e4 c2 ~ c8[ f8] g8[ e8] a,2. c'8[ b8] f4 e4 ees4 des4 c2 r4 c4 + f8[ f8] f4 \times 2/3 { a4 c4 e4 } + d,1 r4 r8 c'8 a4 e4 g,2 des'2 c1 + } + >> + } + diff --git a/hr/michi/come/stimmen_.ly b/hr/michi/come/stimmen_.ly new file mode 100644 index 0000000..dae097c --- /dev/null +++ b/hr/michi/come/stimmen_.ly @@ -0,0 +1,161 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + r2 g2 + e2 r8 f8 g8[ e8] + b'2. c8[ b8] + a8[ b8] g2 f4 + e1 + e4. f8 g8[ c,8] e8[ g8] + d'2 e4( d4) + d8[ g,8] g2 e4 + d1 + g4 <bes g>2 ees,4 + <c' g>4 <bes g>8[ <c g>8] \times 2/3 { d4 e4 d4 } + bes4. g8 f4 ees4 + f1 + f8[ g8] a2 f4 + g4 c4 c4 a8[ c8] + e4. <c a>8 a4 e4 + d1 + r4 c4 d4 e4 + g2 ~ g8[ f8] g8[ e8] + b'2. c8([ b8)] + a8[ b8] g2 f4 + <g e>2 r4 c4 + e8[ d8] c4 \times 2/3 { a4 c4 e4 } + <a e>1 + r4 r8 c,8 a4 e4 + d2 f2 + d'1 + } + >> + } + + altMelodie = \relative c'' { + << + { \meta } + %\altArt + %the actual tune + { + r2 g2 + <d b>2 r8 f8 g8[ e8] + <e b>2. c'8[ b8] + e,4 d4 d4 c4 + b1 + d4. d8 d8[ c8] e8[ g8] + <a e>2 <a f>2 + <g d>8[ d8] d2 e4 + <c a>2( b2) + d4 d2 ees4 + ees4 ees8[ ees8] \times 2/3 { <aes f>4 q4 q4 } + <f d>4. g8 f4 ees4 + <ees ces>1 + d8[ d8] d2 d4 + e4 <g e>4 q4 a8[ c8] + <c f,>4. e,8 <e c>4 c4 + c1 + r4 c4 d4 e4 + <e d>2 ~ q8[ f8] g8[ e8] + <e c>2. c'8([ b8)] + e,4 d4 d4 c4 + b2 r4 <g' e>4 + <a e>8 q8 q4 \times 2/3 { a4 c4 e4 } + <c fis,>1 + r4 r8 c8 a4 e4 + <c a>2 c2 + <g' e>1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + r2 g2 + g2 r8 f8 g8[ e8] + g2. c8[ b8] + c4 b4 bes4 aes4 + g1 + bes4. bes8 bes8[ c,8] e8[ g8] + c2 c2 + b8[ b8] b2 e,4 + f1 + bes4 bes2 ees,4 + c'4 c8[ c8] \times 2/3 { ces4 ces4 ces4 } + bes4. g8 f4 ees4 + aes1 + bes8[ bes8] bes2 bes4 + a4 a4 a4 a8[ c8] + c4. c8 a4 <a f>4 + q1 + r4 c,4 d4 e4 + g2 ~ g8[ f8] g8[ e8] + g2. c8([ b8)] + c4 b4 bes4 aes4 + g2 r4 bes4 + c8[ c8] a4 \times 2/3 { a4 c4 e4 } + <fis c>1 + r4 r8 c8 a4 e4 + f2 aes2 + b1 + } + >> + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r2 g2 + c,2 r8 f8 g8[ e8] + a,2. c'8[ b8] + f4 e4 ees4 des4 + c1 + c4. c8 c8[ c8] e8[ g8] + f2 d2 + e8[ e8] e2 e4 + g,1 + ees'4 ees2 ees4 + aes4 aes8[ aes8] \times 2/3 { aes4 aes4 aes4 } + g4. g8 f4 ees4 + des1 + c8[ c8] c2 c4 + c4 c4 c4 a'8[ c8] + d,4. d8 d4 d4 + g,1 + r4 c4 d4 e4 + c2 ~ c8[ f8] g8[ e8] + a,2. c'8[ b8] + f4 e4 ees4 des4 + c2 r4 c4 + f8[ f8] f4 \times 2/3 { a4 c4 e4 } + d,1 + r4 r8 c'8 a4 e4 + g,2 des'2 + c1 + } + >> + } + diff --git a/hr/michi/come/texte.ly b/hr/michi/come/texte.ly new file mode 100644 index 0000000..46e1398 --- /dev/null +++ b/hr/michi/come/texte.ly @@ -0,0 +1,36 @@ +%some settings% vim: ai sw=2 lbr nu 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 = \lyricmode { + %<+hier den Text für den Tenor eintragen+> + Come in + and stay a while. + Cast the world a -- side for now. + Give your -- self a chance to breathe. + And try your best to smile. + Some -- times it’s hard to re -- lax, + but you need to take the time. + Pleas -- ant -- ries can be some help, + if you search un -- til you find. + The one who + takes your fond -- est dream. + And turns it in -- to now. + So let this place be your life -- style. + Come in and stay a while. + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/corpus/corpus.ly b/hr/michi/corpus/corpus.ly new file mode 100644 index 0000000..2f8f4d4 --- /dev/null +++ b/hr/michi/corpus/corpus.ly @@ -0,0 +1,73 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Ave verum" + composer = "Camille Saint-Saëns" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 } + \addlyrics { \stzII } + >> + + bas = << + \new Voice = "baesse" { \global \bassMelodie } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \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/michi/corpus/dynArt.ly b/hr/michi/corpus/dynArt.ly new file mode 100644 index 0000000..0140f44 --- /dev/null +++ b/hr/michi/corpus/dynArt.ly @@ -0,0 +1,37 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key ees \major + \time 2/2 + \repeat volta 2 { + s1*8 + } + \break + \repeat volta 2 { + s1*8 + \break + s1*8 + \break + s1*12 + } + s1*4 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/corpus/midi.lua b/hr/michi/corpus/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/corpus/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/michi/corpus/stimmen.ly b/hr/michi/corpus/stimmen.ly new file mode 100644 index 0000000..bae07bd --- /dev/null +++ b/hr/michi/corpus/stimmen.ly @@ -0,0 +1,66 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + ees2 f4( g4) aes2 g2 g2( f4) ees4 f2 ees2 g2\( aes4( bes4)\) c2 bes2 bes2( aes4) g4 g2( f2) + bes2 ces4( bes4) bes2 aes2 aes2. bes4 ces2 des2 ees2. ees4 d2 des2 ces4 bes2 a4 bes1 ees,2 f4( g4) f2 ees2 ees2 f4( g4) f2 ees2 ees2 c'2( ~ c4 bes4) g4 ees4 f2. f4 bes1 bes2 c4( d4) c2 bes2 bes2 c4( d4) c2 bes2 ees2( g2 ~ g4 ees4 d4 c4) bes2 bes2( ~ bes4 b4 c4 aes4) g4( bes4) d4( ees4) aes,2( g4) f4 f1( ees2) r2 + ees2( f4 g4 aes2 g2 f1) g1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + bes2 d4( ees4) c4( d4) ees2 ees2( d4) c4 d2 bes2 ees2.( ees4) ees4( aes4) g2 ees2( f4) ees4 ees2( d2) + f2 aes4( ges4) ges2 f2 f2. g4 aes2 bes2 bes2 a2 bes2 bes2 ges4 g2 f4 f2 bes,2 ~ bes2. bes4 bes2. bes4 c2. c4 des2. des4 c2 d2 ees2 ees2 ees2( d4) d4 ees1 ees2. ees4 e2. e4 f2. f4 fis2 g2 g2 g2 ~ g2.( aes4 bes2 a4 aes4 g4 f4) ees2 ~ ees2 ees2 ~ ees4 c2 d4 d1( ees2) r2 + r2 bes2( c4 d4 ees2) ~ ees2( d2) ees1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + g2 bes2 aes2 bes2 bes2. g4 bes2 g2 bes2.( bes4) aes4( c4) ees2 bes2 ~ bes4 bes4 bes1 + d2 ees4( des4) des4( ees4) f2 f2( ees4) des4 ees2 ges2 ges2 f2 f2 bes,2 ees4 des2 c4 bes1 g2. g4 g2. g4 g2. g4 g2. g4 aes2 f2 g2 ees2 bes'2. bes4 bes1 bes2. bes4 bes2. bes4 bes2. bes4 ees2 ees2 ees2( d2 ~ d4 c4 d4 ees4) ees4( bes2) bes4( ~ bes4 des4 c4 ces4) bes2 g2 f2( aes4) aes4 aes1( g2) r2 + r1 + f2( g4 aes4 bes1) <bes g>1 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + ees2 bes4( ees4) f2 ees2 ees2( bes4) c4 bes2 ees2 ees2\(( f4) g4\) aes2( ees2) g2( d4) ees4 bes'2( bes,2) + bes'2 aes4( bes4) bes4( ces4) des2 des2( ces4) bes4 aes2 ges2 ces2. ces4 bes2 ges2 ees4 e2 f4 bes,1 ees2. ees4 d2. d4 c2. c4 bes2. bes4 aes1 g2 c4 c4 bes2. bes4 <g g'>1 g'2. g4 g2. g4 aes2. aes4 a2 bes2 c2( b2 ~ b4 c4 bes4 aes4 g4 ges4 f4 fes4) ees2 aes,2 bes1 ~ bes2 bes2 bes1( ees2) r2 + r1 r1 bes1 <ees ees,>1 + } + >> + } + diff --git a/hr/michi/corpus/stimmen_.ly b/hr/michi/corpus/stimmen_.ly new file mode 100644 index 0000000..ea4099f --- /dev/null +++ b/hr/michi/corpus/stimmen_.ly @@ -0,0 +1,213 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + ees2 f4( g4) + aes2 g2 + g2( f4) ees4 + f2 ees2 + g2\( aes4( bes4)\) + c2 bes2 + bes2( aes4) g4 + g2( f2) + bes2 ces4( bes4) + bes2 aes2 + aes2. bes4 + ces2 des2 + ees2. ees4 + d2 des2 + ces4 bes2 a4 + bes1 + ees,2 f4( g4) + f2 ees2 + ees2 f4( g4) + f2 ees2 + ees2 c'2( ~ + c4 bes4) g4 ees4 + f2. f4 + bes1 + bes2 c4( d4) + c2 bes2 + bes2 c4( d4) + c2 bes2 + ees2( g2 ~ + g4 ees4 d4 c4) + bes2 bes2( ~ + bes4 b4 c4 aes4) + g4( bes4) d4( ees4) + aes,2( g4) f4 + f1( + ees2) r2 + ees2( f4 g4 + aes2 g2 + f1) + g1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + bes2 d4( ees4) + c4( d4) ees2 + ees2( d4) c4 + d2 bes2 + ees2.( ees4) + ees4( aes4) g2 + ees2( f4) ees4 + ees2( d2) + f2 aes4( ges4) + ges2 f2 + f2. g4 + aes2 bes2 + bes2 a2 + bes2 bes2 + ges4 g2 f4 + f2 bes,2 ~ + bes2. bes4 + bes2. bes4 + c2. c4 + des2. des4 + c2 d2 + ees2 ees2 + ees2( d4) d4 + ees1 + ees2. ees4 + e2. e4 + f2. f4 + fis2 g2 + g2 g2 ~ + g2.( aes4 + bes2 a4 aes4 + g4 f4) ees2 ~ + ees2 ees2 ~ + ees4 c2 d4 + d1( + ees2) r2 + r2 bes2( + c4 d4 ees2) ~ + ees2( d2) + ees1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + g2 bes2 + aes2 bes2 + bes2. g4 + bes2 g2 + bes2.( bes4) + aes4( c4) ees2 + bes2 ~ bes4 bes4 + bes1 + d2 ees4( des4) + des4( ees4) f2 + f2( ees4) des4 + ees2 ges2 + ges2 f2 + f2 bes,2 + ees4 des2 c4 + bes1 + g2. g4 + g2. g4 + g2. g4 + g2. g4 + aes2 f2 + g2 ees2 + bes'2. bes4 + bes1 + bes2. bes4 + bes2. bes4 + bes2. bes4 + ees2 ees2 + ees2( d2 ~ + d4 c4 d4 ees4) + ees4( bes2) bes4( ~ + bes4 des4 c4 ces4) + bes2 g2 + f2( aes4) aes4 + aes1( + g2) r2 + r1 + f2( g4 aes4 + bes1) + <bes g>1 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + ees2 bes4( ees4) + f2 ees2 + ees2( bes4) c4 + bes2 ees2 + ees2\(( f4) g4\) + aes2( ees2) + g2( d4) ees4 + bes'2( bes,2) + bes'2 aes4( bes4) + bes4( ces4) des2 + des2( ces4) bes4 + aes2 ges2 + ces2. ces4 + bes2 ges2 + ees4 e2 f4 + bes,1 + ees2. ees4 + d2. d4 + c2. c4 + bes2. bes4 + aes1 + g2 c4 c4 + bes2. bes4 + <g g'>1 + g'2. g4 + g2. g4 + aes2. aes4 + a2 bes2 + c2( b2 ~ + b4 c4 bes4 aes4 + g4 ges4 f4 fes4) + ees2 aes,2 + bes1 ~ + bes2 bes2 + bes1( + ees2) r2 + r1 + r1 + bes1 + <ees ees,>1 + } + >> + } + diff --git a/hr/michi/corpus/texte.ly b/hr/michi/corpus/texte.ly new file mode 100644 index 0000000..8bff82c --- /dev/null +++ b/hr/michi/corpus/texte.ly @@ -0,0 +1,54 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + stzI = \lyricmode { + \set stanza = "1." + A -- ve, ve -- rum cor -- pus, + na -- + \set ignoreMelismata = ##t + tum de Ma -- _ + \unset ignoreMelismata + ri -- a vir -- gi -- ne: + } + stzII = \lyricmode { + \set stanza = "2." + Ve -- re pas -- sum im -- mo -- la -- tum in cru -- ce pro ho -- mi -- ne: + } + cujus = \lyricmode { + Cu -- jus la -- tus per -- fo -- ra -- tum + un -- da flu -- xit Cum san -- gui -- ne. + Es -- to no -- bis præ -- gus -- ta -- tum + in mor -- tis ex -- a -- mi -- ne, + Es -- to no -- bis præ -- gus -- ta -- tum + } + +% Die Textaufteilungen % -- _ + + sopranText = \lyrics { + %<+hier den Text für den Sopran eintragen+> + } + + altText = \lyrics { + %<+hier den Text für den Alt eintragen+> + } + + tenorText = \lyricmode { + %<+hier den Text für den Tenor eintragen+> + %<< + \stzI + %\stzII + %>> + \cujus + \set ignoreMelismata = ##t + in mor -- _ _ _ _ + \unset ignoreMelismata + tis, + mor -- tis ex -- a -- mi -- ne. + A -- men. + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/cover/cover.ly b/hr/michi/cover/cover.ly new file mode 100644 index 0000000..2ee0454 --- /dev/null +++ b/hr/michi/cover/cover.ly @@ -0,0 +1,73 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Cover me with the Night" + composer = "Peter Klatzow" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 18) + + sop = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "soprane" { \global s4 \sopranMelodie } + %\addlyrics { \sopranText } + >> + + alt = << + \new Voice = "alti" { \global s4 \altMelodie } + %\addlyrics { \altText } + >> + + ten = << + \new Voice = "tenoere" { \global s4\ff \tenorMelodie } + %\addlyrics { \tenorText } + >> + + bas = << + \new Voice = "baesse" { \global s4 \bassMelodie } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \new Staff = sopran { \sop } + \new Staff = alt { \alt } + \new Staff = tenor { \ten } + \new Lyrics \lyricsto "tenoere" { \global \tenorText } + \new Staff = bass { \bas } + >> + \midi { + \context{ + \Score + tempoWholesPerMinute = #(ly:make-moment 72 4) + } + } + %\layout { + %} + } + diff --git a/hr/michi/cover/cover.midi b/hr/michi/cover/cover.midi Binary files differnew file mode 100644 index 0000000..74e986c --- /dev/null +++ b/hr/michi/cover/cover.midi diff --git a/hr/michi/cover/dynArt.ly b/hr/michi/cover/dynArt.ly new file mode 100644 index 0000000..919e162 --- /dev/null +++ b/hr/michi/cover/dynArt.ly @@ -0,0 +1,52 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key d \major + \time 2/2 + s1*3 + \time 3/2 + s1. + \time 2/2 + s1*8 + \time 3/2 + s1.*3 + \bar "||" + \break + \time 2/2 + s1*4 + \time 3/2 + s1. + \time 2/2 + s1*2 + \break + \time 3/2 + s1.*3 + \time 2/2 + s1*2 + \time 3/2 + s1.*3 + \bar "||" + \time 2/2 + s1*4 + \break + s1*7 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/cover/haukify.log b/hr/michi/cover/haukify.log new file mode 100644 index 0000000..e69de29 --- /dev/null +++ b/hr/michi/cover/haukify.log diff --git a/hr/michi/cover/midi.lua b/hr/michi/cover/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/cover/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/michi/cover/midis/MIDI b/hr/michi/cover/midis/MIDI Binary files differnew file mode 100644 index 0000000..9d34739 --- /dev/null +++ b/hr/michi/cover/midis/MIDI diff --git a/hr/michi/cover/stimmen.ly b/hr/michi/cover/stimmen.ly new file mode 100644 index 0000000..c5c31d6 --- /dev/null +++ b/hr/michi/cover/stimmen.ly @@ -0,0 +1,58 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + r1 r1 r4 a2 a4 ~ a4 a4 d8 cis8 b4 a4 g4 fis8( g8 a2.) r1 r4 f2 a4 c2 b4 a8( g8) a1 r1 r4 a4 a4 d4 c4 b4 a4 g4 a2 r4 d4( ~ d4 c8 b8) a1 r4 d4 ~ d4 c8 b8 a1 r1 r1 r1 r2 r4 e'4 e2 a,2. << { b4 cis4. b8 cis4 d4 b1 r2 b2. b4 b4 g4 b2 r4 b4 cis2 g2 g4 a4 b2. g4 cis1 cis2 a2. cis4 cis2 a1 d2 } \\ { a4 a4. a8 a4 a4 g1 r2 g2. g4 g4 g4 g2 r4 g4 g2 g2 g4 g4 g2. g4 g1 a2 a2. a4 a2 a1 a2 } >> a1 a2. a4 cis4 a4 a2 ~ a4 e2 d4 a'1 r4 a2 a4 e'4 a,4 a2 r4 g2 fis4 a1 r2 e'2 ~ e2 a,2 a1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + << { d2( e2) d2( e2) d2( e2) d2( e2 d2) d2( e2) d2( e2) e1 e1 e2( fis2) e2( fis2) e1 e1 e2( fis2 e2) e2( fis2 e2) fis2 } \\ { d1 d1 d1 d1 c2 d1 d1 e2( d2) e2( d2) e1 e1 e2( d2) e2( d2) e1. e2( fis2 e2) fis2 } >> e1 r1 r1 r1 r2 r4 a4 << { a2 } \\ { fis2 } >> fis2. fis4 f4. f8 f4 f4 dis1 r2 dis2. dis4 d4 d4 dis2 r4 dis4 eis2 eis2 eis4 eis4 e2. e4 e1 e2 e2. e4 e2 e1 fis2 fis1 << { e2( fis2) e1 cis1 fis2( e2) e2( fis2) fis2( e2) } \\ { e1 e2( d2) cis1 d1 e1 fis2( e2) } >> e2( d2) e2( fis2) gis1( ~ gis2 fis2) e1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + \oneVoice + << { \voiceOne a2( b2) a2( b2) a2( b2) a2( b2 g2) a2( b2) a2( b2) a1 a1 a2( b2) a2( b2) c2( a2) c1 a2( b2 a2) c2( d2 c2) d2 e1 } \new Voice { \voiceTwo a,1 a1 a1 a1 g2 a1 a1 a2( g2) a2( g2) a1 a1 g2( a2) g2( a2) a1. c2( d2 c2) d2 a1 } >> \oneVoice r1 r1 r1 r2 r4 << { \voiceOne e'4 d2 d2. d4 e4. e8 e4 d4 dis1 } { \voiceTwo a4 a2 a2. a4 a4. a8 a4 a4 gis1 } >> \oneVoice r2 b2. b4 b4 b4 b2 r4 b4 cis2 cis2 cis4 cis4 b2. b4 c1 cis2 cis2. cis4 cis2 cis1 d2 d1 << { \voiceOne b2( cis2) b1 b1 b2( a2) b2( cis2) d2 cis2 c2( d2) b2( cis2) e1( ~ e2 d2) cis1 } \new Voice { \voiceTwo a1 b2( a2) a1 b2( a2) a1 b2 a2 a1 a1 b1 ~ b1 b1 } >> + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 r1 r1 R1. r2 r4 a4 ~ a4 d4 ~ d2 r1 r1 r4 e2 a4 g2 fis4 e8( d8) << { e2( fis2) e2( fis2) a1. } \\ { e1 e1 a1. } >> g1. g2 a1 r4 a4 a8 b8 c4 ~ c4 b4 d4 c4 b4 a4 g4 fis8 e8 a2. r4 R1. r1 r1 r2 << { dis,2. dis4 d4 d4 d2 r4 d4 eis2 eis2 eis4 cis4 e2. e4 e1 e2 e2. e4 eis2 eis1 fis2 fis1 e1 d1 e1 fis1 e1 d1 c1 e1 fis1 ~ fis1 e1 } \\ { gis,2. gis4 g4 g4 gis2 r4 gis4 gis2 gis2 gis4 gis4 g2. g4 g1 a2 a2. a4 ais2 ais1 a2 a1 a1 g1 a1 a1 a1 g1 f1 a1 a1 ~ a1 a1 } >> + } + >> + } + diff --git a/hr/michi/cover/stimmen_.ly b/hr/michi/cover/stimmen_.ly new file mode 100644 index 0000000..4a3cc20 --- /dev/null +++ b/hr/michi/cover/stimmen_.ly @@ -0,0 +1,141 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + r1 + r1 + r4 a2 a4 ~ + a4 a4 d8 cis8 b4 a4 g4 + fis8( g8 a2.) + r1 + r4 f2 a4 + c2 b4 a8( g8) + a1 + r1 + r4 a4 a4 d4 + c4 b4 a4 g4 + a2 r4 d4( ~ d4 c8 b8) + a1 r4 d4 ~ + d4 c8 b8 a1 + r1 + r1 + r1 + r2 r4 e'4 + e2 a,2. << { b4 cis4. b8 cis4 d4 b1 r2 b2. b4 b4 g4 b2 r4 b4 cis2 g2 g4 a4 b2. g4 cis1 cis2 a2. cis4 cis2 a1 d2 } \\ { a4 a4. a8 a4 a4 g1 r2 g2. g4 g4 g4 g2 r4 g4 g2 g2 g4 g4 g2. g4 g1 a2 a2. a4 a2 a1 a2 } >> a1 + a2. a4 + cis4 a4 a2 ~ + a4 e2 d4 + a'1 + r4 a2 a4 + e'4 a,4 a2 + r4 g2 fis4 + a1 + r2 e'2 ~ + e2 a,2 + a1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + << { d2( e2) d2( e2) d2( e2) d2( e2 d2) d2( e2) d2( e2) e1 e1 e2( fis2) e2( fis2) e1 e1 e2( fis2 e2) e2( fis2 e2) fis2 } \\ { d1 d1 d1 d1 c2 d1 d1 e2( d2) e2( d2) e1 e1 e2( d2) e2( d2) e1. e2( fis2 e2) fis2 } >> e1 + r1 + r1 + r1 + r2 r4 a4 + << { a2 } \\ { fis2 } >> fis2. fis4 + f4. f8 f4 f4 + dis1 + r2 dis2. dis4 + d4 d4 dis2 r4 dis4 + eis2 eis2 eis4 eis4 + e2. e4 + e1 + e2 e2. e4 + e2 e1 + fis2 fis1 + << { e2( fis2) e1 cis1 fis2( e2) e2( fis2) fis2( e2) } \\ { e1 e2( d2) cis1 d1 e1 fis2( e2) } >> + e2( d2) + e2( fis2) + gis1( ~ + gis2 fis2) + e1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + << { a2( b2) a2( b2) a2( b2) a2( b2 g2) a2( b2) a2( b2) a1 a1 a2( b2) a2( b2) c2( a2) c1 a2( b2 a2) c2( d2 c2) d2 e1 } \\ { a1 a1 a1 a1 g2 a1 a1 a2( g2) a2( g2) a1 a1 g2( a2) g2( a2) a1. c2( d2 c2) d2 a1 } >> + r1 + r1 + r1 + r2 r4 << { e4 d2 d2. d4 e4. e8 e4 d4 dis1 } \\ { a4 a2 a2. a4 a4. a8 a4 a4 gis1 } >> + r2 b2. b4 + b4 b4 b2 r4 b4 + cis2 cis2 cis4 cis4 + b2. b4 + c1 + cis2 cis2. cis4 + cis2 cis1 + d2 d1 + << { b2( cis2) b1 b1 b2( a2) b2( cis2) d2 cis2 c2( d2) b2( cis2) e1( ~ e2 d2) cis1 } \\ { a1 b2( a2) a1 b2( a2) a1 b2 a2 a1 a1 b1 ~ b1 b1 } >> + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 + r1 + r1 + R1. + r2 r4 a4 ~ + a4 d4 ~ d2 + r1 + r1 + r4 e2 a4 + g2 fis4 e8( d8) + << { e2( fis2) e2( fis2) a1. } \\ { e1 e1 a1. } >> + g1. + g2 a1 + r4 a4 a8 b8 c4 ~ + c4 b4 d4 c4 + b4 a4 g4 fis8 e8 + a2. r4 + R1. + r1 + r1 + r2 << { dis2. dis4 d4 d4 d2 r4 d4 eis2 eis2 eis4 cis4 e2. e4 e1 e2 e2. e4 eis2 eis1 fis2 fis1 e1 d1 e1 fis1 e1 d1 c1 e1 fis1 ~ fis1 e1 } \\ { gis,2. gis4 g4 g4 gis2 r4 gis4 gis2 gis2 gis4 gis4 g2. g4 g1 a2 a2. a4 ais2 ais1 a2 a1 a1 g1 a1 a1 a1 g1 f1 a1 a1 ~ a1 a1 } >> + } + >> + } + diff --git a/hr/michi/cover/texte.ly b/hr/michi/cover/texte.ly new file mode 100644 index 0000000..364f9f9 --- /dev/null +++ b/hr/michi/cover/texte.ly @@ -0,0 +1,36 @@ +%some settings% vim: ai sw=2 lbr nu 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 = \lyricmode { + %<+hier den Text für den Tenor eintragen+> + Come Lord Come Lord + Come Lord Come Lord + Come Lord Come Lord + Come Lord Come Lord + % + Your mer -- cy is dee -- per than the night + Lord it will be cold + the night comes with its breath of death + Night comes, + the end comes + you come + Come Lord Come Lord + Come Lord _ Come Lord + Come Lord + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/darthula/darthula.ly b/hr/michi/darthula/darthula.ly new file mode 100644 index 0000000..02439c2 --- /dev/null +++ b/hr/michi/darthula/darthula.ly @@ -0,0 +1,82 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Darthulas Grabgesang" + composer = "Brahms" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + sop = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "soprane" { \global \sopranMelodie } + %\addlyrics { \sopranText } + >> + + altI = << + \new Voice = "alti" { \global s4 \altMelodieI } + %\addlyrics { \altText } + >> + altII = << + \new Voice = "alti" { \global s4 \altMelodieII } + %\addlyrics { \altText } + >> + + ten = << + \new Voice = "tenoere" { \global s4\ff \tenorMelodie } + \addlyrics { \tenorText } + >> + + basI = << + \new Voice = "baesse" { \global s4 \bassMelodieI } + %\addlyrics { \bassText } + >> + basII = << + \new Voice = "baesse" { \global s4 \bassMelodieII } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + %\new Staff = sopran { \sop } + %\new Staff = altI { \altI } + %\new Staff = altII { \altII } + \new Staff = tenor { \ten } + %\new Staff = bassI { \basI } + %\new Staff = bassII { \basII } + >> + \midi { + \context{ + \Score + tempoWholesPerMinute = #(ly:make-moment 72 4) + } + } + %\layout { + %} + } + diff --git a/hr/michi/darthula/darthula.midi b/hr/michi/darthula/darthula.midi Binary files differnew file mode 100644 index 0000000..3c2389e --- /dev/null +++ b/hr/michi/darthula/darthula.midi diff --git a/hr/michi/darthula/dynArt.ly b/hr/michi/darthula/dynArt.ly new file mode 100644 index 0000000..e7137c4 --- /dev/null +++ b/hr/michi/darthula/dynArt.ly @@ -0,0 +1,62 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key g \minor + \time 2/2 + s1*5 + \bar "||" + \time 3/2 + s1.*2 + \bar "||" + \time 2/2 + s1*6 + \bar "||" + \time 3/2 + s1. + \bar "||" + \time 2/2 + s1*10 + \bar "||" + \time 3/2 + s1.*2 + \bar "||" + \time 2/2 + s1*6 + \bar "||" + \time 3/2 + s1. + \bar "||" + \time 2/2 + s1*14 + \bar "||" + \key g \major + s1*32 + \bar "||" + \key g \minor + s1*18 + \bar "||" + \time 3/2 + s1. + \bar "||" + \time 2/2 + s1*9 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/darthula/midi.lua b/hr/michi/darthula/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/darthula/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/michi/darthula/stimmen.ly b/hr/michi/darthula/stimmen.ly new file mode 100644 index 0000000..528490d --- /dev/null +++ b/hr/michi/darthula/stimmen.ly @@ -0,0 +1,116 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + r1 r1 r1 r1 r1 + R1. R1. + r1 r1 r1 r1 r1 r1 + R1. + r1 r1 r1 r1 r1 r1 r1 r1 + d2 c2 a4.( bes8) a2 + d4( g4) f4 d4 bes4 ees4 d2 bes2 r2 r1 r1 r2 r4 d4 d2. d4 d4 f4 e4 d4 c2 d2 d4( ees4 f4) g4 c,4 d4 bes4( c4 a2) g2 r2 r1 r2 r4 a4 bes2 bes4 r4 r4 bes4 bes4 bes4 e2 d4 r4 r4 d4 d4 d4 g2 fis4 r4 ees2 d4 c4 bes2 a2 c2 a2 g1 fis2 r2 + r4 g4 a4 g4 b2 d4 e4 g2 \times 2/3 { e4( d4 e4) } d2 b4 r4 r4 d4 \times 2/3 { e4( d4) e4 } d2 b4 r4 d2 e4 b4 d4( c4) b4 a4 bes2 a4 g4 bes4( g'4) fis4 e4 cis2 d4 r4 b2 d4 e4 g2 b,4 r4 r4 e4 a,2 r4 b4 d4 b4 \times 2/3 { b4( ais4 b4) } \times 2/3 { c4( b4 c4) } b2( d4) r4 r1 r1 r1 r1 r1 r2 r4 g,4 b2 d4 e4 g2 r4 g,4 b2 d4 e4 g2 r4 g,4 b2 c4 d4 f1 ~ f4 r4 r2 r1 r1 + r1 r1 r1 r1 d2 c2 a4.( bes8) a4 a4 d4( g4) f4 d4 bes4 ees4 d2( bes2) r2 r1 r1 r1 r1 r1 r2 r4 d4 d2 d4 d4 d4( f4) e4( d4) c4 c4 d2 d4( ees4) f4 g4 c,4 d4 bes4( c4) a2 g4 r4 r2 r2 r4 d'4 ees2( d4) r4 r1 r1 r1 r1 d,1 + } + >> + } + + altMelodieI = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + d2 f4 g4 ees2 d4 a'4 bes2( a4) r4 r1 r1 + R1. + r2 r2 r4 d,4 d2 f4 g4 ees2( d4) a'4 bes2( a4) r4 r1 r1 r1 + R1. + r1 r1 d,4. d8 f4 g4 ees2 d4 ees4 f2( c4) bes4 c2 d4 r4 r1 r1 bes'2 g2 fis4.( g8) fis2 g4( d'4) d4 f,4 g4 c4 a2 g2 r2 r1 r1 r2 r4 a4 bes2( a4) g4 a4 d4 c4 bes4 a2 a2 bes2( d4) bes4 a4 a4 g2. fis4 g2 r2 r1 r2 r4 a4 g2 g4 r4 r4 g4 f4 f4 bes2 fis4 r4 r4 b4 b4 b4 c2 c4 r4 c2 d4 a4 bes4( g4) g2 g2 g2 g1 d2 r2 + r4 g4 g4 g4 g2 b4 b4 b2 \times 2/3 { a4( b4 a4) } b2 g4 r4 r4 b4 \times 2/3 { a4( b4) a4 } b2 g4 r4 a2 b4 b4 a2 gis4 a4 g2 fis4 e4 g2 fis4 e4 bes'2 a4 r4 b2 b4 b4 b2 b4 r4 r4 b4 a2 r4 b4 b4 b4 \times 2/3 { d,4( cis4 d4) } \times 2/3 { a'4( b4 a4) } b2 r2 r1 r1 r1 r1 r1 r2 r4 g4 g2 b4 b4 b2 r4 g4 g2 b4 b4 b2 r4 g4 g2 a4 b4 g4 b4 d2 ~ d2. d,4 f2 ees2 d4 r4 r2 + r1 r1 r1 r1 bes'2 g2 fis4.( g8) f4 f4 g4( d'4) d4 f,4 g4 c4 a2( g2) r2 d4. d8 f4 g4 ees2 d4 ees4 f2( c4) bes4 c2 d4 r4 r1 r2 r4 a'4 bes2 a4 g4 a4( d4) c4( bes4) a4 a4 a2 bes2 d4 bes4 a4 a4 g2. fis4 g4 r4 r2 r2 r4 g4 c2( g4) r4 r4 a4 bes2( aes4) r4 r2 g1( fis4) r4 r2 g1 + } + >> + } + altMelodieII = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + d2 f4 g4 ees2 d4 d4 g2( d4) r4 r1 r1 + R1. + r2 r2 r4 d4 d2 f4 g4 ees2( d4) d4 g2( d4) r4 r1 r1 r1 + R1. + r1 r1 d4. d8 f4 g4 ees2 d4 ees4 f2( c4) bes4 c2 d4 r4 r1 r1 g2 ees2 d2. d4 bes'2 bes4 a4 g4 g4 fis2 g2 r2 r1 r1 r2 r4 d4 g2( f4) e4 f4 a4 a4 f4 f2 f2 g2( bes4) g4 f4 f4 d4( ees4 d2) d2 r2 r1 r2 r4 d4 g2 g4 r4 r4 ais4 ais4 ais4 fis4( cis'4) b4 r4 r4 b4 g4 g4 g2 c4 r4 fis,2 a4 d,4 d2 ees2 ees2 ees2 d1 d2 r2 + r4 g4 g4 g4 g2 g4 g4 g2 \times 2/3 { fis4( fis4 fis4) } fis2 g4 r4 r4 g4( fis4 fis4) fis2 g4 r4 a2 gis4 gis4 e2 e4 e4 e2 fis4 g4 e2 fis4 g4 e2 fis4 r4 g2 g4 g4 g2 g4 r4 r4 g4 fis2 r4 fis4 g4 fis4 fis2 fis4 fis4 fis2( g4) r4 r1 r1 r1 r1 r1 r2 r4 g4 g2 g4 g4 g2 r4 g4 g2 g4 g4 g2 r4 g4 g2 g4 g4 g4 r4 r2 r4 f4 b2 r2 c,2 d2 bes2 + a4 r4 r2 r1 r1 r1 g'2 ees2 d2 d4 a'4 bes2 bes4 a4 g4 g4 fis2( d2) r2 d4. d8 f4 g4 ees2 d4 ees4 f2( c4) bes4 c2 d4 r4 r1 r2 r4 d4 g2 f4 e4 f4( a4) a4( f4) f4 f4 f2 g2 bes4 g4 f4 f4 d4 ees4 d2 d2 f4 g4 ees2 d4 r4 r1 r4 d4 g2( d4) r4 r2 g,1( a4) r4 r2 <b g>1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + r1 r1 r1 d2 c2 a4.( bes8) a4 a4 d4( g4 f4) d4 bes4 ees4 d2 bes2 r2 r1 r1 r2 r4 d4 d2 d4 d4 d4 f4 e4 d4 c2 d2 d4( ees4 f4) g4 c,4 d4 bes4( c4) a2 g2 r2 r1 g4. g8 bes4 c4 a2 a4 g4 g2( a4) a4 bes2 a4 r4 r1 r4 g4( ees'4) c4 d4.( g,8) d'4 r4 r4 g,4 bes4 d4 ees4 c4 d2 g,2 r2 r1 r1 r1 r4 g4 d'4 g,4 d'4 d,4 a'4 bes4 f2 r4 d4 g4( ees4 bes'4) ees,4 f4 d4 g4( c,4 d2) g2 r2 r1 r1 r2 r4 bes4 cis2 cis4 r4 r4 cis4 d4 d4 g2 f4 r4 r4 ees4 ees4 ees4 a2 d,2 d2 c4 c4 ees2 c2 a1 a2 r2 + r4 b4 c4 b4 d2 g4 e4 d2 \times 2/3 { c4( b4 c4) } b2 d4 r4 r4 b4 \times 2/3 { c4( b4) c4 } b2 d4 r4 d2 b4 e4 e2 d4 c4 g2 a4 bes4 g2 a4 bes4 e2 d4 r4 r2 r4 g,4 b2 d4 e4 g2 \times 2/3 { e4( d4 e4) } d2 b4 d4 \times 2/3 { fis4( e4) d4 } \times 2/3 { e4( d4) e4 } d2 b4 r4 d2 e4 b4 d4( c4) b4 a4 b2 a4 g4 bes4( g'4) fis4 e4 cis2 d4 r4 b2 d4 e4 g2 b,4 g4 b2 d4 e4 g2 r4 g,4 b2 c4 d4 f2 r4 d4 g2. d4 g1 r2 g,2 bes2 g2 + a4 r4 r2 r1 r1 r1 r4 g4( ees'4) c4 d4.( g,8) d'4 r4 r4 g,4 bes4( d4 ees4) c4 d2( g,2) r2 r1 g4. g8 bes4 c4 a2 a4 g4 g2( a4) a4 bes2 a4 r4 r1 r4 g4 d'4 g,4 d'4( d,4) a'4 bes4 f4 f4 r4 d4 g4( ees4) bes'4 ees,4 f4 d4 g4( c,4) d2 g4 r4 r2 r1 g2 bes4 c4 a2 g4 r4 r2 b2 c1 ~ c1( b2) r2 + } + >> + } + + bassMelodieI = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 r1 r1 bes2 g2 fis4.( g8) f4 f4 g4( bes4 d4) f,4 g4 g4 f2 g2 r2 r1 r1 r2 r4 a4 bes2 a4 g4 a4 a4 c4 bes4 a2 a2 bes4 g4 bes2 a2 g2. fis4 g2 r2 r1 r1 d4. d8 f4 g4 ees2 d4 a'4 g2( a4) a4 bes2 a4 r4 r1 r1 + R1. R1. + d,2 f4 g4 ees2 d4 a'4 bes2 a4 r4 r1 r1 r1 + R1. + r1 r1 d,2 f4 g4 ees2 d4 r4 r2 r4 g4 bes2 bes4 r4 r4 ais4 b4 b4 b2 d4 r4 r4 c4 c4 c4 c2 a2 g2 g4 g4 g2 a2 d,1 d2 r2 + r4 g4 g4 g4 g2 g4 g4 g2 \times 2/3 { d4( d4 d4) } d2 d4 r4 r4 g4( d4 d4) d2 g4 r4 fis2 gis4 e4 e1 e4 r4 c4( e4) e4( bes'4) a4 g4 g2 d4 r4 r2 r4 g4 g2 b4 b4 b2 \times 2/3 { c4( b4 c4) } b2 g4 b4 fis2 d2 b'2 g4 r4 a2 gis4 gis4 e2 gis4 a4 g2 fis4 e4 g4( bes4) a4 g4 e2 fis4 r4 g2 b4 b4 b2 g4 g4 g2 b4 b4 b2 r4 g4 g2 a4 b4 d2 r4 g,4 b1 ~ b2( g2) r2 r4 c,4 g'2 g2 + d2 f4 g4 ees2 d4 a'4 bes2 a4 a4 bes2 a4 r4 r1 r1 r1 r1 r1 r1 r1 d,4. d8 f4 g4 ees2 d4 a'4 g2( a4) a4 bes2 a4 r4 r1 r1 r1 + R1. + r1 b2 b4 b4 c2 b4 r4 r1 r2 d,2 f2 g2 ees1 ~ ees1 d2 r2 + } + >> + } + bassMelodieII = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 r1 r1 g2 ees2 d4.( g,8) d'4 d4 bes4( g4 bes4) d4 ees4 c4 d2 g,2 r2 r1 r1 r2 r4 d'4 g2 f4 e4 f4 d4 a'4 bes4 f2 d2 g4( ees4 d4) ees4 f4 d4 g4( c,4) d2 g,2 r2 r1 r1 d'4. d8 f4 g4 ees2 d4 d4 g2( d4) d4 g2 d4 r4 r1 r1 + R1. R1. + d2 f4 g4 ees2 d4 d4 g2 d4 r4 r1 r1 r1 + R1. + r1 r1 d2 f4 g4 ees2 d4 r4 cis2 d4 d4 e2 f2 fis2 fis2 g2 g4 g4 g2 aes2 a2 fis4 fis4 g2 c,2 a2 c2 d1 d2 r2 + r4 g4 g4 g4 g2 g4 g4 g2 \times 2/3 { d4( d4 d4) } d2 d4 r4 r4 g4( d4 d4) d2 g4 r4 fis2 e4 e4 a,2 b4 c4 c1 cis2 cis2 d2 d4 r4 r2 r4 g4 g2 g4 g4 g2 \times 2/3 { d4( d4 d4) } d2 d4 d4 d2 d2 d2 g4 r4 fis2 e4 e4 a,2 b4 c4 c1 cis2 cis2 d2 d4 r4 g2 g4 g4 g2 g4 g4 g2 g4 g4 g2 r4 g4 g2 g4 g4 g2 r4 g4 g1 ~ g1 r1 r2 r4 g,4 + d'2 f4 g4 ees2 d4 d4 g2 d4 d4 g2 d4 r4 r1 r1 r1 r1 r1 r1 r1 d4. d8 f4 g4 ees2 d4 d4 g2( d4) d4 g2 d4 r4 r1 r1 r1 + R1. + r1 g2 g4 g4 g2 g2 g,2 g4 g4 g1 g2 g2 g1 ~ g1 ~ g2 r2 + } + >> + } + diff --git a/hr/michi/darthula/stimmen_.ly b/hr/michi/darthula/stimmen_.ly new file mode 100644 index 0000000..ee2a2f8 --- /dev/null +++ b/hr/michi/darthula/stimmen_.ly @@ -0,0 +1,714 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + r1 + r1 + r1 + r1 + r1 + R1. + R1. + r1 + r1 + r1 + r1 + r1 + r1 + R1. + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + d2 c2 + a4.( bes8) a2 + d4( g4) f4 d4 bes4 ees4 + d2 bes2 r2 + r1 + r1 + r2 r4 d4 + d2. d4 + d4 f4 e4 d4 + c2 d2 + d4( ees4 f4) g4 c,4 d4 + bes4( c4 a2) + g2 r2 + r1 + r2 r4 a4 + bes2 bes4 r4 + r4 bes4 bes4 bes4 + e2 d4 r4 + r4 d4 d4 d4 + g2 fis4 r4 + ees2 d4 c4 + bes2 a2 + c2 a2 + g1 + fis2 r2 + r4 g4 a4 g4 + b2 d4 e4 + g2 \times 2/3 { e4( d4 e4) } + d2 b4 r4 + r4 d4 \times 2/3 { e4( d4) e4 } + d2 b4 r4 + d2 e4 b4 + d4( c4) b4 a4 + bes2 a4 g4 + bes4( g'4) fis4 e4 + cis2 d4 r4 + b2 d4 e4 + g2 b,4 r4 + r4 e4 a,2 + r4 b4 d4 b4 + \times 2/3 { b4( ais4 b4) } \times 2/3 { c4( b4 c4) } + b2( d4) r4 + r1 + r1 + r1 + r1 + r1 + r2 r4 g,4 + b2 d4 e4 + g2 r4 g,4 + b2 d4 e4 + g2 r4 g,4 + b2 c4 d4 + f1 ~ + f4 r4 r2 + r1 + r1 + r1 + r1 + r1 + r1 + d2 c2 + a4.( bes8) a4 a4 + d4( g4) f4 d4 + bes4 ees4 d2( + bes2) r2 + r1 + r1 + r1 + r1 + r1 + r2 r4 d4 + d2 d4 d4 + d4( f4) e4( d4) + c4 c4 d2 + d4( ees4) f4 g4 c,4 d4 + bes4( c4) a2 + g4 r4 r2 + r2 r4 d'4 + ees2( d4) r4 + r1 + r1 + r1 + r1 + d,1 + } + >> + } + + altMelodieI = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + d2 f4 g4 + ees2 d4 a'4 + bes2( a4) r4 + r1 + r1 + R1. + r2 r2 r4 d,4 + d2 f4 g4 + ees2( d4) a'4 + bes2( a4) r4 + r1 + r1 + r1 + R1. + r1 + r1 + d,4. d8 f4 g4 + ees2 d4 ees4 + f2( c4) bes4 + c2 d4 r4 + r1 + r1 + bes'2 g2 + fis4.( g8) fis2 + g4( d'4) d4 f,4 g4 c4 + a2 g2 r2 + r1 + r1 + r2 r4 a4 + bes2( a4) g4 + a4 d4 c4 bes4 + a2 a2 + bes2( d4) bes4 a4 a4 + g2. fis4 + g2 r2 + r1 + r2 r4 a4 + g2 g4 r4 + r4 g4 f4 f4 + bes2 fis4 r4 + r4 b4 b4 b4 + c2 c4 r4 + c2 d4 a4 + bes4( g4) g2 + g2 g2 + g1 + d2 r2 + r4 g4 g4 g4 + g2 b4 b4 + b2 \times 2/3 { a4( b4 a4) } + b2 g4 r4 + r4 b4 \times 2/3 { a4( b4) a4 } + b2 g4 r4 + a2 b4 b4 + a2 gis4 a4 + g2 fis4 e4 + g2 fis4 e4 + bes'2 a4 r4 + b2 b4 b4 + b2 b4 r4 + r4 b4 a2 + r4 b4 b4 b4 + \times 2/3 { d,4( cis4 d4) } \times 2/3 { a'4( b4 a4) } + b2 r2 + r1 + r1 + r1 + r1 + r1 + r2 r4 g4 + g2 b4 b4 + b2 r4 g4 + g2 b4 b4 + b2 r4 g4 + g2 a4 b4 + g4 b4 d2 ~ + d2. d,4 + f2 ees2 + d4 r4 r2 + r1 + r1 + r1 + r1 + bes'2 g2 + fis4.( g8) f4 f4 + g4( d'4) d4 f,4 + g4 c4 a2( + g2) r2 + d4. d8 f4 g4 + ees2 d4 ees4 + f2( c4) bes4 + c2 d4 r4 + r1 + r2 r4 a'4 + bes2 a4 g4 + a4( d4) c4( bes4) + a4 a4 a2 + bes2 d4 bes4 a4 a4 + g2. fis4 + g4 r4 r2 + r2 r4 g4 + c2( g4) r4 + r4 a4 bes2( + aes4) r4 r2 + g1( + fis4) r4 r2 + g1 + } + >> + } + altMelodieII = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + d2 f4 g4 + ees2 d4 d4 + g2( d4) r4 + r1 + r1 + R1. + r2 r2 r4 d4 + d2 f4 g4 + ees2( d4) d4 + g2( d4) r4 + r1 + r1 + r1 + R1. + r1 + r1 + d4. d8 f4 g4 + ees2 d4 ees4 + f2( c4) bes4 + c2 d4 r4 + r1 + r1 + g2 ees2 + d2. d4 + bes'2 bes4 a4 g4 g4 + fis2 g2 r2 + r1 + r1 + r2 r4 d4 + g2( f4) e4 + f4 a4 a4 f4 + f2 f2 + g2( bes4) g4 f4 f4 + d4( ees4 d2) + d2 r2 + r1 + r2 r4 d4 + g2 g4 r4 + r4 ais4 ais4 ais4 + fis4( cis'4) b4 r4 + r4 b4 g4 g4 + g2 c4 r4 + fis,2 a4 d,4 + d2 ees2 + ees2 ees2 + d1 + d2 r2 + r4 g4 g4 g4 + g2 g4 g4 + g2 \times 2/3 { fis4( fis4 fis4) } + fis2 g4 r4 + r4 g4( fis4 fis4) + fis2 g4 r4 + a2 gis4 gis4 + e2 e4 e4 + e2 fis4 g4 + e2 fis4 g4 + e2 fis4 r4 + g2 g4 g4 + g2 g4 r4 + r4 g4 fis2 + r4 fis4 g4 fis4 + fis2 fis4 fis4 + fis2( g4) r4 + r1 + r1 + r1 + r1 + r1 + r2 r4 g4 + g2 g4 g4 + g2 r4 g4 + g2 g4 g4 + g2 r4 g4 + g2 g4 g4 + g4 r4 r2 + r4 f4 b2 + r2 c,2 + d2 bes2 + a4 r4 r2 + r1 + r1 + r1 + g'2 ees2 + d2 d4 a'4 + bes2 bes4 a4 + g4 g4 fis2( + d2) r2 + d4. d8 f4 g4 + ees2 d4 ees4 + f2( c4) bes4 + c2 d4 r4 + r1 + r2 r4 d4 + g2 f4 e4 + f4( a4) a4( f4) + f4 f4 f2 + g2 bes4 g4 f4 f4 + d4 ees4 d2 + d2 f4 g4 + ees2 d4 r4 + r1 + r4 d4 g2( + d4) r4 r2 + g,1( + a4) r4 r2 + <b g>1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + r1 + r1 + r1 + d2 c2 + a4.( bes8) a4 a4 + d4( g4 f4) d4 bes4 ees4 + d2 bes2 r2 + r1 + r1 + r2 r4 d4 + d2 d4 d4 + d4 f4 e4 d4 + c2 d2 + d4( ees4 f4) g4 c,4 d4 + bes4( c4) a2 + g2 r2 + r1 + g4. g8 bes4 c4 + a2 a4 g4 + g2( a4) a4 + bes2 a4 r4 + r1 + r4 g4( ees'4) c4 + d4.( g,8) d'4 r4 + r4 g,4 bes4 d4 ees4 c4 + d2 g,2 r2 + r1 + r1 + r1 + r4 g4 d'4 g,4 + d'4 d,4 a'4 bes4 + f2 r4 d4 + g4( ees4 bes'4) ees,4 f4 d4 + g4( c,4 d2) + g2 r2 + r1 + r1 + r2 r4 bes4 + cis2 cis4 r4 + r4 cis4 d4 d4 + g2 f4 r4 + r4 ees4 ees4 ees4 + a2 d,2 + d2 c4 c4 + ees2 c2 + a1 + a2 r2 + r4 b4 c4 b4 + d2 g4 e4 + d2 \times 2/3 { c4( b4 c4) } + b2 d4 r4 + r4 b4 \times 2/3 { c4( b4) c4 } + b2 d4 r4 + d2 b4 e4 + e2 d4 c4 + g2 a4 bes4 + g2 a4 bes4 + e2 d4 r4 + r2 r4 g,4 + b2 d4 e4 + g2 \times 2/3 { e4( d4 e4) } + d2 b4 d4 + \times 2/3 { fis4( e4) d4 } \times 2/3 { e4( d4) e4 } + d2 b4 r4 + d2 e4 b4 + d4( c4) b4 a4 + b2 a4 g4 + bes4( g'4) fis4 e4 + cis2 d4 r4 + b2 d4 e4 + g2 b,4 g4 + b2 d4 e4 + g2 r4 g,4 + b2 c4 d4 + f2 r4 d4 + g2. d4 + g1 + r2 g,2 + bes2 g2 + a4 r4 r2 + r1 + r1 + r1 + r4 g4( ees'4) c4 + d4.( g,8) d'4 r4 + r4 g,4 bes4( d4 + ees4) c4 d2( + g,2) r2 + r1 + g4. g8 bes4 c4 + a2 a4 g4 + g2( a4) a4 + bes2 a4 r4 + r1 + r4 g4 d'4 g,4 + d'4( d,4) a'4 bes4 + f4 f4 r4 d4 + g4( ees4) bes'4 ees,4 f4 d4 + g4( c,4) d2 + g4 r4 r2 + r1 + g2 bes4 c4 + a2 g4 r4 + r2 b2 + c1 ~ + c1( + b2) r2 + } + >> + } + + bassMelodieI = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 + r1 + r1 + bes2 g2 + fis4.( g8) f4 f4 + g4( bes4 d4) f,4 g4 g4 + f2 g2 r2 + r1 + r1 + r2 r4 a4 + bes2 a4 g4 + a4 a4 c4 bes4 + a2 a2 + bes4 g4 bes2 a2 + g2. fis4 + g2 r2 + r1 + r1 + d4. d8 f4 g4 + ees2 d4 a'4 + g2( a4) a4 + bes2 a4 r4 + r1 + r1 + R1. + R1. + d,2 f4 g4 + ees2 d4 a'4 + bes2 a4 r4 + r1 + r1 + r1 + R1. + r1 + r1 + d,2 f4 g4 + ees2 d4 r4 + r2 r4 g4 + bes2 bes4 r4 + r4 ais4 b4 b4 + b2 d4 r4 + r4 c4 c4 c4 + c2 a2 + g2 g4 g4 + g2 a2 + d,1 + d2 r2 + r4 g4 g4 g4 + g2 g4 g4 + g2 \times 2/3 { d4( d4 d4) } + d2 d4 r4 + r4 g4( d4 d4) + d2 g4 r4 + fis2 gis4 e4 + e1 + e4 r4 c4( e4) + e4( bes'4) a4 g4 + g2 d4 r4 + r2 r4 g4 + g2 b4 b4 + b2 \times 2/3 { c4( b4 c4) } + b2 g4 b4 + fis2 d2 + b'2 g4 r4 + a2 gis4 gis4 + e2 gis4 a4 + g2 fis4 e4 + g4( bes4) a4 g4 + e2 fis4 r4 + g2 b4 b4 + b2 g4 g4 + g2 b4 b4 + b2 r4 g4 + g2 a4 b4 + d2 r4 g,4 + b1 ~ + b2( g2) + r2 r4 c,4 + g'2 g2 + d2 f4 g4 + ees2 d4 a'4 + bes2 a4 a4 + bes2 a4 r4 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + d,4. d8 f4 g4 + ees2 d4 a'4 + g2( a4) a4 + bes2 a4 r4 + r1 + r1 + r1 + R1. + r1 + b2 b4 b4 + c2 b4 r4 + r1 + r2 d,2 + f2 g2 + ees1 ~ + ees1 + d2 r2 + } + >> + } + bassMelodieII = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 + r1 + r1 + g2 ees2 + d4.( g,8) d'4 d4 + bes4( g4 bes4) d4 ees4 c4 + d2 g,2 r2 + r1 + r1 + r2 r4 d'4 + g2 f4 e4 + f4 d4 a'4 bes4 + f2 d2 + g4( ees4 d4) ees4 f4 d4 + g4( c,4) d2 + g,2 r2 + r1 + r1 + d'4. d8 f4 g4 + ees2 d4 d4 + g2( d4) d4 + g2 d4 r4 + r1 + r1 + R1. + R1. + d2 f4 g4 + ees2 d4 d4 + g2 d4 r4 + r1 + r1 + r1 + R1. + r1 + r1 + d2 f4 g4 + ees2 d4 r4 + cis2 d4 d4 + e2 f2 + fis2 fis2 + g2 g4 g4 + g2 aes2 + a2 fis4 fis4 + g2 c,2 + a2 c2 + d1 + d2 r2 + r4 g4 g4 g4 + g2 g4 g4 + g2 \times 2/3 { d4( d4 d4) } + d2 d4 r4 + r4 g4( d4 d4) + d2 g4 r4 + fis2 e4 e4 + a,2 b4 c4 + c1 + cis2 cis2 + d2 d4 r4 + r2 r4 g4 + g2 g4 g4 + g2 \times 2/3 { d4( d4 d4) } + d2 d4 d4 + d2 d2 + d2 g4 r4 + fis2 e4 e4 + a,2 b4 c4 + c1 + cis2 cis2 + d2 d4 r4 + g2 g4 g4 + g2 g4 g4 + g2 g4 g4 + g2 r4 g4 + g2 g4 g4 + g2 r4 g4 + g1 ~ + g1 + r1 + r2 r4 g,4 + d'2 f4 g4 + ees2 d4 d4 + g2 d4 d4 + g2 d4 r4 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + d4. d8 f4 g4 + ees2 d4 d4 + g2( d4) d4 + g2 d4 r4 + r1 + r1 + r1 + R1. + r1 + g2 g4 g4 + g2 g2 + g,2 g4 g4 + g1 + g2 g2 + g1 ~ + g1 ~ + g2 r2 + } + >> + } + diff --git a/hr/michi/darthula/texte.ly b/hr/michi/darthula/texte.ly new file mode 100644 index 0000000..283e1c8 --- /dev/null +++ b/hr/michi/darthula/texte.ly @@ -0,0 +1,62 @@ +%some settings% vim: ai sw=2 lbr nu 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 = \lyricmode { + %<+hier den Text für den Tenor eintragen+> + Um dich schwei -- gen die blau -- en Strö -- me Sel -- mas! + Sie trau -- ren um dich, den letz -- ten Zweig, + den letz -- ten Zweig von Thru -- thils Stamm. + Wann er -- stehst du wie -- der in dei -- ner Schö -- ne? + Wann er -- stehst du wie -- der in dei -- ner Schö -- ne? + Du schläfst im Gra -- be lan -- gen Schlaf, + dein Mor -- gen -- rot ist fer -- ne! + O nim -- mer, kommt dir die Son -- ne, + die Son -- ne we -- ckend + an dei -- ne Ru -- he -- stät -- te: + Wach auf, wach auf, Dar -- thu -- + \set ignoreMelismata = ##t + la! + Früh -- ling ist drau -- ßen! + \unset ignoreMelismata + die Lüf -- te säu -- seln, + auf grü -- nen Hü -- geln, + hold -- se -- lig, hold -- se -- li -- ges Mäd -- chen! + Wach auf, Dar -- thu -- + \set ignoreMelismata = ##t + la! + Früh -- ling ist drau -- ßen! + \unset ignoreMelismata + die lau -- en Lüf -- te säu -- seln, + auf grü -- nen Hü -- geln, + hold -- se -- lig, hold -- se -- li -- ges Mäd -- chen, + we -- ben die Blu -- men, + wach auf, Dar -- thu -- la, + wach auf, Dar -- thu -- la, + wach auf, wach auf, wach auf, wach auf! + Wei -- che, Son -- ne, + dem Mäd -- + \set ignoreMelismata = ##t + chen, sie schläft! + \unset ignoreMelismata + Nie er -- steht sie wie -- der + in ih -- rer Schö -- ne! + Nie wie -- der in ih -- rer Schö -- ne, + nie siehst du sie lieb -- lich wan -- deln mehr, + Mäd -- chen von Ko -- la, sie schläft! + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/ebb/dynArt.ly b/hr/michi/ebb/dynArt.ly new file mode 100644 index 0000000..dadde38 --- /dev/null +++ b/hr/michi/ebb/dynArt.ly @@ -0,0 +1,44 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key cis \major + \time 4/4 + s1 + \time 6/8 %9 Takte + s8*54 + \break + \time 4/4 + s1 + \time 6/8 %29 Takte + s8*54 + \break + s8*42 + \break + s8*36 + \break + s8*42 + \break + \time 4/4 + s1 + \time 6/8 %7 Takte + s8*42 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/ebb/ebb.ly b/hr/michi/ebb/ebb.ly new file mode 100644 index 0000000..3f4a5f5 --- /dev/null +++ b/hr/michi/ebb/ebb.ly @@ -0,0 +1,73 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Ebb Tide" + %composer = "<+Komponist+>" + arranger = "Fred King" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 15) + + sop = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "soprane" { \global \voiceOne \sopranMelodie } + %\addlyrics { \sopranText } + >> + + alt = << + \new Voice = "alti" { \global \voiceTwo \altMelodie } + %\addlyrics { \altText } + >> + + ten = << + \new Voice = "tenoere" { \global \voiceOne \tenorMelodie } + %\addlyrics { \tenorText } + >> + + bas = << + \new Voice = "baesse" { \global \voiceTwo \bassMelodie } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \new Staff = frauen << \sop \\ \alt >> + \new Lyrics = bla \with { alignAboveContext = "maenner" } + \new Staff = maenner << \ten \\ \bas >> + \context Lyrics = bla \lyricsto alti \tenorText + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + \layout { + } + } + diff --git a/hr/michi/ebb/midi.lua b/hr/michi/ebb/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/ebb/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/michi/ebb/stimmen.ly b/hr/michi/ebb/stimmen.ly new file mode 100644 index 0000000..316ed15 --- /dev/null +++ b/hr/michi/ebb/stimmen.ly @@ -0,0 +1,62 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c''' { + << + { \meta } + %\sopranArt + %the actual tune + { + gis2 eis2 bis2 cis8 dis8 bis2 cis8 dis8 eis2 fis8 gis8 eis2 ~ eis8 dis8 gis2 gis8 fis8 gis2 ais8 b8 gis2 fis8 eis8 gis8 fis4 eis4. dis2. %cis2 cis8 cis8 dis2 dis8 dis8 cis2 dis8 eis8 cis8 fis4 fis4. fis2. + gis2 eis2 bis2 cis8 dis8 bis2 cis8 dis8 eis2 fis8 gis8 eis2 ~ eis8 dis8 %eis2 dis2 cis2 cis8 cis8 cis2 cis8 cis8 ais2 bis8 cis8 dis2 ~ dis8 dis8 + gis2 gis8 fis8 gis2 ais8 b8 gis2 fis8 eis8 ais2. ~ ais2. fis2. ~ fis4. fis8 fis8 fis8 a2. eis8 eis8 eis8 eis4. eis4 eis4 eis4 %ais2. ~ ais4. ais8 bis8 ais8 bis2. fis8 fis8 fis8 fis4. fis4 gis4 fis4 + a2. ~ a2. gis2. ~ gis4 a2 ~ a2 ais4 ~ %ais2. ~ ais2. ais2. ~ ais4 ais2 ~ ais2 ais4 ~ + ais2. ~ ais4 gis2 ~ gis4 r4 gis8 gis8 gis2. ~ gis4 eis2 ~ eis2 dis4 ~ dis2. b2. a2. gis2. gis'2 eis2 bis2 cis8 dis8 bis2 cis8 dis8 eis2 fis8 gis8 eis2 eis8 dis8 gis2. ~ gis2. ~ gis2. + } + >> + } + + altMelodie = \relative c''' { + << + { \meta } + %\altArt + %the actual tune + { + gis2 eis2 gis,2 gis8 gis8 ais2 ais8 ais8 ais2 ais8 ais8 bis2 ~ bis8 bis8 cis2 cis8 cis8 dis2 dis8 dis8 d2 d8 d8 d8 cis4 cis4. cis2. gis2 bis2 gis2 gis8 gis8 ais2 ais8 ais8 ais2 ais8 ais8 bis2 ~ bis8 bis8 cis2 cis8 cis8 dis2 dis8 dis8 d2 d8 d8 gis,2. ~ gis2 ais4 ais2. ~ ais4. ais8 bis8 ais8 bis2. dis8 cis8 bis8 cis4. cis4 dis4 cis4 dis2. ~ dis2 cis8 dis8 eis2. dis8 cis8 eis2 ~ eis4 dis8 cis8 eis4 ~ eis2 dis4 cis4 eis2 ~ eis4 r4 eis8 eis8 cis2. bis8 ais8 cis2 ~ cis4 bis8 ais8 cis4 ~ cis2. b2. a2. gis2. gis2 bis2 gis2 gis8 gis8 ais2 ais8 ais8 cis2 cis8 cis8 c2 c8 cis8 cis4 dis4 d4 cis4 bis2 ~ bis2. + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + gis2 eis2 eis2 eis8 eis8 eis2 eis8 eis8 cis2 dis8 eis8 fis2 ~ fis8 fis8 eis2 eis8 eis8 fis2 fis8 fis8 eis2 fis8 gis8 eis8 a4 a4. a2. gis2 fis2 eis2 eis8 eis8 eis2 eis8 eis8 cis2 dis8 eis8 fis2 ~ fis8 fis8 eis2 eis8 eis8 fis2 fis8 fis8 eis2 fis8 gis8 d'2. ~ d2. cis2. ~ cis4. cis8 dis8 cis8 dis2. a8 a8 a8 ais4. ais4 bis4 ais4 + cis2. ~ cis2. bis2. ~ bis4 cis2 ~ cis2 cis4 ~ cis2. ~ cis4 bis2 ~ bis4 r4 bis8 bis8 gis2. ~ gis4 ais2 ~ ais2 a4 ~ a2. b2. a2. gis2. gis2 fis2 eis2 eis8 eis8 eis2 eis8 eis8 ais2 ais8 ais8 a2 a8 a8 gis4 fis4 eis4 e4 dis2 ~ dis2. + } + >> + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + gis2 eis2 cis2 cis8 cis8 ais2 ais8 ais8 fis2 fis8 fis8 gis2 ~ gis8 gis8 cis2 cis8 cis8 b2 b8 b8 ais2 ais8 ais8 ais8 dis4 eis4. fis2. gis2 gis,2 cis2 cis8 cis8 ais2 ais8 ais8 fis2 fis8 fis8 gis2 ~ gis8 gis8 cis2 cis8 cis8 b2 b8 b8 ais2 ais8 ais8 eis'2. ~ eis2. fis2. ~ fis4. fis8 fis8 fis8 eis2. bis8 cis8 dis8 ais4. ais4 a4 ais4 fis'2. ~ fis2. cis2. ~ cis4 cis2 ~ cis2 fis4 ~ fis2. ~ fis4 fis2 ~ fis4 r4 fis8 fis8 eis2. ~ eis4 ais,2 ~ ais2 fis4 ~ fis2. b'2. a2. gis2. gis2 gis,2 cis2 cis8 cis8 ais2 ais8 ais8 fis'2 fis8 fis8 fis2 fis8 fis8 eis4 b4 ais4 a4 gis2 ~ gis2. + } + >> + } + diff --git a/hr/michi/ebb/texte.ly b/hr/michi/ebb/texte.ly new file mode 100644 index 0000000..1abdd64 --- /dev/null +++ b/hr/michi/ebb/texte.ly @@ -0,0 +1,43 @@ +%some settings% vim: ai sw=2 lbr nu 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 = \lyricmode { + %<+hier den Text für den Tenor eintragen+> + First the tide ru -- shes in, + plants a kiss on the shore. + Then rolls out to sea, + and the sea is ve -- ry still once more. + So I rush to your side, + like the on -- com -- ing tide. + With one bur -- ning thought, + “wil your arms op -- en wide?” + At last we’re face to face + and as we kissed through an em -- brace, + I can tell + I can feel + you are love + you are real, + Rea -- lly mine, + in the wind + in the rain, + in the sun. + Like the tide at it’s ebb, + I’m at peace in the web + of your love. + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/exsultate/dynArt.ly b/hr/michi/exsultate/dynArt.ly new file mode 100644 index 0000000..218fff6 --- /dev/null +++ b/hr/michi/exsultate/dynArt.ly @@ -0,0 +1,33 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key aes \major + \time 3/4 + s2.*8 + \time 2/2 + s1*55 + \bar "||" + \time 3/4 + s2.*8 + \time 4/4 + s1*5 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/exsultate/exsultate.ly b/hr/michi/exsultate/exsultate.ly new file mode 100644 index 0000000..bf744b9 --- /dev/null +++ b/hr/michi/exsultate/exsultate.ly @@ -0,0 +1,72 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Exsultate Justi" + composer = "Ludovico da Viadana" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 15) + + 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 } << + \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/michi/exsultate/midi.lua b/hr/michi/exsultate/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/exsultate/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/michi/exsultate/stimmen.ly b/hr/michi/exsultate/stimmen.ly new file mode 100644 index 0000000..55762e3 --- /dev/null +++ b/hr/michi/exsultate/stimmen.ly @@ -0,0 +1,61 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + aes2 aes4 aes2 bes4 c4 c4 ees4 des2 des4 c4 ees4 des4 c2 aes4 bes2 c4 bes2 bes4 c2 c4 c4 des4 des8 des8 c4 des4 ees2 ees4 ees4 f4 f8 f8 ees4 bes4 bes2 c2 des8[ c8 des8 ees8] f8[ ees8 des8 c8] bes4 c4 bes4. bes8 c2 ees4 ees4 f4 f8 f8 ees4 d4 ees1 r4 f4 f8[ ees8 des8 c8] bes4 aes2 g4 aes4 ees'2 ees4 des4 des8 des8 c4 c8 c8 bes4 bes4 ees4 ees4 des4 des8 des8 c4 c8 c8 bes2 aes2 r2 c2 ~ c4 bes8 aes8 bes4 ees,4 r1 ees'1 ~ ees2 des4 c4 bes2 ees,2 r4 ees'4 ees4 ees4 des2 c2 r2 r4 ees4 ees4 ees4 des2 c2 r2 r2 r4 bes4 ~ bes8 bes8 bes4 c8[ des8 ees8 c8] des8[ ees8 f8 bes,8] c8[ des8 ees8 c8] d4 ees2 d4 ees1 r2 ees4 ees4 des4 des8 des8 c2 bes4 bes4 aes4 aes4 g4 c2 aes4 g2 f2 g2 r2 r1 r2 ees'4 ees4 des4 des8 des8 c2 bes2 r2 c2. c4 bes4 bes8 bes8 aes2 g2 r4 ees'4 c4 c8 c8 c4 bes4 aes2 aes4 ees'4 c4 c8 c8 c4 bes4 aes8[ bes8 c8 des8] ees2 ees4 ees4 ees4 ees8 des8 c2 bes2 ~ bes4 aes4 aes2 ~ aes4 g8[ f8] g2 aes1 + aes2 aes4 aes2 bes4 c4 c4 ees4 des2 des4 c4 ees4 des4 c2 aes4 bes2 c4 bes2 bes4 c1 des1 c1 aes2. aes4 aes1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + ees2 ees4 f2 g4 aes4 aes4 g4 bes2 f4 aes4 aes4 f4 aes4 g4 f4 f2 aes4 g2 g4 aes2 aes4 aes4 aes4 aes8 aes8 aes4 aes4 g2 aes4 aes4 aes4 aes8 aes8 aes4 f4 g2 aes2 f8[ ees8 f8 g8] aes4 f4 g4 aes2 g4 aes2 aes4 aes4 aes4 aes8 aes8 aes4 aes4 g2 aes2 f8[ ees8 f8 g8] aes4 f4 g4 ees2 ~ ees8[ ees8] ees2 r2 r2 ees4 aes4 f4 f8 f8 ees4 aes8 aes8 f4 f4 ees4 aes4 f4 f8 f8 ees4 ees8 ees8 f2 aes2 r2 r4 aes4 ~ aes4 g8 f8 ees2 ees2 r4 aes4 ~ aes4 g8 f8 g4 aes4 ~ aes4 g8[ f8] g2 aes1 r4 aes4 aes4 aes4 f2 ees2 r2 r4 aes4 aes4 aes4 aes2 aes2 g2 ~ g2 aes2 f2 aes2 ~ aes4 g4 f2 g2 g4 g4 aes4 aes8 f8 g4 ees4 r2 aes4 aes4 g4 g8 g8 f4 f4 ees4 ees8 ees8 ees4 f4 ~ f8 ees8 ees2 d4 ees2 g4 g4 aes4 aes8 f8 g4 aes4 bes2 r2 r2 aes4 aes4 g4 g8 g8 f2 ees4 aes2 aes4 g4 g8 g8 f2 ees2 r2 ees1 ees2 ees4 g4 ees2 ees2 ees2 ees2 r4 c4 c4 c8 bes8 aes4 aes'4 f2 ees4 ees4 ees4 ees8 ees8 ees4 ees4 ees2 ees1 + ees2 ees4 f2 g4 aes4 aes4 g4 bes2 f4 aes4 aes4 f4 aes4 g4 f4 f2 aes4 g2 g4 aes1 aes1 aes2 g2 f2. f4 ees1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + c2 c4 c2 ees4 ees4 ees4 ees4 f2 des4 ees4 c4 des4 ees2 f4 des2 ees4 ees2 ees4 ees2 ees4 ees4 f4 f8 f8 ees4 des4 bes2 c4 c4 des4 des8 des8 c4 des4 ees2 aes,2 des1 ees1 aes,2 c4 c4 des4 des8 des8 c4 aes4 bes2 c2 des8[ c8 des8 ees8] f4 aes,4 ees'4 c4 bes4. bes8 aes2 r2 r2 aes4 aes4 bes4 bes8 bes8 c4 c8 c8 des4 des4 aes4 aes4 bes4 bes8 bes8 c4 c8 c8 des2 ees2 ees2. des8 c8 bes4 bes4 c2 ~ c2 bes4 aes4 bes4 c4 bes4 ees4 ~ ees4 bes8 c8 bes2 c1 r4 f4 ees4 ees4 des2 c2 r2 r4 des4 ees4 ees4 f2 ees2 ees2 ~ ees4 ees4 ees2 r1 r2 bes2 bes2 ees4 ees4 des4 des8 des8 c2 bes4 bes4 aes8[ bes8 c8 des8] ees4 ees,4 f8[ g8 aes8 bes8] c2 aes4 f4 g4. aes8 bes2 ees,1 r2 ees'4 ees4 des4 des8 des8 c2 bes2 r2 r1 r4 ees2 ees4 ees4 ees8 ees8 c2 ~ c2 bes2 r2 r4 ees,4 aes4 aes8 aes8 aes4 bes4 c2 aes4 ees4 aes4 aes8 aes8 aes4 bes4 c4. des8 ees2 ees2 des2 c2 c4 c4 bes4 c4 bes2 aes1 + c2 c4 c2 ees4 ees4 ees4 ees4 f2 des4 ees4 c4 des4 ees2 f4 des2 ees4 ees2 ees4 ees1 f1 ~ f2 ees2 des2. des4 c1 + } + >> + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + aes2 aes4 f2 ees4 aes4 aes4 c4 bes2 bes4 aes4 aes4 bes4 c2 des4 bes2 aes4 ees2 ees4 aes,2 aes'4 aes4 des,4 des8 des8 aes'4 f4 ees2 aes4 aes4 des,4 des8 des8 aes'4 bes4 ees,2 r2 r1 r1 r2 aes4 aes4 des,4 des8 des8 aes'4 f4 ees2 aes,2 des1 ees1 aes,2 aes'4 aes4 bes4 bes8 bes8 c4 c8 c8 des4 des4 aes4 aes4 bes4 bes8 bes8 c4 c8 c8 des2 aes2 r2 aes2 ~ aes4 g8 f8 ees2 ees2 aes2 ~ aes2 g4 f4 ees1 ~ ees1 aes,1 r4 des4 aes'4 aes4 des,2 aes'2 r2 r4 des,4 aes'4 aes4 des2 aes2 ees2 ~ ees2 aes2 bes2 aes2 bes1 ees,1 r1 r1 r1 r1 r1 r2 ees'4 ees4 des4 des8 des8 c2 bes2 r2 r2 aes4 aes4 ees'4 ees8 ees8 des2 aes2 aes4 aes4 ees4 ees8 ees8 f2 c2 ees2 aes4 aes8 aes8 aes4 bes4 c2 aes4 ees4 aes4 aes8 aes8 aes4 bes4 c2 aes4 ees4 c4 c8 bes8 aes2 ~ aes2 bes2 c2. des4 ees1 aes,1 + aes'2 aes4 f2 ees4 aes4 aes4 c4 bes2 bes4 aes4 aes4 bes4 c2 des4 bes2 aes4 ees2 ees4 aes,1 des2. ees4 f2 c2 des2. des4 aes1 + } + >> + } + diff --git a/hr/michi/exsultate/stimmen_.ly b/hr/michi/exsultate/stimmen_.ly new file mode 100644 index 0000000..14e2706 --- /dev/null +++ b/hr/michi/exsultate/stimmen_.ly @@ -0,0 +1,357 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + aes2 aes4 + aes2 bes4 + c4 c4 ees4 + des2 des4 + c4 ees4 des4 + c2 aes4 + bes2 c4 + bes2 bes4 + c2 c4 c4 + des4 des8 des8 c4 des4 + ees2 ees4 ees4 + f4 f8 f8 ees4 bes4 + bes2 c2 + des8[ c8 des8 ees8] f8[ ees8 des8 c8] + bes4 c4 bes4. bes8 + c2 ees4 ees4 + f4 f8 f8 ees4 d4 + ees1 + r4 f4 f8[ ees8 des8 c8] + bes4 aes2 g4 + aes4 ees'2 ees4 + des4 des8 des8 c4 c8 c8 + bes4 bes4 ees4 ees4 + des4 des8 des8 c4 c8 c8 + bes2 aes2 + r2 c2 ~ + c4 bes8 aes8 bes4 ees,4 + r1 + ees'1 ~ + ees2 des4 c4 + bes2 ees,2 + r4 ees'4 ees4 ees4 + des2 c2 + r2 r4 ees4 + ees4 ees4 des2 + c2 r2 + r2 r4 bes4 ~ + bes8 bes8 bes4 c8[ des8 ees8 c8] + des8[ ees8 f8 bes,8] c8[ des8 ees8 c8] + d4 ees2 d4 + ees1 + r2 ees4 ees4 + des4 des8 des8 c2 + bes4 bes4 aes4 aes4 + g4 c2 aes4 + g2 f2 + g2 r2 + r1 + r2 ees'4 ees4 + des4 des8 des8 c2 + bes2 r2 + c2. c4 + bes4 bes8 bes8 aes2 + g2 r4 ees'4 + c4 c8 c8 c4 bes4 + aes2 aes4 ees'4 + c4 c8 c8 c4 bes4 + aes8[ bes8 c8 des8] ees2 + ees4 ees4 ees4 ees8 des8 + c2 bes2 ~ + bes4 aes4 aes2 ~ + aes4 g8[ f8] g2 + aes1 + aes2 aes4 + aes2 bes4 + c4 c4 ees4 + des2 des4 + c4 ees4 des4 + c2 aes4 + bes2 c4 + bes2 bes4 + c1 + des1 + c1 + aes2. aes4 + aes1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + ees2 ees4 + f2 g4 + aes4 aes4 g4 + bes2 f4 + aes4 aes4 f4 + aes4 g4 f4 + f2 aes4 + g2 g4 + aes2 aes4 aes4 + aes4 aes8 aes8 aes4 aes4 + g2 aes4 aes4 + aes4 aes8 aes8 aes4 f4 + g2 aes2 + f8[ ees8 f8 g8] aes4 f4 + g4 aes2 g4 + aes2 aes4 aes4 + aes4 aes8 aes8 aes4 aes4 + g2 aes2 + f8[ ees8 f8 g8] aes4 f4 + g4 ees2 ~ ees8[ ees8] + ees2 r2 + r2 ees4 aes4 + f4 f8 f8 ees4 aes8 aes8 + f4 f4 ees4 aes4 + f4 f8 f8 ees4 ees8 ees8 + f2 aes2 + r2 r4 aes4 ~ + aes4 g8 f8 ees2 + ees2 r4 aes4 ~ + aes4 g8 f8 g4 aes4 ~ + aes4 g8[ f8] g2 + aes1 + r4 aes4 aes4 aes4 + f2 ees2 + r2 r4 aes4 + aes4 aes4 aes2 + aes2 g2 ~ + g2 aes2 + f2 aes2 ~ + aes4 g4 f2 + g2 g4 g4 + aes4 aes8 f8 g4 ees4 + r2 aes4 aes4 + g4 g8 g8 f4 f4 + ees4 ees8 ees8 ees4 f4 ~ + f8 ees8 ees2 d4 + ees2 g4 g4 + aes4 aes8 f8 g4 aes4 + bes2 r2 + r2 aes4 aes4 + g4 g8 g8 f2 + ees4 aes2 aes4 + g4 g8 g8 f2 + ees2 r2 + ees1 + ees2 ees4 g4 + ees2 ees2 + ees2 ees2 + r4 c4 c4 c8 bes8 + aes4 aes'4 f2 + ees4 ees4 ees4 ees8 ees8 + ees4 ees4 ees2 + ees1 + ees2 ees4 + f2 g4 + aes4 aes4 g4 + bes2 f4 + aes4 aes4 f4 + aes4 g4 f4 + f2 aes4 + g2 g4 + aes1 + aes1 + aes2 g2 + f2. f4 + ees1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + c2 c4 + c2 ees4 + ees4 ees4 ees4 + f2 des4 + ees4 c4 des4 + ees2 f4 + des2 ees4 + ees2 ees4 + ees2 ees4 ees4 + f4 f8 f8 ees4 des4 + bes2 c4 c4 + des4 des8 des8 c4 des4 + ees2 aes,2 + des1 + ees1 + aes,2 c4 c4 + des4 des8 des8 c4 aes4 + bes2 c2 + des8[ c8 des8 ees8] f4 aes,4 + ees'4 c4 bes4. bes8 + aes2 r2 + r2 aes4 aes4 + bes4 bes8 bes8 c4 c8 c8 + des4 des4 aes4 aes4 + bes4 bes8 bes8 c4 c8 c8 + des2 ees2 + ees2. des8 c8 + bes4 bes4 c2 ~ + c2 bes4 aes4 + bes4 c4 bes4 ees4 ~ + ees4 bes8 c8 bes2 + c1 + r4 f4 ees4 ees4 + des2 c2 + r2 r4 des4 + ees4 ees4 f2 + ees2 ees2 ~ + ees4 ees4 ees2 + r1 + r2 bes2 + bes2 ees4 ees4 + des4 des8 des8 c2 + bes4 bes4 aes8[ bes8 c8 des8] + ees4 ees,4 f8[ g8 aes8 bes8] + c2 aes4 f4 + g4. aes8 bes2 + ees,1 + r2 ees'4 ees4 + des4 des8 des8 c2 + bes2 r2 + r1 + r4 ees2 ees4 + ees4 ees8 ees8 c2 ~ + c2 bes2 + r2 r4 ees,4 + aes4 aes8 aes8 aes4 bes4 + c2 aes4 ees4 + aes4 aes8 aes8 aes4 bes4 + c4. des8 ees2 + ees2 des2 + c2 c4 c4 + bes4 c4 bes2 + aes1 + c2 c4 + c2 ees4 + ees4 ees4 ees4 + f2 des4 + ees4 c4 des4 + ees2 f4 + des2 ees4 + ees2 ees4 + ees1 + f1 ~ + f2 ees2 + des2. des4 + c1 + } + >> + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + aes2 aes4 + f2 ees4 + aes4 aes4 c4 + bes2 bes4 + aes4 aes4 bes4 + c2 des4 + bes2 aes4 + ees2 ees4 + aes,2 aes'4 aes4 + des,4 des8 des8 aes'4 f4 + ees2 aes4 aes4 + des,4 des8 des8 aes'4 bes4 + ees,2 r2 + r1 + r1 + r2 aes4 aes4 + des,4 des8 des8 aes'4 f4 + ees2 aes,2 + des1 + ees1 + aes,2 aes'4 aes4 + bes4 bes8 bes8 c4 c8 c8 + des4 des4 aes4 aes4 + bes4 bes8 bes8 c4 c8 c8 + des2 aes2 + r2 aes2 ~ + aes4 g8 f8 ees2 + ees2 aes2 ~ + aes2 g4 f4 + ees1 ~ + ees1 + aes,1 + r4 des4 aes'4 aes4 + des,2 aes'2 + r2 r4 des,4 + aes'4 aes4 des2 + aes2 ees2 ~ + ees2 aes2 + bes2 aes2 + bes1 + ees,1 + r1 + r1 + r1 + r1 + r1 + r2 ees'4 ees4 + des4 des8 des8 c2 + bes2 r2 + r2 aes4 aes4 + ees'4 ees8 ees8 des2 + aes2 aes4 aes4 + ees4 ees8 ees8 f2 + c2 ees2 + aes4 aes8 aes8 aes4 bes4 + c2 aes4 ees4 + aes4 aes8 aes8 aes4 bes4 + c2 aes4 ees4 + c4 c8 bes8 aes2 ~ + aes2 bes2 + c2. des4 + ees1 + aes,1 + aes'2 aes4 + f2 ees4 + aes4 aes4 c4 + bes2 bes4 + aes4 aes4 bes4 + c2 des4 + bes2 aes4 + ees2 ees4 + aes,1 + des2. ees4 + f2 c2 + des2. des4 + aes1 + } + >> + } + diff --git a/hr/michi/exsultate/texte.ly b/hr/michi/exsultate/texte.ly new file mode 100644 index 0000000..b55de5a --- /dev/null +++ b/hr/michi/exsultate/texte.ly @@ -0,0 +1,46 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + Ex -- sul -- ta -- te ju -- sti in Do -- mi -- no rec -- tos de -- cet col -- lau -- da -- ti -- o. + Con -- fi -- te -- mi -- ni Do -- mi -- no, + con -- fi -- te -- mi -- ni Do -- mi -- no + in ci -- tha -- ra, + con -- fi -- te -- mi -- ni Do -- mi -- no + in ci -- _ _ _ _ _ tha -- ra, + in psal -- te -- ri -- o de -- cem chor -- da -- rum + in psal -- te -- ri -- o de -- cem chor -- da -- rum + psal -- li -- te il -- li, + psal -- li -- te il -- _ li + psal -- li -- te il -- li + Can -- ta -- te e -- i, + Can -- ta -- te e -- i, + can -- ti -- cum no -- vum + be -- ne psal -- li -- te e -- i + in vo -- _ ci -- fe -- _ ra -- ti -- o -- _ _ ne + be -- ne psal -- li -- te e -- i + be -- ne psal -- li -- te e -- i + in vo -- ci -- fe -- ra -- ti -- o -- ne, + in vo -- ci -- fe -- ra -- ti -- o -- _ _ ne + in vo -- ci -- fe -- ra -- ti -- o -- ne + Ex -- sul -- ta -- te ju -- sti in Do -- mi -- no, + rec -- tos de -- cet col -- lua -- da -- ti -- o, + col -- lau -- da -- ti -- o + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/failed/dynArt.ly b/hr/michi/failed/dynArt.ly new file mode 100644 index 0000000..210643f --- /dev/null +++ b/hr/michi/failed/dynArt.ly @@ -0,0 +1,54 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \inStaffSegno + \key bes \major + \time 4/4 + s1*4 + \repeat volta 2 { + s1*10 + s1*2 + s1*3 + } \alternative { + { + s1 + } + { + s1 + } + } + \break + s1*12 + \break + s1*4 + \bar "||" + \break + s1*6 + \break + s1*4 + s1*2 + s1*4 + \repeat volta 2 { + s1*2 + } + s1*4 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/failed/failed.ly b/hr/michi/failed/failed.ly new file mode 100644 index 0000000..f1a911f --- /dev/null +++ b/hr/michi/failed/failed.ly @@ -0,0 +1,76 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "He Never Failed Me Yet" + composer = "Robert Ray" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 15) + + 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 } << + \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 { + \context { + \Staff + \RemoveEmptyStaves + } + } + } + diff --git a/hr/michi/failed/midi.lua b/hr/michi/failed/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/failed/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/michi/failed/stimmen.ly b/hr/michi/failed/stimmen.ly new file mode 100644 index 0000000..f1e5b3b --- /dev/null +++ b/hr/michi/failed/stimmen.ly @@ -0,0 +1,136 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + r1 r1 r1 + r2 r4 \times 2/3 { f8( g8) bes8 } + \mark \markup { \musicglyph #"scripts.segno" } + \repeat volta 2 { + bes2. ~ \times 2/3 { bes8 bes8 bes8 } c4 bes2 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { bes8 g8 f8 } g2. \times 2/3 { a4 a8 } bes2. ~ \times 2/3 { bes8 bes8 bes8 } \times 2/3 { c4 bes8 } bes2 \times 2/3 { r4 bes8 } \times 2/3 { a4 a8 } \times 2/3 { a4 a8 } \times 2/3 { g4 g8 } \times 2/3 { g4 g8 } \times 2/3 { f4 f8 } \times 2/3 { g4 g8 } a4 \times 2/3 { f8 g8 bes8 } bes2. ~ \times 2/3 { bes8 bes8 bes8 } c4 bes2. r4 d4 ~ \times 2/3 { d4 c4 bes4 } r8 d4 bes8 bes8( g8 ~ g4) f4 f4 \times 2/3 { f4 g8 } bes4 \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } \times 2/3 { g4 bes8 } c4 d4 ~ \times 2/3 { d8 c8 d8 } c4 ~ \times 2/3 { c4 bes8 } + } \alternative { + { + bes2. \times 2/3 { f8( g8) bes8 } + } + { + bes1 + } + } + r8 bes4 bes8 ~ bes8 g4 f8 d8 bes8 ~ bes2. r4 bes8 bes8 \times 2/3 { d8 f8 g8 } \times 2/3 { g4 f8 ~ } f4 f2 r4 r8 bes4 bes8 ~ bes4 ~ \times 2/3 { bes8 g8 f8 } g8 bes8 ~ bes2 r4 r4 c4 ~ \times 2/3 { c4 a4 c4 } a8 f8 f2. \times 2/3 { r4 g4 g4 } \times 2/3 { g4 fis4 g8 g8 } \times 2/3 { a4 a4 a4 } a2 r8 d8 ~ \times 2/3 { d8 c8 bes8 } bes4. g8 \times 2/3 { bes8 c8 d8 ~ } d8 bes8 bes8( g8 ~ g4) f4 f4 \times 2/3 { f4 g8 } bes4 \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } \times 2/3 { g4 bes8 } c4 d4 ~ \times 2/3 { d8 c8 d8 } c4 ~ \times 2/3 { c4 bes8 } bes2. \times 2/3 { f8( g8) bes8 } bes2. ~ \times 2/3 { bes8 bes8 bes8 } c4 bes2 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { bes8 g8 f8 } g2. \times 2/3 { a4 a8 } bes2. ~ \times 2/3 { bes8 bes8 bes8 } \times 2/3 { c4 bes8 } bes2 \times 2/3 { r4 bes8 } \times 2/3 { a4 a8 } \times 2/3 { a4 a8 } \times 2/3 { g4 g8 } \times 2/3 { g4 g8 } \times 2/3 { f4 f8 } \times 2/3 { g4 g8 } a4 \times 2/3 { f8 g8 bes8 } bes2. ~ \times 2/3 { bes8 bes8 bes8 } c4 bes2. r4 d4 ~ \times 2/3 { d4 c4 bes4 } r8 d4 bes8 bes8( g8 ~ g4) f4 f4 \times 2/3 { f4 g8 } bes4 \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } \times 2/3 { g4 bes8 } c4 d4 ~ \times 2/3 { d8 c8 d8 } c4 ~ \times 2/3 { c4 bes8 } bes4 r4 r2 + \repeat volta 2 { + \times 2/3 { r4 des8 } \times 2/3 { des4 des8 } \times 2/3 { bes4 bes8 } \times 2/3 { r4 bes8 } \times 2/3 { des4 des8 } \times 2/3 { ees4 des8 } \times 2/3 { r4 bes8 } r4 + } + f4 f4 \times 2/3 { f4 g8 } bes4 \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } \times 2/3 { g4 bes8 } c4 d4 ~ \times 2/3 { d8 c8 d8 } c4 ~ \times 2/3 { c4 bes8 } bes1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + r1 r1 r1 + r2 r4 \times 2/3 { d8( ees8) f8 } + \repeat volta 2 { + f2. ~ \times 2/3 { f8 f8 f8 } g4 f2 \times 2/3 { d8 ees8 f8 } f4 \times 2/3 { d8 ees8 f8 } f4 \times 2/3 { f8 ees8 d8 } ees2. \times 2/3 { f4 f8 } g2. ~ \times 2/3 { g8 g8 g8 } \times 2/3 { a4 g8 } g2 \times 2/3 { r4 g8 } \times 2/3 { f4 f8 } \times 2/3 { f4 f8 } \times 2/3 { e4 e8 } \times 2/3 { e4 e8 } \times 2/3 { c4 c8 } \times 2/3 { d4 d8 } f4 \times 2/3 { d8 ees8 f8 } f2. ~ \times 2/3 { f8 f8 f8 } g4 f2. + r1 + r1 + d4 d4 \times 2/3 { d4 ees8 } f4 \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 f8 } g4 bes4 ~ \times 2/3 { bes8 a8 bes8 } a4 ~ \times 2/3 { a4 g8 } + } \alternative { + { + f2. \times 2/3 { d8( ees8) f8 } + } + { + f1 + } + } + r8 bes8 bes8 bes8 ~ bes8 g4 f8 d8 bes8 ~ bes2. r4 d8 d8 r8 f4 g8 ~ g8 f4 f8 ~ f2 r8 bes8 \times 2/3 { bes8 bes8 bes8 } bes4. bes8 bes4 bes8 bes8 ~ bes8 bes4. r8 c8 c8 c8 r4 c8 c8 r8 c16 c16 a16 f16 f8 ~ f2 \times 2/3 { r4 g4 g4 } \times 2/3 { g4 fis4 g4 } \times 2/3 { a4 a4 a4 } a2 \times 2/3 { d4 bes8 } \times 2/3 { bes8 bes8 bes8 ~ } bes8 bes4 c8 \times 2/3 { d8 r8 bes8 } \times 2/3 { bes4 c8 } \times 2/3 { d8 bes8 bes8 ~ } bes4 d,4 d4 \times 2/3 { d4 ees8 } f4 \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 f8 } g4 bes4 ~ \times 2/3 { bes8 a8 bes8 } a4 ~ \times 2/3 { a4 g8 } f2. \times 2/3 { d8( ees8) f8 } f2. ~ \times 2/3 { f8 f8 f8 } g4 f2 \times 2/3 { d8 ees8 f8 } f4 \times 2/3 { d8 ees8 f8 } f4 \times 2/3 { f8 ees8 d8 } ees2. \times 2/3 { f4 f8 } g2. ~ \times 2/3 { g8 g8 g8 } \times 2/3 { a4 g8 } g2 \times 2/3 { r4 g8 } \times 2/3 { f4 f8 } \times 2/3 { f4 f8 } \times 2/3 { e4 e8 } \times 2/3 { e4 e8 } \times 2/3 { c4 c8 } \times 2/3 { d4 d8 } f4 \times 2/3 { d8 ees8 f8 } f2. ~ \times 2/3 { f8 f8 f8 } g4 f2. r1 r1 d4 d4 \times 2/3 { d4 ees8 } f4 \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 f8 } g4 bes4 ~ \times 2/3 { bes8 a8 bes8 } a4 ~ \times 2/3 { a4 g8 } f4 r4 r2 + \repeat volta 2 { + \times 2/3 { r4 bes8 } \times 2/3 { bes4 bes8 } \times 2/3 { g4 g8 } \times 2/3 { r4 g8 } \times 2/3 { bes4 bes8 } \times 2/3 { c4 bes8 } \times 2/3 { r4 g8 } r4 + } + d4 d4 \times 2/3 { d4 ees8 } f4 \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 f8 } g4 bes4 ~ \times 2/3 { bes8 a8 bes8 } a4 ~ \times 2/3 { a4 g8 } f1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + r1 r1 r1 + r2 r4 \times 2/3 { bes8( c8) d8 } + \repeat volta 2 { + d2. ~ \times 2/3 { d8 d8 d8 } ees4 d2 \times 2/3 { bes8 c8 d8 } d4 \times 2/3 { bes8 c8 d8 } d4 \times 2/3 { d8 c8 bes8 } c2. \times 2/3 { c4 c8 } d2. ~ \times 2/3 { d8 d8 d8 } \times 2/3 { ees4 d8 } d2 \times 2/3 { r4 d8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { bes4 bes8 } \times 2/3 { bes4 bes8 } \times 2/3 { a4 a8 } \times 2/3 { bes4 bes8 } c4 \times 2/3 { bes8 c8 d8 } d2. ~ \times 2/3 { d8 d8 d8 } ees4 d2. + r1 + r1 + bes4 bes4 \times 2/3 { bes4 c8 } d4 \times 2/3 { c8 c8 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 d8 } ees4 f4 ~ \times 2/3 { f8 ees8 f8 } ees4 ~ \times 2/3 { ees4 ees8 } + } \alternative { + { + d2. \times 2/3 { bes8( c8) d8 } + } + { + d1 + } + } + r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 + bes4 bes4 \times 2/3 { bes4 c8 } d4 \times 2/3 { c8 c8 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 d8 } ees4 f4 ~ \times 2/3 { f8 ees8 f8 } ees4 ~ \times 2/3 { ees4 ees8 } d2. \times 2/3 { bes8( c8) d8 } d2. ~ \times 2/3 { d8 d8 d8 } ees4 d2 \times 2/3 { bes8 c8 d8 } d4 \times 2/3 { bes8 c8 d8 } d4 \times 2/3 { d8 c8 bes8 } c2. \times 2/3 { c4 c8 } d2. ~ \times 2/3 { d8 d8 d8 } \times 2/3 { ees4 d8 } d2 \times 2/3 { r4 d8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { bes4 bes8 } \times 2/3 { bes4 bes8 } \times 2/3 { a4 a8 } \times 2/3 { bes4 bes8 } c4 \times 2/3 { bes8 c8 d8 } d2. ~ \times 2/3 { d8 d8 d8 } ees4 d2. + r1 r1 + bes4 bes4 \times 2/3 { bes4 c8 } d4 \times 2/3 { c8 c8 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 d8 } ees4 f4 ~ \times 2/3 { f8 ees8 f8 } ees4 ~ \times 2/3 { ees4 ees8 } d4 r4 r2 + \repeat volta 2 { + \times 2/3 { r4 f8 } \times 2/3 { f4 f8 } \times 2/3 { ees4 ees8 } \times 2/3 { r4 ees8 } \times 2/3 { f4 f8 } \times 2/3 { g4 f8 } \times 2/3 { r4 ees8 } r4 + } + bes4 bes4 \times 2/3 { bes4 c8 } d4 \times 2/3 { c8 c8 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 d8 } ees4 f4 ~ \times 2/3 { f8 ees8 f8 } ees4 ~ \times 2/3 { ees4 ees8 } d1 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 r1 r1 + r2 r4 \times 2/3 { f8( g8) bes8 } + \repeat volta 2 { + bes2. ~ \times 2/3 { bes8 bes8 bes8 } bes4 bes2 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { bes8 bes8 bes,8 } ees2. \times 2/3 { d4 d8 } g2. ~ \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } g2 \times 2/3 { r4 g8 } \times 2/3 { c,4 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { f4 f8 } \times 2/3 { f4 f8 } f4 \times 2/3 { f8 g8 bes8 } bes2. ~ \times 2/3 { bes8 bes8 bes8 } bes4 bes2. + r1 r1 + f4 f4 \times 2/3 { f4 f8 } f4 \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 d8 } c4 f4 ~ \times 2/3 { f8 f8 f8 } f4 ~ \times 2/3 { f4 f8 } + } \alternative { + { + bes2. \times 2/3 { f8( g8) bes8 } + } + { + bes1 + } + } + r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 + f4 f4 \times 2/3 { f4 f8 } f4 \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 d8 } c4 f4 ~ \times 2/3 { f8 f8 f8 } f4 ~ \times 2/3 { f4 f8 } bes2. \times 2/3 { f8( g8) bes8 } bes2. ~ \times 2/3 { bes8 bes8 bes8 } bes4 bes2 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { bes8 bes8 bes,8 } ees2. \times 2/3 { d4 d8 } g2. ~ \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } g2 \times 2/3 { r4 g8 } \times 2/3 { c,4 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { f4 f8 } \times 2/3 { f4 f8 } f4 \times 2/3 { f8 g8 bes8 } bes2. ~ \times 2/3 { bes8 bes8 bes8 } bes4 bes2. + r1 r1 + f4 f4 \times 2/3 { f4 f8 } f4 \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 d8 } c4 f4 ~ \times 2/3 { f8 f8 f8 } f4 ~ \times 2/3 { f4 f8 } bes4 r4 r2 + \repeat volta 2 { + \times 2/3 { r4 bes8 } \times 2/3 { bes4 bes8 } \times 2/3 { ees,4 ees8 } \times 2/3 { r4 ees8 } \times 2/3 { bes'4 bes8 } \times 2/3 { bes4 bes8 } \times 2/3 { r4 ees,8 } r4 + } + f4 f4 \times 2/3 { f4 f8 } f4 \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 d8 } c4 f4 ~ \times 2/3 { f8 f8 f8 } f4 ~ \times 2/3 { f4 f8 } bes1 + } + >> + } + diff --git a/hr/michi/failed/stimmen_.ly b/hr/michi/failed/stimmen_.ly new file mode 100644 index 0000000..eee057d --- /dev/null +++ b/hr/michi/failed/stimmen_.ly @@ -0,0 +1,326 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + r1 + r1 + r1 + r2 r4 \times 2/3 { f8( g8) bes8 } + \mark \markup { \musicglyph #"scripts.segno" } + \repeat volta 2 { + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + c4 bes2 \times 2/3 { f8 g8 bes8 } + bes4 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { bes8 g8 f8 } + g2. \times 2/3 { a4 a8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + \times 2/3 { c4 bes8 } bes2 \times 2/3 { r4 bes8 } + \times 2/3 { a4 a8 } \times 2/3 { a4 a8 } \times 2/3 { g4 g8 } \times 2/3 { g4 g8 } + \times 2/3 { f4 f8 } \times 2/3 { g4 g8 } a4 \times 2/3 { f8 g8 bes8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + c4 bes2. + r4 d4 ~ \times 2/3 { d4 c4 bes4 } + r8 d4 bes8 bes8( g8 ~ g4) + f4 f4 \times 2/3 { f4 g8 } bes4 + \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } \times 2/3 { g4 bes8 } c4 + d4 ~ \times 2/3 { d8 c8 d8 } c4 ~ \times 2/3 { c4 bes8 } + } \alternative { + { + bes2. \times 2/3 { f8( g8) bes8 } + } + { + bes1 + } + } + r8 bes4 bes8 ~ bes8 g4 f8 + d8 bes8 ~ bes2. + r4 bes8 bes8 \times 2/3 { d8 f8 g8 } \times 2/3 { g4 f8 ~ } + f4 f2 r4 + r8 bes4 bes8 ~ bes4 ~ \times 2/3 { bes8 g8 f8 } + g8 bes8 ~ bes2 r4 + r4 c4 ~ \times 2/3 { c4 a4 c4 } + a8 f8 f2. + \times 2/3 { r4 g4 g4 } \times 2/3 { g4 fis4 g8 g8 } + \times 2/3 { a4 a4 a4 } a2 + r8 d8 ~ \times 2/3 { d8 c8 bes8 } bes4. g8 + \times 2/3 { bes8 c8 d8 ~ } d8 bes8 bes8( g8 ~ g4) + f4 f4 \times 2/3 { f4 g8 } bes4 + \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } \times 2/3 { g4 bes8 } c4 + d4 ~ \times 2/3 { d8 c8 d8 } c4 ~ \times 2/3 { c4 bes8 } + bes2. \times 2/3 { f8( g8) bes8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + c4 bes2 \times 2/3 { f8 g8 bes8 } + bes4 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { bes8 g8 f8 } + g2. \times 2/3 { a4 a8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + \times 2/3 { c4 bes8 } bes2 \times 2/3 { r4 bes8 } + \times 2/3 { a4 a8 } \times 2/3 { a4 a8 } \times 2/3 { g4 g8 } \times 2/3 { g4 g8 } + \times 2/3 { f4 f8 } \times 2/3 { g4 g8 } a4 \times 2/3 { f8 g8 bes8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + c4 bes2. + r4 d4 ~ \times 2/3 { d4 c4 bes4 } + r8 d4 bes8 bes8( g8 ~ g4) + f4 f4 \times 2/3 { f4 g8 } bes4 + \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } \times 2/3 { g4 bes8 } c4 + d4 ~ \times 2/3 { d8 c8 d8 } c4 ~ \times 2/3 { c4 bes8 } + bes4 r4 r2 + \repeat volta 2 { + \times 2/3 { r4 des8 } \times 2/3 { des4 des8 } \times 2/3 { bes4 bes8 } \times 2/3 { r4 bes8 } + \times 2/3 { des4 des8 } \times 2/3 { ees4 des8 } \times 2/3 { r4 bes8 } r4 + } + f4 f4 \times 2/3 { f4 g8 } bes4 + \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } \times 2/3 { g4 bes8 } c4 + d4 ~ \times 2/3 { d8 c8 d8 } c4 ~ \times 2/3 { c4 bes8 } + bes1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + r1 + r1 + r1 + r2 r4 \times 2/3 { d8( ees8) f8 } + \repeat volta 2 { + f2. ~ \times 2/3 { f8 f8 f8 } + g4 f2 \times 2/3 { d8 ees8 f8 } + f4 \times 2/3 { d8 ees8 f8 } f4 \times 2/3 { f8 ees8 d8 } + ees2. \times 2/3 { f4 f8 } + g2. ~ \times 2/3 { g8 g8 g8 } + \times 2/3 { a4 g8 } g2 \times 2/3 { r4 g8 } + \times 2/3 { f4 f8 } \times 2/3 { f4 f8 } \times 2/3 { e4 e8 } \times 2/3 { e4 e8 } + \times 2/3 { c4 c8 } \times 2/3 { d4 d8 } f4 \times 2/3 { d8 ees8 f8 } + f2. ~ \times 2/3 { f8 f8 f8 } + g4 f2. + r1 + r1 + d4 d4 \times 2/3 { d4 ees8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 f8 } g4 + bes4 ~ \times 2/3 { bes8 a8 bes8 } a4 ~ \times 2/3 { a4 g8 } + } \alternative { + { + f2. \times 2/3 { d8( ees8) f8 } + } + { + f1 + } + } + r8 bes8 bes8 bes8 ~ bes8 g4 f8 + d8 bes8 ~ bes2. + r4 d8 d8 r8 f4 g8 ~ + g8 f4 f8 ~ f2 + r8 bes8 \times 2/3 { bes8 bes8 bes8 } bes4. bes8 + bes4 bes8 bes8 ~ bes8 bes4. + r8 c8 c8 c8 r4 c8 c8 + r8 c16 c16 a16 f16 f8 ~ f2 + \times 2/3 { r4 g4 g4 } \times 2/3 { g4 fis4 g4 } + \times 2/3 { a4 a4 a4 } a2 + \times 2/3 { d4 bes8 } \times 2/3 { bes8 bes8 bes8 ~ } bes8 bes4 c8 + \times 2/3 { d8 r8 bes8 } \times 2/3 { bes4 c8 } \times 2/3 { d8 bes8 bes8 ~ } bes4 + d,4 d4 \times 2/3 { d4 ees8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 f8 } g4 + bes4 ~ \times 2/3 { bes8 a8 bes8 } a4 ~ \times 2/3 { a4 g8 } + f2. \times 2/3 { d8( ees8) f8 } + f2. ~ \times 2/3 { f8 f8 f8 } + g4 f2 \times 2/3 { d8 ees8 f8 } + f4 \times 2/3 { d8 ees8 f8 } f4 \times 2/3 { f8 ees8 d8 } + ees2. \times 2/3 { f4 f8 } + g2. ~ \times 2/3 { g8 g8 g8 } + \times 2/3 { a4 g8 } g2 \times 2/3 { r4 g8 } + \times 2/3 { f4 f8 } \times 2/3 { f4 f8 } \times 2/3 { e4 e8 } \times 2/3 { e4 e8 } + \times 2/3 { c4 c8 } \times 2/3 { d4 d8 } f4 \times 2/3 { d8 ees8 f8 } + f2. ~ \times 2/3 { f8 f8 f8 } + g4 f2. + r1 + r1 + d4 d4 \times 2/3 { d4 ees8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 f8 } g4 + bes4 ~ \times 2/3 { bes8 a8 bes8 } a4 ~ \times 2/3 { a4 g8 } + f4 r4 r2 + \repeat volta 2 { + \times 2/3 { r4 bes8 } \times 2/3 { bes4 bes8 } \times 2/3 { g4 g8 } \times 2/3 { r4 g8 } + \times 2/3 { bes4 bes8 } \times 2/3 { c4 bes8 } \times 2/3 { r4 g8 } r4 + } + d4 d4 \times 2/3 { d4 ees8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 f8 } g4 + bes4 ~ \times 2/3 { bes8 a8 bes8 } a4 ~ \times 2/3 { a4 g8 } + f1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + r1 + r1 + r1 + r2 r4 \times 2/3 { bes8( c8) d8 } + \repeat volta 2 { + d2. ~ \times 2/3 { d8 d8 d8 } + ees4 d2 \times 2/3 { bes8 c8 d8 } + d4 \times 2/3 { bes8 c8 d8 } d4 \times 2/3 { d8 c8 bes8 } + c2. \times 2/3 { c4 c8 } + d2. ~ \times 2/3 { d8 d8 d8 } + \times 2/3 { ees4 d8 } d2 \times 2/3 { r4 d8 } + \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { bes4 bes8 } \times 2/3 { bes4 bes8 } + \times 2/3 { a4 a8 } \times 2/3 { bes4 bes8 } c4 \times 2/3 { bes8 c8 d8 } + d2. ~ \times 2/3 { d8 d8 d8 } + ees4 d2. + r1 + r1 + bes4 bes4 \times 2/3 { bes4 c8 } d4 + \times 2/3 { c8 c8 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 d8 } ees4 + f4 ~ \times 2/3 { f8 ees8 f8 } ees4 ~ \times 2/3 { ees4 ees8 } + } \alternative { + { + d2. \times 2/3 { bes8( c8) d8 } + } + { + d1 + } + } + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + bes4 bes4 \times 2/3 { bes4 c8 } d4 + \times 2/3 { c8 c8 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 d8 } ees4 + f4 ~ \times 2/3 { f8 ees8 f8 } ees4 ~ \times 2/3 { ees4 ees8 } + d2. \times 2/3 { bes8( c8) d8 } + d2. ~ \times 2/3 { d8 d8 d8 } + ees4 d2 \times 2/3 { bes8 c8 d8 } + d4 \times 2/3 { bes8 c8 d8 } d4 \times 2/3 { d8 c8 bes8 } + c2. \times 2/3 { c4 c8 } + d2. ~ \times 2/3 { d8 d8 d8 } + \times 2/3 { ees4 d8 } d2 \times 2/3 { r4 d8 } + \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { bes4 bes8 } \times 2/3 { bes4 bes8 } + \times 2/3 { a4 a8 } \times 2/3 { bes4 bes8 } c4 \times 2/3 { bes8 c8 d8 } + d2. ~ \times 2/3 { d8 d8 d8 } + ees4 d2. + r1 + r1 + bes4 bes4 \times 2/3 { bes4 c8 } d4 + \times 2/3 { c8 c8 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 d8 } ees4 + f4 ~ \times 2/3 { f8 ees8 f8 } ees4 ~ \times 2/3 { ees4 ees8 } + d4 r4 r2 + \repeat volta 2 { + \times 2/3 { r4 f8 } \times 2/3 { f4 f8 } \times 2/3 { ees4 ees8 } \times 2/3 { r4 ees8 } + \times 2/3 { f4 f8 } \times 2/3 { g4 f8 } \times 2/3 { r4 ees8 } r4 + } + bes4 bes4 \times 2/3 { bes4 c8 } d4 + \times 2/3 { c8 c8 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 d8 } ees4 + f4 ~ \times 2/3 { f8 ees8 f8 } ees4 ~ \times 2/3 { ees4 ees8 } + d1 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 + r1 + r1 + r2 r4 \times 2/3 { f8( g8) bes8 } + \repeat volta 2 { + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + bes4 bes2 \times 2/3 { f8 g8 bes8 } + bes4 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { bes8 bes8 bes,8 } + ees2. \times 2/3 { d4 d8 } + g2. ~ \times 2/3 { g8 g8 g8 } + \times 2/3 { g4 g8 } g2 \times 2/3 { r4 g8 } + \times 2/3 { c,4 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } + \times 2/3 { f4 f8 } \times 2/3 { f4 f8 } f4 \times 2/3 { f8 g8 bes8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + bes4 bes2. + r1 + r1 + f4 f4 \times 2/3 { f4 f8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 d8 } c4 + f4 ~ \times 2/3 { f8 f8 f8 } f4 ~ \times 2/3 { f4 f8 } + } \alternative { + { + bes2. \times 2/3 { f8( g8) bes8 } + } + { + bes1 + } + } + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + f4 f4 \times 2/3 { f4 f8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 d8 } c4 + f4 ~ \times 2/3 { f8 f8 f8 } f4 ~ \times 2/3 { f4 f8 } + bes2. \times 2/3 { f8( g8) bes8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + bes4 bes2 \times 2/3 { f8 g8 bes8 } + bes4 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { bes8 bes8 bes,8 } + ees2. \times 2/3 { d4 d8 } + g2. ~ \times 2/3 { g8 g8 g8 } + \times 2/3 { g4 g8 } g2 \times 2/3 { r4 g8 } + \times 2/3 { c,4 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } + \times 2/3 { f4 f8 } \times 2/3 { f4 f8 } f4 \times 2/3 { f8 g8 bes8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + bes4 bes2. + r1 + r1 + f4 f4 \times 2/3 { f4 f8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 d8 } c4 + f4 ~ \times 2/3 { f8 f8 f8 } f4 ~ \times 2/3 { f4 f8 } + bes4 r4 r2 + \repeat volta 2 { + \times 2/3 { r4 bes8 } \times 2/3 { bes4 bes8 } \times 2/3 { ees,4 ees8 } \times 2/3 { r4 ees8 } + \times 2/3 { bes'4 bes8 } \times 2/3 { bes4 bes8 } \times 2/3 { r4 ees,8 } r4 + } + f4 f4 \times 2/3 { f4 f8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 d8 } c4 + f4 ~ \times 2/3 { f8 f8 f8 } f4 ~ \times 2/3 { f4 f8 } + bes1 + } + >> + } + diff --git a/hr/michi/failed/stimmen_old.ly b/hr/michi/failed/stimmen_old.ly new file mode 100644 index 0000000..eee057d --- /dev/null +++ b/hr/michi/failed/stimmen_old.ly @@ -0,0 +1,326 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + r1 + r1 + r1 + r2 r4 \times 2/3 { f8( g8) bes8 } + \mark \markup { \musicglyph #"scripts.segno" } + \repeat volta 2 { + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + c4 bes2 \times 2/3 { f8 g8 bes8 } + bes4 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { bes8 g8 f8 } + g2. \times 2/3 { a4 a8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + \times 2/3 { c4 bes8 } bes2 \times 2/3 { r4 bes8 } + \times 2/3 { a4 a8 } \times 2/3 { a4 a8 } \times 2/3 { g4 g8 } \times 2/3 { g4 g8 } + \times 2/3 { f4 f8 } \times 2/3 { g4 g8 } a4 \times 2/3 { f8 g8 bes8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + c4 bes2. + r4 d4 ~ \times 2/3 { d4 c4 bes4 } + r8 d4 bes8 bes8( g8 ~ g4) + f4 f4 \times 2/3 { f4 g8 } bes4 + \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } \times 2/3 { g4 bes8 } c4 + d4 ~ \times 2/3 { d8 c8 d8 } c4 ~ \times 2/3 { c4 bes8 } + } \alternative { + { + bes2. \times 2/3 { f8( g8) bes8 } + } + { + bes1 + } + } + r8 bes4 bes8 ~ bes8 g4 f8 + d8 bes8 ~ bes2. + r4 bes8 bes8 \times 2/3 { d8 f8 g8 } \times 2/3 { g4 f8 ~ } + f4 f2 r4 + r8 bes4 bes8 ~ bes4 ~ \times 2/3 { bes8 g8 f8 } + g8 bes8 ~ bes2 r4 + r4 c4 ~ \times 2/3 { c4 a4 c4 } + a8 f8 f2. + \times 2/3 { r4 g4 g4 } \times 2/3 { g4 fis4 g8 g8 } + \times 2/3 { a4 a4 a4 } a2 + r8 d8 ~ \times 2/3 { d8 c8 bes8 } bes4. g8 + \times 2/3 { bes8 c8 d8 ~ } d8 bes8 bes8( g8 ~ g4) + f4 f4 \times 2/3 { f4 g8 } bes4 + \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } \times 2/3 { g4 bes8 } c4 + d4 ~ \times 2/3 { d8 c8 d8 } c4 ~ \times 2/3 { c4 bes8 } + bes2. \times 2/3 { f8( g8) bes8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + c4 bes2 \times 2/3 { f8 g8 bes8 } + bes4 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { bes8 g8 f8 } + g2. \times 2/3 { a4 a8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + \times 2/3 { c4 bes8 } bes2 \times 2/3 { r4 bes8 } + \times 2/3 { a4 a8 } \times 2/3 { a4 a8 } \times 2/3 { g4 g8 } \times 2/3 { g4 g8 } + \times 2/3 { f4 f8 } \times 2/3 { g4 g8 } a4 \times 2/3 { f8 g8 bes8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + c4 bes2. + r4 d4 ~ \times 2/3 { d4 c4 bes4 } + r8 d4 bes8 bes8( g8 ~ g4) + f4 f4 \times 2/3 { f4 g8 } bes4 + \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } \times 2/3 { g4 bes8 } c4 + d4 ~ \times 2/3 { d8 c8 d8 } c4 ~ \times 2/3 { c4 bes8 } + bes4 r4 r2 + \repeat volta 2 { + \times 2/3 { r4 des8 } \times 2/3 { des4 des8 } \times 2/3 { bes4 bes8 } \times 2/3 { r4 bes8 } + \times 2/3 { des4 des8 } \times 2/3 { ees4 des8 } \times 2/3 { r4 bes8 } r4 + } + f4 f4 \times 2/3 { f4 g8 } bes4 + \times 2/3 { g8 g8 g8 } \times 2/3 { g4 g8 } \times 2/3 { g4 bes8 } c4 + d4 ~ \times 2/3 { d8 c8 d8 } c4 ~ \times 2/3 { c4 bes8 } + bes1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + r1 + r1 + r1 + r2 r4 \times 2/3 { d8( ees8) f8 } + \repeat volta 2 { + f2. ~ \times 2/3 { f8 f8 f8 } + g4 f2 \times 2/3 { d8 ees8 f8 } + f4 \times 2/3 { d8 ees8 f8 } f4 \times 2/3 { f8 ees8 d8 } + ees2. \times 2/3 { f4 f8 } + g2. ~ \times 2/3 { g8 g8 g8 } + \times 2/3 { a4 g8 } g2 \times 2/3 { r4 g8 } + \times 2/3 { f4 f8 } \times 2/3 { f4 f8 } \times 2/3 { e4 e8 } \times 2/3 { e4 e8 } + \times 2/3 { c4 c8 } \times 2/3 { d4 d8 } f4 \times 2/3 { d8 ees8 f8 } + f2. ~ \times 2/3 { f8 f8 f8 } + g4 f2. + r1 + r1 + d4 d4 \times 2/3 { d4 ees8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 f8 } g4 + bes4 ~ \times 2/3 { bes8 a8 bes8 } a4 ~ \times 2/3 { a4 g8 } + } \alternative { + { + f2. \times 2/3 { d8( ees8) f8 } + } + { + f1 + } + } + r8 bes8 bes8 bes8 ~ bes8 g4 f8 + d8 bes8 ~ bes2. + r4 d8 d8 r8 f4 g8 ~ + g8 f4 f8 ~ f2 + r8 bes8 \times 2/3 { bes8 bes8 bes8 } bes4. bes8 + bes4 bes8 bes8 ~ bes8 bes4. + r8 c8 c8 c8 r4 c8 c8 + r8 c16 c16 a16 f16 f8 ~ f2 + \times 2/3 { r4 g4 g4 } \times 2/3 { g4 fis4 g4 } + \times 2/3 { a4 a4 a4 } a2 + \times 2/3 { d4 bes8 } \times 2/3 { bes8 bes8 bes8 ~ } bes8 bes4 c8 + \times 2/3 { d8 r8 bes8 } \times 2/3 { bes4 c8 } \times 2/3 { d8 bes8 bes8 ~ } bes4 + d,4 d4 \times 2/3 { d4 ees8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 f8 } g4 + bes4 ~ \times 2/3 { bes8 a8 bes8 } a4 ~ \times 2/3 { a4 g8 } + f2. \times 2/3 { d8( ees8) f8 } + f2. ~ \times 2/3 { f8 f8 f8 } + g4 f2 \times 2/3 { d8 ees8 f8 } + f4 \times 2/3 { d8 ees8 f8 } f4 \times 2/3 { f8 ees8 d8 } + ees2. \times 2/3 { f4 f8 } + g2. ~ \times 2/3 { g8 g8 g8 } + \times 2/3 { a4 g8 } g2 \times 2/3 { r4 g8 } + \times 2/3 { f4 f8 } \times 2/3 { f4 f8 } \times 2/3 { e4 e8 } \times 2/3 { e4 e8 } + \times 2/3 { c4 c8 } \times 2/3 { d4 d8 } f4 \times 2/3 { d8 ees8 f8 } + f2. ~ \times 2/3 { f8 f8 f8 } + g4 f2. + r1 + r1 + d4 d4 \times 2/3 { d4 ees8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 f8 } g4 + bes4 ~ \times 2/3 { bes8 a8 bes8 } a4 ~ \times 2/3 { a4 g8 } + f4 r4 r2 + \repeat volta 2 { + \times 2/3 { r4 bes8 } \times 2/3 { bes4 bes8 } \times 2/3 { g4 g8 } \times 2/3 { r4 g8 } + \times 2/3 { bes4 bes8 } \times 2/3 { c4 bes8 } \times 2/3 { r4 g8 } r4 + } + d4 d4 \times 2/3 { d4 ees8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 f8 } g4 + bes4 ~ \times 2/3 { bes8 a8 bes8 } a4 ~ \times 2/3 { a4 g8 } + f1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + r1 + r1 + r1 + r2 r4 \times 2/3 { bes8( c8) d8 } + \repeat volta 2 { + d2. ~ \times 2/3 { d8 d8 d8 } + ees4 d2 \times 2/3 { bes8 c8 d8 } + d4 \times 2/3 { bes8 c8 d8 } d4 \times 2/3 { d8 c8 bes8 } + c2. \times 2/3 { c4 c8 } + d2. ~ \times 2/3 { d8 d8 d8 } + \times 2/3 { ees4 d8 } d2 \times 2/3 { r4 d8 } + \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { bes4 bes8 } \times 2/3 { bes4 bes8 } + \times 2/3 { a4 a8 } \times 2/3 { bes4 bes8 } c4 \times 2/3 { bes8 c8 d8 } + d2. ~ \times 2/3 { d8 d8 d8 } + ees4 d2. + r1 + r1 + bes4 bes4 \times 2/3 { bes4 c8 } d4 + \times 2/3 { c8 c8 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 d8 } ees4 + f4 ~ \times 2/3 { f8 ees8 f8 } ees4 ~ \times 2/3 { ees4 ees8 } + } \alternative { + { + d2. \times 2/3 { bes8( c8) d8 } + } + { + d1 + } + } + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + bes4 bes4 \times 2/3 { bes4 c8 } d4 + \times 2/3 { c8 c8 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 d8 } ees4 + f4 ~ \times 2/3 { f8 ees8 f8 } ees4 ~ \times 2/3 { ees4 ees8 } + d2. \times 2/3 { bes8( c8) d8 } + d2. ~ \times 2/3 { d8 d8 d8 } + ees4 d2 \times 2/3 { bes8 c8 d8 } + d4 \times 2/3 { bes8 c8 d8 } d4 \times 2/3 { d8 c8 bes8 } + c2. \times 2/3 { c4 c8 } + d2. ~ \times 2/3 { d8 d8 d8 } + \times 2/3 { ees4 d8 } d2 \times 2/3 { r4 d8 } + \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { bes4 bes8 } \times 2/3 { bes4 bes8 } + \times 2/3 { a4 a8 } \times 2/3 { bes4 bes8 } c4 \times 2/3 { bes8 c8 d8 } + d2. ~ \times 2/3 { d8 d8 d8 } + ees4 d2. + r1 + r1 + bes4 bes4 \times 2/3 { bes4 c8 } d4 + \times 2/3 { c8 c8 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 d8 } ees4 + f4 ~ \times 2/3 { f8 ees8 f8 } ees4 ~ \times 2/3 { ees4 ees8 } + d4 r4 r2 + \repeat volta 2 { + \times 2/3 { r4 f8 } \times 2/3 { f4 f8 } \times 2/3 { ees4 ees8 } \times 2/3 { r4 ees8 } + \times 2/3 { f4 f8 } \times 2/3 { g4 f8 } \times 2/3 { r4 ees8 } r4 + } + bes4 bes4 \times 2/3 { bes4 c8 } d4 + \times 2/3 { c8 c8 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 d8 } ees4 + f4 ~ \times 2/3 { f8 ees8 f8 } ees4 ~ \times 2/3 { ees4 ees8 } + d1 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 + r1 + r1 + r2 r4 \times 2/3 { f8( g8) bes8 } + \repeat volta 2 { + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + bes4 bes2 \times 2/3 { f8 g8 bes8 } + bes4 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { bes8 bes8 bes,8 } + ees2. \times 2/3 { d4 d8 } + g2. ~ \times 2/3 { g8 g8 g8 } + \times 2/3 { g4 g8 } g2 \times 2/3 { r4 g8 } + \times 2/3 { c,4 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } + \times 2/3 { f4 f8 } \times 2/3 { f4 f8 } f4 \times 2/3 { f8 g8 bes8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + bes4 bes2. + r1 + r1 + f4 f4 \times 2/3 { f4 f8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 d8 } c4 + f4 ~ \times 2/3 { f8 f8 f8 } f4 ~ \times 2/3 { f4 f8 } + } \alternative { + { + bes2. \times 2/3 { f8( g8) bes8 } + } + { + bes1 + } + } + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + r1 + f4 f4 \times 2/3 { f4 f8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 d8 } c4 + f4 ~ \times 2/3 { f8 f8 f8 } f4 ~ \times 2/3 { f4 f8 } + bes2. \times 2/3 { f8( g8) bes8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + bes4 bes2 \times 2/3 { f8 g8 bes8 } + bes4 \times 2/3 { f8 g8 bes8 } bes4 \times 2/3 { bes8 bes8 bes,8 } + ees2. \times 2/3 { d4 d8 } + g2. ~ \times 2/3 { g8 g8 g8 } + \times 2/3 { g4 g8 } g2 \times 2/3 { r4 g8 } + \times 2/3 { c,4 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } \times 2/3 { c4 c8 } + \times 2/3 { f4 f8 } \times 2/3 { f4 f8 } f4 \times 2/3 { f8 g8 bes8 } + bes2. ~ \times 2/3 { bes8 bes8 bes8 } + bes4 bes2. + r1 + r1 + f4 f4 \times 2/3 { f4 f8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 d8 } c4 + f4 ~ \times 2/3 { f8 f8 f8 } f4 ~ \times 2/3 { f4 f8 } + bes4 r4 r2 + \repeat volta 2 { + \times 2/3 { r4 bes8 } \times 2/3 { bes4 bes8 } \times 2/3 { ees,4 ees8 } \times 2/3 { r4 ees8 } + \times 2/3 { bes'4 bes8 } \times 2/3 { bes4 bes8 } \times 2/3 { r4 ees,8 } r4 + } + f4 f4 \times 2/3 { f4 f8 } f4 + \times 2/3 { ees8 ees8 ees8 } \times 2/3 { ees4 ees8 } \times 2/3 { ees4 d8 } c4 + f4 ~ \times 2/3 { f8 f8 f8 } f4 ~ \times 2/3 { f4 f8 } + bes1 + } + >> + } + diff --git a/hr/michi/failed/texte.ly b/hr/michi/failed/texte.ly new file mode 100644 index 0000000..ab8412f --- /dev/null +++ b/hr/michi/failed/texte.ly @@ -0,0 +1,53 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + commonI = \lyricmode { + I will sing of God’s mer -- cy, + ev -- er -- y day, + ev -- er -- y hour, + He gives me power. + I will sing and give thanks to Thee + for all the dan -- gers, toils and snares + that He has brought me out. + He is my God and I’ll serve + } + commonII = \lyricmode { + Trust and nev -- er doubt, + Je -- sus will sure -- ly bring you out, + He nev -- er failed me yet. + } + commonIII = \lyricmode { + He nev -- er failed me, + He nev -- er failed me yet! + } + +% 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+> + \commonI Him. + \commonII + I will + yet. + \commonII + %I will + %yet. + \commonI Him. + \commonII + \commonIII + \commonII + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/frisch/dynArt.ly b/hr/michi/frisch/dynArt.ly new file mode 100644 index 0000000..c34e7b9 --- /dev/null +++ b/hr/michi/frisch/dynArt.ly @@ -0,0 +1,42 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key c \major + \time 4/4 + \partial 4 + \repeat volta 2 { + s4 + s1*4 + s1*4 + s1*4 + s1*3 + s2. + } + \pageBreak + \repeat volta 2 { + s4 + s1*4 + s1*4 + s1*4 + s1*3 + s2. + } + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/frisch/frisch.ly b/hr/michi/frisch/frisch.ly new file mode 100644 index 0000000..4da250b --- /dev/null +++ b/hr/michi/frisch/frisch.ly @@ -0,0 +1,70 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Frisch gesungen" + composer = "Friedrich Silcher" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + tenI = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "tenoereI" { \global \voiceOne \tenorMelodieI } + >> + + tenII = << + \new Voice = "tenoereII" { \global \voiceTwo \tenorMelodieII } + >> + + basI = << + \new Voice = "baesseI" { \global \voiceOne \bassMelodieI } + >> + + basII = << + \new Voice = "baesseII" { \global \voiceTwo \bassMelodieII } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \new Staff = tenoere { << \tenI \\ \tenII >> } + \new Lyrics = tuttiA \with { alignAboveContext = "baesse" } + \new Lyrics = tuttiB \with { alignAboveContext = "baesse" } + \new Staff = baesse { << \basI \\ \basII >> } + \context Lyrics = tuttiA \lyricsto tenoereII \textA + \context Lyrics = tuttiB \lyricsto tenoereII \textB + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + \layout { + } + } + diff --git a/hr/michi/frisch/midi.lua b/hr/michi/frisch/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/frisch/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/michi/frisch/stimmen.ly b/hr/michi/frisch/stimmen.ly new file mode 100644 index 0000000..7b31aaa --- /dev/null +++ b/hr/michi/frisch/stimmen.ly @@ -0,0 +1,57 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \autoBeamOff + } + +% Die Stimmen + + tenorMelodieI = \relative c' { + << + { \meta } + %the actual tune + { + \clef "treble_8" + g4 e'4 e4 f4 e8 e8 d4.( e8) d4 e8[ d8] c4 c8 c8 d8[ c8] b8 c8 d2 r4 d4 d4 d4 e4 e8 e8 g2 f4 e8[ d8] c4 c8 c8 b8[ c8] d8[ e8] c2 r4 c4 c4 c4 f4 e8 e8 d4.( e8) d4 e4 f4 f8 e8 d4 d8.[ e16] d2 r4 d4 g2 fis4 r4 f2 e4 r8 e8 g8[ f8] e8 d8 c4 b4 c2 r4 + g4 e'4 e4 f4 e8 e8 d4.( e8) d4 e8[ d8] c4 c8 c8 d8[ c8] b8[ c8] d2 r4 d4 d4 d4 e4 e8 e8 g2 f4 e8[ d8] c4 c8 c8 b8[ c8] d8[ e8] c2 r4 c4 c4 c4 f4 e8 e8 d4.( e8) d4 e4 f4 f8 e8 d4 d8.[ e16] d2 r4 d4 g2 fis4 r4 f2 e4 r8 e8 g8[ f8] e8 d8 c4 b4 c2 r4 + } + >> + } + + tenorMelodieII = \relative c' { + << + { \meta } + %the actual tune + { + g4 c4 c4 c4 c8 c8 b2 b4 b4 a4 a8 a8 a4 a8 a8 b2 r4 b4 b4 b4 cis4 cis8 cis8 e2 d4 a4 g4 g8 g8 g4 g4 g2 r4 c4 c4 c4 c4 c8 c8 c2 c4 c4 c4 c8 c8 c4 c4 b2 r4 b4 c2 c4 r4 b2 bes4 r8 b8 a4 a8 a8 g4 g4 g2 r4 + g4 c4 c4 c4 c8 c8 b2 b4 b4 a4 a8 a8 a4 a4 b2 r4 b4 b4 b4 cis4 cis8 cis8 e2 d4 a4 g4 g8 g8 g4 g4 g2 r4 c4 c4 c4 c4 c8 c8 c2 c4 c4 c4 c8 c8 c4 c4 b2 r4 b4 c2 c4 r4 b2 bes4 r8 b8 a4 a8 a8 g4 g4 g2 r4 + } + >> + } + + bassMelodieI = \relative c' { + << + { \meta } + %the actual tune + \clef bass + { + g4 g4 g4 a4 g8 g8 f4.( g8) f4 f4 e4 e8 e8 fis4 fis8 fis8 g2 r4 g4 g4 g4 g4 a8 a8 a2 a4 f4 e4 e8 e8 d8[ e8] f8[ g8] e2 r4 c'4 c4 c4 c4 c8 c8 a2 a4 c4 c4 c8 c8 a4 fis4 g2 r4 g4 g2 a4 r4 g2 g4 r8 g8 f4 f8 f8 e4 d8[ f8] e2 r4 + g4 g4 g4 a4 g8 g8 f4.( g8) f4 f4 e4 e8 e8 fis4 fis4 g2 r4 g4 g4 g4 g4 a8 a8 a2 a4 f4 e4 e8 e8 d8[ e8] f8[ g8] e2 r4 c'4 c4 c4 c4 c8 c8 a2 a4 c4 c4 c8 c8 a4 fis4 g2 r4 g4 g2 a4 r4 g2 g4 r8 g8 f4 f8 f8 e4 d8[ f8] e2 r4 + } + >> + } + + bassMelodieII = \relative c' { + << + { \meta } + %the actual tune + { + g4 c,4 c4 c4 c8 c8 g2 g4 g4 a4 a8 a8 d4 d8 d8 g,2 r4 g'4 f4 f4 e4 e8 e8 d2 d4 f,4 g4 g8 g8 g4 g4 c2 r4 c'4 c4 c4 a4 g8 g8 fis2 fis4 g4 a4 a8 g8 fis4 d4 g2 r4 f4 e2 d4 r4 d2 cis4 r8 cis8 d4 f8 f8 g4 g,4 c2 r4 + g'4 c,4 c4 c4 c8 c8 g2 g4 g4 a4 a8 a8 d4 d4 g,2 r4 g'4 f4 f4 e4 e8 e8 d2 d4 f,4 g4 g8 g8 g4 g4 c2 r4 c'4 c4 c4 a4 g8 g8 fis2 fis4 g4 a4 a8 g8 fis4 d4 g2 r4 f4 e2 d4 r4 d2 cis4 r8 cis8 d4 f8 f8 g4 g,4 c2 r4 + } + >> + } + diff --git a/hr/michi/frisch/texte.ly b/hr/michi/frisch/texte.ly new file mode 100644 index 0000000..78f3157 --- /dev/null +++ b/hr/michi/frisch/texte.ly @@ -0,0 +1,78 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + stzI = \lyricmode { + \set stanza = "1." + Hab oft im Krei -- se der Lie -- ben + in duf -- ti -- gem Gra -- se ge -- ruht + und mir ein Lied -- lein ge -- sun -- gen, + und al -- les war hübsch und gut, + und mir ein Lied -- lein ge -- sun -- gen, + und al -- les war hübsch und gut, + und al -- les, al -- les, + und al -- les war hübsch und gut. + } + + stzIII = \lyricmode { + \set stanza = "3." + Und man -- ches, was ich er -- fah -- ren, + ver -- kocht ich in stil -- ler Wut, + und kam ich wie -- der zu sin -- gen, + war al -- les auch wie -- der gut, + und kam ich wie -- der zu sin -- gen, + war al -- les auch wie -- der gut, + war al -- les, al -- les, + war al -- les auch wie -- der gut. + } + + stzII = \lyricmode { + \set stanza = "2." + Hab ein -- sam auch mich ge -- här -- met + in ban -- gem, _ dü -- ste -- rem Mut + und ha -- be wie -- der ge -- sun -- gen, + und al -- les war wie -- der gut, + und ha -- be wie -- der ge -- sun -- gen, + und al -- les war wie -- der gut, + und al -- les, al -- les, + und al -- les war wie -- der gut. + } + + stzIV = \lyricmode { + \set stanza = "4." + Sollst uns nicht lan -- ge _ kla -- gen, + was al -- les dir we -- he tut. + Nur frisch, nur frisch ge -- _ sun -- gen, + und al -- les wird wie -- der gut, + nur frisch, nur frisch ge -- _ sun -- gen, + und al -- les wird wie -- der gut, + und al -- les, al -- les, + und al -- les wird wie -- der gut. + } + +% Die Textaufteilungen % -- _ + + textA = \lyricmode { + \stzI \stzIII + } + + textB = \lyricmode { + \stzII \stzIV + } + + 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+> + } + diff --git a/hr/michi/gardens/dynArt.ly b/hr/michi/gardens/dynArt.ly new file mode 100644 index 0000000..3cd5b3a --- /dev/null +++ b/hr/michi/gardens/dynArt.ly @@ -0,0 +1,32 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key ees \major + \time 4/4 + \partial 4 + s4 + s1*4 + s1*4 + s1*4 + s1*3 + s2. + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/gardens/gardens.ly b/hr/michi/gardens/gardens.ly new file mode 100644 index 0000000..f141a17 --- /dev/null +++ b/hr/michi/gardens/gardens.ly @@ -0,0 +1,71 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Down by the Salley gardens" + composer = "traditional" + arranger = "Uli Führe" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + sop = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "soprane" { \global \voiceOne \sopranMelodie } + >> + + alt = << + \new Voice = "alti" { \global \voiceTwo \altMelodie } + >> + + ten = << + \new Voice = "tenoere" { \global \voiceOne \tenorMelodie } + >> + + bas = << + \new Voice = "baesse" { \global \voiceTwo \bassMelodie } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \new Staff = frauen << \sop \alt >> + \new Lyrics = "tenorsI" \with { alignAboveContext = #DOWN } + \new Lyrics = "tenorsII" \with { alignAboveContext = #DOWN } + \new Staff = maenner << \ten \bas >> + \context Lyrics = "tenorsI" \lyricsto "tenoere" \stzI + \context Lyrics = "tenorsII" \lyricsto "tenoere" \stzII + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + \layout { + } + } + diff --git a/hr/michi/gardens/midi.lua b/hr/michi/gardens/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/gardens/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/michi/gardens/stimmen.ly b/hr/michi/gardens/stimmen.ly new file mode 100644 index 0000000..ed33ec4 --- /dev/null +++ b/hr/michi/gardens/stimmen.ly @@ -0,0 +1,61 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + ees8 f8 + g4 f8( ees8) f4 g8( bes8) c2 bes4 ees8( bes8) c4 bes8( g8) f4. ees8 ees2. ees8( f8) g4 f8( ees8) f4 g8( bes8) c2 bes4 ees8( bes8) c4 bes8( g8) f4. ees8 ees2. bes'4 ees4 d8( bes8) c4 ees4 d2 bes4 g8 bes8 c4 bes8( g8) bes8( c8) ees8( f8) ees2. ees,8( f8) g4 f8( ees8) f4 g8( bes8) c2 bes4 ees8( bes8) c4 bes8( g8) f4. ees8 ees2. + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + ees8 ees8 + ees4 d8( c8) bes4 c8( d8) ees4. f8 bes,4 ees4 aes4 ees4 d4. ees8 ees2. ees4 ees4 d8( c8) bes4 c4 ees4.( f8) bes,4 ees4 aes4 ees4 d4. ees8 ees4.( f16 ees16) d4 g4 g4 ees8( g8) aes4 c4 bes2 g4 ees8 ees8 aes4 ees4 f4 g4 g4( aes4 f4) ees8( f8) ees4 d8( c8) bes4 c8( d8) ees4.( f8) bes,4 ees4 aes4 ees4 ees4 d8( ees8) ees2. + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + bes8 bes8 + bes4 bes4 bes4 bes8 bes8 aes2 g4 bes4 c4 ees4 bes4. bes8 g2. bes4 bes4 bes4 bes4 bes4 aes2 g4 bes4 c4 ees4 bes4. bes8 g2( bes4) bes4 c4 g4 g4 aes4 bes2 bes4 ees8 ees8 ees4 ees4 d4 c8( bes8) c4.( d16 c16 bes4) bes4 bes4 bes4 bes4 bes4 aes2 g4 bes4 c4 ees4 bes4. bes8 g2. + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + ees8 ees8 + ees4 ees4 d4 d8 d8 c4( d4) ees4 g4 aes4 g4 bes4 bes,4 ees2. ees4 ees4 ees4 d4 d4 c4 d4 ees4 g4 aes4 g4 bes4 bes,4 ees2( d4) bes4 c4 c4 aes4 aes4 bes4( d4) ees4 g8 g8 aes4 g4 f4 ees8( d8) c2( d4) bes4 ees4 ees4 d4 d4 c4( d4) ees4 g4 aes4 g8( aes8) bes4 bes,4 ees2. + } + >> + } + diff --git a/hr/michi/gardens/stimmen_.ly b/hr/michi/gardens/stimmen_.ly new file mode 100644 index 0000000..6677ec6 --- /dev/null +++ b/hr/michi/gardens/stimmen_.ly @@ -0,0 +1,121 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + ees8 f8 + g4 f8( ees8) f4 g8( bes8) + c2 bes4 ees8( bes8) + c4 bes8( g8) f4. ees8 + ees2. ees8( f8) + g4 f8( ees8) f4 g8( bes8) + c2 bes4 ees8( bes8) + c4 bes8( g8) f4. ees8 + ees2. bes'4 + ees4 d8( bes8) c4 ees4 + d2 bes4 g8 bes8 + c4 bes8( g8) bes8( c8) ees8( f8) + ees2. ees,8( f8) + g4 f8( ees8) f4 g8( bes8) + c2 bes4 ees8( bes8) + c4 bes8( g8) f4. ees8 + ees2. + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + ees8 ees8 + ees4 d8( c8) bes4 c8( d8) + ees4. f8 bes,4 ees4 + aes4 ees4 d4. ees8 + ees2. ees4 + ees4 d8( c8) bes4 c4 + ees4.( f8) bes,4 ees4 + aes4 ees4 d4. ees8 + ees4.( f16 ees16) d4 g4 + g4 ees8( g8) aes4 c4 + bes2 g4 ees8 ees8 + aes4 ees4 f4 g4 + g4( aes4 f4) ees8( f8) + ees4 d8( c8) bes4 c8( d8) + ees4.( f8) bes,4 ees4 + aes4 ees4 ees4 d8( ees8) + ees2. + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + bes8 bes8 + bes4 bes4 bes4 bes8 bes8 + aes2 g4 bes4 + c4 ees4 bes4. bes8 + g2. bes4 + bes4 bes4 bes4 bes4 + aes2 g4 bes4 + c4 ees4 bes4. bes8 + g2( bes4) bes4 + c4 g4 g4 aes4 + bes2 bes4 ees8 ees8 + ees4 ees4 d4 c8( bes8) + c4.( d16 c16 bes4) bes4 + bes4 bes4 bes4 bes4 + aes2 g4 bes4 + c4 ees4 bes4. bes8 + g2. + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + ees8 ees8 + ees4 ees4 d4 d8 d8 + c4( d4) ees4 g4 + aes4 g4 bes4 bes,4 + ees2. ees4 + ees4 ees4 d4 d4 + c4 d4 ees4 g4 + aes4 g4 bes4 bes,4 + ees2( d4) bes4 + c4 c4 aes4 aes4 + bes4( d4) ees4 g8 g8 + aes4 g4 f4 ees8( d8) + c2( d4) bes4 + ees4 ees4 d4 d4 + c4( d4) ees4 g4 + aes4 g8( aes8) bes4 bes,4 + ees2. + } + >> + } + diff --git a/hr/michi/gardens/texte.ly b/hr/michi/gardens/texte.ly new file mode 100644 index 0000000..8ad7161 --- /dev/null +++ b/hr/michi/gardens/texte.ly @@ -0,0 +1,45 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + stzI = \lyricmode { + \set stanza = "1." + Down _ by the Sal -- ley _ Gar -- dens + my love and I did meet. + She passed the Sal -- ley Gar -- dens + with litt -- le snow -- white feet. + She bid me take love ea -- sy, + as the leaves grow on the tree. + But I was not as foo -- lish, + with her did not a -- gree. + } + stzII = \lyricmode { + \set stanza = "2." + In a field _ _ by the ri -- ver + my love and I did stand. + And on my lea -- ning shoul -- der + she laid her snow -- white hand. + She bid me take life ea -- sy, + as the grass grows on the weirs. + But I am not as foo -- lish + and now am full of tears. + } + +% 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+> + } + diff --git a/hr/michi/gaudeamus/dynArt.ly b/hr/michi/gaudeamus/dynArt.ly new file mode 100644 index 0000000..47be107 --- /dev/null +++ b/hr/michi/gaudeamus/dynArt.ly @@ -0,0 +1,57 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key c \major + \time 3/4 + \set Timing.beamExceptions = #'( + (end . + ( + ((1 . 8) . (2 2 2)) + ((1 . 16) . (4 4 4)) + ) + ) + ) + %\set Timing.baseMoment = #(ly:make-moment 1/4) + \set Staff.beatStructure = #'(1 1 1) + s2.*13 + \time 2/4 + \set Timing.beamExceptions = #'( + (end . + ( + ((1 . 8) . (2 2)) + ((1 . 16) . (4 4)) + ) + ) + ) + \set Staff.beatStructure = #'(1 1) + s2*2 + \time 3/4 + \set Timing.beamExceptions = #'( + (end . + ( + ((1 . 8) . (2 2 2)) + ((1 . 16) . (4 4 4)) + ) + ) + ) + \set Staff.beatStructure = #'(1 1 1) + s2.*3 + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/gaudeamus/gaudeamus.ly b/hr/michi/gaudeamus/gaudeamus.ly new file mode 100644 index 0000000..20e76be --- /dev/null +++ b/hr/michi/gaudeamus/gaudeamus.ly @@ -0,0 +1,84 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Gaudeamus igitur" + %composer = "<+Komponist+>" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 Staff << + \new Voice = "solo" { + \keepWithTag #'slur { \sopranMelodie \bar "||" } + } + \addlyrics { \soloText } + >> + } + sop = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "soprane" { \global \keepWithTag #'tutti \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 } << + \new Staff = sopran { \sop \bar "|." } + \new Lyrics \lyricsto soprane \keepWithTag #'oben \textA + \new Lyrics \lyricsto soprane \keepWithTag #'oben \textB + \new Staff = alt { \alt } + \new Staff = tenor { \ten } + \new Lyrics \lyricsto tenoere \keepWithTag #'unten \textA + \new Lyrics \lyricsto tenoere \keepWithTag #'unten \textB + \new Staff = bass { \bas } + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + \layout { + } + } + diff --git a/hr/michi/gaudeamus/midi.lua b/hr/michi/gaudeamus/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/gaudeamus/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/michi/gaudeamus/stimmen.ly b/hr/michi/gaudeamus/stimmen.ly new file mode 100644 index 0000000..0265c20 --- /dev/null +++ b/hr/michi/gaudeamus/stimmen.ly @@ -0,0 +1,87 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + c8. g16 g4 c4 a8. a16 a2 b8 c8 d4 b4 + \tag #'slur { c8( e8) c2 } + \tag #'tutti { c8 e8 c2 } + c8. g16 g4 c4 a8. a16 a2 b8 c8 d4 b4 + \tag #'slur { c8( e8) c2 } + \tag #'tutti { c8 e8 c2 } + b8 c8 d4 d4 e8. c16 + \tag #'slur { d4 d4 } + \tag #'tutti { d2 } + b8. c16 d4 d4 e8. c16 + \tag #'slur { d4 d4 } + \tag #'tutti { d2 } + c8 b8 a8( f'8) e8( d8) e4( d4) c2 + c8. b16 a8( f'8) e8( d8) g2( b,4) c2. + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + \repeat unfold 2 { + e8. e16 f4 g4 g8. g16 f4( e4) + } \alternative { + { + d8 c8 b4 g'4 g4 g4( f4) + } + { + d8 e8 f4 g4 g4 g2 + } + } + g8 g8 g4 g4 g8. a16 b4( g4) g8. g16 g4 g4 a8. a16 a4( gis4) e8 e8 e8( a8) a4 g8( a8 f8 g8) e2 g8. g16 g8( a8) a8( d8) c8( b8 a8 g8 f4) e2. + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + c8. c16 c4 c4 e8. e16 d4( c4) b8 a8 g4 d'4 c4 c2 + c8. c16 c4 c4 e8. e16 d4( c4) g'8 g8 a8( g8) f4 e4 e2 + d8 e8 f4 f4 c8. e16 d4( b4) d8. c16 b4 b4 c8. c16 b2 c8 c8 c4 c4 c4( ~ c8 b8) b4( a4) + e'8. d16 c8( a8) f'4 e8( g8 f8 e8 d4) c2. + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + c8. c16 d4 e4 f8. f16 f2 f8 f8 f4 f4 e4 e4( d4) c8. c16 d4 e4 f8. f16 f2 f8 e8 d4 g4 c,4 c2 + g'8 g8 g4 g4 g8. g16 g2 + f8. f16 f4 f4 f8. f16 f4( e4) + a8 g8 f8( d8) e8( f8) e8( f8 g4) a2 + e8. e16 f4 f4 g2 g,4 c2. + } + >> + } + diff --git a/hr/michi/gaudeamus/texte.ly b/hr/michi/gaudeamus/texte.ly new file mode 100644 index 0000000..b7af06f --- /dev/null +++ b/hr/michi/gaudeamus/texte.ly @@ -0,0 +1,59 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + soloText = \lyrics { + Gau -- de -- a -- mus i -- gi -- tur + iu -- ve -- nes dum su -- mus + Gau -- de -- a -- mus i -- gi -- tur + iu -- ve -- nes dum su -- mus + Post iu -- cun -- dam iu -- ven -- tu -- tem + Post mo -- le -- stam se -- nec -- tu -- tem + Nos ha -- be -- bit hu -- mus + nos ha -- be -- bit hu -- mus + } + + textA = \lyrics { + Vi -- ta no -- stra bre -- vis est + \tag #'oben { bre -- vi fi -- ni -- e -- _ tur! } + \tag #'unten { bre -- vi fi -- ni -- e -- tur! } + Vi -- ta no -- stra bre -- vis est + \tag #'oben { bre -- vi fi -- ni -- e -- _ tur! } + \tag #'unten { bre -- vi fi -- ni -- e -- tur! } + Ve -- nit mors ve -- lo -- ci -- ter + ra -- pit nos a -- tro -- ci -- ter + ne -- mi -- ni par -- ce -- tur, + ne -- mi -- ni par -- ce -- tur. + } + + textB = \lyrics { + Vi -- vat a -- ca -- de -- mi -- a + \tag #'oben { Vi -- vant pro -- fes -- so -- _ res! } + \tag #'unten { Vi -- vant pro -- fes -- so -- res! } + Vi -- vat a -- ca -- de -- mi -- a + \tag #'oben { Vi -- vant pro -- fes -- so -- _ res! } + \tag #'unten { Vi -- vant pro -- fes -- so -- res! } + Vi -- vat mem -- brum quod -- li -- bet + Vi -- vent mem -- bra quæ -- li -- bet + sem -- per sint in flo -- re, + sem -- per sint in flo -- re. + } + +% 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+> + } + diff --git a/hr/michi/gebet/dynArt.ly b/hr/michi/gebet/dynArt.ly new file mode 100644 index 0000000..c5f38a1 --- /dev/null +++ b/hr/michi/gebet/dynArt.ly @@ -0,0 +1,36 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key g \major + \time 2/4 + s2*8 + \break + s2*10 + \bar "||" + \break + s2*14 + \bar "||" + \break + s2*8 + \break + s2*10 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/gebet/gebet.ly b/hr/michi/gebet/gebet.ly new file mode 100644 index 0000000..6077d9f --- /dev/null +++ b/hr/michi/gebet/gebet.ly @@ -0,0 +1,65 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Gebet" + composer = "Max Bruch" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 16) + + sop = \new Voice = "soprane" { \global \voiceOne \sopranMelodie } + %\addlyrics { \sopranText } + + alt = \new Voice = "alti" { \global \voiceTwo \altMelodie } + %\addlyrics { \altText } + + ten = \new Voice = "tenoere" { \global \voiceOne \tenorMelodie } + %\addlyrics { \tenorText } + + bas = \new Voice = "baesse" { \global \voiceTwo \bassMelodie } + %\addlyrics { \bassText } + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \new Staff = frauen << \sop \alt >> + \new Lyrics = "tenors" \with { + \override VerticalAxisGroup #'staff-affinity = #DOWN + } + \new Staff = maenner << \ten \bas >> + \context Lyrics = "tenors" \lyricsto "tenoere" \tenorText + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + \layout { + } + } + diff --git a/hr/michi/gebet/midi.lua b/hr/michi/gebet/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/gebet/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/michi/gebet/stimmen.ly b/hr/michi/gebet/stimmen.ly new file mode 100644 index 0000000..3f4f6e4 --- /dev/null +++ b/hr/michi/gebet/stimmen.ly @@ -0,0 +1,65 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + g4. r8 b2 b8. a16 a8 g8 fis4. fis8 fis4 fis4 b4 b4 c2 b4. r8 gis4 a8 b8 cis4 cis4 e2 cis8 r8 cis4 b4. a8 a8( gis4) fis8 e4. e8 a4 gis8 cis8 b4. b8 b2 + b4 b8 b8 b4 fis8 b8 d4 d8 d8 d4 a8 d8 fis4 fis8 fis8 fis2 fis,4. r8 dis'4 dis8. dis16 dis4 cis8 cis8 cis4 cis8 cis8 cis4 b8 r8 gis4 b8 b8 b4( ais4) b2 + b4. r8 e2 e8. dis16 dis8 e8 fis4. b,8 g'4. e8 d8( c4) b8 a2 b4. r8 b4 a8 b8 c4 a4 d2 d4 b4 a4. g8 g4 a4 b4. b8 c4 b8 g8 b4. b8 b2 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + e4. r8 g4.( fis8) e8. e16 dis8 e8 e4. e8 e8( dis4) fis8 fis8[ e8] e8[ b'8] b4( a8[ g8]) fis4. r8 e4 e8 e8 e4 a4 b2 a8 r8 e4 dis4 e4 e4 dis4 e4. e8 e4. e8 e8[ cis8] dis4 e2 + gis4 g8 g8 fis4 fis8 fis8 b4 b8 bes8 a4 a8 a8 a4 ais8 b8 cis4.( b8) ais4. r8 b4 b8. b16 b4 b8 b8 b8[ gis8] ais8 ais8 ais4 b8 r8 e,4 gis8 g8 fis2 fis2 + g4. r8 c2 a8. a16 a8 a8 a4. a8 g4. g8 a4 g4 g4( fis8[ e8]) dis4. r8 gis4 fis8 gis8 a4 a8[ g8] g8[( e8] fis4) g4 d8[ dis8] e4. e8 b8[ g'8] fis8[ e8] d4. g8 fis8[ e8] dis8[ e8] e4 dis4 e2 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + b4. r8 e4.( d8) c8. c16 c8 b8 c4. c8 b4 b4 b4 e4 e8[ g8 fis8 e8] dis4. r8 e4 dis8 d8 cis4 e4 b4.( e8) e8 r8 a,8[ gis8] fis4 e4 e8[ gis8 b8] a8 gis4. gis8 e8[ fis8] gis8[ a8] fis4 b8[ a8] gis2 + e'4 e8 e8 e8[ d8] d8 d8 b8[ d8] g8 g8 g8[ fis8] fis8 fis8 fis4 e8 d8 e4( d4) cis4. r8 dis4 fis8. fis16 e4 e8 e8 e4 fis8 e8 e4 dis8 r8 e4 e8 e8 cis2 dis2 + e4. r8 g2 c,8. c16 c8 c8 c4 b4 b4 c4 a8.[ d16] d4 e4( fis4) fis4. r8 d4 e8 d8 c8[ e8] e4 a,4( d4) d4 g4 c,4. c8 b4 d8[ c8] b4. b8 a8[ g8] fis8[ e8] fis4 a4 gis2 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r4 e4 ~ e8 r8 e4 ~ e8. e16 fis8 g8 a4. a8 b4 b8[ a8] g4 g4 a2 b4. r8 e,4 fis8 gis8 a4 a4 gis2 a8 r8 a,4 b4 cis4 b4 b4 cis4. cis8 cis4 b8[ a8] b4 b4 e2 + e4 e8 g8 b4 b8 b8 g4 g8 bes8 d4 d,8 d'8 d4 cis8 b8 ais4( b4) fis4. r8 b,4 dis8. dis16 gis4 gis8 gis8 fis4 fis8 fis8 fisis4 gis8 r8 r4 r8 cis,8 fis2 b,2 + r4 e4 ~ e8 r8 e4 fis8. fis16 fis8 e8 dis4. b'8 e,4. e8 fis4 g4 c2 b4. r8 e,4 e8 e8 a4 c,4 d4.( c8) b4 g4 c4. c8 e4 d4 g4. g,8 a4 b8[ c8] b4 b4 <e e,>2 + } + >> + } + diff --git a/hr/michi/gebet/stimmen_.ly b/hr/michi/gebet/stimmen_.ly new file mode 100644 index 0000000..e02a2b1 --- /dev/null +++ b/hr/michi/gebet/stimmen_.ly @@ -0,0 +1,253 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + g4. r8 + b2 + b8. a16 a8 g8 + fis4. fis8 + fis4 fis4 + b4 b4 + c2 + b4. r8 + gis4 a8 b8 + cis4 cis4 + e2 + cis8 r8 cis4 + b4. a8 + a8( gis4) fis8 + e4. e8 + a4 gis8 cis8 + b4. b8 + b2 + b4 b8 b8 + b4 fis8 b8 + d4 d8 d8 + d4 a8 d8 + fis4 fis8 fis8 + fis2 + fis,4. r8 + dis'4 dis8. dis16 + dis4 cis8 cis8 + cis4 cis8 cis8 + cis4 b8 r8 + gis4 b8 b8 + b4( ais4) + b2 + b4. r8 + e2 + e8. dis16 dis8 e8 + fis4. b,8 + g'4. e8 + d8( c4) b8 + a2 + b4. r8 + b4 a8 b8 + c4 a4 + d2 + d4 b4 + a4. g8 + g4 a4 + b4. b8 + c4 b8 g8 + b4. b8 + b2 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + e4. r8 + g4.( fis8) + e8. e16 dis8 e8 + e4. e8 + e8( dis4) fis8 + fis8[ e8] e8[ b'8] + b4( a8[ g8]) + fis4. r8 + e4 e8 e8 + e4 a4 + b2 + a8 r8 e4 + dis4 e4 + e4 dis4 + e4. e8 + e4. e8 + e8[ cis8] dis4 + e2 + gis4 g8 g8 + fis4 fis8 fis8 + b4 b8 bes8 + a4 a8 a8 + a4 ais8 b8 + cis4.( b8) + ais4. r8 + b4 b8. b16 + b4 b8 b8 + b8[ gis8] ais8 ais8 + ais4 b8 r8 + e,4 gis8 g8 + fis2 + fis2 + g4. r8 + c2 + a8. a16 a8 a8 + a4. a8 + g4. g8 + a4 g4 + g4( fis8[ e8]) + dis4. r8 + gis4 fis8 gis8 + a4 a8[ g8] + g8[( e8] fis4) + g4 d8[ dis8] + e4. e8 + b8[ g'8] fis8[ e8] + d4. g8 + fis8[ e8] dis8[ e8] + e4 dis4 + e2 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + b4. r8 + e4.( d8) + c8. c16 c8 b8 + c4. c8 + b4 b4 + b4 e4 + e8[ g8 fis8 e8] + dis4. r8 + e4 dis8 d8 + cis4 e4 + b4.( e8) + e8 r8 a,8[ gis8] + fis4 e4 + e8[ gis8 b8] a8 + gis4. gis8 + e8[ fis8] gis8[ a8] + fis4 b8[ a8] + gis2 + e'4 e8 e8 + e8[ d8] d8 d8 + b8[ d8] g8 g8 + g8[ fis8] fis8 fis8 + fis4 e8 d8 + e4( d4) + cis4. r8 + dis4 fis8. fis16 + e4 e8 e8 + e4 fis8 e8 + e4 dis8 r8 + e4 e8 e8 + cis2 + dis2 + e4. r8 + g2 + c,8. c16 c8 c8 + c4 b4 + b4 c4 + a8.[ d16] d4 + e4( fis4) + fis4. r8 + d4 e8 d8 + c8[ e8] e4 + a,4( d4) + d4 g4 + c,4. c8 + b4 d8[ c8] + b4. b8 + a8[ g8] fis8[ e8] + fis4 a4 + gis2 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r4 e4 ~ + e8 r8 e4 ~ + e8. e16 fis8 g8 + a4. a8 + b4 b8[ a8] + g4 g4 + a2 + b4. r8 + e,4 fis8 gis8 + a4 a4 + gis2 + a8 r8 a,4 + b4 cis4 + b4 b4 + cis4. cis8 + cis4 b8[ a8] + b4 b4 + e2 + e4 e8 g8 + b4 b8 b8 + g4 g8 bes8 + d4 d,8 d'8 + d4 cis8 b8 + ais4( b4) + fis4. r8 + b,4 dis8. dis16 + gis4 gis8 gis8 + fis4 fis8 fis8 + fisis4 gis8 r8 + r4 r8 cis,8 + fis2 + b,2 + r4 e4 ~ + e8 r8 e4 + fis8. fis16 fis8 e8 + dis4. b'8 + e,4. e8 + fis4 g4 + c2 + b4. r8 + e,4 e8 e8 + a4 c,4 + d4.( c8) + b4 g4 + c4. c8 + e4 d4 + g4. g,8 + a4 b8[ c8] + b4 b4 + <e e,>2 + } + >> + } + diff --git a/hr/michi/gebet/texte.ly b/hr/michi/gebet/texte.ly new file mode 100644 index 0000000..e8ffb22 --- /dev/null +++ b/hr/michi/gebet/texte.ly @@ -0,0 +1,43 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + whatever = \lyricmode { + Herr, schi -- cke, was Du willt, + ein Lie -- bes o -- der Lei -- des; + ich bin ver -- gnügt, daß bei -- des + aus Dei -- nen Hän -- den quillt, + aus Dei -- nen Hän -- den quillt. + } + holden = \lyricmode { + Wol -- lest mit Freu -- den + und wol -- lest mit Lei -- den + mich nicht ü -- ber -- schüt -- ten! + Doch in der Mit -- ten + liegt hol -- des Be -- schei -- den, + hol -- des Be -- schei -- den. + } + +% Die Textaufteilungen % -- _ + + sopranText = \lyrics { + %<+hier den Text für den Sopran eintragen+> + } + + altText = \lyrics { + %<+hier den Text für den Alt eintragen+> + } + + tenorText = \lyricmode { + %<+hier den Text für den Tenor eintragen+> + Herr, + \whatever + \holden + Herr, + \whatever + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/haukify b/hr/michi/haukify new file mode 100644 index 0000000..83cb531 --- /dev/null +++ b/hr/michi/haukify @@ -0,0 +1,390 @@ +#!/usr/bin/perl + +# preamble +use strict; +use warnings; +# elbmaerp +# +# program logic goes here + + my %lines = (); + my %defs = (); + my %feds = (); + my @skeleton = (); + my @rhf = (); + my @current; +sub { # sub def scope + my $DEN = 256; # shortest duration glyph + my $measure = 0; + #my @voices = map { $_ . "Melodie" } ("sopran", "alt", "tenor", "bass"); + my $n = 0; + my $orig = 0; + my @chunks; + my @measures; + { # scope for reading in <dynArt.ly> + my $lrd = 0; + my $inside = 0; # are we inside a definition? + my $num; # numerator + my $den; # denominator + open(FH, "<dynArt.ly"); + while (<FH>) { + next if (/^\s*%/ or /override/ or /partial/ or /alternative/); + /{/; #vim bug + s/{[^}]*}//g; + if (/{/) { + $lrd += 1; + if ($lrd == 1) { + @measures = (); + $inside = 1 - $inside; + } + next; + } + next unless $inside; + if (/}/) { + $lrd -= 1; + if ($lrd == 0) { + if ($#measures == -1) { + } else { + my @bla = map $_, @measures; + push @chunks, \@bla; + } + $inside = 1 - $inside; + } + } + if (/time (\d+)\/(\d+)/) { # time signature change + $num = $1; + $den = $2; + while ($den < $DEN) { + $num *= 2; $den *= 2; + } + } + if (/^\s*s/) { + if (/s(\d+\.*)\*(\d+)\s*$/) { # multiple measures + #TODO: support s8*7*18 etc. + my $times = ($2 and ($2 ne "")) ? $2 : 1; + my $dur = &duration($1); + push @measures, $dur for (1 .. $times); + } else { # analogous to a melody + my @code = split /\s+/; + my $num = 0; + for (@code) { + $num += &duration($_); + } + push @measures, $num; + } + } + } + } + my @fm = @{$chunks[0]}; # first @measures + + my $idx = 0; + my $intimes = 0; + my $conc = 0; + + { # scope for &conc (concurrent music) + my $cdur; # duration + my $crud; # same for second part + my $clev; # manage sequential construct level (nesting curlies) + sub conc() { + return $_ if (/%/); # ignore comments + if (/^\s*{\s*$/) { + $clev += 1; + return $_; + } + if (/^\s*}\s*$/) { + $clev -= 1; + if ($cdur and $crud) { + $cdur = 0; $crud = 0; + } + return $_; + } + if ($clev == 1) { # ought to never be anything but 0 or 1 + # -> TODO: don’t rely on that + my @code = split /\s*/; + my @tms = map { &duration($_) } @code; + if ($cdur) { + $crud += $_ for @code; + } else { + $cdur += $_ for @code; + } + if ($crud and $crud != $cdur) { + print STDERR "parallel parts don’t match: $.; $n\n"; + } + print STDERR "parallel parts don’t match dynArt: $.; $n\n" + if $cdur % $measures[$idx]; + # TODO: don’t rely on the measure not to change inside conc music! + return $_; + # recursive call of haukified w/ local counter and state vars! + } + } + } + sub min() { + my $a = shift; + my $b = shift; + return $a < $b ? $a : $b; + } + my $par = ""; # parallel text inside &par + sub par() { # single line parallel music + /{{/; # vim bug + $par =~ /{([^}]*)}\s*\\\\\s*{([^}]*)}/; + my (@c, @d); + @c = split(/\s+/, $1); + @d = split(/\s+/, $2); + my ($c, $d); + $c += &duration($_) for @c; + $d += &duration($_) for @d; + print STDERR "parallel mismatch in\n>>>$par\n" + . ($c/$DEN) . " " . ($d/$DEN) . "\n" if ($c != $d); + return &min($c, $d); + } + { # scope for × (old-style tuple declaration) + my $tnum; # numerator + my $tden; # denominator + my $tstr; # resulting string + my $tdur = 0; # aggregate sum of nominal duration + sub times() { # simulating a FSM w/ outside states + # (basically a dispatcher w/ local memory) + my $task = shift; + if ($task eq "start") { + $tnum = shift; + $tden = shift; + $tdur = 0; + $tstr = "\\times $tnum\/$tden "; + $intimes = 1 - $intimes; + } + if ($task eq "cont") { + my $code = shift; + $tstr .= $code . " "; + $tdur += &duration($code); + } + if ($task eq "stop") { + $intimes = 1 - $intimes; + return ($tstr, $tdur*$tnum/$tden); + #return ($tstr . "} ", $tdur*$tnum/$tden); + } + } + } + sub duration() { # find a single note’s/a chord’s duration + return 0 unless(/\D*(\d+)(\.*).*/); # ignore anything w/o duration + my ($den, $dots, $num) = ($1, $2, 1); + $num = 0 if (/</); # chord -> TODO: just ignore + while ($dots) { + $num *= 2; + $den *= 2; + $num += 1; + chop($dots); + } + while ($den < $DEN) { + $num *= 2; $den *= 2; + } + print STDERR "bad duration: $1\n" unless ($den == $DEN); + return $num; + } + my $NUM = 0; # where am I in this measure? + # one func to rule them all + sub haukified() { # line-wise pretty-print definitions into arrays + if (/^\s*<<\s*$/) { # multi-line concurrent start + $conc += 1; + return $_; + } + if (/^\s*>>\s*$/) { # multi-line concurrent stop + $conc -= 1; + return $_; + } + return &conc($_) if ($conc > 1); + #local $, = "|"; + return $_ if (/%/ or /repeat/ or /time / or /clef/ or /partial/ or /version/); # pipe single-line instructions that don’t need to be matched + #if (/times/) { + # $idx += 1 unless ($#measures<2); + # return $_; + #} + # time key -> dynArt + chomp $_; + #times, repeat & bla = { … }; partial! + # -> tokenstream vorbereiten (trb -> hooks) + # -> repeat ought to occur in dynArt as well + s/times\s*/times/g; # this glues the numerator to 'times' + s/ ~/~/g; # this glues a tie to its left anchor, will be untied again + /^(\s*)(.*)/; + my $indent = $1; + my @code = split(/\s+/, $2); + my @parts; # prettified measures + my $part = ""; # current measure’s text + my $inpar = 0; # inside parallel section? + for (@code) { + if ($inpar) { + if (/>>/) { # parallel stop + $part .= "<< $par "; + $NUM += &par($par); + while ($NUM > $measures[$idx]) { + $NUM -= $measures[$idx]; + $idx += 1 if($measures[$idx + 1]); + #$measures[$idx] //= $measures[$idx-1]; + } + $par = ""; + $inpar = 0; + } else { + $par .= "$_ "; + next; + } + } + if (/<</) { # parallel start + $inpar = 1; + next; + } + if ($intimes) { + /{/; #vim bug + if (/}/) { # tuplet stop + # -> TODO: maybe support curlies inside tuplets + my ($text, $dur) = ×("stop"); + $part .= $text; + $NUM += $dur; + } else { + ×("cont", $_); + next; + } + } + if (/times(\d+)\/(\d+)/) { # tuplet start + ×("start", $1, $2); + next; + } + $part .= "$_ "; + if (/^\\(\S+)$/) { # definition start + &align($defs{$1}, $1); + next; + } + /{/; #vim bug + $NUM += &duration($_) unless /}/; + if ($NUM > $measures[$idx]) { # overfull measure + print STDERR "error at measure " . ($idx+1) . " (local $measure) in (orig) $orig, (result) $n\n"; + print STDERR "$NUM out of $measures[$idx]\n"; + print STDERR "(occurred after reading $part)\n"; + } + unless ($NUM < $measures[$idx]) { + push @parts, $part; + $n += 1; + $idx += 1; + $measure += 1; + $measures[$idx] //= $measures[$idx-1]; # for most simplistic dynArt + # as well as for errors + $NUM = 0; + $part = $indent; + } + } + if ($part =~ /\S/) { # still sth read left? + push @parts, $part; + print STDERR "underfull measure at (orig) $orig, measure " . ($idx+1) . " (local $measure) "; + print STDERR "$part?\n"; + print STDERR "$NUM out of $measures[$idx]\n"; + $idx += 1 unless ($#measures < 1); + $measures[$idx] //= $measures[$idx-1]; + } else { + $n -= 1; + #$idx -= 1 unless ($#measures<2); + } + my $res = $indent; + for (@parts) { + s/~/ ~/g; # undoing the gluing ;-) + $res .= $_ . "\n"; + } + return $res; + #return $indent . join("\n", map s/~/ ~/g, @parts); + } + my %aligned = (); + sub align { # match a def against the dynArt definition’s measures + my $bla = shift; + my @out = (); + my $name = shift; + my $oldm = $measure; + $measure = 1; # measure inside this def + my $oldorig = $orig; + $orig = $lines{$name}; # actual input file position + for (@$bla) { + if (/^\s*\\(\S+)\s*$/) { # call to another def + # -> TODO: beware of recursive calls + # well, we assume a sane user anyway … + unless (/voice/) { + print STDERR "$_"; # tell the caller we’re handling this + &align($defs{$1}, $1); + } + } + $n += 1; + $orig += 1; + push @out, $_ unless (/\d/); # pipe non-duration lines + #print &haukified($_), "\n" if /\d/; + push @out, &haukified($_) if /\d/; + } + $measure = $oldm; # restoring values … + $orig = $oldorig; + if ($aligned{$name}) { # already aligned this def + my $match = 1; + for (0 .. &min(@out, @{$feds{$name}})) { + $match = 0 if $feds{$name}->[$_] != $out[$_]; + } + print STDERR "inconsistent use of $name …" unless $match; + } else { + @{$feds{$name}} = map $_, @out; + } + } + my $i = 0; # index into @skeleton + sub align_voice() { # match a voice using &align + #print STDERR "dynart exhausted before stimmen done!\n" unless ($#chunks > -1); + @measures = ($#chunks == -1) ? @fm : @{pop @chunks}; + $idx = 0; + $NUM = 0; + &align(@_); + $i += 1; + } + sub check() { # overall handling of everything read from <stimmen.ly> + $orig += @{$skeleton[$i]}; + for (keys %defs) { + &align_voice($defs{$_}, $_) if /Melodie/; + } + for (keys %defs) { + $feds{$_} //= $defs{$_}; + } + } + sub flush() { + for (0 .. $#rhf) { + print for @{$skeleton[$_]}; + print for @{$feds{$rhf[$_]}}; + } + print for @{$skeleton[$#rhf+1]}; + } +} (); + +my $inddef = ""; +my $def = 0; +while (<>) { + if ($def) { + /{/; #vim bug + if (/^$inddef}\s*$/) { # def stop + $def = 0; + my @bla = map $_, @current; + $defs{$rhf[$#rhf]} = \@bla; + @current = (); + } + } + if (/^(\s*)(\S*) = \\relative/) { # def start + push @current, $_; + my @bla = map $_, @current; + push @skeleton, \@bla; + @current = (); + $inddef = $1; + push @rhf, $2; + $lines{$2} = $.; + $def = 1; #TODO: def zoix -> %def, später einbinden + # ds chunk -> begin orig, begin hauked + next; + } + push @current, $_; +} + +{ # using the defs + my @bla = map $_, @current; + push @skeleton, \@bla; + &check(); + &flush(); +} + +# some settings # vim: et diff --git a/hr/michi/kenya/dynArt.ly b/hr/michi/kenya/dynArt.ly new file mode 100644 index 0000000..1f4ab7c --- /dev/null +++ b/hr/michi/kenya/dynArt.ly @@ -0,0 +1,34 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + \dynamicUp + s1*27 + \bar "||" + s1*2 + \bar "||" + s1*8 + \bar "||" + \key g \major + s1*18 + \bar "||" + \pageBreak + \key e \major + s1*22 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/kenya/kenya.ly b/hr/michi/kenya/kenya.ly new file mode 100644 index 0000000..b4c567e --- /dev/null +++ b/hr/michi/kenya/kenya.ly @@ -0,0 +1,77 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Gloria" + composer = "Paul Basler" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 15) + + 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 Staff { + \new Voice = "solo" { \global \soloMelodie } + } + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \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/michi/kenya/midi.lua b/hr/michi/kenya/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/kenya/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/michi/kenya/stimmen.ly b/hr/michi/kenya/stimmen.ly new file mode 100644 index 0000000..d225b9a --- /dev/null +++ b/hr/michi/kenya/stimmen.ly @@ -0,0 +1,465 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \key e \major + %\override Staff.TimeSignature #'style = #'() + \time 4/4 + %\autoBeamOff + } + +% Die Stimmen + + rex = \relative c'' { + gis8 gis8 gis8 a8 ~ a8 a4 b8 ~ + b8 b4( a8) b8( cis8) cis4 + } + agnus = \relative c'' { + gis8 gis8 gis8 a8 ~ a8 a4 b8 ~ + b8 b4( a8) b8( cis8) cis4 + } + + soloMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + \clef "treble_8" + e8 e8 e8 e8 ~ e8 b4 cis8 ~ + cis8 cis8( ~ cis8 b8) cis8( dis8) b4 ~ + b8 r8 r4 r2 + r1 + r1 + r4 e,4 gis4. a8 ~ + a4 b2. + r2 r4 e8 e8 + cis4. a8 ~ a4 b4 + r1 + b8 b8 b8 cis8 ~ cis8 cis4 b8 ~ + b4 r4 r2 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b4 r4 r2 + e8 e8 e8 e8 ~ e8 b4 cis8 ~ + cis8 cis8( ~ cis8 b8) cis8( dis8) b4 ~ + b8 r8 r4 r2 + r1 + r1 + gis8 b8 b8 cis8 ~ cis8 b8 ~ b4 ~ + b8 r8 r4 r2 + e8 b8 b8 a8 ~ a8 b8 ~ b4 ~ + b8 r8 r4 r2 + \transpose c c, \rex + r1 + r1 + r1 + r1 + gis8 b8 b8 cis8 ~ cis8 b8 ~ b4 ~ + b8 r8 r4 r2 + e8 b8 b8 a8 ~ a8 b8 ~ b4 ~ + b8 r8 r4 r2 + \transpose c c, \agnus + r1 + \repeat unfold 2 { + r2 r4 b4 + b4( d8) d8 ~ d4 b4 + a8( b8) c8 b8 ~ b8 g8 ~ g4 ~ + g8 r8 r4 r2 + } + r2 r4 d'4 + d4. d8 ~ d4 d4 + \times 2/3 { f4( e4) c4 } d4. d8 ~ + d4. d8 ~ d2 ~ + d4 r4 r4 d4 + d4. d8 ~ d4 d4 + \times 2/3 { e4( d4) e4 } d2 ~ + d4 r4 r4 e4( ~ + \times 2/3 { e2 d2 e2 ~ } + e2) d2 ~ + d4 r4 r2 + e8 e8 e8 e8 ~ e8 b4 cis8 ~ + cis8 cis4 b8 cis8 dis8 b4 ~ + b8 r8 r4 r2 + r1 + r1 + gis8 gis8 gis8 gis8 a4 a8 fis8 ~ + fis8 fis8 fis8 e8 fis8( gis8) gis4 ~ + gis8 r8 r4 r2 + r2 r4 gis8 b8 + b1 ~ + b4 r4 r8 e4 cis8 + b1 ~ + b4 r4 r8 cis4 cis8 ~ + cis4 b2. ~ + b4 r4 r2 + b4( e8) a,8 ~ a2 + gis8( a8 b8) fis8 ~ fis2 + r2 r8 e'4( cis8) + b2 r8 dis8 ~ dis4 + e1 ~ + e1 ~ + e8 r8 r4 r2 + } + >> + } + + omni = \relative c'' { + b4 e8 a,8 ~ a8 gis4 a8 + b8 a8 gis2. + } + xp = \relative c'' { + r4 \times 2/3 { b8 b8 b8 } b16 b16 b16 b16 \times2/3 { b8 b8 b8 } + b8 b8 cis8( a8) b2 + } + sohn = \relative c'' { + b4 e8 a,8 ~ a8 gis4( fis8) + e2. r4 + } + miserere = \relative c'' { + b4 b8 c8 ~ c8 c4 a8 ~ + a8 a8 a8 g8 a8( b8) b4 + } + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + r1 + r1 + gis4 gis8 a8 ~ a8 a4 fis8 ~ + fis8 fis4( e8) fis8 gis8 e4 + b'8 b8 b8 b8 gis4( fis8) e8 ~ + e4 r4 r2 + r2 r4 b'8 b8 + cis4 b8 a8 ~ a4 b4 + r1 + gis8 gis8 gis8 fis8 ~ fis8 fis8 e4 ~ + e8 r8 r4 r2 + r8 gis4 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r8 gis8 gis8 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r1 + gis4 gis8 a8 ~ a8 a4 fis8 ~ + fis8 fis4( e8) fis8 gis8 e4 + b'8 b8 b8 b8 gis4( fis8) e8 ~ + e4 r4 r4 r8 gis8 ~ + gis8 fis8 gis8 b8 ~ b8 gis8 ~ gis4 ~ + gis8 r8 r4 r4 r8 e8 ~ + e8 e8 e8 fis8 ~ fis8 gis8 ~ gis4 + \rex + \omni + \xp + r2 r4 r8 gis8 ~ + gis8 fis8 gis8 b8 ~ b8 gis8 ~ gis4 ~ + gis8 r8 r4 r4 r8 e8 ~ + e8 e8 e8 fis8 ~ fis8 gis8 ~ gis4 + \agnus + \sohn + r1 + r1 + \miserere + r1 + r1 + b8 b8 b8 c8 ~ c8 c4 a8 ~ + a8 a8 a8 g8 a8( b8) b4 + r1 + r1 + \miserere + \miserere + b4 d8 c8 ~ c8 c4 a8 ~ + a8 a8 a8 g8 a8( b8) b4 + b8( g8) d'8 c8 ~ c8 c4 a8 ~ + a8 a8 a8 g8 a8( b8) b4 + r1 + r1 + gis4 gis8 a8 ~ a8 a4 fis8 ~ + fis8 fis4 e8 fis8 gis8 e4 + b'8 b8 b8 b8 gis4 fis8 e8 ~ + e4 r4 r2 + r2 r4 e4 + gis8 gis8 gis8 gis8 a4 a8 fis8 ~ + fis8 fis8 fis8 e8 fis8( gis8) gis4 + gis8 b8 b8 gis8 a4 a8 fis8 ~ + fis8 fis8 fis8 e8 fis8( gis8) gis4 + gis8 b8 b8 gis8 a4 a8 fis8 ~ + fis8 fis8 fis8 e8 fis8( gis8) gis4 + gis8 gis8 gis8 a8 ~ a8 a4 b8 ~ + b8 b8 b8 a8 b8( cis8) cis4 + r1 + r1 + b4( e8) a,8 ~ a2 + gis8( a8 b8) fis8 ~ fis2 + r4 e'2( cis4) + e1 ~ + e8 r8 r4 r2 + } + >> + } + + miserere = \relative c'' { + g4 g8 g8 ~ g8 g4 fis8 ~ + fis8 fis8 fis8 e8 fis8( g8) g4 + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + r1 + r1 + e4 e8 e8 ~ e8 e4 dis8 ~ + dis8 dis4( cis8) dis8 e8 b4 + b8 b8 b8 b8 e4( dis8) e8 ~ + e4 r4 r2 + r2 r4 b'8 b8 + a4 gis8 fis8 ~ fis4 gis4 + r1 + e8 e8 e8 dis8 ~ dis8 dis8 b4 ~ + b8 r8 r4 r2 + r8 gis'4 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r8 gis8 gis8 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r1 + e,4 e8 e8 ~ e8 e4 dis8 ~ + dis8 dis4( cis8) dis8 e8 b4 + b8 b8 b8 b8 e4( dis8) e8 ~ + e4 r4 r4 r8 gis8 ~ + gis8 fis8 gis8 b8 ~ b8 gis8 ~ gis4 ~ + gis8 r8 r4 r4 r8 e8 ~ + e8 e8 e8 fis8 ~ fis8 gis8 ~ gis4 + e8 e8 e8 fis8 ~ fis8 fis4 gis8 ~ + gis8 gis4( fis8) gis8( a8) a4 + \omni + \xp + r2 r4 r8 gis8 ~ + gis8 fis8 gis8 b8 ~ b8 gis8 ~ gis4 ~ + gis8 r8 r4 r4 r8 e8 ~ + e8 e8 e8 fis8 ~ fis8 gis8 ~ gis4 + e8 e8 e8 fis8 ~ fis8 fis4 gis8 ~ + gis8 gis4( fis8) gis8( a8) a4 + \sohn + r1 + r1 + \miserere + r1 + r1 + g8 g8 g8 g8 ~ g8 g4 fis8 ~ + fis8 fis8 fis8 e8 fis8( g8) g4 + r1 + r1 + \miserere + \miserere + \miserere + \miserere + r1 + r1 + e4 e8 e8 ~ e8 e4 dis8 ~ + dis8 dis4 cis8 dis8 e8 b4 + b8 b8 b8 b8 e4 dis8 e8 ~ + e4 r4 r2 + r2 r4 e4 + e8 e8 e8 e8 e4 e8 dis8 ~ + dis8 dis8 dis8 cis8 dis8( e8) e4 + e8 e8 gis8 e8 e4 e8 dis8 ~ + dis8 dis8 dis8 cis8 dis8( e8) e4 + e8 e8 gis8 gis8 e4 e8 dis8 ~ + dis8 dis8 dis8 cis8 dis8( e8) e4 + e8 e8 e8 fis8 ~ fis8 fis4 gis8 ~ + gis8 gis8 gis8 fis8 gis8( a8) a4 + r1 + r1 + gis4( e8) e8 ~ e2 + e4. dis8 ~ dis2 + r4 a'2. + fis4.( gis8 ~ gis2 ~ + gis8) r8 r4 r2 + } + >> + } + + miserere = \relative c' { + d4 d8 e8 ~ e8 e4 d8 ~ + d8 d8 d8 d8 d4 d4 + } + misererere = \relative c' { + d4 d8 e8 ~ e8 e4 d8 ~ + d8 d8 d8 c8 d4 d4 + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + r1 + r1 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b8 b4( a8) b8 b8 gis4 + b8 b8 b8 b8 a4( b8) e,8 ~ + e4 r4 r2 + r2 r4 b'8 b8 + cis4 b8 a8 ~ a4 b4 + r1 + b8 b8 b8 b8 ~ b8 b8 b4 ~ + b8 r8 r4 r2 + r8 gis4 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r8 gis8 gis8 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r1 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b8 b4( a8) b8 b8 gis4 + b8 b8 b8 b8 a4( b8) e,8 ~ + e4 r4 r4 r8 cis'8 ~ + cis8 b8 cis8 e8 ~ e8 cis8 ~ cis4 ~ + cis8 r8 r4 r4 r8 cis8 ~ + cis8 cis8 cis8 dis8 ~ dis8 e8 ~ e4 + b8 b8 b8 cis8 ~ cis8 cis4 dis8 ~ + dis8 dis4( cis8) dis8( e8) e4 + \transpose c' c \omni + \transpose c' c \xp + r2 r4 r8 cis8 ~ + cis8 b8 cis8 e8 ~ e8 cis8 ~ cis4 ~ + cis8 r8 r4 r4 r8 cis8 ~ + cis8 cis8 cis8 dis8 ~ dis8 e8 ~ e4 + b8 b8 b8 cis8 ~ cis8 cis4 dis8 ~ + dis8 dis4( cis8) dis8( e8) e4 + \transpose c' c \sohn + r1 + r1 + \miserere + r1 + r1 + d8 d8 d8 e8 ~ e8 e4 d8 ~ + d8 d8 d8 d8 d4 d4 + r1 + r1 + \miserere + \miserere + \misererere + \misererere + r1 + r1 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b8 b4 a8 b8 b8 gis4 + b8 b8 b8 b8 a4 b8 e,8 ~ + e4 r4 r2 + r2 r4 e4 + b'8 b8 b8 b8 cis4 cis8 b8 ~ + b8 b8 b8 a8 b4 b4 + b8 b8 b8 b8 cis4 cis8 b8 ~ + b8 b8 b8 a8 b4 b4 + b8 b8 e8 b8 cis4 cis8 b8 ~ + b8 b8 b8 a8 b4 b4 + b8 b8 b8 cis8 ~ cis8 cis4 dis8 ~ + dis8 dis8 dis8 cis8 dis8( e8) e4 + r1 + r1 + e4( b8) cis8 ~ cis2 + b8( cis8 b8) b8 ~ b2 + r4 cis2( e4) + cis8( b8 ~ b2. ~ + b8) r8 r4 r2 + } + >> + } + + miserere = \relative c' { + g4 g8 g8 ~ g8 g4 d8 ~ + d8 d8 d8 d8 d8( g8) g4 + } + misererere = \relative c' { + g8( e8) g8 g8 ~ g8 g4 d8 ~ + d8 d8 d8 d8 d8( g8) g4 + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 + r1 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b8 b4( a8) b8 b8 gis4 + b8 b8 b8 b8 a4( b8) e,8 ~ + e4 r4 r2 + r2 r4 b'8 b8 + a4 gis8 fis8 ~ fis4 gis4 + r1 + e8 e8 e8 a8 ~ a8 a8 gis4 ~ + gis8 r8 r4 r2 + r8 gis4 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r8 gis8 gis8 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r1 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b8 b4( a8) b8 b8 gis4 + b8 b8 b8 b8 a4( b8) e,8 ~ + e4 r4 r4 r8 e8 ~ + e8 dis8 e8 gis8 ~ gis8 e8 ~ e4 ~ + e8 r8 r4 r4 r8 a8 ~ + a8 a8 a8 b8 ~ b8 cis8 ~ cis4 + e,8 e8 e8 fis8 ~ fis8 fis4 gis8 ~ + gis8 gis4( fis8) gis8( a8) a4 + \transpose c' c \omni + \transpose c' c, \xp + r2 r4 r8 e8 ~ + e8 dis8 e8 gis8 ~ gis8 e8 ~ e4 ~ + e8 r8 r4 r4 r8 a8 ~ + a8 a8 a8 b8 ~ b8 cis8 ~ cis4 + e,8 e8 e8 fis8 ~ fis8 fis4 gis8 ~ + gis8 gis4( fis8) gis8( a8) a4 + \transpose c' c \sohn + r1 + r1 + \miserere + r1 + r1 + g8 g8 g8 g8 ~ g8 g4 d8 ~ + d8 d8 d8 d8 d8( g8) g4 + r1 + r1 + \miserere + \miserere + \misererere + \misererere + r1 + r1 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b8 b4 a8 b8 b8 gis4 + b8 b8 b8 b8 a4 b8 e,8 ~ + e4 r4 r2 + r2 r4 e4 + b'8 b8 b8 b8 cis4 cis8 b8 ~ + b8 b8 b8 a8 b4 b4 + b8 b8 b8 b8 cis4 cis8 b8 ~ + b8 b8 b8 a8 b4 b4 + b8 b8 b8 b8 cis4 cis8 b8 ~ + b8 b8 b8 a8 b4 b4 + e,8 e8 e8 fis8 ~ fis8 fis4 gis8 ~ + gis8 gis8 gis8 fis8 gis8( a8) a4 + r1 + r1 + b4( gis8) a8 ~ a2 + b8( a8 gis8) b8 ~ b2 + r4 a2. + e1 ~ + e8 r8 r4 r2 + } + >> + } + diff --git a/hr/michi/kenya/stimmen_.ly b/hr/michi/kenya/stimmen_.ly new file mode 100644 index 0000000..d225b9a --- /dev/null +++ b/hr/michi/kenya/stimmen_.ly @@ -0,0 +1,465 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \key e \major + %\override Staff.TimeSignature #'style = #'() + \time 4/4 + %\autoBeamOff + } + +% Die Stimmen + + rex = \relative c'' { + gis8 gis8 gis8 a8 ~ a8 a4 b8 ~ + b8 b4( a8) b8( cis8) cis4 + } + agnus = \relative c'' { + gis8 gis8 gis8 a8 ~ a8 a4 b8 ~ + b8 b4( a8) b8( cis8) cis4 + } + + soloMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + \clef "treble_8" + e8 e8 e8 e8 ~ e8 b4 cis8 ~ + cis8 cis8( ~ cis8 b8) cis8( dis8) b4 ~ + b8 r8 r4 r2 + r1 + r1 + r4 e,4 gis4. a8 ~ + a4 b2. + r2 r4 e8 e8 + cis4. a8 ~ a4 b4 + r1 + b8 b8 b8 cis8 ~ cis8 cis4 b8 ~ + b4 r4 r2 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b4 r4 r2 + e8 e8 e8 e8 ~ e8 b4 cis8 ~ + cis8 cis8( ~ cis8 b8) cis8( dis8) b4 ~ + b8 r8 r4 r2 + r1 + r1 + gis8 b8 b8 cis8 ~ cis8 b8 ~ b4 ~ + b8 r8 r4 r2 + e8 b8 b8 a8 ~ a8 b8 ~ b4 ~ + b8 r8 r4 r2 + \transpose c c, \rex + r1 + r1 + r1 + r1 + gis8 b8 b8 cis8 ~ cis8 b8 ~ b4 ~ + b8 r8 r4 r2 + e8 b8 b8 a8 ~ a8 b8 ~ b4 ~ + b8 r8 r4 r2 + \transpose c c, \agnus + r1 + \repeat unfold 2 { + r2 r4 b4 + b4( d8) d8 ~ d4 b4 + a8( b8) c8 b8 ~ b8 g8 ~ g4 ~ + g8 r8 r4 r2 + } + r2 r4 d'4 + d4. d8 ~ d4 d4 + \times 2/3 { f4( e4) c4 } d4. d8 ~ + d4. d8 ~ d2 ~ + d4 r4 r4 d4 + d4. d8 ~ d4 d4 + \times 2/3 { e4( d4) e4 } d2 ~ + d4 r4 r4 e4( ~ + \times 2/3 { e2 d2 e2 ~ } + e2) d2 ~ + d4 r4 r2 + e8 e8 e8 e8 ~ e8 b4 cis8 ~ + cis8 cis4 b8 cis8 dis8 b4 ~ + b8 r8 r4 r2 + r1 + r1 + gis8 gis8 gis8 gis8 a4 a8 fis8 ~ + fis8 fis8 fis8 e8 fis8( gis8) gis4 ~ + gis8 r8 r4 r2 + r2 r4 gis8 b8 + b1 ~ + b4 r4 r8 e4 cis8 + b1 ~ + b4 r4 r8 cis4 cis8 ~ + cis4 b2. ~ + b4 r4 r2 + b4( e8) a,8 ~ a2 + gis8( a8 b8) fis8 ~ fis2 + r2 r8 e'4( cis8) + b2 r8 dis8 ~ dis4 + e1 ~ + e1 ~ + e8 r8 r4 r2 + } + >> + } + + omni = \relative c'' { + b4 e8 a,8 ~ a8 gis4 a8 + b8 a8 gis2. + } + xp = \relative c'' { + r4 \times 2/3 { b8 b8 b8 } b16 b16 b16 b16 \times2/3 { b8 b8 b8 } + b8 b8 cis8( a8) b2 + } + sohn = \relative c'' { + b4 e8 a,8 ~ a8 gis4( fis8) + e2. r4 + } + miserere = \relative c'' { + b4 b8 c8 ~ c8 c4 a8 ~ + a8 a8 a8 g8 a8( b8) b4 + } + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + r1 + r1 + gis4 gis8 a8 ~ a8 a4 fis8 ~ + fis8 fis4( e8) fis8 gis8 e4 + b'8 b8 b8 b8 gis4( fis8) e8 ~ + e4 r4 r2 + r2 r4 b'8 b8 + cis4 b8 a8 ~ a4 b4 + r1 + gis8 gis8 gis8 fis8 ~ fis8 fis8 e4 ~ + e8 r8 r4 r2 + r8 gis4 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r8 gis8 gis8 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r1 + gis4 gis8 a8 ~ a8 a4 fis8 ~ + fis8 fis4( e8) fis8 gis8 e4 + b'8 b8 b8 b8 gis4( fis8) e8 ~ + e4 r4 r4 r8 gis8 ~ + gis8 fis8 gis8 b8 ~ b8 gis8 ~ gis4 ~ + gis8 r8 r4 r4 r8 e8 ~ + e8 e8 e8 fis8 ~ fis8 gis8 ~ gis4 + \rex + \omni + \xp + r2 r4 r8 gis8 ~ + gis8 fis8 gis8 b8 ~ b8 gis8 ~ gis4 ~ + gis8 r8 r4 r4 r8 e8 ~ + e8 e8 e8 fis8 ~ fis8 gis8 ~ gis4 + \agnus + \sohn + r1 + r1 + \miserere + r1 + r1 + b8 b8 b8 c8 ~ c8 c4 a8 ~ + a8 a8 a8 g8 a8( b8) b4 + r1 + r1 + \miserere + \miserere + b4 d8 c8 ~ c8 c4 a8 ~ + a8 a8 a8 g8 a8( b8) b4 + b8( g8) d'8 c8 ~ c8 c4 a8 ~ + a8 a8 a8 g8 a8( b8) b4 + r1 + r1 + gis4 gis8 a8 ~ a8 a4 fis8 ~ + fis8 fis4 e8 fis8 gis8 e4 + b'8 b8 b8 b8 gis4 fis8 e8 ~ + e4 r4 r2 + r2 r4 e4 + gis8 gis8 gis8 gis8 a4 a8 fis8 ~ + fis8 fis8 fis8 e8 fis8( gis8) gis4 + gis8 b8 b8 gis8 a4 a8 fis8 ~ + fis8 fis8 fis8 e8 fis8( gis8) gis4 + gis8 b8 b8 gis8 a4 a8 fis8 ~ + fis8 fis8 fis8 e8 fis8( gis8) gis4 + gis8 gis8 gis8 a8 ~ a8 a4 b8 ~ + b8 b8 b8 a8 b8( cis8) cis4 + r1 + r1 + b4( e8) a,8 ~ a2 + gis8( a8 b8) fis8 ~ fis2 + r4 e'2( cis4) + e1 ~ + e8 r8 r4 r2 + } + >> + } + + miserere = \relative c'' { + g4 g8 g8 ~ g8 g4 fis8 ~ + fis8 fis8 fis8 e8 fis8( g8) g4 + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + r1 + r1 + e4 e8 e8 ~ e8 e4 dis8 ~ + dis8 dis4( cis8) dis8 e8 b4 + b8 b8 b8 b8 e4( dis8) e8 ~ + e4 r4 r2 + r2 r4 b'8 b8 + a4 gis8 fis8 ~ fis4 gis4 + r1 + e8 e8 e8 dis8 ~ dis8 dis8 b4 ~ + b8 r8 r4 r2 + r8 gis'4 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r8 gis8 gis8 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r1 + e,4 e8 e8 ~ e8 e4 dis8 ~ + dis8 dis4( cis8) dis8 e8 b4 + b8 b8 b8 b8 e4( dis8) e8 ~ + e4 r4 r4 r8 gis8 ~ + gis8 fis8 gis8 b8 ~ b8 gis8 ~ gis4 ~ + gis8 r8 r4 r4 r8 e8 ~ + e8 e8 e8 fis8 ~ fis8 gis8 ~ gis4 + e8 e8 e8 fis8 ~ fis8 fis4 gis8 ~ + gis8 gis4( fis8) gis8( a8) a4 + \omni + \xp + r2 r4 r8 gis8 ~ + gis8 fis8 gis8 b8 ~ b8 gis8 ~ gis4 ~ + gis8 r8 r4 r4 r8 e8 ~ + e8 e8 e8 fis8 ~ fis8 gis8 ~ gis4 + e8 e8 e8 fis8 ~ fis8 fis4 gis8 ~ + gis8 gis4( fis8) gis8( a8) a4 + \sohn + r1 + r1 + \miserere + r1 + r1 + g8 g8 g8 g8 ~ g8 g4 fis8 ~ + fis8 fis8 fis8 e8 fis8( g8) g4 + r1 + r1 + \miserere + \miserere + \miserere + \miserere + r1 + r1 + e4 e8 e8 ~ e8 e4 dis8 ~ + dis8 dis4 cis8 dis8 e8 b4 + b8 b8 b8 b8 e4 dis8 e8 ~ + e4 r4 r2 + r2 r4 e4 + e8 e8 e8 e8 e4 e8 dis8 ~ + dis8 dis8 dis8 cis8 dis8( e8) e4 + e8 e8 gis8 e8 e4 e8 dis8 ~ + dis8 dis8 dis8 cis8 dis8( e8) e4 + e8 e8 gis8 gis8 e4 e8 dis8 ~ + dis8 dis8 dis8 cis8 dis8( e8) e4 + e8 e8 e8 fis8 ~ fis8 fis4 gis8 ~ + gis8 gis8 gis8 fis8 gis8( a8) a4 + r1 + r1 + gis4( e8) e8 ~ e2 + e4. dis8 ~ dis2 + r4 a'2. + fis4.( gis8 ~ gis2 ~ + gis8) r8 r4 r2 + } + >> + } + + miserere = \relative c' { + d4 d8 e8 ~ e8 e4 d8 ~ + d8 d8 d8 d8 d4 d4 + } + misererere = \relative c' { + d4 d8 e8 ~ e8 e4 d8 ~ + d8 d8 d8 c8 d4 d4 + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + r1 + r1 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b8 b4( a8) b8 b8 gis4 + b8 b8 b8 b8 a4( b8) e,8 ~ + e4 r4 r2 + r2 r4 b'8 b8 + cis4 b8 a8 ~ a4 b4 + r1 + b8 b8 b8 b8 ~ b8 b8 b4 ~ + b8 r8 r4 r2 + r8 gis4 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r8 gis8 gis8 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r1 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b8 b4( a8) b8 b8 gis4 + b8 b8 b8 b8 a4( b8) e,8 ~ + e4 r4 r4 r8 cis'8 ~ + cis8 b8 cis8 e8 ~ e8 cis8 ~ cis4 ~ + cis8 r8 r4 r4 r8 cis8 ~ + cis8 cis8 cis8 dis8 ~ dis8 e8 ~ e4 + b8 b8 b8 cis8 ~ cis8 cis4 dis8 ~ + dis8 dis4( cis8) dis8( e8) e4 + \transpose c' c \omni + \transpose c' c \xp + r2 r4 r8 cis8 ~ + cis8 b8 cis8 e8 ~ e8 cis8 ~ cis4 ~ + cis8 r8 r4 r4 r8 cis8 ~ + cis8 cis8 cis8 dis8 ~ dis8 e8 ~ e4 + b8 b8 b8 cis8 ~ cis8 cis4 dis8 ~ + dis8 dis4( cis8) dis8( e8) e4 + \transpose c' c \sohn + r1 + r1 + \miserere + r1 + r1 + d8 d8 d8 e8 ~ e8 e4 d8 ~ + d8 d8 d8 d8 d4 d4 + r1 + r1 + \miserere + \miserere + \misererere + \misererere + r1 + r1 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b8 b4 a8 b8 b8 gis4 + b8 b8 b8 b8 a4 b8 e,8 ~ + e4 r4 r2 + r2 r4 e4 + b'8 b8 b8 b8 cis4 cis8 b8 ~ + b8 b8 b8 a8 b4 b4 + b8 b8 b8 b8 cis4 cis8 b8 ~ + b8 b8 b8 a8 b4 b4 + b8 b8 e8 b8 cis4 cis8 b8 ~ + b8 b8 b8 a8 b4 b4 + b8 b8 b8 cis8 ~ cis8 cis4 dis8 ~ + dis8 dis8 dis8 cis8 dis8( e8) e4 + r1 + r1 + e4( b8) cis8 ~ cis2 + b8( cis8 b8) b8 ~ b2 + r4 cis2( e4) + cis8( b8 ~ b2. ~ + b8) r8 r4 r2 + } + >> + } + + miserere = \relative c' { + g4 g8 g8 ~ g8 g4 d8 ~ + d8 d8 d8 d8 d8( g8) g4 + } + misererere = \relative c' { + g8( e8) g8 g8 ~ g8 g4 d8 ~ + d8 d8 d8 d8 d8( g8) g4 + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 + r1 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b8 b4( a8) b8 b8 gis4 + b8 b8 b8 b8 a4( b8) e,8 ~ + e4 r4 r2 + r2 r4 b'8 b8 + a4 gis8 fis8 ~ fis4 gis4 + r1 + e8 e8 e8 a8 ~ a8 a8 gis4 ~ + gis8 r8 r4 r2 + r8 gis4 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r8 gis8 gis8 gis8 a8( b8) b4 ~ + b8 r8 r4 r2 + r1 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b8 b4( a8) b8 b8 gis4 + b8 b8 b8 b8 a4( b8) e,8 ~ + e4 r4 r4 r8 e8 ~ + e8 dis8 e8 gis8 ~ gis8 e8 ~ e4 ~ + e8 r8 r4 r4 r8 a8 ~ + a8 a8 a8 b8 ~ b8 cis8 ~ cis4 + e,8 e8 e8 fis8 ~ fis8 fis4 gis8 ~ + gis8 gis4( fis8) gis8( a8) a4 + \transpose c' c \omni + \transpose c' c, \xp + r2 r4 r8 e8 ~ + e8 dis8 e8 gis8 ~ gis8 e8 ~ e4 ~ + e8 r8 r4 r4 r8 a8 ~ + a8 a8 a8 b8 ~ b8 cis8 ~ cis4 + e,8 e8 e8 fis8 ~ fis8 fis4 gis8 ~ + gis8 gis4( fis8) gis8( a8) a4 + \transpose c' c \sohn + r1 + r1 + \miserere + r1 + r1 + g8 g8 g8 g8 ~ g8 g4 d8 ~ + d8 d8 d8 d8 d8( g8) g4 + r1 + r1 + \miserere + \miserere + \misererere + \misererere + r1 + r1 + b4 b8 cis8 ~ cis8 cis4 b8 ~ + b8 b4 a8 b8 b8 gis4 + b8 b8 b8 b8 a4 b8 e,8 ~ + e4 r4 r2 + r2 r4 e4 + b'8 b8 b8 b8 cis4 cis8 b8 ~ + b8 b8 b8 a8 b4 b4 + b8 b8 b8 b8 cis4 cis8 b8 ~ + b8 b8 b8 a8 b4 b4 + b8 b8 b8 b8 cis4 cis8 b8 ~ + b8 b8 b8 a8 b4 b4 + e,8 e8 e8 fis8 ~ fis8 fis4 gis8 ~ + gis8 gis8 gis8 fis8 gis8( a8) a4 + r1 + r1 + b4( gis8) a8 ~ a2 + b8( a8 gis8) b8 ~ b2 + r4 a2. + e1 ~ + e8 r8 r4 r2 + } + >> + } + diff --git a/hr/michi/kenya/texte.ly b/hr/michi/kenya/texte.ly new file mode 100644 index 0000000..42cd997 --- /dev/null +++ b/hr/michi/kenya/texte.ly @@ -0,0 +1,87 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + pax = \lyricmode { + et in ter -- ra pax ho -- mi -- ni -- bus + bo -- næ vo -- lun -- ta -- tis. + } + bene = \lyricmode { + be -- ne -- di -- ci -- mus te, + glo -- ri -- fi -- ca -- mus te, + ti -- bi pro -- pter + glo -- ri -- am tu -- am. + } + dd = \lyricmode { + Do -- mi -- ne De -- us, + } + rex = \lyricmode { + rex cœ -- le -- stis, + De -- us pa -- ter om -- ni -- po -- tens. + } + jesu = \lyricmode { + Do -- mi -- ne Fi -- li u -- ni -- gen -- i -- te + Je -- su Chri -- ste, + } + agnus = \lyricmode { + a -- gnus De -- i, + Fi -- li -- us Pa -- tris. + } + cygnus = \lyricmode { + mi -- se -- re -- re mi -- se -- re -- re no -- bis. + } + soter = \lyricmode { + sus -- ci -- pe de -- pre -- ca -- ti -- o -- nem no -- stram. + } + super = \lyricmode { + Do -- mi -- nus, tu sol -- us al -- tis -- si -- mus + Je -- su Cri -- ste Do -- mi -- nus. + } + spirit = \lyricmode { + sanc -- to spi -- ri -- tu in glo -- ria De -- i Pa -- tris, + } + sprite = \lyricmode { + sanc -- to spi -- ri_tu in glo -- ria De -- i Pa -- tris, + } + amen = \lyricmode { + A -- men + A -- men + A -- men + } + + chor = \lyricmode { + \pax + \bene + \pax + \dd \dd \dd + \rex + \jesu + \dd \dd \dd + \agnus + \cygnus + \soter + \cygnus \cygnus \cygnus \cygnus + \super + Cum \spirit \spirit \spirit \sprite + \amen + } + +% 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+> + \chor + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/lullabye/dynArt.ly b/hr/michi/lullabye/dynArt.ly new file mode 100644 index 0000000..9f36aed --- /dev/null +++ b/hr/michi/lullabye/dynArt.ly @@ -0,0 +1,30 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + \dynamicUp + s1*4 + s1*17 + \bar "||" + \key g \minor + s1*8 + \bar "||" + \key g \major + s1*19 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/lullabye/lullabye.ly b/hr/michi/lullabye/lullabye.ly new file mode 100644 index 0000000..ea804fb --- /dev/null +++ b/hr/michi/lullabye/lullabye.ly @@ -0,0 +1,74 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Lullabye" + composer = "Billy Joel" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + 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 \voiceOne \tenorMelodieI } + \new Voice = "tenoere" { \global \voiceTwo \tenorMelodieII } + %\addlyrics { \tenorText } + >> + + bas = << + \new Voice = "baesse" { \global \voiceOne \bassMelodieI } + \new Voice = "baesse" { \global \voiceTwo \bassMelodieII } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \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/michi/lullabye/midi.lua b/hr/michi/lullabye/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/lullabye/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/michi/lullabye/stimmen.ly b/hr/michi/lullabye/stimmen.ly new file mode 100644 index 0000000..96fde3b --- /dev/null +++ b/hr/michi/lullabye/stimmen.ly @@ -0,0 +1,416 @@ +%some settings% vim: ai sw=2 lbr nu 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 + r1 + r8 b8 b8 a8 a8 b8 b8 g8 + g1 + \repeat volta 2 { + r8 b8 b8 a8 a8 b8 b8 c8 + c4. b8 b2 + r8 a8 a8 a8 a8 g8 g8 fis8 + fis4. e16( d16) e2 + r8 b'8 b8 a8 a8 b8 b8 c8 + c4. b8 b2 + r8 a8 a8 a8 a8 g8 g8 fis8 + fis4. e8 e2 + r8 c'8 c8 b8 b8 a8 a8 b8 + b4.( a8) a2 + r8 b8 b8 b8 b8 d4 g,8 ~ + g1 + r8 b8 b8 b8 b8 d4 g,8 ~ + g8 g8 g8 g8 g4 b8 e,8 ~ + e8 e8 e8 d8 e4 g4 + } \alternative { + { + e4. d8 d2 + } + { + e4. d8 d2 + } + } + r8 bes'8 bes8 a8 a8 bes8 bes8 a8 + a8 g8 g8 g8 g8 fis8 fis4 + r8 bes8 bes8 a8 a8 bes8 bes8 a8 + a8 g8 g8 g8 g8 fis8 fis4 + r8 f8 f8 g8 aes4. g8 + f2 ees2 + r8 g8 g8 a8 bes4 a4 + g2 fis2 + % + r8 b8 b8 a8 a8 b8 b8 c8 + c4. b8 b2 + r8 a8 a8 a8 a8 g8 g8 fis8 + fis4. e16( d16) e2 + r8 b'8 b8 a8 a8 b8 b8 d8 + d8 c8 c8 b8 b8 a8 a4 + r8 a8 b8 c8 d4 b16( a16) g8 + g8 g8 a16 b16 a8 ~ a4. g8 + g1 + r1 + r8 b8 b8 a8 a8 b8 b8 g8 + g1 + r8 b8 b8 a8 a8 b8 b8 d8 + d16 c16 c4 b8 b8 a8 a4 + r8 a8 b8 c8 d4 b8 g8 + g4. a16( b16) a4. g8 + g1 + g1 ~ + g1 + } + >> + } + + altMelodie = \relative c'' { + << + { \meta } + %\altArt + %the actual tune + { + r1 + r1 + r8 g8 g8 g8 g8 g8 g8 d8 + e1 + \repeat volta 2 { + r8 g8 g8 g8 g8 g8 g8 g8 + g4. g8 g2 + r8 fis8 fis8 fis8 fis8 e8 e8 d8 + d4. e16( d16) e2 + r8 g8 g8 g8 g8 g8 g8 g8 + g4. g8 g2 + r8 fis8 fis8 fis8 fis8 e8 e8 d8 + d4. cis8 cis2 + r8 a'8 a8 g8 g8 e8 e8 g8 + g2 g4( fis4) + r8 g8 g8 g8 g8 g4 g8 ~ + g1 + r8 g8 g8 g8 f8 f4 f8 ~ + f8 e8 d8 c8 d4 d8 d8 ~ + d8 d8 d8 d8 cis4 cis4 + } \alternative { + { + e4. d8 d2 + } + { + e4. d8 d2 + } + } + r8 g8 g8 f8 f8 f8 f8 f8 + f8 d8 d8 ees8 ees8 d8 d4 + r8 g8 g8 f8 f8 f8 f8 ees8 + ees8 d8 d8 ees8 ees8 d8 d4 + r8 d8 ~ d2. + d2 d4 c4 + r8 e8 ~ e2. + e1 + % + r8 d4( c8 ~ c8 d4 g8 ~ + g1) + r8 fis4.( ~ fis8 e4 d8 + d4. c8 ~ c2) + r8 g'8( ~ g2. + g4. f8 f8 e8 e4) + r8 fis4.( g2 + e2 g4 fis4) + r1 + r1 + r8 g8 g8 g8 g8 g8 g8 d8 + e1 + r8 g8 g8 g8 g8 g8 g8 g8 + g16 g16 g4 f8 f8 e8 e4 + r8 fis8 fis8 fis8 g4 g8 d8 + e4. e8 g4 fis4 + g1 + g4. f8 f8 ees8 ees8 d8 + d1 + } + >> + } + + tenorMelodieI = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + r8 b8 b8 a8 a8 b8 b8 g8 + g1 + r8 d'8 d8 c8 c8 d8 d8 b8 + d2( c2) + \repeat volta 2 { + r8 d8 d8 ees8 ees8 d8 d8 c8 + c4. d8 d2 + r8 c8 c8 c8 c8 b8 b8 a8 + c4. c8 c2 + r8 d8 d8 ees8 ees8 d8 d8 c8 + c4. d8 d2 + r8 c8 c8 c8 c8 b8 b8 a8 + b4. cis8 cis2 + r8 e8 e8 d8 d8 c8 c8 d8 + d2 c2 + r8 d8 d8 d8 b8 b4 d8( ~ + d2 c2) + r8 d8 d8 d8 d8 d4 d8 ~ + d8 c8 b8 a8 b4 b8 b8 ~ + b8 b8 b8 b8 a4 a4 + } \alternative { + { + c4. c8 b4( c4) + } + { + c4. c8 c2 + } + } + % + r8 d8 d8 c8 c8 d8 d8 c8 + c8 bes8 bes8 c8 c8 a8 a4 + r8 d8 d8 c8 c8 d8 d8 c8 + c8 bes8 bes8 c8 c8 a8 a4 + r8 b8 ~ b2. + g1 + r8 cis8 ~ cis2. + c1 + % + r8 g4.( ~ g4. c8 ~ + c4. d8 ~ d2) + r8 c4.( ~ c8 b4 a8 + c1) + r8 d4( c8 c8 d8 d8 d8 + d8 c8 c8 b8 b8 a8 a4) + r8 c4.( d2 + cis2 c2) + r8 b8 b8 a8 a8 b8 b8 g8 + g1 + r8 d'8 d8 c8 c8 d8 d8 b8 + d2( c2) + r8 d8 d8 ees8 ees8 d8 d8 d8 + d16 c16 c4 b8 b8 a8 a4 + r8 c8 c8 c8 d4 d8 d8 + cis4. cis8 e4 d4 + r8 b8 b8 a8 a8 b8 b8 d8 + d8 c8 ~ c2. + b1 + } + >> + } + tenorMelodieII = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + r4 r8 a8 a8 g8 g8 d8 + e1 + r8 b'8 b8 a8 a8 b8 b8 g8 + g1 + \repeat volta 2 { + r8 d'8 d8 c8 c8 d8 d8 g,8 + g4. b8 b2 + r8 c8 c8 c8 c8 b8 b8 a8 + a4. g8 g2 + r8 d8 d8 c8 c8 d8 d8 g8 + g4. b8 b2 + r8 c8 c8 c8 c8 b8 b8 a8 + a4. a8 a2 + r8 c8 c8 b8 b8 a8 a8 b8 + b4.( a8) a2 + r8 b8 b8 b8 b8 d4 g,8 ~ + g1 + r8 b8 b8 b8 b8 d4 g,8 ~ + g8 g8 g8 g8 g4 b8 g8 ~ + g8 g8 g8 g8 a4 a4 + } \alternative { + { + g4. g8 b4( a4) + } + { + g4. g8 fis2 + } + } + % + r8 d'8 d8 c8 c8 d8 d8 c8 + c8 bes8 bes8 g8 g8 a8 a4 + r8 d8 d8 c8 c8 d8 d8 c8 + c8 bes8 bes8 g8 g8 a8 a4 + r8 g8 ~ g2. + g1 + r8 a8 ~ a2. + a1 + % + r8 g4.( ~ g4. c8 ~ + c4. b8 ~ b2) + r8 c4.( ~ c8 b4 a8 + a4. g8 ~ g2) + r8 b4( a8 a8 b8 b8 d8 + g,1) + r8 a4.( g2 + g2 a2) + r4 r8 a8 a8 g8 g8 d8 + e1 + r8 b'8 b8 a8 a8 b8 b8 g8 + g1 + r8 d'8 d8 c8 c8 d8 d8 d8 + d16 c16 c4 b8 b8 a8 a4 + r8 a8 a8 a8 g4 g8 g8 + g4. g8 c4 c4 + b4. a8 a8 g8 g4 ~ + g4. c8 ~ c4 a4 + g1 + } + >> + } + + bassMelodieI = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r2 r8 g8 g8 b,8 + d2( c2) + r8 d8 d8 ees8 ees8 d8 d4 + e1 + \repeat volta 2 { + r8 g8 g8 g8 g8 g8 g8 ees8 + ees4. g8 g2 + r8 d8 d8 d8 e8 e8 e8 fis8 + fis4. g8 g2 + r8 g8 g8 g8 g8 g8 g8 ees8 + ees4. g8 g2 + r8 d8 d8 d8 e8 e8 e8 fis8 + a4. e8 e2 + r8 e8 e8 g8 g8 a8 a8 g8 + g2 d2 + r8 f8 f8 f8 f8 f4 e8 ~ + e1 + r8 g8 g8 g8 g8 g4 c,8 ~ + c8 c8 c8 c8 e4 e8 e8 ~ + e2 e4 e4 + } \alternative { + { + g4. g8 fis4( e4) + } + { + g4. g8 fis2 + } + } + % + r8 g8 g8 f8 f8 bes,8 bes8 f'8 + f8 g8 g8 ees8 ees8 d8 d4 + r8 g8 g8 f8 f8 bes,8 bes8 c8 + c8 d8 d8 ees8 ees8 d8 d4 + r8 d8 d8 ees8 f4. ees8 + d2 c2 + r8 e8 e8 f8 g4 fis4 + e2 d2 + % + r8 d4( ees8 ~ ees8 d4 g8 ~ + g1) + d2( e4. fis8 + fis4. g8 ~ g2) + r8 d4( ees8 ees8 d8 d8 f8 + f8 e8 e8 d8 d8 cis8 cis4) + r8 fis4.( g2 + e2 d2) + r2 r8 g8 g8 b,8 + d2( c2) + r8 d8 d8 ees8 ees8 d8 d4 + e1 + r8 g8 g8 g8 g8 g8 g8 f8 + f16 e16 e4 d8 d8 cis8 cis4 + r8 fis8 fis8 fis8 g4 g8 g8 + e4. e8 d4 d4 + g2. g8 f8 + f8 ees8 ees8 aes8 aes8 a8 a4 + d,1 + } + >> + } + bassMelodieII = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 + r1 + r8 g8 ~ g2. + c1 + \repeat volta 2 { + r8 g'8 g8 g8 g8 g8 g8 ees8 + ees4. d8 d2 + r8 d8 d8 d8 e8 e8 e8 fis8 + a,4. c8 c2 + r8 g'8 g8 g8 g8 g8 g8 ees8 + ees4. d8 d2 + r8 d8 d8 d8 e8 e8 e8 fis8 + a,4. a8 a2 + r8 a8 a8 b8 b8 c8 c8 d8 + d2 d2 + r8 f8 f8 f8 f8 f4 e8 ~ + e1 + r8 d8 d8 d8 d8 d4 c8 ~ + c8 c8 c8 c8 b4 b4 + a2 a4 a4 + } \alternative { + { + d4. d8 d2 + } + { + d4. d8 d2 + } + } + % + r8 g8 g8 f8 f8 bes,8 bes8 f'8 + f8 g8 g8 ees8 ees8 d8 d4 + r8 g8 g8 f8 f8 bes,8 bes8 c8 + c8 d8 d8 ees8 ees8 d8 d4 + r8 g,8 ~ g2. + b2 c2 + r8 a8 ~ a2. + d1 + % + g,2.( ~ g8 ees'8 ~ + ees4. d8 ~ d2) + d2( e4. fis8 + a,4. c8 ~ c2) + g1( ~ + g4. d'8 d8 cis8 cis4) + r8 c4.( b2 + a2 d2) + r1 + r1 + r8 g,8 ~ g2. + c1 + r8 g'8 g8 g8 g8 g8 g8 f8 + f16 e16 e4 d8 d8 cis8 cis4 + r8 c8 b8 a8 b4 b8 b8 + a4. a8 d4 d4 + g,2 g2 ~ + g1 ~ + g1 + } + >> + } + diff --git a/hr/michi/lullabye/texte.ly b/hr/michi/lullabye/texte.ly new file mode 100644 index 0000000..02ed3b0 --- /dev/null +++ b/hr/michi/lullabye/texte.ly @@ -0,0 +1,22 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + } + diff --git a/hr/michi/mass/dynArt.ly b/hr/michi/mass/dynArt.ly new file mode 100644 index 0000000..b3027b7 --- /dev/null +++ b/hr/michi/mass/dynArt.ly @@ -0,0 +1,81 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + \dynamicUp + s2. + \time 7/8 + s1*7/8*9 + \bar "||" + \time 3/4 + s2.*2 + \time 5/4 + s4*5 + \break + \time 3/4 + s2.*2 + \time 5/4 + s4*5 + \time 3/4 + s2.*2 + \time 5/4 + s4*5 + \bar "||" + \time 3/4 + s2.*8 + \time 4/4 + s1 + \time 3/4 + s2.*2 + \time 4/4 + s1 + \time 7/8 + s1*7/8*9 + \bar "||" + s1*7/8*4 + \time 3/4 + s2.*4 + \time 7/8 + s1*7/8*3 + \time 2/4 + s2 + \time 3/4 + s2.*8 + \time 4/4 + s1 + \time 3/4 + s2.*2 + \time 4/4 + s1 + \bar "||" + \time 3/4 + s2.*2 + \time 5/4 + s4*5 + \time 3/4 + s2.*2 + \time 5/4 + s4*5 + \time 3/4 + s2.*2 + \time 5/4 + s4*5 + \time 3/4 + s2.*4 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/mass/mass.ly b/hr/michi/mass/mass.ly new file mode 100644 index 0000000..2279ed2 --- /dev/null +++ b/hr/michi/mass/mass.ly @@ -0,0 +1,72 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Kyrie" + %composer = "<+Komponist+>" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 15) + + 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 } << + \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/michi/mass/midi.lua b/hr/michi/mass/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/mass/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/michi/mass/stimmen.ly b/hr/michi/mass/stimmen.ly new file mode 100644 index 0000000..1923097 --- /dev/null +++ b/hr/michi/mass/stimmen.ly @@ -0,0 +1,345 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \key bes \major + %\override Staff.TimeSignature #'style = #'() + \time 3/4 + %\autoBeamOff + } + +% Die Stimmen + + pause = { + \repeat volta 4 { + R2. + } + } + unterPause = { + R1*7/8*7 + } + generalA = { + R2.*2 + R4*5 + } + + sopA = \relative c'' { + \repeat volta 4 { + R1*7/8 + } + r4. r16 des16 c16 bes16 aes16 ges16 f16 ees16 + des8. bes16 r8 r16 bes'16 aes16 ges16 f16 ees16 des16 c16 + des8. bes16 r8 r16 des'16 c16 bes16 aes16 ges16 f16 ees16 + des8. bes16 r8 r16 bes'16 aes16 ges16 f16 ees16 des16 c16 + \repeat percent 2 { + des8. bes16 r8 r16 <des' bes>16 <c aes>16 <bes ges>16 <aes f>16 <ges ees>16 <f des>16 <ees c>16 + } + des8. bes16 r8 r16 <des' bes>16 <c aes>16 <bes ges>16 <aes f>16 <ges ees>16 <f des>8 + <c' a>16 q16 q8 q16 <d bes>16 q16 <ees c>16 q16 <d bes>16 q8 <c a>8 + } + sopB = \relative c' { + r8 f16 ges16 f8 a8 + \times 2/3 { c8( des8) bes8 ~ } bes4 ~ bes16 aes16 f16 ees16 ~ + ees16 f16 r8 r8 f16 ges16 f8 a8 + \times 2/3 { c8( des8) bes8 ~ } bes4 ~ bes16 aes16 f16 ees16 ~ + ees16 f16 r8 r8 f16 ges16 f8 a8 + \times 2/3 { c8( des8) bes8 ~ } bes2 ~ + bes2. ~ + bes2. ~ + bes4 r16 bes16 c16 des16( ~ des16 c16) bes16 c16 ~ c8 bes8 ~ + bes2. ~ + bes2. ~ + bes2 r2 + } + patAs = \relative c'' { + c16 f,16 f8 c'8 c16 des16 des16( c16) f,8 + } + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + \pause + \sopA + \generalA + \repeat volta 2 { + R2. + f,8. bes,16 bes2 ~ + bes4. r8 bes'8 c16 des16 c8.( f,16) f4 ~ + f2 r4 + f8. bes16 bes2 + bes8. bes,16 bes4 bes'8 c16 des16 c8.( f,16) f4 ~ + f4 + \sopB + } + \sopA + R1*7/8*4 + \patAs + \transpose c cis \patAs + \transpose c d \patAs + \transpose c ees \relative c'' { c16 f,16 f8 c'8 c16 } + e'16 e16( c16) e8 + \repeat percent 2 { + f16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 + } + f16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 + r2 + r4 + \sopB + f8. bes,16 bes2 ~ + bes2. + f8. bes,16 bes4 bes'8 c16 des16 c8.( f,16) f4 ~ + f2 r4 + f8. bes16 bes2 + bes8. bes,16 bes4 bes'8 c16 des16 c8.( f,16) f4 ~ + f2. + f8. bes16 bes2 ~ + bes4. r8 bes8 c16 des16 ees8.( f16) f4 ~ + f2. ~ + f2. ~ + f2. + R2. + } + >> + } + + altB = \relative c' { + r8 f16 ges16 f8 f8 + \times 2/3 { f4 f8 ~ } f4 ~ f16 ees16 f16 ees16 ~ + ees16 f16 r8 r8 f16 ges16 f8 f8 + \times 2/3 { f4 f8 ~ } f4 ~ f16 ees16 f16 ees16 ~ + ees16 f16 r8 r8 f16 ges16 f8 f8 + \times 2/3 { f4 f8 ~ } f2 ~ + f2. ~ + f2. ~ + f4 r16 bes16 c16 des16( ~ des16 c16) bes16 c16 ~ c8 bes8 ~ + bes2 ~ bes8 f16 g16 + f4 ~ f16 c16 d8 c16 bes16 g16 f16 ~ + f2 r2 + } + patAa = \relative c'' { + c16 f,16 f8 f8 f16 f16 f8 f8 + } + patBa = \relative c'' { + a16 g16 g8 g8 g16 g16 g8 g8 + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + \pause + \repeat volta 4 { + f16 f16 f8 f16 f16 f16 ges16 f16 ees16 f8 bes,8 + } + \unterPause + f'16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 + \generalA + \repeat volta 2 { + f8. bes,16 bes2 ~ + bes2 r4 + f'8. bes,16 bes4 f'8 f16 f16 f4 f4 + f8. bes,16 bes2 ~ + bes2 r4 + f'8. bes,16 bes4 f'8 f16 f16 f4 f4 ~ + f4 + \altB + } + \repeat percent 8 { + f'16 f16 f8 f16 f16 f16 ges16 f16 ees16 f8 bes,8 + } + f'16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 + R1*7/8*4 + \patAa + \transpose c cis \patAa + \patBa + \transpose a bes \patBa + \repeat percent 2 { + f,16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 + } + a16 a16 a8 a16 bes16 bes16 c16 c16 bes16 bes8 a8 + r2 + r4 + \altB + f8. bes,16 bes2 + f'8. bes,16 bes2 + f'8. bes,16 bes4 f'8 f16 f16 f4 f4 + f8. bes,16 bes2 ~ + bes2. + f'8. bes,16 bes4 f'8 f16 f16 f4 f4 + f8. bes,16 bes2 + r16 bes16 c16 des16( ~ des16 c16) bes16 c16 ~ c8 bes8 ~ + bes4. r8 f'8 f16 f16 f4 f4 ~ + f2. ~ + f2. ~ + f2. + R2. + } + >> + } + + tenA = \relative c' { + \repeat volta 4 { + R1*7/8 + } + \unterPause + R1*7/8 + } + tenB = \relative c { + r8 f16 ges16 f8 a8 + \times 2/3 { c8( des8) bes8 ~ } bes2 ~ + bes16 c16 r8 r8 f,16 ges16 f8 a8 + \times 2/3 { c8( des8) bes8 ~ } bes2 ~ + bes16 c16 r8 r8 f,16 ges16 f8 a8 + \times 2/3 { c8( des8) bes8 ~ } bes4( des4 + d2.) ~ + d2.( + ees4) r16 bes16 c16 des16( ~ des16 c16) bes16 c16 ~ c8 bes8 ~ + bes2. ~ + bes2. ~ + bes2 r2 + } + patAt = \relative c' { + c16 c16 c8 c16 c16 c8 des8 des8 + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + \pause + \tenA + \generalA + \repeat volta 2 { + f8. bes,16 bes2 ~ + bes2 r4 + f'8. bes,16 bes4 bes8 c16 des16 c8.( f16) f4 + f8. bes,16 bes2 ~ + bes2 r4 + f'8. bes,16 bes4 bes8 c16 des16 c8.( f,16) f4 ~ + f4 + \tenB + } + \tenA + f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 aes8 + f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 a8 + f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 bes8 + f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 b8 + \patAt + \transpose c cis \patAt + \transpose c d \patAt + %\transpose c ees \patAt + \transpose c ees \relative c' { c16 c16 c8 c16 c16 c8 } + e8 e8 %transponieren erzeugt fes + \repeat percent 2 { + f16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 + } + f16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 + r2 + r4 + \tenB + f8. bes,16 bes2 + f'8. bes,16 bes2 + f'8. bes,16 bes4 bes8 c16 des16 c8.( f,16) f4 ~ + f2 r4 + f'8. bes,16 bes2 + f'8. bes,16 bes4 bes8 c16 des16 c8.( f,16) f4 + f'8. bes,16 bes2 + r16 bes16 c16 des16( ~ des16 c16) bes16 c16 ~ c8 bes8 ~ + bes4. r8 bes8 c16 des16 ees8.( f16) f4 ~ + f2. ~ + f2. ~ + f2. + R2. + } + >> + } + + bassA = \relative c { + \repeat volta 4 { + R1*7/8 + } + \unterPause + R1*7/8 + } + bassB = \relative c { + r8 f16 ges16 f8 f8 + \times 2/3 { f4 f8 ~ } f2 ~ + f8 r8 r8 f16 ges16 f8 f8 + \times 2/3 { f4 f8 ~ } f2 ~ + f8 r8 r8 f16 ges16 f8 f8 + \times 2/3 { f4 bes8 ~ } bes2 ~ + bes2. ~ + bes2. ~ + bes4 r16 bes16 c16 des16( ~ des16 c16) bes16 c16 ~ c8 bes8 ~ + bes2 ~ bes8 f16 g16 + f4 ~ f16 c'16 d8 c16 bes16 g16 f16 ~ + f2 r2 + } + patAb = \relative c { + e16 f16 f8 f16 f16 f8 f8 f8 + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + \pause + \bassA + \generalA + \repeat volta 2 { + R2. + f8. bes16 bes2 ~ + bes4. r8 bes8 c16 des16 c8.( f,16) f4 ~ + f2 r4 + f8. bes16 bes2 ~ + bes2 bes8 c16 des16 c8.( f,16) f4 ~ + f4 + \bassB + } + \bassA + f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 aes8 + f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 a8 + f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 bes8 + f16 f16 f8 f16 f16 f16 ges16 ges16 f16 f8 f8 + \patAb + \transpose e f \patAb + \transpose e fis \patAb + \transpose e g \relative c { e16 f16 f8 f16 f16 f8 } + g8 g8 + \repeat percent 2 { + f16 f16 f8 f16 f16 f16 f16 f16 f16 f8 f8 + } + c'16 c16 c8 c16 d16 d16 ees16 ees16 d16 d8 c8 + r2 + r4 + \bassB + f,8. bes16 bes2 ~ + bes2. + bes8. bes16 bes4 bes8 aes16 ges16 f4 f4 + f8. bes,16 bes2 + f'8. bes16 bes2 ~ + bes2 bes8 aes16 ges16 f4 f4 + f8. bes,16 bes2 + f'8. bes16 bes2 ~ + bes4. r8 bes8 aes16 ges16 f4 f4 ~ + f2. ~ + f2. ~ + f2. + R2. + } + >> + } + diff --git a/hr/michi/mass/texte.ly b/hr/michi/mass/texte.ly new file mode 100644 index 0000000..1471f58 --- /dev/null +++ b/hr/michi/mass/texte.ly @@ -0,0 +1,53 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + Ky -- ri -- e + Ky -- ri -- e Chris -- te E -- lei -- son + Ky -- ri -- e + Ky -- ri -- e Chris -- te E -- lei -- son + Ky -- ri -- e E -- lei -- son _ + Ky -- ri -- e E -- lei -- son _ + Ky -- ri -- e E -- lei -- son + Ky -- ri -- e E -- lei -- son + Ky -- ri -- e Ky -- ri -- e Chris -- te E -- lei -- son + Ky -- ri -- e Ky -- ri -- e Chris -- te E -- lei -- son + Ky -- ri -- e Ky -- ri -- e Chris -- te E -- lei -- son + Ky -- ri -- e Ky -- ri -- e Chris -- te E -- lei -- son + Ky -- ri -- e Ky -- ri -- e Chris -- te + Ky -- ri -- e Ky -- ri -- e Chris -- te + Ky -- ri -- e Ky -- ri -- e Chris -- te + Ky -- ri -- e Ky -- ri -- e Chris -- te + Ky -- ri -- e Ky -- ri -- e Chris -- te E -- lei -- son + % + Ky -- ri -- e Ky -- ri -- e Chris -- te E -- lei -- son + Ky -- ri -- e E -- lei -- son _ + Ky -- ri -- e E -- lei -- son _ + Ky -- ri -- e E -- lei -- son + Ky -- ri -- e E -- lei -- son + % + Ky -- ri -- e Ky -- ri -- e + Ky -- ri -- e Chris -- te E -- lei -- son + Ky -- ri -- e + Ky -- ri -- e Chris -- te E -- lei -- son + Ky -- ri -- e + Ky -- ri -- e E -- lei -- son + Chris -- te E -- lei -- son + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/mornin/dynArt.ly b/hr/michi/mornin/dynArt.ly new file mode 100644 index 0000000..d192169 --- /dev/null +++ b/hr/michi/mornin/dynArt.ly @@ -0,0 +1,23 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + \dynamicUp + s1*42 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/mornin/midi.lua b/hr/michi/mornin/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/mornin/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/michi/mornin/mornin.ly b/hr/michi/mornin/mornin.ly new file mode 100644 index 0000000..34675a3 --- /dev/null +++ b/hr/michi/mornin/mornin.ly @@ -0,0 +1,78 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "My Lord, what a mornin’" + composer = "Spiritual" + arranger = "H. T. Burleigh" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + 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 = << + \meta + \new Voice = "tenoereI" { \global \voiceOne \tenorIMelodie } + \new Voice = "tenoereII" { \global \voiceTwo \tenorIIMelodie } + \addlyrics { \tenorText } + %\new Voice = "tenoere" { \global << \tenorIMelodie \\ \tenorIIMelodie >> } + % \new Voice = "tenoereII" { \global \tenorIMelodie } + % \addlyrics { \tenorText } + >> + + bas = << + \new Voice = "baesse" { \global \bassMelodie } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \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/michi/mornin/stimmen.ly b/hr/michi/mornin/stimmen.ly new file mode 100644 index 0000000..a1142a2 --- /dev/null +++ b/hr/michi/mornin/stimmen.ly @@ -0,0 +1,194 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \key ees \major + %\override Staff.TimeSignature #'style = #'() + \time 4/4 + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + \repeat unfold 10 { + r1 + } + g4 g2 f8 g8 + ees4( f4) g4( aes4) + bes4 bes2 g8 aes8 + f4 f2 bes4 + g4 g2 aes8 f8 + ees4 ees2 aes8 aes8 + g4. ees8 f4 f4 + ees2. aes4\( + g2. ees4 f1 ees1 ~ ees2.\) r4 + ees'2 d2 c4 c4 d8 d8 d4 ees2 d2 + c4 c4 b8 b8 b8( d8) + ees4 ees4 ees4 ees8( f8) g4 aes4 g4( g,4) + g4 g4 c8 g8 fis4 + g2 aes2 g4 g4( ~ g8 ees8) f8 g8 + ees4 ees2. bes'4 bes4( ~ bes8 g8) g8 aes8 f8( g8 aes8 bes8) c8( d8) ees8( f8) + g2 g4 aes8 f8 ees4 ees2 c8 c8 c8( bes4) g8 bes8( aes8) aes4 aes2( g4) f8 f8 f4( ees2) ees4 g2 f2 ees1 ~ ees1 + } + >> + } + + altMelodie = \relative c'' { + << + { \meta } + %\altArt + %the actual tune + { + g4 g2 f8 g8 ees4 ees2. bes'4 bes2 g8 aes8 f4 f2 bes4 g4 g2 aes8 f8 ees4 ees2 aes8 aes8 g4. ees8 f4 f4 bes2. aes8 aes8 g4. ees8 f4 f4 ees2. r4 + ees4 ees2 c8 d8 bes4 c8( d8) ees2 d4 g2 g8 ees8 d4( c4) bes4 d4 ees4 ees2 ees8 ees8 c4 c2 ees8 ees8 ees4. bes8 c4 d4 bes4( c4 bes4) d4\( ees2. bes4 ees2 d2 bes1 ~ bes2.\) r4 + g'2 f2 ees4 ees4 f8 f8 f4 g2 g2 ees4 f4 g8 g8 g4 g4 g4 c4 c4 c4 ~ c8 bes8 g4( f4) ees4 ees4 ees8 ees8 ees4 ees4( d4) d2 g4 g4( ~ g8 ees8) d8 d8 ees4 ees2. bes'4 bes4( ~ bes8 g8) g8 ees8 c8( d8 ees8 f16 g16) aes8( bes8) + << + { + bes4 + bes4( b4) c8( bes8) aes8 aes8 + } + \\ + { + bes8( aes8) + g2 g4 f8 f8 + } + >> + g4 g2 ges8 ges8 + f4 e4 ees4 ees8( d8) des2. c8 ces8 bes2. bes4 + << + { + ees2 d2 + } + \\ + { + c2 d2 + } + >> + bes1 ~ bes1 + } + >> + } + + tenorIstart = \relative c' { + ees4 ees2 d8 d8 ees4 ees2. d4 d2 ees8 ees8 d4 d2 d4 des4 des2 c8 c8 bes4( ees4) ees4 ees8 ees8 ees4 ees4 d4 f4 f4( ees4 d4) d8 d8 ees4. ees8 ees4 d4 ees2. + } + tenorIIstart = \relative c' { + bes4 bes2 bes8 bes8 bes4 bes2. bes4 bes2 c8 c8 bes4 bes2 bes4 bes4 bes2 aes8 aes8 bes4 ~ bes4 ces4 c8 c8 bes4 bes4 bes4 d4 bes2( c4) bes8 bes8 bes4. bes8 bes4 bes4 bes2. + } + tenorImitte = \relative c' { + bes4 bes2 ces8 ces8 bes4 bes4 ces4( bes4) d4 d2 + } + tenorIImitte = \relative c' { + g4 g2 aes8 aes8 g4 g4 ges4( g4) bes4 bes2 + } + tenorCommonI = \relative c' { + r4 + bes4 bes2 aes8 bes8 g4( aes4) bes2 bes4 d2 ees8 c8 bes4( aes4) g4 f8( bes8) b4 bes2 c8 c8 g4 g2 c8 c8 bes4. g8 aes4 aes4 g4( aes4 g4) f8\(( bes8) bes2. g4 a2 aes2 g1 ~ g2.\) r4 + c4 c4 d4 d4 ees4( ~ ees16 c16) ees16( c16) d2 c4 c4 bes8 bes8 bes4 g2. r4 c4 c4( ees4) ees16( c16 ees16 c16) ees4 d4 c4( b4) c4 c4 c8 c8 ees8( c8) b2 c4( bes4) + } + tenorCommonII = \relative c' { + c8 c8 + aes8( bes8 c8 d8) ees8( f8) ees8( d8) ees4( f4) e4 f8 f8 ees4 ees2 ees8 ees8 d4 des4 c4 ces4 bes2. aes8 aes8 g2. g4 aes2 aes2 g1 ~ g1 + } + tenorIMelodie = \relative c' { + \clef "treble_8" + %{ + << + \\ + \tenorIIstart + >> + %} + \tenorIstart + \tenorCommonI + \tenorImitte + \tenorCommonII + } + tenorIIMelodie = \relative c' { + \clef "treble_8" + %{ + << + \tenorIstart + \\ + >> + %} + \tenorIIstart + \tenorCommonI + \tenorIImitte + \tenorCommonII + } + %{ + tenorMelodie = { + \clef "treble_8" + << + { + \voiceOne \tenorIstart + } + \\ + { + \voiceTwo \tenorIIstart + } + >> + \tenorRest + } + %} + + bassIstart = \relative c' { + g4 g2 aes8 aes8 g4 g2. bes4 bes2 aes8 aes8 aes4( g4) f4 fis4 g4 g2 ees8 ees8 ees4( g4) a4 aes8 aes8 g4 g4 f4 bes4 bes2( aes4) aes8 aes8 g4. g8 aes4 aes4 g2. + } + bassIIstart = \relative c { + ees4 ees2 ees8 ees8 ees4 ees2. g4 g2 f8 f8 bes,4 bes2 bes4 ees4 ees2 aes,8 aes8 g2 ges4 f8 f8 bes4 bes4 aes4 aes4 g2( f4) bes8 bes8 ees4 g,4 bes4 bes4 ees2. + } + bassI = \relative c'' { + } + bassII = \relative c'' { + } + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + << + { + \bassIstart + } + \\ + { + \bassIIstart + } + >> + r4 + c4 c2 c8 c8 c2 c4( d4) ees4 ees2 aes,8 d8 g,4 g2 f4 g4 g2 f8 aes8 c4 c2 aes8 aes8 bes4. bes8 bes4 bes4 ees2. bes4\( ees2 des2 c2 bes2 <bes ees,>1 ~ q2.\) r4 + << + { + g'2 g2 g4 g4 g8 g8 g4 g2 g2 c4 d4 d8 d8 d4 + } + \\ + { + c,2 c2 c4 c4 c8 c8 c4 c2 c2 c4 c4 g'8 g8 g8( b8) + } + >> + c4 bes4 aes4 aes4 g4 f4 ees4( d4) c4 bes4 a8 a8 aes4 g2 f4( bes4) + << + { + bes4 bes2 ees8 ees8 bes4 ees4 ees4 ~ ees4 g4 g2 ees8 ees8 bes4( bes'4) aes4 g8( bes8) bes4( g4) g8( c8) c8 c8 + } + \\ + { + ees,,4 ees2 ees8 ees8 ees4 ees'4 ces4( ees4) g,4 g2 aes8 aes8 bes4( bes'4) aes4 g8( f8) ees4( d4) c4 f8 aes8 + } + >> + c4 c2 a8 a8 aes4 g4 f4 f4 e2( ees4) <ees aes,>8 q8 bes2. bes4 <c f,>2 bes2 <bes ees,>1 ~ q1 + } + >> + } + diff --git a/hr/michi/mornin/stimmen_.ly b/hr/michi/mornin/stimmen_.ly new file mode 100644 index 0000000..e95005b --- /dev/null +++ b/hr/michi/mornin/stimmen_.ly @@ -0,0 +1,344 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \key ees \major + %\override Staff.TimeSignature #'style = #'() + \time 4/4 + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + \repeat unfold 10 { + r1 + } + g4 g2 f8 g8 + ees4( f4) g4( aes4) + bes4 bes2 g8 aes8 + f4 f2 bes4 + g4 g2 aes8 f8 + ees4 ees2 aes8 aes8 + g4. ees8 f4 f4 + ees2. aes4\( + g2. ees4 + f1 + ees1 ~ + ees2.\) r4 + ees'2 d2 + c4 c4 d8 d8 d4 + ees2 d2 + c4 c4 b8 b8 b8( d8) + ees4 ees4 ees4 ees8( f8) + g4 aes4 g4( g,4) + g4 g4 c8 g8 fis4 + g2 aes2 + g4 g4( ~ g8 ees8) f8 g8 + ees4 ees2. + bes'4 bes4( ~ bes8 g8) g8 aes8 + f8( g8 aes8 bes8) c8( d8) ees8( f8) + g2 g4 aes8 f8 + ees4 ees2 c8 c8 + c8( bes4) g8 bes8( aes8) aes4 + aes2( g4) f8 f8 + f4( ees2) ees4 + g2 f2 + ees1 ~ + ees1 + } + >> + } + + altMelodie = \relative c'' { + << + { \meta } + %\altArt + %the actual tune + { + g4 g2 f8 g8 + ees4 ees2. + bes'4 bes2 g8 aes8 + f4 f2 bes4 + g4 g2 aes8 f8 + ees4 ees2 aes8 aes8 + g4. ees8 f4 f4 + bes2. aes8 aes8 + g4. ees8 f4 f4 + ees2. r4 + ees4 ees2 c8 d8 + bes4 c8( d8) ees2 + d4 g2 g8 ees8 + d4( c4) bes4 d4 + ees4 ees2 ees8 ees8 + c4 c2 ees8 ees8 + ees4. bes8 c4 d4 + bes4( c4 bes4) d4\( + ees2. bes4 + ees2 d2 + bes1 ~ + bes2.\) r4 + g'2 f2 + ees4 ees4 f8 f8 f4 + g2 g2 + ees4 f4 g8 g8 g4 + g4 g4 c4 c4 + c4 ~ c8 bes8 g4( f4) + ees4 ees4 ees8 ees8 ees4 + ees4( d4) d2 + g4 g4( ~ g8 ees8) d8 d8 + ees4 ees2. + bes'4 bes4( ~ bes8 g8) g8 ees8 + c8( d8 ees8 f16 g16) aes8( bes8) + << + { + bes4 + bes4( b4) c8( bes8) aes8 aes8 + } + \\ + { + bes8( aes8) + g2 g4 f8 f8 + } + >> + g4 g2 ges8 ges8 + f4 e4 ees4 ees8( d8) + des2. c8 ces8 + bes2. bes4 + << + { + ees2 d2 + } + \\ + { + c2 d2 + } + >> + bes1 ~ + bes1 + } + >> + } + + tenorIstart = \relative c' { + ees4 ees2 d8 d8 + ees4 ees2. + d4 d2 ees8 ees8 + d4 d2 d4 + des4 des2 c8 c8 + bes4( ees4) ees4 ees8 ees8 + ees4 ees4 d4 f4 + f4( ees4 d4) d8 d8 + ees4. ees8 ees4 d4 + ees2. + } + tenorIIstart = \relative c' { + bes4 bes2 bes8 bes8 + bes4 bes2. + bes4 bes2 c8 c8 + bes4 bes2 bes4 + bes4 bes2 aes8 aes8 + bes4 ~ bes4 ces4 c8 c8 + bes4 bes4 bes4 d4 + bes2( c4) bes8 bes8 + bes4. bes8 bes4 bes4 + bes2. + } + tenorImitte = \relative c' { + bes4 bes2 ces8 ces8 + bes4 bes4 ces4( bes4) + d4 d2 + } + tenorIImitte = \relative c' { + g4 g2 aes8 aes8 + g4 g4 ges4( g4) + bes4 bes2 + } + tenorCommonI = \relative c' { + r4 + bes4 bes2 aes8 bes8 + g4( aes4) bes2 + bes4 d2 ees8 c8 + bes4( aes4) g4 f8( bes8) + b4 bes2 c8 c8 + g4 g2 c8 c8 + bes4. g8 aes4 aes4 + g4( aes4 g4) f8\(( bes8) + bes2. g4 + a2 aes2 + g1 ~ + g2.\) r4 + c4 c4 d4 d4 + ees4( ~ ees16 c16) ees16( c16) d2 + c4 c4 bes8 bes8 bes4 + g2. r4 + c4 c4( \grace d8 ees4) ees16( c16 ees16 c16) + ees4 d4 c4( b4) + c4 c4 c8 c8 ees8( c8) + b2 c4( bes4) + } + tenorCommonII = \relative c' { + c8 c8 + aes8( bes8 c8 d8) ees8( f8) ees8( d8) + ees4( f4) e4 f8 f8 + ees4 ees2 ees8 ees8 + d4 des4 c4 ces4 + bes2. aes8 aes8 + g2. g4 + aes2 aes2 + g1 ~ + g1 + } + tenorIMelodie = \relative c' { + \clef "treble_8" + %{ + << + \\ + \tenorIIstart + >> + %} + \tenorIstart + \tenorCommonI + \tenorImitte + \tenorCommonII + } + tenorIIMelodie = \relative c' { + \clef "treble_8" + %{ + << + \tenorIstart + \\ + >> + %} + \tenorIIstart + \tenorCommonI + \tenorIImitte + \tenorCommonII + } + %{ + tenorMelodie = { + \clef "treble_8" + << + { + \voiceOne \tenorIstart + } + \\ + { + \voiceTwo \tenorIIstart + } + >> + \tenorRest + } + %} + + bassIstart = \relative c' { + g4 g2 aes8 aes8 + g4 g2. + bes4 bes2 aes8 aes8 + aes4( g4) f4 fis4 + g4 g2 ees8 ees8 + ees4( g4) a4 aes8 aes8 + g4 g4 f4 bes4 + bes2( aes4) aes8 aes8 + g4. g8 aes4 aes4 + g2. + } + bassIIstart = \relative c { + ees4 ees2 ees8 ees8 + ees4 ees2. + g4 g2 f8 f8 + bes,4 bes2 bes4 + ees4 ees2 aes,8 aes8 + g2 ges4 f8 f8 + bes4 bes4 aes4 aes4 + g2( f4) bes8 bes8 + ees4 g,4 bes4 bes4 + ees2. + } + bassI = \relative c'' { + } + bassII = \relative c'' { + } + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + << + { + \bassIstart + } + \\ + { + \bassIIstart + } + >> + r4 + c4 c2 c8 c8 + c2 c4( d4) + ees4 ees2 aes,8 d8 + g,4 g2 f4 + g4 g2 f8 aes8 + c4 c2 aes8 aes8 + bes4. bes8 bes4 bes4 + ees2. bes4\( + ees2 des2 + c2 bes2 + <bes ees,>1 ~ + q2.\) r4 + << + { + g'2 g2 + g4 g4 g8 g8 g4 + g2 g2 + c4 d4 d8 d8 d4 + } + \\ + { + c,2 c2 + c4 c4 c8 c8 c4 + c2 c2 + c4 c4 g'8 g8 g8( b8) + } + >> + c4 bes4 aes4 aes4 + g4 f4 ees4( d4) + c4 bes4 a8 a8 aes4 + g2 f4( bes4) + << + { + bes4 bes2 ees8 ees8 + bes4 ees4 ees4 ~ ees4 + g4 g2 ees8 ees8 + bes4( bes'4) aes4 g8( bes8) + bes4( g4) g8( c8) c8 c8 + } + \\ + { + ees,,4 ees2 ees8 ees8 + ees4 ees'4 ces4( ees4) + g,4 g2 aes8 aes8 + bes4( bes'4) aes4 g8( f8) + ees4( d4) c4 f8 aes8 + } + >> + c4 c2 a8 a8 + aes4 g4 f4 f4 + e2( ees4) <ees aes,>8 q8 + bes2. bes4 + <c f,>2 bes2 + <bes ees,>1 ~ + q1 + } + >> + } + diff --git a/hr/michi/mornin/texte.ly b/hr/michi/mornin/texte.ly new file mode 100644 index 0000000..4db899f --- /dev/null +++ b/hr/michi/mornin/texte.ly @@ -0,0 +1,47 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + morn = \lyricmode { + My Lord what a morn -- in’, + My Lord what a morn -- in’, + Oh, + my Lord what a morn -- in’, + } + +% 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+> + \morn + When de stars be -- gin to fall, + When de stars be -- gin to fall. + \morn + When de stars be -- gin to fall + Hum _ _ _ _ _ + Done quit all my worl’ -- ly ways + Jine dat heb -- ben -- ly ban’, + Done quit_all my worl’ -- ly ways + Jine dat heb -- ben -- ly ban’ + Oh! + My Lord what a morn -- in’ + Oh + My Lord what a morn -- in’ + Oh + my Lord what a morn -- in’, + When de stars be -- gin to fall, + When de stars be -- gin to fall. + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/nachtlied/dynArt.ly b/hr/michi/nachtlied/dynArt.ly new file mode 100644 index 0000000..0499c62 --- /dev/null +++ b/hr/michi/nachtlied/dynArt.ly @@ -0,0 +1,31 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key b \minor + \time 4/4 + s2 + s1*33 + \time 3/2 + s1. + \time 4/4 + s1*4 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/nachtlied/midi.lua b/hr/michi/nachtlied/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/nachtlied/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/michi/nachtlied/nachtlied.ly b/hr/michi/nachtlied/nachtlied.ly new file mode 100644 index 0000000..de706a3 --- /dev/null +++ b/hr/michi/nachtlied/nachtlied.ly @@ -0,0 +1,73 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Nachtlied" + composer = "Max Reger" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + 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 = "baesseI" { \global \voiceOne \bassIMelodie } + \new Voice = "baesseII" { \global \voiceTwo \bassIIMelodie } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \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/michi/nachtlied/stimmen.ly b/hr/michi/nachtlied/stimmen.ly new file mode 100644 index 0000000..690dc74 --- /dev/null +++ b/hr/michi/nachtlied/stimmen.ly @@ -0,0 +1,74 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \autoBeamOff + \partial 2 + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + fis2 + e2. fis4 b2 a4 r4 cis4 fis,4 b4 a4 gis2 fis4 r4 d'2 e4( b4) g2 a4 b4 c4 c4 b4 cis4 d4 b4 a8[( b8] gis4) a2 r4 fis4 g4 b4 a4 g4 fis4 fis4 b8[ cis8] d4 g,2 fis4 b4 a4 g4 fis4.( e8) d2 b'2 cis2 b4 e4 cis4 d4 b4 cis8 ais8 fis4 g4 gis4 a4 d4 d4 cis2 e4 e4 fis4 fis4 e2 b2 cis2 gis2 a4 gis4 e2 fis4 fis4 eis4 a4 b4( cis4) fis,4 fis4 g4 b4 cis2 cis4 r4 b2 fis4 a4 g2 fis4 b4 cis4 cis8 cis8 e2 dis4 r4 e2 e4 d4 d2 cis4 r4 a4 a4 b4 b4 cis4 cis4 d4 e8 e8 fis4 b,4 cis4 d4 b4 b4 a2 fis4 b4 a2 g2 fis2.( e4) d1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + d2 + cis2. d4 d4( e4) fis4 r4 fis4 fis4 eis4 fis4 fis4( eis4) fis4 r4 g2 g4( fis4) g4( fis4) e4 e4 e4 a4 a4 g4 a4 f4 fis4( e4) e2 r4 dis4 e4 e4 e4 d4 e4 d4 d8[ e8] fis4 g4( e4) b4 d8[ e8] fis4 d4 d4( cis4) d2 fis2 fis2 b4 a4 a4 a4 a4 g8 fis8 fis4 d4 gis4 fis4 fis4 b4 fis2 e4 b'4 fis4 gis4 gis4( a8[ gis8]) fis2 gis2 dis2 cis4 dis4 cis2 fis4 fis4 cis4 fis4 fis4( eis4) fis4 e4 d4 fis4 fis4 eis4 fis4 r4 fis2 fis4 fis4 g4( e4) dis4 b'4 b4 a8 a8 a4( g4) fis4 r4 c'2 c4 b4 b2 a4 r4 fis4 fis4 fis4 g4 fis4 e4 a4 b8 g8 fis4 fis4 e4 a4 a4 g4 fis4( e4) dis4 d4 e4( d2) cis4 d2( cis2) d1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + b2 + b2. b4 b4( cis4) d4 r4 cis4 d4 d4 cis4 d4( cis4) cis4 r4 b2 e4( d4) b2 a4 d4 c4 c4 f4 e4 d4 d4 c4( cis8[ d8]) cis2 r4 b4 b4 b4 e4 b4 cis4 b4 d4 d4 d4( cis4) dis4 b4 cis4 b4 b4( a4) a2 fis'2 fis2 fis4 e4 e4 d4 d4 e8 cis8 cis4 d4 d4 cis4 d4 gis4 cis,2 b8[ cis8] d4 e4 dis4 e2 dis2 cis2 b2 a4 b4 gis2 fis4 b4 cis4 cis4 d4( cis4) cis4 cis4 b4 fis4 cis'2 cis4 r4 d2 cis4 d4 d4( cis4) b4 d4 g4 fis8 fis8 b,2 b4 r4 g'2 g4 fis4 fis4( e4) e4 r4 d4 e4 d4 d4 cis4 e4 d4 g8 d8 cis4 d4 e4 d4 d4 d4 cis2 b4 b4 cis2 b2 d4( b4 a2) a1 + } + >> + } + + bassIMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + fis2 + g2. fis4 g2 a4 r4 fis4 b4 b4 fis4 gis4.( b8) a4 r4 g2 g8[( a8] b4) e,2 a4 gis4 a4 a4 d4 a4 a4 b4 c4( e,4) e2 r4 b'8[ a8] g4 g4 a4 b4 fis4 b4 b4 a4 b4( cis4) fis,4 g4 fis4 g8 b8 b4( fis8[ g8]) fis2 d'2 d2 d4 cis4 a4 b4 b4 ais8 ais8 ais4 b4 b4 a8[ cis8] cis4 b4 ais2 b4 b4 cis4 dis4 cis2 b2 gis2 gis2 cis4 gis4 cis2 a4 gis4 gis4 fis4 b2 a4 fis4 b4 b4 gis2 ais4 r4 b2 a4 d8[ cis8] b4( ais4) b4 b4 e4 a,8 a8 b2 b4 r4 e2 e4 b4 b2 cis4 r4 a4 a4 a4 g4 a4 b4 a4 d8 b8 cis4 b4 b4 a4 b4 g4 a4( fis4) fis4 g4 a2( b4) g4 a4( b4 e,8[ fis8] g4) fis1 + } + >> + } + bassIIMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + b2 + e2. b4 g2 d'4 r4 a4 b4 gis4 a4 b4( cis4) fis,4 r4 g'2 c,4( d4) e4( d4) c4 b4 a4 f'8[ e8] d4 e4 f4 d4 dis4( e4) a,2 r4 b4 e4 d4 cis4 b4 ais4 b4 g'4 fis4 e4( ais,4) b4 g4 a4 b4 gis4( a4) d2 b'2 a2 g4 g4 fis4 f4 e4 e8 e8 d4 b4 eis4 fis4 b,4 eis4 fis2 g4 gis4 ais4 bis4 cis4( a4) b2 e,2 gis2 fis4 b,4 cis2 d4 d4 cis4 a4 gis2 a4 ais4 b4 d4 cis2 fis4 r4 b,2 fis'4 d4 e2 b4 g'4 e4 fis8 fis8 e2 b4 r4 c'2 a4 b4 g2 a4 r4 d,4 cis4 b4 e4 a4 g4 fis4 b8 b8 a4 g4 g4 fis4 e4 e4 a,2 b4 g'4 g4( fis2) e4 fis,4( gis4 a2) d1 + } + >> + } + diff --git a/hr/michi/nachtlied/stimmen_.ly b/hr/michi/nachtlied/stimmen_.ly new file mode 100644 index 0000000..71c18ab --- /dev/null +++ b/hr/michi/nachtlied/stimmen_.ly @@ -0,0 +1,259 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \autoBeamOff + \partial 2 + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + fis2 + e2. fis4 + b2 a4 r4 + cis4 fis,4 b4 a4 + gis2 fis4 r4 + d'2 e4( b4) + g2 a4 b4 + c4 c4 b4 cis4 + d4 b4 a8[( b8] gis4) + a2 r4 fis4 + g4 b4 a4 g4 + fis4 fis4 b8[ cis8] d4 + g,2 fis4 b4 + a4 g4 fis4.( e8) + d2 b'2 + cis2 b4 e4 + cis4 d4 b4 cis8 ais8 + fis4 g4 gis4 a4 + d4 d4 cis2 + e4 e4 fis4 fis4 + e2 b2 + cis2 gis2 + a4 gis4 e2 + fis4 fis4 eis4 a4 + b4( cis4) fis,4 fis4 + g4 b4 cis2 + cis4 r4 b2 + fis4 a4 g2 + fis4 b4 cis4 cis8 cis8 + e2 dis4 r4 + e2 e4 d4 + d2 cis4 r4 + a4 a4 b4 b4 + cis4 cis4 d4 e8 e8 + fis4 b,4 cis4 d4 + b4 b4 a2 fis4 b4 + a2 g2 + fis2.( e4) + d1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + d2 + cis2. d4 + d4( e4) fis4 r4 + fis4 fis4 eis4 fis4 + fis4( eis4) fis4 r4 + g2 g4( fis4) + g4( fis4) e4 e4 + e4 a4 a4 g4 + a4 f4 fis4( e4) + e2 r4 dis4 + e4 e4 e4 d4 + e4 d4 d8[ e8] fis4 + g4( e4) b4 d8[ e8] + fis4 d4 d4( cis4) + d2 fis2 + fis2 b4 a4 + a4 a4 a4 g8 fis8 + fis4 d4 gis4 fis4 + fis4 b4 fis2 + e4 b'4 fis4 gis4 + gis4( a8[ gis8]) fis2 + gis2 dis2 + cis4 dis4 cis2 + fis4 fis4 cis4 fis4 + fis4( eis4) fis4 e4 + d4 fis4 fis4 eis4 + fis4 r4 fis2 + fis4 fis4 g4( e4) + dis4 b'4 b4 a8 a8 + a4( g4) fis4 r4 + c'2 c4 b4 + b2 a4 r4 + fis4 fis4 fis4 g4 + fis4 e4 a4 b8 g8 + fis4 fis4 e4 a4 + a4 g4 fis4( e4) dis4 d4 + e4( d2) cis4 + d2( cis2) + d1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + b2 + b2. b4 + b4( cis4) d4 r4 + cis4 d4 d4 cis4 + d4( cis4) cis4 r4 + b2 e4( d4) + b2 a4 d4 + c4 c4 f4 e4 + d4 d4 c4( cis8[ d8]) + cis2 r4 b4 + b4 b4 e4 b4 + cis4 b4 d4 d4 + d4( cis4) dis4 b4 + cis4 b4 b4( a4) + a2 fis'2 + fis2 fis4 e4 + e4 d4 d4 e8 cis8 + cis4 d4 d4 cis4 + d4 gis4 cis,2 + b8[ cis8] d4 e4 dis4 + e2 dis2 + cis2 b2 + a4 b4 gis2 + fis4 b4 cis4 cis4 + d4( cis4) cis4 cis4 + b4 fis4 cis'2 + cis4 r4 d2 + cis4 d4 d4( cis4) + b4 d4 g4 fis8 fis8 + b,2 b4 r4 + g'2 g4 fis4 + fis4( e4) e4 r4 + d4 e4 d4 d4 + cis4 e4 d4 g8 d8 + cis4 d4 e4 d4 + d4 d4 cis2 b4 b4 + cis2 b2 + d4( b4 a2) + a1 + } + >> + } + + bassIMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + fis2 + g2. fis4 + g2 a4 r4 + fis4 b4 b4 fis4 + gis4.( b8) a4 r4 + g2 g8[( a8] b4) + e,2 a4 gis4 + a4 a4 d4 a4 + a4 b4 c4( e,4) + e2 r4 b'8[ a8] + g4 g4 a4 b4 + fis4 b4 b4 a4 + b4( cis4) fis,4 g4 + fis4 g8 b8 b4( fis8[ g8]) + fis2 d'2 + d2 d4 cis4 + a4 b4 b4 ais8 ais8 + ais4 b4 b4 a8[ cis8] + cis4 b4 ais2 + b4 b4 cis4 dis4 + cis2 b2 + gis2 gis2 + cis4 gis4 cis2 + a4 gis4 gis4 fis4 + b2 a4 fis4 + b4 b4 gis2 + ais4 r4 b2 + a4 d8[ cis8] b4( ais4) + b4 b4 e4 a,8 a8 + b2 b4 r4 + e2 e4 b4 + b2 cis4 r4 + a4 a4 a4 g4 + a4 b4 a4 d8 b8 + cis4 b4 b4 a4 + b4 g4 a4( fis4) fis4 g4 + a2( b4) g4 + a4( b4 e,8[ fis8] g4) + fis1 + } + >> + } + bassIIMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + b2 + e2. b4 + g2 d'4 r4 + a4 b4 gis4 a4 + b4( cis4) fis,4 r4 + g'2 c,4( d4) + e4( d4) c4 b4 + a4 f'8[ e8] d4 e4 + f4 d4 dis4( e4) + a,2 r4 b4 + e4 d4 cis4 b4 + ais4 b4 g'4 fis4 + e4( ais,4) b4 g4 + a4 b4 gis4( a4) + d2 b'2 + a2 g4 g4 + fis4 f4 e4 e8 e8 + d4 b4 eis4 fis4 + b,4 eis4 fis2 + g4 gis4 ais4 bis4 + cis4( a4) b2 + e,2 gis2 + fis4 b,4 cis2 + d4 d4 cis4 a4 + gis2 a4 ais4 + b4 d4 cis2 + fis4 r4 b,2 + fis'4 d4 e2 + b4 g'4 e4 fis8 fis8 + e2 b4 r4 + c'2 a4 b4 + g2 a4 r4 + d,4 cis4 b4 e4 + a4 g4 fis4 b8 b8 + a4 g4 g4 fis4 + e4 e4 a,2 b4 g'4 + g4( fis2) e4 + fis,4( gis4 a2) + d1 + } + >> + } + diff --git a/hr/michi/nachtlied/texte.ly b/hr/michi/nachtlied/texte.ly new file mode 100644 index 0000000..442486f --- /dev/null +++ b/hr/michi/nachtlied/texte.ly @@ -0,0 +1,47 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + +% Die Textaufteilungen % -- _ + + anyText = \lyricmode { + Die Nacht ist kom -- men, + drin wir ru -- hen sol -- len; + Gott walts, Gott walts zu From -- men + nach seim Wohl -- ge -- fal -- len, + daß wir uns le -- gen + in seim Gleit und Se -- gen, + der Ruh zu pfle -- gen. + Treib, Herr, von uns fern + die un -- rei -- nen Gei -- ster, + halt die Nacht -- wach gern, + sei selbst un -- ser Schütz -- herr! + Schirm beid, Leib und Seel, + un -- ter dei -- ne Flü -- gel, + send uns dein En -- gel. + Laß uns ein -- schla -- fen + mit gu -- ten Ge -- dan -- ken + fröh -- lich auf -- wa -- chen + und von dir nicht wan -- ken, + laß uns mit Züch -- ten + un -- ser Tun und Dich -- ten + zu deim Preis rich -- ten. + } + + 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+> + \anyText + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/petrus/dynArt.ly b/hr/michi/petrus/dynArt.ly new file mode 100644 index 0000000..bfb0513 --- /dev/null +++ b/hr/michi/petrus/dynArt.ly @@ -0,0 +1,26 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key f \major + \time 2/2 + s1*84 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/petrus/dynArt_.ly b/hr/michi/petrus/dynArt_.ly new file mode 100644 index 0000000..b74c954 --- /dev/null +++ b/hr/michi/petrus/dynArt_.ly @@ -0,0 +1,26 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key bes \major + \time 2/2 + s1*84 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/petrus/midi.lua b/hr/michi/petrus/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/petrus/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/michi/petrus/petrus.ly b/hr/michi/petrus/petrus.ly new file mode 100644 index 0000000..d417714 --- /dev/null +++ b/hr/michi/petrus/petrus.ly @@ -0,0 +1,83 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Tu es Petrus" + composer = "Giovanni Pierluigi da Palestrina" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + sopI = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "soprane" { \global \sopranMelodieI } + %\addlyrics { \sopranText } + >> + sopII = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "soprane" { \global \sopranMelodieII } + %\addlyrics { \sopranText } + >> + + alt = << + \new Voice = "alti" { \global \altMelodie } + %\addlyrics { \altText } + >> + + ten = << + \new Voice = "tenoere" { \global \tenorMelodie } + \addlyrics { \tenorText } + >> + + basI = << + \new Voice = "baesse" { \global \bassMelodieI } + %\addlyrics { \bassText } + >> + basII = << + \new Voice = "baesse" { \global \bassMelodieII } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \new Staff = sopranI { \sopI } + \new Staff = sopranII { \sopII } + \new Staff = alt { \alt } + \new Staff = tenor { \ten } + \new Staff = bassI { \basI } + \new Staff = bassII { \basII } + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + \layout { + } + } + diff --git a/hr/michi/petrus/petrus_.ly b/hr/michi/petrus/petrus_.ly new file mode 100644 index 0000000..01f6978 --- /dev/null +++ b/hr/michi/petrus/petrus_.ly @@ -0,0 +1,83 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Tu es Petrus" + composer = "Giovanni Pierluigi da Palestrina" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + sopI = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "soprane" { \global \sopranMelodieI } + %\addlyrics { \sopranText } + >> + sopII = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "soprane" { \global \sopranMelodieII } + %\addlyrics { \sopranText } + >> + + alt = << + \new Voice = "alti" { \global \altMelodie } + %\addlyrics { \altText } + >> + + ten = << + \new Voice = "tenoere" { \global \tenorMelodie } + \addlyrics { \tenorText } + >> + + basI = << + \new Voice = "baesse" { \global \bassMelodieI } + %\addlyrics { \bassText } + >> + basII = << + \new Voice = "baesse" { \global \bassMelodieII } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \new Staff = sopranI { \sopI } + \new Staff = sopranII { \sopII } + \new Staff = alt { \alt } + \new Staff = tenor { \ten } + \new Staff = bassI { \basI } + \new Staff = bassII { \basII } + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + \layout { + } + } + diff --git a/hr/michi/petrus/stimmen.ly b/hr/michi/petrus/stimmen.ly new file mode 100644 index 0000000..6cd470c --- /dev/null +++ b/hr/michi/petrus/stimmen.ly @@ -0,0 +1,80 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt_.ly" + + global = { + \autoBeamOff + } + +% Die Stimmen + + sopranMelodieI = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + a2. g8[ f8] g4 a4 bes2 a2. g4 a4 bes4 c2 bes4. a8 g4 f4 ~ f4 e4 f2 r1 r1 r1 r1 r1 r2 r4 c'4 c4 d4 ees2 d4. c8 bes4 a4 g2 a4 a4 bes4 c4 bes2 a4 a4 bes8[ c8 d8 ees8] f4 f4 bes,2 ~ bes2 c2 f,2 r2 r1 r1 r1 r2 r4 bes4 bes4 bes4 bes2 bes2 r4 f4 ~ f4 f'4. ees8 d4 c2 bes2 r4 g4 bes4. c8 d4 f8[ ees8] d8[ c8] bes4 ~ bes4 a8[ g8] a2 bes2 r4 f4 g4 a4 bes4 bes4 a8[ bes8 c8 a8] bes4. a8 g4 f2 e4 f2 r4 f4 g4 a4 bes4 bes4 a4 bes4 bes4 ees,8[ f8] g8[ a8] bes4 c4 c4 f,2 r2 r2 r4 d'4 c4 d4 ees2 d2 r2 r1 r1 r1 r4 d4 c4 d4 ees2 d4 bes4 c4 d4 e8[ d8 c8 bes8] a4 bes2 a4 bes1 r1 r2 r4 f4 a2. a4 bes2 a4 c4 ~ c4 c4 d2 c4 a4 bes8[ a8 bes8 c8] d8[ ees8] f4. e16[ d16] e4 f1 r1 r1 r2 r4 f,4 c'2 a4. bes8 c4 d2 c8[ bes8] a2 r4 g4 c4 c4 a4 bes4 c1 r1 r4 c4 d2 ~ d4 d4 ees2 d4 bes2 bes4 bes2 bes2 r1 r2 r4 d4 ~ d4 d4 ees2 c4 d4 ees4 d4 ~ d8[ c8 a8 bes8] c2 r4 a2 a4 bes2 a4 f4 g8[ a8 bes8 c8] d8[ ees8 f8 d8] e4 f2 e4 f2 r4 a,4 f'8[ ees8 d8 c8] d2 c1 + } + >> + } + sopranMelodieII = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + c1 c2 d2 c2 c2 c4 d4 ees2 d4. c8 bes4 a4 g2 a2 r1 r1 r1 r1 r1 r2 r4 a4 a4 a4 bes2 bes4. c8 d2 c2 c2 r1 r1 r1 r1 r4 d4 d4 c4 d2 c4 c4 d4. c8 bes4 c4 d2 ees2 ~ ees2 d2 r1 r4 d4 d4 c4 d2 bes2 r4 c4 d4 d4 ees4 ees,8[ f8] g8[ a8] bes4 ~ bes8[ c8 d8 ees8] f2 ~ f1 d1 r1 r2 r4 f,4 g4 a4 bes4 bes4 a8[ bes8 c8 a8] bes4. a8 g4 f2 e4 f2 r4 bes4 c4 d4 ees4 ees4 d4 d4 c4 d4 ees2 d2 r1 r4 d4 c4 d4 ees2 d4 bes4 c4 d4 ees8[ d8 c8 bes8] a4 bes2 a4 bes2 r2 r1 r1 r1 r4 bes4 d2 ~ d4 d4 ees2 d1 r1 r2 r4 a4 ~ a4 a4 bes2 a4 f4 g8[ f8 g8 a8] bes8[ a8] a8 g16[ f16] g2 f1 ~ f1 r1 r1 r4 f4 c'2 a2 bes2 c1 r1 r4 g4 a2 ~ a4 a4 bes2 a2 r4 f4 bes4 bes4 g4 a4 bes4 d2 d4 ees2 d2 c4 bes4. c8[ d8 ees8] f2 d4 bes4 ~ bes4 bes4 bes2 a4 f4 g8[ a8 bes8 c8] d8[ ees8] f2 e4 f4 c2 c4 d2 c4 d4 ees2 d2 c1 r4 f,4 f'4. ees8 d8[ c8 bes8 a8] bes2 a1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + r1 r1 r1 r1 r1 r1 c1 c2 d2 c2 c2 c4 d4 ees2 d4. c8 bes4 a4 g2 a2 r1 r1 r2 r4 f'4 f4 f4 f2 f4 f4 f4. ees8 d4 c4 g'2 ~ g4 f4 ees2 d2 r4 f4 ~ f4 bes2 a4 bes2 f4 f4 bes4. a8 g4 f4 ees4 c4 f4 d4 ees4 f4 g2 f1 ~ f1 r2 r4 g4 bes4. a8 g2 f1 ~ f1 f1 r1 r4 c4 d2 ~ d4 c4 d4 bes4 c2 r2 r1 r4 f4 g2 ~ g4 f4 ees4 c4 d4 f4 f4 f4 g2 f2 r1 r4 f4 f4 f4 g2 f4 g4 a4 a4 bes8[ a8] f4 f4 ees4 f2 d4 f4 f4 d4 bes'2 bes4 f4 a4 a4 bes8[ a8] g4 f4 ees4 f2 d2 r4 f4 bes4 bes4 g4 a4 bes4 a8[ g8] f2 r4 f4 f4 f4 d4 ees4 f2 f2 bes,2 f'4 f4 ees4. d16[ c16] bes8[ c8] d4 c2 f2 r2 r4 bes,4 c4 d4 ees2 d4 bes4 c2 a2 r4 c2 f4 ~ f4 f4 g2 f4 f4 g2 ~ g4 ees4 f2 g2 r4 c,4 f4 f4 d4( e4) f2 r2 r1 r4 f2 f4 g2 f4 d4 g2. f4 ~ f8[ ees8] c4 d4 f4 ~ f4 f4 g2 f4 a4 bes4. a8 g4 f4 g2 f4 f2 f4 f2 f2 r4 g4 bes4. a8 g4 f4 g2 f1 ~ f1 ~ f1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + f2. e8[ d8] e4 f4 bes,2 f'2. e4 f4 d4 c8[ d8 ees8 f8] g4 d4 ees4 f4 c2 f,2 r1 r1 r1 r1 r1 r2 r4 f'4 f4 f4 g2 f4. ees8 d8[ bes8] f'4 ~ f8[ e16 d16] e4 f4 c4 d4 c4 d2 c4 c4 d8[ c8 bes8 c8] d8[ ees8] f4 ees4 d4 g,8[ a8] bes4. a16[ g16] a4 bes4 f'4 f4 f4 d2 f4 f4 f4. ees8 d4 c4 bes4 g4. a8 bes4 ~ bes4 a4 bes4 f'4 g4 f4 ees2 d2 r4 c4 bes8[ c8 d8 ees8] f4 bes,4 c2 r4 g4 ~ g4 ees'2 ees4 d1 c1 bes2 r4 d4 bes4 c4 d4 e4 f1 r1 r4 c4 d2 ~ d4 c4 d4 bes4 c4 d4 bes8[ a8 g8 f8] ees4 f4 g4 a4 bes2 r2 r2 r4 f'4 f4 f4 g2 f2 r2 r2 r4 d4 f4 f4 g8[ f8 ees8 d8] c4 bes4 c2 bes4 bes4 f4 f'4 g2 f4 d4 f4 f4 g8[ f8 ees8 d8] c4 bes4 c2 bes2 r4 d4 f4 g4 ees2 f2 d2 c4. bes8 g4 f4 bes4 g4 a2 r1 r1 r1 r4 c2 c4 d2 c4 a4 bes8[ a8 bes8 c8] d8[ ees8] f4 ~ f4 e4 f2 ~ f2 r2 r1 r4 c4 ees4 c8[ d8] ees8[ f8] g2 f4 ~ f4 e4 f2 r1 r4 f4 f2 ~ f4 g4 ees2 f4 d2 d4 bes2 d4 f4 ees2. d4 c2 bes2 r1 r1 r1 r4 c2 f,4 ~ f4 bes4 c4 a4 bes1 ~ bes4 a4 g4 c4 ~ c8[ a8] d4 c2 d2 bes2 c1 + } + >> + } + + bassMelodieI = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 r1 r1 r1 r1 r1 + a2. g8[ f8] g4 a4 bes2 a2. g4 a4 bes4 c2 bes4. a8 g4 f4 ~ f4 e4 f4 f4 f4 f4 ees8[ f8 g8 a8] bes1 c2 f,2 r1 r1 r1 r1 r4 f4 bes4 a4 bes2 f4 f4 bes2. a4 g4. f8 ees4 d4 c2 bes2 r1 r4 f'4 bes4 a4 bes1 f4 f4 bes4. a8 g2 ees8[ f8 g8 a8] bes2 f2 ~ f2 r2 r4 f4 bes2 ~ bes4 a4 g4 g4 f2 r2 r1 r4 f4 bes2 ~ bes4 a4 g4 g4 f2 r2 r1 r4 bes4 a4 bes4 ees,2 bes'2 r1 r4 bes4 a4 bes4 ees,2 bes'4 g4 f2 ees2 f4 g4 f2 bes,2 r2 r1 r1 r1 r4 f'4 bes2 ~ bes4 bes4 c2 bes1 r4 a4 c4 c4 bes2 c8[ bes8 a8 g8] f2 r2 r1 r1 r4 a2 a4 bes2 a4 f4 g8[ f8 g8 a8] bes8[ a8 g8 f8] g2 f2 r2 r2 r1 r4 f4 c'2 ~ c4 c4 d2 c2 r4 a4 c4 d4 bes2 c4 f,4 bes2 ~ bes4 bes4 c2 bes4 bes2 bes4 g2 bes4 bes4 ees,8[ f8 g8 a8] bes2 f2 r4 bes4 ~ bes4 bes4 ees,2 f4 f4 ees8[ f8 g8 a8] bes8[ c8] d4 c2 f,4 a2 c4 bes4 f2 a4 g2 f2 r4 c'4. bes8 g4 a4 bes2 a4 bes2 f2 ~ f1 + } + >> + } + bassMelodieII = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 r1 r1 r1 r1 r1 + f2. e8[ d8] e4 f4 bes,2 f'2. e4 f4 d4 c8[ d8 ees8 f8] g4 d4 ees4 f4 c2 f2 r1 r1 r2 r4 f4 bes4 a4 bes2 f4 f4 bes2 ~ bes4 a4 g4. f8 ees4 d4 c2 bes2 r2 r1 r1 r1 r2 r4 bes4 ees4 d4 ees2 bes2 r2 r4 bes2 bes'4 ~ bes4 a4 g4. f8 ees1 bes4. c8 d4 ees4 f1 bes,1 r1 r4 f'4 bes2 ~ bes4 a4 g4 g4 f2 r2 r1 r4 bes,4 ees2 ~ ees4 d4 c4 c4 bes2 r2 r2 r4 bes'4 a4 bes4 ees,2 bes2 r2 r1 r1 r1 r4 bes'4 a4 bes4 ees,2 bes4 bes4 f'4 f4 ees2 f4 g4 f2 bes,1 r1 r2 bes2 f'2. f4 g2 f2 r1 r1 r1 r4 f2 f4 bes,2 f'4 f4 ees4. d16[ c16] bes8[ c8] d4 c2 f2 ~ f2 r2 r1 r1 r1 r4 c4 f2 ~ f4 f4 g2 f2 r2 r1 r4 bes,2 bes4 ees2 bes4 bes4 c8[ d8 ees8 f8] g8[ a8] bes4 ~ bes4 a4 bes2 r1 r1 r1 r4 f2 f4 bes,2 f'4 f4 ees2 bes2 c1 f1 bes,1 f'1 + } + >> + } + diff --git a/hr/michi/petrus/stimmen_.ly b/hr/michi/petrus/stimmen_.ly new file mode 100644 index 0000000..bf8d445 --- /dev/null +++ b/hr/michi/petrus/stimmen_.ly @@ -0,0 +1,576 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \autoBeamOff + } + +% Die Stimmen + + sopranMelodieI = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + a2. g8[ f8] + g4 a4 bes2 + a2. g4 + a4 bes4 c2 + bes4. a8 g4 f4 ~ + f4 e4 f2 + r1 + r1 + r1 + r1 + r1 + r2 r4 c'4 + c4 d4 ees2 + d4. c8 bes4 a4 + g2 a4 a4 + bes4 c4 bes2 + a4 a4 bes8[ c8 d8 ees8] + f4 f4 bes,2 ~ + bes2 c2 + f,2 r2 + r1 + r1 + r1 + r2 r4 bes4 + bes4 bes4 bes2 + bes2 r4 f4 ~ + f4 f'4. ees8 d4 + c2 bes2 + r4 g4 bes4. c8 + d4 f8[ ees8] d8[ c8] bes4 ~ + bes4 a8[ g8] a2 + bes2 r4 f4 + g4 a4 bes4 bes4 + a8[ bes8 c8 a8] bes4. a8 + g4 f2 e4 + f2 r4 f4 + g4 a4 bes4 bes4 + a4 bes4 bes4 ees,8[ f8] + g8[ a8] bes4 c4 c4 + f,2 r2 + r2 r4 d'4 + c4 d4 ees2 + d2 r2 + r1 + r1 + r1 + r4 d4 c4 d4 + ees2 d4 bes4 + c4 d4 e8[ d8 c8 bes8] + a4 bes2 a4 + bes1 + r1 + r2 r4 f4 + a2. a4 + bes2 a4 c4 ~ + c4 c4 d2 + c4 a4 bes8[ a8 bes8 c8] + d8[ ees8] f4. e16[ d16] e4 + f1 + r1 + r1 + r2 r4 f,4 + c'2 a4. bes8 + c4 d2 c8[ bes8] + a2 r4 g4 + c4 c4 a4 bes4 + c1 + r1 + r4 c4 d2 ~ + d4 d4 ees2 + d4 bes2 bes4 + bes2 bes2 + r1 + r2 r4 d4 ~ + d4 d4 ees2 + c4 d4 ees4 d4 ~ + d8[ c8 a8 bes8] c2 + r4 a2 a4 + bes2 a4 f4 + g8[ a8 bes8 c8] d8[ ees8 f8 d8] + e4 f2 e4 + f2 r4 a,4 + f'8[ ees8 d8 c8] d2 + c1 + } + >> + } + sopranMelodieII = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + c1 + c2 d2 + c2 c2 + c4 d4 ees2 + d4. c8 bes4 a4 + g2 a2 + r1 + r1 + r1 + r1 + r1 + r2 r4 a4 + a4 a4 bes2 + bes4. c8 d2 + c2 c2 + r1 + r1 + r1 + r1 + r4 d4 d4 c4 + d2 c4 c4 + d4. c8 bes4 c4 + d2 ees2 ~ + ees2 d2 + r1 + r4 d4 d4 c4 + d2 bes2 + r4 c4 d4 d4 + ees4 ees,8[ f8] g8[ a8] bes4 ~ + bes8[ c8 d8 ees8] f2 ~ + f1 + d1 + r1 + r2 r4 f,4 + g4 a4 bes4 bes4 + a8[ bes8 c8 a8] bes4. a8 + g4 f2 e4 + f2 r4 bes4 + c4 d4 ees4 ees4 + d4 d4 c4 d4 + ees2 d2 + r1 + r4 d4 c4 d4 + ees2 d4 bes4 + c4 d4 ees8[ d8 c8 bes8] + a4 bes2 a4 + bes2 r2 + r1 + r1 + r1 + r4 bes4 d2 ~ + d4 d4 ees2 + d1 + r1 + r2 r4 a4 ~ + a4 a4 bes2 + a4 f4 g8[ f8 g8 a8] + bes8[ a8] a8 g16[ f16] g2 + f1 ~ + f1 + r1 + r1 + r4 f4 c'2 + a2 bes2 + c1 + r1 + r4 g4 a2 ~ + a4 a4 bes2 + a2 r4 f4 + bes4 bes4 g4 a4 + bes4 d2 d4 + ees2 d2 + c4 bes4. c8[ d8 ees8] + f2 d4 bes4 ~ + bes4 bes4 bes2 + a4 f4 g8[ a8 bes8 c8] + d8[ ees8] f2 e4 + f4 c2 c4 + d2 c4 d4 + ees2 d2 + c1 + r4 f,4 f'4. ees8 + d8[ c8 bes8 a8] bes2 + a1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + r1 + r1 + r1 + r1 + r1 + r1 + c1 + c2 d2 + c2 c2 + c4 d4 ees2 + d4. c8 bes4 a4 + g2 a2 + r1 + r1 + r2 r4 f'4 + f4 f4 f2 + f4 f4 f4. ees8 + d4 c4 g'2 ~ + g4 f4 ees2 + d2 r4 f4 ~ + f4 bes2 a4 + bes2 f4 f4 + bes4. a8 g4 f4 + ees4 c4 f4 d4 + ees4 f4 g2 + f1 ~ + f1 + r2 r4 g4 + bes4. a8 g2 + f1 ~ + f1 + f1 + r1 + r4 c4 d2 ~ + d4 c4 d4 bes4 + c2 r2 + r1 + r4 f4 g2 ~ + g4 f4 ees4 c4 + d4 f4 f4 f4 + g2 f2 + r1 + r4 f4 f4 f4 + g2 f4 g4 + a4 a4 bes8[ a8] f4 + f4 ees4 f2 + d4 f4 f4 d4 + bes'2 bes4 f4 + a4 a4 bes8[ a8] g4 + f4 ees4 f2 + d2 r4 f4 + bes4 bes4 g4 a4 + bes4 a8[ g8] f2 + r4 f4 f4 f4 + d4 ees4 f2 + f2 bes,2 + f'4 f4 ees4. d16[ c16] + bes8[ c8] d4 c2 + f2 r2 + r4 bes,4 c4 d4 + ees2 d4 bes4 + c2 a2 + r4 c2 f4 ~ + f4 f4 g2 + f4 f4 g2 ~ + g4 ees4 f2 + g2 r4 c,4 + f4 f4 d4( e4) + f2 r2 + r1 + r4 f2 f4 + g2 f4 d4 + g2. f4 ~ + f8[ ees8] c4 d4 f4 ~ + f4 f4 g2 + f4 a4 bes4. a8 + g4 f4 g2 + f4 f2 f4 + f2 f2 + r4 g4 bes4. a8 + g4 f4 g2 + f1 ~ + f1 ~ + f1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + f2. e8[ d8] + e4 f4 bes,2 + f'2. e4 + f4 d4 c8[ d8 ees8 f8] + g4 d4 ees4 f4 + c2 f,2 + r1 + r1 + r1 + r1 + r1 + r2 r4 f'4 + f4 f4 g2 + f4. ees8 d8[ bes8] f'4 ~ + f8[ e16 d16] e4 f4 c4 + d4 c4 d2 + c4 c4 d8[ c8 bes8 c8] + d8[ ees8] f4 ees4 d4 + g,8[ a8] bes4. a16[ g16] a4 + bes4 f'4 f4 f4 + d2 f4 f4 + f4. ees8 d4 c4 + bes4 g4. a8 bes4 ~ + bes4 a4 bes4 f'4 + g4 f4 ees2 + d2 r4 c4 + bes8[ c8 d8 ees8] f4 bes,4 + c2 r4 g4 ~ + g4 ees'2 ees4 + d1 + c1 + bes2 r4 d4 + bes4 c4 d4 e4 + f1 + r1 + r4 c4 d2 ~ + d4 c4 d4 bes4 + c4 d4 bes8[ a8 g8 f8] + ees4 f4 g4 a4 + bes2 r2 + r2 r4 f'4 + f4 f4 g2 + f2 r2 + r2 r4 d4 + f4 f4 g8[ f8 ees8 d8] + c4 bes4 c2 + bes4 bes4 f4 f'4 + g2 f4 d4 + f4 f4 g8[ f8 ees8 d8] + c4 bes4 c2 + bes2 r4 d4 + f4 g4 ees2 + f2 d2 + c4. bes8 g4 f4 + bes4 g4 a2 + r1 + r1 + r1 + r4 c2 c4 + d2 c4 a4 + bes8[ a8 bes8 c8] d8[ ees8] f4 ~ + f4 e4 f2 ~ + f2 r2 + r1 + r4 c4 ees4 c8[ d8] + ees8[ f8] g2 f4 ~ + f4 e4 f2 + r1 + r4 f4 f2 ~ + f4 g4 ees2 + f4 d2 d4 + bes2 d4 f4 + ees2. d4 + c2 bes2 + r1 + r1 + r1 + r4 c2 f,4 ~ + f4 bes4 c4 a4 + bes1 ~ + bes4 a4 g4 c4 ~ + c8[ a8] d4 c2 + d2 bes2 + c1 + } + >> + } + + bassMelodieI = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 + r1 + r1 + r1 + r1 + r1 + a2. g8[ f8] + g4 a4 bes2 + a2. g4 + a4 bes4 c2 + bes4. a8 g4 f4 ~ + f4 e4 f4 f4 + f4 f4 ees8[ f8 g8 a8] + bes1 + c2 f,2 + r1 + r1 + r1 + r1 + r4 f4 bes4 a4 + bes2 f4 f4 + bes2. a4 + g4. f8 ees4 d4 + c2 bes2 + r1 + r4 f'4 bes4 a4 + bes1 + f4 f4 bes4. a8 + g2 ees8[ f8 g8 a8] + bes2 f2 ~ + f2 r2 + r4 f4 bes2 ~ + bes4 a4 g4 g4 + f2 r2 + r1 + r4 f4 bes2 ~ + bes4 a4 g4 g4 + f2 r2 + r1 + r4 bes4 a4 bes4 + ees,2 bes'2 + r1 + r4 bes4 a4 bes4 + ees,2 bes'4 g4 + f2 ees2 + f4 g4 f2 + bes,2 r2 + r1 + r1 + r1 + r4 f'4 bes2 ~ + bes4 bes4 c2 + bes1 + r4 a4 c4 c4 + bes2 c8[ bes8 a8 g8] + f2 r2 + r1 + r1 + r4 a2 a4 + bes2 a4 f4 + g8[ f8 g8 a8] bes8[ a8 g8 f8] + g2 f2 + r2 r2 + r1 + r4 f4 c'2 ~ + c4 c4 d2 + c2 r4 a4 + c4 d4 bes2 + c4 f,4 bes2 ~ + bes4 bes4 c2 + bes4 bes2 bes4 + g2 bes4 bes4 + ees,8[ f8 g8 a8] bes2 + f2 r4 bes4 ~ + bes4 bes4 ees,2 + f4 f4 ees8[ f8 g8 a8] + bes8[ c8] d4 c2 + f,4 a2 c4 + bes4 f2 a4 + g2 f2 + r4 c'4. bes8 g4 + a4 bes2 a4 + bes2 f2 ~ + f1 + } + >> + } + bassMelodieII = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r1 + r1 + r1 + r1 + r1 + r1 + f2. e8[ d8] + e4 f4 bes,2 + f'2. e4 + f4 d4 c8[ d8 ees8 f8] + g4 d4 ees4 f4 + c2 f2 + r1 + r1 + r2 r4 f4 + bes4 a4 bes2 + f4 f4 bes2 ~ + bes4 a4 g4. f8 + ees4 d4 c2 + bes2 r2 + r1 + r1 + r1 + r2 r4 bes4 + ees4 d4 ees2 + bes2 r2 + r4 bes2 bes'4 ~ + bes4 a4 g4. f8 + ees1 + bes4. c8 d4 ees4 + f1 + bes,1 + r1 + r4 f'4 bes2 ~ + bes4 a4 g4 g4 + f2 r2 + r1 + r4 bes,4 ees2 ~ + ees4 d4 c4 c4 + bes2 r2 + r2 r4 bes'4 + a4 bes4 ees,2 + bes2 r2 + r1 + r1 + r1 + r4 bes'4 a4 bes4 + ees,2 bes4 bes4 + f'4 f4 ees2 + f4 g4 f2 + bes,1 + r1 + r2 bes2 + f'2. f4 + g2 f2 + r1 + r1 + r1 + r4 f2 f4 + bes,2 f'4 f4 + ees4. d16[ c16] bes8[ c8] d4 + c2 f2 ~ + f2 r2 + r1 + r1 + r1 + r4 c4 f2 ~ + f4 f4 g2 + f2 r2 + r1 + r4 bes,2 bes4 + ees2 bes4 bes4 + c8[ d8 ees8 f8] g8[ a8] bes4 ~ + bes4 a4 bes2 + r1 + r1 + r1 + r4 f2 f4 + bes,2 f'4 f4 + ees2 bes2 + c1 + f1 + bes,1 + f'1 + } + >> + } + diff --git a/hr/michi/petrus/texte.ly b/hr/michi/petrus/texte.ly new file mode 100644 index 0000000..1287920 --- /dev/null +++ b/hr/michi/petrus/texte.ly @@ -0,0 +1,41 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + Tu _ _ es Pe -- trus, et su -- per hanc _ _ _ _ pe -- tram. + et su -- per hanc pe -- _ _ _ _ tram, + æ -- di -- fi -- ca -- bo ec -- cle -- _ _ si -- am me -- _ _ _ am, + æ -- di -- fi -- ca -- bo ec -- cle -- _ _ si -- am me -- _ _ _ am, + æ -- di -- fi -- ca -- bo ec -- cle -- _ si -- am, + ec -- cle -- si -- am me -- am, + et por -- tæ in -- fe -- ri, + et por -- tæ in -- fe -- ri, + et por -- _ tæ in -- fe -- ri, + non præ -- va -- le -- bunt, + ad -- ver -- sus e -- _ _ _ am, + non præ -- va -- le -- bunt + ad -- ver -- sus e -- _ _ _ am, + et ti -- bi da -- bo, + et ti -- _ _ bi da -- _ bo, + cla -- ves re -- gni cæ -- lo -- _ _ _ rum, + et ti -- bi _ _ da -- _ bo, + et ti -- bi da -- bo cla -- ves re -- gni cæ -- lo -- _ _ rum, + cla -- ves re -- gni cæ -- lo -- _ rum, cæ -- _ _ lo -- _ rum. + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/prayer/dynArt.ly b/hr/michi/prayer/dynArt.ly new file mode 100644 index 0000000..843fa23 --- /dev/null +++ b/hr/michi/prayer/dynArt.ly @@ -0,0 +1,40 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key ees \major + \time 4/4 + \partial 4 + \repeat volta 2 { + s4 + s1*7 + } \alternative { + { + s1 + } + { + s1 + } + } + s1*4 + %\break + s1*9 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/prayer/midi.lua b/hr/michi/prayer/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/prayer/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/michi/prayer/prayer.ly b/hr/michi/prayer/prayer.ly new file mode 100644 index 0000000..de8364b --- /dev/null +++ b/hr/michi/prayer/prayer.ly @@ -0,0 +1,74 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Hear my prayer" + composer = "Moses Hogan" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + sop = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "soprane" { \global \voiceOne \sopranMelodie } + %\addlyrics { \sopranText } + >> + + alt = << + \new Voice = "alti" { \global \voiceTwo \altMelodie } + %\addlyrics { \altText } + >> + + ten = << + \new Voice = "tenoere" { \global \voiceOne \tenorMelodie } + %\addlyrics { \tenorText } + >> + + bas = << + \new Voice = "baesse" { \global \voiceTwo \bassMelodie } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \new Staff = frauen { << \sop \\ \alt >> } + \new Lyrics = first \lyricsto alti \textA + \new Lyrics = second \lyricsto alti \textB + %\new Staff = alt { \alt } + %\new Staff = tenor { \ten } + \new Staff = bass { << \ten \\ \bas >> } + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + \layout { + } + } + diff --git a/hr/michi/prayer/stimmen.ly b/hr/michi/prayer/stimmen.ly new file mode 100644 index 0000000..bc5fd62 --- /dev/null +++ b/hr/michi/prayer/stimmen.ly @@ -0,0 +1,61 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + ees4 g4 g4 aes4 f4 ees2 c'4. c8 bes4 g4 aes4 bes4 bes2 bes4. c8 ees4 ees4 ees4. <c aes>8 bes4( g8 f8) ees4 c8 ees8 bes'4 aes4 g8( ees8) f4 ees2. ees4 + ees2 ees4. f8 g4 g4 aes4 f4 ees2 c'4. c8 bes4 g4 aes4 bes4 bes2 bes4. c8 ees4 ees4 g16( f16 ees4) <c aes>8 bes4( g8 f8) ees4 c8 ees8 bes'4 aes4 g16( f16 ees8) f16( ees16 c16 ees16) ees2. aes8 g8 bes4. bes8 aes4 g4 r8 g8 aes8 g8 r2 ees2 ees2 r1 r1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + ees4 ees4 ees4 ees4 c8( d8) bes2 aes'4. f8 f4 ees4 ees4 <f ees>4 f2 bes,4. aes'8 g4 aes4 g8( aes4) f8 g4( d4) c4 c8 c8 ees4 ees4 c4 d4 bes2. ees4 + bes2 bes4. ees8 ees4 ees4 ees4 c8( d8) bes2 aes'4. f8 f4 ees4 ees4 <f ees>4 f2 bes,4. aes'8 g4 aes4 g8( aes4) f8 g4( d4) c4 c8 c8 ees4 ees4 c4 c4 bes2. ees8 ees8 g4. g8 ees4 ees4 r8 ees8 ees8 ees8 r2 ces2 bes2 r1 r1 + } + >> + } + + tenorMelodie = \relative c { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + ees4 bes'4 bes4 c4 aes8( bes8) g2 ees'4. d8 ees4 bes4 c4 <c aes>4 d2 bes4. ees8 bes4 c4 bes8( c4) <d bes>8 <ees bes>4( aes,4) g4 c8 c8 c4 ces4 aes4 aes4 g2. ees4 + g2 g4. aes8 bes4 bes4 c4 aes8( bes8) g2 ees'4. d8 ees4 bes4 c4 <c ees>4 d2 bes4. ees8 bes4 c4 bes8( c4) d8 <ees bes>4( aes,4) g4 c8 c8 c4 ces4 aes4 aes4 <g ees>2. ces8 bes8 ees4. ees8 ces4 bes4 r8 bes8 ces8 bes8 r2 aes2 g2 <g ees>1 q1 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + ees4 ees4 ees4 ees4 ees4 ees2 aes4. aes8 g4 g4 f4 f4 bes2 bes,4. bes'8 ees,4 ees4 ees4. ees8 ees4( b4) c4 c'8 bes8 aes8( g8) f4 bes,4 bes4 ees2. ees4 + ees2 ees4. ees8 ees4 ees4 ees4 ees4 ees2 aes4. aes8 g4 g4 f4 f4 bes2 bes,4. bes'8 ees,4 ees4 ees4. ees8 ees4( b4) c4 c'8 bes8 aes8( g8) f4 bes,4 bes4 ees,1 ~ ees1 ~ ees1 ~ ees1 <bes' ees,>1 q1 + } + >> + } + diff --git a/hr/michi/prayer/texte.ly b/hr/michi/prayer/texte.ly new file mode 100644 index 0000000..f53abe3 --- /dev/null +++ b/hr/michi/prayer/texte.ly @@ -0,0 +1,42 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + textA = \lyricmode { + O Lord, please hear my prayer, + in the morn -- in’ when I rise. + It’s Your ser -- vant + bound for glo -- ry. + O dear Lord, please hear my prayer. + O prayer. + When my work on earth is done, + and You come to take me home. + Just to know I’m bound for glo -- ry. + And to hear You say well done. + Done with sin and sor -- row, + have mer -- cy, mer -- cy. + A -- men. + } + textB = \lyricmode { + _ _ _ _ _ _ + keep me safe with -- in Your arms. + } + +% 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+> + } + diff --git a/hr/michi/psallite/dynArt.ly b/hr/michi/psallite/dynArt.ly new file mode 100644 index 0000000..5db310e --- /dev/null +++ b/hr/michi/psallite/dynArt.ly @@ -0,0 +1,39 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key d \major + \time 2/2 + s1*4 + s1*4 + \break + s1*4 + s1*8 + \break + s1*8 + \break + s1*9 + s1*2 + \break + s1*6 + \break + s1*8 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/psallite/midi.lua b/hr/michi/psallite/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/psallite/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/michi/psallite/psallite.ly b/hr/michi/psallite/psallite.ly new file mode 100644 index 0000000..e92169f --- /dev/null +++ b/hr/michi/psallite/psallite.ly @@ -0,0 +1,84 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Psallite Deo nostro" + composer = "Johann Sebastian Bach" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 15) + + sopA = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "sopraneI" { \global \sopranMelodieI } + %\addlyrics { \sopranText } + >> + + sopB = << + %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." } + \new Voice = "sopraneII" { \global \sopranMelodieII } + %\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 } << + \new Staff = sopraneI { \sopA } + \new Staff = sopraneII { \sopB } + \new Staff = alt { \alt } + \new Staff = tenor { \ten } + \new Staff = bass { \bas } + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + \layout { + \context { + \Staff + \RemoveEmptyStaves + \override VerticalAxisGroup #'remove-first = ##t + } + } + } + diff --git a/hr/michi/psallite/stimmen.ly b/hr/michi/psallite/stimmen.ly new file mode 100644 index 0000000..b57c817 --- /dev/null +++ b/hr/michi/psallite/stimmen.ly @@ -0,0 +1,131 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \autoBeamOff + } + +% Die Stimmen + + sopranMelodieI = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + s1*20 + a2 a4 a4 b8([ a8 g8 a8] b8[ cis8)] d4 d4 a4 d4 fis,4 e2 cis'2 d2 cis4. cis8 d4 d,4 d'4 cis8 b8 cis8[ b8 a8 b8] cis8[ d8] e4 d4( cis4) b2 a4 a4 d4 c4 b4. a8 g2 + r2 fis2 g2 a2 d,2 r2 r4 a'4 d4 d4 cis4. b8 a4 cis4 fis2 e2 e2 + cis4. cis8 d4 d,4 d'4 cis8 b8 cis4 a4 dis4. dis8 e4 e,4 e'4 d8 cis8 d4 cis8 b8 g'2( ~ g2 fis2 ~ fis2 e2 ~ e2 d2 ~ d2 c2 ~ c2) b2 a2 a2 b2 a2 a2 d4. c8 b4 b4 e4 fis8 g8 cis,2 d4 d4 d2 cis2 d1 + } + >> + } + + sopranMelodieII = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + s1*12 + a2 a4 a4 b8([ a8 g8 a8] b8[ cis8)] d4 d4 a4 d4 fis,4 e2 cis'2 d2 cis4. cis8 d4 d,4 d'4 cis8 b8 cis8[ b8 a8 b8] cis8[ d8] e4 d4( cis4) b2 a2 + fis4. fis8 g4 d4 g4 fis8 e8 fis8[ e8 d8 e8] fis8[ g8] a4 g4( fis4) e2 d4 fis4 g4 g4 a8([ g8 fis8 g8] a8[ b8 cis8 d8)] e2 r4 a,8 a8 fis'4( e4) d2 cis2 + d2 d2 e2 a,4 fis4 b4 d,4 e4( fis4) g2 fis2 r4 e4 a4 a4 fis4. e8 e4 cis'4 fis4 a,4 b4( cis4) d2 cis2 + a4. a8 a4 a4 b4. b8 a4 e4 b'4 b8 b8 b4 g4 fis4. fis8 b4 fis4 d'4 cis8 b8 cis4 a8 b8 c4( b8[ a8] b2. a8[ g8] a2.) g8[ fis8] e2 a2 d,1( ~ d1 ~ d4 e8[ fis8] g4) g4 fis2 + a4. a8 a4 g8[ fis8] g4 a8 b8 e,2 a4 a4 a2 a2 a1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + s1*8 + d2 e4 e4 fis8([ e8 d8 e8] fis8[ g8)] a4 a4 e4 a4 cis,4 b2 gis'2 a2 fis4. fis8 g4 g,4 g'4 fis8 e8 fis8[ e8 d8 e8] fis8[ g8] a4 g4( fis4) e2 d2 e2 fis2 gis2 a4 a,4 a'2 ~ a2 gis2 a2 r2 + r1 r1 r1 + d,2 e4 e4 fis8([ e8 d8 e8] fis8[ g8)] a4 a4 e4 a4 cis,4 b2 gis'2 a2 fis4. fis8 g4 g,4 g'4 fis8 e8 fis8[ e8 d8 e8] fis8[ g8] a4 g4( fis4) e2 d4 d4 g4 g4 fis4. e8 d2 + r2 cis2 d2 e2 a,2 e'4. e8 fis4 fis4 e4. e8 e4 e4 fis4 fis8 fis8 e4 e4 fis4. fis8 fis4 fis4 g4 a8 b8 a2 a4 a4 a2( g2 ~ g2 fis4) e8[ d8] a'2 + fis4. fis8 g4 g,4 g'4 fis8 e8 fis8[ e8 d8 e8] fis8[ g8] a4 g4( fis4) e2 d2 + d4. d8 d4 d4 b4 b8 b8 a2 a4 fis'4 fis4( e8[ d8 e8 fis8)] g4 fis1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + s1*4 + a2 a4 a4 b8([ a8 g8 a8] b8[ cis8)] d4 d4 a4 d4 fis,4 e2 cis'2 d2 cis4. cis8 d4 d,4 d'4 cis8 b8 cis8[ b8 a8 b8] cis8[ d8] e4 d4( cis4) b2 a4 a4 d4 c4 b4. a8 g2 + r2 fis2 g2 a2 d,2 r4 a'4 d4 cis4 b4. b8 a4 cis4 fis4 a,4 b4( cis4) d2 cis4 a4 d4 c4 b4. a8 g2 r2 fis2 g2 a2 d,2 r2 + r1 r1 r1 + a'2 a4 a4 b8([ a8 g8 a8] b8[ cis8)] d4 d4 a4 d4 fis,4 e2 cis'2 d2 + cis4. cis8 d4 d,4 d'4 cis8 b8 cis8[ b8 a8 b8] cis8[ d8] e4 d4( cis4) b2 a2 a4. a8 d4 d4 b4. b8 e4 cis4 b4 b8 b8 b4 b4 cis4. cis8 fis4 d4 d4 e8 fis8 e2 a,4 a4 d2( e2 a,8[ g8 fis8 g8] a4) b4 e,2 r2 + r2 d2 a'8([ g8 fis8 g8] a8[ d8 cis8 d8] b2) cis2 a2 a4. a8 b4 b4 g4 fis8 e8 e'2 d4 d4 a2 a2 a1 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + d2 e4 e4 fis8([ e8 d8 e8] fis8[ g8)] a4 a4 e4 a4 cis,4 b2 gis'2 a2 fis4. fis8 g4 g,4 g'4 fis8 e8 fis8[ e8 d8 e8] fis8[ g8] a4 g4( fis4) e2 + << { + d4 d4 a'4 g4 fis4. e8 d2 r2 cis2 + } \new CueVoice \relative c { + \stemUp + d2 a2 d2 b2 \stemDown fis4 cis'4 fis4 cis4 + } >> + d2 e2 a,2 r4 d4 g4 fis4 + << { + e4. d8 d4 fis4 b4 d,4 e4( fis4) g2 fis4 + } \new CueVoice \relative c { + \stemUp + e2 s4 cis4 b4 fis4 g2 a2 d,4 + } >> + d4 a'4 g4 + << { + fis4. e8 d2 r2 cis2 + } \new CueVoice \relative c { + \stemUp + fis4 gis8[ a8] b4 e,4 a4 gis4 fis4 cis4 + } >> + d2 e2 a,2 + << { + r2 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 + } \new CueVoice \relative c { + \stemDown + r4 d4 g4 fis4 e2 d4 fis4 b4 fis4 g2 a2 d,2 r2 s1 + r2 cis2 d2 e2 a,4 cis4 fis2 ~ fis2 e2 d2 d2 ~ d2 cis2 + } >> + d2 e4 e4 fis8([ e8 d8 e8] fis8[ gis8)] a4 a4 e4 a4 cis,4 b2 gis'2 a2 g4. g8 fis4 fis4 gis4. gis8 a4 a,4 a'4 g8 fis8 g4 e4 ais4. ais8 b4 b,4 b'4 a8 g8 a4 a,4 a'4 g8 fis8 g4 g,4 g'4 fis8 e8 fis4 d8 e8 fis4 g4 a4 + a,4 a4 a4 b8([ a8 g8 a8] b8[ cis8)] d4 d4 + << { + a'4 d4 fis,4 e2 a2 + } \new CueVoice \relative c { + \stemUp + a4 d4 fis,4 e2 cis'2 + } >> + d,2 fis4. fis8 g4 g,4 g'2 ~ g4 fis8 e8 fis8[ e8 d8 e8] fis8[ g8] a4 + << { + a,4. a8 d1 + } \new CueVoice \relative c { + \stemUp + a2 d,1 + } >> + } + >> + } + diff --git a/hr/michi/psallite/texte.ly b/hr/michi/psallite/texte.ly new file mode 100644 index 0000000..61175c3 --- /dev/null +++ b/hr/michi/psallite/texte.ly @@ -0,0 +1,39 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + Psal -- li -- te De -- o no -- stro in læ -- ti -- ti -- a, + ex -- sul -- ta -- te no -- mi -- ni e -- ius in sæ -- cu -- la, + can -- ta -- te Do -- mi -- no, + Al -- le -- lu -- ia, + can -- ta -- te Do -- mi -- no, + can -- ta -- te Do -- mi -- no, + can -- ta -- te Do -- mi -- no, + Al -- le -- lu -- ia. + Psal -- li -- te De -- o no -- stro in læ -- ti -- ti -- a, + ex -- sul -- ta -- te no -- mi -- ni e -- ius in sæ -- cu -- la. + Ex -- sul -- ta -- te, + ex -- sul -- ta -- te no -- mi -- ni e -- ius, + ex -- sul -- ta -- te no -- mi -- ni e -- ius + in sæ -- cu -- la, + in sæ -- cu -- la, + ex -- sul -- ta -- te no -- mi -- ni e -- ius + in sæ -- cu -- la! + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/remember/Do Lord, Remember Me.PDF b/hr/michi/remember/Do Lord, Remember Me.PDF Binary files differnew file mode 100644 index 0000000..1002206 --- /dev/null +++ b/hr/michi/remember/Do Lord, Remember Me.PDF diff --git a/hr/michi/remember/dynArt.ly b/hr/michi/remember/dynArt.ly new file mode 100644 index 0000000..6a06e28 --- /dev/null +++ b/hr/michi/remember/dynArt.ly @@ -0,0 +1,51 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key g \major + \time 4/4 + s1*8 + \bar "||" + \break + s1*8 + \bar "||" + \pageBreak + s1*8 + \repeat volta 2 { + s1*7 + } \alternative { + { + s1 + } + { + s1 + } + } + \bar "||" + \pageBreak + s1*8 + \bar "||" + \break + s1*8 + \bar "||" + %\break + %s1*8 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/remember/haukify.log b/hr/michi/remember/haukify.log new file mode 100644 index 0000000..bed8f2e --- /dev/null +++ b/hr/michi/remember/haukify.log @@ -0,0 +1,28 @@ + \dos + \beulahs + \dos + \beulahs + \dos + \beulahs + \dos + \doa + \beulaha + \doa + \beulaha + \doa + \beulaha + \doa + \dot + \beulaht + \dot + \beulaht + \dot + \beulaht + \dot + \dob + \beulahb + \dob + \beulahb + \dob + \beulahb + \dob diff --git a/hr/michi/remember/lily.log b/hr/michi/remember/lily.log new file mode 100644 index 0000000..ca610c4 --- /dev/null +++ b/hr/michi/remember/lily.log @@ -0,0 +1,11 @@ +GNU LilyPond 2.18.0 +»remember.ly« wird verarbeitet +Analysieren... +Interpretation der Musik...[8][16][24][32][40][48] +Vorverarbeitung der grafischen Elemente... +Ideale Seitenanzahl wird gefunden... +Musik wird auf 3 oder 4 Seiten angepasst... +Systeme erstellen... +Layout nach »remember.ps« ausgeben... +Konvertierung nach »./remember.pdf«... +Kompilation erfolgreich beendet diff --git a/hr/michi/remember/midi.lua b/hr/michi/remember/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/remember/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/michi/remember/remember.ly b/hr/michi/remember/remember.ly new file mode 100644 index 0000000..9bc513a --- /dev/null +++ b/hr/michi/remember/remember.ly @@ -0,0 +1,74 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Do Lord, Remember Me" + composer = "traditional" + arranger = "Moses Hogan" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \paper { + line-width = \paper-width - 30 + top-margin = 10 + bottom-margin = 10 + ragged-last-bottom = #'f + %system-count=14 + } + + \layout { + indent = #0 + \context { + \Staff + \override VerticalAxisGroup #'minimum-Y-extent = #'(-3 . 3.5) + } + } + + #(set-global-staff-size 17) + + 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 } << + \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/michi/remember/stimmen.ly b/hr/michi/remember/stimmen.ly new file mode 100644 index 0000000..4636938 --- /dev/null +++ b/hr/michi/remember/stimmen.ly @@ -0,0 +1,188 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + dos = \relative c' { + d8 d4 e8 g8 g4 r8 b8. b16 b16 a8. g4 bes8( a8) e8 e4 fis8 g8 g4 r8 bes8. a16 g16 e8. d4 r4 d8 d4 e8 g8 g4 r8 + << + { + \voiceOne + e'8 d8 b8 a8 g8 g'4( e8) + } \\ + { + \voiceTwo + b8 a8 b8 a8 g4 d'8( c8) + } + >> + d8( b4) g8 b8( a4) g8 g1 + } + beulahs = \relative c' { + d16 d8 d16 d8 e8 g8 g16 g16 ~ g8 g8 b8 b4 a8 g4 bes16( a16 g8) + e16 e8 e16 e8 fis8 g8 fis16 g16 ~ g8 a8 bes8 a8( g8) e8 d4 r4 + d16 d8 d16 d8 e8 g8 g16 g16 ~ g8 g8 b8 b4 a8 << { \voiceOne g8 g'4( e8) } \\ { \voiceTwo g,4 d'8( c8) } >> + } + fathers = \relative c' { + d16 d8 d16 d16 d16 e8 g8 g16 g16 ~ g8 g8 b8 b4 a8 g4 bes16( a16 g8) + e16 e8 e16 e16 e16 fis8 g8 fis16 g16 ~ g8 a8 bes8 a8( g8) e8 d4 r4 + d16 d8 d16 d16 d16 e8 g8 g16 g16 ~ g8 g8 b8 b4 a8 << { \voiceOne g8 g'4( e8) } \\ { \voiceTwo g,4 d'8( c8) } >> + } + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + \dos + \once \override Score.RehearsalMark #'break-visibility = #end-of-line-visible + \once \override Score.RehearsalMark #'self-alignment-X = #RIGHT + \mark \markup { \bold "Fine" } + \beulahs + d'8( b4) g8 b8( a4) g8 g2 r8 b8 b16( a16 g8) + \dos + \repeat volta 2 { + \beulahs + d'8( b4) g8 b8( a4) g8 + } \alternative { + { + g1 + } + { + g2 r8 b8 b16( a16 g8) + } + } + \dos + \fathers + d'8( b4) g8 b8( a4) g8 + g2 r8 b8 b16( a16 g8) + \once \override Score.RehearsalMark #'break-visibility = #end-of-line-visible + \once \override Score.RehearsalMark #'self-alignment-X = #RIGHT + \mark \markup { \bold "D. C. al Fine" } + %\dos + } + >> + } + + doa = \relative c' { + b8 b4 d8 d8 d4 r8 g8. g16 g16 e8. d4 g8( f8) c8 c4 d8 e8 e4 r8 g8. e16 e16 c8. b4 r4 b8 b4 e8 d8 d4 r8 << { \voiceOne b'8 a8 e8 fis8 e4 b'8( c8) } \\ { \voiceTwo dis,8 fis8 e8 fis8 e4 g4 } >> g4. e8 e4. e8 b8( c4 a8 b2) + } + beulaha = \relative c' { + r1 r1 c16 c8 c16 c8 d8 e8 dis16 e16 ~ e8 e8 g8 e4 c8 b4 r4 b16 b8 b16 b8 d8 d8 d16 d16 ~ d8 e8 dis8 e4 fis8 e4 << { \voiceOne b'8( c8) } \\ { \voiceTwo g4 } >> g4. e8 e4. e8 + } + fathera = \relative c' { + r1 r1 c16 c8 c16 c16 c16 d8 e8 dis16 e16 ~ e8 e8 g8 e4 c8 b4 r4 b16 b8 b16 b16 b16 d8 d8 d16 d16 ~ d8 e8 dis8 e4 fis8 e4 << { \voiceOne b'8( c8) } \\ { \voiceTwo g4 } >> g4. e8 e4. e8 + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + \doa + \beulaha + b8( c4 a8 b4) r4 + \doa + \repeat volta 2 { + \beulaha + } \alternative { + { + b8( c4 a8 b2) + } + { + b8( c4 a8 b4) r4 + } + } + \doa + \fathera + b8( c4 a8 b4) r4 + %\doa + } + >> + } + + dot = \relative c' { + g8 g4 bes8 b8 b4 r8 d8. d16 d16 c8. b4 d4 g,8 g4 a8 bes8 bes4 r8 d8. c16 c16 a8. g4 r4 g8 g4 bes8 b8 b4 r8 a8 a8 a8 b8 b4 g8( a8) b8( d4) cis8 c4. c8 d,8( e4 c8 d2) + } + beulaht = \relative c' { + r1 r1 g16 g8 g16 g8 a8 bes8 a16 bes16 ~ bes8 c8 d8 c4 a8 g4 r4 g16 g8 g16 g8 b8 b8 bes16 b16 ~ b8 a8 a8 a4 b8 b4 g8( a8) b8( d4) cis8 c4. c8 + } + fathert = \relative c' { + r1 r1 g16 g8 g16 g16 g16 a8 bes8 a16 bes16 ~ bes8 c8 d8 c4 a8 g4 r4 g16 g8 g16 g16 g16 bes8 b8 b16 b16 ~ b8 a8 a8 a4 b8 b4 g8( a8) b8( d4) cis8 c4. c8 + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + \dot + \beulaht + d,8( e4 c8 d4) r4 + \dot + \repeat volta 2 { + \beulaht + } \alternative { + { + d8( e4 c8 d2) + } + { + d8( e4 c8 d4) r4 + } + } + \dot + \fathert + d8( e4 c8 d4) r4 + %\dot + } + >> + } + + dob = \relative c { + g8 g4 g8 g8 g8( b8 d8) g8. g16 g16 g8. g8 g,8 a8 b8 c8 c4 c8 c8 c4 r8 c8. c16 d16 d8. g,8 g8( b8 d8) g,8 g4 g8 g8 g8( a8 bes8) b8 c8 cis8 dis8 e4 b8( c8) d4. d8 d4. d8 g,1 + } + beulahb = \relative c { + r1 r1 c16 c8 c16 c8 c8 c8 c16 c16 ~ c8 c8 c8 c8( d8) d8 g,8 g8 b8 d8 g,16 g8 g16 b16( d16) e8 g8 e16 d16 ~ d8 c8 b8 cis4 dis8 e4 b8( c8) d4. d8 d4. d8 + } + fatherb = \relative c { + r1 r1 c16 c8 c16 c16 c16 c8 c8 c16 c16 ~ c8 c8 c8 c8( d8) d8 g,8 g8 b8 d8 g,16 g8 g16 b16 d16 e8 g8 e16 d16 ~ d8 c8 b8 cis4 dis8 e4 b8( c8) d4. d8 d4. d8 + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + \dob + \beulahb + g2. r4 + \dob + \repeat volta 2 { + \beulahb + } \alternative { + { + g1 + } + { + g2. r4 + } + } + \dob + \fatherb + g2. r4 + %\dob + } + >> + } + diff --git a/hr/michi/remember/stimmen_.ly b/hr/michi/remember/stimmen_.ly new file mode 100644 index 0000000..59becd5 --- /dev/null +++ b/hr/michi/remember/stimmen_.ly @@ -0,0 +1,257 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + dos = \relative c' { + d8 d4 e8 g8 g4 r8 + b8. b16 b16 a8. g4 bes8( a8) + e8 e4 fis8 g8 g4 r8 + bes8. a16 g16 e8. d4 r4 + d8 d4 e8 g8 g4 r8 + << + { + \voiceOne + e'8 d8 b8 a8 g8 g'4( e8) + } \\ + { + \voiceTwo + b8 a8 b8 a8 g4 d'8( c8) + } + >> + d8( b4) g8 b8( a4) g8 + g1 + } + beulahs = \relative c' { + d16 d8 d16 d8 e8 g8 g16 g16 ~ g8 g8 + b8 b4 a8 g4 bes16( a16 g8) + e16 e8 e16 e8 fis8 g8 fis16 g16 ~ g8 a8 + bes8 a8( g8) e8 d4 r4 + d16 d8 d16 d8 e8 g8 g16 g16 ~ g8 g8 + b8 b4 a8 << { \voiceOne g8 g'4( e8) } \\ { \voiceTwo g,4 d'8( c8) } >> + } + fathers = \relative c' { + d16 d8 d16 d16 d16 e8 g8 g16 g16 ~ g8 g8 + b8 b4 a8 g4 bes16( a16 g8) + e16 e8 e16 e16 e16 fis8 g8 fis16 g16 ~ g8 a8 + bes8 a8( g8) e8 d4 r4 + d16 d8 d16 d16 d16 e8 g8 g16 g16 ~ g8 g8 + b8 b4 a8 << { \voiceOne g8 g'4( e8) } \\ { \voiceTwo g,4 d'8( c8) } >> + } + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + \dos + \once \override Score.RehearsalMark #'break-visibility = #end-of-line-visible + \once \override Score.RehearsalMark #'self-alignment-X = #RIGHT + \mark \markup { \bold "Fine" } + \beulahs + d'8( b4) g8 b8( a4) g8 + g2 r8 b8 b16( a16 g8) + \dos + \repeat volta 2 { + \beulahs + d'8( b4) g8 b8( a4) g8 + } \alternative { + { + g1 + } + { + g2 r8 b8 b16( a16 g8) + } + } + \dos + \fathers + d'8( b4) g8 b8( a4) g8 + g2 r8 b8 b16( a16 g8) + \once \override Score.RehearsalMark #'break-visibility = #end-of-line-visible + \once \override Score.RehearsalMark #'self-alignment-X = #RIGHT + \mark \markup { \bold "D. C. al Fine" } + %\dos + } + >> + } + + doa = \relative c' { + b8 b4 d8 d8 d4 r8 + g8. g16 g16 e8. d4 g8( f8) + c8 c4 d8 e8 e4 r8 + g8. e16 e16 c8. b4 r4 + b8 b4 e8 d8 d4 r8 + << { \voiceOne b'8 a8 e8 fis8 e4 b'8( c8) } \\ { \voiceTwo dis,8 fis8 e8 fis8 e4 g4 } >> + g4. e8 e4. e8 + b8( c4 a8 b2) + } + beulaha = \relative c' { + r1 + r1 + c16 c8 c16 c8 d8 e8 dis16 e16 ~ e8 e8 + g8 e4 c8 b4 r4 + b16 b8 b16 b8 d8 d8 d16 d16 ~ d8 e8 + dis8 e4 fis8 e4 << { \voiceOne b'8( c8) } \\ { \voiceTwo g4 } >> + g4. e8 e4. e8 + } + fathera = \relative c' { + r1 + r1 + c16 c8 c16 c16 c16 d8 e8 dis16 e16 ~ e8 e8 + g8 e4 c8 b4 r4 + b16 b8 b16 b16 b16 d8 d8 d16 d16 ~ d8 e8 + dis8 e4 fis8 e4 << { \voiceOne b'8( c8) } \\ { \voiceTwo g4 } >> + g4. e8 e4. e8 + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + \doa + \beulaha + b8( c4 a8 b4) r4 + \doa + \repeat volta 2 { + \beulaha + } \alternative { + { + b8( c4 a8 b2) + } + { + b8( c4 a8 b4) r4 + } + } + \doa + \fathera + b8( c4 a8 b4) r4 + %\doa + } + >> + } + + dot = \relative c' { + g8 g4 bes8 b8 b4 r8 + d8. d16 d16 c8. b4 d4 + g,8 g4 a8 bes8 bes4 r8 + d8. c16 c16 a8. g4 r4 + g8 g4 bes8 b8 b4 r8 + a8 a8 a8 b8 b4 g8( a8) + b8( d4) cis8 c4. c8 + d,8( e4 c8 d2) + } + beulaht = \relative c' { + r1 + r1 + g16 g8 g16 g8 a8 bes8 a16 bes16 ~ bes8 c8 + d8 c4 a8 g4 r4 + g16 g8 g16 g8 b8 b8 bes16 b16 ~ b8 a8 + a8 a4 b8 b4 g8( a8) + b8( d4) cis8 c4. c8 + } + fathert = \relative c' { + r1 + r1 + g16 g8 g16 g16 g16 a8 bes8 a16 bes16 ~ bes8 c8 + d8 c4 a8 g4 r4 + g16 g8 g16 g16 g16 bes8 b8 b16 b16 ~ b8 a8 + a8 a4 b8 b4 g8( a8) + b8( d4) cis8 c4. c8 + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + \dot + \beulaht + d,8( e4 c8 d4) r4 + \dot + \repeat volta 2 { + \beulaht + } \alternative { + { + d8( e4 c8 d2) + } + { + d8( e4 c8 d4) r4 + } + } + \dot + \fathert + d8( e4 c8 d4) r4 + %\dot + } + >> + } + + dob = \relative c { + g8 g4 g8 g8 g8( b8 d8) + g8. g16 g16 g8. g8 g,8 a8 b8 + c8 c4 c8 c8 c4 r8 + c8. c16 d16 d8. g,8 g8( b8 d8) + g,8 g4 g8 g8 g8( a8 bes8) + b8 c8 cis8 dis8 e4 b8( c8) + d4. d8 d4. d8 + g,1 + } + beulahb = \relative c { + r1 + r1 + c16 c8 c16 c8 c8 c8 c16 c16 ~ c8 c8 + c8 c8( d8) d8 g,8 g8 b8 d8 + g,16 g8 g16 b16( d16) e8 g8 e16 d16 ~ d8 c8 + b8 cis4 dis8 e4 b8( c8) + d4. d8 d4. d8 + } + fatherb = \relative c { + r1 + r1 + c16 c8 c16 c16 c16 c8 c8 c16 c16 ~ c8 c8 + c8 c8( d8) d8 g,8 g8 b8 d8 + g,16 g8 g16 b16 d16 e8 g8 e16 d16 ~ d8 c8 + b8 cis4 dis8 e4 b8( c8) + d4. d8 d4. d8 + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + \dob + \beulahb + g2. r4 + \dob + \repeat volta 2 { + \beulahb + } \alternative { + { + g1 + } + { + g2. r4 + } + } + \dob + \fatherb + g2. r4 + %\dob + } + >> + } + diff --git a/hr/michi/remember/texte.ly b/hr/michi/remember/texte.ly new file mode 100644 index 0000000..79ebbcf --- /dev/null +++ b/hr/michi/remember/texte.ly @@ -0,0 +1,76 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + oberI = \lyricmode { + Do Lord, oh do Lord, + Lord, re -- mem -- ber me. Oh, + do Lord, oh do Lord, + Lord, re -- mem -- ber me. + Do Lord, oh do Lord, + Lord, re -- mem -- ber me, + } + there = \lyricmode { + oh way be -- yond the sun. + } + oberII = \lyricmode { + I got a home in Beu -- lah lan’ + that out -- shines the + } + oberIII = \lyricmode { + I got a robe in Beu -- lah lan’ + that out -- shines the + } + oberIV = \lyricmode { + I got a crown in Beu -- lah lan’ + that out -- shines the + } + oberV = \lyricmode { + I got a fa -- ther in Beu -- lah lan’ + that out -- shines the + } + oberVI = \lyricmode { + I got a Sav -- ior in Beu -- lah lan’ + that out -- shines the + } + +% 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+> + \oberI + \there + \set stanza = "1." + \oberII sun. + \oberII sun, + \there + \oberI + \there + \set stanza = "2." + \oberIII sun. + \oberIII sun, + \there + sun. + \oberI + \there + \set stanza = "4." + \oberV sun. + \set stanza = "5." + \oberVI sun, + \there + %\oberI + %\there + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/road/dynArt.ly b/hr/michi/road/dynArt.ly new file mode 100644 index 0000000..1c04264 --- /dev/null +++ b/hr/michi/road/dynArt.ly @@ -0,0 +1,46 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key f \major + \time 3/4 + \repeat volta 2 { + \partial 4 + s4 + s2. + \time 4/4 + s1 + \time 3/4 + s2.*17 + s2 + } + \break + s4 + s2. + \time 4/4 + s1 + \time 3/4 + s2.*19 + \time 4/4 + s1 + \time 3/4 + s2.*2 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/road/midi.lua b/hr/michi/road/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/road/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/michi/road/road.ly b/hr/michi/road/road.ly new file mode 100644 index 0000000..780602c --- /dev/null +++ b/hr/michi/road/road.ly @@ -0,0 +1,81 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "The Road Home" + %composer = "<+Komponist+>" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + 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 { \tenorTextI } + \addlyrics { \tenorTextII } + >> + + bas = << + \new Voice = "baesse" { \global \bassMelodie } + %\addlyrics { \bassText } + >> + + \score { + << + \new Staff = sopSolo { \new Voice = "solo" { \global \sopSolo } } + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \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 { + \context { + \Staff + \RemoveEmptyStaves + \override VerticalAxisGroup #'remove-first = ##t + } + } + } + diff --git a/hr/michi/road/stimmen.ly b/hr/michi/road/stimmen.ly new file mode 100644 index 0000000..3e674df --- /dev/null +++ b/hr/michi/road/stimmen.ly @@ -0,0 +1,81 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopSolo = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + s4 + s2. + s1 + s2.*17 + s2 + r4 + r2. + r1 + r2. + r4 r4 c8( d8) f2 a8 a8 c2 a8 a8 c4 c4 d4 a2 c4 c4 c4 c8( bes8) a2 c8 c8 f2 d4 c2 a8 c8 f2 f4 f4 f4 e4 g4( f4) e8 f8 d2 c4 f2 a,8 a8 c2 c8 c8 f4( a,4) g4 f2. ~ f2. r1 R2. R2. + } + >> + } + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + c4( d4 c4 a4 g4 f2 g4 a4 f4 d4 f2) c8 d8 f2 f8 d8 g2 f8 g8 a2 g8( f8) d2 c8 d8 f2 f8 d8 g2 f8( g8) a2 <f d>4 g2 f8 a8 c2 c8 a8 d4 c4 a8( g8) f2 g8( f8) d2 c8 d8 f2 f8 d8 g2 f8 g8 <a f>2 << g4 \\ { f8( e8) } >> f2 + c'4( d4 c4 a4 g4 f2 g4 a4 f4 d4 f2) c8( d8) f2 f8 d8 g2 f8 g8 a2 g8 f8 d2 c8 d8 f4 f4 f8( d8) g2 f8 g8 a2 <f d>4 g2 f8 a8 c2 c8( a8) d4 c4 a8( g8) f2 g8 f8 d2 c8( d8) f2 f8 d8 g2 f8 g8 <a f>2 << g4 \\ { f8( e8) } >> f2 c'4( d4 c4 a4 g4 f2) g4( a4 f4 d4 f2.) + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + f4( ~ f2. ~ f4 e2 d4 ~ d2 bes4 a2) c8 d8 a2 bes8 bes8 c2 c8 c8 d2 d4 c2 c8 d8 bes2 c8 c8 c2 c8 c8 d2 c4 f4( e4) f8 a8 f2 f8 f8 f4 f4 e4 e4( d4) d8 d8 c4( bes4) g8 g8 bes2 bes8 bes8 c2 c8 c8 d2 c4 c2 + f4( ~ f2. ~ f4 e2 d4 ~ d2 bes4 a2) c8( d8) a2 bes8 bes8 c2 c8 c8 d2 d8 d8 c2 c8 d8 bes4 bes4 c4 c2 c8 c8 d2 c4 f4( e4) f8 a8 f2 f4 f4 f4 e4 e4( d4) d8 d8 c4( bes4) g4 bes2 bes8 bes8 c2 c8 c8 d2 c4 c2 f4( ~ f2 e4 d4 c2) d4( ~ d4 bes2 c2.) + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + c4( d4 c2 ~ c2. a4 ~ a4 f2 c2) c8 d8 c2 d8 f8 f2 f8 f8 f2 g4 a2 c,8 d8 g2 bes8 bes8 a2 a8 a8 bes2 bes4 c2 f,8 a8 c2 c8 c8 d4 c4 cis4 a2 a8 a8 f2 f8 f8 d2 d8 f8 f2 g8 g8 bes2 bes4 a2 + c4( d4 c2 ~ c2. a4 ~ a4 f2 c2) c8( d8) c2 f8 f8 f2 d8 f8 f2 g8 g8 a2 c,8 d8 g4 g4 bes4 a2 a8 a8 bes2 bes4 c2 f,8 a8 c2 c4 d4 c4 cis4 a2 a8 a8 f2 f4 d2 f8 f8 f2 g8 g8 <bes g>2 bes4 a2 c4( d4 c2 bes4 a2) a4( g4 d4 f4 a2.) + } + >> + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + a4( bes4 a4 g4 f4 e2 d4 c4 bes4 g4 f2) c'8 d8 f,2 g8 g8 a2 a8 a8 bes2 bes4 c2 c8 d8 d2 d8 d8 e2 e8 e8 f2 f4 <bes g>2 f8 a8 a2 a8 a8 bes4 a4 e4 d2 c8 c8 bes2 a8 a8 g2 g8 g8 a2 bes8 bes8 <g' c,>2 q4 <c, f,>2 + a'4 bes4 a4 g4 f4( e2 d4 c4 bes4 g4 f2) c'8( d8) f,2 g8 g8 a2 a8 a8 bes2 bes8 bes8 c2 c8 d8 d4 d4 d4 e2 e8 e8 f2 f4 <bes g>2 f8 a8 a2 a4 bes4 a4 e4 d2 c8 c8 bes2 a4 g2 g8 g8 a2 bes8 bes8 c2 <g' c,>4 <c, f,>2 a'4( bes4 a4 g4 f4 e2) << { d4( bes4 g4 c4 ~ c2.) } \\ { s4 s4 s4 c,4 f2. } >> + } + >> + } + diff --git a/hr/michi/road/texte.ly b/hr/michi/road/texte.ly new file mode 100644 index 0000000..565e028 --- /dev/null +++ b/hr/michi/road/texte.ly @@ -0,0 +1,53 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + } + + tenorTextI = \lyrics { + %<+hier den Text für den Tenor eintragen+> + Oo__ + \set stanza = "1." + Tell me where is the road I can call my own, + That I left, that I lost, + So _ long a -- go? + All these years I have wan -- dered, + O when will I know + There’s a way, there’s a road that will lead me home? + Oo__ + Rise up, fol -- low me, + Come a -- way is the call, + With the love in your heart + As the on -- ly song; + There is no such beau -- ty as where you be -- long, + Rise up, fol -- low me, + I will lead you home. + Oo__ + Oo__ + } + + tenorTextII = \lyrics { + %<+hier den Text für den Tenor eintragen+> + _ + \set stanza = "2." + Af -- ter wind, af -- ter rain, + When the dark is done, + As I wake from a dream + In the gold of day, + Through the air there’s a call -- ing + From far a -- _ way, + There’s a voice I can hear that will lead me home. + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/sato/dynArt.ly b/hr/michi/sato/dynArt.ly new file mode 100644 index 0000000..d5063fd --- /dev/null +++ b/hr/michi/sato/dynArt.ly @@ -0,0 +1,64 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + \dynamicUp + \time 3/4 + s2.*9 + \time 4/4 + s1 + \bar "||" + \break + \time 3/4 + s2.*8 + \break + s2.*3 + \bar "||" + %\break + s2.*10 + \break + s2.*8 + \bar "||" + \break + s2.*2 + \time 4/4 + s1 + \time 3/4 + s2.*4 + \break + s2.*2 + \time 4/4 + s1*5 + \break + \time 3/4 + s2.*15 + \bar "||" + \break + s2.*8 + \bar "||" + \break + s2.*9 + \break + \time 4/4 + s1 + \time 3/4 + s2. + \bar "||" + s2.*8 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/sato/midi.lua b/hr/michi/sato/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/sato/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/michi/sato/sato.ly b/hr/michi/sato/sato.ly new file mode 100644 index 0000000..4e79cbf --- /dev/null +++ b/hr/michi/sato/sato.ly @@ -0,0 +1,74 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Kyrie" + composer = "Kentaro Sato" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \paper { + line-width = \paper-width - 30 + top-margin = 10 + bottom-margin = 10 + ragged-last-bottom = #'f + %system-count = 11 + } + + \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 = "tenoereI" { \global \voiceOne \tenorI } + \new Voice = "tenoereII" { \global \voiceTwo \tenorII } + \addlyrics { \tenorText } + >> + + bas = << + \new Voice = "baesse" { \global \bassMelodie } + %\addlyrics { \bassText } + >> + + \score { + \new ChoirStaff \with { printPartCombineTexts = ##f } << + \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/michi/sato/stimmen.ly b/hr/michi/sato/stimmen.ly new file mode 100644 index 0000000..3ab3e68 --- /dev/null +++ b/hr/michi/sato/stimmen.ly @@ -0,0 +1,791 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + \key d \major + %\override Staff.TimeSignature #'style = #'() + \time 3/4 + %\autoBeamOff + } + +% Die Stimmen + + kyrie = \relative c' { + e8 e8 e4. e8 + e8( a8) a2 + e8 e8 e4. e8 + } + sopI = \relative c' { + \kyrie + e8( cis'8) cis8 a8 b8 cis8 + d2. + d4. cis8 b8 a8 + b2. + a2 ~ a8 a8 + a4( g4 fis4) + d1 + % 11 + e8 e8 e4. e8 + e8( a8) a2 + e8 e8 e4. e8 + e8( cis'8) cis8 a8 b8 cis8 + d2 d4 + e2. + d2. + cis4( d4.) a8 + a4( g4 fis4) + d4 a'8 g8 fis8 e8 + e4 e2 + % 22 + \kyrie + e8( cis'8) cis8 a8 b8 cis8 + d2. + cis4( e4.) cis8 + d4 d2 ~ + d4 d8 cis8 b8 d8 + e4 fis2 + fis4 e8 e8 d8( cis8) + d2. + d4 d4. d8 + d4 c4 bes4 ~ + bes4 a4. bes8 + b2. + cis2 cis4 + dis2. + e2. + % 40 + r4 a,4 a4 + b2. + r4 \times 2/3 { a8 b8 c8 } b4 a4 + r4 a4 a4 + b4. b8 cis4 + a2. ~ + a2. + r4 a4 a4 + b2. + r4 \times 2/3 { a8 b8 c8 } b4 a8 + e'8 + e4( d8 cis8) b4 a8 e'8 + e4( d8) cis8 b4( a4) + b1 ~ + b1 + % 54 + R2. + R2. + R2. + R2. + \repeat unfold 2 { + e,8 a8 b8( e4.) + e,8( a8) b8( e4.) + } + d,8 g8 a8( d4.) + d,8( g8) a8( d4.) + d,8 g8 a8( d4.) + d,8( g8) a8( fis'8 e8) d8 + e4 a,4 a8 e'8 + g8( fis8 e8) d8 d8 e8 + d2 d8 cis8 + % 69 + cis4( d4) fis,4 + g4( e'4. d8) + cis4( d4) e4 + d4. d8 cis8( d8) + g,4 fis'4 e4 + d8 d8 cis4.( e8) + a,2. + r4 r8 a8 b8 cis8 + cis4 d4 fis,4 + g4( e'4. d8) + cis4( d4 e4) + g8 fis8 e8 fis8 e8( cis8) + d4. b8 cis8 d8 + e8( d8) cis8 a8 d8( cis8) + d2. ~ + d2. + r2. + r4 g,8 g8 a8 a8 b4 + d,2( e4) + % 88 + e8 e8 e4. e8 + e8( a8) a2 + e8 e8 e4. e8 + e8( cis'8) cis2 + e,4 e4. e8 + e8( a8) a2 + e8 e8 e8 a8 cis4 + a2. + } + sopII = \relative c' { + \kyrie + e8( cis'8) cis8 a8 b8 cis8 + b2. + a4. a8 a8 a8 + a4( g4 fis4) + fis2 ~ fis8 e8 + d2. + d1 + % 11 + e8 e8 e4. e8 + e4 e4( fis8 d8) + e8 e8 e4. e8 + e8( a8) a8 a8 b8 a8 + b2 b4 + a8( d8) cis4 a8 a8( + b4) b2( + a4) a4 ~ a8 fis8 + a4( g4 fis4) + d4 a'8 g8 fis8 e8 + e4 e2 + % 22 + \kyrie + e8( cis'8) cis8 a8 b8 cis8 + d2. + cis4( e4.) cis8 + d4 d2 ~ + d4 d8 cis8 b8 d8 + cis4 e8( d8 cis8 d8) + d4 d8 d8 d8( cis8) + b2. + a4 a4. a8 + a4 a4 g4( + f4) f4. f8 + e4( fis4 gis4) + a4( b4) cis4 + b4( a4 b4) + cis2. + % 40 + r4 a4 a4 + b2. + r4 \times 2/3 { a8 b8 c8 } b4 a4 + r4 a4 a4 + b4. b8 cis4 + a2. ~ + a2. + r4 a4 a4 + b2. + r4 \times 2/3 { a8 b8 c8 } b4 a8 + cis8 + cis4( d8 cis8) b4 a8 b8 + a4( b8) a8 b4( a4) + b1 ~ + b1 + % 54 + R2. + R2. + R2. + R2. + \repeat unfold 2 { + e,8 a8 b2 + e,8( a8) b2 + } + d,8 g8 a2 + d,8( g8) a2 + d,8 g8 a2 + d,8( g8) a8( d8 cis8) b8 + a4 a4 a8 e'8 + d4. b8 b4 + b2 b8 a8 + % 69 + a4( d4) fis,4 + g4( ~ g8 a8 b4) + cis4( d4) cis4 + d4. d8 cis8( d8) + g,4 d'4 d4 + b8 b8 a4.( cis8) + a2. + r4 r8 fis8 g8 a8 + a4 d4 fis,4 + g4( ~ g8 a8 b4) + cis4( d4 cis4) + d8 d8 d8 d8 d8( cis8) + d4. b8 cis8 d8 + e8( d8) cis8 a8 d8( cis8) + b2. ~ + b2. + r2. + r4 g8 g8 a8 a8 b4 + d,2( e4) + % 88 + e8 e8 e4. e8 + e4 e4( fis8 d8) + e8 e8 e4. e8 + e8( a8) a2 + e4 e4. e8 + e4 e4( fis8 d8) + e8 e8 e8 e8 a4 + a2. + } + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + << + \sopI \\ \sopII + >> + } + >> + } + + altI = \relative c' { + R2. + R2. + e8 e8 e8( d8 cis8) b8 + cis8( e8) a8 a8 a8 a8 + a4 g4 fis4 + e8( g8) fis8 e8 d8 cis8 + d4 d4 d4( + e4) d4 cis8 cis8 + b4 b4 a4 + b4( cis4) d2 + % 11 + d8 d8 d4 d4 + d2 d4 + d8 cis8 b4 cis4 + d8( e8) e8 fis8 fis8 e8 + d8( a'8) g4 fis4 + fis2. + a4( g4 fis4) + fis4.( e8) d4 + d2( ~ d8 cis8) + d4 fis8 e8 d8 d8 + d4 d4( cis4) + d8 d8 d4. d8 + d8( fis8) fis2 + d8 d8 d4. d8 + d8( a'8) a8 a8 a8 a8 + b8 a8 g4. fis8 + e4 a4. cis8 + b4 b2 ~ + b4 b8 a8 g8 b8 + a4 a4. a8 + a8( g8) fis8( a8 ~ a4) + r4 r8 g8 ~ g4 + g2 g8 g8 + f2. + ees2 f4 + e4 e4 e4 + e4 gis4 a4 + a2. + b4( a2) + % 40 + r4 e4 e4 + fis2. + r4 \times 2/3 { e8 fis8 gis8 } fis4 e4 + r4 e4 e4 + fis4. fis8 fis4 + fis2. ~ + fis2. + r4 e4 e4 + fis2. + r4 \times 2/3 { e8 fis8 gis8 } fis4 e8 a8 + a2 gis8( fis8) e8 a8 + fis8( gis8 a8) fis8 e2 + fis1 ~ + fis1 + R2. + R2. + R2. + R2. + e8 a8 a2 + e8( a8) a2 + e8 a8 a2 + e8( a8) a2 + d,8 g8 g2 + d8( g8) g2 + d8 g8 g2 + d8( g8) g4. g8 + e4 e2 + g4 b8 b8 a4 + a4( g4) g8 g8 + % 69 + fis4( a4) fis8( e8) + d4( e8 fis8 g4) + a2. + b4 b8 b8 a4 + g4 a8( b8) b8( g8) + g8 g8 g4( a4) + a2. + r4 r8 e8 d8 e8 + fis4 a4 fis8( e8) + d4( e8 fis8 g4) + a2. + a8 a8 g8 g8 a4 + b4. g8 a8 b8 + a4 a8 a8 a4 + a4( g4 fis4 + g2.) + R2. + r4 d8 d8 e8 e8 fis4 + d2( cis4) + d8 d8 d4 ~ d8 d8 + d4 d2 + d8 cis8 b4( cis8) cis8 + d8( e8) e2 + d4 d4. d8 + d4 d2 + d8 cis8 b8 cis8 e4 + e2. + } + altII = \relative c' { + R2. + R2. + e8 e8 e8( d8 cis8) b8 + cis8( e8) a8 a8 a8 a8 + a4 g4 fis4 + e8( g8) fis8 e8 d8 cis8 + d4 d4 d4( + e4) d4 cis8 cis8 + b4 b4 a4 + a2 b2 + % 11 + d8 d8 d4 d4 + d2 d4 + d8 cis8 b4 cis4 + d4 d8 e8 d8 d8 + d8( a'8) g4 fis4 + e4 e8( d8) d8 cis8( + d4) d2 ~ + d4 d8( cis8) b4 + d2( ~ d8 cis8) + d4 fis8 e8 d8 d8 + d4 d4( cis4) + d8 d8 d4. d8 + d8( e8) e2 + d8 d8 d4. d8 + d8( e8) e8 e8 e8 e8 + b'8 a8 g4. fis8 + e4 a4. cis8 + a4 g4( fis4 + g4) g8 g8 e8 g8 + a4 a4. a8 + fis8( e8) d8( fis8 ~ fis4) + r4 r8 e8 ~ e4 + d2 d8 d8 + d2( ~ d8 c8) + bes2 c4 + cis4 cis4 cis4 + cis4 e4 e4 + e2. + e2. + r4 e4 e4 fis2. + r4 \times 2/3 { e8 fis8 gis8 } fis4 e4 + r4 e4 e4 + fis4. fis8 e4 + fis2. ~ + fis2. + r4 e4 e4 + fis2. + r4 \times 2/3 { e8 fis8 gis8 } fis4 e8 e8 + fis2 e8( fis8) e8 e8 + d8( e8 fis8) d8 cis2 + d1 ~ + d1 + R2. + R2. + R2. + R2. + e8 e8 e2 + e4 e2 + e8 e8 e2 + e4 e2 + d8 d8 d2 + d4 d2 + d8 d8 d2 + d4 d4. d8 + d4 d2 + d4 g8 g8 e4 + a4( g4) e8 e8 + e4( fis4) fis8( e8) + d2. + e2. + a4 g8 fis8 e4 + d8( e8) g4 g8( e8) + fis8 fis8 e4( g4) + a2. + r4 r8 e8 d8 e8 + e4 fis4 fis8( e8) + d2. + e2. + fis8 fis8 g8 g8 fis8( a8) + g4. g8 g8 g8 + e4 e8 e8 e4 + d2. ~ + d2. + R2. + r4 d8 d8 e8 e8 fis4 + d2( cis4) + d8 d8 d4 ~ d8 d8 + d4 d2 + d8 cis8 b4( cis8) cis8 + d4 d2 + d4 d4. d8 + d4 d2 + d8 cis8 b8 cis8 d4 + d2. + } + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + << + \altI \\ \altII + >> + } + >> + } + + unter = { + s2.*9 + s1 + } + tenA = \relative c'' { + \unter + a2. ~ + a2. ~ + a2. ~ + a4. a8 a8 a8 + b4 d4 cis8 b8 + a8 a8 cis8( d8) a4 + r4 r8 g8 d'8 cis8 + e4 d2 + cis4. b8 ~ b8 a8 ~ + a8 b8 ~ b4 b4 + r8 e,8 g8 d'8 e8( cis8) + % 22 + a4 a8 d8 cis8 e8 + a,4 a8 fis'8( e8) cis8 + a4. cis8 d8 e8 + d4 a4 fis'4 + } + tenB = \relative c'' { + r4 r8 g8 fis'8 e8 + d4( cis4) b4 + a4 d4 d8 d8 + d4 d2 + r8 g,8 + } + tenC = \relative c'' { + r4 d4 d4 + e2. + r4 \times 2/3 { d8 e8 e8 } e4 d4 + r4 d4 d4 + e4( b4) cis8 d8 + e4( d4) cis4 + b4 a2 + r4 d4 d4 + e2. + r4 \times 2/3 { d8 e8 e8 } e4 d8 + } + tenD = \relative c'' { + a2. ~ + a2. ~ + a2. ~ + a2. + a4 a4. a8 + a4 a2 + a8 a8 a8 a8 a4 + a2. + } + + tenorI = \relative c'' { + \tenA + d4 b8 cis8 d4 + e8 e8 d4 cis4 + \tenB + b8 b8 ~ b8 b8 + a2 a4 + c8 bes8 a2 + bes8( a8) g2 + r8 e8( b'8) a8 ~ a8 e8 + b'4 a4. cis8 + cis4( e4 dis4) + cis2. + % 40 + \tenC + e8 + e2 e4 cis8 b8 + a2 b8( a8) gis8 a8 + b8( cis8 d4) cis4 d4 + b2 b2 + b8 b8 b4. cis8 + d4 d2 + b4 b4. cis8 + d4( cis4 b4) + a2. ~ + a2. + % 60 + a4 b4 cis4 + cis8( d8 e8 d8) cis8( b8) + b8 b8 b4. cis8 + d4 d2 + b4 b4. cis8 + d4( cis4 b4) + a2. + b8( d8) cis8 b8 d4 + d4 d4 b8( g8) + fis8 a8 e'8 d8 ~ d8 a8 + b2 b4 + d4 d4 d4 + d4 d4 d4 + d4( fis4. e8) + d4( cis2) + r4 e4 d4( + cis4) d4 a8( g8) + fis8 a8 e'8 d8 ~ d8 a8 + b2 b4 + d4 d4 d4 + d8 b8 cis8 d8 e4 + fis4. fis8 fis8 fis8 + d4 d8 d8 d4 + d4( b4 cis4 + d2.) + R2. + r4 b8 b8 d8 d8 d4 + b2. + \tenD + } + tenorII = \relative c'' { + \tenA + b4 g8 a8 b4 + a8 a8 a4 a4 + \tenB + g8 g8 ~ g8 g8 + g2 g4 + a8 g8 f2 + g8( f8) ees2 + r8 e8 ~ e8 e8 ~ e8 e8 + e4 e4. a8 + a4( cis4 b4) + b2. + % 40 + \tenC + cis8 + a2 b8( gis8) a8 a8 + fis2 e4 e8 e8 + a4( b4) a4 b4 + a2 g2 + a8 a8 g4. a8 + b4 b2 + a4 g4( a8) a8 + b4( ~ b8 a4 g8) + a2. ~ + a2. + % 60 + a4 b4 a4 + a8( b8 cis8 b8) a8( gis8) + a8 a8 g4. a8 + b4 b2 + a4 g4( a8) a8 + b4( ~ b8 a4 g8) + fis2. + g8( b8) a8 g8 a4 + b4 b4 g8( e8) + fis8 a8 e'8 d8 ~ d8 a8 + a2 g4 + a4 a4 a4 + a4 b4 a4 + b2. + b4( a4 g4) + r4 e'4 d4( + cis4) d4 a8( g8) + fis8 a8 e'8 d8 ~ d8 a8 + a2 g4 + a4 a4 a4 + b8 g8 a8 b8 d4 + d4. d8 d8 d8 + a4 a8 a8 a4 + b4( g4 a4 + b2.) + R2. + r4 b8 b8 d8 d8 d4 + b2( g4) + \tenD + } + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + << + {\voiceOne \tenorI} \\ \tenorII + >> + } + >> + } + + bassA = \relative c { + \unter + fis2. ~ + fis2. ~ + fis2. ~ + fis4. d8 a8 fis8 + g4 g8 d'8 a'8( g8) + fis2. + R2. + R2. + g4 g8 g8 d4 + g,2 g4 + a4 a2 + % 22 + r4 fis'8 fis8 fis8 fis8 + fis4 fis8 fis8 ~ fis8 fis8 + fis4. fis8 fis8 fis8 + fis4 fis4 fis4 + g4 g8 g8 g4 + fis8 fis8 fis4 fis4 + r4 r4 + } + bassB = \relative c { + c4 c8 c8 ~ c8 c8 + b2 b8 b8 + bes2. + g2. + a2. + a2 a4 + } + bassC = \relative c { + r4 fis4 fis4 + gis2. + r4 \times 2/3 { fis8 gis8 a8 } gis4 fis4 + r4 fis4 fis4 + gis4. gis8 fis8( e8) + d2. ~ + d2. + r4 fis4 fis4 + gis2. + r4 \times 2/3 { fis8 gis8 a8 } gis4 fis8 e8 + d2 cis2( + b4.) b8 a2 + } + bassD = \relative c { + d,2 fis'8 fis8 + e4. e8 fis4 + g4 g,4 a4 + d8 d8 d8 d8 ~ d8 d8 + d2 e4 + fis4 d4 fis,4 + g4 g'4 fis4 + } + bassE = \relative c { + d8 d8 d8 d8 ~ d8 d8 + d2 e4 + fis4 d4 fis,4 + g8 g8 g8 d'8 fis4 + } + bassF = \relative c { + fis2. ~ + fis2. ~ + fis2. ~ + fis2. + fis4 fis4. fis8 + fis4 fis2 + fis8 fis8 fis8 fis8 fis4 + fis2. + } + + bassI = \relative c' { + \bassA + g4 + g2 g4 + g8( e8) fis4 a8 a8 + a4 a2 + \bassB + e2. + e2. + % 40 + \bassC + d1 ~ + d1 + % 54 + d2. ~ + d2. ~ + d2. ~ + d2. + e2. ~ + e2. ~ + e2. ~ + e2. + d8 d8 d4. d8 + d4 d2 + d4 d4. d8 + d2. + \bassD + g2. + g4( a8 g8 fis8 e8) + r4 a4 a4 ~ + a4 a4 e4 + \bassE + g4. g8 g8 g8 + fis4 fis8 fis8 fis4 + d2. ~ + d2. + R2. + r4 e8 e8 fis8 fis8 g4 + a4( g4 e4) + % 88 + \bassF + } + bassII = \relative c' { + \bassA + g,4 + g2 g4 + d'4 d4 cis8 cis8 + b4 b2 + \bassB + a2. + a2. + % 40 + \bassC + g1 ~ + g1 + % 54 + g2. ~ + g2. ~ + g2. ~ + g2. + fis2. ~ + fis2. ~ + fis2. ~ + fis2. + g8 g8 g4. g8 + g4 g2 + g4 g4. g8 + g2. + \bassD + e'2. + a,2. + r4 fis'4 fis4 ~ + fis4 fis4 a,4 + \bassE + e'4. e8 e8 e8 + fis4 fis8 fis8 fis4 + g,2. ~ + g2. + R2. + r4 e'8 e8 fis8 fis8 g4 + a4( g4 a,4) + % 88 + \bassF + } + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + << + \bassI \\ \bassII + >> + } + >> + } + diff --git a/hr/michi/sato/texte.ly b/hr/michi/sato/texte.ly new file mode 100644 index 0000000..ac1980f --- /dev/null +++ b/hr/michi/sato/texte.ly @@ -0,0 +1,88 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + kyrie = \lyricmode { + Ky -- ri -- e e -- lei -- son. + } + Kyrie = \lyricmode { + Ky -- ri -- e e -- lei -- son, + e -- lei -- son. + } + christe = \lyricmode { + Chri -- ste e -- lei -- son. + } + Christe = \lyricmode { + Chri -- ste e -- lei -- son, + e -- lei -- son. + } + uniA = \lyricmode { + Ky -- ri -- e + \christe + } + uniB = \lyricmode { + \kyrie + \Christe + \kyrie + } + uniC = \lyricmode { + \christe + \kyrie + } + +% 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+> + Oo__ + \christe + \kyrie + \christe + \christe + \christe + \kyrie + Ky -- ri -- e + \Christe + \kyrie + \christe + \kyrie + \kyrie + Ky -- ri -- e Chri -- ste, + \Christe + \uniA + Ky -- ri -- e, + \kyrie + Ky -- ri -- e + \Christe + Ky -- ri -- e + \Christe + % 54 + \kyrie + \christe + \christe + \kyrie + \christe + \Christe + \kyrie + Ky -- ri -- e, + \Christe + Chri -- ste + \kyrie + Ky -- ri -- e, + \uniB + Oo__ + \uniC + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/segla/dynArt.ly b/hr/michi/segla/dynArt.ly new file mode 100644 index 0000000..ebe9fc9 --- /dev/null +++ b/hr/michi/segla/dynArt.ly @@ -0,0 +1,35 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key fis \minor + \time 3/4 + s2.*6 + s2.*4 + \break + s2.*8 + \bar "||" + \break + s2.*4 + s2.*4 + s2.*4 + s2.*4 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/segla/midi.lua b/hr/michi/segla/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/segla/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/michi/segla/segla.ly b/hr/michi/segla/segla.ly new file mode 100644 index 0000000..df679f1 --- /dev/null +++ b/hr/michi/segla/segla.ly @@ -0,0 +1,73 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Vem kan segla" + %composer = "<+Komponist+>" + arranger = "Robert Sund" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + 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 } << + \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/michi/segla/stimmen.ly b/hr/michi/segla/stimmen.ly new file mode 100644 index 0000000..086e0f4 --- /dev/null +++ b/hr/michi/segla/stimmen.ly @@ -0,0 +1,75 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + R2. + R2. + fis2 gis4 a4. gis8 fis4 cis'2 cis4 cis2. d2 e4 fis4. e8 d4 cis2. cis2 r4 b2 cis4 d4. cis8 b4 a2 a4 fis2. gis4. a8 gis4 cis,2 eis4 fis2. fis2 r4 fis2 gis4 a4. gis8 fis4 cis'2 cis4 cis2. d2 e4 fis4. e8 d4 cis2. cis2 r4 b2 b4 d4. cis8 b4 a2 a4 fis2. gis4. a8 gis4 cis,2 eis4 fis2. fis2 r4 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + fis4 cis4 fis4 cis4 fis4 cis4 + fis4 cis4 fis4 cis4 fis4 cis4 + fis4 a4 fis4 a4 fis4 a4 + fis4 a4 fis4 a4 fis4 gis4 ~ gis4 e4 gis4 fis4 a4 fis4 ~ fis4 d4 fis4 eis4 gis4 eis4 fis4 cis4 fis4 dis4 fis4 dis4 d4 fis4 d4 eis4 cis4 eis4 cis4 e4 d4 cis2 r4 fis2.( eis2.) e2 eis4 fis4. gis8 a4 fis2 a4 a2. gis2 g4 fis4. gis8 a4 fis2. eis2 r4 gis2 fis4 e4. e8 d4 fis2 fis4 cis2 cis4 e4( dis4 d4) cis2 r4 + } + >> + } + + tenorMelodie = \relative c { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + R2. + R2. + cis2. + cis2. + cis2. + cis2. + a2. d2( b4) cis2.( a2) r4 + b2. + b2. + cis2. + a2. + b2. cis2( b4) a2( b4) a2 r4 a2 b4 cis4. b8 a4 a2 b4 cis2. cis2 fis4 d4. e8 f4 e2. d2 r4 d2 d4 b4. cis8 d4 cis2 cis4 cis2. bis4. cis8 bis4 b2 gis4 b2. a2 r4 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + R2. + R2. + fis2. e2. dis2. d2( cis4) b2. e2. a,2.( d2) r4 gis,2. cis2. fis2. b,2. gis2. cis2. fis2. fis2 r4 fis2.( cis2.) fis2 gis4 a4. gis8 fis4 b2 b,4 e2. a2 a,4 d4. e8 fis4 gis2. cis,2 r4 fis2 e4 d4. cis8 b4 gis2 gis4 cis2 cis4 fis2. fis2 r4 + } + >> + } + diff --git a/hr/michi/segla/stimmen_.ly b/hr/michi/segla/stimmen_.ly new file mode 100644 index 0000000..6a88781 --- /dev/null +++ b/hr/michi/segla/stimmen_.ly @@ -0,0 +1,189 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + R2. + R2. + fis2 gis4 + a4. gis8 fis4 + cis'2 cis4 + cis2. + d2 e4 + fis4. e8 d4 + cis2. + cis2 r4 + b2 cis4 + d4. cis8 b4 + a2 a4 + fis2. + gis4. a8 gis4 + cis,2 eis4 + fis2. + fis2 r4 + fis2 gis4 + a4. gis8 fis4 + cis'2 cis4 + cis2. + d2 e4 + fis4. e8 d4 + cis2. + cis2 r4 + b2 b4 + d4. cis8 b4 + a2 a4 + fis2. + gis4. a8 gis4 + cis,2 eis4 + fis2. + fis2 r4 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + fis4 cis4 fis4 + cis4 fis4 cis4 + fis4 cis4 fis4 + cis4 fis4 cis4 + fis4 a4 fis4 + a4 fis4 a4 + fis4 a4 fis4 + a4 fis4 gis4 ~ + gis4 e4 gis4 + fis4 a4 fis4 ~ + fis4 d4 fis4 + eis4 gis4 eis4 + fis4 cis4 fis4 + dis4 fis4 dis4 + d4 fis4 d4 + eis4 cis4 eis4 + cis4 e4 d4 + cis2 r4 + fis2.( + eis2.) + e2 eis4 + fis4. gis8 a4 + fis2 a4 + a2. + gis2 g4 + fis4. gis8 a4 + fis2. + eis2 r4 + gis2 fis4 + e4. e8 d4 + fis2 fis4 + cis2 cis4 + e4( dis4 d4) + cis2 r4 + } + >> + } + + tenorMelodie = \relative c { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + R2. + R2. + cis2. + cis2. + cis2. + cis2. + a2. + d2( b4) + cis2.( + a2) r4 + b2. + b2. + cis2. + a2. + b2. + cis2( b4) + a2( b4) + a2 r4 + a2 b4 + cis4. b8 a4 + a2 b4 + cis2. + cis2 fis4 + d4. e8 f4 + e2. + d2 r4 + d2 d4 + b4. cis8 d4 + cis2 cis4 + cis2. + bis4. cis8 bis4 + b2 gis4 + b2. + a2 r4 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + R2. + R2. + fis2. + e2. + dis2. + d2( cis4) + b2. + e2. + a,2.( + d2) r4 + gis,2. + cis2. + fis2. + b,2. + gis2. + cis2. + fis2. + fis2 r4 + fis2.( + cis2.) + fis2 gis4 + a4. gis8 fis4 + b2 b,4 + e2. + a2 a,4 + d4. e8 fis4 + gis2. + cis,2 r4 + fis2 e4 + d4. cis8 b4 + gis2 gis4 + cis2 cis4 + fis2. + fis2 r4 + } + >> + } + diff --git a/hr/michi/segla/texte.ly b/hr/michi/segla/texte.ly new file mode 100644 index 0000000..24410cf --- /dev/null +++ b/hr/michi/segla/texte.ly @@ -0,0 +1,28 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + Vem kan seg -- la u -- tan vind? + Vem kan skil -- jas u -- tan ta -- rar? + Jag kan seg -- la för u -- tan vind. + Jag kan ro u -- tan å -- ror. + Men ej skil -- jas från vän -- nen min + u -- tan att fäl -- la tå -- rar. + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/spirit/dynArt.ly b/hr/michi/spirit/dynArt.ly new file mode 100644 index 0000000..365d890 --- /dev/null +++ b/hr/michi/spirit/dynArt.ly @@ -0,0 +1,58 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key f \minor + \time 2/4 + s2*9 + \bar "||" + \break + \repeat volta 2 { + s2*6 + } \alternative { + { + s2*2 + } + { + s2*2 + } + } + \break + s2*6 + \break + s2*9 + \break + s2*5 + \break + s2*4 + \break + \repeat volta 2 { + s2*6 + } \alternative { + { + s2*2 + } + { + s2*2 + } + } + s2*5 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/spirit/haukify.log b/hr/michi/spirit/haukify.log new file mode 100644 index 0000000..ea343b2 --- /dev/null +++ b/hr/michi/spirit/haukify.log @@ -0,0 +1,43 @@ + \init + \singt + \singt + \singt +underfull measure at (orig) 17, measure 3 (local 3) f16 ees16) c16 bes16 aes16\) ? +80 out of 128 +underfull measure at (orig) 18, measure 6 (local 5) f16 ees16) c16 bes16 aes16\) ? +80 out of 128 +underfull measure at (orig) 19, measure 9 (local 7) f16 ees16) c16 bes16 aes16\) ? +80 out of 128 +underfull measure at (orig) 17, measure 14 (local 3) f16 ees16) c16 bes16 aes16\) ? +80 out of 128 +underfull measure at (orig) 18, measure 17 (local 5) f16 ees16) c16 bes16 aes16\) ? +80 out of 128 +underfull measure at (orig) 19, measure 20 (local 7) f16 ees16) c16 bes16 aes16\) ? +80 out of 128 +underfull measure at (orig) 17, measure 31 (local 3) f16 ees16) c16 bes16 aes16\) ? +80 out of 128 +underfull measure at (orig) 18, measure 34 (local 5) f16 ees16) c16 bes16 aes16\) ? +80 out of 128 +underfull measure at (orig) 19, measure 37 (local 7) f16 ees16) c16 bes16 aes16\) ? +80 out of 128 +underfull measure at (orig) 17, measure 50 (local 3) f16 ees16) c16 bes16 aes16\) ? +80 out of 128 +underfull measure at (orig) 18, measure 53 (local 5) f16 ees16) c16 bes16 aes16\) ? +80 out of 128 +underfull measure at (orig) 19, measure 56 (local 7) f16 ees16) c16 bes16 aes16\) ? +80 out of 128 + \init + \singb + \singb + \yesyoucan + \yesyoucan + \yesyoucan + \singb + \init + \sings + \sings + \sings + \init + \singa + \singa + \singa diff --git a/hr/michi/spirit/midi.lua b/hr/michi/spirit/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/spirit/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/michi/spirit/spirit.ly b/hr/michi/spirit/spirit.ly new file mode 100644 index 0000000..43633be --- /dev/null +++ b/hr/michi/spirit/spirit.ly @@ -0,0 +1,84 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen_.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "I’m Gonna Sing ’Til The Spirit Moves In My Heart" + composer = "Moses Hogan" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 \voiceOne \sopranMelodie } + >> + + alt = << + \new Voice = "alti" { \global \voiceTwo \altMelodie } + >> + + ten = << + \new Voice = "tenoere" { \global \voiceOne \tenorMelodie } + >> + + bas = << + \new Voice = "baesse" { \global \voiceTwo \bassMelodie } + >> + + \new Score { %\with { skipBars = ##t } { + \new GrandStaff << + \new Staff = "tSolo" << + \meta + \new Voice = "tSolist" { \global \tenorSoloMelodie } + >> + \new Staff = "sSolo" << + \meta + \new Voice = "sSolistin" { \global \sopranSoloMelodie } + >> + \new ChoirStaff \with { printPartCombineTexts = ##f } { + << + \new Staff = frauen << \sop \alt >> + \new Lyrics = "bla" \with { alignAboveContext = maenner } + \new Staff = maenner << \ten \bas >> + \context Lyrics = "bla" { \lyricsto "tenoere" \tenorText } + >> + } + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + } + \layout { + \context { \Staff + \RemoveEmptyStaves + \override VerticalAxisGroup.remove-first = ##t + } + } + diff --git a/hr/michi/spirit/stimmen.ly b/hr/michi/spirit/stimmen.ly new file mode 100644 index 0000000..76096a5 --- /dev/null +++ b/hr/michi/spirit/stimmen.ly @@ -0,0 +1,227 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + init = \relative c' { + R2*9 %r2 r2 r2 r2 r2 r2 r2 r2 + } + + tspat = \relative c { + r16 f16 aes16 f16 aes8 f16 g16 aes16 f16 r16 f'16\(( ~ f16 ees16) c16 bes16 aes16\) + f16 aes16 f16 bes8 bes16 aes16 bes16 aes16 r16 f'16\(( ~ f16 ees16) c16 bes16 aes16\) + f16 aes16 f16 aes8 f16 g16 aes16 f16 r16 f'16\(( ~ f16 ees16) c16 bes16 aes16\) + } + + tenorSoloMelodie = \relative c { + \clef "treble_8" + r4 \tspat f16 aes16 f16 bes8 c8 bes16( aes16) f16 f16 ~ f4 \tspat f16 aes16 f16 + bes8 c8 bes16( aes16) f16 f16 ~ f4 ~ f16 f16 aes16 f16 bes8 c8 bes16( aes16) f16 f16 ~ f4 r4 + s2*5 + r2 r2 r4 \tspat f16 aes16 f16 bes8 c8 bes16( aes16) f16 f16 ~ f16 r8. r4 r2 r2 r2 r2 r2 r2 r2 r4 \tspat f16 aes16 f16 + bes8 c8 bes16( aes16) f16 f16 ~ f4 ~ f16 f16 aes16 f16 bes8 c8 bes16( aes16) f16 f16 ~ f4 r4 + r2 r2 r2 r2 r2 + } + + sopranSoloMelodie = \relative c'' { + s2 s2 s2 s2 s2 s2 s2 s2 s2 + \repeat volta 2 { + s2 s2 s2 s2 s2 s2 + } \alternative { + { + s2 s2 + } + { + s2 s2 + } + } + s2 s2 s2 s2 s2 s2 + s2 s2 s2 s2 s2 s2 s2 s2 s2 + s2 s2 s2 s2 s2 + s2 s2 s2 s2 + \repeat volta 2 { + r16 f8( f16 f8 f16) r16 r16 f8( f16 f8 f16 f16) + r16 f8( f16 f8 f16) r16 r16 f8\( f16 f16( <g f>16) <aes f>16( <bes g>16 <c aes>16)\) f,8( f16 f8 f16) r16 r16 f8( f16 f8 f16 f16) + } \alternative { + { + r16 f8( f16 f8 f16) r16 r2 + } + { + r16 f8( f16 f8 f16) r16 r2 + } + } + r2 r2 r2 r2 r2 + } + + sings = \relative c'' { + aes16 aes8 g16 aes8 g16 r16 r16 aes8 g16 aes8 aes16 bes16 r16 bes8 aes16 bes8 bes16 r16 r16 aes8 g16 aes8 aes16( g16) r16 aes8 g16 aes8 g16 r16 r16 aes8 g16 aes8 aes16 bes16 + } + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + \init + \repeat volta 2 { + \sings + } \alternative { + { + r16 bes8 aes16 bes8 bes16 r16 r16 f8 f16 f4 + } + { + r16 bes8 aes16 bes8 bes16 r16 r16 f8 f16 f8 r8 + } + } + r8 g16 aes16 ~ aes4 ~ aes8 g16 aes16 ~ aes4 r8 aes16 g16 ~ g4 ~ g8 g16 aes16 ~ aes4 r8 g16 aes16 ~ aes4 ~ aes8 g16 aes16 ~ aes4 r2 r2 + \sings + r16 bes8 aes16 bes8 bes16 r16 r2 r2 r2 r2 r2 + f16( g16 aes16 g16 aes16 g16 f16 g16 aes16 bes16 c16 bes16 c16 bes16 aes16 bes16 c16 ees16 f16 ees16 c16 ees16 c16 bes16 aes16 bes16 aes16 g16) f16 r8. + \repeat volta 2 { + \sings + } \alternative { + { + r16 bes8 aes16 bes8 bes16 r16 r16 f8 f16 f4 + } + { + r16 bes8 aes16 bes8 bes16 r16 r16 f8 f16 f16 f16 aes16 bes16 + } + } + f2 ~ f4 ges8 g8 aes8 aes8 ~ aes4 + r8 ces,8( ~ ces16 bes16 aes16 f16 aes16 f8. ~ f4) + } + >> + } + + singa = \relative c' { + f16 f8 ees16 f8 ees16 r16 r16 f8 ees16 f8 f16 <f des>16 r16 q8 q16 q8 q16 r16 r16 f8 ees16 f8 f16( ees16) r16 f8 ees16 f8 ees16 r16 r16 f8 ees16 <f des>8 f16 f16 + } + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + \init + \repeat volta 2 { + \singa + } \alternative { + { + r16 q8 q16 q8 q16 r16 r16 c8 des16 c4 + } + { + r16 q8 q16 q8 q16 r16 r16 c8 des16 c8 r8 + } + } + r8 e16 f16 ~ f4 ~ f8 e16 f16 ~ f4 r8 f16 ees16 ~ ees4 ~ ees8 ees16 f16 ~ f4 r8 e16 f16 ~ f4 ~ f8 e16 f16 ~ f4 r2 r2 + \singa + r16 f8 <f des>16 q8 q8 r2 r2 r2 + aes,16( bes16 c16 bes16 c16 bes16 aes16 bes16 c16 des16 ees16 des16 ees16 des16) c16( bes16) c16( des16 f16 ees16 f16 ees16 c16 des16 f16 g16 aes16 g16 aes16 g16 f16 g16 aes16 bes16 c16 bes16 aes16 bes16 aes16 g16 f16 g16 f16 ees16) c16 r8. + \repeat volta 2 { + \singa + } \alternative { + { + r16 q8 q16 q8 q16 r16 r16 c8 des16 c4 + } + { + r16 q8 q16 q8 q16 r16 r16 c8 des16 c16 f16 aes16 bes16 + } + } + ces,2 ~ ces4 c8 des8 d8 e8 ~ e4 + r8 ces8( ~ ces16 bes16 aes16 f16 aes16 f8. ~ f4) + } + >> + } + + singt = \relative c' { + c16 c8 bes16 c8 bes16 r16 r16 c8 bes16 c8 c16 aes16 r16 aes8 f16 aes8 aes16 r16 r16 c8 bes16 c8 c16( bes16) r16 c8 bes16 c8 bes16 r16 r16 c8 bes16 c8 c16 aes16 + } + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + \init + \repeat volta 2 { + \singt + } \alternative { + { + r16 aes8 f16 aes8 aes16 r16 r16 aes8 bes16 aes4 + } + { + r16 aes8 f16 aes8 aes16 r16 r16 aes8 bes16 aes8 r8 + } + } + r8 bes16 c16 ~ c4 ~ c8 bes16 c16 ~ c4 r8 ces16 bes16 ~ bes4 ~ bes8 bes16 c16 ~ c4 r8 bes16 c16 ~ c4 ~ c8 bes16 c16 ~ c4 r2 r16 f8 ees16 c16 r8. + \singt + r16 aes8 f16 aes8 aes16 r16 + r16 f'8 ees16 c16 bes16 aes16 g16 f16( g16 aes16 g16 aes16 g16 f16 g16 aes16 bes16 c16 bes16 c16 bes16) aes16( g16) f16( g16 aes16 g16 aes16 g16 f16 g16 aes16 bes16 c16 bes16 c16 bes16) aes16( g16) aes16( bes16 c16 bes16 c16 bes16 aes16 bes16 c16 ees16 f16 ees16 f16 ees16 c16 ees16 f16 g16 aes16 g16 f16 g16 f16 ees16 c16 ees16 c16 bes16) aes16 r8. + \repeat volta 2 { + \singt + } \alternative { + { + r16 aes8 f16 aes8 aes16 r16 r16 aes8 bes16 aes4 + } + { + r16 aes8 f16 aes8 aes16 r16 r16 aes8 g16 aes16 f16 aes16 bes16 + } + } + ees,2 ~ ees4 ees8 fes8 f8 bes8 ~ bes4 r8 ces8 ~ ces16 bes16 aes16 f16 aes16 f8. ~ f4 + } + >> + } + + singb = \relative c { + f16 f8 c16 f8 c16 r16 r16 f8 c16 f8 f16 bes,16 r16 bes8 bes16 bes8 bes16 r16 r16 f'8 c16 f8 f16( c16) r16 f8 c16 f8 c16 r16 r16 f8 c16 f8 f16 bes,16 + } + yesyoucan = \relative c { + r8. f16 r16 ees16 c16 bes16 f16 f16 r8 r4 + } + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + \init + \repeat volta 2 { + \singb + } \alternative { + { + r16 bes8 bes16 bes8 bes16 r16 r16 f'8 f16 f4 + } + { + r16 bes,8 bes16 bes8 bes16 r16 r16 f'8 f16 f16 c16 ees16 f16 ~ + } + } + f4. f16 aes16 ~ aes16 f8. ~ f16 f16 aes16 ces16( bes4.) f16 aes16 ~ aes16 f8. ~ f16 c16 ees16 f16 ~ f4. f16 aes16 ~ aes16 f8. ~ f16 aes,16 bes16 c16 r8 bes16 bes16 aes8 g16 f16 ~ f4 ~ f16 r8. + \singb + r16 bes8 bes16 bes8 bes16 r16 r2 r2 + \yesyoucan + \yesyoucan + \yesyoucan + r2 + \repeat volta 2 { + \singb + } \alternative { + { + r16 bes8 bes16 bes8 bes16 r16 r16 f'8 f16 f4 + } + { + r16 bes,8 bes16 bes8 bes16 r16 r16 f'8 f16 f16 f16 aes16 bes16 + } + } + aes,2 ~ aes4 a8 bes8 b8 c8 ~ c8 bes16 aes16 f2 ~ f2 + } + >> + } + diff --git a/hr/michi/spirit/stimmen_.ly b/hr/michi/spirit/stimmen_.ly new file mode 100644 index 0000000..6cccf0c --- /dev/null +++ b/hr/michi/spirit/stimmen_.ly @@ -0,0 +1,407 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + init = \relative c' { + R2*9 %r2 r2 r2 r2 r2 r2 r2 r2 + } + + tspat = \relative c { + r16 f16 aes16 f16 + aes8 f16 g16 aes16 f16 r16 f'16\(( ~ + f16 ees16) c16 bes16 aes16\) + f16 aes16 f16 + bes8 bes16 aes16 bes16 aes16 r16 f'16\(( ~ + f16 ees16) c16 bes16 aes16\) + f16 aes16 f16 + aes8 f16 g16 aes16 f16 r16 f'16\(( ~ + f16 ees16) c16 bes16 aes16\) + } + + tenorSoloMelodie = \relative c { + \clef "treble_8" + r4 \tspat f16 aes16 f16 + bes8 c8 bes16( aes16) f16 f16 ~ + f4 \tspat f16 aes16 f16 + bes8 c8 bes16( aes16) f16 f16 ~ + f4 ~ f16 f16 aes16 f16 + bes8 c8 bes16( aes16) f16 f16 ~ + f4 r4 + s2*5 + r2 + r2 + r4 \tspat f16 aes16 f16 + bes8 c8 bes16( aes16) f16 f16 ~ + f16 r8. r4 + r2 + r2 + r2 + r2 + r2 + r2 + r2 + r4 \tspat f16 aes16 f16 + bes8 c8 bes16( aes16) f16 f16 ~ + f4 ~ f16 f16 aes16 f16 + bes8 c8 bes16( aes16) f16 f16 ~ + f4 r4 + r2 + r2 + r2 + r2 + r2 + } + + sopranSoloMelodie = \relative c'' { + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + \repeat volta 2 { + s2 + s2 + s2 + s2 + s2 + s2 + } \alternative { + { + s2 + s2 + } + { + s2 + s2 + } + } + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + s2 + \repeat volta 2 { + r16 f8( f16 f8 f16) r16 + r16 f8( f16 f8 f16 f16) + r16 f8( f16 f8 f16) r16 + r16 f8\( f16 f16( <g f>16) <aes f>16( <bes g>16 + <c aes>16)\) f,8( f16 f8 f16) r16 + r16 f8( f16 f8 f16 f16) + } \alternative { + { + r16 f8( f16 f8 f16) r16 + r2 + } + { + r16 f8( f16 f8 f16) r16 + r2 + } + } + r2 + r2 + r2 + r2 + r2 + } + + sings = \relative c'' { + aes16 aes8 g16 aes8 g16 r16 + r16 aes8 g16 aes8 aes16 bes16 + r16 bes8 aes16 bes8 bes16 r16 + r16 aes8 g16 aes8 aes16( g16) + r16 aes8 g16 aes8 g16 r16 + r16 aes8 g16 aes8 aes16 bes16 + } + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + \init + \repeat volta 2 { + \sings + } \alternative { + { + r16 bes8 aes16 bes8 bes16 r16 + r16 f8 f16 f4 + } + { + r16 bes8 aes16 bes8 bes16 r16 + r16 f8 f16 f8 r8 + } + } + r8 g16 aes16 ~ aes4 ~ + aes8 g16 aes16 ~ aes4 + r8 aes16 g16 ~ g4 ~ + g8 g16 aes16 ~ aes4 + r8 g16 aes16 ~ aes4 ~ + aes8 g16 aes16 ~ aes4 + r2 + r2 + \sings + r16 bes8 aes16 bes8 bes16 r16 + r2 + r2 + r2 + r2 + r2 + f16( g16 aes16 g16 aes16 g16 f16 g16 + aes16 bes16 c16 bes16 c16 bes16 aes16 bes16 + c16 ees16 f16 ees16 c16 ees16 c16 bes16 + aes16 bes16 aes16 g16) f16 r8. + \repeat volta 2 { + \sings + } \alternative { + { + r16 bes8 aes16 bes8 bes16 r16 + r16 f8 f16 f4 + } + { + r16 bes8 aes16 bes8 bes16 r16 + r16 f8 f16 f16 f16 aes16 bes16 + } + } + f2 ~ + f4 ges8 g8 + aes8 aes8 ~ aes4 + r8 ces,8( ~ ces16 bes16 aes16 f16 + aes16 f8. ~ f4) + } + >> + } + + singa = \relative c' { + f16 f8 ees16 f8 ees16 r16 + r16 f8 ees16 f8 f16 <f des>16 + r16 q8 q16 q8 q16 r16 + r16 f8 ees16 f8 f16( ees16) + r16 f8 ees16 f8 ees16 r16 + r16 f8 ees16 <f des>8 f16 f16 + } + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + \init + \repeat volta 2 { + \singa + } \alternative { + { + r16 q8 q16 q8 q16 r16 + r16 c8 des16 c4 + } + { + r16 q8 q16 q8 q16 r16 + r16 c8 des16 c8 r8 + } + } + r8 e16 f16 ~ f4 ~ + f8 e16 f16 ~ f4 + r8 f16 ees16 ~ ees4 ~ + ees8 ees16 f16 ~ f4 + r8 e16 f16 ~ f4 ~ + f8 e16 f16 ~ f4 + r2 + r2 + \singa + r16 f8 <f des>16 q8 q8 + r2 + r2 + r2 + aes,16( bes16 c16 bes16 c16 bes16 aes16 bes16 + c16 des16 ees16 des16 ees16 des16) c16( bes16) + c16( des16 f16 ees16 f16 ees16 c16 des16 + f16 g16 aes16 g16 aes16 g16 f16 g16 + aes16 bes16 c16 bes16 aes16 bes16 aes16 g16 + f16 g16 f16 ees16) c16 r8. + \repeat volta 2 { + \singa + } \alternative { + { + r16 q8 q16 q8 q16 r16 + r16 c8 des16 c4 + } + { + r16 q8 q16 q8 q16 r16 + r16 c8 des16 c16 f16 aes16 bes16 + } + } + ces,2 ~ + ces4 c8 des8 + d8 e8 ~ e4 + r8 ces8( ~ ces16 bes16 aes16 f16 + aes16 f8. ~ f4) + } + >> + } + + singt = \relative c' { + c16 c8 bes16 c8 bes16 r16 + r16 c8 bes16 c8 c16 aes16 + r16 aes8 f16 aes8 aes16 r16 + r16 c8 bes16 c8 c16( bes16) + r16 c8 bes16 c8 bes16 r16 + r16 c8 bes16 c8 c16 aes16 + } + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + \init + \repeat volta 2 { + \singt + } \alternative { + { + r16 aes8 f16 aes8 aes16 r16 + r16 aes8 bes16 aes4 + } + { + r16 aes8 f16 aes8 aes16 r16 + r16 aes8 bes16 aes8 r8 + } + } + r8 bes16 c16 ~ c4 ~ + c8 bes16 c16 ~ c4 + r8 ces16 bes16 ~ bes4 ~ + bes8 bes16 c16 ~ c4 + r8 bes16 c16 ~ c4 ~ + c8 bes16 c16 ~ c4 + r2 + r16 f8 ees16 c16 r8. + \singt + r16 aes8 f16 aes8 aes16 r16 + r16 f'8 ees16 c16 bes16 aes16 g16 + f16( g16 aes16 g16 aes16 g16 f16 g16 + aes16 bes16 c16 bes16 c16 bes16) aes16( g16) + f16( g16 aes16 g16 aes16 g16 f16 g16 + aes16 bes16 c16 bes16 c16 bes16) aes16( g16) + aes16( bes16 c16 bes16 c16 bes16 aes16 bes16 + c16 ees16 f16 ees16 f16 ees16 c16 ees16 + f16 g16 aes16 g16 f16 g16 f16 ees16 + c16 ees16 c16 bes16) aes16 r8. + \repeat volta 2 { + \singt + } \alternative { + { + r16 aes8 f16 aes8 aes16 r16 + r16 aes8 bes16 aes4 + } + { + r16 aes8 f16 aes8 aes16 r16 + r16 aes8 g16 aes16 f16 aes16 bes16 + } + } + ees,2 ~ + ees4 ees8 fes8 + f8 bes8 ~ bes4 + r8 ces8 ~ ces16 bes16 aes16 f16 + aes16 f8. ~ f4 + } + >> + } + + singb = \relative c { + f16 f8 c16 f8 c16 r16 + r16 f8 c16 f8 f16 bes,16 + r16 bes8 bes16 bes8 bes16 r16 + r16 f'8 c16 f8 f16( c16) + r16 f8 c16 f8 c16 r16 + r16 f8 c16 f8 f16 bes,16 + } + yesyoucan = \relative c { + r8. f16 r16 ees16 c16 bes16 + f16 f16 r8 r4 + } + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + \init + \repeat volta 2 { + \singb + } \alternative { + { + r16 bes8 bes16 bes8 bes16 r16 + r16 f'8 f16 f4 + } + { + r16 bes,8 bes16 bes8 bes16 r16 + r16 f'8 f16 f16 c16 ees16 f16 ~ + } + } + f4. f16 aes16 ~ + aes16 f8. ~ f16 f16 aes16 ces16( + bes4.) f16 aes16 ~ + aes16 f8. ~ f16 c16 ees16 f16 ~ + f4. f16 aes16 ~ + aes16 f8. ~ f16 aes,16 bes16 c16 + r8 bes16 bes16 aes8 g16 f16 ~ + f4 ~ f16 r8. + \singb + r16 bes8 bes16 bes8 bes16 r16 + r2 + r2 + \yesyoucan + \yesyoucan + \yesyoucan + r2 + \repeat volta 2 { + \singb + } \alternative { + { + r16 bes8 bes16 bes8 bes16 r16 + r16 f'8 f16 f4 + } + { + r16 bes,8 bes16 bes8 bes16 r16 + r16 f'8 f16 f16 f16 aes16 bes16 + } + } + aes,2 ~ + aes4 a8 bes8 + b8 c8 ~ c8 bes16 aes16 + f2 ~ + f2 + } + >> + } + diff --git a/hr/michi/spirit/texte.ly b/hr/michi/spirit/texte.ly new file mode 100644 index 0000000..ebcb152 --- /dev/null +++ b/hr/michi/spirit/texte.ly @@ -0,0 +1,64 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + til = \lyricmode { + I’m gon -- na sing ’til the spi -- rit + moves in my heart. + I’m gon -- na sing ’til the spi -- rit + moves in my heart. + I’m gon -- na sing ’til the spi -- rit + moves in my heart. + I’m gon -- na sing ’til Je -- sus comes. + } + wer = \lyricmode { + Oh my Je -- sus + } + commonI = \lyricmode { + Sing \wer \wer Oh \wer \wer \wer \wer + Oh \wer ’til he comes. + \wer ’til he comes. + } + oberI = \lyricmode { + Oh yea my Lord + Oh yea my Lord + Oh yea my Lord + } + commonII = \lyricmode { + Pray \wer \wer Oh \wer \wer \wer \wer + Oh \wer + } + commonIII = \lyricmode { + Shout \wer \wer Oh \wer \wer \wer \wer + Oh \wer ’til he comes. + \wer ’til he comes. + I’m gon -- na sing ’til my Je -- sus + } + +% Die Textaufteilungen % -- _ + + sopranText = \lyrics { + %<+hier den Text für den Sopran eintragen+> + } + + altText = \lyrics { + %<+hier den Text für den Alt eintragen+> + } + + tenorText = \lyricmode { + %<+hier den Text für den Tenor eintragen+> + \commonI + \oberI + Hal -- le -- lu + \commonII + Can’t you feel the spi -- rit mov -- in’ + Mov -- in’ + Mov -- in’. + \commonIII + hum _ _ + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/thompson/dynArt.ly b/hr/michi/thompson/dynArt.ly new file mode 100644 index 0000000..94d0d80 --- /dev/null +++ b/hr/michi/thompson/dynArt.ly @@ -0,0 +1,43 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key d \major + \time 4/4 + s1*2 + \time 2/8 + s4 + \time 4/4 + s1*9 + s1*11 + \time 2/8 + s4 + \time 4/4 + s1*12 + \time 2/8 + s4 + \time 4/4 + s1*12 + \time 5/4 + s4*5 + \time 4/4 + s1*37 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/thompson/midi.lua b/hr/michi/thompson/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/thompson/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/michi/thompson/stimmen.ly b/hr/michi/thompson/stimmen.ly new file mode 100644 index 0000000..ddb9fad --- /dev/null +++ b/hr/michi/thompson/stimmen.ly @@ -0,0 +1,101 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + a4 a4 a8( g8) a4 a8 g8 a8 a8 a8 g8 a8 a8 g8 a8 b2 a4 g8 a8 b2 a4 b8 cis8 d2 cis4 a8 a8 a4( gis4) a4 d8 e8 fis2 e4 e,8 e8 e'2 d4 d,8 d8 d'2 cis2 b8( a8 b8 cis8 d8 cis8) b8( a8) b1 a2 r2 r1 + r4 r8 a8 a8 a8 a2 r8 a8 a8 a8 a2 r8 b8 b8 b8 b2 r8 b8 b8 b8 b4( e,4) + r8 gis8( fis8) e8 fis8( dis8) e8( fis8) r8 fis8( e8) dis8 e8( cis8) dis8( e8) r8 e8 dis4 ~ dis8 dis8 cis4 ~ cis8 r8 b4.( cis8) d4 cis8( b8 cis8 d8 e8 d8 cis8 b8 cis2) cis2 + cis'4 cis4 cis8( b8) cis4 cis8 b8 cis8 cis8 cis8 b8 cis8 cis8 b8 cis8 e2 cis4 cis8 cis8 e2 cis8 fis,8( gis8) a8 b4 b4 r8 gis8( a8) b8 cis4 cis4 r8 a8( b8) cis8 d8( b8) cis8( d8) e8( cis8) d8( e8) fis2( ~ fis8 a8 g8 fis8 e8 d8) e4 r8 g8( fis8) e8 d8( fis8 e8 d8 cis8 e8 d8 cis8 b8 ais8) b4 b8( d8) cis8( b8) ais8( gis8 ais8 b8 cis8 b8) ais8( gis8) ais8( b8 cis8 d8 e8 d8) cis8( b8) ais8( gis8 b8 ais8 cis8 b8 ais8 gis8 ais2 ~ ais2.) b2 + b8( a8) b4 d4 b4 b8( a8) b4 e4 b4 b8( a8) b4 fis'4 b,4 b8( a8) b4 d2 a4 a8 a8 d4 a4 a4 a4 c2 a4 a8 a8 c2 b2 + cis2 cis8( b8 cis4) dis4 dis4 dis8( cis8) dis4 e4 e4 e8( d8) e4 e8( d8) e4 e8( d8) e4 g2 e4 e8 e8 g2 e4 r4 + r2 r8 a,4 a8 d4 d4 r8 a8( b8) cis8 d8( cis8 b8 a8) b8 cis8( d8) e8 fis8( e8 d8 cis8) d8 d8( e8) fis8 g8( fis8) e8( d8) g8( fis8) e8( d8) g8( fis8) e8( d8) g8( fis8) e8 g8( fis8) e8 g8 fis8 e8 g8 fis8 e8 a8( g8 fis8 e8) d4 + r8 a16 a16 a'8( g8 fis8 e8) d4 r8 d,16 d16 d'4 d4 d,8( e8) fis8( g8) a2 a2 r8 d,8( e8 fis8 g8 fis8) e8( d8) e2 e2 ~ e4 r4 r4 + e8 e8 a1 e2 r4 e8 e8 a1 e2 r4 e8 e8 a2( b2 a2 g2) a1 r4 <fis d>2. q1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + fis4 fis4 fis8( e8) fis4 fis8 e8 fis8 fis8 fis8 e8 fis8 fis8 e8 fis8 g2 fis4 e8 fis8 g2 fis4 fis8 fis8 fis4( gis4) a8 a8( b8) cis8 d2 cis8( b8) a8 g8 fis8( cis'8 b8 a8 gis8 b8 a8 gis8 a8 b8 a8 gis8 fis8 a8 gis8 fis8 gis8 a8 gis8 fis8) e8( gis8 fis8 e8) fis8( e8 fis8 gis8 a8 gis8) fis8( e8) fis2 e2 + e4 e4 e8( d8) e4 e8 d8 e8 e8 e8 d8 e8 e8 d8 e8 fis2 e8 e8( d8) e8 fis2 e8 e8( fis8) gis8 a2 gis8 e8( fis8) gis8 a2 gis4 a8 b8 cis2 b4 + b,8 b8 b'2 a4 a,8 a8 a'4.( b8 gis4. a8 fis8 e8) fis4 fis8( a8) gis8( fis8) eis8( dis8 eis8 fis8 gis8 fis8 eis8 dis8 eis1) fis2. ~ fis8 r8 + fis8 e8 fis8 fis8 fis8 e8 fis8 fis8 e8 fis8 gis2 fis8 fis8( e8) fis8 gis2 fis4 r4 + r8 a8( gis8) fis8 gis4 gis4 r8 b8( a8) gis8 fis8( gis8 fis8 e8) d4 e8 fis8 gis8( b8 a8 g8 fis8 c'8 b8 a8 b4) b4 + r8 b8( a8) g8 a4 a4 a4 g4 g4 fis4 fis4( e8 d8 e4) g4 fis8( e8 fis8 g8 a8 g8) fis8( e8) fis8( g8 a8 b8 cis8 b8) a8( g8) fis8( e8 g8 fis8 a8 g8 fis8 e8 fis2) fis2. + g4 d4 d4 d4 d8 cis8 d8 d8 d8 cis8 d8 d8 e4 e4 e8( d8) e4 d8 cis8 d8 d8 d8 cis8 d8 d8 d4 d4 d8( cis8) d4 d8 cis8 d8 d8 d8 cis8 d8 d8 e4 e4 d8( cis8) d4 e8( fis8) e4 dis8( cis8) dis4 + eis4 eis4 eis8( dis8) eis4 fis4 fis4 fis8( e8) fis8( gis8) a4 a4 a4 a4 a4. a8 a8 a8 a8 a8 a2 a8 a8( g8) a8 b2 a8 a,4 a8 a'4 a4 r2 + r2 r8 a4 a8 a4 a4 r8 a4 a8 d4 d4 r8 a8( b8) cis8 d8( cis8) b8( a8) d8( cis8) b8( a8) d8( cis8) b8( a8) d8( cis8) b8 d8( cis8) b8 d8 cis8 b8 d8 cis8 b8 a4 a2 r8 + a16 a16 d4 a4 r8 d,16 d16 d'4( ~ d8 c8) b8( a8) a8( g8) fis8( e8) d2 cis2 + r8 a8( b8 cis8 d8 cis8) b8( a8) b2 b2 ~ b4 r4 r4 + d8 d8 d1 b2 r4 b8 b8 d1 d2 r4 d8 d8 d1 ~ d1 d8 r8 a8 a8 a4 a4 ~ a1 ~ a1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + d4 d4 d4 d4 d4 d4 d4 d4 d8 d8 d8 d8 d8 d8 d8 d8 d8 d8 d8 d8 d8 d8 d8 d8 d8 cis8 b2 a4 e'8 e8 d2 e4 a,8 a8 a8( e'8 d8 cis8 b8 d8 cis8 b8 cis8 d8 cis8 b8 a8 cis8 b8 a8 b8 cis8 b8 a8 gis8 b8 a8 gis8) fis8 r8 a2 a4 a2 gis2 + cis4 cis4 cis8( b8) cis4 cis8 b8 cis8 cis8 cis8 b8 cis8 cis8 b8 cis8 d2 cis8 cis8( b8) cis8 d2 cis4 cis8 e8 e4( dis4) e4 b8 e8 e4( dis4) e2 + r8 e8( dis8) cis8 dis8( b8) cis8( dis8) r8 dis8( cis8) b8 cis8( a8) b8( cis8) r8 cis8 b4 ~ b8 b8 a4 ~ a8 r8 b2 b8( a8) gis8( fis8 gis8 a8 b8 a8 gis8 fis8 gis2) gis2 + a4 a4 a8( gis8) a4 a8 gis8 a8 a8 a8 gis8 a8 a8 gis8 a8 b2 a8 a8( gis8) a8 b2 a8 a8( b8) cis8 d4 d4 r8 b8( cis8) d8 e4 a,4 r4 + a8 a8 fis4 b4 b8( d8) cis8( b8) a8( e'8 d8 c8 d8 fis8 e8 d8 cis8 b8) cis4 r8 e8( d8) cis8 cis4( b4) b4( a4) + b2. e8( d8) cis8( b8 cis8 d8 e8 d8) cis8( b8) cis8( d8 e8 fis8 g8 fis8) e8( d8) cis8( b8 d8 cis8 e8 d8 cis8 b8 cis2) cis2. + d4 g,4 g8( fis8) g4 fis8 e8 fis8 fis8 fis8 e8 fis8 fis8 gis4 gis4 gis8( fis8) gis4 fis8 e8 fis8 fis8 fis8 e8 fis8 fis8 fis4 fis4 fis8( e8) fis4 fis8 e8 fis8 fis8 fis8 e8 fis8 fis8 g4 g4 fis8( e8) fis4 g8( a8) g4 fis8( e8) fis4 + b4 b4 b8( cis8) b4 a4 a4 a8( gis8) a8( b8) cis4 cis4 cis8( b8) cis4 cis8( b8) cis4 cis8 b8 cis8 cis8 d2 cis8 cis8( b8) cis8 d2 cis8 a8( b8) cis8 d8( cis8 b8 a8) b8( cis8) d8 e8 fis8( e8 d8 cis8) d8( cis8 d8 e8) fis8( e8) d8( cis8) d8( e8) fis8( g8) a8( g8) fis8( e8) fis4 d8 r8 + d4 d4 d4 d4 d4 d4 d4 d4 d4 d4 d4 d4 + r8 a16 a16 a'4( ~ a8 g8 fis8 e8) d8 a16 a16 a'4( ~ a8 g8 fis8 e8 d8 g8 fis8 e8) d4 d,8 e16( fis16) e1 d2. r8 + d16 d16 d'4 d2. ~ d4 r4 r4 + g,8 g8 fis1 d2 r4 d8 d8 fis1 g2 r4 g8 g8 fis2( g2 fis2 e2) fis1 r4 <fis d>2. q1 + } + >> + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + a4 a4 a8( b8) a4 a8 b8 a8 a8 a8 b8 a8 a8 b8 a8 g2 d4 d8 d8 g2 d2 + r2 r4 cis8 cis8 b2 a4 b8 cis8 d2 e2 e2 b2 b2 cis2 + d8( cis8 d8 e8 fis8 e8) d8( cis8) d2 e2 + a4 a4 a4 a4 a8 a8 a8 a8 a8 a8 a8 a8 a8 a8 d,2 a'4 a8 a8 d,2 a'4 + a8 gis8 fis2 e4 a8 gis8 fis2 e8 e8( fis8) gis8 a1 gis1 + fis2( e2 d4) d8( cis8) d4 b4 cis2. gis4 cis2 cis2 + fis4 fis4 fis4 fis4 fis4 fis4 fis4 fis4 ~ fis4 + r8 cis8 cis8 cis8 fis2 r8 cis8 cis8 cis8 fis2 r8 fis8( e8) d8 e4 e4 + a8( gis8 fis8 e8 d8 e8) d8( cis8) b2 a2 d2 g2 g2 fis2 + b,4 e4 a,4 d4 g2. e4 fis2. cis4 fis2. cis4 fis1( ~ fis8 e8 g8 fis8 a8 g8 fis8 e8 d8 cis8 b4) b2. + b4 b4 b4 b4 b4 b4 b4 b4 b4 b4 b4 b4 a4 a4 a4 a4 a4 a4 a4 a4 a4 a4 a4 a4 a4 a4 a'4 a4 + gis4 gis4 gis8( a8) gis4 fis4 fis4 fis8( gis8) fis4 e4 e4 e8( fis8) e4 e8( fis8) e4 e8( fis8) e4 + r8 e8 e8 e8 a2 r8 e8 e8 e8 a8 a4 g8 fis8( e8 d8 cis8) d8( e8) fis8 g8 a8( g8 fis8 e8) fis8 e8( fis8) g8 a8( g8 fis8 e8) fis8 g8( a8) b8 cis8( b8 a8 g8) a8 fis8( g8) a8 b8( a8) g8( fis8) b8( a8) g8( fis8) b8( a8) g8( fis8) b8( a8) g8 b8( a8) g8 b8 a8 g8 b8 a8 g8 fis8 a8 d8 cis8 b4 a8( g8) fis8 a8 d8 cis8 b4 a8( g8) fis8( e8) d8( c8) b4 b4 a2 a2 + r8 fis8( g8 a8 b8 a8) g8( fis8) g2 g2 ~ g4 r4 r4 + b8 b8 a1 g2 r4 g8 g8 a1 b2 r4 b8 b8 a2( g2 a2 b2) d1 r4 <a d,>2. q1 + } + >> + } + diff --git a/hr/michi/thompson/texte.ly b/hr/michi/thompson/texte.ly new file mode 100644 index 0000000..aef92d6 --- /dev/null +++ b/hr/michi/thompson/texte.ly @@ -0,0 +1,45 @@ +%some settings% vim: ai sw=2 lbr nu et + +% Abkürzungen + + al = \lyricmode { + al -- le -- lu -- ia, + } + +% 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+> + Al -- le -- lu -- ia, + \al \al \al \al \al \al + \al \al \al + \al \al \al + \al \al \al \al + \al \al \al \al + \al \al \al + \al \al \al \al \al \al \al + \al \al + \al \al \al \al + \al \al \al + \al \al \al + \al \al \al \al + \al \al \al \al \al + \al \al + \al \al \al + \al \al + \al \al \al \al + \al A -- men. + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/thompson/thompson.ly b/hr/michi/thompson/thompson.ly new file mode 100644 index 0000000..d9018c9 --- /dev/null +++ b/hr/michi/thompson/thompson.ly @@ -0,0 +1,72 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Alleluia" + composer = "Randall Thompson" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 16) + + 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 } << + \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/michi/todo b/hr/michi/todo new file mode 100644 index 0000000..e801ffb --- /dev/null +++ b/hr/michi/todo @@ -0,0 +1 @@ +bei mehrfach verwendeten defs werden jeweils fehler ausgegeben (oder nicht), das alignment passiert mehrmals und wird gematcht (bei wiederholtem auftreten in eine neue ds, die dann el-weise vgl wird mit der schon generierten) diff --git a/hr/michi/whitacre/both/both.ly b/hr/michi/whitacre/both/both.ly new file mode 100644 index 0000000..31a704f --- /dev/null +++ b/hr/michi/whitacre/both/both.ly @@ -0,0 +1,72 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "A boy and a girl" + composer = "Eric Whitacre" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + 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 } << + \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/michi/whitacre/both/dynArt.ly b/hr/michi/whitacre/both/dynArt.ly new file mode 100644 index 0000000..6cd40e1 --- /dev/null +++ b/hr/michi/whitacre/both/dynArt.ly @@ -0,0 +1,63 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key c \major + \time 4/4 + s1*6 + \break + \time 3/4 + s2. + \time 4/4 + s1*4 + \time 2/4 + s2 + \time 4/4 + s1*3 + \time 3/4 + s2. + \time 4/4 + s1*4 + \time 3/4 + s2.*2 + \time 4/4 + s1*3 + \time 2/4 + s2 + \time 4/4 + s1*7 + \time 2/4 + s2 + \time 4/4 + s1*3 + \time 2/4 + s2 + \time 4/4 + s1 + \time 2/4 + s2 + \time 4/4 + s1 + \time 2/4 + s2 + \time 4/4 + s1*10 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/whitacre/both/haukify.log b/hr/michi/whitacre/both/haukify.log new file mode 100644 index 0000000..63f928f --- /dev/null +++ b/hr/michi/whitacre/both/haukify.log @@ -0,0 +1,169 @@ +Use of uninitialized value $1 in split at ../haukify line 129, <> line 249. +Use of uninitialized value $2 in split at ../haukify line 130, <> line 249. +Use of uninitialized value $d in numeric ne (!=) at ../haukify line 134, <> line 249. +Use of uninitialized value $c in numeric ne (!=) at ../haukify line 134, <> line 249. +Use of uninitialized value $b in numeric lt (<) at ../haukify line 122, <> line 249. +Use of uninitialized value $a in numeric lt (<) at ../haukify line 122, <> line 249. +Use of uninitialized value in addition (+) at ../haukify line 214, <> line 249. +underfull measure at (orig) 130, measure 16 (local 16) g4( f4) << { \voiceOne f8 f8 } { \voiceTwo c8 f8 } >> ? +128 out of 192 +underfull measure at (orig) 131, measure 19 (local 18) r4 e,4 ? +128 out of 256 +error at measure 21 (local 19) in (orig) 135, (result) 30 +320 out of 192 +(occurred after reading r4 e'8 e8 e2. ) +error at measure 25 (local 23) in (orig) 142, (result) 39 +320 out of 256 +(occurred after reading b4( d4) r4 \times 2/3 { f4 f4 g4 } ) +error at measure 29 (local 27) in (orig) 143, (result) 43 +320 out of 256 +(occurred after reading a4 b4 f2. ) +error at measure 32 (local 30) in (orig) 143, (result) 46 +320 out of 256 +(occurred after reading g4 b4 f8 f8 d2 ) +underfull measure at (orig) 144, measure 41 (local 39) r4 e8 e8 ? +128 out of 256 + \tsilence +error at measure 42 (local 1) in (orig) 113, (result) 59 +192 out of 128 +(occurred after reading a4 ) +underfull measure at (orig) 113, measure 43 (local 2) d,4 ? +64 out of 256 +underfull measure at (orig) 117, measure 44 (local 2) g4 d4 ? +192 out of 256 +error at measure 45 (local 2) in (orig) 120, (result) 67 +320 out of 256 +(occurred after reading r2 ) +underfull measure at (orig) 146, measure 46 (local 39) r2 ? +128 out of 256 + \tsilence +underfull measure at (orig) 117, measure 48 (local 2) g4 d4 ? +128 out of 256 +underfull measure at (orig) 148, measure 50 (local 39) r2 ? +128 out of 256 +error at measure 51 (local 39) in (orig) 152, (result) 86 +320 out of 256 +(occurred after reading a2.( ) +underfull measure at (orig) 152, measure 52 (local 40) d,4) ? +64 out of 256 +underfull measure at (orig) 156, measure 54 (local 41) d4) ? +64 out of 256 +error at measure 55 (local 41) in (orig) 159, (result) 95 +320 out of 256 +(occurred after reading r1 ) +underfull measure at (orig) 185, measure 15 (local 15) r2 ? +128 out of 256 +underfull measure at (orig) 189, measure 18 (local 17) g2( f4) ? +192 out of 256 +underfull measure at (orig) 196, measure 23 (local 21) r4 a4 ? +128 out of 256 +error at measure 25 (local 22) in (orig) 200, (result) 147 +320 out of 256 +(occurred after reading r4 g'8 g8 e2. ) +error at measure 28 (local 25) in (orig) 200, (result) 150 +320 out of 256 +(occurred after reading r4 \times 2/3 { a4 a4 b4 } \times 2/3 { g2 d4~ } ) +underfull measure at (orig) 200, measure 30 (local 27) e4( g4) ? +128 out of 256 +error at measure 32 (local 28) in (orig) 204, (result) 157 +320 out of 256 +(occurred after reading r4 c'8 c8 a2. ) +error at measure 35 (local 31) in (orig) 204, (result) 160 +320 out of 256 +(occurred after reading r4 \times 2/3 { d4 d4 e4 } \times 2/3 { c2 g4~ } ) +underfull measure at (orig) 204, measure 37 (local 33) e'2 ? +128 out of 256 +error at measure 38 (local 33) in (orig) 207, (result) 165 +192 out of 128 +(occurred after reading r4 ) +error at measure 39 (local 34) in (orig) 207, (result) 166 +384 out of 256 +(occurred after reading a,4 d4 e4 b2. ) +error at measure 41 (local 36) in (orig) 207, (result) 168 +320 out of 256 +(occurred after reading c4 e4( f4) r2 ) +underfull measure at (orig) 207, measure 47 (local 42) c8 c8 r4 r4 ? +192 out of 256 +underfull measure at (orig) 211, measure 49 (local 43) c4 ? +64 out of 256 +underfull measure at (orig) 215, measure 50 (local 43) g8 a8 f4 ? +192 out of 256 +underfull measure at (orig) 218, measure 52 (local 44) g4 a4 ? +128 out of 256 +underfull measure at (orig) 226, measure 54 (local 45) f,4 c'4 ? +128 out of 256 + \bsilence +underfull measure at (orig) 169, measure 57 (local 1) c4 g4 ? +128 out of 256 +underfull measure at (orig) 176, measure 59 (local 2) r2 ? +128 out of 256 + \bsilence +underfull measure at (orig) 169, measure 61 (local 1) c4 g4 ? +128 out of 256 +underfull measure at (orig) 176, measure 63 (local 2) r2 ? +128 out of 256 +error at measure 66 (local 50) in (orig) 241, (result) 233 +320 out of 256 +(occurred after reading f2.( g2) ) +underfull measure at (orig) 54, measure 15 (local 15) r4 g2 ? +192 out of 256 +error at measure 16 (local 15) in (orig) 58, (result) 270 +256 out of 192 +(occurred after reading g4( ) +underfull measure at (orig) 58, measure 17 (local 16) a4 b4) a8 a8 ? +192 out of 256 +underfull measure at (orig) 61, measure 19 (local 17) a2 a8 a8 ? +192 out of 256 +error at measure 20 (local 17) in (orig) 64, (result) 278 +320 out of 256 +(occurred after reading <c g>2( ) +error at measure 21 (local 18) in (orig) 64, (result) 279 +256 out of 192 +(occurred after reading <bes f>4) r4 r2 ) +error at measure 22 (local 19) in (orig) 64, (result) 280 +256 out of 192 +(occurred after reading r4 c,4 <e c>2 ) +error at measure 23 (local 20) in (orig) 64, (result) 281 +320 out of 256 +(occurred after reading r4 g8 g8 <b a>2. ) +error at measure 25 (local 22) in (orig) 64, (result) 283 +320 out of 256 +(occurred after reading d8( e8 f4) a4~ \times 2/3 { a4 a4 b4 } ) +underfull measure at (orig) 68, measure 28 (local 25) b4( c4) ? +128 out of 256 +underfull measure at (orig) 78, measure 44 (local 40) e4 c4 ? +128 out of 256 +underfull measure at (orig) 88, measure 47 (local 42) e4 c4 ? +128 out of 256 +underfull measure at (orig) 19, measure 15 (local 15) r4 ? +64 out of 256 +underfull measure at (orig) 21, measure 18 (local 17) f2( e4) ? +192 out of 256 +underfull measure at (orig) 23, measure 22 (local 20) d4) ? +64 out of 192 +error at measure 25 (local 22) in (orig) 26, (result) 382 +320 out of 256 +(occurred after reading r4 <g' e>8 q8 <g eis>2. ) +underfull measure at (orig) 27, measure 26 (local 23) r4 ? +64 out of 128 +error at measure 28 (local 24) in (orig) 29, (result) 386 +320 out of 256 +(occurred after reading d4( cis4) r4 \times 2/3 { f4 f4 g4 } ) +error at measure 34 (local 30) in (orig) 34, (result) 395 +192 out of 128 +(occurred after reading d2. ) +error at measure 36 (local 32) in (orig) 34, (result) 397 +320 out of 256 +(occurred after reading a4) r2 e2 ) +underfull measure at (orig) 34, measure 49 (local 45) r2 ? +128 out of 256 +error at measure 50 (local 45) in (orig) 37, (result) 413 +320 out of 256 +(occurred after reading g2.( ) +underfull measure at (orig) 37, measure 51 (local 46) d4) ? +64 out of 256 +underfull measure at (orig) 39, measure 53 (local 47) d4) ? +64 out of 256 +error at measure 54 (local 47) in (orig) 42, (result) 420 +320 out of 256 +(occurred after reading r1 ) diff --git a/hr/michi/whitacre/both/midi.lua b/hr/michi/whitacre/both/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/whitacre/both/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/michi/whitacre/both/stimmen.ly b/hr/michi/whitacre/both/stimmen.ly new file mode 100644 index 0000000..93ae764 --- /dev/null +++ b/hr/michi/whitacre/both/stimmen.ly @@ -0,0 +1,243 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + e2 g4( a4) r2 g2 g4 a8 a8 bes4( a4) r2 r4 d,4 c2 r4 b'8 b8 a2( f2) ~ f4 e4 d8( g8) f8 f8 e4 r4 c'4( \times 2/3 { b4) b4 c4 } a8( f8) e4 ~ e4 r4 r4 c4 c2 r4 c4 d4 e4 b1 e2 g4( a4) + r4 << + { + g4( c4 g'4) g2 f8 f8 f2( e4) + } \\ { + g,4( c2) c2 c8 f8 e2( d4) + } + >> + r4 r2 r4 e,4 <g f>2 r4 <g' e>8 q8 <g eis>2. + r4 << + { + d4 cis4 b8( e8) d4( cis4) r4 \times 2/3 { f4 f4 g4 } + } \\ { + cis,4 b4 b8( e8) cis4( b4) r4 \times 2/3 { eis4 eis4 f4 } + } + >> + \times 2/3 { eis4( c4) b4 ~ } b2 r4 g4 e2 r4 cis4 fis4 gis4 dis2. ees4 ~ ees2 g4( aes4) r2 ees2 g4 d8 d8 c4( d4) r2 r4 c4 <c b>2 r4 e8 e8 <e d>2 r4 g8 g8 e4 c4 r4 b'8 c8 a8( f8) e8( c8 ~ c4. e8 g8 f4 c8 ~ c4 d4) r2 r4 c8 c8 <g' f>4 <d d>4 r2 r4 b8( c8) <g' f>4 <d d>4 r2 r2 + << + { + g2.( d4) + } \\ { + f2.( d4) + } + >> + r1 e2( g4 a4) r2 g2( ~ g4 a4 bes4 a4) r2 r4 c,4 ~ c1 r4 c4( d4 e4 b1 ~ b1) + \bar "|." + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + d2 f4( g4) r2 r4 d4 e4 g8 g8 a4( g4) r2 r4 c,4 bes2 r4 g'8 a8 g4( c,4 f4 e4) ~ e4 d4 r4 e8 e8 d4 d8( e8 f8 g8 \times 2/3 { a4) a4 b4 } g8( f8) d4 ~ d4 r4 r2 a4( b4) r4 a4 c4 d4 a1 d2 f4( g4) r4 g2 + << + { + \voiceOne + g4( a4 bes4) a8 a8 + } \\ { + \voiceTwo + g4 a2 a8 a8 + } + >> + <c g>2( <bes f>4) r4 r2 r4 c,4 <e c>2 r4 g8 g8 <b a>2. r4 d,8( e8) fis4 r4 d8( e8 fis4) a4 ~ \times 2/3 { a4 a4 b4 } \times 2/3 { d4( c4) a4 ~ } a2 r2 + << + { + \voiceOne + b,4( cis4) + } \\ { + \voiceTwo + b2 + } + >> + r4 b4 e4 fis4 cis2. r4 r4 d4 f4( g4) r2 r4 d4 f4 c8 c8 b4( c4) r2 r4 a4 <a g>2 r4 c8 c8 <c a>2 r4 fis8 fis8 d4 c4 r4 a'8 b8 g8( f8) d8( c8 b4. c8 ~ c8 f8 e8 c8 ~ c8 b8 c4) r2 r4 c8 c8 + << + { + \voiceOne + e4 c4 + } \\ { + \voiceTwo + c4 c4 + } + >> + r2 r4 b8( c8) + << + { + \voiceOne + e4 c4 + } \\ { + \voiceTwo + c4 c4 + } + >> + r2 r2 + << + { + \voiceOne + e2.( c4) + } \\ { + \voiceTwo + c1 + } + >> + r1 d2( f4 g4) r2 r4 d4( e4 g4 a4 g4) r1 a,2( b2) r4 a4( c4 d4 a1 ~ a1) + } + >> + } + + tsilence = \relative c' { + << + { + a4 d,4 + } + { + g4 d4 + } + >> + r2 + } + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + g2 bes4( c4) r2 r4 e,4 g4 bes8 bes8 c4( bes4) r2 r4 f4 ees2 r4 d'8 d8 c2. r4 g4 f4 r4 g8 g8 f4 g4( c4 \times 2/3 { d4) d4 e4 } c4 g4 ~ g4 r4 r2 c,4( d4) r4 c4 f4 g4 d1 g2 bes4( c4) r2 c4( e4) + g4( f4) << { \voiceOne f8 f8 } { \voiceTwo c8 f8 } >> + e2( d4) r4 r2 r4 e,4 + << + { + \voiceOne + g2 r4 e'8 e8 e2. + } + { + \voiceTwo + f,2 r4 c'8 c8 cis2. + } + >> + r4 b4 d4 r4 b4( d4) r4 \times 2/3 { fis4 fis4 g4 } \times 2/3 { e2 b4 ~ } b2 r2 + g4( a4) r4 e4 a4 b4 fis2. r4 r4 g4 bes4( c4) r2 r4 g4 bes4 f8 f8 d2 r2 r4 e4 c2 r4 e8 e8 fis2 r4 b8 b8 g8 g8 r4 b4 ~ b8 c8 a4 g4( d4 e4 a4 g4 d4 g4) r2 + r4 e8 e8 + \tsilence + r2 + \tsilence + r2 + << + { + \voiceOne + a2.( d,4) + } + { + \voiceTwo + g2.( d4) + } + >> + r1 + g2( bes4 c4) r2 r4 e,4( g4 bes4 c4 b4) r1 c,2( d2) r4 c4( f4 g4 d1 ~ d1) + } + >> + } + + bsilence = \relative c { + << + { + c4 g4 + } + { + f4 g4 + } + >> + r2 + } + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + c2 ees4( f4) r2 r4 g,4 c4 ees8 ees8 f4( ees4) r2 r4 bes4 aes2 r4 g'8 g8 f2 r2 c4 bes4 r4 c8 c8 bes4 r2 \times 2/3 { g'4 g4 a4 } f4 c4 ~ c4 r4 r2 f,4( g4) r4 f4 bes4 c4 g1 c2 ees4( f4) r2 + << + { + \voiceOne + e4( g4) bes4( c4) a8 c8 g2( f4) + } + { + \voiceTwo + g,4( c4) ees4( f4) a8 f8 c2( bes4) + } + >> + r4 r2 r4 a4 + << + { + \voiceOne + c2 r4 g'8 g8 e2. r4 d4 fis4 r4 d4( fis4) r4 \times 2/3 { a4 a4 b4 } \times 2/3 { g2 d4 ~ } d2 r2 e4( g4) + } + { + \voiceTwo + f,2 r4 c'8 c8 a2. r4 g4 b4 r4 g4( b4) r4 \times 2/3 { d4 d4 e4 } \times 2/3 { c2 g4 ~ } g2 r2 e'2 + } + >> + r4 a,4 d4 e4 b2. r4 r4 c4 ees4( f4) r2 r4 c4 ees4 bes8 bes8 g2 r2 r4 a4 f2 r4 a8 a8 <d a>2 r4 e8 e8 c8 c8 r4 r4 + << + { + \voiceOne + d8 e8 c4 + } + { + \voiceTwo + g8 a8 f4 + } + >> + c'4( g4 a4 + << + { + c4 c4 + } + { + f,4 c'4 + } + >> + g4) r4 r2 r4 a8 a8 + \bsilence + r2 + \bsilence + r2 + << + { + \voiceOne + c2.( g4) + } + { + \voiceTwo + f2.( g4) + } + >> + r1 c2( ees4 f4) r2 r4 g,4( c4 ees4 f4 ees4) + r1 d,2( e2) r4 d4( ges4 a4 e1 ~ e1) + } + >> + } + diff --git a/hr/michi/whitacre/both/stimmen_.ly b/hr/michi/whitacre/both/stimmen_.ly new file mode 100644 index 0000000..4b3c7d7 --- /dev/null +++ b/hr/michi/whitacre/both/stimmen_.ly @@ -0,0 +1,435 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + e2 g4( a4) + r2 g2 + g4 a8 a8 bes4( a4) + r2 r4 d,4 + c2 r4 b'8 b8 + a2( f2) ~ + f4 e4 d8( g8) + f8 f8 e4 r4 c'4( + \times 2/3 { b4) b4 c4 } a8( f8) e4 ~ + e4 r4 r4 c4 + c2 r4 c4 + d4 e4 + b1 + e2 g4( a4) + r4 + { + g4( c4 + g'4) g2 f8 f8 + f2( e4) + } \\ { + g,4( + c2) c2 + c8 f8 e2( + d4) + } + >> + r4 r2 + r4 e,4 <g f>2 + r4 <g' e>8 q8 <g eis>2. + r4 + { + d4 c4 b8( e8) + d4( cis4) r4 \times 2/3 { f4 f4 g4 } + } \\ { + cis,4 b4 b8( e8) cis4( + b4) r4 \times 2/3 { eis4 eis4 f4 } + } + >> + \times 2/3 { e4( c4) b4 ~ } b2 + r4 g4 e2 + r4 c4 f4 g4 + d2. + e4 ~ e2 g4( + a4) r2 e2 + g4 d8 d8 c4( d4) + r2 + r4 c4 <c b>2 + r4 e8 e8 + <e d>2 r4 g8 g8 + e4 c4 + r4 b'8 c8 a8( f8) e8( c8 ~ + c4. e8 g8 f4 c8 ~ + c4 d4) r2 + r4 c8 c8 <g' f>4 <d d>4 + r2 r4 b8( c8) + <g' f>4 <d d>4 r2 + r2 + << + { + g2.( + d4) + } \\ { + f2.( + d4) + } + >> + r1 + e2( g4 a4) + r2 g2( ~ + g4 a4 bes4 a4) + r2 r4 c,4 ~ + c1 + r4 c4( d4 e4 + b1 ~ + b1) + \bar "|." + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + d2 f4( g4) + r2 r4 d4 + e4 g8 g8 a4( g4) + r2 r4 c,4 + b2 r4 g'8 a8 + g4( c,4 f4 e4) ~ + e4 d4 r4 + e8 e8 d4 d8( e8 f8 g8 + \times 2/3 { a4) a4 b4 } g8( f8) d4 ~ + d4 r4 r2 + a4( b4) r4 a4 + c4 d4 + a1 + d2 f4( g4) + r4 g2 + << + { + \voiceOne + g4( + a4 b4) a8 a8 + } \\ { + \voiceTwo + g4 + a2 a8 a8 + } + >> + <c g>2( + <bes f>4) r4 r2 + r4 c,4 <e c>2 + r4 g8 g8 <b a>2. + r4 d,8( e8) f4 r4 + d8( e8 f4) a4 ~ \times 2/3 { a4 a4 b4 } + \times 2/3 { d4( c4) a4 ~ } + a2 r2 + << + { + \voiceOne + b4( c4) + } \\ { + \voiceTwo + b2 + } + >> + r4 b4 e4 f4 + c2. r4 + r4 d4 f4( g4) + r2 r4 d4 + f4 c8 c8 + b4( c4) r2 + r4 a4 <a g>2 + r4 c8 c8 <c a>2 + r4 fis8 fis8 + d4 c4 r4 a'8 b8 + g8( f8) d8( c8 + b4. c8 ~ c8 f8 e8 c8 ~ + c8 b8 c4) + r2 r4 c8 c8 + << + { + \voiceOne + e4 c4 + } \\ { + \voiceTwo + c4 c4 + } + >> + r2 r4 b8( c8) + << + { + \voiceOne + e4 c4 + } \\ { + \voiceTwo + c4 c4 + } + >> + r2 r2 + << + { + \voiceOne + e2.( c4) + } \\ { + \voiceTwo + c1 + } + >> + r1 + d2( f4 g4) + r2 r4 d4( + e4 g4 a4 g4) + r1 + a,2( b2) + r4 a4( c4 d4 + a1 ~ + a1) + } + >> + } + + tsilence = \relative c' { + << + { + \voiceOne + a4 d,4 + } + { + \voiceTwo + g4 d4 + } + >> + r2 + } + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + g2 b4( c4) + r2 r4 e,4 + g4 b8 b8 c4( b4) + r2 r4 f4 + e2 r4 d'8 d8 + c2. r4 + g4 f4 r4 + g8 g8 f4 g4( c4 + \times 2/3 { d4) d4 e4 } c4 g4 ~ + g4 r4 r2 + c,4( d4) r4 c4 + f4 g4 + d1 + g2 b4( c4) + r2 c4( e4) + g4( f4) << { \voiceOne f8 f8 } { \voiceTwo c8 f8 } >> + e2( + d4) r4 r2 + r4 e,4 + << + { + \voiceOne + g2 + r4 e'8 e8 e2. + } + { + \voiceTwo + f,2 r4 + c'8 c8 c2. + } + >> + r4 b4 d4 r4 + b4( d4) r4 \times 2/3 { f4 f4 g4 } + \times 2/3 { e2 b4 ~ } + b2 r2 + g4( a4) r4 e4 + a4 b4 f2. + r4 r4 g4 b4( + c4) r2 r4 + g4 b4 f8 f8 d2 + r2 r4 e4 + c2 + r4 e8 e8 f2 + r4 b8 b8 g8 g8 r4 + b4 ~ b8 c8 a4 g4( + d4 e4 + a4 g4 d4 g4) + r2 + r4 e8 e8 + \tsilence + r2 + \tsilence + r2 + << + { + \voiceOne + a2.( + d,4) + } + { + \voiceTwo + g2.( + d4) + } + >> + r1 + g2( b4 c4) + r2 r4 e,4( + g4 b4 c4 b4) + r1 + c,2( d2) + r4 c4( f4 g4 + d1 ~ + d1) + } + >> + } + + bsilence = \relative c' { + << + { + \voiceOne + c4 g4 + } + { + \voiceTwo + f4 g4 + } + >> + r2 + } + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + c2 e4( f4) + r2 r4 g,4 + c4 e8 e8 f4( e4) + r2 r4 b4 + a2 r4 g'8 g8 + f2 r2 + c4 b4 r4 + c8 c8 b4 r2 + \times 2/3 { g'4 g4 a4 } f4 c4 ~ + c4 r4 r2 + f,4( g4) r4 f4 + b4 c4 + g1 + c2 e4( f4) + r2 + << + { + \voiceOne + e4( + g4) b4( c4) a8 c8 + g2( f4) + } + { + \voiceTwo + g,4( + c4) e4( f4) a8 f8 + c2( b4) + } + >> + r4 r2 + r4 a4 + << + { + \voiceOne + c2 + r4 g'8 g8 e2. + r4 d4 + f4 r4 d4( f4) + r4 \times 2/3 { a4 a4 b4 } \times 2/3 { g2 d4 ~ } + d2 r2 + e4( g4) + } + { + \voiceTwo + f,2 + r4 c'8 c8 a2. + r4 g4 b4 r4 + g4( b4) + r4 \times 2/3 { d4 d4 e4 } \times 2/3 { c2 g4 ~ } + g2 r2 + e'2 + } + >> + r4 + a,4 d4 e4 b2. + r4 r4 + c4 e4( f4) r2 + r4 c4 + e4 b8 b8 g2 + r2 r4 a4 + f2 r4 a8 a8 + <d a>2 r4 e'8 e8 + c8 c8 r4 r4 + << + { + \voiceOne + d8 e8 + c4 + } + { + \voiceTwo + g8 a8 f4 + } + >> + c'4( + g4 a4 + << + { + \voiceOne + c4 c4 + } + { + \voiceTwo + f,4 c'4 + } + >> + g4) r4 + r2 r4 a8 a8 + \bsilence + r2 + \bsilence + r2 + << + { + \voiceOne + c2.( g4) + } + { + \voiceTwo + f2.( g2) + } + >> + r1 + c2( e4 f4) + r2 r4 g,4( + c4 e4 f4 e4) + r1 + d,2( e2) + r4 d4( g4 a4 + e1 ~ + e1) + } + >> + } + diff --git a/hr/michi/whitacre/both/texte.ly b/hr/michi/whitacre/both/texte.ly new file mode 100644 index 0000000..70c9503 --- /dev/null +++ b/hr/michi/whitacre/both/texte.ly @@ -0,0 +1,42 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + Stretched out, + stretched out on the grass + a boy and a girl + sa -- vouring + or -- an -- ges + giv -- ing their kiss -- es + waves ex -- chang -- ing foam. + Stretched out, + stretched out on the beach + a boy and a girl + sa -- vouring limes + giv -- ing their kiss -- es + clouds ex -- chang -- ing foam. + Stretched out, + stretched out un -- der -- ground + a boy and a girl + say -- ing noth -- ing + nev -- er kiss -- ing + giv -- ing si -- lence. si -- lence. + (mm) (mm) (mm) (mm) (mm) + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/whitacre/haukify b/hr/michi/whitacre/haukify new file mode 100644 index 0000000..857ed04 --- /dev/null +++ b/hr/michi/whitacre/haukify @@ -0,0 +1,385 @@ +#!/usr/bin/perl + +# preamble +use strict; +use warnings; +# elbmaerp +# +# program logic goes here + + my %lines = (); + my %defs = (); + my %feds = (); + my @skeleton = (); + my @rhf = (); + my @current; +{ # sub def scope + my $DEN = 256; + my $m = 0; + #my @voices = map { $_ . "Melodie" } ("sopran", "alt", "tenor", "bass"); + my $n = 0; + my $o = 0; + my @chunks; + my @measures; + { # scope for reading in <dynArt.ly> + my $lrd = 0; + my $inda = 0; + my $num; + my $den; + open(FH, "<dynArt.ly"); + while (<FH>) { + next if (/^\s*%/ or /override/ or /partial/ or /alternative/); + /{/; #vim bug + s/{[^}]*}//g; + if (/{/) { + $lrd += 1; + if ($lrd == 1) { + @measures = (); + $inda = 1 - $inda; + } + next; + } + next unless $inda; + if (/}/) { + $lrd -= 1; + if ($lrd == 0) { + if ($#measures == -1) { + } else { + my @bla = map $_, @measures; + push @chunks, \@bla; + } + $inda = 1 - $inda; + } + } + #push @measures, $DEN/$1 if /partial \D*(\d+)/; + if (/time (\d+)\/(\d+)/) { + $num = $1; + $den = $2; + while ($den < $DEN) { + $num *= 2; $den *= 2; + } + } + if (/^\s*s/) { + if (/s(\d+\.*)\*(\d+)\s*$/) { + my $times = ($2 and ($2 ne "")) ? $2 : 1; + my $dur = &duration($1); + push @measures, $dur for (1 .. $times); + } else { + my @code = split /\s+/; + my $num = 0; + for (@code) { + $num += &duration($_); + } + push @measures, $num; + } + } + } + } + my @fm = @{$chunks[0]}; + + my $idx = 0; + my $intimes = 0; + my $conc = 0; + + { # scope for &conc + my $cdur; + my $crud; + my $clev; + sub conc() { + return $_ if (/%/); + if (/^\s*{\s*$/) { + $clev += 1; + return $_; + } + if (/^\s*}\s*$/) { + $clev -= 1; + if ($cdur and $crud) { + $cdur = 0; $crud = 0; + } + return $_; + } + if ($clev == 1) { + my @code = split /\s*/; + my @tms = map { &duration($_) } @code; + if ($cdur) { + $crud += $_ for @code; + } else { + $cdur += $_ for @code; + } + if ($crud and $crud != $cdur) { + print STDERR "parallel parts don’t match: $.; $n\n"; + } + print STDERR "parallel parts don’t match dynArt: $.; $n\n" + if $cdur % $measures[$idx]; + return $_; + # recursive call of haukified w/ local counter and state vars! + } + } + } + sub min() { + my $a = shift; + my $b = shift; + return $a < $b ? $a : $b; + } + my $par = ""; + sub par() { + /{{/; # vim bug + $par =~ /{([^}]*)}\s*\\\\\s*{([^}]*)}/; + my (@c, @d); + @c = split(/\s+/, $1); + @d = split(/\s+/, $2); + my ($c, $d); + $c += &duration($_) for @c; + $d += &duration($_) for @d; + print STDERR "parallel mismatch in\n>>>$par\n" . ($c/$DEN) . " " . ($d/$DEN) . "\n" if ($c != $d); + return &min($c, $d); + } + { # scope for × + my $tnum; + my $tden; + my $tstr; + my $tdur = 0; + sub times() { + my $task = shift; + if ($task eq "start") { + $tnum = shift; + $tden = shift; + $tdur = 0; + $tstr = "\\times $tnum\/$tden "; + $intimes = 1 - $intimes; + } + if ($task eq "cont") { + my $code = shift; + $tstr .= $code . " "; + $tdur += &duration($code); + } + if ($task eq "stop") { + $intimes = 1 - $intimes; + return ($tstr, $tdur*$tnum/$tden); + #return ($tstr . "} ", $tdur*$tnum/$tden); + } + } + } + sub duration() { + return 0 unless(/\D*(\d+)(\.*).*/); + my ($den, $dots, $num) = ($1, $2, 1); + $num = 0 if (/</); + while ($dots) { + $num *= 2; + $den *= 2; + $num += 1; + chop($dots); + } + while ($den < $DEN) { + $num *= 2; $den *= 2; + } + print STDERR "bad duration: $1\n" unless ($den == $DEN); + return $num; + } + my $NUM = 0; + # one func to rule them all + sub haukified() { + if (/^\s*<<\s*$/) { + $conc += 1; + return $_; + } + if (/^\s*>>\s*$/) { + $conc -= 1; + return $_; + } + return &conc($_) if ($conc > 1); + local $, = "|"; + return $_ if (/%/ or /repeat/ or /time / or /clef/ or /partial/ or /version/); + s/times\s*/times/g; + #if (/times/) { + # $idx += 1 unless (length(@measures)<2); + # return $_; + #} + # time key -> dynArt + chomp $_; + #times, repeat & bla = { … }; partial! + # -> tokenstream vorbereiten (trb -> hooks) + # -> repeat ought to occur in dynArt as well + s/ ~/~/g; + /^(\s*)(.*)/; + my $indent = $1; + my @code = split(/\s+/, $2); + my @parts; + my $part = ""; + my $inpar = 0; + for (@code) { + if ($inpar) { + if (/>>/) { + $part .= "<< $par "; + $NUM += &par($par); + while ($NUM > $measures[$idx]) { + $NUM -= $measures[$idx]; + $idx += 1 if($measures[$idx + 1]); + #$measures[$idx] //= $measures[$idx-1]; + } + $par = ""; + $inpar = 0; + } else { + $par .= "$_ "; + next; + } + } + if (/<</) { + $inpar = 1; + next; + } + if ($intimes) { + /{/; #vim bug + if (/}/) { + my ($text, $dur) = ×("stop"); + $part .= $text; + $NUM += $dur; + my $tmp = $dur/$DEN; + } else { + ×("cont", $_); + next; + } + } + if (/times(\d+)\/(\d+)/) { + ×("start", $1, $2); + next; + } + $part .= "$_ "; + if (/^\\(\S+)$/) { + &align($defs{$1}, $1); + next; + } + /{/; #vim bug + $NUM += &duration($_) unless /}/; + if ($NUM > $measures[$idx]) { + print STDERR "error at measure " . ($idx+1) . " (local $m) in (orig) $o, (result) $n\n"; + print STDERR "$NUM out of $measures[$idx]\n"; + print STDERR "(occurred after reading $part)\n"; + } + unless ($NUM < $measures[$idx]) { + push @parts, $part; + $n += 1; + $idx += 1; + $m += 1; + $measures[$idx] //= $measures[$idx-1]; + $NUM = 0; + $part = $indent; + } + } + if ($part =~ /\S/) { + push @parts, $part; + print STDERR "underfull measure at (orig) $o, measure " . ($idx+1) . " (local $m) "; + print STDERR "$part?\n"; + print STDERR "$NUM out of $measures[$idx]\n"; + $idx += 1 unless ($#measures < 1); + $measures[$idx] //= $measures[$idx-1]; + } else { + $n -= 1; + #$idx -= 1 unless (length(@measures)<2); + } + my $res = $indent; + for (@parts) { + s/~/ ~/g; + $res .= $_ . "\n"; + } + return $res; + #return $indent . join("\n", map s/~/ ~/g, @parts); + } + #my $m; + my %aligned = (); + sub align { + my $bla = shift; + my @out = (); + my $name = shift; + my $oldm = $m; + $m = 1; # measure innerhalb dieser def + my $oldo = $o; + $o = $lines{$name}; + for (@$bla) { + if (/^\s*\\(\S+)\s*$/) { + unless (/voice/) { + print STDERR "$_"; + &align($defs{$1}, $1); + } + } + $n += 1; + push @out, $_ unless (/\d/); + #print &haukified($_), "\n" if /\d/; + $o += 1; + push @out, &haukified($_) if /\d/; + } + $m = $oldm; + $o = $oldo; + if ($aligned{$name}) { + my $match = 1; + for (0 .. &min(@out, @{$feds{$name}})) { + $match = 0 if $feds{$name}->[$_] != $out[$_]; + } + print STDERR "inconsistent use of $name …" unless $match; + } else { + @{$feds{$name}} = map $_, @out; + } + } + my $i = 0; + sub align_voice() { + #print STDERR "dynart exhausted before stimmen done!\n" unless ($#chunks > -1); + @measures = ($#chunks == -1) ? @fm : @{pop @chunks}; + $idx = 0; + $NUM = 0; + &align(@_); + $i += 1; + } + sub check() { + $o += @{$skeleton[$i]}; + for (keys %defs) { + &align_voice($defs{$_}, $_) if /Melodie/; + } + for (keys %defs) { + $feds{$_} //= $defs{$_}; + } + } + sub flush() { + for (0 .. $#rhf) { + print for @{$skeleton[$_]}; + print for @{$feds{$rhf[$_]}}; + } + print for @{$skeleton[$#rhf+1]}; + } +} + +my $inddef = ""; +my $def = 0; +while (<>) { + if ($def) { + /{/; #vim bug + if (/^$inddef}\s*$/) { + $def = 0; + my @bla = map $_, @current; + $defs{$rhf[$#rhf]} = \@bla; + @current = (); + } + } + if (/^(\s*)(\S*) = \\relative/) { + push @current, $_; + my @bla = map $_, @current; + push @skeleton, \@bla; + @current = (); + $inddef = $1; + push @rhf, $2; + $lines{$2} = $.; + $def = 1; #TODO: def zoix -> %def, später einbinden + # ds chunk -> begin orig, begin hauked + # TODO: conc innerhalb des taktes -> zwei gobble-ups, vgl, hinzufügen + next; + } + push @current, $_; +} + +{ # using the defs + my @bla = map $_, @current; + push @skeleton, \@bla; + &check(); + &flush(); +} + +# some settings # vim: et diff --git a/hr/michi/whitacre/haukify_ b/hr/michi/whitacre/haukify_ new file mode 100644 index 0000000..83cb531 --- /dev/null +++ b/hr/michi/whitacre/haukify_ @@ -0,0 +1,390 @@ +#!/usr/bin/perl + +# preamble +use strict; +use warnings; +# elbmaerp +# +# program logic goes here + + my %lines = (); + my %defs = (); + my %feds = (); + my @skeleton = (); + my @rhf = (); + my @current; +sub { # sub def scope + my $DEN = 256; # shortest duration glyph + my $measure = 0; + #my @voices = map { $_ . "Melodie" } ("sopran", "alt", "tenor", "bass"); + my $n = 0; + my $orig = 0; + my @chunks; + my @measures; + { # scope for reading in <dynArt.ly> + my $lrd = 0; + my $inside = 0; # are we inside a definition? + my $num; # numerator + my $den; # denominator + open(FH, "<dynArt.ly"); + while (<FH>) { + next if (/^\s*%/ or /override/ or /partial/ or /alternative/); + /{/; #vim bug + s/{[^}]*}//g; + if (/{/) { + $lrd += 1; + if ($lrd == 1) { + @measures = (); + $inside = 1 - $inside; + } + next; + } + next unless $inside; + if (/}/) { + $lrd -= 1; + if ($lrd == 0) { + if ($#measures == -1) { + } else { + my @bla = map $_, @measures; + push @chunks, \@bla; + } + $inside = 1 - $inside; + } + } + if (/time (\d+)\/(\d+)/) { # time signature change + $num = $1; + $den = $2; + while ($den < $DEN) { + $num *= 2; $den *= 2; + } + } + if (/^\s*s/) { + if (/s(\d+\.*)\*(\d+)\s*$/) { # multiple measures + #TODO: support s8*7*18 etc. + my $times = ($2 and ($2 ne "")) ? $2 : 1; + my $dur = &duration($1); + push @measures, $dur for (1 .. $times); + } else { # analogous to a melody + my @code = split /\s+/; + my $num = 0; + for (@code) { + $num += &duration($_); + } + push @measures, $num; + } + } + } + } + my @fm = @{$chunks[0]}; # first @measures + + my $idx = 0; + my $intimes = 0; + my $conc = 0; + + { # scope for &conc (concurrent music) + my $cdur; # duration + my $crud; # same for second part + my $clev; # manage sequential construct level (nesting curlies) + sub conc() { + return $_ if (/%/); # ignore comments + if (/^\s*{\s*$/) { + $clev += 1; + return $_; + } + if (/^\s*}\s*$/) { + $clev -= 1; + if ($cdur and $crud) { + $cdur = 0; $crud = 0; + } + return $_; + } + if ($clev == 1) { # ought to never be anything but 0 or 1 + # -> TODO: don’t rely on that + my @code = split /\s*/; + my @tms = map { &duration($_) } @code; + if ($cdur) { + $crud += $_ for @code; + } else { + $cdur += $_ for @code; + } + if ($crud and $crud != $cdur) { + print STDERR "parallel parts don’t match: $.; $n\n"; + } + print STDERR "parallel parts don’t match dynArt: $.; $n\n" + if $cdur % $measures[$idx]; + # TODO: don’t rely on the measure not to change inside conc music! + return $_; + # recursive call of haukified w/ local counter and state vars! + } + } + } + sub min() { + my $a = shift; + my $b = shift; + return $a < $b ? $a : $b; + } + my $par = ""; # parallel text inside &par + sub par() { # single line parallel music + /{{/; # vim bug + $par =~ /{([^}]*)}\s*\\\\\s*{([^}]*)}/; + my (@c, @d); + @c = split(/\s+/, $1); + @d = split(/\s+/, $2); + my ($c, $d); + $c += &duration($_) for @c; + $d += &duration($_) for @d; + print STDERR "parallel mismatch in\n>>>$par\n" + . ($c/$DEN) . " " . ($d/$DEN) . "\n" if ($c != $d); + return &min($c, $d); + } + { # scope for × (old-style tuple declaration) + my $tnum; # numerator + my $tden; # denominator + my $tstr; # resulting string + my $tdur = 0; # aggregate sum of nominal duration + sub times() { # simulating a FSM w/ outside states + # (basically a dispatcher w/ local memory) + my $task = shift; + if ($task eq "start") { + $tnum = shift; + $tden = shift; + $tdur = 0; + $tstr = "\\times $tnum\/$tden "; + $intimes = 1 - $intimes; + } + if ($task eq "cont") { + my $code = shift; + $tstr .= $code . " "; + $tdur += &duration($code); + } + if ($task eq "stop") { + $intimes = 1 - $intimes; + return ($tstr, $tdur*$tnum/$tden); + #return ($tstr . "} ", $tdur*$tnum/$tden); + } + } + } + sub duration() { # find a single note’s/a chord’s duration + return 0 unless(/\D*(\d+)(\.*).*/); # ignore anything w/o duration + my ($den, $dots, $num) = ($1, $2, 1); + $num = 0 if (/</); # chord -> TODO: just ignore + while ($dots) { + $num *= 2; + $den *= 2; + $num += 1; + chop($dots); + } + while ($den < $DEN) { + $num *= 2; $den *= 2; + } + print STDERR "bad duration: $1\n" unless ($den == $DEN); + return $num; + } + my $NUM = 0; # where am I in this measure? + # one func to rule them all + sub haukified() { # line-wise pretty-print definitions into arrays + if (/^\s*<<\s*$/) { # multi-line concurrent start + $conc += 1; + return $_; + } + if (/^\s*>>\s*$/) { # multi-line concurrent stop + $conc -= 1; + return $_; + } + return &conc($_) if ($conc > 1); + #local $, = "|"; + return $_ if (/%/ or /repeat/ or /time / or /clef/ or /partial/ or /version/); # pipe single-line instructions that don’t need to be matched + #if (/times/) { + # $idx += 1 unless ($#measures<2); + # return $_; + #} + # time key -> dynArt + chomp $_; + #times, repeat & bla = { … }; partial! + # -> tokenstream vorbereiten (trb -> hooks) + # -> repeat ought to occur in dynArt as well + s/times\s*/times/g; # this glues the numerator to 'times' + s/ ~/~/g; # this glues a tie to its left anchor, will be untied again + /^(\s*)(.*)/; + my $indent = $1; + my @code = split(/\s+/, $2); + my @parts; # prettified measures + my $part = ""; # current measure’s text + my $inpar = 0; # inside parallel section? + for (@code) { + if ($inpar) { + if (/>>/) { # parallel stop + $part .= "<< $par "; + $NUM += &par($par); + while ($NUM > $measures[$idx]) { + $NUM -= $measures[$idx]; + $idx += 1 if($measures[$idx + 1]); + #$measures[$idx] //= $measures[$idx-1]; + } + $par = ""; + $inpar = 0; + } else { + $par .= "$_ "; + next; + } + } + if (/<</) { # parallel start + $inpar = 1; + next; + } + if ($intimes) { + /{/; #vim bug + if (/}/) { # tuplet stop + # -> TODO: maybe support curlies inside tuplets + my ($text, $dur) = ×("stop"); + $part .= $text; + $NUM += $dur; + } else { + ×("cont", $_); + next; + } + } + if (/times(\d+)\/(\d+)/) { # tuplet start + ×("start", $1, $2); + next; + } + $part .= "$_ "; + if (/^\\(\S+)$/) { # definition start + &align($defs{$1}, $1); + next; + } + /{/; #vim bug + $NUM += &duration($_) unless /}/; + if ($NUM > $measures[$idx]) { # overfull measure + print STDERR "error at measure " . ($idx+1) . " (local $measure) in (orig) $orig, (result) $n\n"; + print STDERR "$NUM out of $measures[$idx]\n"; + print STDERR "(occurred after reading $part)\n"; + } + unless ($NUM < $measures[$idx]) { + push @parts, $part; + $n += 1; + $idx += 1; + $measure += 1; + $measures[$idx] //= $measures[$idx-1]; # for most simplistic dynArt + # as well as for errors + $NUM = 0; + $part = $indent; + } + } + if ($part =~ /\S/) { # still sth read left? + push @parts, $part; + print STDERR "underfull measure at (orig) $orig, measure " . ($idx+1) . " (local $measure) "; + print STDERR "$part?\n"; + print STDERR "$NUM out of $measures[$idx]\n"; + $idx += 1 unless ($#measures < 1); + $measures[$idx] //= $measures[$idx-1]; + } else { + $n -= 1; + #$idx -= 1 unless ($#measures<2); + } + my $res = $indent; + for (@parts) { + s/~/ ~/g; # undoing the gluing ;-) + $res .= $_ . "\n"; + } + return $res; + #return $indent . join("\n", map s/~/ ~/g, @parts); + } + my %aligned = (); + sub align { # match a def against the dynArt definition’s measures + my $bla = shift; + my @out = (); + my $name = shift; + my $oldm = $measure; + $measure = 1; # measure inside this def + my $oldorig = $orig; + $orig = $lines{$name}; # actual input file position + for (@$bla) { + if (/^\s*\\(\S+)\s*$/) { # call to another def + # -> TODO: beware of recursive calls + # well, we assume a sane user anyway … + unless (/voice/) { + print STDERR "$_"; # tell the caller we’re handling this + &align($defs{$1}, $1); + } + } + $n += 1; + $orig += 1; + push @out, $_ unless (/\d/); # pipe non-duration lines + #print &haukified($_), "\n" if /\d/; + push @out, &haukified($_) if /\d/; + } + $measure = $oldm; # restoring values … + $orig = $oldorig; + if ($aligned{$name}) { # already aligned this def + my $match = 1; + for (0 .. &min(@out, @{$feds{$name}})) { + $match = 0 if $feds{$name}->[$_] != $out[$_]; + } + print STDERR "inconsistent use of $name …" unless $match; + } else { + @{$feds{$name}} = map $_, @out; + } + } + my $i = 0; # index into @skeleton + sub align_voice() { # match a voice using &align + #print STDERR "dynart exhausted before stimmen done!\n" unless ($#chunks > -1); + @measures = ($#chunks == -1) ? @fm : @{pop @chunks}; + $idx = 0; + $NUM = 0; + &align(@_); + $i += 1; + } + sub check() { # overall handling of everything read from <stimmen.ly> + $orig += @{$skeleton[$i]}; + for (keys %defs) { + &align_voice($defs{$_}, $_) if /Melodie/; + } + for (keys %defs) { + $feds{$_} //= $defs{$_}; + } + } + sub flush() { + for (0 .. $#rhf) { + print for @{$skeleton[$_]}; + print for @{$feds{$rhf[$_]}}; + } + print for @{$skeleton[$#rhf+1]}; + } +} (); + +my $inddef = ""; +my $def = 0; +while (<>) { + if ($def) { + /{/; #vim bug + if (/^$inddef}\s*$/) { # def stop + $def = 0; + my @bla = map $_, @current; + $defs{$rhf[$#rhf]} = \@bla; + @current = (); + } + } + if (/^(\s*)(\S*) = \\relative/) { # def start + push @current, $_; + my @bla = map $_, @current; + push @skeleton, \@bla; + @current = (); + $inddef = $1; + push @rhf, $2; + $lines{$2} = $.; + $def = 1; #TODO: def zoix -> %def, später einbinden + # ds chunk -> begin orig, begin hauked + next; + } + push @current, $_; +} + +{ # using the defs + my @bla = map $_, @current; + push @skeleton, \@bla; + &check(); + &flush(); +} + +# some settings # vim: et diff --git a/hr/michi/whitacre/hide/dynArt.ly b/hr/michi/whitacre/hide/dynArt.ly new file mode 100644 index 0000000..423abff --- /dev/null +++ b/hr/michi/whitacre/hide/dynArt.ly @@ -0,0 +1,55 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key c \major + \partial 2 + \time 4/4 + s2 + s1*4 + \time 3/4 + s2.*2 + \break + \time 4/4 + s1 + \time 2/4 + s2 + \time 3/4 + s2. + \time 4/4 + s1*2 + s1*2 + \time 6/4 + s1. + \time 4/4 + s1 + \break + s1*3 + \time 5/4 + s4 s1 + \time 6/4 + s1. + \break + \time 4/4 + s1*6 + \break + s1*5 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/whitacre/hide/haukify.log b/hr/michi/whitacre/hide/haukify.log new file mode 100644 index 0000000..6ec0fe6 --- /dev/null +++ b/hr/michi/whitacre/hide/haukify.log @@ -0,0 +1,77 @@ +4 +5 +dynart exhausted before stimmen done! +6 +7 +8 +9 +10 +dynart exhausted before stimmen done! +11 +dynart exhausted before stimmen done! +dynart exhausted before stimmen done! +Use of uninitialized value in numeric gt (>) at ../haukify line 159, <> line 18. +error at (orig) 18, (result) 18 +Use of uninitialized value in numeric lt (<) at ../haukify line 162, <> line 18. +underfull measure at (orig) 18, (result) 19 64 out of 256 +dynart exhausted before stimmen done! +error at (orig) 19, (result) 23 +error at (orig) 19, (result) 26 +error at (orig) 19, (result) 28 +error at (orig) 19, (result) 30 +error at (orig) 19, (result) 32 +error at (orig) 19, (result) 34 +error at (orig) 19, (result) 39 +error at (orig) 19, (result) 45 +error at (orig) 19, (result) 49 +error at (orig) 19, (result) 53 +underfull measure at (orig) 19, (result) 64 0 out of 256 +12 +13 +14 +dynart exhausted before stimmen done! +15 +dynart exhausted before stimmen done! +dynart exhausted before stimmen done! +underfull measure at (orig) 30, (result) 75 128 out of 256 +dynart exhausted before stimmen done! +error at (orig) 31, (result) 79 +error at (orig) 31, (result) 82 +error at (orig) 31, (result) 86 +error at (orig) 31, (result) 88 +error at (orig) 31, (result) 89 +error at (orig) 31, (result) 104 +error at (orig) 31, (result) 105 +16 +17 +18 +dynart exhausted before stimmen done! +19 +dynart exhausted before stimmen done! +dynart exhausted before stimmen done! +underfull measure at (orig) 43, (result) 123 128 out of 256 +dynart exhausted before stimmen done! +error at (orig) 44, (result) 127 +error at (orig) 44, (result) 134 +error at (orig) 44, (result) 140 +error at (orig) 44, (result) 141 +error at (orig) 44, (result) 145 +20 +21 +22 +dynart exhausted before stimmen done! +23 +dynart exhausted before stimmen done! +dynart exhausted before stimmen done! +underfull measure at (orig) 56, (result) 170 128 out of 256 +dynart exhausted before stimmen done! +error at (orig) 57, (result) 174 +error at (orig) 57, (result) 177 +error at (orig) 57, (result) 180 +error at (orig) 57, (result) 185 +error at (orig) 57, (result) 191 +error at (orig) 57, (result) 192 +error at (orig) 57, (result) 206 +24 +25 +26 diff --git a/hr/michi/whitacre/hide/hide.ly b/hr/michi/whitacre/hide/hide.ly new file mode 100644 index 0000000..dbba6b7 --- /dev/null +++ b/hr/michi/whitacre/hide/hide.ly @@ -0,0 +1,72 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "I hide myself" + composer = "Eric Whitacre" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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) + + 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 } << + \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/michi/whitacre/hide/midi.lua b/hr/michi/whitacre/hide/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/whitacre/hide/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/michi/whitacre/hide/stimmen.ly b/hr/michi/whitacre/hide/stimmen.ly new file mode 100644 index 0000000..25e07f9 --- /dev/null +++ b/hr/michi/whitacre/hide/stimmen.ly @@ -0,0 +1,61 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + e4( g4) + aes2. g4 g2 e4( g4) \times 2/3 { aes2 bes4 } c8 d8 ees8 d8 \times 2/3 { c2( f,4) } f4 g4 g8 g8 \times 2/3 { g2 g4 } <g f>2 r4 ees2 r4 ees8 ees8 ees8( bes'8) bes4 ~ bes2 d8 bes8 aes4 aes4 bes4 c4 des2 b4.( bes8) a4 a4 r4 c,8( des8) \times 2/3 { des4( ees4) ees4 } f2 f4 aes4 aes2 ees2 e2 r2 r2 r4 c4 f4 bes4 ees4. des8 \times 2/3 { des4( c4) bes4 } \times 2/3 { c2 f4 } << { \voiceOne ges4( ~ \times 2/3 { ges4 f4) ees4 } } \\ { \voiceTwo f4 ~ \times 2/3 { f2 ees4 } } >> \times 2/3 { d4( c4) bes4 } \times 2/3 { aes4( ges4) f4 } f2. f4 \times 2/3 { aes4( ges4) f4 } \times 2/3 { aes4( ges4) f4 } f4( ges2.) ees2 r4 ees8 ees8 d4( ees4) f2 ges4. f8 f8( des8) \times 2/3 { bes'8 f8 ees8 } des4 des4 des4 ges4 << { ges1 ~ ges1 ~ ges1 ~ ges1 ~ ges1 } \\ { des2. ees4 ees2. ces4 ces2. ces4 ces2 ces2 bes1 } >> + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + e4( g4) + aes2. g4 g2 e4( g4) \times 2/3 { g4( f4) f4 } g4 bes4 ~ \times 2/3 { bes4 f4 f4 } e4 f4 f16( e16) d16 e16 ~ \times 2/3 { e4 f4 e4 } ees2 r4 aes,4( bes4) r4 aes8 bes8 bes4 c4 c8( d8) d8 ees8 ees8 f8 ges8( f8) ees8( des8) d4 e4 ges4( f2) <b b,>8( <bes bes,>8) <f c>4 <ees des>4 r4 c4 c4 c4 \times 2/3 { c4( ees4) des4 } c2 \times 2/3 { bes4( c4) des4 } \times 2/3 { des4( c4) bes4 } c2 r2 r2 r4 c4 c4 f4 f4 f4 f4 f4 \times 2/3 { bes4( a4) c4 } d4 r2 r2 ges,4 ees4 d2. r4 <ees c>4 <d c>4 <ees c>4 <d c>4 d4 ees4 ees2 aes,4( bes4) r4 bes8 c8 bes2 bes2 bes4. aes8 aes8( des8) \times 2/3 { f8 ees8 des8 } ces4. bes8 bes4 ges'4 des4. des8 ces4 ees4 des4( ces8) bes8 ces4 ces4 \times 2/3 { bes4( aes4) des4 } aes4 des4 d2. e4 des1 + } + >> + } + + tenorMelodie = \relative c { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + r2 + r1 r2 e4( g4) \times 2/3 { <e' c>2 d4 } d2 \times 2/3 { d4 c4 aes4 } g4 c4 c8 c8 \times 2/3 { d4( c4) d4 } ees4( d4) r4 f,2 r4 f8 f8 f8( g8) aes4 aes8( bes8) bes8 c8 c8 aes8 bes4 aes8( bes8) c8( bes8) aes8( bes8) b2 b4.( bes8) a4 g4 r4 a4 a4 a4 \times 2/3 { g2 aes4 } \times 2/3 { bes4( aes4) ges4 } \times 2/3 { f4( ees4) f4 } \times 2/3 { f4( ees4) <f des>4 } <g c,>2 r2 r4 g4 bes4( aes4 g4 aes4 bes4) c4 c4 des4 ees4 f4 f4 r2 r2 ees4 aes,4 bes2. r4 bes4 bes4 bes4 bes4 bes4 bes4 bes2 c,4( d4) r4 d8 ees8 f2 ees4( d4) ees4 f4 ges4 f4 aes4 ges4 f2 ees4( f4) ees2 ees4( f4) ees2 ees4( f4) ees4 aes4 aes1 ~ aes1 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r2 + r1 r2 e4( g4) \times 2/3 { f2 g4 } f2 \times 2/3 { <f bes,>4 <f aes,>4 <f bes,>4 } q4 \times 2/3 { bes8( a8 g8) } g8 g8 \times 2/3 { g2 a4 } f2 r4 c4( d4) r4 c8 d8 d4 ees4 ~ ees2. ees2 ees4 ees4 ees2. b'8( bes8) f4 f4 r4 f4 <f bes,>4 q4 \times 2/3 { bes,4( c4) bes4 } aes2 ges4 ges4 ges4 ges4 f2 r4 c'4 des1 ~ des2 des2 ees2 f4( a4) bes4 r2 r2 R1. ges4 aes4 ges4 aes4 ees4 ees4 <f ees>2 << { c4( d4) } \\ { f,2 } >> r4 <d' f,>8 <ees f,>8 <f g,>2 << { ees4( d4) ees4 f4 ges4 f4 } \\ { g,2 aes2 aes2 } >> <aes' bes,>4 <ges bes,>4 <f bes,>2 << { ees4( f4) ees2 ees4( f4) ees2 ees4( f4) } \\ { ges,2 ges2 ges2 ges2 ges2 } >> <ees' ges,>4 q4 <des ges,>1 ~ q1 + } + >> + } + diff --git a/hr/michi/whitacre/hide/stimmen_.ly b/hr/michi/whitacre/hide/stimmen_.ly new file mode 100644 index 0000000..c4a45fa --- /dev/null +++ b/hr/michi/whitacre/hide/stimmen_.ly @@ -0,0 +1,211 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + e4( + g4) + aes2. g4 + g2 e4( g4) + \times2/3 { aes2 + bes4 } c8 d8 ees8 d8 \times2/3 + { c2( f,4) } f4 + g4 g8 g8 \times2/3 + { g2 g4 } <g f>2 + r4 ees2 r4 + ees8 ees8 ees8( bes'8) bes4 ~ bes2 + d8 bes8 aes4 aes4 bes4 + c4 des2 b4.( + bes8) a4 a4 r4 c,8( + des8) \times2/3 { des4( ees4) + ees4 } f2 f4 + aes4 aes2 ees2 + e2 r2 + r2 r4 c4 + f4 bes4 ees4. des8 + \times2/3 { des4( c4) + bes4 } \times2/3 { c2 + f4 } << { ges4( ~ \times2/3 + { ges4 f4) ees4 } } { f4 ~ + \times2/3 { f2 + ees4 } } >> \times2/3 { d4( + c4) bes4 } \times2/3 + { aes4( ges4) f4 } f2. + f4 \times2/3 { aes4( + ges4) f4 } \times2/3 + { aes4( ges4) f4 } f4( + ges2.) ees2 + r4 ees8 ees8 d4( ees4) + f2 ges4. f8 + f8( des8) \times2/3 { bes'8 f8 + ees8 } des4 des4 des4 ges4 + << { ges1 ~ + ges1 ~ + ges1 ~ + ges1 ~ + ges1 + } { des2. ees4 + ees2. ces4 + ces2. ces4 + ces2 ces2 + bes1 + } >> + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + e4( g4) + aes2. g4 + g2 e4( g4) + \times2/3 { g4( f4) + f4 } g4 bes4 ~ \times2/3 + { b4 f4 f4 } e4 + f4 f16( e16) d16 e16 ~ \times2/3 + { e4 f4 e4 } ees2 + r4 aes,4( bes4) r4 + aes8 bes8 bes4 c4 c8( d8) + d8 ees8 ees8 f8 ges8( f8) ees8( des8) + d4 e4 ges4( f2) + <b b,>8( <bes bes,>8) <f c>4 <ees des>4 r4 + c4 c4 c4 \times2/3 + { c4( ees4) des4 } c2 + \times2/3 { bes4( c4) + des4 } \times2/3 { des4( + c4) bes4 } c2 + r2 r2 + r4 c4 c4 f4 + f4 f4 f4 f4 + \times2/3 { bes4( a4) + c4 } d4 r2 + r2 ges,4 ees4 + d2. r4 + <ees c>4 <d c>4 <ees c>4 <d c>4 + d4 ees4 ees2 + aes,4( bes4) r4 bes8 c8 + bes2 bes2 + bes4. aes8 aes8( des8) \times2/3 + { f8 ees8 des8 } ces4. bes8 bes4 + ges'4 des4. des8 ces4 + ees4 des4( ces8) bes8 ces4 + ces4 \times2/3 { bes4( + aes4) des4 } aes4 des4 + d2. e4 + des1 + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + r2 + r1 + r2 e4( g4) + \times2/3 { <e' c>2 + d4 } d2 \times2/3 + { d4 c4 aes4 } g4 + c4 c8 c8 \times2/3 + { d4( c4) d4 } ees4( + d4) r4 f,2 + r4 f8 f8 f8( g8) aes4 + aes8( bes8) bes8 c8 c8 aes8 bes4 + aes8( bes8) c8( bes8) aes8( bes8) b2 + b4.( bes8) a4 g4 + r4 a4 a4 a4 + \times2/3 { g2 + aes4 } \times2/3 { bes4( + aes4) ges4 } \times2/3 + { f4( ees4) f4 } \times2/3 + { f4( ees4) <f des>4 } <g c,>2 + r2 r4 g4 + bes4( aes4 g4 aes4 + bes4) c4 c4 des4 + ees4 f4 f4 r2 + r2 ees4 aes,4 + bes2. r4 + bes4 bes4 bes4 bes4 + bes4 bes4 bes2 + c,4( d4) r4 d8 ees8 + f2 ees4( d4) + ees4 f4 ges4 f4 + aes4 ges4 f2 + ees4( f4) ees2 + ees4( f4) ees2 + ees4( f4) ees4 aes4 + aes1 ~ + aes1 + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + r2 + r1 + r2 e4( g4) + \times2/3 { f2 + g4 } f2 \times2/3 + { <f bes,>4 <f aes,>4 <f bes,>4 } q4 + \times2/3 { bes8( a8 g8) } g8 + g8 \times2/3 { g2 + a4 } f2 r4 + c4( d4) r4 c8 d8 + d4 ees4 ~ ees2. + ees2 ees4 ees4 + ees2. b'8( bes8) + f4 f4 r4 f4 + <f bes,>4 q4 \times2/3 + { bes,4( c4) bes4 } aes2 + ges4 ges4 ges4 ges4 + f2 r4 c'4 + des1 ~ + des2 des2 + ees2 f4( a4) + bes4 r2 r2 + R1. + ges4 aes4 ges4 aes4 + ees4 ees4 <f ees>2 + << { c4( d4) } { f,2 + } >> r4 <d f,>8 <ees f,>8 <f g,>2 + << { ees4( d4) ees4 f4 + ges4 f4 } { g,2 + aes2 aes2 + } >> <aes bes,>4 <ges bes,>4 <f bes,>2 + << { ees4( f4) ees2 + ees4( f4) ees2 + ees4( f4) } { ges,2 + ges2 ges2 + ges2 ges2 + } >> <ees ges,>4 q4 <des ges,>1 ~ + q1 + } + >> + } + diff --git a/hr/michi/whitacre/hide/texte.ly b/hr/michi/whitacre/hide/texte.ly new file mode 100644 index 0000000..c97c47a --- /dev/null +++ b/hr/michi/whitacre/hide/texte.ly @@ -0,0 +1,36 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + I hide my -- self with -- in my flow’r, + That wear -- ing on your breast, + You, un -- sus -- pect -- ing, + you, un -- sus -- pect -- ing, + wear me, wear me too + And an -- gels, and an -- gels, + an -- gels, an -- gels, + an -- gels know the rest. + I hide, I hide, I hide, I hide + in my flow’r, + fad -- ing, fad -- ing from your vase, + You, un -- sus -- pect -- ing, + feel for me a lone -- li -- ness. + I hide, I hide, I hide my -- self. + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/whitacre/lily/dynArt.ly b/hr/michi/whitacre/lily/dynArt.ly new file mode 100644 index 0000000..db4061c --- /dev/null +++ b/hr/michi/whitacre/lily/dynArt.ly @@ -0,0 +1,120 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + \key fis \minor + \time 4/4 + s1*2 + \bar "||" + s1 + \time 6/8 + s8*6 + \time 2/4 + s2 + \time 8/8 + s1 + \time 3/4 + s2. + \time 6/8 + s2. + \time 2/4 + s2 + \time 6/8 + s2. + \time 2/4 + s2 + \time 6/8 + s2. + \time 3/4 + s2. + \time 6/8 + s2. + \time 2/4 + s2 + \time 6/8 + s2. + \time 3/4 + s2. + \time 6/8 + s2. + \time 4/4 + s1 + \time 6/8 + s2. + \time 5/4 + s4*5 + \time 4/4 + s1 + \time 8/8 + s1 + \time 6/8 + s2. + \time 4/4 + s1 + \time 6/8 + s2. + \time 3/4 + s2. + \time 6/8 + s2. + \time 4/4 + s1 + \break + s1*8 + \time 8/8 + s1 + \time 2/4 + s2 + \time 8/8 + s1 + \time 3/4 + s2. + \time 8/8 + s1 + \time 3/4 + s2. + \time 6/4 + s1. + \time 4/4 + s1 + \time 3/4 + s2.*3 + \time 4/4 + s1 + \bar "||" + \key cis \major + s1*6 + \bar "||" + \key fis \minor + s1*2 + \bar "||" + s1 + \time 6/8 + s2. + \time 2/4 + s2 + \time 6/8 + s2. + \time 3/4 + s2. + \time 8/8 + s1*2 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/whitacre/lily/lily.ly b/hr/michi/whitacre/lily/lily.ly new file mode 100644 index 0000000..c0a3d90 --- /dev/null +++ b/hr/michi/whitacre/lily/lily.ly @@ -0,0 +1,72 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "With a lily in your hand" + composer = "Eric Whitacre" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 16) + + 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 } << + \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/michi/whitacre/lily/midi.lua b/hr/michi/whitacre/lily/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/whitacre/lily/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/michi/whitacre/lily/stimmen.ly b/hr/michi/whitacre/lily/stimmen.ly new file mode 100644 index 0000000..7980695 --- /dev/null +++ b/hr/michi/whitacre/lily/stimmen.ly @@ -0,0 +1,232 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + cis4 r4 cis4 fis4 e2 fis2 fis,8 fis8 r4 r2 cis4 cis8 cis4 cis8 d8 d8 e4 fis4. + << + { + a4. d4 e4 a,4 b4 ais8 r8 r8 ais4 ais8 b4 cis4 ais8 ais8 ais8 ais8 ais8 ais8 b8 b8 cis4 + } \\ + { + a8 g8 a8 a4 cis4 a4 g4 fis8 r8 r8 fis4 fis8 g4 a4 fis8 fis8 fis8 fis8 fis8 fis8 g8 g8 a4 + } + >> + r2. r4 fis4 cis'4 e4. d4. cis4 fis4 cis2. ~ cis2 fis4 e4.( d4.) cis4 r4 fis,4 d'4 d8 r8 r8 cis4.( ~ cis2 ais4 fis4) e8 e8 d8 d8 r4 r4 e8 e8 d8 d8 r8 d4. e4 cis4. d4. cis2. cis4 d4. a'4.( b4 cis4) a4 a4. gis4. ~ gis2. ~ gis4 ~ gis2 r2 + \times 2/3 { cis4 fis4 b,4 } \times 2/3 { ais4( gis4 fis4) } \times 2/3 { gis8 a8 gis8 ~ } gis2. ~ gis8 ais8 ais8 b8 \times 2/3 { a4( gis4) fis4 } <gis fis>2 \times 2/3 { a4( b4) cis4 } \times 2/3 { cis4 b4 cis4 } \times 2/3 { e4( dis4) fis,4 } \times 2/3 { e4 dis4 e4 ~ } \times 2/3 { e2 cis'4 } \times 2/3 { e4( d4) cis4 } \times 2/3 { e4( d4) cis4 } b8 r8 r8 ais4 ais4 ais8 b8 b8 fis4 fis4. + << + { + a4. d4 e4 a,4 e'4 d4. b4. d4 a'4 d,4 b4 ais8 + } \\ + { + a8 gis8 a8 a4 cis4 a4 cis4 d4. b8 a8 b8 b4 b4 b4 b4 ais8 + } + >> + r8 r2 r4 cis4 fis4 e4. fis16( e16) e4( d4) + cis4. b8 a4 b4( a4 g4) fis2. cis'2 \times 2/3 { cis4( b4) d4 } + cis2 \times 2/3 { cis4 ais4 fis4 } bis4. bis8 bis2 r4 cis4 \times 2/3 { cis4( eis4) ais,4 } bis4. bis8 bis2 r1 r4 dis4 \times 2/3 { dis4( e4) dis4 } + \times 2/3 { d2 d4 } \times 2/3 { d2 e4 } \times 2/3 { fis2 e4 } \times 2/3 { a4 g2 } fis1 ~ fis2. ~ fis2 fis8 fis8 fis8 fis8 fis8 fis8 a4 a4 g4 fis8 fis8 fis8 r4. + << + { + fis4( \glissando \parenthesize b8) + } \\ + { + fis4 ~ fis8 + } + >> + r8 r4 r2 + } + >> + } + + altTriole = \relative c' { + \times 2/3 { d8 fis8 gis8 } + } + altMelodie = \relative c'' { + << + { \meta } + %\altArt + %the actual tune + { + a4 r4 a4 a4 a2 b2 ais8 ais8 r4 r2 ais,4 ais8 ais4 ais8 cis4 cis8 d8 fis8 e8 fis8 e8 e8 d8 fis8 fis8 a4 e4 d4 cis8 r8 r8 cis4 cis8 d4 e4 cis8 r8 r8 cis4 cis8 d8 d8 e4 d8 r8 r8 d4 d8 d4 e4 fis4 fis4 fis8 fis4 fis8 fis4 fis4 fis4 fis8 fis4 fis8 g4 a4 g4 fis4 fis8 fis4 fis8 fis8 fis8 r4 fis4 + << + { + b4 b8 r8 r8 ais4.( ~ ais2 fis4 cis4) + } \\ + { + fis4 fis8 r8 r8 fis4.( ~ fis2 ~ fis4 cis4) + } + >> + cis8 cis8 cis8 cis8 r4 r4 cis8 cis8 cis8 cis8 r8 cis4. cis4 b4. b4. ais2. cis4 cis4. + << + { + b4.( cis4 d4) d4 d4. e4. ~ e1 + } \\ + { + b4.( cis2) cis4 cis4. cis4. ~ cis1 + } + >> + \repeat unfold 8 \altTriole + \times 2/3 { e8 fis8 e8 } \times 2/3 { fis8 e8 fis8 } e32 fis32 e8. ~ e4 + \repeat unfold 3 \altTriole + fis4 \times 2/3 { e4( d4) e4 } + << + { + \times 2/3 { fis4( gis4 a4) } \times 2/3 { a4 gis4 a4 } \times 2/3 { cis4( b4) fis4 } + } \\ + { + \times 2/3 { d4( e4 fis4) } \times 2/3 { e4 dis4 e4 } \times 2/3 { a4( fis4) fis4 } + } + >> + \times 2/3 { e4 dis4 e4 ~ } \times 2/3 { e2 e4 } \times 2/3 { g4( fis4) e4 } \times 2/3 { a4( fis4) e4 } + << + { + g8 r8 r8 fis4 fis4 fis8 fis4 fis8 fis8 + } \\ + { + d8 r8 r8 cis4 cis4 cis8 d4 d8 e8 + } + >> + fis8 e8 fis8 e8 e8 d8 fis8 fis8 a4 e4 a4 g1 g4 a4 g4 fis8 r8 fis1 cis'4 d4 d4 d2 + a4. a8 e4 g4( fis4 e4) dis8( cis8 dis2) r4 cis'4 \times 2/3 { cis4( b4) d4 } + cis2 \times 2/3 { cis4 ais4 fis4 } + << + { + gis4. gis8 gis2 r4 ais4 ais4 fis4 gis4. gis8 gis2 + } \\ + { + dis4. dis8 dis2 r4 fis4 fis4 fis4 dis4. dis8 dis2 + } + >> + r1 r4 <bis' gis>4 q4 q4 + << + { + \times 2/3 { b2 b4 } \times 2/3 { b2 b4 } \times 2/3 { cis4( b4) cis4 } \times 2/3 { b4( cis4) e4 } + dis1 ~ dis2. ~ dis2 dis8 dis8 dis8 dis8 dis8 dis8 e4 e4 e4 dis8 dis8 dis8 r4. dis4 ~ dis8 r8 r4 r2 + } \\ + { + \times 2/3 { fis,2 fis4 } \times 2/3 { fis2 fis4 } \times 2/3 { a4( b4) cis4 } \times 2/3 { b2 b4 } b1 ~ b2. ~ b2 b8 b8 b8 b8 b8 b8 b4 b4 b4 b8 b8 b8 r4. b,4( \glissando b'8) r8 r4 r2 + } + >> + } + >> + } + + tenorTriolen = \relative c' { + \times 2/3 { ais8 cis8 ais8 } + \times 2/3 { cis8 ais8 cis8 } + } + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + fis4 r4 e4 e4 e2 <fis e>2 fis8 fis8 r4 r2 fis,4 fis8 fis4 fis8 fis8 fis8 fis4 a8 a8 a8 a8 a8 a8 a8 b8 cis4 cis4 b4 ais8 r8 r8 ais4 ais8 b4 cis4 ais8 r8 r8 ais4 ais8 b8 b8 cis4 cis8 r8 r8 cis4 cis8 cis4 cis4 d4 e4 e8 d4 d8 cis4 b4 ais4 ais8 ais4 ais8 b4 cis4 d4 e4 e8 d4 d8 cis8 cis8 r4 fis,4 e'4 e8 r8 r8 cis4.( ~ cis2 ~ cis4 fis,4) fis8 fis8 fis8 fis8 r4 r8 fis8 ~ fis8 fis8 fis8 fis8 r8 fis4. fis4 gis4. gis4. gis2. b4 a4. b4.( a4 b4) cis4 b4. ais4. ~ ais1 ~ + \repeat unfold 4 \tenorTriolen + \times 2/3 { b8 d8 b8 } \times 2/3 { d8 b8 d8 } \times 2/3 { b8 d8 b8 } b32 d32 b8.( ais4) \times 2/3 { cis8 ais8 cis8 } \times 2/3 { ais8 cis8 ais8 } cis4 \times 2/3 { c4( b4) c4 } \times 2/3 { c2( d4) } \times 2/3 { cis4 b4 cis4 } \times 2/3 { cis4( e4) dis4 } \times 2/3 { cis4 b4 b4 ~ } \times 2/3 { b2 cis4 } \times 2/3 { e4( d4) cis4 } \times 2/3 { e4( d4) cis4 } b8 r8 r8 ais4 ais4 b8 cis8 cis8 b4 a8 a8 a8 a8 a8 a8 a8 b8 cis4 d4 e4 fis8 fis8 fis8 e8 e8 e8 d8 d8 b4 b4 d4 cis8 r8 r4 cis2. fis4 fis4 fis4 fis2 + e4 cis4 cis4 b4.( cis8 b8 a8) fis2. cis'2 \times 2/3 { cis4( b4) d4 } + cis4 cis4 cis4 cis4 cis4. cis8 cis2 r4 cis4 cis4 cis4 cis4. cis8 cis2 r4 + << + { + \voiceOne + cis4 cis4 cis4 bis4. bis8 + } + \new Voice { + \voiceTwo + ais4 ais4 ais4 gis4. gis8 + } + >> + \oneVoice + bis4 dis4 + \times 2/3 { cis2 d4 } \times 2/3 { e4( d4) e4 } \times 2/3 { fis4( d4) e4 } \times 2/3 { fis4( a4) g4 } fis1 fis8 fis8 fis8 fis8 fis8 fis8 a8 a8 g4 fis8 r8 r8 fis4 fis8 g4 g4 a4 fis8 fis8 fis8 r4. fis,4( \glissando fis'8) r8 r4 r2 + } + >> + } + + bassTriolen = \relative c { + \times 2/3 { fis8 gis8 fis8 } + \times 2/3 { gis8 fis8 gis8 } + } + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + << + { + cis4 r4 fis,4 gis4 b4( e4) dis2 + } \\ + { + fis,4 r4 fis4 fis4 fis2 b2 + } + >> + <cis fis,>8 q8 r4 r2 <cis, fis,>4 q8 q4 q8 b8 b8 b4 d8 d8 d8 d8 d8 d8 d8 d8 + << + { + e4 e4 d4 cis8 r8 r8 cis4 cis8 d4 e4 cis8 r8 r8 cis4 cis8 d8 d8 e4 fis8 r8 r8 fis4 fis8 fis4 fis4 fis4 a4 a8 a4 a8 fis4 fis4 cis4 cis8 cis4 cis8 d4 e4 fis4 a4 a8 a4 a8 b8 b8 + } \\ + { + a,4 a4 g4 fis8 r8 r8 fis4 fis8 g4 a4 fis8 r8 r8 fis4 fis8 g8 g8 a4 b8 r8 r8 b4 b8 b4 b4 b4 d4 d8 d4 d8 b4 b4 fis4 fis8 fis4 fis8 g4 a4 b4 d4 d8 d4 d8 e8 e8 + } + >> + r4 fis4 b4 g8 r8 r8 fis4.( ~ fis2 ~ fis4 cis4) ais8 ais8 b8 b8 r4 r4 cis8 cis8 b8 b8 r8 b4. b4 <cis fis,>4. q4. q2. q4 <d g,>4. q4.( b4 e4) g4 fis4. fis4. ~ fis1 ~ + \repeat unfold 4 \bassTriolen + \times 2/3 { d8 e8 fis8 } \times 2/3 { d8 e8 fis8 } \times 2/3 { d8 e8 fis8 } \times 2/3 { d8 e8 fis8 ~ } \bassTriolen + \times 2/3 { fis8 gis8 fis8 } <ais fis>4 \times 2/3 { <a d,>2 d,4 } \times 2/3 { e4( fis4 a4) } \times 2/3 { a4 gis4 a4 } \times 2/3 { a4( cis4) b4 } \times 2/3 { a4 fis4 a4 ~ } \times 2/3 { a2 a4 } + << + { + \times 2/3 { b2 b4 } \times 2/3 { b2 g4 } g8 r8 r8 fis4 cis4 cis8 fis8 fis8 fis4 + } \\ + { + \times 2/3 { g4( fis4) e4 } \times 2/3 { d4( b4) g4 } g8 r8 r8 fis4 fis8 fis8 b8 b8 b4 + } + >> + d8 d8 d8 d8 d8 d8 d8 d8 <e a,>4 q4 e4 <b' e,>8 q8 q8 q8 q8 q8 e,8 e8 + << + { + d4 d4 d4 cis8 + } \\ + { + g4 g4 g4 fis8 + } + >> + r8 r4 r4 fis'2 fis4 b4 b4 b2 + a4. b8 a4 g4( fis4 e4) b2. r4 cis'4 \times 2/3 { cis4( b4) d4 } + cis4 cis4 cis4 ais4 <ais fis>4. q8 q2 r4 q4 q4 q4 q4. q8 q2 r4 fis4 \times 2/3 { fis4( cis4) <cis fis,>4 } <dis gis,>4. q8 q4 q4 + << + { + \times 2/3 { fis2 fis4 } \times 2/3 { fis2 g4 } + } \\ + { + \times 2/3 { b,4( cis4) d4 } \times 2/3 { e4( fis4) g4 } + } + >> + \times 2/3 { a4( b4) cis4 } \times 2/3 { d4( e4) <fis e>4 } + << + { + dis1 dis8 dis8 dis8 dis8 dis8 dis8 e8 e8 e4 dis8 r8 r8 dis4 dis8 dis4 dis4 dis4 dis8 dis8 dis8 r4. cis4( \glissando e8) + } \\ + { + b1 b8 b8 b8 b8 b8 b8 b8 b8 b4 b8 r8 r8 b4 b8 b4 b4 b4 b8 b8 b8 r4. b,4( \glissando b'8) r8 r4 r2 + } + >> + } + >> + } + diff --git a/hr/michi/whitacre/lily/texte.ly b/hr/michi/whitacre/lily/texte.ly new file mode 100644 index 0000000..806cf68 --- /dev/null +++ b/hr/michi/whitacre/lily/texte.ly @@ -0,0 +1,61 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + } + + laIII = \lyricmode { + la la la + } + laIV = \lyricmode { + la la la la + } + tenorText = \lyrics { + %<+hier den Text für den Tenor eintragen+> + O! O my night love! la la + la la la la la la la + \laIII \laIII la la + \laIII la + la la la la la + la_la la + \laIII la + la la \laIII \laIV la la + \laIV \laIII \laIV la la + O my night love! + Lit -- tle wid -- ow, + __lit -- tle wid -- ow of my sin -- gle star + I find you, + I find you ooh _ \repeat unfold 10 { _ _ _ } + but -- ter -- flies ooh _ _ _ _ _ + my way, my way. + Af -- ter a thou -- sand years have gone, + you’ll see me, + O my night love! la la + la la la + \laIII \laIII la la + \laIII \laIII \laIII la la + \laIII la + By the blue foot -- path, + tam -- er of dark stars, + I’ll make my way. + Un -- til the u -- ni -- verse, + un -- til the u -- ni -- verse, + un -- til the u -- ni -- verse, + the u -- ni -- verse can fit in -- side my heart. + \laIII \laIII la la la la + la la \laIII \laIII + la_(ah) + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/whitacre/marriage/dynArt.ly b/hr/michi/whitacre/marriage/dynArt.ly new file mode 100644 index 0000000..33097fd --- /dev/null +++ b/hr/michi/whitacre/marriage/dynArt.ly @@ -0,0 +1,50 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \override BreathingSign.text = \markup { \musicglyph #"scripts.caesura.straight" } + \dynamicUp + \key e \major + %\time 4/4 + s4*7 + \bar "" %\break + s4*11 + \bar "" \break + s4*10 + \bar "" \pageBreak + s4*9 + \bar "" %\break + s4*6 + \bar "" \break + s4*8 + \bar "" %\break + s4*14 + \bar "" \break + s4*9 + \bar "" %\break + s4*15 + \breathe + \bar "" \break + s4*11 + \bar "" \break + s4*10 + %\bar "" \break + s4*12 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/whitacre/marriage/marriage.ly b/hr/michi/whitacre/marriage/marriage.ly new file mode 100644 index 0000000..a35c7d9 --- /dev/null +++ b/hr/michi/whitacre/marriage/marriage.ly @@ -0,0 +1,74 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "This marriage" + composer = "Eric Whitacre" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \paper { + line-width = \paper-width - 30 + top-margin = 10 + bottom-margin = 10 + ragged-last-bottom = #'f + system-count = 11 + } + + \layout { + indent = #0 + \context { + \Staff + \override VerticalAxisGroup #'minimum-Y-extent = #'(-3 . 3.5) + } + } + + #(set-global-staff-size 15) + + 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 } << + \set Score.timing = ##f + \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/michi/whitacre/marriage/midi.lua b/hr/michi/whitacre/marriage/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/whitacre/marriage/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/michi/whitacre/marriage/stimmen.ly b/hr/michi/whitacre/marriage/stimmen.ly new file mode 100644 index 0000000..c326c24 --- /dev/null +++ b/hr/michi/whitacre/marriage/stimmen.ly @@ -0,0 +1,101 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sopranMelodie = \relative c'' { + << + { \meta } + %\sopranArt + %the actual tune + { + gis8[ b8] b4 b8[ b8] \times 2/3 { e,4 e4 e8([ gis8)] } gis4 gis4 + r8 e8 gis8[ b8] dis16([ e8.)] a,4 r4 e4 dis4 b'4 cis,4 cis2 + r4 cis8[ cis8] e8[ e8] gis8[ gis8] fis8[ fis8] a4 gis8[ e8] dis4 dis2 + r4 gis8[ e8] fis8[ fis8] a4 e'4. e8 fis,4 fis2 + r8 fis8 d'8[ cis8] cis8[ fis,8] fis8[ dis8] dis8[ e8] e4 + r4 e8[ e8] fis8[ fis8] a4. a8 \times 2/3 { gis8[ gis8 e8] } fis4 fis4 + r8 fis8 a2 gis4 e8[ fis8] fis4 r4 fis4( cis'2) b4 gis4 fis4 fis4 + r4 ais8[ ais8] bis8[ bis8] cis8[ eis8] fis,8([ ais8)] ais4 ais8[ cis8] dis,8([ fis8)] fis4 + r8 fis8 \times 2/3 { fis4 fis4 fis4 } \times 2/3 { e4 e4 e4 } b'4 b8[ cis8] cis,2 e2 fis1 + \times 2/3 { gis4 gis4 gis8[ b8] } b4 b16[ b16] b4 b8 b8[ b8] \times 2/3 { e,4 e4 e8[ e16( gis16)] } gis4 gis2 + r8 e8( gis8[ b8] dis16[ e8.] a,4) r4 e4( dis4 b'4 cis,4 cis4) + r4 cis8([ cis8] e8[ e8] gis8[ gis8] fis8[ fis8] a4 gis8[ e8] dis4 dis1) + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + e8[ gis8] gis4 gis8[ gis8] \times 2/3 { cis,4 cis4 cis4 } e4 e4 + r8 cis8[ e8] gis8 b4 fis4 r4 cis4 b4 gis'4 a,4 a2 + r4 a8[ a8] cis8[ cis8] e8[ e8] d8[ d8] fis4 e8[ cis8] b4 b2 + r4 e8[ cis8] d8[ d8] fis4 cis'4. cis8 d,4 d2 + r8 d8 b'8[ a8] a8[ d,8] d8[ b8] b8[ cis8] cis4 + r4 cis8[ cis8] d8[ d8] fis4. fis8 \times 2/3 { e8[ e8 cis8] } d4 d4 + r8 d8 fis2 e4 cis8[ d8] d4 r4 d4( a'2) gis4 e4 dis4 dis4 + r4 fis8[ fis8] ais8[ ais8] ais8[ cis8] dis,4 fis4 fis8[ fis8] b,4 dis4 + r8 dis8 \times 2/3 { dis4 dis4 dis4 } \times 2/3 { cis4 cis4 cis4 } gis'4 gis8[ gis8] a,2 cis2 dis1 + \times 2/3 { e4 e4 e8[ e8] } gis4 gis16[ gis16] gis4 gis8 gis8 gis8 \times 2/3 { cis,4 cis4 cis8[ cis8] } e4 e2 + r8 cis8( e8[ gis8] b4 fis4) r4 cis4( b4 gis'4 a,4 a4) + r4 a8([ a8] cis8[ cis8] e8[ e8] dis8[ dis8] fis4 e8[ cis8] b4 b1) + } + >> + } + + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + b8[ dis8] dis4 dis8[ dis8] \times 2/3 { gis,4 gis4 gis4 } b4 b4 + r8 gis8 b8[ dis8] fis4 cis4 r4 gis4 fis4 dis'4 e,4 e2 + r4 e8[ e8] gis8[ gis8] b8[ b8] a8[ a8] cis4 b8[ gis8] fis4 fis2 + r4 b8[ gis8] a8[ a8] cis4 gis'4. gis8 a,4 a2 + r8 a8 fis'8[ e8] e8[ a,8] a8[ fis8] fis8[ gis8] gis4 + r4 gis8[ gis8] a8[ a8] cis4. cis8 \times 2/3 { b8[ b8 gis8] } a4 a4 + r8 a8 cis2 b4 gis8[ a8] a4 r4 a4( e'2) dis4 b4 ais4 ais4 + r4 cis8[ cis8] eis8[ eis8] eis8[ eis8] ais,4 cis4 cis8[ cis8] fis,4 ais4 + r8 ais8 \times 2/3 { ais4 ais4 ais4 } \times 2/3 { gis4 gis4 gis4 } dis'4 dis8[ dis8] e,2 gis2 fis1 + \times 2/3 { b4 b4 b8[ b8] } dis4 dis16[ dis16] dis4 dis8 dis8[ dis8] \times 2/3 { gis,4 gis4 gis8[ gis8] } b4 b2 + r8 gis8( b8[ dis8] fis4 cis4) r4 gis4( fis4 dis'4 e,4 e4) + r4 e8([ e8] gis8[ gis8] b8[ b8] a8[ a8] cis4 b8[ gis8] fis4 fis1) + } + >> + } + + bassMelodie = \relative c { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + e8[ gis8] gis4 gis8[ gis8] \times 2/3 { cis,4 cis4 cis4 } e4 e4 + r8 cis8[ e8] gis8 b4 fis4 r4 cis4 b4 gis'4 a,4 a2 + r4 a8[ a8] cis8[ cis8] e8[ e8] d8[ d8] fis4 e8[ cis8] b4 b2 + r4 e8[ cis8] d8[ d8] fis4 cis'4. cis8 d,4 d2 + r8 d8 b'8[ a8] a8[ d,8] d8[ b8] b8[ cis8] cis4 + r4 cis8[ cis8] d8[ d8] fis4. fis8 \times 2/3 { e8[ e8 cis8] } d4 d4 + r8 d8 fis2 e4 cis8[ d8] d4 r4 d4( a'2) gis4 e4 dis4 dis4 + r4 fis8[ fis8] ais8[ ais8] ais8[ cis8] dis,4 fis4 fis8[ fis8] b,4 dis4 + r8 dis8 \times 2/3 { dis4 dis4 dis4 } \times 2/3 { cis4 cis4 cis4 } gis'4 gis8[ gis8] a,2 cis2 b1 + \times 2/3 { e4 e4 e8[ e8] } gis4 gis16[ gis16] gis4 gis8 gis8[ gis8] \times 2/3 { cis,4 cis4 cis8[ cis8] } e4 e2 + r8 cis8( e8[ gis8] b4 fis4) r4 cis4( b4 gis'4 a,4 a4) + r4 a8([ a8] cis8[ cis8] e8[ e8] d8[ d8] fis4 e8[ cis8] b4 b1) + } + >> + } + diff --git a/hr/michi/whitacre/marriage/texte.ly b/hr/michi/whitacre/marriage/texte.ly new file mode 100644 index 0000000..7b59c9b --- /dev/null +++ b/hr/michi/whitacre/marriage/texte.ly @@ -0,0 +1,33 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + May these vows and this mar -- riage be bless -- ed. + May it be sweet milk, like wine and hal -- vah. + May this mar -- riage of -- fer fruit and shade like the date palm. + May this mar -- riage be full of laugh -- ter, + our eve -- ry day a day in par -- a -- dise. + May this mar -- riage be a sign of com -- pas -- sion, + a seal of hap -- pi -- ness, here and here -- af -- ter. + May this mar -- riage have a fair face and a good name, + an o -- men as wel -- comes the moon in a clear blue sky. + I am out of words to de -- scribe how spi -- rit min -- gles in the mar -- riage. + ah ooh ooh + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + diff --git a/hr/michi/whitacre/rose/dynArt.ly b/hr/michi/whitacre/rose/dynArt.ly new file mode 100644 index 0000000..06540fc --- /dev/null +++ b/hr/michi/whitacre/rose/dynArt.ly @@ -0,0 +1,63 @@ +%some settings% vim: ai sw=2 lbr nu et + + meta = { + %(dynamic) marks global to all voices + %\override Staff.TimeSignature #'style = #'() + \dynamicUp + %\key fis \major + \key dis \minor + \time 4/4 + s1*2 + \time 6/4 + s1. + \time 4/4 + s1*9 + \time 6/4 + s1. + \time 4/4 + s1*2 + \time 6/4 + s1. + \time 4/4 + s1 + \break + s1*8 + \bar "||" + \break + \key cis \major + s1*6 + \time 3/2 + s1.*2 + \time 4/2 + s1*2 + \time 3/2 + s1.*2 + \time 4/4 + s1*2 + \break + s1*4 + \bar "||" + s1*4 + \break + s1*5 + \time 6/4 + s1. + \time 4/4 + s1*3 + \bar "|." + } + +% articulation + + sopranArt = { + } + + altArt = { + } + + tenorArt = { + } + + bassArt = { + } + diff --git a/hr/michi/whitacre/rose/midi.lua b/hr/michi/whitacre/rose/midi.lua new file mode 100644 index 0000000..8aef7d6 --- /dev/null +++ b/hr/michi/whitacre/rose/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/michi/whitacre/rose/rose.ly b/hr/michi/whitacre/rose/rose.ly new file mode 100644 index 0000000..6e8e38f --- /dev/null +++ b/hr/michi/whitacre/rose/rose.ly @@ -0,0 +1,80 @@ +%some settings% vim: ai sw=2 lbr nu et + +\version "2.14" +\include "stimmen.ly" +\include "texte.ly" + +\pointAndClickOff + + \header { + title = "Go, lovely rose" + composer = "Eric Whitacre" + %opus = "<+Werk+>" + tagline = \markup { + \bold "studentenchor" + } + } + + \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 } << + \new Staff = soloS { \global \sSoloMelodie } + \new Staff = sopran { \sop } + \new Staff = alt { \alt } + \new Staff = soloT { \global \tSoloMelodie } + \new Staff = tenor { \ten } + \new Staff = tlow { \global \tLowMelodie } + \new Staff = bass { \bas } + >> + %\midi { + %\context{ + %\Score + %tempoWholesPerMinute = #(ly:make-moment 72 4) + %} + %} + \layout { + \context { + \Staff + \RemoveEmptyStaves + \override VerticalAxisGroup #'remove-first = ##t + } + } + } + diff --git a/hr/michi/whitacre/rose/stimmen.ly b/hr/michi/whitacre/rose/stimmen.ly new file mode 100644 index 0000000..fdd3089 --- /dev/null +++ b/hr/michi/whitacre/rose/stimmen.ly @@ -0,0 +1,343 @@ +%some settings% vim: ai sw=2 lbr nu et + + \version "2.12" + \include "dynArt.ly" + + global = { + %\autoBeamOff + } + +% Die Stimmen + + sSoloMelodie = \relative c'' { + << + { \meta } + %\tenorArt + %the actual tune + { + \time 4/4 + s1*2 + \time 6/4 + s1. + \time 4/4 + s1*9 + \time 6/4 + s1. + \time 4/4 + s1*2 + \time 6/4 + s1. + \time 4/4 + s1*6 + dis8.( e16 dis4. cis8) fis8 gis8 dis8. e16 dis2 cis4 <gis' \parenthesize dis>1 + } + >> + } + sopranMelodie = \relative c' { + << + { \meta } + %\sopranArt + %the actual tune + { + b4( cis4 dis4 eis4) fis4. gis8 eis2 ~ eis4 r4 r4 fis4 \times 2/3 { cis'4( ais4) gis4 } gis4. ais8 fis4 eis4 dis2. dis4 + << + { + b2 cis4 fis4 ~ fis2 + } \\ + { + b,2 b2 b2 + } + >> + \times 2/3 { dis4 cis4 dis4 } \times 2/3 { ais'4( b4) gis4 } fis4 cis4 + dis2. dis4 gis4( b4) r2 r1 r1 + b,8( dis8) eis8( gis8) ais4.( b8 ais4) dis4 cis2( b4) ais4 \times 2/3 { b2 b4 } \times 2/3 { ais2 ais4 } \times 2/3 { gis2 gis4 } gis2 fis4 gis4 fis2. r4 + r4 b,4 cis4 dis4 + << + { + eis4. fis8 ~ fis2 eis4. dis8 ~ dis2 eis4. fis8 ~ fis2 eis4. dis8 ~ dis2 + } \\ + { + e1 ~ e1 ~ e1 ~ e1 + } + >> + e4( gis4) gis4 gis4 e4 gis4 gis4 cis4 dis1 + cis,2 cis4 dis4 dis2 dis4( fis4) fis2 fis2 fis2 <ais fis>2 gis2 gis2 fis1 + fis2 r2 r2 r1. r1 r4 d4 c4 d4 dis4( eis4 fis4) eis4 fis4 gis4 ~ gis4 gis4 + << + { + gis2( ais2) ais4 b4 cis4 eis4 fis4( eis2.\fermata) + } \\ + { + gis,1 ais4 b4 gis4 cis4 fis4( eis4 dis2\fermata) + } + >> + r4 cis4 <cis b>2 ~ q1 ~ q1 q2 q2 + r4 cis,4 fis4 ais4 b4 cis4 fis,4 cis4 dis2 + << + { + fis2 fis1 + } \\ + { + dis2 b1 + } + >> + r1 r1 b4( cis4) dis4 eis4 fis4. gis8 eis4 eis4 eis4 eis4 fis4 gis4 ais4 dis4 cis1 cis2 cis2 ~ cis1 ~ cis1 + } + >> + } + + altMelodie = \relative c' { + << + { \meta } + %\altArt + %the actual tune + { + << + { + b4( cis4 + dis4 eis4) + } \\ + { + s2 dis2 + } + >> + <eis dis>4. q8 dis4( cis4 dis4) dis4 \times 2/3 { ais'4( fis4) eis4 } dis4 eis4 + cis4. cis8 cis4 cis4 cis2( b4) ais4 gis2 ais4 ais4 \times 2/3 { b4 ais4 b4 } fis'4 b,4 b2 b2 b2. b4 dis4( <gis e>4) r4 gis4 fis4 cis4 e4 fis4 dis1 + b8( dis8) eis8( gis8) <gis eis>2( dis4) fis4 fis2 r2 \times 2/3 { b4( ais4) gis4 } \times 2/3 { ais4( gis4) fis4 } \times 2/3 { gis4( fis4) e4 } e2 dis4 dis4 dis2. r4 + r4 b4 cis4 cis4 + << + { + cis4. dis8 ~ dis2 cis4. b8 ~ b2 cis4. dis8 ~ dis2 cis4. b8 ~ b2 + } \\ + { + cis1 ~ cis1 ~ cis1 ~ cis1 + } + >> + << + { + e4( gis4) gis4 gis4 e4 gis4 gis4 gis4 gis1 + } \\ + { + e2 e4 cis4 e4 e4 gis4 fis4 eis1 + } + >> + cis2 cis4 dis4 dis2 dis4( fis4) eis2 eis2 eis2 eis2 dis2 dis2 dis2( eis2) eis4( dis4) r2 r2 r1. a4( b4) c4 b4 c4 d4 c4 d4 + << + { + d2. dis4 + } \\ + { + d1 + } + >> + d2 d4 d4 fis1 fis4 fis4 fis4 gis4 gis4( ais4 <cis b>2\fermata) + r4 cis4 b4 ais4 <ais fis>1 ~ q1 q2 q2 + r4 cis,4 cis4 cis4 cis4 fis4 cis4 cis4 cis4( b4) ais4( b4) + << + { + ais4.( gis8 ~ gis2) + } \\ + { + ais1 + } + >> + r4 b'4 ais4 fis4 dis1 ~ dis2 dis4 <eis dis>4 q4. q8 dis4 cis4 dis4 eis4 + << + { + fis4 fis4 fis4 fis4 fis1 fis2 + } \\ + { + eis4 eis4 cis4 cis4 eis1 eis2 + } + >> + fis2 ~ fis1 ~ fis1 + } + >> + } + + tSoloMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \time 4/4 + s1*2 + \time 6/4 + s1. + \time 4/4 + s1*9 + \time 6/4 + s1. + \time 4/4 + s1*2 + \time 6/4 + s1. + \time 4/4 + s1 + r1 r2 r4 e4 fis8( cis'8) cis4 dis8( e16 dis16 cis8) b8 cis4. gis'8 gis2 ~ gis1 + } + >> + } + tenorMelodie = \relative c' { + << + { \meta } + %\tenorArt + %the actual tune + { + \clef "treble_8" + b4( cis2.) cis4. cis8 b4( ais4 b4) gis4 b4 ais4 \times 2/3 { b4( gis4) fis4 } eis4. eis8 gis4 gis4 fis2. fis4 e2 fis2 gis1 + << + { + \voiceOne + gis2 ais2 ais2. fis4 b2 + } + \new Voice { + \voiceTwo + e,4( fis4) fis2 fis2. fis4 fis2 + } + >> + r2 r1 r1 + b8( dis4.) dis2( b4) b4 b2( dis4) cis4 + << + { + \voiceOne + \times 2/3 { dis2 dis4 } \times 2/3 { dis2 dis4 } \times 2/3 { dis2 dis4 } dis4( cis4) b4 ais4 b2. + } + \new Voice { + \voiceTwo + \times 2/3 { dis4( cis4) b4 } \times 2/3 { cis4( b4) ais4 } \times 2/3 { b4( ais4) gis4 } fis2 fis4 fis4 fis2. + } + >> + r4 + r4 b4 cis4 cis4 + << + { + \voiceOne + cis4. dis8 ~ dis2 cis4. b8 ~ b2 cis4. dis8 ~ dis2 cis4. b8 ~ b2 + } + \new Voice { + \voiceTwo + cis1 ~ cis1 ~ cis1 ~ cis1 + } + >> + cis4( dis4) e4 dis4 cis4 dis4 e4 cis4 <dis cis>1 + cis2 cis4 cis4 cis2 <dis cis>2 cis2 cis2 dis2 cis2 cis2 <cis bis>2 + << + { + \voiceOne + cis1 cis4( b4) + } + \new Voice { + \voiceTwo + ais2( gis2) fis2 + } + >> + r2 r2 dis4( eis4) fis4( gis4) fis4 gis4 a1 ~ a2. a4 a4 ais4 a2. a4 ~ a4 a4 b2( cis2) cis4 dis4 eis4 fis4 fis1 r1 r4 cis4 <cis b>2 ~ q1 q2 q2 + r4 b4 ais4 b4 fis4 fis4 ais4 eis4 fis2 gis2 + << + { + \voiceOne + fis4.( e8 ~ e2) + } + \new Voice { + \voiceTwo + fis1 + } + >> + r1 r1 b4( cis4) cis4 cis4 cis4. cis8 b4 ais4 b4 gis4 + << + { + \voiceOne + ais4 ais4 b4 b4 cis4( dis4 cis2) cis2 cis2 cis2 bis2( ais1) + } + \new Voice { + \voiceTwo + gis4 gis4 gis4 gis4 gis1 cis2 cis2 ais2 gis2( fis1) + } + >> + } + >> + } + tLowMelodie = \relative c'' { + << + { \meta } + %\tenorArt + %the actual tune + { + \time 4/4 + s1*2 + \time 6/4 + s1. + \time 4/4 + s1*9 + \time 6/4 + s1. + \time 4/4 + s1*2 + \time 6/4 + s1. + \time 4/4 + s1 + r4 b4 b4 b4 + << + { + a4. b8 ~ b2 a4. fis8 ~ fis2 a4. b8 ~ b2 a4. fis8 ~ fis2 + } \\ + { + a1 ~ a1 ~ a1 ~ a1 + } + >> + } + >> + } + + bassMelodie = \relative c' { + << + { \meta } + %\bassArt + %the actual tune + \clef bass + { + b1 b4. b8 gis4( b,4 gis'4) fis4 eis4 dis4 cis4 b4 ais4. ais8 ais4 ais4 b2. b4 b2 cis2 dis1 b2 cis2 <dis gis,>2. gis,4 gis4( a4) r2 r1 r1 + b'2 b2( e,4) e4 dis2 r2 + << + { + dis4 dis4 dis4 dis4 + } \\ + { + gis,4 gis4 fis4 fis4 + } + >> + cis'4 cis4 cis2 e4 dis4 <dis gis,>2. r4 + r4 b'4 b4 b4 + << + { + ais4. b8 ~ b2 ais4. fis8 ~ fis2 ais4. b8 ~ b2 ais4. fis8 ~ fis2 + } \\ + { + a1 ~ a1 ~ a1 ~ a1 + } + >> + a4( b4) cis4 b4 a4 b4 cis4 ais4 gis1 + cis2 cis4 cis4 bis2 ais2 gis2 gis2 fis2 fis2 eis2 eis2 dis2( cis2) b4( cis4) dis4( cis4) dis4( e4) dis4( eis2.) dis4 fis4 ~ fis2. gis4 fis4 eis4 fis2 b,4 b4 ais2 cis2 eis4 fis4 gis4( ais2.) b4 + << + { + b4 cis4 cis4 cis2( dis2\fermata) + } \\ + { + gis,4 ais4 b4 ais4( cis2.\fermata) + } + >> + r1 r2 r4 dis,4 <dis gis,>1 q2 q2 ~ q2 q4 q4 ais4 ais4 ais4 ais4 b2 b2 <b e,>1 r1 r1 + b'2 b4 b4 b4. b8 gis4 b,4 gis'4 gis4 gis4 cis,4 b4 b4 cis1 r1 <cis fis,>2 q2 ~ q1 + << + { + } \\ + { + } + >> + } + >> + } + diff --git a/hr/michi/whitacre/rose/texte.ly b/hr/michi/whitacre/rose/texte.ly new file mode 100644 index 0000000..5ec123a --- /dev/null +++ b/hr/michi/whitacre/rose/texte.ly @@ -0,0 +1,45 @@ +%some settings% vim: ai sw=2 lbr nu 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+> + Go, love -- ly rose, + Tell her, tell her + that wastes her time + and me, + that now she knows, + her to thee. + How sweet + Tell her that’s young + And shuns to have her gra -- ces spied, + gra -- ces spied, + That hadst thou spru -- ng. _ _ _ _ _ _ + Thou must have un -- com -- mend -- ed died. + Small is the worth + Of beau -- ty from the light re -- tired; + Bid, forth, + Suf -- fer her -- self + to be de -- sired, + And not blush so to be ad -- mired. + Then die, then die, + that she the com -- mon fate of all things rare. + How small a part of time they share, + that are so won -- drous sweet + and fair, and fair! + } + + bassText = \lyrics { + %<+hier den Text für den Baß eintragen+> + } + |