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/cantate/midi.lua | |
parent | 646f69a657326ca8dd733dfa579a90f89823d677 (diff) | |
download | Musik-49d14358c33b7d0ba7e7c381f91943617c7723ea.tar.xz |
Hauke eingefügt
Diffstat (limited to 'hr/michi/cantate/midi.lua')
-rw-r--r-- | hr/michi/cantate/midi.lua | 53 |
1 files changed, 53 insertions, 0 deletions
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() + |