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

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

10 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 07 Mar '07

07 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 03 Mar '07

03 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

[fomus-devel] D#
by Kilian Sprotte 28 Feb '07

28 Feb '07

Hi, I allowed myself to commit a change to the lilypond backend. Until now, it was not possible to have a mark like (:textnote "D#") - because lilypond would fail to compile the ly file -, this should be fixed now for :text :textdyn :texttempo :textnote. Cheers, Kilian

2 1

Re: [fomus-devel] REST
by David Psenicka 05 Feb '07

05 Feb '07

The following line fixes it: init :max-tuplet 9 It was doing the best it could with the a maximum of 7 which is the default. I'll raise the default max-tuplet to a higher number--7's too low anyways -David Rob Canning wrote: > maybe a bug? > > (init :output ((:musicxml-finale :filename "draft-clarinet-piece.xml")(:lilypond > :view t))); > init :filename "draft-clarinet-piece"; > (init :title "b" :subtitle "draft > score" :composer "rob canning"); > TIMESIG :OFF 0 :TIME (4 4); > init :verbose 2; > part 1 :name "clarinet" :instr :bf-clarinet; > (note 1 :off 0 :dur 0.111111 :notes (62) :marks (:staccato :p :ignore)) > ; > (note 1 :off 0.11111 :dur 0.111111 :notes (62) :marks (:staccato :p > :ignore)); > (note 1 :off 0.22222 :dur 0.111111 :notes (63) :marks (:staccato :p > :ignore)); > (note 1 :off 0.33333 :dur 0.111111 :notes (64) :marks (:staccato :p > :ignore)); > (note 1 :off 0.44444 :dur 0.111111 :notes (65) :marks (:staccato :p > :ignore)); > (note 1 :off 0.55555 :dur 0.111111 :notes (66) :marks (:staccato :p > :ignore)); > (note 1 :off 0.66666 :dur 0.111111 :notes (67) :marks (:staccato :p > :ignore)); > (note 1 :off 0.77777 :dur 0.111111 :notes (68) :marks (:staccato :p > :ignore)); > (note 1 :off 0.88888 :dur 0.111111 :notes (68) :marks (:staccato :p > :ignore)); > > ----------------------------------------------------------------- > Find the home of your dreams with eircom net property > Sign up for email alerts now http://www.eircom.net/propertyalerts > > > >

1 0

Re: [fomus-devel] REST
by Rob Canning 05 Feb '07

05 Feb '07

