[fomus-devel] Re: :textnote spacing

rob canning robcanning at eircom.net
Thu Mar 22 14:48:12 UTC 2007


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



More information about the Fomus-devel mailing list