this will do it, but i dont know how to get the timesig numbers to
respect my beat. it turns 8/8 intp 4/4 etc.
define process quint(durs)
run for d in durs
for n from 60
send "fms:meas", dur: d, beat: 1/8
send "fms:note", part: "pno", dur: d, pitch: n
wait d
end
begin
with parts = {{:id "pno" :name "Piano" :inst "piano"}}
sprout quint({8 7 6 5 4 3}), "quint.ly",
parts: parts, clear: #t, run: #t
end
On Dec 29, 2009, at 9:31 AM, Johannes Quint wrote:
> this is my old question: what is the code to generate the following
> via grace/fomus:
>
> <pastedGraphic.png>
>
> thanks for hints,
> johannes_______________________________________________
> Cmdist mailing list
> [email protected]
> http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist
_______________________________________________
Cmdist mailing list
[email protected]
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist