fomus-devel

fomus-devel@common-lisp.net

100 discussions

[fomus-devel] text mode examples
by rob canning 28 Aug '06

28 Aug '06

hello, i have just found fomus! this is exactly what i have been looking for - many thanks for your work. i am currently working on a genetic algorithm music composition software in pure-data and have been struggling trying to convert my data into lilypond format. perhaps with fomus this will no longer be a problem for me. i have been looking at the examples and have the following question/request: i will be using fomus in text interface mode and would love to see some examples which include data other than pitch duration and onset just so i can get an idea of how my data should be formatted. note 1 :off 0 :dur 1 :note 60 :mark attack :dynamic ppp note 1 :off 1 :dur 1 :note 62 :mark staccato :dynamic fff i know this is wrong but i would like to know the right way to include articulation and dynamic material for example. I promise to bury myself in the documentation soon ;-) many thanks again for this software - i think it will save me a lot of headaches in the future, best regards, rob canning www.robcanning.info running fomus on Pure:Dyne linux with --cmucl and lilypond

2 1

[fomus-devel] Error: NIL is not a number
by Brian 08 Aug '06

08 Aug '06

Hi, I've just set up fomus on cygwin (clisp, cm) but I'm having a little trouble getting it working. I'm just trying the first example in the docs as listed below but I get an error message: "*** - -: NIL is not a number". I know this is a pretty common Lisp error (excuse the unintentional pun!) but I'm not sure where I should be looking to resolve it. Any suggestions would be very much appreciated. Thanks a million, Brian This is the example code: ------------------------- (fomus :output '(:lilypond :view t) :ensemble-type :orchestra :parts (list (make-part :name "Piano" :instr :piano :events (loop for off from 0 to 10 by 1/2 collect (make-note :off off :dur (if (< off 10) 1/2 1) :note (+ 48 (random 25)) :marks (when (<= (random 3) 0) '(:staccato))))))) This is the error message I'm getting (including some initial startup warnings): ------------------------------------------ CM[1]> (load "/usr/local/lisp/fomus/load.lisp") ... WARNING: DEFUN/DEFMACRO: redefining function MAKE-PART in /usr/local/lisp/fomus/classes.fas, was defined in /usr/local/lisp/cm/bin/clisp_2.38_cygwin_nt-5.1-i686/pkg.fas WARNING: DEFUN/DEFMACRO: redefining function MAKE-NOTE in /usr/local/lisp/fomus/classes.fas, was defined in /usr/local/lisp/cm/bin/clisp_2.38_cygwin_nt-5.1-i686/pkg.fas ... WARNING: DEFUN/DEFMACRO: redefining function GET-INSTR-SYMS in /usr/local/lisp/fomus/util.fas, was defined in /usr/local/lisp/cm/bin/clisp_2.38_cygwin_nt-5.1-i686/pkg.fas ... WARNING: DEFUN/DEFMACRO: redefining function FOMUS in /usr/local/lisp/fomus/interface.fas, was defined in /usr/local/lisp/cm/bin/clisp_2.38_cygwin_nt-5.1-i686/pkg.fas WARNING: DEFUN/DEFMACRO: redefining function FOMUS-FILE in /usr/local/lisp/fomus/interface.fas, was defined in /usr/local/lisp/cm/bin/clisp_2.38_cygwin_nt-5.1-i686/fomus.fas ... ;; FOMUS v0.2.1 ;; Lisp music notation formatter ;; Copyright (c) 2005, 2006 David Psenicka, All Rights Reserved ;; See file "COPYING" for terms of use and distribution. ;; Loaded file /usr/local/lisp/fomus/final.fas ;; Loaded file /usr/local/lisp/fomus/load.lisp T CM[2]> (fomus "/usr/local/lisp/fomus1.txt") ;; Loading input file "/usr/local/lisp/fomus1.txt"... ;; Formatting music... *** - -: NIL is not a number The following restarts are available: USE-VALUE :R1 You may input a value to be used instead. ABORT :R2 ABORT Break 1 CM[3]>

2 3

[fomus-devel] Re: [CM] CM-ETF
by Niklas Kambeitz 31 Jul '06

31 Jul '06

