March 2007 - fomus-devel@common-lisp.net - mailman3.common-lisp.net

[fomus-devel] :textnote spacing
by rob canning 29 Mar '07

29 Mar '07

is there any way to give priority to textnote spacing - i am getting a lot of nasty clashes/overlaps of text entries in the lilypond output thanks rob

2 4

[fomus-devel] can't set 5/8 time
by rob canning 25 Mar '07

25 Mar '07

init :filename "stringquartet-no.1"; (init :output ((:musicxml-finale :filename "stringquartet-no.1.xml")(:lilypond :view t))); (init :title "string quartet no.1" :subtitle "draft" :composer "rob canning"); TIMESIG :OFF 0 :TIME (5 8) init :verbose 2; init :max-tuplet 11; init :auto-accidentals NIL; init :auto-cautionary-accs t; part 1 :name "violin 1" :abbrev "vln I." :instr :violin; part 2 :name "violin 2" :abbrev "vln II." :instr :violin; part 3 :name "viola" :abbrev "vla." :instr :viola; part 4 :name "cello" :abbrev "vcl." :instr :cello; thanks rob

2 1

[fomus-devel] 3/8 tuplets
by rob canning 21 Mar '07

21 Mar '07

in 3/8 if you want two dotted quavers it should make it in to a 2:3 duplet i think but instead it does ugly things joining a quaver and semiquaver followed by a dotted quaver thanks rob

2 1

[fomus-devel] v2.0.22
by David Psenicka 13 Mar '07

13 Mar '07

v0.2.22 Fixed instrument names and abbreviations in LilyPond 2.10 Remove newlines from notetexts, etc.. Auto set timesig COMP slot to t for appropriate time signatures (6/8, etc.) Fix for textnotes in LilyPond (Kilian) Changed maximum tuplet size to more reasonable number TODO (soon, when I get the chance...) better tuplet decisions finish testing so-called chunks (which will let you use different settings for different parts, sections, etc..)

1 0

[fomus-devel] Re: tuplets and :name
by David Psenicka 09 Mar '07

09 Mar '07

