From ml13 at onlinehome.de Sat Jan 7 13:35:30 2006 From: ml13 at onlinehome.de (ml13 at onlinehome.de) Date: Sat, 7 Jan 2006 14:35:30 +0100 Subject: [fomus-devel] tremolo In-Reply-To: <437BEA17.3020902@uiuc.edu> References: <42EA7C44.30505@uiuc.edu> <437BEA17.3020902@uiuc.edu> Message-ID: Hi, this is just a quick note to tell you that - although the tremolo facility is pretty nice - I am having problems with the following: (fomus:fomus-init :backend '(:lilypond :view t)) (fomus:fomus-newpart 1 :name "p1") (fomus:fomus-newnote 1 :off 0 :dur 4/3 :note '(77 0) :marks '((:tremolofirst) :mf)) (fomus:fomus-newnote 1 :off 0 :dur 4/3 :note '(64 0) :marks '((:tremolosecond))) (fomus:fomus-newnote 1 :off 3 :dur 1 :note '(74 0) :marks '((:tremolofirst))) (fomus:fomus-newnote 1 :off 3 :dur 1 :note '(67 0) :marks '((:tremolosecond))) (fomus:fomus-exec) Happy New Year! Kilian From dpsenick at uiuc.edu Sun Jan 8 04:37:17 2006 From: dpsenick at uiuc.edu (David Psenicka) Date: Sat, 07 Jan 2006 22:37:17 -0600 Subject: [fomus-devel] tremolo In-Reply-To: References: <42EA7C44.30505@uiuc.edu> <437BEA17.3020902@uiuc.edu> Message-ID: <43C096FD.5030707@uiuc.edu> Thanks--I think the latest update should work now--I'm going to be straightening up a lot of these things and finishing up unfinished code in the next few weeks, so any bug reports, complaints, etc. will be much appreciated. I'd welcome any ideas or comments about the interface too, if anyone has any--especially if there are any settings that are too complicated, excessive, ineffective, ambiguous, etc.. -David ml13 at onlinehome.de wrote: > Hi, > > this is just a quick note to tell you that - although the tremolo > facility is pretty nice - I am having problems with the following: > > (fomus:fomus-init :backend '(:lilypond :view t)) > > (fomus:fomus-newpart 1 :name "p1") > (fomus:fomus-newnote 1 :off 0 :dur 4/3 :note '(77 0) :marks > '((:tremolofirst) :mf)) > (fomus:fomus-newnote 1 :off 0 :dur 4/3 :note '(64 0) :marks > '((:tremolosecond))) > (fomus:fomus-newnote 1 :off 3 :dur 1 :note '(74 0) :marks > '((:tremolofirst))) > (fomus:fomus-newnote 1 :off 3 :dur 1 :note '(67 0) :marks > '((:tremolosecond))) > > (fomus:fomus-exec) > > > Happy New Year! > > Kilian > > > > _______________________________________________ > fomus-devel mailing list > fomus-devel at common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel > From ml13 at onlinehome.de Tue Jan 10 11:19:10 2006 From: ml13 at onlinehome.de (ml13 at onlinehome.de) Date: Tue, 10 Jan 2006 12:19:10 +0100 Subject: [fomus-devel] timesig In-Reply-To: <43C096FD.5030707@uiuc.edu> References: <42EA7C44.30505@uiuc.edu> <437BEA17.3020902@uiuc.edu> <43C096FD.5030707@uiuc.edu> Message-ID: <7B1B866D-677F-4931-B498-7E70DE0F027D@onlinehome.de> Hi, for some reason fomus wants to make a 5/8 + a 3/8 into a 8/8 in the the following snippet. I will be using fomus quite regularly the next days and keep on pasting my observations. I could also try to give some comments on the interface and settings, if I have some more time after this hot period. I will surely also play around with the quant settings - for the moment, I will use :max-tuplet-dur 1, which seems to work nicely. If you speak about a "beat", do you always mean a quarter beat, regardless of time signature ? (I think that's good...) Cheers, Kilian (fomus:fomus-init :backend '(:lilypond :view t) :auto-accidentals nil) (fomus:fomus-newpart 2) (fomus:fomus-newtimesig :off 0 :time '(3 8)) (fomus:fomus-newnote 2 :off 0 :dur 1/2 :note '(74 0) :marks '(:accent :mf)) (fomus:fomus-newnote 2 :off 1/2 :dur 1/2 :note '(71 0) :marks nil) (fomus:fomus-newnote 2 :off 1 :dur 1/2 :note '(74 0) :marks nil) (fomus:fomus-newtimesig :off 3/2 :time '(5 8)) (fomus:fomus-newnote 2 :off 3/2 :dur 1/2 :note '(74 0) :marks '(:accent)) (fomus:fomus-newnote 2 :off 2 :dur 1/2 :note '(67 0) :marks nil) (fomus:fomus-newnote 2 :off 5/2 :dur 1/2 :note '(67 0) :marks nil) (fomus:fomus-newnote 2 :off 3 :dur 1/2 :note '(71 0) :marks nil) (fomus:fomus-newnote 2 :off 7/2 :dur 1/2 :note '(74 0) :marks nil) (fomus:fomus-newtimesig :off 4 :time '(3 8)) (fomus:fomus-newnote 2 :off 4 :dur 1/2 :note '(74 0) :marks '(:accent)) (fomus:fomus-newnote 2 :off 9/2 :dur 1/2 :note '(74 0) :marks nil) (fomus:fomus-newnote 2 :off 5 :dur 1/2 :note '(67 0) :marks nil) (fomus:fomus-newtimesig :off 11/2 :time '(5 8)) (fomus:fomus-newnote 2 :off 11/2 :dur 1/2 :note '(74 0) :marks '(:accent)) (fomus:fomus-newnote 2 :off 6 :dur 1/2 :note '(71 0) :marks nil) (fomus:fomus-newnote 2 :off 13/2 :dur 1/2 :note '(74 0) :marks nil) (fomus:fomus-newnote 2 :off 7 :dur 1/2 :note '(71 0) :marks nil) (fomus:fomus-newnote 2 :off 15/2 :dur 1/2 :note '(67 0) :marks nil) (fomus:fomus-newtimesig :off 8 :time '(5 8)) (fomus:fomus-newnote 2 :off 8 :dur 1/2 :note '(74 0) :marks '(:accent)) (fomus:fomus-newnote 2 :off 17/2 :dur 1/2 :note '(71 0) :marks nil) (fomus:fomus-newnote 2 :off 9 :dur 1/2 :note '(74 0) :marks nil) (fomus:fomus-newnote 2 :off 19/2 :dur 1/2 :note '(67 0) :marks nil) (fomus:fomus-newnote 2 :off 10 :dur 1/2 :note '(71 0) :marks nil) (fomus:fomus-exec) -------------- next part -------------- An HTML attachment was scrubbed... URL: From dpsenick at uiuc.edu Tue Jan 10 17:44:21 2006 From: dpsenick at uiuc.edu (David Psenicka) Date: Tue, 10 Jan 2006 11:44:21 -0600 Subject: [fomus-devel] timesig In-Reply-To: <7B1B866D-677F-4931-B498-7E70DE0F027D@onlinehome.de> References: <42EA7C44.30505@uiuc.edu> <437BEA17.3020902@uiuc.edu> <43C096FD.5030707@uiuc.edu> <7B1B866D-677F-4931-B498-7E70DE0F027D@onlinehome.de> Message-ID: <43C3F275.9040701@uiuc.edu> An HTML attachment was scrubbed... URL: From ml13 at onlinehome.de Tue Jan 10 19:04:02 2006 From: ml13 at onlinehome.de (ml13 at onlinehome.de) Date: Tue, 10 Jan 2006 20:04:02 +0100 Subject: [fomus-devel] timesig In-Reply-To: <43C3F1CD.7000901@uiuc.edu> References: <42EA7C44.30505@uiuc.edu> <437BEA17.3020902@uiuc.edu> <43C096FD.5030707@uiuc.edu> <7B1B866D-677F-4931-B498-7E70DE0F027D@onlinehome.de> <43C3F1CD.7000901@uiuc.edu> Message-ID: <9D8BA008-A81C-4717-A7F1-6F155D00B6A4@onlinehome.de> Hi David, thats very good news!! You see that I haven't really studied the fomus settings so well, yet (although there are documented very well...) - sorry. Ciao, Kilian Am 10.01.2006 um 18:41 schrieb David Psenicka: > Thanks--I'll put the tremolos on the todo list, that's something I > overlooked. The beat defaults to 1/4 (quarter note duration), but > can be changed w/ :default-beat and in the time signature objects > (in compound meters it defaults to the beat implied by the time > signature). > > Actually, the 3/8 gets added to the 5/8 because by default any > measure smaller than 2 beats is merged into the measure preceding > it--you can change the duration with :min-auto-timesig-dur, so > > (fomus:fomus-init :backend '(:lilypond :view t) :auto-accidentals > nil :min-auto-timesig-dur 3/2) > > should get you what you want. You can turn off the auto- > rearranging too (:auto-override-timesigs nil) > > -David > > ml13 at onlinehome.de wrote: >> Hi, >> >> for some reason fomus wants to make a 5/8 + a 3/8 into a 8/8 in >> the the following snippet. I will be using fomus quite regularly >> the next days and keep on pasting my observations. I could also >> try to give some comments on the interface and settings, if I have >> some more time after this hot period. I will surely also play >> around with the quant settings - for the moment, I will use :max- >> tuplet-dur 1, which seems to work nicely. If you speak about a >> "beat", do you always mean a quarter beat, regardless of time >> signature ? (I think that's good...) >> >> Cheers, >> Kilian >> >> >> (fomus:fomus-init :backend '(:lilypond :view t) :auto-accidentals >> nil) >> (fomus:fomus-newpart 2) >> (fomus:fomus-newtimesig :off 0 :time '(3 8)) >> (fomus:fomus-newnote 2 :off 0 :dur 1/2 :note '(74 0) :marks >> '(:accent :mf)) >> (fomus:fomus-newnote 2 :off 1/2 :dur 1/2 :note '(71 0) :marks nil) >> (fomus:fomus-newnote 2 :off 1 :dur 1/2 :note '(74 0) :marks nil) >> (fomus:fomus-newtimesig :off 3/2 :time '(5 8)) >> (fomus:fomus-newnote 2 :off 3/2 :dur 1/2 :note '(74 0) :marks >> '(:accent)) >> (fomus:fomus-newnote 2 :off 2 :dur 1/2 :note '(67 0) :marks nil) >> (fomus:fomus-newnote 2 :off 5/2 :dur 1/2 :note '(67 0) :marks nil) >> (fomus:fomus-newnote 2 :off 3 :dur 1/2 :note '(71 0) :marks nil) >> (fomus:fomus-newnote 2 :off 7/2 :dur 1/2 :note '(74 0) :marks nil) >> (fomus:fomus-newtimesig :off 4 :time '(3 8)) >> (fomus:fomus-newnote 2 :off 4 :dur 1/2 :note '(74 0) :marks >> '(:accent)) >> (fomus:fomus-newnote 2 :off 9/2 :dur 1/2 :note '(74 0) :marks nil) >> (fomus:fomus-newnote 2 :off 5 :dur 1/2 :note '(67 0) :marks nil) >> (fomus:fomus-newtimesig :off 11/2 :time '(5 8)) >> (fomus:fomus-newnote 2 :off 11/2 :dur 1/2 :note '(74 0) :marks >> '(:accent)) >> (fomus:fomus-newnote 2 :off 6 :dur 1/2 :note '(71 0) :marks nil) >> (fomus:fomus-newnote 2 :off 13/2 :dur 1/2 :note '(74 0) :marks nil) >> (fomus:fomus-newnote 2 :off 7 :dur 1/2 :note '(71 0) :marks nil) >> (fomus:fomus-newnote 2 :off 15/2 :dur 1/2 :note '(67 0) :marks nil) >> (fomus:fomus-newtimesig :off 8 :time '(5 8)) >> (fomus:fomus-newnote 2 :off 8 :dur 1/2 :note '(74 0) :marks >> '(:accent)) >> (fomus:fomus-newnote 2 :off 17/2 :dur 1/2 :note '(71 0) :marks nil) >> (fomus:fomus-newnote 2 :off 9 :dur 1/2 :note '(74 0) :marks nil) >> (fomus:fomus-newnote 2 :off 19/2 :dur 1/2 :note '(67 0) :marks nil) >> (fomus:fomus-newnote 2 :off 10 :dur 1/2 :note '(71 0) :marks nil) >> (fomus:fomus-exec) >> >> >> >> _______________________________________________ >> fomus-devel mailing list >> fomus-devel at common-lisp.net >> http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel >> -------------- next part -------------- An HTML attachment was scrubbed... URL: From ml13 at onlinehome.de Wed Jan 11 16:51:49 2006 From: ml13 at onlinehome.de (Kilian Sprotte) Date: Wed, 11 Jan 2006 17:51:49 +0100 Subject: [fomus-devel] snippet-of-the-day Message-ID: <04A11AC8-ECE0-4D11-AB55-4D1EE7A7CDD9@onlinehome.de> Hi, what makes we very happy today is that fomus accepts notes before the actual parts are created (the violin is just a dummy instr....)!! A minor issue that I have is that the :auto-grace-slurs nil setting does not seem to work (neither lilypond 2.6.4 nor 2.4.5). Busy greetings, Kilian (fomus:fomus-init :backend '(:lilypond :view t) :auto-grace-slurs nil :auto-accidentals nil :max-tuplet-dur 1) (fomus:fomus-newnote 1 :off 0 :dur 3/2 :note '(69 0) :marks '((:texttempo "q=72") :accent :mf)) (fomus:fomus-newnote 1 :off 3/2 :dur 5/6 :note '(69 0) :marks nil) (fomus:fomus-newnote 1 :off 7/3 :dur '(1/2 0) :note '(69 0) :marks nil) (fomus:fomus-newnote 1 :off 7/3 :dur '(1/2 1) :note '(69 0) :marks nil) (fomus:fomus-newnote 1 :off 7/3 :dur 1/3 :note '(69 0) :marks nil) (fomus:fomus-newnote 1 :off 8/3 :dur 4/3 :note '(69 0) :marks nil) (fomus:fomus-newpart 1 :name "P1" :instr :violin) (fomus:fomus-newpart 2 :name "P1" :instr :violin) (fomus:fomus-newpart 3 :name "P2" :instr :violin) (fomus:fomus-newpart 4 :name "P2" :instr :violin) (fomus:fomus-exec) From ml13 at onlinehome.de Fri Jan 13 13:49:49 2006 From: ml13 at onlinehome.de (Kilian Sprotte) Date: Fri, 13 Jan 2006 14:49:49 +0100 Subject: [fomus-devel] intermediate files Message-ID: <07E782B1-652C-417A-A219-8FEB617C8C1C@onlinehome.de> Hi, just as an idea, it could be nice to have an option like :delete- intermediate-files in the ly backend. I am not sure, whether lilypond allows for doing this directly, but it could be most simple anyway to do something like the appended diff. Cheers and have a wonderful day, Kilian Sprotte PS: Are you using emacs to edit the code? I sometimes wonder, what a big screen you must have.... ;-) --- orig/backend_ly.lisp +++ mod/backend_ly.lisp @@ -51,6 +51,10 @@ (append (or exe-opts +lilypond-opts+) (list filename)) :wait t #|:output *standard-output*|#) (progn (unless (probe-file (change-filename filename :ext (or out-ext +lilypond-out-ext+))) (er "compiling")) + (ignore-errors (delete-file (change-filename filename :ext "dvi")) + (delete-file (change-filename filename :ext "log")) + (delete-file (change-filename filename :ext "ps")) + (delete-file (change-filename filename :ext "tex"))) (when view (unless (#+cmu extensions:run-program #+sbcl sb-ext:run-program # +openmcl ccl:run-program (or view-exe +lilypond-view-exe+) (append (or view-exe-opts +lilypond-view-opts+) (list (change-filename filename :ext (or out-ext +lilypond-out-ext+)))) From dpsenick at uiuc.edu Fri Jan 13 18:52:13 2006 From: dpsenick at uiuc.edu (David Psenicka) Date: Fri, 13 Jan 2006 12:52:13 -0600 Subject: [fomus-devel] snippet-of-the-day In-Reply-To: <04A11AC8-ECE0-4D11-AB55-4D1EE7A7CDD9@onlinehome.de> References: <04A11AC8-ECE0-4D11-AB55-4D1EE7A7CDD9@onlinehome.de> Message-ID: <43C7F6DD.5050602@uiuc.edu> Thanks, I'll see if I can get another update out this weekend--I might have MusicXML & CMN working by then, too (or at least one of them). -David Kilian Sprotte wrote: > Hi, > > what makes we very happy today is that fomus accepts notes before the > actual parts are > created (the violin is just a dummy instr....)!! > > A minor issue that I have is that the :auto-grace-slurs nil setting > does not seem to work (neither lilypond 2.6.4 nor > 2.4.5). > > Busy greetings, > > Kilian > > > (fomus:fomus-init :backend '(:lilypond :view t) > :auto-grace-slurs nil > :auto-accidentals nil > :max-tuplet-dur 1) > (fomus:fomus-newnote 1 :off 0 :dur 3/2 :note '(69 0) :marks > '((:texttempo "q=72") :accent :mf)) > (fomus:fomus-newnote 1 :off 3/2 :dur 5/6 :note '(69 0) :marks nil) > (fomus:fomus-newnote 1 :off 7/3 :dur '(1/2 0) :note '(69 0) :marks nil) > (fomus:fomus-newnote 1 :off 7/3 :dur '(1/2 1) :note '(69 0) :marks nil) > (fomus:fomus-newnote 1 :off 7/3 :dur 1/3 :note '(69 0) :marks nil) > (fomus:fomus-newnote 1 :off 8/3 :dur 4/3 :note '(69 0) :marks nil) > (fomus:fomus-newpart 1 :name "P1" :instr :violin) > (fomus:fomus-newpart 2 :name "P1" :instr :violin) > (fomus:fomus-newpart 3 :name "P2" :instr :violin) > (fomus:fomus-newpart 4 :name "P2" :instr :violin) > (fomus:fomus-exec) > > > _______________________________________________ > fomus-devel mailing list > fomus-devel at common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel > From dpsenick at uiuc.edu Thu Jan 19 01:35:15 2006 From: dpsenick at uiuc.edu (David Psenicka) Date: Wed, 18 Jan 2006 19:35:15 -0600 Subject: [fomus-devel] intermediate files In-Reply-To: <07E782B1-652C-417A-A219-8FEB617C8C1C@onlinehome.de> References: <07E782B1-652C-417A-A219-8FEB617C8C1C@onlinehome.de> Message-ID: <43CEECD3.4010802@uiuc.edu> This update should fix a few things--the delete-temp-files is a nice idea--I changed the code a bit so it works with the user setting for target output file (actually, the default output is ps--pdf never seems to work well and Apple's previewer does much better at converting the ps to pdf). Kilian Sprotte wrote: > Hi, > > just as an idea, it could be nice to have an option like :delete- > intermediate-files in the ly backend. I am not sure, whether lilypond > allows for doing this directly, but it could be most simple anyway to > do something like the appended diff. > > Cheers and have a wonderful day, > > Kilian Sprotte > > PS: Are you using emacs to edit the code? I sometimes wonder, what a > big screen you must have.... ;-) > And tiny little fonts... > --- orig/backend_ly.lisp > +++ mod/backend_ly.lisp > @@ -51,6 +51,10 @@ > (append (or exe-opts +lilypond-opts+) (list filename)) > :wait t #|:output *standard-output*|#) > (progn > (unless (probe-file (change-filename filename :ext (or > out-ext +lilypond-out-ext+))) (er "compiling")) > + (ignore-errors (delete-file (change-filename filename :ext > "dvi")) > + (delete-file (change-filename filename :ext "log")) > + (delete-file (change-filename filename :ext "ps")) > + (delete-file (change-filename filename :ext "tex"))) > (when view > (unless (#+cmu extensions:run-program #+sbcl > sb-ext:run-program # +openmcl ccl:run-program (or view-exe > +lilypond-view-exe+) > (append (or view-exe-opts +lilypond-view-opts+) > (list (change-filename filename :ext (or out-ext +lilypond-out-ext+)))) > > > > > _______________________________________________ > fomus-devel mailing list > fomus-devel at common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel > From ml13 at onlinehome.de Fri Jan 20 10:33:01 2006 From: ml13 at onlinehome.de (Kilian Sprotte) Date: Fri, 20 Jan 2006 11:33:01 +0100 Subject: [fomus-devel] intermediate files In-Reply-To: <43CEECD3.4010802@uiuc.edu> References: <07E782B1-652C-417A-A219-8FEB617C8C1C@onlinehome.de> <43CEECD3.4010802@uiuc.edu> Message-ID: <86E60A96-5534-4154-9994-9636A1F2F3F8@onlinehome.de> Hi, thanks for the new update!! Am 19.01.2006 um 02:35 schrieb David Psenicka: > This update should fix a few things--the delete-temp-files is a > nice idea--I changed the code a bit so it works with the user > setting for target output file (actually, the default output is ps-- > pdf never seems to work well and Apple's previewer does much better > at converting the ps to pdf). I actually made the opposite experience... If I use tempo markup, the Apple previewer refuses to do the conversion and also this conversion progress bar annoys me.... But thank you for those general settings anyway (I overlooked that...)! One issue that seems to remain (inside the lilypond backend, I suppose), is the immediate start of a new wedge, after one has finished as in the following: (fomus:fomus-init :backend '(:lilypond :view t) :filename "/tmp/ fomus" :auto-accidentals nil) (fomus:fomus-newpart 2 :instr :violin) (fomus:fomus-newnote 2 :off 0 :dur 1 :note '(77 0) :marks '(:startwedge< :pp)) (fomus:fomus-newnote 2 :off 1 :dur 1 :note '(77 0) :marks '(:wedge<)) (fomus:fomus-newnote 2 :off 2 :dur 1 :note '(77 0) :marks '(:endwedge< :startwedge> :f)) (fomus:fomus-newnote 2 :off 3 :dur 1 :note '(77 0) :marks '(:endwedge> :mf)) (fomus:fomus-exec) Sorry for never sending that official debug file - just tell me if thats needed. Cheers, -Kilian From dpsenick at uiuc.edu Thu Jan 26 06:59:25 2006 From: dpsenick at uiuc.edu (David Psenicka) Date: Thu, 26 Jan 2006 00:59:25 -0600 Subject: [fomus-devel] intermediate files In-Reply-To: <86E60A96-5534-4154-9994-9636A1F2F3F8@onlinehome.de> References: <07E782B1-652C-417A-A219-8FEB617C8C1C@onlinehome.de> <43CEECD3.4010802@uiuc.edu> <86E60A96-5534-4154-9994-9636A1F2F3F8@onlinehome.de> Message-ID: <43D8734D.2050808@uiuc.edu> Some more bug fixes... The program runs in Allegro 7 (and probably 5, 6) now, and I'll test it in Windows shortly... Maybe I should set the OS X default to pdf then. The problems I had going straight to pdf (with Lilypond or Ghostscript) had to do with some missing slurs and problems with text, but this was a while ago when I was fiddling around with this... -David Kilian Sprotte wrote: > Hi, > > thanks for the new update!! > > Am 19.01.2006 um 02:35 schrieb David Psenicka: > >> This update should fix a few things--the delete-temp-files is a nice >> idea--I changed the code a bit so it works with the user setting for >> target output file (actually, the default output is ps-- pdf never >> seems to work well and Apple's previewer does much better at >> converting the ps to pdf). > > > I actually made the opposite experience... If I use tempo markup, the > Apple previewer refuses to do the conversion and also this conversion > progress bar annoys me.... > > But thank you for those general settings anyway (I overlooked that...)! > > One issue that seems to remain (inside the lilypond backend, I > suppose), is the immediate start of a new wedge, after one has > finished as in the following: > > (fomus:fomus-init :backend '(:lilypond :view t) :filename "/tmp/ > fomus" :auto-accidentals nil) > (fomus:fomus-newpart 2 :instr :violin) > (fomus:fomus-newnote 2 :off 0 :dur 1 :note '(77 0) :marks > '(:startwedge< :pp)) > (fomus:fomus-newnote 2 :off 1 :dur 1 :note '(77 0) :marks '(:wedge<)) > (fomus:fomus-newnote 2 :off 2 :dur 1 :note '(77 0) :marks > '(:endwedge< :startwedge> :f)) > (fomus:fomus-newnote 2 :off 3 :dur 1 :note '(77 0) :marks > '(:endwedge> :mf)) > (fomus:fomus-exec) > > Sorry for never sending that official debug file - just tell me if > thats needed. > > Cheers, > > -Kilian > > > _______________________________________________ > fomus-devel mailing list > fomus-devel at common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel > From ml13 at onlinehome.de Thu Jan 26 19:47:52 2006 From: ml13 at onlinehome.de (Kilian Sprotte) Date: Thu, 26 Jan 2006 20:47:52 +0100 Subject: [fomus-devel] wedges In-Reply-To: <43D8734D.2050808@uiuc.edu> References: <07E782B1-652C-417A-A219-8FEB617C8C1C@onlinehome.de> <43CEECD3.4010802@uiuc.edu> <86E60A96-5534-4154-9994-9636A1F2F3F8@onlinehome.de> <43D8734D.2050808@uiuc.edu> Message-ID: <9F78510E-DA85-40EB-9A52-CFF2894B9CD7@onlinehome.de> Hi David, thanks for your fixes, its very nice to see those wedges correct :) Am 26.01.2006 um 07:59 schrieb David Psenicka: > Some more bug fixes... The program runs in Allegro 7 (and probably > 5, 6) now, and I'll test it in Windows shortly... That sounds good (although I wont have the possibility to test Allegro...). Sorry to come back to the wedges once more. First a general question: In the example q q q q | p<-<-<-<-<-<-f>->->-mf which was created by :startwedge< :wedge< :endwedge< :startwedge> :endwedge> would it also be okay to write :startwedge< :wedge< :wedge< :startwedge> :wedge> or in other words, are there two possibilities to specify a wedge? One, with startwedge wedge* endwedge and the other with startwedge wedge*, where the last wedge "means" endwedge? (I suppose the latter could be generated more easily in a CM process, was that your reason to do it like that?) Now I have a problem once again, sorry, if I turn things around a bit: q q q q | p<-<-<-<-<-<-f<-<-<-ff (Why not a split crescendo.... ;-) ) (fomus:fomus-init :backend '(:lilypond :view t) :filename "/tmp/ fomus" :auto-accidentals nil) (fomus:fomus-newpart 2 :instr :violin) (fomus:fomus-newnote 2 :off 0 :dur 1 :note '(77 0) :marks '(:startwedge< :pp)) (fomus:fomus-newnote 2 :off 1 :dur 1 :note '(77 0) :marks '(:wedge<)) (fomus:fomus-newnote 2 :off 2 :dur 1 :note '(77 0) :marks '(:endwedge< :startwedge< :f)) (fomus:fomus-newnote 2 :off 3 :dur 1 :note '(77 0) :marks '(:endwedge< :FF)) (fomus:fomus-exec) In my printout, the first wedge does not continue to the third note anymore, but stops on the second. -Kilian > > Kilian Sprotte wrote: > >> Hi, >> >> thanks for the new update!! >> >> Am 19.01.2006 um 02:35 schrieb David Psenicka: >> >>> This update should fix a few things--the delete-temp-files is a >>> nice idea--I changed the code a bit so it works with the user >>> setting for target output file (actually, the default output is >>> ps-- pdf never seems to work well and Apple's previewer does much >>> better at converting the ps to pdf). >> >> >> I actually made the opposite experience... If I use tempo markup, >> the Apple previewer refuses to do the conversion and also this >> conversion progress bar annoys me.... >> >> But thank you for those general settings anyway (I overlooked >> that...)! >> >> One issue that seems to remain (inside the lilypond backend, I >> suppose), is the immediate start of a new wedge, after one has >> finished as in the following: >> >> (fomus:fomus-init :backend '(:lilypond :view t) :filename "/tmp/ >> fomus" :auto-accidentals nil) >> (fomus:fomus-newpart 2 :instr :violin) >> (fomus:fomus-newnote 2 :off 0 :dur 1 :note '(77 0) :marks >> '(:startwedge< :pp)) >> (fomus:fomus-newnote 2 :off 1 :dur 1 :note '(77 0) :marks '(:wedge<)) >> (fomus:fomus-newnote 2 :off 2 :dur 1 :note '(77 0) :marks >> '(:endwedge< :startwedge> :f)) >> (fomus:fomus-newnote 2 :off 3 :dur 1 :note '(77 0) :marks >> '(:endwedge> :mf)) >> (fomus:fomus-exec) >> >> Sorry for never sending that official debug file - just tell me >> if thats needed. >> >> Cheers, >> >> -Kilian >> >> >> _______________________________________________ >> fomus-devel mailing list >> fomus-devel at common-lisp.net >> http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel >> > _______________________________________________ > fomus-devel mailing list > fomus-devel at common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/fomus-devel -------------- next part -------------- An HTML attachment was scrubbed... URL: From dpsenick at uiuc.edu Sat Jan 28 06:46:33 2006 From: dpsenick at uiuc.edu (David Psenicka) Date: Sat, 28 Jan 2006 00:46:33 -0600 Subject: [fomus-devel] wedges In-Reply-To: <9F78510E-DA85-40EB-9A52-CFF2894B9CD7@onlinehome.de> References: <07E782B1-652C-417A-A219-8FEB617C8C1C@onlinehome.de> <43CEECD3.4010802@uiuc.edu> <86E60A96-5534-4154-9994-9636A1F2F3F8@onlinehome.de> <43D8734D.2050808@uiuc.edu> <9F78510E-DA85-40EB-9A52-CFF2894B9CD7@onlinehome.de> Message-ID: <43DB1349.8060301@uiuc.edu> An HTML attachment was scrubbed... URL: