csound play
Charlie Baker
baker@jitterbug.ccmrc.ucsb.edu
Sun, 8 May 94 12:18:41 PDT
Well, it's not great, but if you want to play the output .sco files in csound syntax, try
replacing the last method in stella/csound.lisp with the following:
(defmethod play-using-syntax ((syntax csound) file &rest args)
(declare (ignore args))
#+mcl (format t "Sorry, can't play csound from Lisp on the Mac.~%")
#-mcl (let* ((ofile (ask-file :prompt "Output Sound File name?: " :direction :output))
(orc (ask-file :prompt "Orchestra File name?: "))
(command (format nil "csound -o ~A ~A ~A" ofile orc
(namestring (truename file))))
(plcmd (format nil "play ~A" ofile)))
(cm::shell command)
(tell-user "Playing ~A ." ofile)
(cm::shell plcmd)))
This assumes that unix can find csound somewhere in your paths...also I should work out a way to keep the output snd file and .orc files as slots in the io-stream object...is there a way to access other slot values of the io-stream, when all you are passed is the file slot? Rick? Bill?
Best,
Charlie
>From hkt@zkm.de Mon May 9 11:27:29 1994