maybe a bug? (init :output ((:musicxml-finale :filename "draft-clarinet-piece.xml")(:lilypond :view t))); init :filename "draft-clarinet-piece"; (init :title "b" :subtitle "draft score" :composer "rob canning"); TIMESIG :OFF 0 :TIME (4 4); init :verbose 2; part 1 :name "clarinet" :instr :bf-clarinet; (note 1 :off 0 :dur 0.111111 :notes (62) :marks (:staccato :p :ignore)) ; (note 1 :off 0.11111 :dur 0.111111 :notes (62) :marks (:staccato :p :ignore)); (note 1 :off 0.22222 :dur 0.111111 :notes (63) :marks (:staccato :p :ignore)); (note 1 :off 0.33333 :dur 0.111111 :notes (64) :marks (:staccato :p :ignore)); (note 1 :off 0.44444 :dur 0.111111 :notes (65) :marks (:staccato :p :ignore)); (note 1 :off 0.55555 :dur 0.111111 :notes (66) :marks (:staccato :p :ignore)); (note 1 :off 0.66666 :dur 0.111111 :notes (67) :marks (:staccato :p :ignore)); (note 1 :off 0.77777 :dur 0.111111 :notes (68) :marks (:staccato :p :ignore)); (note 1 :off 0.88888 :dur 0.111111 :notes (68) :marks (:staccato :p :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] REST
by Rob Canning 02 Feb '07

02 Feb '07

how does rest work? i'm sure i had this working before... (note 1 :off 0 :dur 0.125 :notes (70) :marks (:staccato :mp :ignore)) ; (note 1 :off 0.125 :dur 0.125 :notes (65) :marks (:staccato :mp :ignore)) ; (rest 1 :off 0.25 :dur 0.125) ; (note 1 :off 0.375 :dur 0.125 :notes (71) :marks (:staccato :mp :ignore)) ;now i get: ;;; *****ERROR***** ;; No matching method for the generic function ;; #<STANDARD-GENERIC-FUNCTION EVENT-NOTE (1) {282E5501}>, when called with ;; arguments ;; (#Z(RESTEX :ID NIL :PARTID 1 :VOICE 1 :OFF 1/4 :DUR 1/8 :MARKS NIL :TUP (NIL) ;; :INV NIL)). thanks, rob

2 2

[fomus-devel] notation.dyne testing module
by Rob Canning 26 Jan '07

26 Jan '07

hello, i have packed a notation.dyne module that includes fomus and lilypond for the dynabolic and pure:dyne linux distrbutions info and download here: www.robcanning.info/dyne d y n e : b o l i c -- a free multimedia studio in a GNU/Linux live CD www.dynebolic.org Pure:Dyne http://puredyne.goto10.org/ regards, rob ----------------------------------------------------------------- Find the home of your dreams with eircom net property Sign up for email alerts now http://www.eircom.net/propertyalerts

1 0

Re: [fomus-devel] quantization - decimals v. fractions
by David Psenicka 25 Jan '07

25 Jan '07

1 1

Re: [fomus-devel] quantization - decimals v. fractions
by Rob Canning 25 Jan '07

25 Jan '07

rtfm i know! and found solution: init :double-dotted-notes NIL > > hi, > i would rather use decimals for durational values but the quantization wont make it look clean... example below > any idea what i am doing wrong? i'm using the latest tarball > many thanks > rob > > decimal v fraction example: > > (init :output ((:musicxml-finale :filename "draft-clarinet-piece.xml")(:lilypond > :view t))); > init :filename "draft-clarinet-piece"; > (init :title "work for clarinet and 4-channel tape" :subtitle "draft > score" :composer "rob canning"); > TIMESIG :OFF 0 :TIME (4 4); > init :verbose 2; > part 1 :name "clarinet" :instr :bf-clarinet; > (note 1 :off 0 :notes (66) :dur 0.33333 :marks (:ignore :p :ignore)) > ; > (note 1 :off 0.33333 :notes (66) :dur 0.33333 :marks (:ignore :p :ignore)) > ; > (note 1 :off 0.66666 :notes (67) :dur 0.33333 :marks (:ignore :p :ignore)) > ; > (note 1 :off 1 :notes (67) :dur 1 :marks (:ignore :p :ignore)) > ; > (note 1 :off 2 :notes (70) :dur 1/3 :marks (:ignore :p :ignore)); > (note 1 :off 2.333 :notes (64) :dur 1/3 :marks (:ignore :p :ignore)) > ; > (note 1 :off 2.666 :notes (65) :dur 1/3 :marks (:ignore :p :ignore)) > ; > (note 1 :off 3 :notes (67) :dur 1 :marks (:ignore :p :ignore)) > ; > > > ----------------------------------------------------------------- > 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(a)common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel > -------------------------------- www.robcanning.info -------------------------------- ----------------------------------------------------------------- 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] quantization - decimals v. fractions
by Rob Canning 25 Jan '07

25 Jan '07

hi, i would rather use decimals for durational values but the quantization wont make it look clean... example below any idea what i am doing wrong? i'm using the latest tarball many thanks rob decimal v fraction example: (init :output ((:musicxml-finale :filename "draft-clarinet-piece.xml")(:lilypond :view t))); init :filename "draft-clarinet-piece"; (init :title "work for clarinet and 4-channel tape" :subtitle "draft score" :composer "rob canning"); TIMESIG :OFF 0 :TIME (4 4); init :verbose 2; part 1 :name "clarinet" :instr :bf-clarinet; (note 1 :off 0 :notes (66) :dur 0.33333 :marks (:ignore :p :ignore)) ; (note 1 :off 0.33333 :notes (66) :dur 0.33333 :marks (:ignore :p :ignore)) ; (note 1 :off 0.66666 :notes (67) :dur 0.33333 :marks (:ignore :p :ignore)) ; (note 1 :off 1 :notes (67) :dur 1 :marks (:ignore :p :ignore)) ; (note 1 :off 2 :notes (70) :dur 1/3 :marks (:ignore :p :ignore)); (note 1 :off 2.333 :notes (64) :dur 1/3 :marks (:ignore :p :ignore)) ; (note 1 :off 2.666 :notes (65) :dur 1/3 :marks (:ignore :p :ignore)) ; (note 1 :off 3 :notes (67) :dur 1 :marks (:ignore :p :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] LilyPond.app
by Kilian Sprotte 13 Jan '07

13 Jan '07

Hi, first of all a question: Is anyone currently using LilyPond.app successfully with fomus? Which version? I just installed LilyPond.app 2.10, which fomus currently does not find. The solution seems to set *lilypond-exe* to "/Applications/LilyPond.app/Contents/Resources/bin/lilypond", which I tried to achieve by changing (find-exe "lilypond.sh" "LilyPond.app") to (find-exe "lilypond" "LilyPond.app"), but this unfortunately does not work, because it finds "/Applications/LilyPond.app/Contents/MacOS/ lilypond" instead (which belongs to the GUI app, I suppose). Since I dont know, how I can achieve this with find-exe, I did not commit anything, yet... (checked this on openmcl and sbcl, by the way) Greetings, Kilian

3 3

[fomus-devel] useless message
by Rick Taube 08 Jan '07

08 Jan '07

as a lowly user i find this message annoying! i have no idea what it means or how to fix it. i dont see a section on componets or modules in the top doc page. i dont know what ads is or why i should care about it. if its important then fomus should include interate or whatever and just load the thing. but i dont see the point of squawking about it everytime i boot. ;; NOTE: Can't compile/register module file "/Lisp/CM.app/Contents/ Resources/fomus/modules/ads.lisp" ; (component "iterate" not found) --rick

3 4

[fomus-devel] bug in acc-fakekeysig ?
by Kilian Sprotte 22 Dec '06

22 Dec '06

Hi, I currently cannot fomus the attached fomus.dbg file. Sorry David for not really looking into this right now - I think you will know much faster. What I can provide, however, is an overview over the revisions, where it works: :) 114: T 115: T 116: T 117: T 118: T 119: T 120: T 121: NIL - rev summary: key signatures 122: NIL 123: NIL 124: NIL 125: NIL 126: NIL 127: NIL 128: NIL 129: NIL 130: NIL 131: NIL 132: NIL 133: NIL 134: NIL 135: NIL 136: NIL 137: NIL 138: NIL 139: NIL The actual error I get: 139: No applicable method for args: (NIL) to #<STANDARD-GENERIC-FUNCTION FOMUS:EVENT-OFF #x85A959E> If I generally dont care about key-sigs, can I / should I turn it off completely ? Merry Xmas, Kilian

