On Mon, 18 Jun 2007, e deleflie wrote:
I still cant manage to properly select a sound. Why would this code:
(let ((outsound (new-sound "out.snd" :channels 4)))
(display (format #f "Currently selected Sound
is ~a \n" (selected-sound)))
(let ((insound (open-sound fullfilename)))
(display (format #f "Currently selected Sound
is ~a \n" (selected-sound)))
select-sound outsound;
(display (format #f "Currently selected Sound
is ~a \n" (selected-sound)))
print out this:
Currently selected Sound is 0
Currently selected Sound is 1
Currently selected Sound is 1
1 (let ((outsound (new-sound "out.snd" :channels 4)))
2 (display (format #f "Currently selected Sound is ~a \n"
3 (selected-sound)))
4 (let ((insound (open-sound fullfilename)))
5 (display (format #f "Currently selected Sound is ~a \n"
6 (selected-sound)))
7 select-sound outsound;
8 (display (format #f "Currently selected Sound is ~a \n"
9 (selected-sound)))
The output you are getting is correct. But are you missing a couple of
paranthesis on line 7? Currently, line 7 doesn't do anything.
_______________________________________________
Cmdist mailing list
[email protected]
http://ccrma-mail.stanford.edu/mailman/listinfo/cmdist
