You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
scd/sine feedback.scd

43 lines
1.5 KiB
Plaintext

{SinOscFB.ar(freq:142, feedback:Saw.ar(20) + SinOsc.ar(0.1)).dup}.play;
(
SynthDef(\sine_fb, {
var sig, env, amp = 1, out = 0;
sig = SinOscFB.ar(freq:142, feedback:Saw.ar(20) + SinOsc.ar(0.1)).dup;
env = EnvGen.ar(Env.adsr);
sig * env * amp;
Out.ar(out, sig);
}).play;
)
{SinOscFB.ar(freq:142, feedback:Saw.ar(20 * SinOsc.ar(20)) + SinOsc.ar(0.1)).dup}.play;
{Out.ar(0,Pan2.ar(0.1*WeaklyNonlinear.ar(SinOsc.ar(MouseX.kr(100,400),0,0.1)),0.0))}.play;
(
{
var freq = MouseX.kr(100, 400);
var input = SinOsc.ar(freq, 0, 0.1);
var response = WeaklyNonlinear.ar(input);
var filt = RLPF.ar(response, XLine.kr(500, 5000, 10), 0.3);
Out.ar(0, Pan2.ar(0.1 * filt, 0));
}.play;
)
(
{
var freq = MouseX.kr(100, 400);
var input = SinOscFB.ar(freq:142, feedback:Saw.ar(20) + SinOsc.ar(0.1));
var response = WeaklyNonlinear.ar(input);
var filt = RLPF.ar(response, XLine.kr(500, 5000, 10), 0.3);
Out.ar(0, Pan2.ar(0.1 * filt, 0));
}.play;
)
{WeaklyNonlinear.ar(SinOsc.ar(70), Impulse.kr(20), ratex:0.1, ratey:20, freq:440, initx:10 + SinOsc.kr(40), inity:20 + SinOsc.kr(20), alpha:SinOsc.kr(1), xexponent:0, beta:0, yexponent:0).dup * 0.2}.play;
{BHiPass.ar(WeaklyNonlinear2.ar(LFSaw.ar(5000 + SinOsc.kr(200), 1 + SinOsc.kr(0.1)), Dust.ar(1), 0.01, 10, 200, 0, 0, 0.01, 10, 2), 500 + SinOsc.kr(200)).dup}.play
{BLowShelf.ar(WaveletDaub.ar(Saw.ar, n:256, which:110), 500, 0.3).dup * 10}.play
{var n= 1024; WaveletDaub.ar(Saw.ar(MouseY.kr(50,10000, 'exponential'),0.5), n, MouseX.kr(0,n)).dup}.play