Skip to content

Instantly share code, notes, and snippets.

@LFSaw

LFSaw/tip.scd

Created Aug 25, 2011
Embed
What would you like to do?
feedback after claudius maximus. #scTip
b = Buffer.alloc(s, 512, 1);
b.sine1(1.0, true, false, true);
b.plot
Ndef(\feedbacker, {|resetRate = 100, freq = 100, lowFreq = 100, rq = 0.1|
var src = OscN.ar(b, freq);
BufWr.ar(src, b, Phasor.ar(Impulse.ar(resetRate), BufRateScale.kr(b) * 1, 0, BufFrames.kr(b)));
src
})
Ndef(\feedbacker, {|resetRate = 100, freq = 100, lowFreq = 100, rq = 0.1|
var src = OscN.ar(b, freq);
BufWr.ar(src, b, Phasor.ar(Impulse.ar(resetRate), BufRateScale.kr(b) * 1, 0, BufFrames.kr(b)));
src = RLPF.ar(src, lowFreq, rq);
src
})
Ndef(\feedbacker).pause
Ndef(\feedbacker).resume
Ndef(\feedbacker, {|resetRate = 100, freq = 100|
var src = OscN.ar(b, freq);
BufWr.ar(src, b, min(BufFrames.kr(b), Phasor.ar(Impulse.ar(resetRate), BufRateScale.kr(b) * 0.25, 0, 4* BufFrames.kr(b))));
src
}).play
NdefMixer(s)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment