From robcanning at eircom.net  Fri Mar  2 21:27:39 2007
From: robcanning at eircom.net (Rob Canning)
Date: Fri, 02 Mar 2007 21:27:39 +0000
Subject: [fomus-devel] quantization/notation queries
Message-ID: <45E896CB.3080005@eircom.net>

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))
;




From dpsenick at uiuc.edu  Sat Mar  3 01:08:27 2007
From: dpsenick at uiuc.edu (David Psenicka)
Date: Fri, 02 Mar 2007 19:08:27 -0600
Subject: [fomus-devel] Re: quantization/notation queries
In-Reply-To: <45E896CB.3080005@eircom.net>
References: <45E896CB.3080005@eircom.net>
Message-ID: <45E8CA8B.2010705@uiuc.edu>

Rob,

I think you want :comp set to t in the time signature:

TIMESIG :OFF 0 :TIME (6 8) :COMP t

Then it should give you the dotted notes (fomus also interprets 1 beat = 
dotted quarter like it should).  I'll make this the default behavior for 
any time signature divisible by three (like anyone would expect :) )

In the output (after I changed it to comp = t) I saw a funny beam or two 
(I keep running into this issue)--another small bug to fix.

Thanks again,

-David

Rob Canning wrote:
> 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))
> ;
>
>
>


From robcanning at eircom.net  Tue Mar  6 23:11:06 2007
From: robcanning at eircom.net (Rob Canning)
Date: Tue, 6 Mar 2007 23:11:06 +0000
Subject: [fomus-devel] minor xml problems
Message-ID: <20070306231107.DC7C86D030@common-lisp.net>

: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




From dpsenick at uiuc.edu  Wed Mar  7 01:09:17 2007
From: dpsenick at uiuc.edu (David Psenicka)
Date: Tue, 06 Mar 2007 19:09:17 -0600
Subject: [fomus-devel] minor xml problems
In-Reply-To: <20070306231107.DC7C86D030@common-lisp.net>
References: <20070306231107.DC7C86D030@common-lisp.net>
Message-ID: <45EE10BD.1090106@uiuc.edu>

Thanks, I'll take a look at this

XML importing is nasty since Dolet/Finale seems to expect all the 
formatting/positioning information to be present in the file and assumes 
really bad defaults when it isn't...  I've thought of seeing how well 
Finale/Sibelius imports SCORE files, but I haven't gotten around to 
trying this yet...

-DP

Rob Canning wrote:
> :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
>
>
> _______________________________________________
> fomus-devel mailing list
> fomus-devel at common-lisp.net
> http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel
>
>   


From robcanning at eircom.net  Sat Mar 10 00:41:23 2007
From: robcanning at eircom.net (Rob Canning)
Date: Sat, 10 Mar 2007 00:41:23 +0000
Subject: [fomus-devel] tuplets and :name
Message-ID: <20070310004124.DF5C71123@common-lisp.net>

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




From dpsenick at uiuc.edu  Sat Mar 10 04:50:24 2007
From: dpsenick at uiuc.edu (David Psenicka)
Date: Fri, 09 Mar 2007 22:50:24 -0600
Subject: [fomus-devel] Re: tuplets and :name
In-Reply-To: <200703100041.l2A0fNWB017818@relay5.cso.uiuc.edu>
References: <200703100041.l2A0fNWB017818@relay5.cso.uiuc.edu>
Message-ID: <45F23910.9000604@uiuc.edu>

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
>
>
>
>   


From dpsenick at uiuc.edu  Tue Mar 13 16:11:13 2007
From: dpsenick at uiuc.edu (David Psenicka)
Date: Tue, 13 Mar 2007 11:11:13 -0500
Subject: [fomus-devel] v2.0.22
In-Reply-To: <200703100041.l2A0fNWB017818@relay5.cso.uiuc.edu>
References: <200703100041.l2A0fNWB017818@relay5.cso.uiuc.edu>
Message-ID: <45F6CD21.50103@uiuc.edu>

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..)


From robcanning at eircom.net  Wed Mar 21 12:39:42 2007
From: robcanning at eircom.net (rob canning)
Date: Wed, 21 Mar 2007 12:39:42 +0000
Subject: [fomus-devel] can't set 5/8 time
Message-ID: <4601278E.50204@eircom.net>

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


From robcanning at eircom.net  Wed Mar 21 12:53:09 2007
From: robcanning at eircom.net (rob canning)
Date: Wed, 21 Mar 2007 12:53:09 +0000
Subject: [fomus-devel] 3/8 tuplets
Message-ID: <46012AB5.1050200@eircom.net>

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


From dpsenick at uiuc.edu  Wed Mar 21 16:14:20 2007
From: dpsenick at uiuc.edu (David Psenicka)
Date: Wed, 21 Mar 2007 11:14:20 -0500
Subject: [fomus-devel] Re: 3/8 tuplets
In-Reply-To: <46012AB5.1050200@eircom.net>
References: <46012AB5.1050200@eircom.net>
Message-ID: <460159DC.9050104@uiuc.edu>

