View this PageEdit this PageUploads to this PageHistory of this PageTop of the SwikiRecent ChangesSearch the SwikiHelp Guide

Stefanie L. Ku

//S.L.K.

(
// The N-S-S-U version, 102920012342

var w, box1, box2, box3, box4, filename, sound, signal, rate, input;

//Make GUI Window in bimini blue with grey checkbox and black label
w = GUIWindow.new("Versions of Floating", Rect.new( 128, 64, 488, 264 ))
.backColor_(rgb(14,107,200));

box1 = CheckBoxView.new( w, Rect.new( 18, 15, 217, 35 ), "Random Acceleration + CombN", 0, 0, 1, 0, 'linear')
.backColor_(rgb(207,200,207)).labelColor_(rgb(0,0,0));

box2 = CheckBoxView.new( w, Rect.new( 18, 55, 234, 75 ), "Delay (Mouse Controlled CombL)", 0, 0, 1, 0, 'linear')
.backColor_(rgb(220,193,207)).labelColor_(rgb(0,0,0));

box3 = CheckBoxView.new( w, Rect.new( 18, 95, 348, 115 ), "Texture Overlap (Smells like Grinding Metal.....) ", 0, 0, 1, 0, 'linear')
.backColor_(rgb(233,186,207)).labelColor_(rgb(0,0,0));

box4 = CheckBoxView.new( w, Rect.new( 18, 135, 104, 155 ), "Sine Bass", 0, 0, 1, 0, 'linear')
.backColor_(rgb(246,179,207)).labelColor_(rgb(0,0,0));

//Get a sound file input from disk
filename = ":Sounds:floating_1";
sound = SoundFile.new;
if (sound.read(filename), {
signal = sound.data.at(0);

Synth.play({

arg synth;
Pause.ar({
rate = XLine.kr(0.04, 400, 600);
input = PlayBuf.ar(signal/2, sound.sampleRate, rate, 0, 0, signal.size-2);
CombN.ar(in: input, maxdelaytime: 0.6, delaytime: 0.5.rand + 0.3, decaytime: 8, mul: 0.17, add: input);

},
box1.kr(11) // control with check box (with lag time)
)

+

Pause.ar({
rate = XLine.kr(0.01, 200, 300);
input = PlayBuf.ar(signal, sound.sampleRate, rate, 0, 0, signal.size-2);
CombL.ar(in: input, maxdelaytime: 0.77, delaytime: MouseX.kr(0,0.77), decaytime: MouseY.kr(0.01,1), mul: 0.17);
},
box2.kr(11) // control with check box (with lag time)
)

+

Pause.ar({
input = OverlapTexture.ar({ //OverlapTexture.ar(newEventFunc, sustainTime, transitionTime, overlap, numChannels, maxRepeats, mul, add)
Pan2.ar(
Klank.ar(
`[
Array.rand(4, 20.0, 2000.0),
nil,
Array.rand(2, 0.2, 12.0)
],
PinkNoise.ar(LFNoise1.kr(3.0.rand, 0.0008, 0.0022))
).abs #[-1, 1].choose, LFNoise1.kr(1.0.rand)
)
}, 8, 3, 4, 2); //close OverlapTexture
6.do({
input = AllpassN.ar(in: input, maxdelaytime: 0.040, delaytime: [0.040.rand,0.040.rand], decaytime: 16, mul: 0.37)
});
input
},
box3.kr(7)
)

+

Pause.ar({//play a random bass
FSinOsc.ar(rand(80,120,20),0.17)
},
box4.kr(4)
)


}); //Synth.play closed

w.close;
},{ (filename ++ " not found.\n").post });

)

Links to this Page