Re: [CM] Midi microtuning in cm2

2017-03-11 Thread Johannes Quint
Orm,

did you have a look to the library in Frankfurt? 
We purchased an example of 'notes from the metalevel' for the course in 2014...

Johannes

Am 11.03.2017 um 12:16 schrieb Orm Finnendahl:

> Am Freitag, den 10. März 2017 um 13:22:50 Uhr (+0100) schrieb Ralf Mattes:
>> 
>> Ok, let me chime in here: my initial goal was keeping CM opertional in
>> current common lisp implementations to be able to use "Notes from the
>> Metalevel". Some of my design goals where:
> 
> That's actually also one of my goals. As I recommend this book to my
> students, I'd like to keep the examples functional (and some of them
> had to get adjusted to even work with the cm2 Version I used, like the
> ligeti example of Tobias Kunze).
> 
> BTW: There has been some complaint about the accompanying CD to the
> book which seems to be missing nowadays and people trying to get a
> copy. Does anybody have this and would be willing to send this to me
> if this doesn't infringe any copyright issues?
> 
>> I'm trying to keep CM2 from spitting into a pile of privatly
>> maintained, slightly different versions of the code.
> 
> I completely agree and can factor out code not directly applying to
> cm2 into extra packages like the incudine/jackmidi realtime stuff.
> 
> Anyone wants to join, any ideas on this? Rick, how do you feel about
> this?
> 
> --
> Orm
> 
> ___
> Cmdist mailing list
> Cmdist@ccrma.stanford.edu
> https://cm-mail.stanford.edu/mailman/listinfo/cmdist

-- 

Prof. Johannes Quint

Hochschule fuer Musik Koeln, Standort Aachen - Theaterplatz 16, D-52062 Aachen
johannes.qu...@hfmt-koeln.de

D-53225 Bonn, Rilkestr. 55
www.johannes-quint.de

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
https://cm-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] help with "ghosts" example from Metalevel book

2016-03-03 Thread Johannes Quint
have a look to 'ghosts' in the help-menu:

help/examples/ghosts.scm

Am 03.03.2016 um 20:37 schrieb Rob Howiler:

