PV_MagDiv division of magnitudes
PV_MagDiv(bufferA, bufferB, zeroed)
Divides magnitudes of two inputs and keeps the phases of the first input.
bufferA - fft buffer A.
bufferB - fft buffer B.
zeroed - number to use when bins are zeroed out, i.e. causing division by zero (defaults to 0.0001)
See also FFT Overview.
s.boot;
(
b = Buffer.alloc(s,2048,1);
c = Buffer.alloc(s,2048,1);
d = Buffer.read(s,"sounds/a11wlk01.wav");
)
(
SynthDef("help-MagDiv", { arg out=0, bufnumA=0, bufnumB=1;
var inA, chainA, inB, chainB, chain;
inA = WhiteNoise.ar(0.2);
inB = LFSaw.ar(100, 0, 0.2);
chainA = FFT(bufnumA, inA);
chainB = FFT(bufnumB, inB);
chain = PV_MagDiv(chainA, chainB);
Out.ar(out, 0.5 * IFFT(chain).dup);
}).play(s,[\out, 0, \bufnumA, b, \bufnumB, c ]);
)
(
SynthDef("help-MagDiv2", { arg out=0, bufnumA=0, bufnumB=1, soundBufnum=2;
var inA, chainA, inB, chainB, chain;
inA = LFSaw.ar([100, 150], 0, 0.2);
inB = PlayBuf.ar(1, soundBufnum, BufRateScale.kr(soundBufnum), loop: 1);
chainA = FFT(bufnumA, inA);
chainA = PV_RandComb(chainA, MouseY.kr, Impulse.kr(0.4));
chainB = FFT(bufnumB, inB);
chain = PV_MagDiv(chainA, chainB, 1);
Out.ar(out, 0.1 * IFFT(chain));
}).play(s,[\out, 0, \bufnumA, b, \bufnumB, c, \soundBufnum, d]);
)
b.free; c.free; d.free;