[fomus-devel] timesig

[ml13 at onlinehome.de]

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 at 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 at common-lisp.net
>> http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel
>>

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/fomus-devel/attachments/20060110/1a7f8d9a/attachment.html>