> Hi again everybody.  This:
> (define (ghosts)
>  (process repeat 12
>   for here = (now)
>   for ahead = (* (+ here .5) 2)
>   for main = (pick-range 53 77)
>   for high? = (>= main 65)
>   for amp = (if high? .6 .4)
>   for rhy = (pick-list '(1/16 1/8 3/16))
>   do
>   (mp:midi :time here :key main :dur (rhythm->seconds rhy 60)
>:amp amp)
>   (when high?
>   sprout (hitone main ahead)
>   and sprout (riff main rhy) at (* ahead 2))
>   (when (= rhy 3/16)
>   sprout (thump main (+ here .5)))
>   (wait (rhythm->seconds rhy 60
> (sprout (ghosts))
> 
> This works fine to define (ghosts).  (ghosts) produces no sound just # ({time}-2239)> in the listener window.  Running (sprout (ghosts)) gives me 
> the hitone sound, but no advancement to the next pitch and it generates this 
> in the listener window (I see that “at” is the unbound variable, but I can’t 
> figure out how to fix it):
> 
> #
>>>> Error: at: unbound variable
> ghosts: (lambda ({time}-1860) (let* (({wait}-1... ; args: ("~A: unbound 
> variable" at)
> ghosts: ((* ahead 2)) ; ahead: 1275579.145172206
> ghosts: ((when (= rhy 3/16) sprout (thump main... ; rhy: 3/16, main: 75
>   ; here: 637789.072586103
> ghosts: (call-with-exit (lambda (return) (if (... ; high?: #t
>   ; amp: 0.6001
> ghosts: (sprout (ghosts)) 
> 
> Thanks again for your help and your patience.
> Rob
> 
> --
> Dr. Rob Howiler
> Academic Computing Services Coordinator
> Assistant Professor of Music
> rhowi...@presby.edu
> (864) 833-8324
> --
> 
> 
> -- 
> 
> --
> <http://www.presby.edu>
> 
> ___
> Cmdist mailing list
> Cmdist@ccrma.stanford.edu
> https://cm-mail.stanford.edu/mailman/listinfo/cmdist

 

Johannes Quint
www.johannes-quint.de

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
https://cm-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] new syntax for (list (new midi)

2016-03-03 Thread Johannes Quint
what about this:

(define (thump knum at)
  (mp:midi :time at 
   :key (- knum 18)
   :dur .05 :amp .5)
  (mp:midi :time at 
   :key (- knum 23)
   :dur .05 :amp .4))

(thump 72 0.5)




Am 03.03.2016 um 18:08 schrieb Rob Howiler:

> Closer.  The mp:midi got me away from the unbound variable problem.  I’m 
> getting sound now, but a beep at the console listener window alerts me to 
> this:
> 
>>>> Error: (# #) is not a process
> sprout: (error "~S is not a process" proc); proc: (# 
> # sprout: (((tail proc (cdr tail))) ((null? tail...
> sprout: ((error "~S is not a process" proc)) 
> sprout: ((do ((tail args (cdr tail)) (keyw #f)... ; args: (), file: #f, 
> start: 0
>   ; id: 0
>   ; startBeat: 0
> (sprout (thump 60 2)) 
> 
> Thanks again for the help.
> Rob
>> On Mar 3, 2016, at 12:02 PM, Johannes Quint  wrote:
>> 
>> maybe this way:
>> 
>> (define (thump knum at)
>> ;;make two percussive events below knum)
>> (list (mp:midi :time at 
>>:key (- knum 18)
>>:dur .05 :amp .5)
>>   (mp:midi :time at 
>>:key (- knum 23)
>>:dur .05 :amp .4)))
>> 
>> best
>> 
>> Am 03.03.2016 um 17:57 schrieb Rob Howiler:
>> 
>>> Hi 
>>> I am trying to make something work, but I am using old syntax I am sure.  
>>> Below is what I am trying to do.  Can anyone help me with the proper syntax?
>>> Thanks
>>> Rob
>>> 
>>> (define (thump knum at)
>>> ;;make two percussive events below knum)
>>> (list (new midi :time at 
>>>:key (- knum 18)
>>>:dur .05 :amp .5)
>>>   (new midi :time at 
>>>:key (- knum 23)
>>>:dur .05 :amp .4)))
>>> 
>>> I’m getting an “unbound variable” error message for “new"
>>> 
>>> 
>>> --
>>> Dr. Rob Howiler
>>> Academic Computing Services Coordinator
>>> Assistant Professor of Music
>>> rhowi...@presby.edu
>>> (864) 833-8324
>>> --
>>> 
>>> 
>>> -- 
>>> 
>>> --
>>> <http://www.presby.edu>
>>> 
>>> ___
>>> Cmdist mailing list
>>> Cmdist@ccrma.stanford.edu
>>> https://cm-mail.stanford.edu/mailman/listinfo/cmdist
>> 
>> 
>> 
>> Johannes Quint
>> www.johannes-quint.de
>> 
> 
> --
> Dr. Rob Howiler
> Academic Computing Services Coordinator
> Assistant Professor of Music
> rhowi...@presby.edu
> (864) 833-8324
> --
> 
> 
> -- 
> 
> --
> <http://www.presby.edu>
> 
> ___
> Cmdist mailing list
> Cmdist@ccrma.stanford.edu
> https://cm-mail.stanford.edu/mailman/listinfo/cmdist
> 

 

Johannes Quint
www.johannes-quint.de

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
https://cm-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] new syntax for (list (new midi)

2016-03-03 Thread Johannes Quint
maybe this way:

(define (thump knum at)
 ;;make two percussive events below knum)
 (list (mp:midi :time at 
:key (- knum 18)
:dur .05 :amp .5)
   (mp:midi :time at 
:key (- knum 23)
:dur .05 :amp .4)))

best

Am 03.03.2016 um 17:57 schrieb Rob Howiler:

> Hi 
> I am trying to make something work, but I am using old syntax I am sure.  
> Below is what I am trying to do.  Can anyone help me with the proper syntax?
> Thanks
> Rob
> 
> (define (thump knum at)
>  ;;make two percussive events below knum)
>  (list (new midi :time at 
> :key (- knum 18)
> :dur .05 :amp .5)
>(new midi :time at 
> :key (- knum 23)
> :dur .05 :amp .4)))
> 
> I’m getting an “unbound variable” error message for “new"
> 
> 
> --
> Dr. Rob Howiler
> Academic Computing Services Coordinator
> Assistant Professor of Music
> rhowi...@presby.edu
> (864) 833-8324
> --
> 
> 
> -- 
> 
> --
> <http://www.presby.edu>
> 
> ___
> Cmdist mailing list
> Cmdist@ccrma.stanford.edu
> https://cm-mail.stanford.edu/mailman/listinfo/cmdist

 

Johannes Quint
www.johannes-quint.de

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
https://cm-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] how to set the working directory in grace?

2015-07-12 Thread Johannes Quint
what about

(chdir "~/michael/Desktop")

johannes

Am 12.07.2015 um 12:08 schrieb Michael Winkler:

> Hi List
> 
> How can I set my working directory by code?
> 
> (set-working-directory! "/users/michael/Desktop") gives me an Error: 
> set-working-directory! unbound variable
> 
> If I just open grace, there is no working directory by default, so I would 
> like to make a load-file with, amongst others, this command.
> 
> best,
> Michael
> 
> OSX 10.10.3, Common Music 3.9.0
> ___
> Cmdist mailing list
> Cmdist@ccrma.stanford.edu
> https://cm-mail.stanford.edu/mailman/listinfo/cmdist
> 

 

Johannes Quint
www.johannes-quint.de

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
https://cm-mail.stanford.edu/mailman/listinfo/cmdist


[CM] fomus/grace/windows

2014-11-01 Thread Johannes Quint
hello rick, hello david,

we have again some problems with grace/fomus: a student of mine tells that 
fomus doesn't work on windows 7. or maybe can't communicate with grace. 

after:

(with-fomus ("test.ly") 
(fms:note :pitch 60 :time 0 :dur 4))

there is no "test.ly" file and after

(sprout (process repeat 1 do (fms:note :pitch 60 :dur 4 :time 0)) "test.ly")

he gets:

>>> Error: don't know how to open "test.ly"
open-file: (error "don't know how to open ~S" ... ; str: "test.ly"
open-file: ((ffi_sched_set_score_mode mode) mode) ; mode: 0
sprout: ((if *sprout-hook* (*sprout-hook* file... ; file: "test.ly", start: 0
   ; id: 0
   ; startBeat: 0
...


do you have any help for us?

thanks a lot, johannes
 

Johannes Quint
www.johannes-quint.de___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] grace with fomus on linux

2014-05-22 Thread Johannes Quint
rick,a student of mine is working on a project trying to reconstruct debussys style in cm-patches.now he has problems with fomus. he is on linux (ubuntu14) and i've no experiences with it, maybe you can help...he can use fomus from terminal AND he was able to compile cm/grace including "---with fomus".but after (sprout  "ly/fomus.ly"), he gets:>>> Error: don't know how to open "ly/fomus.ly"open-file: (error "don't know how to open ~S" ... ; str: "ly/fomus.ly"open-file: ((ffi_sched_set_score_mode mode) mode) ; mode: 0sprout: ((if *sprout-hook* (*sprout-hook* file... ; file: "ly/fomus.ly"                                                   ; start: 0, id: 0                                                   ; startBeat: 0grace doesn't display "FOMUS ..." after launching, so he supposes that there is a something wrong on the premake-script.i attach it - maybe usefull.thanks for help!johannes

premake4.lua
Description: Binary data
___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] optional and default arguments in cm 3.8.0 scheme?

2012-01-02 Thread Johannes Quint
use define*:

(define* (modl list1 (n 12))
 (loop for x in list1 collect (mod x n)))

best, johannes


Am 02.01.2012 um 22:22 schrieb Michael Winkler:

> hi list
> 
> I'm struggling with optional and default arguments: How can I do this 
> lisp code in schme common music?
> 
> (defun modl (list1 &optional (n 12))
>  (loop for x in list1 collect (mod x n)))
> 
> examples:
> (modl '(10 12 14))
>>> (10 0 2)
> (modl '(10 12 14) 5)
>>> (0 2 4)
> 
> thankx and a happy new year
> Michael
> 
> ___
> Cmdist mailing list
> Cmdist@ccrma.stanford.edu
> http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] spear <-> grace

2010-07-06 Thread Johannes Quint
> the clarinet.txt file doesnt look right to me, is this someting that  
> spear itself generated?

yes.

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] spear <-> grace

2010-07-06 Thread Johannes Quint

working with grace and spear, i get format-problems:
spear-files seems to work with commas for decimals, grace with  
points.

has someone some idea how i can solve it?


Is this scheme's fault?  (r5rs only allows dot for decimal point).
If so, you could read/write strings, change dots to commas,
or vice versa, then convert.


yes, of course. i thought, there were a trick...___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] spear <-> grace

2010-07-06 Thread Johannes Quint
working with grace and spear, i get format-problems:
spear-files seems to work with commas for decimals, grace with points.
has someone some idea how i can solve it?

thanks, johannes

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] fomus: rhythmic display

2010-05-25 Thread Johannes Quint
what is the trick to get fomus displaying a rhythm like {5.0 5.0} in a 10/4instead of: thanks, johannes___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] CM patterns - make-repeater

2010-05-10 Thread Johannes Quint
repeater needs a pattern:

(define rtest (make-repeater (make-cycle '(2 1 3 4 5) :for 1) :for 3))
(next rtest 30)

johannes

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] cm 3.6.0 betas available

2010-04-14 Thread Johannes Quint
rick,
i've have some problems with the win-version:
realtime-midi doesn't work, or better: i don't know how
to handle the connection grace->'something like simplesynth'

the other problem: sndlib works, but when playing the wav-
files in graces own audio-player, i get crazy noises.
played in an external player, everything is ok.

[i've not yet tested fomus - next week...]

j

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] new CodeEditor and SAL 2.0

2010-03-22 Thread Johannes Quint

Am 21.03.2010 um 13:47 schrieb Heinrich Taube:

> i have an alpha version 3.6.0 with most of the new code editor  and
> sal2 in place. testing/feedback would be greatly appreciated!


great - i like the minimalist-sal!

c-m-f and c-m-b doesn't work for me.

j

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] text in fomus

2010-02-14 Thread Johannes Quint
i've still problems handling text in fomus.
this doesn't works for me, what's my mistake?
 
fomusfile "test.ly" ()
 send "fms:note", pitch: 60, dur: 4, marks: {{"[x hi]"}}
end

thanks j
___
GRATIS für alle WEB.DE-Nutzer: Die maxdome Movie-FLAT!
Jetzt freischalten unter http://movieflat.web.de

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] fms:rest

2010-02-02 Thread Johannes Quint

what is wrong in this code?

(define (test)
  (process repeat 50 do
   (pick (fms:note :pitch (between 60 80) :dur 1)
 (fms:rest :dur 1))
   (wait 1)))
(sprout (test) "/Users/johannesquint/Desktop/test.ly" :clear #t :run #t)

i get the following error:

;; fomus: value update out of sequence in module `'

thanks, johannes___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] CM compositions on web

2010-01-10 Thread Johannes Quint
> im toying with the
> idea of version of sal that simply provides infix expressions without
> the structure of 'commands'.

good idea. they are - among others - the reason why i turned away from  
sal back to scheme.
it also would be great to have optional arguments and rests for  
function-definitions in sal.

j

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] fomus-time-signature

2009-12-29 Thread Johannes Quint
this is my old question: what is the code to generate the following  
via grace/fomus:


<>


thanks for hints, johannes___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] send in grace

2009-01-11 Thread Johannes Quint

rick,
when i try to hear a clm-instrument in sal via send, nothing happens.

i.e.
send "wave", 0,1,440,0.1

inside of a process, everything works fine.

thanks for an answer, johannes

___

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
johannes.qu...@web.de
http://www.johannes-quint.de

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] grace -> spear

2008-09-25 Thread Johannes Quint
is there a way to export spectrums from grace to a text file for  
spear (the reciprocal way of 'import-spear-frames')?


thanks, johannes

_

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] grace 1.1.0

2008-09-16 Thread Johannes Quint

hi rick,
gratulation to the new grace!
a little question/suggestion: would it be a lot of work to integrate  
a function for executing unix-cmds?

as far as i see, it is not supported by scheme...

thanks and best, johannes

_

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] midi-controller-values

2008-04-24 Thread Johannes Quint

rick,

the following problem occurs when i try to get the value of a midi- 
controller-value:

when i have:

define function get-val (m)
  begin with v
 if mm:ctrl?(m) then print mm:val(m)
end

send "mp:inhook", get-val

i get in the console:

>>> Error: unbound variable
Aborting MIDI inhook.

the same with mm:time works:

define function get-time (m)
  begin with v
 if mm:ctrl?(m) then print mm:time(m)
end

send "mp:inhook", get-time

thanks for help, johannes

_____

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] grace/cm3

2008-04-01 Thread Johannes Quint
rick, is there a way to set the things in the grace-menu   
(microtones, ports) with a lisp/sal-command instead of menu-selection?

j.
_

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] Common Music 3

2008-03-28 Thread Johannes Quint

rick,
looks awesome for me!

2 comments:

the old cm-functions 'interpl' and 'tendency': i've used them quite  
often...

a file-interface via fomus or so will be included, am i right?

best wishes, johannes


Am 28.03.2008 um 03:18 schrieb Heinrich Taube:

a new "major version" of CM  is almost finished. The documentation  
on the new api is here:


http://pinhead.music.uiuc.edu/~hkt/grace/doc/cm.html

most of the documented entries are already working in svn Grace,   
the main things not yet done are the define-process macro and the  
Spectral Composition section. The former is a day's work the latter  
about a week. i would welcome any comments about the api or about  
things you think should be there (or not), especially wrt the new  
spectral compostion stuff.

--rick

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


_

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de



[CM] gracecl, plotter etc

2008-03-05 Thread Johannes Quint

rick, two questions about grace:

o as far as i see, you don't plan to integrate plotter into gracecl.  
would it be a lot of work?
(with scheme-grace, i have no interface to notation-software, right?,  
so it would be great

to have both - plotter and fomus/mid in one application).


o in scheme-grace, i get the following error while launching:

Grace 1.0.0 (rev 1564)
(c) 2007 Todd Ingalls, Rick Taube
>>> Error: Failed to open midi device (dev=0).
Chicken Scheme, version 3.0.0rc1
(c) 2000-2007 Felix L. Winkelmann

i have tried to tinker around in the midi-config. but with no  
success. do you have a little hint for me...?


thanks and best r. johannes



_____

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de



[CM] markov, produce

2007-12-18 Thread Johannes Quint
something seems to be wrong with the 'produce'-key of the 'markov'- 
pattern:


in sal:

begin with test = make (, produce: list (list (:a, make  
(, rhythms: {w})),
  list (:b, make  
(, rhythms: {h. q})),
  list (:c, make  
(, rhythms: {q q})),
  list (:d, make  
(, rhythms: {h}))),
of: {{a -> b d} {b -> c d} {c -> c d b} {d - 
> a b c d}})

  print next (test,100)
end

returns the ids instead of the values:

{b c c b c c b c b c b d d c b c d d b d d a b d a b c b c c b c b d  
c b c b c b d b d c c d d a d c d c b d b c c b c c c c b d c b c d a  
d a b c d a b c c b d d d b d a b c c b c c d a b d c b c c c}


is something wrong in my code or is it a bug?

johannes

_____

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de



Re: [CM] defobject -> sal

2007-12-16 Thread Johannes Quint


Am 16.12.2007 um 16:25 schrieb Rick Taube:

I do plan on having a useful binary release of Grace for both  
Scheme and CL sometime in the beginning of the year --


good! i've tried to install grace/scheme after your posting a few  
weeks ago, but without success (i don't exactly remember, what the  
problem was... installing chicken scheme, i think).



are you teaching this next semester??


not in the 'sommersemester', but i hope to make a new round in october.

_____

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de



[CM] defobject -> sal

2007-12-16 Thread Johannes Quint

is there a way to define something like:

(defobject simple (scsynth)
  ((freq :initform 440)
   (dur :initform 1)
   (amp :initform .2)
   (pan :initform 0))
  (:parameters freq dur amp pan time))

in sal?

johannes

_

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de



[CM] system osc

2007-09-16 Thread Johannes Quint

rick,
after updating cm, i can't no more load system osc:

in sal:

system "osc"

=>

; /Applications/CM.app/Contents/Resources/osc/sockets.fasl written
; compilation finished in 0:00:00
; loading #P"/Applications/CM.app/Contents/Resources/osc/sockets.fasl"
;
; compilation unit aborted
;   caught 1 fatal ERROR condition
>>> Lisp runtime error:
Error type: SYMBOL-PACKAGE-LOCKED-ERROR
Error message: Lock on package SB-ALIEN violated when defining
   SB-ALIEN::UDP-SOCKET as a class.

any help?

johannes

_

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de



Re: [CM] cm on macosx?

2007-08-11 Thread Johannes Quint

of course:

http://sourceforge.net/project/showfiles.php? 
group_id=9766&package_id=106649&release_id=477002


j

Am 11.08.2007 um 01:03 schrieb oyuki:

hi, is it possible to use cm on macosx? do i need to compile by  
myself?

can anybody point me to the right direction?


thanks


oyuko
--
  oyuki
  [EMAIL PROTECTED]

--
http://www.fastmail.fm - One of many happy users:
  http://www.fastmail.fm/docs/quotes.html

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


_____

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de



Re: [CM] cm predicate for rhythm-symbol-combinations

2007-06-23 Thread Johannes Quint

(defun rhythmp (x)
  (gethash x *rhythms*))

Am 23.06.2007 um 12:35 schrieb Lieven Moors:

Is it possible to check wether a certain symbol is valid for the  
rhythm-parser whithout using rhythm itself?

It would be nice to have a predicate for this...
greets

lieven


_

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de



Re: [CM] sal-course, -examples

2007-05-15 Thread Johannes Quint

yes, i've changed it to:

http://www.johannes-quint.de/cm/kurs.html

Am 15.05.2007 um 17:31 schrieb Rick Taube:


johannes - this link doesnt seem to work any more!

On Apr 25, 2007, at 5:54 PM, Johannes Quint wrote:


for those, who are interested:
i've begun to write an introduction in sal
[in german] for my students in frankfurt.
this is more or less a translation of ricks
course, but i've added some new examples
(two studies of nancorrow, tom johnsons
chordcatalogue etc.)

http://www.johannes-quint.de/cm/html/kurs.html


___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] sc-objects, duration

2007-05-13 Thread Johannes Quint
(events (new simple :time 0 :freq 300 :dur 100) "Desktop/ 
test.osc" :pad 100)


... sorry


when i try to create some sc-objects, i never get longer sounds.
i.e. with sc-object 'simple':

(events (new simple :time 0 :freq 300 :dur 100) "Desktop/test.osc")

stopps after ~ 5 secs.
of course, the same in supercollider works without problems.
any help? thanks, johannes


___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] sc-objects, duration

2007-05-13 Thread Johannes Quint

when i try to create some sc-objects, i never get longer sounds.
i.e. with sc-object 'simple':

(events (new simple :time 0 :freq 300 :dur 100) "Desktop/test.osc")

stopps after ~ 5 secs.
of course, the same in supercollider works without problems.
any help? thanks, johannes
_____

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de



[CM] midiplayer/windows

2007-05-02 Thread Johannes Quint
can anyone help me setting the default-midiplayer for cm/windows xp/ 
clisp?


when i try
(setf *midi-player* "C:/Programme/Windows Media Player/mplayer2.exe")
or
(setf *midi-player* "C:/Programme/Windows Media Player/wmplayer.exe")
nothing happens.

thanks, johannes

_____

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de



[CM] sal-course, -examples

2007-04-25 Thread Johannes Quint

for those, who are interested:
i've begun to write an introduction in sal
[in german] for my students in frankfurt.
this is more or less a translation of ricks
course, but i've added some new examples
(two studies of nancorrow, tom johnsons
chordcatalogue etc.)

http://www.johannes-quint.de/cm/html/kurs.html

johannes
_

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de



[CM] cm/clisp/xemacs

2007-03-26 Thread Johannes Quint

trying to load cm under windows, i still have problems.
with clisp 2.4.1 under xemacs, i've used the following
startup code:

(add-to-list 'load-path "/lisp/slime-2.0/")
(defvar cm-directory "C:/lisp/cm")

(defvar cm-startfile "cm.bat")

(let* ((els (concat cm-directory "/etc/xemacs"))
  (bin (concat cm-directory "/bin/"
   cm-startfile))
  (load-path (cons els load-path)))
 (load "listener")
 (load "cm")
 (setq inferior-lisp-program bin))

now, when i try 'M-x cm', i get:
'Searching for program: No such file or directory, cm'
but - strange - i can do 'M-x lisp-mode' and i get a listener,
automatically loading the cm-sources.
this is probably a pathname-problem -
any ideas how to solve it?

j
_

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
www.johannes-quint.de



[CM] cm on an intel-mac

2006-12-31 Thread Johannes Quint
i've tried to install cm with openmcl on an intel-mac, but i get the  
following error:


? (load "/lisp/cm/src/cm.lisp")

; CM install directory: "/lisp/cm/"
; Loading "bin/openmcl_1.1-pre-061205_darwin-i386/pkg.dx64fsl"
; Compiling "src/openmcl.lisp"
> Error: Error opening shared library "Carbon.framework/Carbon": no  
suitable image found.  Did find:
>   /System/Library/Frameworks/Carbon.framework/Carbon:  
no matching architecture in universal wrapper

> While executing: CCL:OPEN-SHARED-LIBRARY, in process listener(1).
> Type :POP to abort, :R for a list of available restarts.

is is not yet possible to work with cm on the new macs?

johannes

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] channel-tuning

2006-09-08 Thread johannes . quint

is it possible to work with 3 different midi-instruments all using 
quarter-tone-playback?
which 'channel-tuning'-setting i have to choose?

thanks for help. johannes
 
--  
Johannes Quint
www.johannes-quint.de

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] range and period-length

2006-08-14 Thread Johannes Quint


Am 14.08.2006 um 14:05 schrieb Rick Taube:

im sorry, im not understanding -- what should the pattern look  
like? what is 'pyx'?

best,
rick



oh excuse me, pyx is a macro,
(pyx 11 7 9 8 8 9 8 11 7 12) means (new cycle :of '(11 7 9 8 8 9 8 11  
7 12))


my problem perhaps more clearly explained:

when i have

(new range
  :initially 10
  :stepping (new cycle :of (list (new cycle :of 1 :for 3)(new  
cycle :of -1 :for 6)))

  :for (new cycle :of '(3 6

then the period-length correlates with the down- and up-direction:

(next x t)
=> 10 11 12
=> 13 12 11 10 9 8
=> 7 8 9
etc.

but when i define

(new range
  :initially 10
  :stepping (new heap :of (list (new cycle :of 1 :for 3)(new  
cycle :of -1 :for 6)))

)

i don't know how to get the same correlation.

i hope this was less abstruse..., johannes



_____

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de


___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] range and period-length

2006-08-13 Thread Johannes Quint
to create scales up and down in correlation with the period-length,i 've written:(new range   :initially 57   :stepping (pyx (pyx 1 :for (pyx 11 7 9 8 8 9 8 11 7 12))(pyx -1 :for (pyx 9 8 6 9 11 7 9 8 8)))   :for (pyx 11 9 7 8 9 6 8 9 8 11 9 7 8 9 11 8 7 8 12))this is a bit long-winded because i've to repeat the scale-ambitus for the ':for'-key as the period-length.is there a more elegant way?thanks in advance, johannesJohannes QuintRilkestr.55D-53225 Bonn0228 468256johannes.quint@web.dehttp://www.johannes-quint.de 

[CM] range

2006-07-20 Thread Johannes Quint
there seems to be another pattern-problem:the dictionary example for range returns now an error:(define pat1   (new range :from (new cycle :of '(60 74))             :downto 48             :by (new cycle :of '(1 2 3))             :repeat 6))=> Option :FROM without a data type (:NOTES :KEYNUMS :HERTZ).   [Condition of type SIMPLE-ERROR]is this a side-effect of the new pattern-macro?thanks for answers: johannes _Johannes QuintRilkestr.55D-53225 Bonn0228 468256johannes.quint@web.dehttp://www.johannes-quint.de 

[CM] pattern macro and rotation

2006-07-19 Thread Johannes Quint
am i right that the new pattern macro doesn't support the old rotation-mode?would it be possible to integrate it?tanks and greetings, johannes _Johannes QuintRilkestr.55D-53225 Bonn0228 468256johannes.quint@web.dehttp://www.johannes-quint.de 

Re: [CM] rts and supercollider

2006-06-02 Thread Johannes Quint


Am 02.06.2006 um 01:23 schrieb todd ingalls:


Johannes,
I just checked in changes to fix the problems and now things should  
be working correctly for sending osc messages. you may need to wait  
a little while for the changes to hit the anonymous cvs server. i  
am still working getting receiving finished.


todd,
(use-system :osc) works now.
but when i go on with 'etc/examples/rt-sc.cm'
and i am at the point (sprout (sc-simple-1 10)),
the lisp into my emacs crashes:
'Lisp connection closed unexpectedly: connection broken by remote peer'

johannes

_____

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de


___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] rts and supercollider

2006-06-01 Thread Johannes Quint


[
;Compiling "/Applications/lisp/osc/osc.lisp"...
Read error between positions 5362 and 5636 in /Applications/lisp/osc/ 
osc.lisp.

]

... and in the report:

There is no package named "PTHREADS" .
   [Condition of type CCL::NO-SUCH-PACKAGE]

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


Re: [CM] rts and supercollider

2006-06-01 Thread Johannes Quint


Am 01.06.2006 um 17:30 schrieb todd ingalls:


i think you may need to get the osc system

export CVSROOT=":pserver:[EMAIL PROTECTED]:/ 
cvsroot/commonmusic"


cvs checkout -P osc

then run

(use-system :osc)

(sc-open) should be available then.


sorry, this has been changing and may not be well reflected in the  
docs.




thanks for your answer.
this is what i get when typing (use-system :osc)

CM> (use-system :osc)
; loading system definition from /Applications/lisp/osc/osc.asd into  
#

;Loading #P"/Applications/lisp/osc/osc.asd"...
; registering # as OSC
; loading system definition from /Applications/lisp/rts/rts.asd into  
#

;Loading #P"/Applications/lisp/rts/rts.asd"...
; registering # as RTS
; loading system definition from /Applications/lisp/cffi/cffi.asd  
into #

;Loading #P"/Applications/lisp/cffi/cffi.asd"...
; registering # as CFFI
;Loading #P"/Applications/lisp/cffi/src/utils.dfsl"...
;Loading #P"/Applications/lisp/cffi/src/features.dfsl"...
;Loading #P"/Applications/lisp/cffi/src/cffi-openmcl.dfsl"...
;Loading #P"/Applications/lisp/cffi/src/package.dfsl"...
;Loading #P"/Applications/lisp/cffi/src/libraries.dfsl"...
;Loading #P"/Applications/lisp/cffi/src/early-types.dfsl"...
;Loading #P"/Applications/lisp/cffi/src/types.dfsl"...
;Loading #P"/Applications/lisp/cffi/src/enum.dfsl"...
;Loading #P"/Applications/lisp/cffi/src/strings.dfsl"...
;Loading #P"/Applications/lisp/cffi/src/functions.dfsl"...
;Loading #P"/Applications/lisp/cffi/src/foreign-vars.dfsl"...
;Loading #P"/Applications/lisp/rts/cffi-scheduler.dfsl"...
;Loading #P"/Applications/lisp/rts/cm-scheduler.dfsl"...
;Loading #P"/Applications/lisp/osc/sockets.dfsl"...
;Compiling "/Applications/lisp/osc/osc.lisp"...
Read error between positions 5362 and 5636 in /Applications/lisp/osc/ 
osc.lisp.


what's my mistake?

regards, johannes

_

Johannes Quint
Rilkestr.55
D-53225 Bonn
0228 468256
[EMAIL PROTECTED]
http://www.johannes-quint.de


___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist


[CM] rts and supercollider

2006-06-01 Thread Johannes Quint
when i try the example in the sc-entry of the dict, i get the following:(define *sc* (sc-open))> Undefined function SC-OPEN called with arguments () .   [Condition of type CCL::UNDEFINED-FUNCTION-CALL]thanks for any help, johannes _Johannes QuintRilkestr.55D-53225 Bonn0228 468256johannes.quint@web.dehttp://www.johannes-quint.de 

[CM] range

2006-02-16 Thread Johannes Quint
rick,i dont understand the behaviour of 'range' when i write the following:(setf x (new range :from 60 :stepping (new heap :of '(1 -1 1 -1 1)) :for 6))as result of (next x t) i would expect a list which always contains 61 at the end, but i get => (60 61 60 61 60 59) as well as => (60 59 58 59 60 61) etc.what is going wrong?thanks - johannes. _Johannes QuintRilkestr.55D-53225 Bonn0228 468256johannes.quint@web.dehttp://www.johannes-quint.de 

[CM] plotter

2006-02-04 Thread Johannes Quint
is it possible to work with plotter in emacs?i've installed gtk and plotter runs in x11, butnot in emacs (aquamacs emacs)...thanks for help... _Johannes QuintRilkestr.55D-53225 Bonn0228 468256johannes.quint@web.dehttp://www.johannes-quint.de 

[CM] shortcut

2006-01-24 Thread Johannes Quint
is it possible to define a keyboard-shortcut tobreak a midishare output? _Johannes QuintRilkestr.55D-53225 Bonn0228 468256johannes.quint@web.dehttp://www.johannes-quint.de 

[CM] portmidi

2006-01-02 Thread Johannes Quint
i have problems with portmidi.
after installing and trying out

(portmidi-open :output 3 :input #f)

i get:

? > Error in process listener(1): open-io: no portmidi devices available.
> While executing: #
> Type :POP to abort.
Type :? for other options.
1 > 

(i have installed "libportmidi.dylib" as "libportmidi.dylib" as described...)
thanks for help,
johannes

[CM] cm and supercollider

2005-12-04 Thread Johannes Quint

i've tried out the super-collider examples (/etc/examples/sc.cm).
everything works fine until i try to play something. after:

(events (sc-simple-5 10) "sc-simple-5.osc" :pad 10)

an aiff-file starts but nothing to hear.
the same with the real-time examples in the dictionary.
after:

(define *sc* (sc-open))
(rts (sc-simple-3 10) *sc* ),

i receive the following error in super collider:

FAILURE /n_set Node not found

thanks for help, johannes

___
Cmdist mailing list
Cmdist@ccrma.stanford.edu
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist