<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css" style="display:none;"> P {margin-top:0;margin-bottom:0;} </style>
</head>
<body dir="ltr">
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
Hi,</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
I was trying to figure out how to use an env on the freq parameter of make-pulsed-env<br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
(make-pulsed-env envelope duration frequency) but it wants a real, not a pair.&nbsp; I thought I'd look-see the code for make-pulsed-env, but I can't seem to locate it.&nbsp; Wondering if there's a way to go about achieving the effect?&nbsp; make-freqpulsed-env?<br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
<br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
I tried adding an amp to the pulsed-env but that's not the effect I was after.<br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
&nbsp; &nbsp; (outa i (* 5.95 (polyshape gen (* (env ampenv) (pulsed-env jsenvel)) &nbsp;0.01) &nbsp;))</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
Also tried a vibrato type effect using an LFO, but still no joy.</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
Just trying to get make-pulsed-env to change frequency within the duration of the note.</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
Something like: &lt;&gt;,&nbsp;&nbsp;&nbsp; &lt;&nbsp; &gt;,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &lt;&nbsp;&nbsp;&nbsp;&nbsp; &gt;, &lt;&gt;, &lt;&gt;,&lt;&gt;,&lt;&gt;<br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
<br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
(with-sound (:srate 48000 :channels 1 :play #t)
<div>&nbsp; (let ((gen (make-polyshape 400.0 :partials (list 1 .5 &nbsp;2 .25 &nbsp;3 .125 &nbsp;4 .125)))</div>
<div>&nbsp; &nbsp; &nbsp; &nbsp; (jsenvel (make-pulsed-env '(0 0 &nbsp;.25 &nbsp;0.01 &nbsp;.5 &nbsp;0.2 1 &nbsp;0.0) &nbsp;1.0 &nbsp;1.0))&nbsp; ;XXX<br>
</div>
<div>&nbsp; &nbsp; &nbsp; &nbsp; )</div>
<div>&nbsp; &nbsp; (do ((i 0 (+ i 1)))</div>
<div>&nbsp; &nbsp; &nbsp; &nbsp; ((= i 96000))</div>
<div>&nbsp; &nbsp; (outa i (* 5.95 (polyshape gen &nbsp;(pulsed-env jsenvel) &nbsp;0.01) &nbsp;)) <br>
</div>
&nbsp; &nbsp; &nbsp; ))) <br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
<br>
</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
Regards,</div>
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0);">
Jim<br>
</div>
</body>
</html>