Try adding this line: init :max-tuplet-dur 2 It seems like this setting always needs to be tweaked--I'll have to come up with a rule that makes better guesses when it comes to appropriate tuplet sizes--maybe a :preferred-tuplet-size setting is appropriate--I think you shouldn't have to set a hard maximum to get the tuplets to work right. I'll come up with a solution in the next release, this max-tuplet-dur tweaking has been bothering me for a while I haven't had a chance to look at the textnote issue yet (I should have time this weekend...), but I think it's because of the carriage returns in the input file: (note 2 :off 0 :dur 0.333333 :notes (63) :marks (:staccato :F (:textnote"(3 1)"))); Should be an easy fix, I'll put in a replace-CRs-with-spaces function RE: name & abbrev not appearing, I'll fix this by next release, not sure when/why this stopped working--this is a bug in one of the backends (maybe some file format has changed)--I'll commit all of these changes to the dev branch as I fix them -DP Rob Canning wrote: > hi, > > re: bars 2, 3 and four in part two of the below example > what do i have to do to have 6 tuplet quavers rather than the way it is now with 5 tuplet quavers and then the subsequent and previous durations being drawn in to one big tuplet? (it will make sense when you look at it :) > > also, part 1 :name "soprano" :abbrev "sop." : isn't causing the text soprano and sop. to be written to the output file? > > thanks > > rob > > (init :output ((:musicxml-finale :filename "test.xml")(:lilypond > :view t))); > init :filename "test"; > (init :title "test" :composer "rob canning"); > TIMESIG :OFF 0 :TIME (4 4) :COMP NIL; > init :verbose 2; > init :max-tuplet 11; > part 1 :name "soprano" :abbrev "sop." :instr :soprano; > part 2 :name "trombone" :abbrev "trbn." :instr :bass; > init :auto-accidentals NIL; > (note 1 :off 0 :dur 0.5 :notes (77) :marks (:ignore :ignore)); > (note 2 :off 0 :dur 0.333333 :notes (63) :marks (:staccato :F (:textnote"(3 > 1)"))); > (note 2 :off 0.333333 :dur 0.333333 :notes (63) :marks (:staccato :F > :ignore)); > (rest 1 :off 0.5 :dur 0.5 :voice NIL); > (note 1 :off 1 :dur 1 :notes (73) :marks (:ignore :ignore)); > (note 2 :off 0.666667 :dur 0.833333 :notes (63) :marks (:staccato :F > :ignore)); > (note 1 :off 2 :dur 1 :notes (73) :marks (:ignore :ignore)); > (note 2 :off 1.5 :dur 0.25 :notes (58) :marks (:staccato :F (:textnote"(4 > 3)"))); > (note 1 :off 3 :dur 1 :notes (74) :marks (:ignore :ignore)); > (note 1 :off 4 :dur 2 :notes (76) :marks (:ignore :ignore)); > (note 2 :off 1.75 :dur 0.25 :notes (58) :marks (:staccato :F :ignore)) > ; > (note 2 :off 2 :dur 0.25 :notes (58) :marks (:staccato :F :ignore)) > ; > (note 1 :off 6 :dur 0.5 :notes (77) :marks (:ignore :ignore)); > (note 2 :off 2.25 :dur 2.25 :notes (58) :marks (:staccato :F :ignore)) > ; > (note 2 :off 4.5 :dur 0.166667 :notes (55) :marks (:portato :F (:textnote"(6 > 4)"))); > (rest 1 :off 6.5 :dur 1 :voice NIL); > (note 2 :off 4.66667 :dur 0.166667 :notes (55) :marks (:portato :F > :ignore)); > (note 2 :off 4.83333 :dur 0.166667 :notes (55) :marks (:portato :F > :ignore)); > (note 1 :off 7.5 :dur 1 :notes (74) :marks (:ignore :ignore)); > (note 2 :off 5 :dur 0.166667 :notes (55) :marks (:portato :F :ignore)) > ; > (note 1 :off 8.5 :dur 2 :notes (76) :marks (:ignore :ignore)); > (note 2 :off 5.16667 :dur 0.166667 :notes (55) :marks (:portato :F > :ignore)); > (note 2 :off 5.33333 :dur 3.16667 :notes (55) :marks (:portato :F :ignore)) > ; > (note 1 :off 10.5 :dur 0.5 :notes (77) :marks (:ignore :ignore)); > (note 2 :off 8.5 :dur 0.166667 :notes (45) :marks (:portato :F (:textnote"(6 > 6)"))); > (note 2 :off 8.66667 :dur 0.166667 :notes (45) :marks (:portato :F > :ignore)); > (note 2 :off 8.83333 :dur 0.166667 :notes (45) :marks (:portato :F > :ignore)); > (rest 1 :off 11 :dur 1 :voice NIL); > (note 2 :off 9 :dur 0.166667 :notes (45) :marks (:portato :F :ignore)) > ; > (note 2 :off 9.16667 :dur 0.166667 :notes (45) :marks (:portato :F > :ignore)); > (note 1 :off 12 :dur 1 :notes (74) :marks (:ignore :ignore)); > (note 2 :off 9.33333 :dur 5.16667 :notes (45) :marks (:portato :F :ignore)) > ; > (note 1 :off 13 :dur 1 :notes (73) :marks (:ignore :ignore)); > (note 2 :off 14.5 :dur 0.166667 :notes (45) :marks (:portato :F (:textnote"(6 > 6)"))); > (note 1 :off 14 :dur 1 :notes (73) :marks (:ignore :ignore)); > (note 2 :off 14.6667 :dur 0.166667 :notes (45) :marks (:portato :F > :ignore)); > (note 2 :off 14.8333 :dur 0.166667 :notes (45) :marks (:portato :F > :ignore)); > (note 2 :off 15 :dur 0.166667 :notes (45) :marks (:portato :F :ignore)) > ; > (note 2 :off 15.1667 :dur 0.166667 :notes (45) :marks (:portato :F > :ignore)); > (note 2 :off 15.3333 :dur 5.16667 :notes (45) :marks (:portato :F :ignore)) > ; > > > ----------------------------------------------------------------- > Find the home of your dreams with eircom net property > Sign up for email alerts now http://www.eircom.net/propertyalerts > > > >