2 1

[fomus-devel] v0-2-14
by David Psenicka 14 Dec '06

14 Dec '06

v0.2.14 Fix in MIDI backend for instruments that don't have a MIDI program change number (defaults to 0) Support for key signatures finished (auto-accidentals algorithm takes key signature into account)--some testing/tweaking probably still needed

1 0

[fomus-devel] midi back end
by Rick Taube 10 Dec '06

10 Dec '06

i generated a .ly file PLUS midi without a part defintion. the .ly file worked but the midi file broke: CM> (events (simp 8 1/2 1/2 60 80 .3) "test.ly" :play t) Calling (FOMUS :PARTS (#Z(PART :ID NIL :PARTID 0 :NAME NIL :ABBREV NIL :INSTR NIL :EVENTS (#Z(NOTE :ID NIL :PARTID 0 :VOICE 1 :OFF 7/2 :DUR 1/2 :NOTE 75 :MARKS NIL) #Z(NOTE :ID NIL :PARTID 0 :VOICE 1 :OFF 3 :DUR 1/2 :NOTE 75 :MARKS NIL) #Z(NOTE :ID NIL :PARTID 0 :VOICE 1 :OFF 5/2 :DUR 1/2 :NOTE 69 :MARKS NIL) #Z(NOTE :ID NIL :PARTID 0 :VOICE 1 :OFF 2 :DUR 1/2 :NOTE 60 :MARKS NIL) #Z (NOTE :ID NIL :PARTID 0 :VOICE 1 :OFF 3/2 :DUR 1/2 :NOTE 67 :MARKS NIL) #Z(NOTE :ID NIL :PARTID 0 :VOICE 1 :OFF 1 :DUR 1/2 :NOTE 68 :MARKS NIL) #Z(NOTE :ID NIL :PARTID 0 :VOICE 1 :OFF 1/2 :DUR 1/2 :NOTE 79 :MARKS NIL) #Z(NOTE :ID NIL :PARTID 0 :VOICE 1 :OFF 0 :DUR 1/2 :NOTE 60 :MARKS NIL)) :PROPS NIL :OPTS NIL)) :GLOBAL NIL :OUTPUT ((:LILYPOND :FILENAME "test.ly" :VIEW T) (:MIDI :PLAY T))) ;; Formatting music... ;; Saving LilyPond file "/Users/hkt/test.ly"... ;; Compiling/opening "/Users/hkt/test.ly" for viewing... ;; Saving MIDI file "/tmp/fomus.mid"... Required arguments in NIL don't match lambda list (FOMUS::X &KEY FOMUS::PIZZ FOMUS::STOPPED OPEN FOMUS::HARMONIC). [Condition of type CCL::SIMPLE-PROGRAM-ERROR] Restarts: 0: [ABORT-REQUEST] Abort handling SLIME request. 1: [ABORT-BREAK] Reset this process 2: [ABORT] Kill this process Backtrace: 0: (CCL::%POP-REQUIRED-ARG-PTR 'NIL) 1: (FOMUS::SAVE-MIDI-AUX '(#Z(FOMUS:PARTEX :ID NIL :PARTID 0 :NAME NIL :ABBREV NIL :INSTR ...)) "/tmp/fomus.mid" '(:PLAY T) 'T) 2: (FOMUS::BACKEND ':MIDI "/tmp/fomus.mid" #P"/Users/hkt/" '(#Z (FOMUS:PARTEX :ID NIL :PARTID 0 :NAME NIL :ABBREV NIL :INSTR ...)) '(:PLAY T) 'T '(:PLAY T) '(:MIDI :PLAY T)) 3: (FOMUS::FOMUS-MAIN) 4: (FOMUS::RUN-FOMUS)

2 3

[fomus-devel] v0.2.13
by David Psenicka 08 Dec '06

08 Dec '06

I tested this version in CMUCL (Linux), SBCL (Linux), OpenMCL (OSX), CLISP (Linux and Windows) and LispWorks (OSX)--(I got stuck with Allegro's limited heap size using their free version, I'll have to figure out how to get around that). I couldn't replicate the LISP::CLOSED FLAME error, but I squashed other related bugs--if you're still getting the error, send me your "/tmp/fomus.dbg" file. Thanks again for your help.

1 0

[fomus-devel] LilyPond 2.10—10 years anniversary release
by Han-Wen Nienhuys 06 Dec '06

06 Dec '06

Utrecht the Netherlands—November, 2006. The initial inspiration for LilyPond came ten years ago when two musician friends grew disappointed with the bland and boring look of computer formatted scores. Every musician prefers to read beautiful music, so couldn't we programmers solve that printing problem? LilyPond just does that: it prints music in the best traditions of classical engraving with minimum fuss. Don't waste time on tuning spacing, moving around symbols, or shaping slurs. Impress friends and colleagues with sharp sheet music! Check out LilyPond at http://lilypond.org We are proud to announce the 10-year anniversary release, LilyPond version 2.10. NEW STUFF * Creating music with good page turning points is easier than ever. The new page breaking algorithm will tune both horizontal and vertical spacing. Hence, page turns will only fall at rests or places that you mark explicitly. * Flat music export format. LilyPond uses an elegant input format, that uses identifiers, arbitrary nested structures and inline Scheme expressions. While the format is easy to write and read for humans, it is less so for programs. With this release, Erik Sandberg has contributed internal rewrites that make it possible to output a much simpler intermediate format. In the long term, this will enable other programs to read LilyPond music. * Many small features and formatting improvements. This includes support for falls and doits, dashed barlines, al niente hairpins, right hand fingerings for guitar, better formatting of tied chords, automatic beaming and nested tuplets. A full list of new features is at http://lilypond.org/doc/v2.10/Documentation/topdocs/NEWS.html Enjoy! Han-Wen Nienhuys - Core development Jan Nieuwenhuizen - Core development Graham Percival - Documentation Editor and Bug Meister Mats Bengtsson - Support Guru Contributors Angelo Contardi, David Feuer, Erik Sandberg, Erlend Aasland, Guido Amoruso, Heikki Junes, and Joe Neeman. Sponsors Andrew Sidwell, Anthony Youngman , Chris Sawer, David Griffel, Jamie Bullock, Kieren MacMillan, Michael Meixner , Paul Scott, Rick Hansen, Steve Doonan, Trent Johnston, Trevor Bača, Vivian Barty-Taylor and William Wilson. Documentation helpers Cameron Horsburgh, Dave Luttinen, Eduardo Vieira, Erlend Aasland, Geoff Horton, and Juergen Reuter. Bughunters Albert Frantz, Arvid Grøtting, Anthony Youngman, Aurèle Duda, Ben Hoefer, Bernie Arai, Cameron Horsburgh, Charles Cave, Christian Hitz, Christopher Ellis, Claude Routhier, Colin Wilding, Daniel Tonda Castillo, David Rogers, Francisco Vila, Harald Wellmann, Henrik Frisk, Johannes Schindelin, John Williams, J. Leung, Karim Haddad, Karl Hammar, Keith Packard, Kieren MacMillan, Lee T. Wilkirson, Lieke van der Meer, Luc Wehli, Manuzhai, Mark Dewey, Marcus Macauley, Markus Schneider, Matti Aaltonen, Michael Meixner, Michael Welsh Duggan, Milan Zamazal, Orm Finnendahl, Paul Scott, Phillip Kirlin, Quentin Spencer, Rainer Typke, Rick Hansen, Rutger Helmers, Ruud van Silfhout, Sietse Brouwer, Stephen Carter, Stephen Kress, Thies Albrecht, Toine Schreurs, Trent Johnston, Trevor Bača, Trevor Daniels, Vaclav Smilauer, Vicente Solsona Dellá, Victor Eijkhout, Villum Sejersen, Werner Lemberg, Will Oram, and Zoltan V. Laszlo. -- Han-Wen Nienhuys - hanwen(a)xs4all.nl - http://www.xs4all.nl/~hanwen

4 6

[fomus-devel] New Unpaid Item Message from tany70 : #294653688662
by eBay＠common-lisp.net 19 Oct '06

19 Oct '06

1 0

[fomus-devel] fm + cm
by Kilian Sprotte 04 Oct '06

04 Oct '06

Hi! Loading fomus and then cm (with freshest versions) gives me the error below: > Error in process listener(3): Cannot IMPORT "KEYSIG" from package "FOMUS" Which package is more up to date here ? Cheers, Kilian Thats the whole story; $ openmcl Welcome to OpenMCL Version 1.0 (DarwinPPC32)! ? (oos 'load-op :fomus) ; loading system definition from /Users/ppp/.nkzs-reg/lisp-asd-reg/ fomus.asd into #<Package "ASDF120"> ; registering #<SYSTEM "fomus" #x8574C86> as fomus ; Warning: Haven't installed #Z, cause this dispatch char had already been taken. ; While executing: #<Anonymous Function #x85915EE> ;; FOMUS v0.2.11 ;; Lisp music notation formatter ;; Copyright (c) 2005, 2006 David Psenicka, All Rights Reserved ;; See file "COPYING" for terms of use and distribution. ;; Loading initialization file "/Users/ppp/.fomus"... NIL ? (load "/tmp/cm/cm.asd") #P"/private/tmp/cm/cm.asd" ? (oos 'load-op :cm) ; CM install directory: "/private/tmp/cm/" ; Compiling "src/pkg.lisp" > Error in process listener(3): Cannot IMPORT "KEYSIG" from package "FOMUS" > While executing: CCL::OPERATION-ON-ALL-SPECS > Type :GO to continue, :POP to abort. > If continued: Ignore attempt to IMPORT "KEYSIG" from package "FOMUS" Type :? for other options. 1 >

2 3

[fomus-devel] plugins changes
by Kilian Sprotte 04 Oct '06

04 Oct '06

Hi again, I have made some more changes to the plugins - there should not really be any changes from the user perspective (I hope, I did not break anything...). It should be possible now to load plugins with sbcl + asdf. Greetings, Kilian

1 0

Re: [fomus-devel] musicxml-finale output? ignore me!
by Rob Canning 04 Oct '06

04 Oct '06

sorry about the noise! ignore previous messages - got it figured - was running into trouble with the line break so needed to put an extra set of brackets around the the whole line... sorry ;) robcanning(a)eircom.net wrote: > > now i get this: > > ;;; *****ERROR***** > ;; Error in function LOAD-FOMUS-PLUGIN: > ;; Plugin MUSICXML-FINAL is not registered or does not exist > > i notice that the plugin folder inside the fomus folder is empty? > > is this me doing something wrong or somthing missing in fomus? > > thanks > > rob > > David Psenicka <dpsenick(a)uiuc.edu> wrote: > > > > > > > Rob Canning wrote: > > > how do i output a musicxml-finale file? > > > > > > this is what i'm trying: > > > > > > init :output (:lilypond :view t); > > > init :output (:musicxml-finale :filename "fomusxxxmmmmlll"); > > > > > > > > > > > > > if you're specifying two values for :output, then one will override the > > other----try this if you want both outputs: > > > > init :filename "/dir/xxxxx" > > ;; basename > > init :output (:musicxml-finale (:lilypond :view t)) > > > > > > you should get /dir/xxxxx.xml and /dir/xxxxx.ly > > > > > > or this: > > > > > > > > init :filename "/dir/xxxxx" > > init :output ((:musicxml-finale :filename "anotherfilename.xml") > > (:lilypond :view t)) > > > > > > you should ge t /dir/anotherfilename.xml and /dir/xxxxx.ly > > _______________________________________________ > > fomus-devel mailing list > > fomus-devel(a)common-lisp.net > > http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel > > > > -------------------------------- > www.robcanning.utvinternet.com > + 44 (0)20 77390206 > -------------------------------- > > ----------------------------------------------------------------- > 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(a)common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel > -------------------------------- www.robcanning.info -------------------------------- ----------------------------------------------------------------- Find the home of your dreams with eircom net property Sign up for email alerts now http://www.eircom.net/propertyalerts

3 6

[fomus-devel] musicxml-finale output?
by Rob Canning 21 Sep '06

21 Sep '06

how do i output a musicxml-finale file? this is what i'm trying: init :output (:lilypond :view t); init :output (:musicxml-finale :filename "fomusxxxmmmmlll"); thanks rob ----------------------------------------------------------------- Find the home of your dreams with eircom net property Sign up for email alerts now http://www.eircom.net/propertyalerts

3 4

Re: [fomus-devel] chord as string?
by Rob Canning 21 Sep '06

21 Sep '06

that'd be great! many thanks rob David Psenicka <dpsenick(a)uiuc.edu> wrote: > > I'll can add something in--it'll probably look like this: > > :note (60 67 68 75) > > > > > _______________________________________________ > fomus-devel mailing list > fomus-devel(a)common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel > ----------------------------------------------------------------- Find the home of your dreams with eircom net property Sign up for email alerts now http://www.eircom.net/propertyalerts

1 0

Re: [fomus-devel] musicxml-finale output?
by Rob Canning 21 Sep '06

21 Sep '06

now i get this: ;;; *****ERROR***** ;; Error in function LOAD-FOMUS-PLUGIN: ;; Plugin MUSICXML-FINAL is not registered or does not exist i notice that the plugin folder inside the fomus folder is empty? is this me doing something wrong or somthing missing in fomus? thanks rob David Psenicka <dpsenick(a)uiuc.edu> wrote: > > > Rob Canning wrote: > > how do i output a musicxml-finale file? > > > > this is what i'm trying: > > > > init :output (:lilypond :view t); > > init :output (:musicxml-finale :filename "fomusxxxmmmmlll"); > > > > > > > > if you're specifying two values for :output, then one will override the > other----try this if you want both outputs: > > init :filename "/dir/xxxxx" > ;; basename > init :output (:musicxml-finale (:lilypond :view t)) > > > you should get /dir/xxxxx.xml and /dir/xxxxx.ly > > > or this: > > > > init :filename "/dir/xxxxx" > init :output ((:musicxml-finale :filename "anotherfilename.xml") > (:lilypond :view t)) > > > you should ge t /dir/anotherfilename.xml and /dir/xxxxx.ly > _______________________________________________ > fomus-devel mailing list > fomus-devel(a)common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel > -------------------------------- www.robcanning.utvinternet.com + 44 (0)20 77390206 -------------------------------- ----------------------------------------------------------------- Find the home of your dreams with eircom net property Sign up for email alerts now http://www.eircom.net/propertyalerts

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

fomus-devel