From ac187eda9bef305036a02f1ded21d742dc348425 Mon Sep 17 00:00:00 2001 From: Owen Green Date: Mon, 9 Sep 2019 17:05:24 +0100 Subject: [PATCH] release-packaging/Classes/FluidBufThreadDemo.sc: Finish sclang class --- release-packaging/Classes/FluidBufThreadDemo.sc | 16 ++++++---------- 1 file changed, 6 insertions(+), 10 deletions(-) diff --git a/release-packaging/Classes/FluidBufThreadDemo.sc b/release-packaging/Classes/FluidBufThreadDemo.sc index ddab3c5..e00432c 100644 --- a/release-packaging/Classes/FluidBufThreadDemo.sc +++ b/release-packaging/Classes/FluidBufThreadDemo.sc @@ -1,19 +1,15 @@ FluidBufThreadDemo : UGen{ var <>synth, <>server; - *kr {|source, startFrame = 0, numFrames = -1, startChan = 0, numChans = -1, features, algorithm = 2, minFreq = 20, maxFreq = 10000, unit = 0, windowSize = 1024, hopSize = -1, fftSize = -1, doneAction = 0| + *kr {|source, result, time, doneAction = 0| - var maxFFTSize = if (fftSize == -1) {windowSize.nextPowerOfTwo} {fftSize}; - - source = source.asUGenInput; - features = features.asUGenInput; + result = result.asUGenInput; - source.isNil.if {"FluidBufPitch: Invalid source buffer".throw}; - features.isNil.if {"FluidBufPitch: Invalid features buffer".throw}; + result.isNil.if {"FluidBufThreadDemo: Invalid output buffer".throw}; //NB For wrapped versions of NRT classes, we set the params for maxima to //whatever has been passed in language-side (e.g maxFFTSize still exists as a parameter for the server plugin, but makes less sense here: it just needs to be set to a legal value) - ^this.multiNew(\control, source, startFrame, numFrames, startChan, numChans, features, algorithm, minFreq, maxFreq, unit, windowSize, hopSize, fftSize, maxFFTSize, doneAction); + ^this.multiNew(\control, result, time, doneAction); } *process { |server, result, time, action| @@ -22,7 +18,7 @@ FluidBufThreadDemo : UGen{ result = result.asUGenInput; - result.isNil.if {"FluidBufThreadDemo: Invalid source buffer".throw}; + result.isNil.if {"FluidBufThreadDemo: Invalid output buffer".throw}; server = server ? Server.default; server.ifNotRunning({ @@ -30,7 +26,7 @@ FluidBufThreadDemo : UGen{ ^nil; }); - synth = { instance = FluidBufPitch.kr(result, time, doneAction:Done.freeSelf)}.play(server); + synth = { instance = FluidBufThreadDemo.kr(result, time, doneAction:Done.freeSelf)}.play(server); forkIfNeeded{ synth.waitForFree;