more work on (buf)melbands help/test

nix
Pierre Alexandre Tremblay 7 years ago
parent 82cc1dc77f
commit 29386e71b2

@ -88,14 +88,14 @@ c = Buffer.new(s);
(
Routine{
t = Main.elapsedTime;
FluidBufSpectralShape.process(s, b, features: c);
FluidBufMelBands.process(s, b, features: c,numBands:10);
(Main.elapsedTime - t).postln;
}.play
)
// listen to the source and look at the buffer
b.play;
c.plot(minval:-5, maxval:250)
c.plot
::
STRONG::A stereo buffer example.::

@ -70,9 +70,8 @@ b = Bus.new(\control,0,40);
//create a monitoring window for the values
(
w = Window("MelBands Monitor", Rect(10, 10, 620, 320)).front;
a = MultiSliderView(w,Rect(10, 10, 600, 300));
a.valueThumbSize(1);
w = Window("Mel Bands Monitor", Rect(10, 10, 620, 320)).front;
a = MultiSliderView(w,Rect(10, 10, 600, 300)).elasticMode_(1).isFilled_(1);
)
//run the wondow updating routine.
@ -84,11 +83,10 @@ r = Routine {
{
if(w.isClosed.not) {
a.value = val;
val.postln;
}
}.defer
});
0.1.wait;
0.01.wait;
}.loop
}.play
@ -98,11 +96,10 @@ r = Routine {
(
{
var source;
source = SinOsc.ar(220,0,0.1);//BPF.ar(WhiteNoise.ar(), 330, 55/330);
Out.kr(b,FluidMelBands.kr(source,maxNumBands:40) * 100);
// source = SinOsc.ar(220,0,0.1);
source = BPF.ar(WhiteNoise.ar(), 330, 55/330);
Out.kr(b,FluidMelBands.kr(source,maxNumBands:40));
source.dup;
}.play;
)
{FluidMelBands.kr(SinOsc.ar(220),maxNumBands:10) * 100}.plot;
::
Loading…
Cancel
Save