Hi, list.<br><br>Some time ago we talked about abusing the STK models for getting strange sounds, I found a nice new one using StifKarp. I was controlling the &quot;stretch&quot; parameter with my new tilt-sensing joypad and discovered that shaking the joypad led to nice noises. Here&#39;s a demo without the joypad for your enjoyment.<br>
<br>Cheers,<br>Kas.<br>===========================<br>//&quot;spooky sound&quot; by Kassen.<br>//Permission granted to modify and copy.<br>//No warranties, no refunds, please mind your speakers and neighbours.<br>//Remixing strongly encouraged.<br>
<br>StifKarp s =&gt;&nbsp; dac;<br><br>//low frequency for nice spooky sound<br>50 =&gt; s.freq;<br><br>//the following lines are to have a note-on without actually<br>//hearing the default pluck. StifKarp won&#39;t make a sound without one<br>
0 =&gt; s.gain;<br>1=&gt; s.noteOn;<br>2::second =&gt; now;<br><br>//turn it up again<br>.8=&gt; s.gain;<br>.9 =&gt; s.sustain;<br><br>//exciting signal<br>TriOsc lfo =&gt; ADSR env =&gt; blackhole;<br>//works better if it&#39;s a sub-harmonic of the pitch, I think<br>
25 =&gt; lfo.freq;<br>second =&gt; env.attackTime;<br>second =&gt; env.decayTime;<br>.5=&gt; env.gain;<br><br>//connects the lfo&#39;s signal to the StifKarp &quot;stretch&quot;<br>//see below<br>spork ~ envctrl();<br><br>
int counter;<br>while(counter &lt; 20)<br>&nbsp;&nbsp;&nbsp; {<br>&nbsp;&nbsp;&nbsp; 1=&gt; env.keyOn;<br>&nbsp;&nbsp;&nbsp; 3::second =&gt; now;<br>&nbsp;&nbsp;&nbsp; 1=&gt; env.keyOff;<br>&nbsp;&nbsp;&nbsp; 1::second =&gt; now;<br>&nbsp;&nbsp;&nbsp; counter++;<br>&nbsp;&nbsp;&nbsp; }<br>//allow it to decay for a bit<br>2::second =&gt; now;<br>
<br>//bye<br><br><br>fun void envctrl()<br>&nbsp;&nbsp;&nbsp; {<br>&nbsp;&nbsp;&nbsp; //the offset and the envelope&#39;s gain combine to<br>&nbsp;&nbsp; //make sure the value stays in stretch&#39;s range<br>&nbsp;&nbsp;&nbsp; while(10::ms =&gt; now) env.last() + .5 =&gt; s.stretch;<br>
&nbsp;&nbsp;&nbsp; }<br>