Hi David, Thanks for getting FOMUS to work in Clisp. It does indeed run in Windows too. By that I mean that this works: (events (new seq :subobjects (list (new midi :time 0))) "test.xml") and the resulting file is readable by Finale. Since I don't really know how to use FOMUS (yet), I wanted to run the test-suite, but it can't load and gives this: *** - component :CL-PPCRE not found, required by #<SYSTEM "fomus-test" #x1A2B7449> Regarding nested tuplets, yes, ETF format can represent them. CM-ETF can output them too, but that feature is mostly useless right now, because the OpenMusic algorithm used to convert raw durations to an abstract notational representation (a "tree"), seems to never produce nested tuplets. For example, rather than a triplet within a triplet, it just uses the common denominator for the whole structure instead; i.e. as a nine-tuplet instead. I assume the fomus algorithm can produce nested tuplets? Just to prove to myself that CM-ETF *can* do nested tuplets I tried this: (cm-etf::meta->etf '(((4 4)) (TREBLE ((Q NIL NIL ((3 Q 1 H) (3 H 1 W)) NIL ((CM::C4 NIL))) (Q NIL NIL NIL NIL ((CM::C4 NIL))) (Q NIL NIL NIL NIL ((CM::C4 NIL))) (H NIL NIL NIL NIL ((CM::C4 NIL))) (H NIL NIL NIL NIL ((CM::C4 NIL))))))) The resulting file shows the nested tuplets in Finale and Sibelius. I'll write a prettier function that lets the user output an ETF from a tree and chord-list; it won't be hard. By all means, use the code in CM-ETF however you wish, and take whatever is useful for the FOMUS backend. All data is represented as lists so if you rip things apart, you won't have trouble with undefined objects. If you have any questions about it, ask away. I might be able to help by figuring out the ETF format for articulations and expressions. For the long term, you may want to consider making FOMUS compatible with OpenMusic, especially since IRCAM plans to release a free version for SBCL on Linux. They don't have .ly or .xml support. Just a thought. Nik David Psenicka wrote: > Niklas, > > I was just trying out cm-etf on Linux (nice!). I was wondering if you'd > mind me working with your code and trying to make a "backend" with it > for fomus... I tried making an ETF backend a while ago and became > frustrated (I wanted all the dynamics, marks, etc. but gave up trying to > figure out their format), but it seems like MusicXML (or actually Finale > & Sibelius's importing functions) has too many annoyances and bugs to be > as useful as I thought it would be... One or two people have asked if > there could be an ETF backend. If you think this would be useful I > wouldn't mind adding it to the backends. > > One of my letdowns with MusicXML was that I couldn't get nested tuplets > into Finale (or single ones into Sibelius for that matter)--when I tried > it Finale would merge it all into one tuplet--is it possible to get > nested tuplets w/ the information that's available on ETF? > > Also, I just got fomus to run in CLISP (not sure if it's ok in Windows > yet--I'll probably have another update soon) > > -David > > Niklas Kambeitz wrote: >> I am working on a program called CM-ETF that allows output from Common >> Music to music notation files in Finale's ETF format. >> >> For downloads and more information, visit the project's website: >> http://cm-etf.sourceforge.net/ >> >> I basically made it for myself, but it's now at the point where I >> thought that other people might get some use out of it too. There are >> still bugs and missing features, and I would appreciate any comments >> or bug reports. >> >> In purpose and function it is similar to FOMUS, but more limited in >> scope; CM-ETF only outputs rhythms and pitches, not dynamics or other >> markings. It does try to intelligently render rhythm, pitch spelling >> and cautionary accidentals. I realize that rather than duplicate all >> this effort, CM-ETF should probably be turned into a backend for >> FOMUS. When I started working on this though, I needed something that >> would run in Clisp. >> >> I'm open to any ideas as to how this project should develop, if at all >> - is there a need for users of CM and Finale to bypass MusicXML and >> Dolet? >> >> If nothing else, CM-ETF provides some documentation on the structure >> and syntax of enigma files. Anyone interested should look at the >> source code files "etf-data.lisp" and "file-io.lisp". >> >> Nik >> >> _______________________________________________ >> Cmdist mailing list >> Cmdist(a)ccrma.stanford.edu >> http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist >>

1 0

[fomus-devel] Chase Online. Banking Account registration information
by Chase＠common-lisp.net 04 Jul '06

04 Jul '06

1 0

[fomus-devel] problems with 0.1.66
by Joshua Parmenter 11 Jun '06

11 Jun '06

