summaryrefslogtreecommitdiff
path: root/hr/kammer/debussy/tabourin/midi.lua
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2014-09-10 17:47:07 +0200
committerErich Eckner <git@eckner.net>2014-09-10 17:47:07 +0200
commit49d14358c33b7d0ba7e7c381f91943617c7723ea (patch)
treefd55f0d3900d53978587d2228553359f86e69bbe /hr/kammer/debussy/tabourin/midi.lua
parent646f69a657326ca8dd733dfa579a90f89823d677 (diff)
downloadMusik-49d14358c33b7d0ba7e7c381f91943617c7723ea.tar.xz
Hauke eingefügt
Diffstat (limited to 'hr/kammer/debussy/tabourin/midi.lua')
-rw-r--r--hr/kammer/debussy/tabourin/midi.lua50
1 files changed, 50 insertions, 0 deletions
diff --git a/hr/kammer/debussy/tabourin/midi.lua b/hr/kammer/debussy/tabourin/midi.lua
new file mode 100644
index 0000000..f8b2520
--- /dev/null
+++ b/hr/kammer/debussy/tabourin/midi.lua
@@ -0,0 +1,50 @@
+ -- some settings -- vim: ai sw=2 lbr nu encoding=utf8 et
+
+pre=[[
+%some settings% vim: ai sw=2 lbr nu encoding=utf8 et
+
+\version "2.12"
+\include "stimmen.ly"
+
+ \score {
+]]
+
+post=[[
+ \midi {
+ \context{
+ %\Score
+ %tempoWholesPerMinute = #(ly:make-moment 72 4)
+ }
+ }
+ }
+]]
+
+voices={ "s", "a", "t", "b" }
+expand = { s="sopran", a="alt", t="tenor", b="bass" }
+map = { sopran="soprane", alt="alti", tenor="tenoere", bass="baesse" }
+
+function text(stimme)
+ return
+[[
+ \new Staff = ]]..stimme..[[ <<
+ %\new Voice = "meta" { s1*<+Anzahl der Takte+> \bar "|." }
+ \new Voice = "]]..map[stimme]..[[" { \global \]]..stimme..[[Melodie }
+ >>
+]]
+end
+
+function err() print("oops") os.exit() end
+
+which=which or "satb"
+if type(which)~="string" then err() end
+
+for _,v in pairs(voices) do
+ if string.find(which, v) then pre=pre..text(expand[v]) end
+end
+
+input=pre..post
+
+--os.execute(lilypond -...)
+io.stdout:write(input)
+os.exit()
+