STFT: parameter name update

nix
Pierre Alexandre Tremblay 5 years ago
parent e129caafce
commit c08da59128

@ -1,6 +1,6 @@
FluidBufSTFT : FluidBufProcessor {
*kr { |source, startFrame = 0, numFrames = -1, startChan = 0, magnitude, phase, resynthesis, inverse = 0,windowSize = 1024, hopSize = -1, fftSize = -1, padding = 1, trig = 1, blocking = 1|
*kr { |source, startFrame = 0, numFrames = -1, startChan = 0, magnitude, phase, resynth, inverse = 0,windowSize = 1024, hopSize = -1, fftSize = -1, padding = 1, trig = 1, blocking = 1|
// source = source.asUGenInput;
@ -8,12 +8,12 @@ FluidBufSTFT : FluidBufProcessor {
source = source ? -1;
magnitude = magnitude ? -1;
phase = phase ? -1;
resynthesis = resynthesis ? - 1;
resynth = resynth ? - 1;
^FluidProxyUgen.kr(\FluidBufSTFTTrigger, -1, source, startFrame, numFrames, startChan, magnitude, phase, resynthesis, inverse, padding, windowSize, hopSize, fftSize, trig, blocking);
^FluidProxyUgen.kr(\FluidBufSTFTTrigger, -1, source, startFrame, numFrames, startChan, magnitude, phase, resynth, inverse, padding, windowSize, hopSize, fftSize, trig, blocking);
}
*process { |server, source, startFrame = 0, numFrames = -1, startChan = 0, magnitude, phase, resynthesis, inverse = 0, windowSize = 1024, hopSize = -1, fftSize = -1, padding = 1, freeWhenDone = true, action|
*process { |server, source, startFrame = 0, numFrames = -1, startChan = 0, magnitude, phase, resynth, inverse = 0, windowSize = 1024, hopSize = -1, fftSize = -1, padding = 1, freeWhenDone = true, action|
// source = source.asUGenInput;
@ -21,27 +21,27 @@ FluidBufSTFT : FluidBufProcessor {
source = source ? -1;
magnitude = magnitude ? -1;
phase = phase ? -1;
resynthesis = resynthesis ? - 1;
resynth = resynth ? - 1;
^this.new(
server, nil, [magnitude,phase,resynthesis].select{|b| b != -1}
server, nil, [magnitude,phase,resynth].select{|b| b != -1}
).processList(
[source, startFrame, numFrames, startChan, magnitude, phase, resynthesis, inverse, padding, windowSize, hopSize, fftSize, 0], freeWhenDone, action
[source, startFrame, numFrames, startChan, magnitude, phase, resynth, inverse, padding, windowSize, hopSize, fftSize, 0], freeWhenDone, action
);
}
*processBlocking { |server, source, startFrame = 0, numFrames = -1, startChan = 0, magnitude, phase, resynthesis, inverse = 0, windowSize = 1024, hopSize = -1, fftSize = -1, padding = 1,freeWhenDone = true, action|
*processBlocking { |server, source, startFrame = 0, numFrames = -1, startChan = 0, magnitude, phase, resynth, inverse = 0, windowSize = 1024, hopSize = -1, fftSize = -1, padding = 1,freeWhenDone = true, action|
// source = source.asUGenInput;
source = source ? -1;
magnitude = magnitude ? -1;
phase = phase ? -1;
resynthesis = resynthesis ? - 1;
resynth = resynth ? - 1;
^this.new(
server, nil, [magnitude,phase,resynthesis].select{|b| b != -1}
server, nil, [magnitude,phase,resynth].select{|b| b != -1}
).processList(
[source, startFrame, numFrames, startChan, magnitude, phase, resynthesis, inverse, padding, windowSize, hopSize, fftSize, 1], freeWhenDone, action
[source, startFrame, numFrames, startChan, magnitude, phase, resynth, inverse, padding, windowSize, hopSize, fftSize, 1], freeWhenDone, action
);
}
}

@ -38,7 +38,7 @@ The link::Classes/Buffer:: to write magnitudes to in the forward case, or read f
ARGUMENT:: phase
The link::Classes/Buffer:: to write phases to in the forward case, or read from in the inverse case. This is optional for the forward transform, mandatory for the inverse.
ARGUMENT:: resynthesis
ARGUMENT:: resynth
The link::Classes/Buffer:: to write re-synthesised data to in the inverse case. Ignored for the forward transform. Mandatory in the inverse case.
ARGUMENT:: inverse
@ -79,7 +79,7 @@ r = Buffer.new;
(
fork{
FluidBufSTFT.process(s,source:b,magnitude:m,phase:p).wait;
FluidBufSTFT.process(s,magnitude:m,phase:p,resynthesis:r,inverse:1).wait;
FluidBufSTFT.process(s,magnitude:m,phase:p,resynth:r,inverse:1).wait;
"Done".postln;
}
)

Loading…
Cancel
Save