1 0

[fomus-devel] tuplets and :name
by Rob Canning 09 Mar '07

09 Mar '07

hi, re: bars 2, 3 and four in part two of the below example what do i have to do to have 6 tuplet quavers rather than the way it is now with 5 tuplet quavers and then the subsequent and previous durations being drawn in to one big tuplet? (it will make sense when you look at it :) also, part 1 :name "soprano" :abbrev "sop." : isn't causing the text soprano and sop. to be written to the output file? thanks rob (init :output ((:musicxml-finale :filename "test.xml")(:lilypond :view t))); init :filename "test"; (init :title "test" :composer "rob canning"); TIMESIG :OFF 0 :TIME (4 4) :COMP NIL; init :verbose 2; init :max-tuplet 11; part 1 :name "soprano" :abbrev "sop." :instr :soprano; part 2 :name "trombone" :abbrev "trbn." :instr :bass; init :auto-accidentals NIL; (note 1 :off 0 :dur 0.5 :notes (77) :marks (:ignore :ignore)); (note 2 :off 0 :dur 0.333333 :notes (63) :marks (:staccato :F (:textnote"(3 1)"))); (note 2 :off 0.333333 :dur 0.333333 :notes (63) :marks (:staccato :F :ignore)); (rest 1 :off 0.5 :dur 0.5 :voice NIL); (note 1 :off 1 :dur 1 :notes (73) :marks (:ignore :ignore)); (note 2 :off 0.666667 :dur 0.833333 :notes (63) :marks (:staccato :F :ignore)); (note 1 :off 2 :dur 1 :notes (73) :marks (:ignore :ignore)); (note 2 :off 1.5 :dur 0.25 :notes (58) :marks (:staccato :F (:textnote"(4 3)"))); (note 1 :off 3 :dur 1 :notes (74) :marks (:ignore :ignore)); (note 1 :off 4 :dur 2 :notes (76) :marks (:ignore :ignore)); (note 2 :off 1.75 :dur 0.25 :notes (58) :marks (:staccato :F :ignore)) ; (note 2 :off 2 :dur 0.25 :notes (58) :marks (:staccato :F :ignore)) ; (note 1 :off 6 :dur 0.5 :notes (77) :marks (:ignore :ignore)); (note 2 :off 2.25 :dur 2.25 :notes (58) :marks (:staccato :F :ignore)) ; (note 2 :off 4.5 :dur 0.166667 :notes (55) :marks (:portato :F (:textnote"(6 4)"))); (rest 1 :off 6.5 :dur 1 :voice NIL); (note 2 :off 4.66667 :dur 0.166667 :notes (55) :marks (:portato :F :ignore)); (note 2 :off 4.83333 :dur 0.166667 :notes (55) :marks (:portato :F :ignore)); (note 1 :off 7.5 :dur 1 :notes (74) :marks (:ignore :ignore)); (note 2 :off 5 :dur 0.166667 :notes (55) :marks (:portato :F :ignore)) ; (note 1 :off 8.5 :dur 2 :notes (76) :marks (:ignore :ignore)); (note 2 :off 5.16667 :dur 0.166667 :notes (55) :marks (:portato :F :ignore)); (note 2 :off 5.33333 :dur 3.16667 :notes (55) :marks (:portato :F :ignore)) ; (note 1 :off 10.5 :dur 0.5 :notes (77) :marks (:ignore :ignore)); (note 2 :off 8.5 :dur 0.166667 :notes (45) :marks (:portato :F (:textnote"(6 6)"))); (note 2 :off 8.66667 :dur 0.166667 :notes (45) :marks (:portato :F :ignore)); (note 2 :off 8.83333 :dur 0.166667 :notes (45) :marks (:portato :F :ignore)); (rest 1 :off 11 :dur 1 :voice NIL); (note 2 :off 9 :dur 0.166667 :notes (45) :marks (:portato :F :ignore)) ; (note 2 :off 9.16667 :dur 0.166667 :notes (45) :marks (:portato :F :ignore)); (note 1 :off 12 :dur 1 :notes (74) :marks (:ignore :ignore)); (note 2 :off 9.33333 :dur 5.16667 :notes (45) :marks (:portato :F :ignore)) ; (note 1 :off 13 :dur 1 :notes (73) :marks (:ignore :ignore)); (note 2 :off 14.5 :dur 0.166667 :notes (45) :marks (:portato :F (:textnote"(6 6)"))); (note 1 :off 14 :dur 1 :notes (73) :marks (:ignore :ignore)); (note 2 :off 14.6667 :dur 0.166667 :notes (45) :marks (:portato :F :ignore)); (note 2 :off 14.8333 :dur 0.166667 :notes (45) :marks (:portato :F :ignore)); (note 2 :off 15 :dur 0.166667 :notes (45) :marks (:portato :F :ignore)) ; (note 2 :off 15.1667 :dur 0.166667 :notes (45) :marks (:portato :F :ignore)); (note 2 :off 15.3333 :dur 5.16667 :notes (45) :marks (:portato :F :ignore)) ; ----------------------------------------------------------------- Find the home of your dreams with eircom net property Sign up for email alerts now http://www.eircom.net/propertyalerts