Thanks.  I'll have an update shortly (with a fix for the 5/8 XML problem 
and the ugly 3/8s).

rob canning wrote:
> 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
>


From robcanning at eircom.net  Thu Mar 22 12:44:20 2007
From: robcanning at eircom.net (rob canning)
Date: Thu, 22 Mar 2007 12:44:20 +0000
Subject: [fomus-devel] :textnote spacing
Message-ID: <46027A24.5020105@eircom.net>

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


From dpsenick at uiuc.edu  Thu Mar 22 13:33:50 2007
From: dpsenick at uiuc.edu (David Psenicka)
Date: Thu, 22 Mar 2007 08:33:50 -0500
Subject: [fomus-devel] Re: :textnote spacing
In-Reply-To: <46027A24.5020105@eircom.net>
References: <46027A24.5020105@eircom.net>
Message-ID: <460285BE.9020808@uiuc.edu>

I might be able to have fomus make some simple layout tweaks that will 
at least make it more readable (in the XML output as well)...  could you 
send me a few of the nasty examples?

rob canning wrote:
> 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
>


From robcanning at eircom.net  Thu Mar 22 14:48:12 2007
From: robcanning at eircom.net (rob canning)
Date: Thu, 22 Mar 2007 14:48:12 +0000
Subject: [fomus-devel] Re: :textnote spacing
In-Reply-To: <460285BE.9020808@uiuc.edu>
References: <46027A24.5020105@eircom.net> <460285BE.9020808@uiuc.edu>
Message-ID: <4602972C.40604@eircom.net>

this isn't the ugliest example  i  can generate (its just whats in front 
of me now) but it does show some of the  problems
 
i might be just being a bit fussy,  the number of text entries are 
slightly non conventional - its just the way i use fomus - to generate 
an algorithmic score and then work on it by hand - so i need lots of 
analysis information included in the notation

main problem:
bar two violin 1 - text note clash -  the text entries need vertical 
displacement

minor / unimportant:
bar 7 viola arco clash with accidental
page two second last bar - cello  - pizz and arco getting a little close
page 2 system 1 bar 1 violin 2  - :prall colliding with beams


sorry to be a pain ;)

maybe you could pass me the code to reduce the default text size - this 
might be a workaround for the moment

is there somewhere in the documentation that discusses changing these 
defaults - stave size - text size - notation font size etc etc?


thanks