Hi all... I was looking around to see if there was a more appropriate place to post a questions / problem. If this is the wrong list, I apologize and would appreciate a re-direct. If not, here is the problem I am having. Here is a sample head of a .ly file... % LilyPond score file % FOMUS v0.1.66 \version "2.6" octUp = #(set-octavation 1) octReset = #(set-octavation 0) octDown = #(set-octavation -1) markAccIn = \once \override TextScript #'script-priority = #-100 beamL = #(def-music-function (par loc num) (number?) #{\set stemLeftBeamCount = #$num #}) beamR = #(def-music-function (par loc num) (number?) #{\set stemRightBeamCount = #$num #}) beamLR = #(def-music-function (par loc numl numr) (number? number?) # {\set stemLeftBeamCount = #$numl \set stemRightBeamCount = #$numr #}) textSpan = #(def-music-function (par loc dir str) (number? string?) # {\override TextSpanner #'direction = #$dir \override TextSpanner #'edge-text = #(cons $str "") #}) noteHead = #(def-music-function (par loc sty) (symbol?) #{\once \override NoteHead #'style = #$sty #}) .... In LilyPond, I get an error: Parsing...ERROR: Unbound variable: def-music-function I am starting out with both LilyPond and FOMUS... any suggestions on how to get rid of the error, or solve it either on the FOMUS or LilyPond side? Second, is there a variable on the lisp side to change the LilyPond version number? FOMUS can't detect my OSX .app version (2.8)... I'm hand changing it for now, and that seems to be fine, but it would be nice if this is something I can change in the .fomus file. Also, for simple tests, I can delete the beamL (etc.) definitions and the code will compile, but once those vars are used in the .ly file, there are (of course) problems. Thanks for any help. Josh OS X 10.4.6 MacBook, SBCL 0.9.12 ****************************************** Joshua Parmenter joshp(a)u.washington.edu Post-Doctoral Research Associate - Center for Digital Arts and Experimental Media Raitt Hall - University of Washington Seattle, Washington 98195 http://www.dxarts.washington.edu http://www.realizedsound.net/josh/

2 4

[fomus-devel] ongoing improvements....
by David Psenicka 17 Apr '06

17 Apr '06

