Re: Receiving from portmidi

Ok i really am in 2.11.0 and receiving won't work.

You can really see that portmidi-open is starting the receive :

CM> (receiver? *pm*)
NIL
CM> (define *pm* (portmidi-open :latency 0 :input 6))
; No value
CM> (receiver? *pm*)
T

In pm.scm (revision 1.47), i can seen that portmidi-open calls
rt-stream-receive-data via open-io, right after Pm:OpenInput. So again it
seems designed to behave that way.

Could someone test example 3 from portmidi topic
(http://commonmusic.sourceforge.net/doc/dict/portmidi-topic.html) ? You
don't really need incoming data, a quick copy-paste with corresponding
input pm id will be enough to know if the problem comes from my setup.

Cause I know must be missing something but I'm running out of leads.

> Hello common music people,
>
> Here's the big picture : I can't receive any midi events, sending seem to
> be working and i'd really appreciate some help.
>
> I'm really looking forward to a working setup, i already read Notes From
> The Metalevel and am on the starting block.
>

Snd 9.0

Snd 9.0

I discarded the old recorder and the track support, and completely 
revamped the virtual mix support -- enough changes to warrant a new 
major version.

the recorder:
  completely discarded the old recorder and its functions -- these are gone:
    recorder-autoload
    recorder-buffer-size
    recorder-file
    recorder-file-hook
    recorder-gain
    recorder-in-amp
    recorder-in-chans
    recorder-in-data-format
    recorder-in-device
    recorder-max-duration
    recorder-out-amp
    recorder-out-chans
    recorder-out-data-format
    recorder-out-header-type
    recorder-srate
    recorder-trigger
    vu-in-dB
    vu-size
  due to hardware troubles, I haven't fully tested the new recorder.

tracks:
  removed:             replacement:

Re: Receiving from portmidi

this sounds like a bug but i need to find a keyboard and test it out.  
im totally booked today, will try to look at it tomorrow. apologies  
for the delay!
--rick

Problem with loop/collect

Hi...

I was doing the tutorial and I keep getting an error.  It seems to be
related to collecting a list of the outputs of 2 seperate processes. I
am running Common Music 2.10, Xemacs/Clisp on an WinXP machine.  I am
fairly certain I am not doing anything newbie/stupid.  Any help is
much appreciated!

Here is the simple bit of code Common Music doesn't like:

(events (loop repeat 8
          collect (list (jazz-high-hat 120 .99)
                        (jazz-drums 120 .99)))
        "jazz.mid"
        '(0 2 4 6 8 10 12 14))

The code is from here:
http://commonmusic.sourceforge.net/etc/tutorials/jazz.lisp

I am simply entering in the code from the tutorial...

Here is the error I get:

APPLY: too many arguments given to #1=#<STANDARD-GENERIC-FUNCTION
SCHEDULE-OBJECT>
   [Condition of type SYSTEM::SIMPLE-PROGRAM-ERROR]

Restarts:
  0: [ABORT-REQUEST] Abort handling SLIME request.
  1: [ABORT] ABORT

Re: Problem with loop/collect

try:

(events (loop repeat 8
          APPEND (list (jazz-high-hat 120 .99)
                        (jazz-drums 120 .99)))
        "jazz.mid"
        '(0 2 4 6 8 10 12 14))

or if you prefer:

(events (loop repeat 8
          collect (jazz-high-hat 120 .99)
	 collect (jazz-drums 120 .99))
        "jazz.mid"
        '(0 2 4 6 8 10 12 14))

or even:

loop with procs = {}
   repeat 8
   set procs ^= list( jazz-high-hat(120, .99),
                      jazz-drums( 120, .99))
   finally
     sprout procs, {0 2 4 6 8 10 12 14}
end

Re: Problem with loop/collect

The top 2 variations worked.  Why did the version in the tutorial not
work?  Something to do with the version of CM I am using?  Or the fact
that I am on Win XP?

P.S. Thanks yet again Rick!

Re: Problem with loop/collect

(events ....) expects a flat (single-level) list.

when you do

	... collect (list ...)

you end up with a two level list, ie a list of lists.

On May 1, 2007, at 6:13 PM, Landspeedrecord wrote:

> The top 2 variations worked.  Why did the version in the tutorial not
> work?  Something to do with the version of CM I am using?  Or the fact
> that I am on Win XP?
>
> P.S. Thanks yet again Rick!

Multiple processes at one time - revisited

Hi,

I wrote a function that randomly grabs other functions. I am trying to
have it loop in a call to events...

(events (loop repeat 8
         APPEND (random-function-caller 4 5 .2)
       "random-functions.mid"
       '(0 5 10 15 20 25 30 35))

The problem I am having is that the functions don't play nice with
'events' because some return multiple objects and others don't.  In
addition, since the function is randomly grabbing other functions
there is no way to have the time offsets properly match in a one to
one correspondance with the object(s) returned by the functions that
are returned by the random-function-caller.

Is this an abnormal problem?  That is... am I going about things wrong
headed conceptually by embedding function inside of functions or am I
just trying to do something unusual?

The only work around I can think of is to force all the functions to
return only one object... Which I don't know how to do.  Many of the
functions I have written are running multiple processes and even if I
do an (append (list process1 process2)) the functions still return the
2 processes as two seperate objects.

So... do I adjust my whole approach and if not what solutions do I
have besides forcing 2 objects into 1?

midiplayer/windows

Re: midiplayer/windows

Well i may be wrong but shouldn't windows path use backslash ?

(setf *midi-player* "C:\Programme\Windows Media Player\mplayer2.exe")

Thomas
www.lame-spirale.net

> 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
> johannes.quint@...
> http://www.johannes-quint.de
>
>
>
> !DSPAM:463935db315001355422449!
>