[CM] stereo? found!

[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_0178831083293353_ID
Content-Type: text/plain; charset="windows-1252"
Content-Transfer-Encoding: 8bit

ok, I found by
myself, I guess I
start to become
autonomous...

A-LIN

------- Message
original ------- 
De:  alin weiller  
<alinweiller@caramail.com> 
Date: Fri, 30 Apr
2004 02:10:22 GMT 
Sujet: [CM] stereo? 

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

Marre des Spams ? - http://www.caramailmax.com


--=_NextPart_Lycos_0178831083293353_ID--