rob




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 analysis" :composer
"rob canning");
TIMESIG :OFF 0 :TIME (3 4);
init :verbose 2;
init :max-tuplet 11;
part 1 :name "violin 1" :abbrev "vln I." :instr :violin;
init :auto-accidentals NIL;
init :auto-cautionary-accs t;
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;
(note 1 :off 0 :dur 0.25 :notes (66) :marks (:staccato :mf (:textnote"(7
16)")));
(note 1 :off 0.25 :dur 0.5 :notes (66) :marks (:staccato :mf :ignore))
;
(note 4 :off 0.75 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
;
(note 4 :off 1.25 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
;
(note 4 :off 1.75 :dur 0.5 :notes (60) :marks (:staccato :mf (:textnote"(1
7)")));
(note 1 :off 2.25 :dur 0.25 :notes (60) :marks (:staccato :mf :ignore))
;
(note 2 :off 2.5 :dur 0.5 :notes (61) :marks (:PIZZ :mf (:textnote"(2
1)")));
(note 1 :off 3 :dur 0.25 :notes (62) :marks (:staccato :mf (:textnote"(3
2)")));
(note 1 :off 3.25 :dur 0.25 :notes (73) :marks (:staccato :mf (:textnote"(14
3)")));
(note 1 :off 3.5 :dur 0.25 :notes (74) :marks (:staccato :mf (:textnote"(15
14)")));
(note 1 :off 3.75 :dur 0.5 :notes (74) :marks (:staccato :mf :ignore))
;
(note 4 :off 4.25 :dur 0.5 :notes (75) :marks (:staccato :mf (:textnote"(16
15)")));
(note 1 :off 4.75 :dur 0.5 :notes (75) :marks (:staccato :mf :ignore))
;
(note 4 :off 5.25 :dur 0.5 :notes (62) :marks (:staccato :mf :ignore))
;
(note 3 :off 5.75 :dur 0.5 :notes (71) :marks (:staccato :mf :ignore))
;
(note 4 :off 6.25 :dur 0.25 :notes (65) :marks (:staccato :mf (:textnote"(6
16)")));
(note 1 :off 6.5 :dur 0.5 :notes (65) :marks (:staccato :mf :ignore))
;
(note 4 :off 7 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
;
(note 4 :off 7.5 :dur 0.5 :notes (70) :marks (:staccato :mf (:textnote"(11
6)")));
(note 1 :off 8 :dur 0.25 :notes (70) :marks (:staccato :mf :ignore))
;
(note 2 :off 8.25 :dur 0.25 :notes (71) :marks (:staccato :mf :ignore))
;
(note 2 :off 8.5 :dur 0.5 :notes (72) :marks (:staccato :mf :ignore))
;
(note 3 :off 9 :dur 0.5 :notes (71) :marks (:staccato :mf :ignore))
;
(note 3 :off 9.5 :dur 0.5 :notes (72) :marks (:marcato :mf :ignore))
;
(note 3 :off 10 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
;
(note 4 :off 10.5 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
;
(note 4 :off 11 :dur 0.5 :notes (74) :marks (:staccato :mf :ignore))
;
(note 4 :off 11.5 :dur 0.5 :notes (75) :marks (:staccato :mf :ignore))
;
(note 4 :off 12 :dur 0.5 :notes (66) :marks (:staccato :mf :ignore))
;
(note 4 :off 12.5 :dur 0.25 :notes (71) :marks (:staccato :mf :ignore))
;
(note 2 :off 12.75 :dur 0.5 :notes (62) :marks (:staccato :mf :ignore))
;
(note 4 :off 13.25 :dur 0.5 :notes (72) :marks (:staccato :mf :ignore))
;
(note 3 :off 13.75 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
;
(note 4 :off 14.25 :dur 0.5 :notes (62) :marks (:staccato :mf :ignore))
;
(note 4 :off 14.75 :dur 0.25 :notes (64) :marks (:staccato :mf (:textnote"(5
11)")));
(note 1 :off 15 :dur 0.5 :notes (64) :marks (:staccato :mf :ignore))
;
(note 3 :off 15.5 :dur 0.5 :notes (71) :marks (:staccato :mf (:textnote"(12
5)")));
(note 1 :off 16 :dur 0.25 :notes (71) :marks (:staccato :mf :ignore))
;
(note 2 :off 16.25 :dur 0.25 :notes (72) :marks (:staccato :mf 
(:textnote"(13
12)")));
(note 1 :off 16.5 :dur 0.5 :notes (72) :marks (:staccato :mf :ignore))
;
(note 3 :off 17 :dur 0.5 :notes (68) :marks (:staccato :mf :ignore))
;
(note 1 :off 18 :dur 0.25 :notes (65) :marks (:staccato :mf (:textnote"(6
16)")));
(note 3 :off 18.25 :dur 0.5 :notes (65) :marks (:staccato :mf :ignore))
;
(note 1 :off 18.75 :dur 0.5 :notes (68) :marks (:marcato :mf :ignore))
;
(note 3 :off 19.25 :dur 0.25 :notes (69) :marks (:PIZZ :mf :ignore))
;
(note 4 :off 19.5 :dur 0.5 :notes (70) :marks (:prall :mf (:textnote"(11
6)")));
(note 1 :off 20 :dur 0.25 :notes (70) :marks (:prall :mf :ignore))
;
(note 3 :off 20.25 :dur 0.5 :notes (69) :marks (:staccato :mf :ignore))
;
(note 3 :off 20.75 :dur 0.25 :notes (75) :marks (:marcato :mf (:textnote"(16
11)")));
(note 2 :off 21 :dur 0.5 :notes (75) :marks (:marcato :mf :ignore))
;
(note 1 :off 21.5 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
;
(note 4 :off 22 :dur 0.5 :notes (74) :marks (:staccato :mf :ignore))
;
(note 3 :off 22.5 :dur 0.5 :notes (75) :marks (:staccato :mf :ignore))
;
(note 3 :off 23 :dur 0.5 :notes (64) :marks (:PIZZ :mf :ignore));
(note 4 :off 23.5 :dur 0.25 :notes (71) :marks (:staccato :mf :ignore))
;
(note 4 :off 23.75 :dur 0.5 :notes (65) :marks (:staccato :mf (:textnote"(6
16)")));
(note 2 :off 24.25 :dur 0.5 :notes (65) :marks (:staccato :mf :ignore))
;
(note 1 :off 24.75 :dur 0.5 :notes (71) :marks (:staccato :mf :ignore))
;
(note 3 :off 25.25 :dur 0.5 :notes (65) :marks (:marcato :mf :ignore))
;
(note 4 :off 25.75 :dur 0.25 :notes (70) :marks (:staccato :mf :ignore))
;
(note 4 :off 26 :dur 0.5 :notes (72) :marks (:marcato :mf :ignore))
;
(note 3 :off 26.5 :dur 0.5 :notes (64) :marks (:staccato :mf :ignore))
;
(note 2 :off 27 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
;
(note 3 :off 27.5 :dur 0.5 :notes (74) :marks (:staccato :mf :ignore))
;
(note 3 :off 28 :dur 0.5 :notes (75) :marks (:staccato :mf :ignore))
;
(note 4 :off 28.5 :dur 0.5 :notes (65) :marks (:staccato :mf :ignore))
;
(note 4 :off 29 :dur 0.5 :notes (75) :marks (:staccato :mf :ignore))
;
(note 4 :off 29.5 :dur 0.25 :notes (65) :marks (:prall :mf :ignore))
;
(note 3 :off 29.75 :dur 0.25 :notes (71) :marks (:prall :mf :ignore))
;
(note 2 :off 30 :dur 0.25 :notes (60) :marks (:prall :mf :ignore))
;
(note 4 :off 30.25 :dur 0.5 :notes (72) :marks (:marcato :mf :ignore))
;
(note 2 :off 30.75 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
;
(note 2 :off 31.25 :dur 0.5 :notes (65) :marks (:staccato :mf :ignore))
;
(note 4 :off 31.75 :dur 0.25 :notes (70) :marks (:prall :mf (:textnote"(11
6)")));
(note 3 :off 32 :dur 0.25 :notes (70) :marks (:prall :mf :ignore))
;
(note 1 :off 32.25 :dur 0.25 :notes (61) :marks (:staccato :mf :ignore))
;
(note 4 :off 32.5 :dur 0.5 :notes (64) :marks (:marcato :mf (:textnote"(5
11)")));
(note 2 :off 33 :dur 0.5 :notes (64) :marks (:marcato :mf :ignore))
;
(note 1 :off 33.5 :dur 0.25 :notes (62) :marks (:PIZZ :mf :ignore))
;
(note 4 :off 33.75 :dur 0.25 :notes (64) :marks (:prall :mf (:textnote"(5
5)")));
(note 3 :off 34 :dur 0.25 :notes (64) :marks (:prall :mf :ignore))
;
(note 1 :off 34.25 :dur 0.5 :notes (63) :marks (:marcato :mf :ignore))
;
(note 2 :off 34.75 :dur 0.5 :notes (68) :marks (:PIZZ :mf :ignore))
;
(note 2 :off 35.25 :dur 0.25 :notes (65) :marks (:prall :mf (:textnote"(6
5)")));
(note 3 :off 35.5 :dur 0.25 :notes (65) :marks (:prall :mf :ignore))
;
(note 1 :off 35.75 :dur 0.5 :notes (62) :marks (:staccato :mf :ignore))
;
(note 2 :off 36.25 :dur 0.25 :notes (70) :marks (:prall :mf (:textnote"(11
6)")));
(note 2 :off 36.5 :dur 0.25 :notes (70) :marks (:prall :mf :ignore))
;
(note 1 :off 36.75 :dur 0.25 :notes (61) :marks (:staccato :mf :ignore))
;
(note 3 :off 37 :dur 0.5 :notes (64) :marks (:marcato :mf (:textnote"(5
11)")));
(note 2 :off 37.5 :dur 0.5 :notes (67) :marks (:prall :mf (:textnote"(8
5)")));
(note 1 :off 38 :dur 0.25 :notes (67) :marks (:prall :mf :ignore))
;
(note 1 :off 38.25 :dur 0.25 :notes (62) :marks (:staccato :mf :ignore))
;
(note 3 :off 38.5 :dur 0.5 :notes (67) :marks (:staccato :mf (:textnote"(8
8)")));
(note 1 :off 39 :dur 0.25 :notes (67) :marks (:staccato :mf :ignore))
;
(note 2 :off 39.25 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
;
(note 4 :off 39.75 :dur 0.25 :notes (67) :marks (:prall :mf (:textnote"(8
8)")));
(note 2 :off 40 :dur 0.25 :notes (67) :marks (:prall :mf :ignore))
;
(note 1 :off 40.25 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
;
(note 4 :off 40.75 :dur 0.5 :notes (64) :marks (:PIZZ :mf :ignore))
;
(note 2 :off 41.25 :dur 0.5 :notes (72) :marks (:prall :mf (:textnote"(13
8)")));
(note 1 :off 41.75 :dur 0.25 :notes (72) :marks (:prall :mf :ignore))
;
(note 4 :off 42 :dur 0.25 :notes (62) :marks (:staccato :mf (:textnote"(3
13)")));
(note 2 :off 42.25 :dur 0.5 :notes (62) :marks (:staccato :mf :ignore))
;
(note 2 :off 42.75 :dur 0.25 :notes (71) :marks (:prall :mf :ignore))
;
(note 1 :off 43 :dur 0.5 :notes (65) :marks (:marcato :mf :ignore))
;
(note 4 :off 43.5 :dur 0.25 :notes (71) :marks (:prall :mf :ignore))
;
(note 2 :off 43.75 :dur 0.25 :notes (70) :marks (:staccato :mf :ignore))
;
(note 2 :off 44 :dur 0.25 :notes (63) :marks (:PIZZ :mf :ignore));
(note 3 :off 44.25 :dur 0.5 :notes (73) :marks (:PIZZ :mf (:textnote"(14
3)")));
(note 1 :off 44.75 :dur 0.25 :notes (69) :marks (:staccato :mf 
(:textnote"(10
14)")));
(note 2 :off 45 :dur 0.5 :notes (69) :marks (:staccato :mf :ignore))
;
(note 1 :off 45.5 :dur 0.5 :notes (72) :marks (:PIZZ :mf :ignore))
;
(note 3 :off 46 :dur 0.5 :notes (69) :marks (:staccato :mf (:textnote"(10
10)")));
(note 4 :off 46.5 :dur 0.5 :notes (69) :marks (:staccato :mf :ignore))
;
(note 1 :off 47 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
;
(note 3 :off 47.5 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
;
(note 3 :off 48 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
;
(note 4 :off 48.5 :dur 0.5 :notes (70) :marks (:staccato :mf :ignore))
;
(note 4 :off 49 :dur 0.5 :notes (75) :marks (:marcato :mf :ignore))
;
(note 4 :off 49.5 :dur 0.5 :notes (65) :marks (:staccato :mf :ignore))
;
(note 4 :off 50 :dur 0.5 :notes (68) :marks (:PIZZ :mf :ignore));
(note 4 :off 50.5 :dur 0.25 :notes (60) :marks (:prall :mf :ignore))
;
(note 3 :off 50.75 :dur 0.25 :notes (71) :marks (:prall :mf :ignore))
;
(note 2 :off 50.75 :dur 0.25 :notes (71) :marks (:prall :mf :ignore))
;
(note 2 :off 51 :dur 0.5 :notes (72) :marks (:marcato :mf :ignore))
;
(note 3 :off 51.5 :dur 0.5 :notes (73) :marks (:marcato :mf :ignore))
;
(note 3 :off 52 :dur 0.5 :notes (74) :marks (:staccato :mf :ignore))
;
(note 4 :off 52.5 :dur 0.25 :notes (75) :marks (:PIZZ :mf :ignore))
;



David Psenicka wrote:
> I might be able to have fomus make some simple layout tweaks that will 
> at least make it more readable (in the XML output as well)...  could 
> you send me a few of the nasty examples?
>
> rob canning wrote:
>> 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
>>
> _______________________________________________
> fomus-devel mailing


From dpsenick at uiuc.edu  Thu Mar 22 17:42:43 2007
From: dpsenick at uiuc.edu (David Psenicka)
Date: Thu, 22 Mar 2007 12:42:43 -0500
Subject: [fomus-devel] Re: :textnote spacing
In-Reply-To: <4602972C.40604@eircom.net>
References: <46027A24.5020105@eircom.net> <460285BE.9020808@uiuc.edu>
	<4602972C.40604@eircom.net>
Message-ID: <4602C013.9000709@uiuc.edu>

There are a few settings you can fiddle with to tweak lilypond output 
(ea. is a lilypond "markup" command--should each include an ~A where the 
actual text goes):

(defparameter *lilypond-text-markup* "\\markup{\\italic{~A}}")
(defparameter *lilypond-textdyn-markup* 
"\\markup{\\dynamic{\\italic{\\bold{~A}}}}")
(defparameter *lilypond-texttempo-markup* "\\markup{\\bold{\\huge{~A}}}")
(defparameter *lilypond-textnote-markup* "\\markup{\\italic{~A}}")

So you can try something like

init :lilypond-text-markup "\\markup{\\italic{\\tiny{~A}}}"
or
init :lilypond-textnote-markup "\\markup{\\italic{\\tiny{~A}}}"

There are also a few settings for inserting arbitrary lilypond commands, 
:lilypond-filehead and :lilypond-scorehead, and a part option called 
:lily-parthead--these can all be set to text strings to be inserted in 
the lilypond file at various spots--fiddling with these is probably more 
trouble than it's worth though

rob canning wrote:
> this isn't the ugliest example  i  can generate (its just whats in 
> front of me now) but it does show some of the  problems
>
> i might be just being a bit fussy,  the number of text entries are 
> slightly non conventional - its just the way i use fomus - to generate 
> an algorithmic score and then work on it by hand - so i need lots of 
> analysis information included in the notation
>
> main problem:
> bar two violin 1 - text note clash -  the text entries need vertical 
> displacement
>
> minor / unimportant:
> bar 7 viola arco clash with accidental
> page two second last bar - cello  - pizz and arco getting a little close
> page 2 system 1 bar 1 violin 2  - :prall colliding with beams
>
>
> sorry to be a pain ;)
>
> maybe you could pass me the code to reduce the default text size - 
> this might be a workaround for the moment
>
> is there somewhere in the documentation that discusses changing these 
> defaults - stave size - text size - notation font size etc etc?
>
>
> thanks
>
> rob
>
>
>
>
> 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 analysis" :composer
> "rob canning");
> TIMESIG :OFF 0 :TIME (3 4);
> init :verbose 2;
> init :max-tuplet 11;
> part 1 :name "violin 1" :abbrev "vln I." :instr :violin;
> init :auto-accidentals NIL;
> init :auto-cautionary-accs t;
> 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;
> (note 1 :off 0 :dur 0.25 :notes (66) :marks (:staccato :mf (:textnote"(7
> 16)")));
> (note 1 :off 0.25 :dur 0.5 :notes (66) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 0.75 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 1.25 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 1.75 :dur 0.5 :notes (60) :marks (:staccato :mf 
> (:textnote"(1
> 7)")));
> (note 1 :off 2.25 :dur 0.25 :notes (60) :marks (:staccato :mf :ignore))
> ;
> (note 2 :off 2.5 :dur 0.5 :notes (61) :marks (:PIZZ :mf (:textnote"(2
> 1)")));
> (note 1 :off 3 :dur 0.25 :notes (62) :marks (:staccato :mf (:textnote"(3
> 2)")));
> (note 1 :off 3.25 :dur 0.25 :notes (73) :marks (:staccato :mf 
> (:textnote"(14
> 3)")));
> (note 1 :off 3.5 :dur 0.25 :notes (74) :marks (:staccato :mf 
> (:textnote"(15
> 14)")));
> (note 1 :off 3.75 :dur 0.5 :notes (74) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 4.25 :dur 0.5 :notes (75) :marks (:staccato :mf 
> (:textnote"(16
> 15)")));
> (note 1 :off 4.75 :dur 0.5 :notes (75) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 5.25 :dur 0.5 :notes (62) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 5.75 :dur 0.5 :notes (71) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 6.25 :dur 0.25 :notes (65) :marks (:staccato :mf 
> (:textnote"(6
> 16)")));
> (note 1 :off 6.5 :dur 0.5 :notes (65) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 7 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 7.5 :dur 0.5 :notes (70) :marks (:staccato :mf 
> (:textnote"(11
> 6)")));
> (note 1 :off 8 :dur 0.25 :notes (70) :marks (:staccato :mf :ignore))
> ;
> (note 2 :off 8.25 :dur 0.25 :notes (71) :marks (:staccato :mf :ignore))
> ;
> (note 2 :off 8.5 :dur 0.5 :notes (72) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 9 :dur 0.5 :notes (71) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 9.5 :dur 0.5 :notes (72) :marks (:marcato :mf :ignore))
> ;
> (note 3 :off 10 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 10.5 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 11 :dur 0.5 :notes (74) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 11.5 :dur 0.5 :notes (75) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 12 :dur 0.5 :notes (66) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 12.5 :dur 0.25 :notes (71) :marks (:staccato :mf :ignore))
> ;
> (note 2 :off 12.75 :dur 0.5 :notes (62) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 13.25 :dur 0.5 :notes (72) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 13.75 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 14.25 :dur 0.5 :notes (62) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 14.75 :dur 0.25 :notes (64) :marks (:staccato :mf 
> (:textnote"(5
> 11)")));
> (note 1 :off 15 :dur 0.5 :notes (64) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 15.5 :dur 0.5 :notes (71) :marks (:staccato :mf 
> (:textnote"(12
> 5)")));
> (note 1 :off 16 :dur 0.25 :notes (71) :marks (:staccato :mf :ignore))
> ;
> (note 2 :off 16.25 :dur 0.25 :notes (72) :marks (:staccato :mf 
> (:textnote"(13
> 12)")));
> (note 1 :off 16.5 :dur 0.5 :notes (72) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 17 :dur 0.5 :notes (68) :marks (:staccato :mf :ignore))
> ;
> (note 1 :off 18 :dur 0.25 :notes (65) :marks (:staccato :mf (:textnote"(6
> 16)")));
> (note 3 :off 18.25 :dur 0.5 :notes (65) :marks (:staccato :mf :ignore))
> ;
> (note 1 :off 18.75 :dur 0.5 :notes (68) :marks (:marcato :mf :ignore))
> ;
> (note 3 :off 19.25 :dur 0.25 :notes (69) :marks (:PIZZ :mf :ignore))
> ;
> (note 4 :off 19.5 :dur 0.5 :notes (70) :marks (:prall :mf (:textnote"(11
> 6)")));
> (note 1 :off 20 :dur 0.25 :notes (70) :marks (:prall :mf :ignore))
> ;
> (note 3 :off 20.25 :dur 0.5 :notes (69) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 20.75 :dur 0.25 :notes (75) :marks (:marcato :mf 
> (:textnote"(16
> 11)")));
> (note 2 :off 21 :dur 0.5 :notes (75) :marks (:marcato :mf :ignore))
> ;
> (note 1 :off 21.5 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 22 :dur 0.5 :notes (74) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 22.5 :dur 0.5 :notes (75) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 23 :dur 0.5 :notes (64) :marks (:PIZZ :mf :ignore));
> (note 4 :off 23.5 :dur 0.25 :notes (71) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 23.75 :dur 0.5 :notes (65) :marks (:staccato :mf 
> (:textnote"(6
> 16)")));
> (note 2 :off 24.25 :dur 0.5 :notes (65) :marks (:staccato :mf :ignore))
> ;
> (note 1 :off 24.75 :dur 0.5 :notes (71) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 25.25 :dur 0.5 :notes (65) :marks (:marcato :mf :ignore))
> ;
> (note 4 :off 25.75 :dur 0.25 :notes (70) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 26 :dur 0.5 :notes (72) :marks (:marcato :mf :ignore))
> ;
> (note 3 :off 26.5 :dur 0.5 :notes (64) :marks (:staccato :mf :ignore))
> ;
> (note 2 :off 27 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 27.5 :dur 0.5 :notes (74) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 28 :dur 0.5 :notes (75) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 28.5 :dur 0.5 :notes (65) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 29 :dur 0.5 :notes (75) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 29.5 :dur 0.25 :notes (65) :marks (:prall :mf :ignore))
> ;
> (note 3 :off 29.75 :dur 0.25 :notes (71) :marks (:prall :mf :ignore))
> ;
> (note 2 :off 30 :dur 0.25 :notes (60) :marks (:prall :mf :ignore))
> ;
> (note 4 :off 30.25 :dur 0.5 :notes (72) :marks (:marcato :mf :ignore))
> ;
> (note 2 :off 30.75 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
> ;
> (note 2 :off 31.25 :dur 0.5 :notes (65) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 31.75 :dur 0.25 :notes (70) :marks (:prall :mf 
> (:textnote"(11
> 6)")));
> (note 3 :off 32 :dur 0.25 :notes (70) :marks (:prall :mf :ignore))
> ;
> (note 1 :off 32.25 :dur 0.25 :notes (61) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 32.5 :dur 0.5 :notes (64) :marks (:marcato :mf (:textnote"(5
> 11)")));
> (note 2 :off 33 :dur 0.5 :notes (64) :marks (:marcato :mf :ignore))
> ;
> (note 1 :off 33.5 :dur 0.25 :notes (62) :marks (:PIZZ :mf :ignore))
> ;
> (note 4 :off 33.75 :dur 0.25 :notes (64) :marks (:prall :mf (:textnote"(5
> 5)")));
> (note 3 :off 34 :dur 0.25 :notes (64) :marks (:prall :mf :ignore))
> ;
> (note 1 :off 34.25 :dur 0.5 :notes (63) :marks (:marcato :mf :ignore))
> ;
> (note 2 :off 34.75 :dur 0.5 :notes (68) :marks (:PIZZ :mf :ignore))
> ;
> (note 2 :off 35.25 :dur 0.25 :notes (65) :marks (:prall :mf (:textnote"(6
> 5)")));
> (note 3 :off 35.5 :dur 0.25 :notes (65) :marks (:prall :mf :ignore))
> ;
> (note 1 :off 35.75 :dur 0.5 :notes (62) :marks (:staccato :mf :ignore))
> ;
> (note 2 :off 36.25 :dur 0.25 :notes (70) :marks (:prall :mf 
> (:textnote"(11
> 6)")));
> (note 2 :off 36.5 :dur 0.25 :notes (70) :marks (:prall :mf :ignore))
> ;
> (note 1 :off 36.75 :dur 0.25 :notes (61) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 37 :dur 0.5 :notes (64) :marks (:marcato :mf (:textnote"(5
> 11)")));
> (note 2 :off 37.5 :dur 0.5 :notes (67) :marks (:prall :mf (:textnote"(8
> 5)")));
> (note 1 :off 38 :dur 0.25 :notes (67) :marks (:prall :mf :ignore))
> ;
> (note 1 :off 38.25 :dur 0.25 :notes (62) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 38.5 :dur 0.5 :notes (67) :marks (:staccato :mf 
> (:textnote"(8
> 8)")));
> (note 1 :off 39 :dur 0.25 :notes (67) :marks (:staccato :mf :ignore))
> ;
> (note 2 :off 39.25 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 39.75 :dur 0.25 :notes (67) :marks (:prall :mf (:textnote"(8
> 8)")));
> (note 2 :off 40 :dur 0.25 :notes (67) :marks (:prall :mf :ignore))
> ;
> (note 1 :off 40.25 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 40.75 :dur 0.5 :notes (64) :marks (:PIZZ :mf :ignore))
> ;
> (note 2 :off 41.25 :dur 0.5 :notes (72) :marks (:prall :mf (:textnote"(13
> 8)")));
> (note 1 :off 41.75 :dur 0.25 :notes (72) :marks (:prall :mf :ignore))
> ;
> (note 4 :off 42 :dur 0.25 :notes (62) :marks (:staccato :mf (:textnote"(3
> 13)")));
> (note 2 :off 42.25 :dur 0.5 :notes (62) :marks (:staccato :mf :ignore))
> ;
> (note 2 :off 42.75 :dur 0.25 :notes (71) :marks (:prall :mf :ignore))
> ;
> (note 1 :off 43 :dur 0.5 :notes (65) :marks (:marcato :mf :ignore))
> ;
> (note 4 :off 43.5 :dur 0.25 :notes (71) :marks (:prall :mf :ignore))
> ;
> (note 2 :off 43.75 :dur 0.25 :notes (70) :marks (:staccato :mf :ignore))
> ;
> (note 2 :off 44 :dur 0.25 :notes (63) :marks (:PIZZ :mf :ignore));
> (note 3 :off 44.25 :dur 0.5 :notes (73) :marks (:PIZZ :mf (:textnote"(14
> 3)")));
> (note 1 :off 44.75 :dur 0.25 :notes (69) :marks (:staccato :mf 
> (:textnote"(10
> 14)")));
> (note 2 :off 45 :dur 0.5 :notes (69) :marks (:staccato :mf :ignore))
> ;
> (note 1 :off 45.5 :dur 0.5 :notes (72) :marks (:PIZZ :mf :ignore))
> ;
> (note 3 :off 46 :dur 0.5 :notes (69) :marks (:staccato :mf (:textnote"(10
> 10)")));
> (note 4 :off 46.5 :dur 0.5 :notes (69) :marks (:staccato :mf :ignore))
> ;
> (note 1 :off 47 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 47.5 :dur 0.5 :notes (63) :marks (:staccato :mf :ignore))
> ;
> (note 3 :off 48 :dur 0.5 :notes (73) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 48.5 :dur 0.5 :notes (70) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 49 :dur 0.5 :notes (75) :marks (:marcato :mf :ignore))
> ;
> (note 4 :off 49.5 :dur 0.5 :notes (65) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 50 :dur 0.5 :notes (68) :marks (:PIZZ :mf :ignore));
> (note 4 :off 50.5 :dur 0.25 :notes (60) :marks (:prall :mf :ignore))
> ;
> (note 3 :off 50.75 :dur 0.25 :notes (71) :marks (:prall :mf :ignore))
> ;
> (note 2 :off 50.75 :dur 0.25 :notes (71) :marks (:prall :mf :ignore))
> ;
> (note 2 :off 51 :dur 0.5 :notes (72) :marks (:marcato :mf :ignore))
> ;
> (note 3 :off 51.5 :dur 0.5 :notes (73) :marks (:marcato :mf :ignore))
> ;
> (note 3 :off 52 :dur 0.5 :notes (74) :marks (:staccato :mf :ignore))
> ;
> (note 4 :off 52.5 :dur 0.25 :notes (75) :marks (:PIZZ :mf :ignore))
> ;
>
>
>
> David Psenicka wrote:
>> I might be able to have fomus make some simple layout tweaks that 
>> will at least make it more readable (in the XML output as well)...  
>> could you send me a few of the nasty examples?
>>
>> rob canning wrote:
>>> 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
>>>
>> _______________________________________________
>> fomus-devel mailing
>


From dpsenick at uiuc.edu  Mon Mar 26 00:10:49 2007
From: dpsenick at uiuc.edu (David Psenicka)
Date: Sun, 25 Mar 2007 19:10:49 -0500
Subject: [fomus-devel] Re: can't set 5/8 time
In-Reply-To: <4601278E.50204@eircom.net>
References: <4601278E.50204@eircom.net>
Message-ID: <46070F89.7020303@uiuc.edu>

This fix for this is in the dev branch now (sorry for the wait!)  -DP

rob canning wrote:
> 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
>


From dpsenick at uiuc.edu  Thu Mar 29 17:19:00 2007
From: dpsenick at uiuc.edu (David Psenicka)
Date: Thu, 29 Mar 2007 12:19:00 -0500
Subject: [fomus-devel] v0-2-23
In-Reply-To: <4602C013.9000709@uiuc.edu>
References: <46027A24.5020105@eircom.net>
	<460285BE.9020808@uiuc.edu>	<4602972C.40604@eircom.net>
	<4602C013.9000709@uiuc.edu>
Message-ID: <460BF504.3040504@uiuc.edu>

v0.2.23
    Fixed XML adding redundant clef at beginning of output
    Fixed measure rests bug in XML output (caused SBCL to hang)