Hi David,

thats very good news!! You see that I haven't really studied the fomus settings so well, yet (although there are documented very well...) - sorry.

Ciao,
Kilian


Am 10.01.2006 um 18:41 schrieb David Psenicka:

Thanks--I'll put the tremolos on the todo list, that's something I overlooked.  The beat defaults to 1/4 (quarter note duration), but can be changed w/ :default-beat and in the time signature objects (in compound meters it defaults to the beat implied by the time signature). 

Actually, the 3/8 gets added to the 5/8 because by default any measure smaller than 2 beats is merged into the measure preceding it--you can change the duration with :min-auto-timesig-dur, so

(fomus:fomus-init :backend '(:lilypond :view t) :auto-accidentals nil :min-auto-timesig-dur 3/2)

should get you what you want.  You can turn off the auto-rearranging too (:auto-override-timesigs nil)

-David

ml13@onlinehome.de wrote:
Hi,

for some reason fomus wants to make a 5/8 + a 3/8 into a 8/8 in the the following snippet. I will be using fomus quite regularly the next days and keep on pasting my observations. I could also try to give some comments on the interface and settings, if I have some more time after this hot period. I will surely also play around with the quant settings - for the moment, I will use :max-tuplet-dur 1, which seems to work nicely. If you speak about a "beat", do you always mean a quarter beat, regardless of time signature ? (I think that's good...)

Cheers,
    Kilian


(fomus:fomus-init :backend '(:lilypond :view t) :auto-accidentals nil)
(fomus:fomus-newpart 2)
(fomus:fomus-newtimesig :off 0 :time '(3 8))
(fomus:fomus-newnote 2 :off 0 :dur 1/2 :note '(74 0) :marks '(:accent :mf))
(fomus:fomus-newnote 2 :off 1/2 :dur 1/2 :note '(71 0) :marks nil)
(fomus:fomus-newnote 2 :off 1 :dur 1/2 :note '(74 0) :marks nil)
(fomus:fomus-newtimesig :off 3/2 :time '(5 8))
(fomus:fomus-newnote 2 :off 3/2 :dur 1/2 :note '(74 0) :marks '(:accent))
(fomus:fomus-newnote 2 :off 2 :dur 1/2 :note '(67 0) :marks nil)
(fomus:fomus-newnote 2 :off 5/2 :dur 1/2 :note '(67 0) :marks nil)
(fomus:fomus-newnote 2 :off 3 :dur 1/2 :note '(71 0) :marks nil)
(fomus:fomus-newnote 2 :off 7/2 :dur 1/2 :note '(74 0) :marks nil)
(fomus:fomus-newtimesig :off 4 :time '(3 8))
(fomus:fomus-newnote 2 :off 4 :dur 1/2 :note '(74 0) :marks '(:accent))
(fomus:fomus-newnote 2 :off 9/2 :dur 1/2 :note '(74 0) :marks nil)
(fomus:fomus-newnote 2 :off 5 :dur 1/2 :note '(67 0) :marks nil)
(fomus:fomus-newtimesig :off 11/2 :time '(5 8))
(fomus:fomus-newnote 2 :off 11/2 :dur 1/2 :note '(74 0) :marks '(:accent))
(fomus:fomus-newnote 2 :off 6 :dur 1/2 :note '(71 0) :marks nil)
(fomus:fomus-newnote 2 :off 13/2 :dur 1/2 :note '(74 0) :marks nil)
(fomus:fomus-newnote 2 :off 7 :dur 1/2 :note '(71 0) :marks nil)
(fomus:fomus-newnote 2 :off 15/2 :dur 1/2 :note '(67 0) :marks nil)
(fomus:fomus-newtimesig :off 8 :time '(5 8))
(fomus:fomus-newnote 2 :off 8 :dur 1/2 :note '(74 0) :marks '(:accent))
(fomus:fomus-newnote 2 :off 17/2 :dur 1/2 :note '(71 0) :marks nil)
(fomus:fomus-newnote 2 :off 9 :dur 1/2 :note '(74 0) :marks nil)
(fomus:fomus-newnote 2 :off 19/2 :dur 1/2 :note '(67 0) :marks nil)
(fomus:fomus-newnote 2 :off 10 :dur 1/2 :note '(71 0) :marks nil)
(fomus:fomus-exec)



_______________________________________________ fomus-devel mailing list fomus-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel