[CM] stereo?

[alin weiller]

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.

--=_NextPart_Lycos_0238551083291022_ID
Content-Type: text/plain; charset="windows-1252"
Content-Transfer-Encoding: 8bit

Hi, I try to create a stereo sound but don't succed, I'm suing locsig.

The peace of code below should produce a sinusoide on two channels

I save  it in the file sin.ins


(definstrument sinuso (time duration frequency)
   (let* ((srate *clm-srate* )
         (beg (floor (* time srate)))
         (end (+ beg (floor (* duration srate))) )
         (car (make-oscil :frequency frequency))
         (loc (make-locsig :degree 60 :distance 1 
                           :reverb 10 :channels 2)))
    (run
     (loop for i from beg to end
           do
           (locsig loc i (oscil car))))))



then try this

(compile-file "/home/a-lin/CMCLM/sin.ins")
(load "/home/a-lin/CMCLM/sin")
(with-sound () (sinuso 0 1 440))


The result is a sinusoide but on one channel


???????

Please help me, I start to become crazy

A-LIN

C est le moment de dynamiser votre boîte mail en découvrant les offres CaraMail Premium - http://www.caramailmax.com


--=_NextPart_Lycos_0238551083291022_ID--