Mika, I fixed quite a few things and updated CVS--I'd wait for one more CVS update as I make sure I didn't create any new problems :) . A few things I ran across in some of the tests (and some other odds and ends that occur to me): I wouldn't put anything in the "partids" slot in a timesig object yet (I saw this in the Segovia and maybe one or two others)--that option is there for polymeters which aren't quite implemented yet (it's in the main code but not in the backends yet)--actually in the Segovia parts the partids indicate part 0 which isn't defined--so the time signatures weren't used at all and the default 4/4 was used Specifying :div '(2) for a 2/4 meter tells fomus not to subdivide the measure at all, so it will try to cram everything in the measure into a tuplet (I think I should just make this an error--this isn't really intended and can only give strange results). I found a few large numbers in some of the slur/text spanner marks (they look more like addresses or indexes)--I'm not sure if that's what you want in there. Originally fomus was supposed to accept any "level" numbers and sort it all out (so the numbers that go into these marks could actually be treated like IDs for each mark), but I think that creates problems and confusion--so now I've changed it so slurs (and any other spanner mark that gets a "level" number) should only use one of several unique numbers (such as 1 & 2 for two levels of slurs). Within each "level" fomus tries to complete missing start and end marks and other problems it finds, so I think this will be less confusing. The "min-tuplet-dur" setting will affect how nested tuplets are created--I set the default to a lower value to get one of the nested triplets tests to work correctly--there are at least a few more issues to look at involving tuplets (rules for finding them + beaming nested tuplets...) The numbers that go with tremolos are in beat values, so when you specified 1/8 (I think you wanted eighth-notes) you got 32nd note tremolos (1/8 of a beat)--so to get the eighth-note tremolos (:tremolo 1/2) is needed (when a quarter note gets the beat). I apologize, the documentation wasn't really clear on this (among other things... :) ). By next update I'll modify the mark to optionally receive a written value--this should be more intuitive & flexible. Forcing tied notes is a good idea (next update I think it'll be there--this should be easy to implement) I've improved staff-distribution a little (actually a lot--the Segovia looks a little rough, but that's to be expected)--I should add a way to force staff decisions for individual notes and entire voices--at some point I plan to have presets for handling different types of material (for example presets for melodic lines, regular rhythms, complex rhythms, etc.), presets for ea. voice would be worthwhile. Staff and voice distribution might be awkward for a little while as I tweak them further... I decided to make tuplet spelling (7 in time of 4 vs. 7 in time of 8, etc.) user controllable, so the default is now is the power-of-2 rule which can be overriden by the "default-tuplets" setting (ex. :default-tuplets '((7 8) (31 32)) specifies you want 7 in the time of 8 not 4, etc..) I need to look at the Rite of Spring test some more--there's some strange issue (I think) w/ Lilypond shortening slurs... Probably my fault but I'm not sure yet. -David

2 2

[fomus-devel] Re: fomus-test :)
by David Psenicka 11 Apr '06

11 Apr '06

Kilian, The test suite is working really well. I added a few more backend methods and tweaked a function that parses the code (separating fomus lines from test lines...) -David

1 0

[fomus-devel] Re: LispWorks
by David Psenicka 06 Apr '06

06 Apr '06

Thank you for your attachments. I'll have some time to look at the tuplet bug in the next few days... There's a slot in the timesig class called "div" where you can specify possible measure subdivisions (as number of beats in each subdivision). For example: (make-timesig :off 0 :time '(5 8) :div '(1 3/2)) or (make-timesig :off 0 :time '(5 4) :div '(3 2)) or (make-timesig :off 0 :time '(5 8) :div '((3/2 1) (1 3/2))). Looking at the '(5 4) example just now I see that I need to fix the beaming algorithm so that it shows the 3 + 2 division properly (another addition to the bug list). There are also two settings, :default-meas-divs and :default-tuplet-divs which are lookup tables containing default divisions (you can override fomus's defaults with these), but they don't give you direct control. Let me know if you have any additional ideas for controlling subdivisions/tuplets--I'm open to anything that will make the program more flexible. I'm looking forward to seeing it work with PWGL/ENP--thank you so much for your help. -David Mika Kuuskankare wrote: > David, > >> FOMUS should run in LispWorks now (I tested on Max OS X and will try >> Windows & Linux soon). > > > Thanks for your work on LispWorks. It looks promising! > > I already did an exporter that converts ENP -> FOMUS -> LILYPOND. I > enclosed some test runs showing the output of the exporter . > .eps files show the original ENP score > .pdf shows the lilypond output > .dbg is fomus dbg file, and > .err is a possible error message generated by FOMUS > > BTW, I set :AUTO-QUANTIZE to NIL, because I wanted to use exact > ratios but this produced some difficulties with nested tuplets (see > for example fomus152). > > Is there a possibility to help the quantizer/rhythm interpreter in > case of tuplets and beat divisions, e.g., to indicate beat/subbeat > boundaries? > > > Anyway, I am quite excited about FOMUS. > > > Best regards, > > Mika > > > Mika Kuuskankare > Researcher > Department of Doctoral Studies in Musical Performance and Research > Sibelius Academy > > Henkilökohtainen postiosoite/Personal post address > PL 342 - PO Box 342 > FIN-00121 Helsinki, FINLAND > Tel: +358 (0)40 5415 233 > Skype: mkuuskan > >

1 0

[fomus-devel] cvs fomus
by Rick Taube 03 Apr '06

03 Apr '06

cvs fomus doesnt compile in openmcl ;Compiling "/Lisp/fomus/splitrules.lisp"... ;Loading #P"/Lisp/fomus/util.dfsl"... > Error in process listener(1): Illegal use of wildcarded filename "/ Applications/Peak™ 3.21 (OS X)/Peak™ 3.21 \\\\*Read\\\\* ME" > While executing: CCL::NATIVE-TRANSLATED-NAMESTRING > Type :POP to abort. Type :? for other options. 1 > also, what is the state of support for musicxml in finale VS sibelius? i need to notate a piece, whihc means that ill prrobably end up using one of these programs. a primary determining factor in my choice of which one to buy is xml input, so which one should i buy? or are both bascially crappy so that its not worrth the money in either case?

2 2

[fomus-devel] :forceacc
by Kilian Sprotte 23 Feb '06

23 Feb '06

Hi, I am just wondering, whether it could be a good idea to add a :forceacc mark; it would behave exactly like :cautacc, but avoid having parentheses in the notation. Let's say I want to have a clear printout of a twelve-tone row or maybe print some Boulez or Schoenberg.... Adding :forceacc to every note, would allow for having naturals before every note. Maybe I have overlooked (again) some of the settings, but I have the impression that this is currently not possible and it doesn't really require having its own acc-spelling algorithm. Cheers, -Kilian

2 3

← Newer
1
2
3
4
5
6
7
8
9
10
Older →

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

fomus-devel