add GUI examples
Gerard Roma
6 years ago
parent
da31abc192
commit
1c98227f7a
@ -0,0 +1,109 @@
|
||||
(
|
||||
var win, soundFileView, freqSscope,loadButton, loopButton;
|
||||
var harmSlider, percSlider, mixSlider;
|
||||
var soundFile, buffer;
|
||||
var synthDef, synth;
|
||||
var makeSynthDef;
|
||||
|
||||
Font.default = Font("Monaco", 16);
|
||||
buffer = Buffer.new;
|
||||
win = Window.new("HPSS",
|
||||
Rect(200,200,800,450)).background_(Color.gray);
|
||||
|
||||
soundFileView = SoundFileView.new(win)
|
||||
.gridOn_(false)
|
||||
.waveColors_([Color.white]);
|
||||
|
||||
loadButton = Button(win, Rect(0, 0, 100, 100))
|
||||
.minHeight_(150)
|
||||
.states_([["Load", Color.grey, Color.grey(0.8)]]);
|
||||
|
||||
loopButton = Button(win, Rect(0, 0, 100, 100))
|
||||
.minHeight_(150)
|
||||
.states_(
|
||||
[["Play", Color.grey, Color.grey(0.8)],
|
||||
["Stop", Color.grey, Color.grey(0.2)]]
|
||||
);
|
||||
|
||||
harmSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
percSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
mixSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
freqSscope = FreqScopeView(win, server:Server.default);
|
||||
freqSscope.active_(true);
|
||||
|
||||
loadButton.action_{
|
||||
FileDialog({ |path|
|
||||
path.postln;
|
||||
soundFile = SoundFile.new;
|
||||
soundFile.openRead(path[0]);
|
||||
buffer = Buffer.read(Server.default, path[0]);
|
||||
buffer.bufnum.postln;
|
||||
soundFileView.soundfile = soundFile;
|
||||
soundFileView.read(0, soundFile.numFrames);
|
||||
});
|
||||
};
|
||||
|
||||
loopButton.action_{|but|
|
||||
if(but.value == 1, {
|
||||
Routine{
|
||||
{makeSynthDef.value}.defer;
|
||||
"hi".postln;
|
||||
Server.default.sync;
|
||||
synth = Synth(\hpssExtractionDemo, [\buffer, buffer.bufnum]);
|
||||
synth.postln;
|
||||
{mixSlider.action.value(mixSlider)}.defer;
|
||||
}.play;
|
||||
},{
|
||||
synth.free;
|
||||
});
|
||||
};
|
||||
|
||||
|
||||
mixSlider.action_{|slider|
|
||||
synth.set(\bal, ControlSpec(0, 1).map(slider.value));
|
||||
};
|
||||
|
||||
|
||||
|
||||
makeSynthDef = {
|
||||
|
||||
synthDef = SynthDef(\hpssExtractionDemo,
|
||||
{|buffer, bal = 0.5|
|
||||
var player, fhpss, mix;
|
||||
var harmSize = (2 * ControlSpec(1, 100, step:1).map(harmSlider.value)) - 1;
|
||||
var percSize = (2 * ControlSpec(1,100, step:1).map(percSlider.value)) - 1;
|
||||
player = PlayBuf.ar(1, buffer, loop:1);
|
||||
fhpss = FluidHPSS.ar(in: player, harmFilterSize: harmSize, percFilterSize: percSize, maskingMode: 1, harmThreshFreq1: 0.1, harmThreshAmp1: 0, harmThreshFreq2: 0.5, harmThreshAmp2: 0, percThreshFreq1: 0.1, percThreshAmp1: 0, percThreshFreq2: 0.5, percThreshAmp2: 0, windowSize: 1024, hopSize: 256, fftSize: -1);
|
||||
|
||||
|
||||
mix =(bal * fhpss[0]) + ((1 - bal) * fhpss[1]);
|
||||
Out.ar(0,Pan2.ar(SinOsc.ar(200)));
|
||||
}
|
||||
).add;
|
||||
|
||||
};
|
||||
|
||||
win.layout_(
|
||||
VLayout(
|
||||
[
|
||||
HLayout(
|
||||
[loadButton, stretch:1],
|
||||
[soundFileView, stretch:5]
|
||||
), stretch:2
|
||||
],
|
||||
[
|
||||
HLayout(
|
||||
[loopButton, stretch:1],
|
||||
[VLayout(
|
||||
HLayout(StaticText(win).string_("H Size ").minWidth_(100), harmSlider),
|
||||
HLayout(StaticText(win).string_("P Size").minWidth_(100), percSlider),
|
||||
HLayout(StaticText(win).string_("Mix").minWidth_(100), mixSlider)
|
||||
), stretch:5]
|
||||
), stretch:2
|
||||
],
|
||||
[freqSscope, stretch:2]
|
||||
)
|
||||
);
|
||||
|
||||
win.front;
|
||||
)
|
||||
@ -0,0 +1,114 @@
|
||||
(
|
||||
var server;
|
||||
var win, soundFileView, loadButton, loopButton;
|
||||
var sliders;
|
||||
var soundFile, audioBuffer, destBuffer;
|
||||
var synthDef, synth;
|
||||
var sl1, sl2, sl3, sl4;
|
||||
|
||||
server = Server.default;
|
||||
Font.default = Font("Monaco", 16);
|
||||
|
||||
audioBuffer = Buffer.new;
|
||||
destBuffer = Buffer.new;
|
||||
|
||||
|
||||
synthDef = SynthDef(\nmfDemo,{|bufnum, a1, a2, a3, a4|
|
||||
var p = PlayBuf.ar(4, bufnum, loop:1);
|
||||
var mix = (a1*p[0]) + (a2 * p[1]) + (a3*p[2]) + (a4*p[3]);
|
||||
Out.ar(0, Pan2.ar(mix));
|
||||
}).add;
|
||||
|
||||
|
||||
|
||||
win = Window.new("NMF4",
|
||||
Rect(200,200,800,450)).background_(Color.gray);
|
||||
|
||||
soundFileView = SoundFileView.new(win)
|
||||
.gridOn_(false)
|
||||
.waveColors_([Color.white]);
|
||||
|
||||
loadButton = Button(win, Rect(0, 0, 100, 100))
|
||||
.minHeight_(150)
|
||||
.states_([["Load", Color.grey, Color.grey(0.8)],
|
||||
["Wait", Color.grey, Color.grey(0.2)]]
|
||||
);
|
||||
|
||||
loopButton = Button(win, Rect(0, 0, 100, 100))
|
||||
.minHeight_(150)
|
||||
.states_(
|
||||
[["Play", Color.grey, Color.grey(0.8)],
|
||||
["Stop", Color.grey, Color.grey(0.2)]]
|
||||
);
|
||||
|
||||
sliders = Array.fill(4, {|i|
|
||||
var s = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
s.action_{
|
||||
var sym = ("a"++(i+1)).asSymbol;
|
||||
synth.set(sym, ControlSpec(0, 1).map(s.value));
|
||||
}
|
||||
});
|
||||
|
||||
|
||||
loadButton.action_{
|
||||
FileDialog({ |path|
|
||||
path.postln;
|
||||
|
||||
soundFile = SoundFile.new;
|
||||
soundFile.openRead(path[0]);
|
||||
|
||||
soundFileView.soundfile = soundFile;
|
||||
soundFileView.read(0, soundFile.numFrames);
|
||||
Routine{
|
||||
audioBuffer = Buffer.read(server, path[0]);
|
||||
server.sync;
|
||||
FluidBufNMF.process(server,
|
||||
audioBuffer.bufnum,destination:destBuffer.bufnum, components:4
|
||||
);
|
||||
server.sync;
|
||||
destBuffer.query;
|
||||
server.sync;
|
||||
{loadButton.value_(0)}.defer;
|
||||
}.play;
|
||||
});
|
||||
};
|
||||
|
||||
loopButton.action_{|but|
|
||||
var a1 = ControlSpec(0, 1).map(sliders[0].value);
|
||||
var a2 = ControlSpec(0, 1).map(sliders[1].value);
|
||||
var a3 = ControlSpec(0, 1).map(sliders[2].value);
|
||||
var a4 = ControlSpec(0, 1).map(sliders[3].value);
|
||||
|
||||
if(but.value == 1, {
|
||||
synth = Synth(\nmfDemo,
|
||||
[\bufnum, destBuffer.bufnum, \a1, a1, \a2, a2, \a3, a3, \a4, a4]);
|
||||
},{
|
||||
synth.free;
|
||||
});
|
||||
};
|
||||
|
||||
|
||||
win.layout_(
|
||||
VLayout(
|
||||
[
|
||||
HLayout(
|
||||
[loadButton, stretch:1],
|
||||
[soundFileView, stretch:5]
|
||||
), stretch:2
|
||||
],
|
||||
[
|
||||
HLayout(
|
||||
[loopButton, stretch:1],
|
||||
[VLayout(
|
||||
HLayout(StaticText(win).string_("source 1 ").minWidth_(100), sliders[0]),
|
||||
HLayout(StaticText(win).string_("source 2 ").minWidth_(100), sliders[1]),
|
||||
HLayout(StaticText(win).string_("source 3 ").minWidth_(100), sliders[2]),
|
||||
HLayout(StaticText(win).string_("source 4 ").minWidth_(100), sliders[3])
|
||||
), stretch:5]
|
||||
), stretch:2
|
||||
]
|
||||
)
|
||||
);
|
||||
|
||||
win.front;
|
||||
)
|
||||
@ -0,0 +1,152 @@
|
||||
(
|
||||
var server;
|
||||
var win, soundFileView,loadButton, processButton;
|
||||
var ksSlider, thSlider;
|
||||
var soundFile, audioBuffer, slicesBuffer, slicesArray;
|
||||
var addSelections, playFunc, stopFunc;
|
||||
var synthDef, synth;
|
||||
var synths;
|
||||
|
||||
var playing, currentSelection, colors, prevColor;
|
||||
|
||||
playing = Array.fill(10, {false});
|
||||
server = Server.default;
|
||||
Font.default = Font("Monaco", 16);
|
||||
|
||||
audioBuffer = Buffer.new;
|
||||
slicesBuffer = Buffer.new;
|
||||
|
||||
colors = Array.fill(64, {Color.rand});
|
||||
synths = Array.fill(10, {nil});
|
||||
|
||||
synthDef = SynthDef(\noveltySegDemo,{|buf, start, end|
|
||||
Out.ar(0, BufRd.ar(1, buf, Phasor.ar(1, 1, start, end)));
|
||||
}).add;
|
||||
|
||||
playFunc = {|index|
|
||||
var dur;
|
||||
currentSelection = index;
|
||||
if(playing[index].not){
|
||||
synths[index] = Synth(\noveltySegDemo,
|
||||
[\buf, audioBuffer.bufnum,
|
||||
\start, slicesArray[index],
|
||||
\end, slicesArray[index+1]
|
||||
]);
|
||||
playing[index] = true;
|
||||
};
|
||||
soundFileView.setSelectionColor(currentSelection, Color.white);
|
||||
};
|
||||
|
||||
stopFunc = {|index| synths[index].free; playing[index] = false;
|
||||
soundFileView.setSelectionColor(
|
||||
index, colors[index]
|
||||
);
|
||||
};
|
||||
|
||||
|
||||
win = Window.new("NoveltySegmentation",
|
||||
Rect(200,200,800,450)).background_(Color.gray);
|
||||
|
||||
win.view.keyDownAction_{|view, char, modifiers, unicode, keycode, key|
|
||||
if (char.isDecDigit){
|
||||
var digit = char.digit;
|
||||
if(digit.notNil && slicesArray.notNil){
|
||||
playFunc.value(digit - 1);
|
||||
}
|
||||
}
|
||||
};
|
||||
|
||||
win.view.keyUpAction_{|view, char|
|
||||
if(char.isDecDigit){
|
||||
stopFunc.value(char.digit - 1);
|
||||
}
|
||||
};
|
||||
|
||||
soundFileView = SoundFileView.new(win)
|
||||
.gridOn_(false)
|
||||
.waveColors_([Color.white]);
|
||||
|
||||
loadButton = Button(win, Rect(0, 0, 100, 100))
|
||||
.minHeight_(150)
|
||||
.states_([["Load", Color.grey, Color.grey(0.8)]]);
|
||||
|
||||
processButton = Button(win, Rect(0, 0, 100, 100))
|
||||
.minHeight_(150)
|
||||
.states_(
|
||||
[["Process", Color.grey, Color.grey(0.8)],
|
||||
["Wait", Color.grey, Color.grey(0.2)]]
|
||||
);
|
||||
|
||||
ksSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
thSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
|
||||
|
||||
loadButton.action_{
|
||||
FileDialog({ |path|
|
||||
path.postln;
|
||||
soundFile = SoundFile.new;
|
||||
soundFile.openRead(path[0]);
|
||||
audioBuffer = Buffer.read(server, path[0]);
|
||||
soundFileView.soundfile = soundFile;
|
||||
soundFileView.read(0, soundFile.numFrames);
|
||||
});
|
||||
};
|
||||
|
||||
processButton.action_{|but|
|
||||
var ks = 2*(ControlSpec(2, 100, step:1).map(ksSlider.value)) - 1;
|
||||
var th = ControlSpec(0, 1).map(thSlider.value);
|
||||
if(but.value == 1, {
|
||||
Routine{
|
||||
FluidBufNoveltySlice.process(
|
||||
server,
|
||||
source:audioBuffer.bufnum,
|
||||
indices:slicesBuffer.bufnum,
|
||||
kernelSize:ks,
|
||||
threshold: th
|
||||
);
|
||||
server.sync;
|
||||
slicesBuffer.loadToFloatArray(action:{|arr|
|
||||
slicesArray = arr;
|
||||
{ processButton.value_(0);
|
||||
addSelections.value(slicesArray)
|
||||
}.defer;
|
||||
|
||||
});
|
||||
}.play;
|
||||
});
|
||||
};
|
||||
|
||||
|
||||
|
||||
addSelections = {|array|
|
||||
var nSegments = min(array.size, soundFileView.selections.size) - 1;
|
||||
soundFileView.selections.do({|sel, i| soundFileView.selectNone(i)});
|
||||
nSegments.do({|i|
|
||||
soundFileView.setSelectionStart(i, array[i]);
|
||||
soundFileView.setSelectionSize(i, array[i+1] - array[i]);
|
||||
soundFileView.setSelectionColor(i, colors[i]);
|
||||
});
|
||||
};
|
||||
|
||||
win.layout_(
|
||||
VLayout(
|
||||
[
|
||||
HLayout(
|
||||
[loadButton, stretch:1],
|
||||
[soundFileView, stretch:5]
|
||||
), stretch:2
|
||||
],
|
||||
[
|
||||
HLayout(
|
||||
[processButton, stretch:1],
|
||||
[VLayout(
|
||||
HLayout(StaticText(win).string_("Kernel ").minWidth_(100), ksSlider),
|
||||
HLayout(StaticText(win).string_(" Threshold").minWidth_(100), thSlider)
|
||||
), stretch:5]
|
||||
), stretch:2
|
||||
]
|
||||
)
|
||||
);
|
||||
|
||||
win.front;
|
||||
)
|
||||
@ -0,0 +1,109 @@
|
||||
(
|
||||
var win, soundFileView, freqSscope,loadButton, loopButton;
|
||||
var thresholdSlider, lenSlider, mixSlider;
|
||||
var soundFile, buffer;
|
||||
var synthDef, synth;
|
||||
|
||||
Font.default = Font("Monaco", 16);
|
||||
buffer = Buffer.new;
|
||||
win = Window.new("SineExtraction",
|
||||
Rect(200,200,800,450)).background_(Color.gray);
|
||||
|
||||
soundFileView = SoundFileView.new(win)
|
||||
.gridOn_(false)
|
||||
.waveColors_([Color.white]);
|
||||
|
||||
loadButton = Button(win, Rect(0, 0, 100, 100))
|
||||
.minHeight_(150)
|
||||
.states_([["Load", Color.grey, Color.grey(0.8)]]);
|
||||
|
||||
loopButton = Button(win, Rect(0, 0, 100, 100))
|
||||
.minHeight_(150)
|
||||
.states_(
|
||||
[["Play", Color.grey, Color.grey(0.8)],
|
||||
["Stop", Color.grey, Color.grey(0.2)]]
|
||||
);
|
||||
|
||||
thresholdSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
lenSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
mixSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
freqSscope = FreqScopeView(win, server:Server.default);
|
||||
freqSscope.active_(true);
|
||||
|
||||
loadButton.action_{
|
||||
FileDialog({ |path|
|
||||
path.postln;
|
||||
soundFile = SoundFile.new;
|
||||
soundFile.openRead(path[0]);
|
||||
buffer = Buffer.read(Server.default, path[0]);
|
||||
buffer.bufnum.postln;
|
||||
soundFileView.soundfile = soundFile;
|
||||
soundFileView.read(0, soundFile.numFrames);
|
||||
});
|
||||
};
|
||||
|
||||
loopButton.action_{|but|
|
||||
if(but.value == 1, {
|
||||
synth = Synth(\sineExtractionDemo, [\buffer, buffer.bufnum]);
|
||||
mixSlider.action.value(mixSlider);
|
||||
thresholdSlider.action.value(thresholdSlider);
|
||||
lenSlider.action.value(lenSlider);
|
||||
},{
|
||||
synth.free;
|
||||
});
|
||||
};
|
||||
|
||||
|
||||
mixSlider.action_{|slider|
|
||||
synth.set(\bal, ControlSpec(0, 1).map(slider.value));
|
||||
};
|
||||
|
||||
|
||||
thresholdSlider.action_{|slider|
|
||||
synth.set(\threshold, ControlSpec(-144, 0).map(slider.value));
|
||||
};
|
||||
|
||||
|
||||
lenSlider.action_{|slider|
|
||||
synth.set(\minLength, ControlSpec(0, 30).map(slider.value));
|
||||
};
|
||||
|
||||
|
||||
synthDef = SynthDef(\sineExtractionDemo,
|
||||
{|buffer, threshold = 0.9, minLength = 15, bal = 0.5|
|
||||
var player, fse, mix;
|
||||
player = PlayBuf.ar(1, buffer, loop:1);
|
||||
fse = FluidSines.ar(in: player, bandwidth: 76,
|
||||
detectionThreshold: threshold, minTrackLen: minLength,
|
||||
windowSize: 2048,
|
||||
hopSize: 512, fftSize: 8192
|
||||
);
|
||||
mix =(bal * fse[0]) + ((1 - bal) * fse[1]);
|
||||
Out.ar(0,Pan2.ar(mix));
|
||||
}
|
||||
).add;
|
||||
|
||||
win.layout_(
|
||||
VLayout(
|
||||
[
|
||||
HLayout(
|
||||
[loadButton, stretch:1],
|
||||
[soundFileView, stretch:5]
|
||||
), stretch:2
|
||||
],
|
||||
[
|
||||
HLayout(
|
||||
[loopButton, stretch:1],
|
||||
[VLayout(
|
||||
HLayout(StaticText(win).string_("Threshold ").minWidth_(100), thresholdSlider),
|
||||
HLayout(StaticText(win).string_("Min Length").minWidth_(100), lenSlider),
|
||||
HLayout(StaticText(win).string_("Mix").minWidth_(100), mixSlider)
|
||||
), stretch:5]
|
||||
), stretch:2
|
||||
],
|
||||
[freqSscope, stretch:2]
|
||||
)
|
||||
);
|
||||
|
||||
win.front;
|
||||
)
|
||||
@ -0,0 +1,105 @@
|
||||
(
|
||||
var win, soundFileView, freqSscope,loadButton, loopButton;
|
||||
var fwSlider, bwSlider, mixSlider;
|
||||
var soundFile, buffer;
|
||||
var synthDef, synth;
|
||||
|
||||
Font.default = Font("Monaco", 16);
|
||||
buffer = Buffer.new;
|
||||
win = Window.new("TransientExtraction",
|
||||
Rect(200,200,800,450)).background_(Color.gray);
|
||||
|
||||
soundFileView = SoundFileView.new(win)
|
||||
.gridOn_(false)
|
||||
.waveColors_([Color.white]);
|
||||
|
||||
loadButton = Button(win, Rect(0, 0, 100, 100))
|
||||
.minHeight_(150)
|
||||
.states_([["Load", Color.grey, Color.grey(0.8)]]);
|
||||
|
||||
loopButton = Button(win, Rect(0, 0, 100, 100))
|
||||
.minHeight_(150)
|
||||
.states_(
|
||||
[["Play", Color.grey, Color.grey(0.8)],
|
||||
["Stop", Color.grey, Color.grey(0.2)]]
|
||||
);
|
||||
|
||||
fwSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
bwSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
mixSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
freqSscope = FreqScopeView(win, server:Server.default);
|
||||
freqSscope.active_(true);
|
||||
|
||||
loadButton.action_{
|
||||
FileDialog({ |path|
|
||||
path.postln;
|
||||
soundFile = SoundFile.new;
|
||||
soundFile.openRead(path[0]);
|
||||
buffer = Buffer.read(Server.default, path[0]);
|
||||
buffer.bufnum.postln;
|
||||
soundFileView.soundfile = soundFile;
|
||||
soundFileView.read(0, soundFile.numFrames);
|
||||
});
|
||||
};
|
||||
|
||||
loopButton.action_{|but|
|
||||
if(but.value == 1, {
|
||||
synth = Synth(\transientExtractionDemo, [\buffer, buffer.bufnum]);
|
||||
mixSlider.action.value(mixSlider);
|
||||
fwSlider.action.value(fwSlider);
|
||||
bwSlider.action.value(bwSlider);
|
||||
},{
|
||||
synth.free;
|
||||
});
|
||||
};
|
||||
|
||||
|
||||
mixSlider.action_{|slider|
|
||||
synth.set(\bal, ControlSpec(0, 1).map(slider.value));
|
||||
};
|
||||
|
||||
|
||||
fwSlider.action_{|slider|
|
||||
synth.set(\fw, ControlSpec(0, 5).map(slider.value));
|
||||
};
|
||||
|
||||
|
||||
bwSlider.action_{|slider|
|
||||
synth.set(\bw, ControlSpec(0, 5).map(slider.value));
|
||||
};
|
||||
|
||||
|
||||
synthDef = SynthDef(\transientExtractionDemo,
|
||||
{|buffer, fw = 3, bw = 1, bal = 0.5|
|
||||
var player, fte, mix;
|
||||
player = PlayBuf.ar(1, buffer, loop:1);
|
||||
fte = FluidTransients.ar(in: player, threshFwd:fw, threshBack:bw, clumpLength:256);
|
||||
mix =(bal * fte[0]) + ((1 - bal) * fte[1]);
|
||||
Out.ar(0,Pan2.ar(mix));
|
||||
}
|
||||
).add;
|
||||
|
||||
win.layout_(
|
||||
VLayout(
|
||||
[
|
||||
HLayout(
|
||||
[loadButton, stretch:1],
|
||||
[soundFileView, stretch:5]
|
||||
), stretch:2
|
||||
],
|
||||
[
|
||||
HLayout(
|
||||
[loopButton, stretch:1],
|
||||
[VLayout(
|
||||
HLayout(StaticText(win).string_("Forward Th ").minWidth_(100), fwSlider),
|
||||
HLayout(StaticText(win).string_("Backward Th").minWidth_(100), bwSlider),
|
||||
HLayout(StaticText(win).string_("Mix").minWidth_(100), mixSlider)
|
||||
), stretch:5]
|
||||
), stretch:2
|
||||
],
|
||||
[freqSscope, stretch:2]
|
||||
)
|
||||
);
|
||||
|
||||
win.front;
|
||||
)
|
||||
@ -0,0 +1,150 @@
|
||||
(
|
||||
var server;
|
||||
var win, soundFileView,loadButton, processButton;
|
||||
var fwSlider, bwSlider, debounceSlider;
|
||||
var soundFile, audioBuffer, slicesBuffer, slicesArray;
|
||||
var addSelections, playFunc, stopFunc;
|
||||
var synthDef, synth;
|
||||
|
||||
var playing, currentSelection, colors, prevColor;
|
||||
|
||||
playing = false;
|
||||
server = Server.default;
|
||||
Font.default = Font("Monaco", 16);
|
||||
|
||||
audioBuffer = Buffer.new;
|
||||
slicesBuffer = Buffer.new;
|
||||
|
||||
colors = Array.fill(64, {Color.rand});
|
||||
|
||||
synthDef = SynthDef(\transientSegDemo,{|buf, start, end|
|
||||
Out.ar(0, BufRd.ar(1, buf, Phasor.ar(1, 1, start, end)));
|
||||
}).add;
|
||||
|
||||
playFunc = {|index|
|
||||
var dur;
|
||||
currentSelection = index;
|
||||
if(playing.not){
|
||||
synth = Synth(\transientSegDemo,
|
||||
[\buf, audioBuffer.bufnum,
|
||||
\start, slicesArray[index],
|
||||
\end, slicesArray[index+1]
|
||||
]);
|
||||
playing = true;
|
||||
};
|
||||
soundFileView.setSelectionColor(currentSelection, Color.white);
|
||||
};
|
||||
|
||||
stopFunc = {synth.free; playing = false;
|
||||
soundFileView.setSelectionColor(currentSelection, colors[currentSelection]);
|
||||
|
||||
};
|
||||
|
||||
|
||||
win = Window.new("TransientSegmentation",
|
||||
Rect(200,200,800,450)).background_(Color.gray);
|
||||
|
||||
win.view.keyDownAction_{|view, char, modifiers, unicode, keycode, key|
|
||||
if (char.isDecDigit){
|
||||
var digit = char.digit;
|
||||
if(slicesArray.notNil){
|
||||
playFunc.value(digit - 1);
|
||||
}
|
||||
}
|
||||
};
|
||||
|
||||
win.view.keyUpAction_{stopFunc.value;};
|
||||
|
||||
|
||||
|
||||
soundFileView = SoundFileView.new(win)
|
||||
.gridOn_(false)
|
||||
.waveColors_([Color.white]);
|
||||
|
||||
loadButton = Button(win, Rect(0, 0, 100, 100))
|
||||
.minHeight_(150)
|
||||
.states_([["Load", Color.grey, Color.grey(0.8)]]);
|
||||
|
||||
processButton = Button(win, Rect(0, 0, 100, 100))
|
||||
.minHeight_(150)
|
||||
.states_(
|
||||
[["Process", Color.grey, Color.grey(0.8)],
|
||||
["Wait", Color.grey, Color.grey(0.2)]]
|
||||
);
|
||||
|
||||
fwSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
bwSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
debounceSlider = Slider(win, Rect(0, 0, 100, 10)).value_(0.5);
|
||||
|
||||
loadButton.action_{
|
||||
FileDialog({ |path|
|
||||
path.postln;
|
||||
soundFile = SoundFile.new;
|
||||
soundFile.openRead(path[0]);
|
||||
audioBuffer = Buffer.read(server, path[0]);
|
||||
soundFileView.soundfile = soundFile;
|
||||
soundFileView.read(0, soundFile.numFrames);
|
||||
});
|
||||
};
|
||||
|
||||
processButton.action_{|but|
|
||||
var fw = ControlSpec(0, 5).map(fwSlider.value);
|
||||
var bw = ControlSpec(0, 5).map(bwSlider.value);
|
||||
var db = ControlSpec(1, 4410).map(debounceSlider.value);
|
||||
if(but.value == 1, {
|
||||
Routine{
|
||||
FluidBufTransientSlice.process(
|
||||
server,
|
||||
source:audioBuffer.bufnum,
|
||||
indices:slicesBuffer.bufnum,
|
||||
threshFwd: fw,
|
||||
threshBack: bw,
|
||||
clumpLength:db
|
||||
);
|
||||
server.sync;
|
||||
slicesBuffer.loadToFloatArray(action:{|arr|
|
||||
slicesArray = arr;
|
||||
{ processButton.value_(0);
|
||||
addSelections.value(slicesArray)
|
||||
}.defer;
|
||||
|
||||
});
|
||||
}.play;
|
||||
});
|
||||
};
|
||||
|
||||
|
||||
|
||||
addSelections = {|array|
|
||||
var nSegments = min(array.size, soundFileView.selections.size) - 1;
|
||||
soundFileView.selections.do({|sel, i| soundFileView.selectNone(i)});
|
||||
nSegments.do({|i|
|
||||
soundFileView.setSelectionStart(i, array[i]);
|
||||
soundFileView.setSelectionSize(i, array[i+1] - array[i]);
|
||||
soundFileView.setSelectionColor(i, colors[i]);
|
||||
});
|
||||
};
|
||||
|
||||
win.layout_(
|
||||
VLayout(
|
||||
[
|
||||
HLayout(
|
||||
[loadButton, stretch:1],
|
||||
[soundFileView, stretch:5]
|
||||
), stretch:2
|
||||
],
|
||||
[
|
||||
HLayout(
|
||||
[processButton, stretch:1],
|
||||
[VLayout(
|
||||
HLayout(StaticText(win).string_("Forward Th ").minWidth_(100), fwSlider),
|
||||
HLayout(StaticText(win).string_("Backward Th").minWidth_(100), bwSlider),
|
||||
HLayout(StaticText(win).string_("Debounce").minWidth_(100), debounceSlider)
|
||||
), stretch:5]
|
||||
), stretch:2
|
||||
]
|
||||
)
|
||||
);
|
||||
|
||||
win.front;
|
||||
)
|
||||
Loading…
Reference in New Issue