1 0

[fomus-devel] minor xml problems
by Rob Canning 06 Mar '07

06 Mar '07

:textnote "(3 9)" when imported into finale with dolet 3.6 it separates the 3 and the 9 onto separate lines also there are lots of ugly collisions with note-heads but as i said in the subject this is probably nothing to do with fomus this mail is just incase it is something to do with fomus :) rob ----------------------------------------------------------------- Find the home of your dreams with eircom net property Sign up for email alerts now http://www.eircom.net/propertyalerts

2 1

[fomus-devel] quantization/notation queries
by Rob Canning 02 Mar '07

02 Mar '07

hi, this may be me doing something wrong but... bar 3 in the second part why has the long tied note got a triplet over it also.. this may be my poor musicianship but... in 6/8 shouldn't it be two tied dotted crotchets or a dotted minum rather than a tied crotchet and a minum? thanks rob (init :output ((:musicxml-finale :filename "draft-clarinet-piece.xml")(:lilypond :view t))); init :filename "test; (init :title "test" :subtitle "draft score" :composer "rob canning"); TIMESIG :OFF 0 :TIME (6 8); init :verbose 2; init :max-tuplet 11; part 1 :name "flute" :instr :flute; part 2 :name "oboe" :instr :oboe; part 3 :name "oboe" :instr :oboe; (note 2 :off 0 :dur 0.090909 :notes (80) :marks (:portato :p (:textnote"(11 2)"))); (note 3 :off 0 :dur 2 :notes (54) :marks (:portato :pp (:textnote"(1 2)"))); (note 1 :off 0 :dur 0.166667 :notes (76) :marks (:portato :p (:textnote"(6 2)"))); (note 2 :off 0.090909 :dur 0.090909 :notes (80) :marks (:portato :p :ignore)); (note 1 :off 0.166667 :dur 0.166667 :notes (76) :marks (:portato :p :ignore)); (note 2 :off 0.181818 :dur 0.090909 :notes (80) :marks (:portato :p :ignore)); (note 2 :off 0.272727 :dur 0.090909 :notes (80) :marks (:portato :p :ignore)); (note 1 :off 0.333333 :dur 0.166667 :notes (76) :marks (:portato :p :ignore)); (note 2 :off 0.363636 :dur 0.090909 :notes (80) :marks (:portato :p :ignore)); (note 2 :off 0.454545 :dur 0.090909 :notes (80) :marks (:portato :p :ignore)); (note 1 :off 0.5 :dur 0.166667 :notes (76) :marks (:portato :p :ignore)) ; (note 2 :off 0.545455 :dur 0.090909 :notes (80) :marks (:portato :p :ignore)); (note 2 :off 0.636364 :dur 0.090909 :notes (80) :marks (:portato :p :ignore)); (note 1 :off 0.666667 :dur 0.166667 :notes (76) :marks (:portato :p :ignore)); (note 2 :off 0.727273 :dur 0.090909 :notes (80) :marks (:portato :p :ignore)); (note 2 :off 0.818182 :dur 0.090909 :notes (80) :marks (:portato :p :ignore)); (note 1 :off 0.833333 :dur 1.16667 :notes (76) :marks (:portato :p :ignore)); (note 2 :off 0.909091 :dur 1.09091 :notes (80) :marks (:portato :p :ignore)); (note 1 :off 2 :dur 0.2 :notes (74) :marks (:staccato :p (:textnote"(5 6)"))); (note 2 :off 2 :dur 11 :notes (60) :marks (:portato :p (:textnote"(1 11)"))); (note 3 :off 2 :dur 0.25 :notes (60) :marks (:portato :pp (:textnote"(4 2)"))); (note 1 :off 2.2 :dur 0.2 :notes (72) :marks (:staccato :p :ignore)) ; (note 3 :off 2.25 :dur 0.25 :notes (60) :marks (:portato :pp :ignore)) ; (note 1 :off 2.4 :dur 0.2 :notes (70) :marks (:staccato :p :ignore)) ; (note 3 :off 2.5 :dur 0.25 :notes (60) :marks (:portato :pp :ignore)) ; (note 1 :off 2.6 :dur 0.2 :notes (68) :marks (:staccato :p :ignore)) ; (note 3 :off 2.75 :dur 1.25 :notes (60) :marks (:portato :pp :ignore)) ; (note 1 :off 2.8 :dur 5.2 :notes (66) :marks (:staccato :p :ignore)) ; (note 2 :off 13 :dur 0.166667 :notes (70) :marks (:portato :p (:textnote"(6 2)"))); (note 3 :off 4 :dur 0.125 :notes (80) :marks (:staccato :pp (:textnote"(8 4)"))); (note 3 :off 4.125 :dur 0.125 :notes (80) :marks (:staccato :pp :ignore)) ; (note 2 :off 13.1667 :dur 0.166667 :notes (70) :marks (:portato :p :ignore)); (note 3 :off 4.25 :dur 0.125 :notes (80) :marks (:staccato :pp :ignore)) ; (note 2 :off 13.3333 :dur 0.166667 :notes (70) :marks (:portato :p :ignore)); (note 3 :off 4.375 :dur 0.125 :notes (80) :marks (:staccato :pp :ignore)) ; (note 3 :off 4.5 :dur 0.125 :notes (80) :marks (:staccato :pp :ignore)) ; (note 2 :off 13.5 :dur 0.166667 :notes (70) :marks (:portato :p :ignore)) ; (note 3 :off 4.625 :dur 0.125 :notes (80) :marks (:staccato :pp :ignore)) ; (note 2 :off 13.6667 :dur 0.166667 :notes (70) :marks (:portato :p :ignore)); (note 3 :off 4.75 :dur 0.125 :notes (80) :marks (:staccato :pp :ignore)) ; (note 1 :off 8 :dur 0.083333 :notes (84) :marks (:staccato :p (:textnote"(12 5)"))); (note 2 :off 13.8333 :dur 1.16667 :notes (70) :marks (:portato :p :ignore)) ; (note 3 :off 4.875 :dur 3.125 :notes (80) :marks (:staccato :pp :ignore)) ; (note 1 :off 8.08333 :dur 0.083333 :notes (83) :marks (:staccato :p :ignore)); (note 1 :off 8.16667 :dur 0.083333 :notes (82) :marks (:staccato :p :ignore)); (note 2 :off 15 :dur 0.142857 :notes (79) :marks (:staccato :p (:textnote"(7 6)"))); (note 3 :off 8 :dur 0.083333 :notes (84) :marks (:staccato :pp (:textnote"(12 8)"))); (note 1 :off 8.25 :dur 0.083333 :notes (81) :marks (:staccato :p :ignore)) ; (note 3 :off 8.08333 :dur 0.083333 :notes (83) :marks (:staccato :pp :ignore)); (note 1 :off 8.33333 :dur 0.083333 :notes (80) :marks (:staccato :p :ignore)); (note 2 :off 15.1429 :dur 0.142857 :notes (78) :marks (:staccato :p :ignore)); (note 3 :off 8.16667 :dur 0.083333 :notes (82) :marks (:staccato :pp :ignore)); (note 1 :off 8.41667 :dur 0.083333 :notes (79) :marks (:staccato :p :ignore)); (note 3 :off 8.25 :dur 0.083333 :notes (81) :marks (:staccato :pp :ignore)) ; (note 2 :off 15.2857 :dur 0.142857 :notes (77) :marks (:staccato :p :ignore)); (note 1 :off 8.5 :dur 0.083333 :notes (78) :marks (:staccato :p :ignore)) ; (note 3 :off 8.33333 :dur 0.083333 :notes (80) :marks (:staccato :pp :ignore)); (note 1 :off 8.58333 :dur 0.083333 :notes (77) :marks (:staccato :p :ignore)); (note 3 :off 8.41667 :dur 0.083333 :notes (79) :marks (:staccato :pp :ignore)); (note 2 :off 15.4286 :dur 0.142857 :notes (76) :marks (:staccato :p :ignore)); (note 1 :off 8.66666 :dur 0.083333 :notes (76) :marks (:staccato :p :ignore)); (note 3 :off 8.5 :dur 0.083333 :notes (78) :marks (:staccato :pp :ignore)) ; (note 1 :off 8.75 :dur 0.083333 :notes (75) :marks (:staccato :p :ignore)) ; (note 2 :off 15.5714 :dur 0.142857 :notes (75) :marks (:staccato :p :ignore)); (note 3 :off 8.58333 :dur 0.083333 :notes (77) :marks (:staccato :pp :ignore)); (note 1 :off 8.83333 :dur 0.083333 :notes (74) :marks (:staccato :p :ignore)); (note 3 :off 8.66666 :dur 0.083333 :notes (76) :marks (:staccato :pp :ignore)); (note 2 :off 15.7143 :dur 0.142857 :notes (74) :marks (:staccato :p :ignore)); (note 1 :off 8.91666 :dur 4.08333 :notes (73) :marks (:staccato :p :ignore)); (note 3 :off 8.75 :dur 0.083333 :notes (75) :marks (:staccato :pp :ignore)) ; (note 3 :off 8.83333 :dur 0.083333 :notes (74) :marks (:staccato :pp :ignore)); (note 2 :off 15.8571 :dur 5.14286 :notes (73) :marks (:staccato :p :ignore)); (note 3 :off 8.91666 :dur 7.08333 :notes (73) :marks (:staccato :pp :ignore)); (note 1 :off 13 :dur 0.5 :notes (75) :marks (:staccato :p (:textnote"(2 12)"))); (note 2 :off 21 :dur 0.1 :notes (82) :marks (:staccato :p (:textnote"(10 7)"))); (note 3 :off 16 :dur 0.2 :notes (78) :marks (:staccato :pp (:textnote"(5 12)"))); (note 2 :off 21.1 :dur 0.1 :notes (81) :marks (:staccato :p :ignore)) ; (note 2 :off 21.2 :dur 0.1 :notes (80) :marks (:staccato :p :ignore)) ; (note 3 :off 16.2 :dur 0.2 :notes (72) :marks (:staccato :pp :ignore)) ; (note 2 :off 21.3 :dur 0.1 :notes (79) :marks (:staccato :p :ignore)) ; (note 1 :off 13.5 :dur 12.5 :notes (74) :marks (:staccato :p :ignore)) ; (note 2 :off 21.4 :dur 0.1 :notes (78) :marks (:staccato :p :ignore)) ; (note 3 :off 16.4 :dur 0.2 :notes (83) :marks (:staccato :pp :ignore)) ; (note 2 :off 21.5 :dur 0.1 :notes (77) :marks (:staccato :p :ignore)) ; (note 2 :off 21.6 :dur 0.1 :notes (76) :marks (:staccato :p :ignore)) ; (note 3 :off 16.6 :dur 0.2 :notes (75) :marks (:staccato :pp :ignore)) ; (note 2 :off 21.7 :dur 0.1 :notes (75) :marks (:staccato :p :ignore)) ; (note 2 :off 21.8 :dur 0.1 :notes (74) :marks (:staccato :p :ignore)) ; (note 3 :off 16.8 :dur 12.2 :notes (77) :marks (:staccato :pp :ignore)) ; (note 2 :off 21.9 :dur 6.1 :notes (73) :marks (:staccato :p :ignore)) ;

2 1