<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta content="text/html;charset=ISO-8859-1" http-equiv="Content-Type">
</head>
<body bgcolor="#ffffff" text="#000000">
The default behavior should be to follow the power-of-two rule--This
looks like a bug, the irregular meters (5/8, 7/8) are confusing it a
bit and causing bad note-value decisions. Thanks for pointing this
out, I'll have a fix for this by next release<br>
<br>
<br>
<a class="moz-txt-link-abbreviated" href="mailto:andersvi@extern.uio.no">andersvi@extern.uio.no</a> wrote:
<blockquote cite="midm3zm5q7cg2.fsf@iannis.localdomain" type="cite">
<blockquote type="cite">
<blockquote type="cite">
<blockquote type="cite">
<blockquote type="cite">
<blockquote type="cite">
<pre wrap="">" " == Kilian Sprotte <a class="moz-txt-link-rfc2396E" href="mailto:ml13@onlinehome.de"><ml13@onlinehome.de></a> writes:
</pre>
</blockquote>
</blockquote>
</blockquote>
</blockquote>
</blockquote>
<pre wrap=""><!---->
> Try this: :)
That worked. Great!
Fomus seems to present a very important working-level between CM and
notation-clients, especially concerning quantization and voice-leading
algorithms.
I have a feeling my hands will get very wet with fomus-code in some
time, but for now ill send the questions to this group to look for
obvious answers etc.
Related to the recent posts about 3/8 meters: various books on
notation quarrel about how to notate tuplets, but some kinds of
n-tuplets in fomus turn out strange. Heres some code where durations
gradually get longer approaching one whole beat, but the note-values
vary wildly. Is this a bug or a feature? If a feature, how to
control which notated rhythmic values are chosen for particular
durations (inside fomus)?
(defun make-accel-measure (time beats)
;; fills 'beats' duration with 'beats+1' pulses
(loop with delta = (/ beats (1+ beats))
for off from time below (+ time beats) by delta
collect (make-note :off off :note 60 :dur delta)))
(let* ((measurebeats (loop for b from 1 to 9 collect b))
(offsets (loop with off = 0
for b in measurebeats
collect off
do (incf off b))))
(fomus
:verbose 2
:output '(:data (:cmn :process t) )
:auto-timesig-comp nil
:max-tuplet-dur 10
:default-beat 1/8
:global (loop for beats in measurebeats
for off in offsets
collect (make-timesig :off off :time (list beats 8)))
:parts (list (make-part
:instr :flute
:events (loop for beats in measurebeats
for off in offsets
nconc (make-accel-measure off beats))))))
</pre>
<pre wrap="">
<hr size="4" width="90%">
_______________________________________________
fomus-devel mailing list
<a class="moz-txt-link-abbreviated" href="mailto:fomus-devel@common-lisp.net">fomus-devel@common-lisp.net</a>
<a class="moz-txt-link-freetext" href="http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel">http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel</a>
</pre>
</blockquote>
</body>
</html>