<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 12pt;
font-family:Calibri
}
--></style></head>
<body class='hmmessage'><div dir='ltr'>Hi,<br>I'm getting better at using reverb but wrestling with trying to include amplitude envelopes in the instrument now. The reverb (locsig) is working for me, if I just use amplitude instead of the amplitude envelope on the output stream, but if I try to employ the amplitude envelope I loose the reverb.<br><br> (locsig loc i (* amplitude (oscil osc) )) ;works fine<br> (locsig loc i (* (env amp-env) (oscil osc) )) ; no reverb?<br> <br>I've tried several changes to the ins but not sure I understand why (env amp-env) takes away the reverb?<br><br> (definstrument examp (start-time duration frequency amplitude <br> &optional (amp-env '(0 0 .5 1.0 1.0 0))<br> (reverb-amount 0.5) <br> )<br> (multiple-value-bind (beg end) (times->samples start-time duration)<br> (let ((osc (make-oscil :frequency frequency))<br> (amp-env (make-env amp-env :scaler amplitude :duration duration))<br> (loc (make-locsig :reverb reverb-amount)) )<br> (run <br> (loop for i from beg below end do<br> (locsig loc i (* (env amp-env) (oscil osc) )) ;;problem here <br> )))))<br><br>(with-sound (:reverb nrev :reverb-data (:reverb-factor 1.0 :lp-coeff 0.7) :channels 2 :srate 48000)<br>(examp 0 1.5 220.0 0.35 '(0 0 .5 1.0 1.0 1.0 1.5 0) 0.3) )<br><br><br> </div></body>
</html>