You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
108 lines
2.0 KiB
108 lines
2.0 KiB
~samples = ~makeBuffers.("/home/dude/code/24_09_2026_gig", ());
|
|
~sample = ~samples[\samples][0];
|
|
~inBus = Bus.audio(s, 1);
|
|
(
|
|
Ndef(\testSignal, {
|
|
var sig, sig2;
|
|
sig = BufRd.ar(2, ~sample, Phasor.ar(0, BufRateScale.kr(~sample), 0, BufFrames.kr(~sample)));
|
|
Out.ar(~inBus, sig.sum);
|
|
sig * \gain.kr(0.01);
|
|
}).play;
|
|
)
|
|
|
|
Ndef(\testSignal).ar(2);
|
|
|
|
Ndef.clear
|
|
|
|
Ndef(\freeze1).set(\in, ~inBus.index);
|
|
Ndef(\freeze2).set(\in, ~inBus.index);
|
|
Ndef(\freeze3).set(\in, ~inBus.index);
|
|
|
|
Ndef(\freeze3).set(\in, ~inBus);
|
|
|
|
Ndef(\freeze1).set(\amp, 1.7);
|
|
Ndef(\freeze2).set(\amp, 2.6);
|
|
Ndef(\freeze3).set(\amp, 10.05);
|
|
|
|
Ndef(\freeze1).set(\freezeGate, 1);
|
|
Ndef(\freeze2).set(\freezeGate, 1);
|
|
Ndef(\freeze3).set(\freezeGate, 1);
|
|
|
|
Ndef(\freeze3).set(\rel, 0.1);
|
|
Ndef(\freeze3).set(\atk, 0.1);
|
|
Ndef(\freeze3).set(\ampGate, 0.0001);
|
|
|
|
Ndef(\freeze1).set(\pan, 0);
|
|
Ndef(\freeze3).set(\amp, 0.1);
|
|
|
|
Ndef(\freeze1).set(\amp, 0.7);
|
|
|
|
Ndef(\freeze1).set(\wipe, 0.3);
|
|
Ndef(\freeze1).set(\reshuffle, 0.1);
|
|
Ndef(\freeze1).set(\binShift, 0.4);
|
|
Ndef(\freeze1).set(\stretch, 0.1);
|
|
|
|
(
|
|
Ndef(\freeze3).put(10, \filter -> {
|
|
|in|
|
|
var sig = 0;
|
|
var shLocal = LocalIn.ar(2);
|
|
var shPitched = PitchShift.ar(
|
|
shLocal + (in * \shSend.kr(0.5)),
|
|
\shWindow.kr(0.2),
|
|
\shRatio.kr(4),
|
|
0.01, 0.01
|
|
);
|
|
var shVerb = FreeVerb.ar(
|
|
shPitched,
|
|
\shVerbMix.kr(0.3),
|
|
\shRoom.kr(0.85),
|
|
\shDamp.kr(0.9)
|
|
);
|
|
|
|
LocalOut.ar(shVerb * \shFb.kr(0.3));
|
|
|
|
sig = (shVerb * \shimmer.kr(0.3));
|
|
sig;
|
|
});
|
|
)
|
|
|
|
(
|
|
Ndef(\freeze1).put(10, \filter -> {
|
|
|in|
|
|
var sig = 0;
|
|
var shPitched = PitchShift.ar(
|
|
in,
|
|
0.2,
|
|
SinOsc.kr(0.1).range(2, 4),
|
|
0.01,
|
|
0.01
|
|
) * 2.0;
|
|
|
|
var shPitched2 = PitchShift.ar(
|
|
in,
|
|
0.2,
|
|
SinOsc.kr(0.05).range(4, 6),
|
|
0.01, 0.01
|
|
) * 2.0;
|
|
|
|
sig = Mix([in, shPitched, shPitched2]) * 0.9;
|
|
sig;
|
|
});
|
|
)
|
|
|
|
(
|
|
Ndef(\freeze1).stop;
|
|
Ndef(\freeze2).stop;
|
|
Ndef(\freeze3).stop;
|
|
)
|
|
|
|
(
|
|
Ndef(\freeze1).play;
|
|
Ndef(\freeze2).play;
|
|
Ndef(\freeze3).play;
|
|
)
|
|
|
|
|
|
Ndef(\testSignal).stop;
|
|
Ndef(\testSignal).set(\gain, 1.0); |