parent
aa9e6a1e91
commit
cfb1196081
@ -0,0 +1,77 @@
|
||||
s.boot;
|
||||
|
||||
~dict = BmDspAlgs.getDict("synths/bass/saw_bass.scd");
|
||||
~dict[\postAmp] = true;
|
||||
~dict[\useEnv] = true;
|
||||
|
||||
~dict.makeSourceSynthDef().add();
|
||||
|
||||
~sawBass = ();
|
||||
~sawBass[\name] = \saw;
|
||||
|
||||
Ndef(~sawBass[\name]).clear;
|
||||
Ndef(~sawBass[\name]).ar(2);
|
||||
Ndef(~sawBass[\name]).prime(~dict[\name]);
|
||||
Ndef(~sawBass[\name]).play;
|
||||
|
||||
(
|
||||
Tdef(\t, {
|
||||
loop {
|
||||
[40, 45, 47].do({|n|
|
||||
Ndef(~sawBass[\name]).put(
|
||||
n,
|
||||
Ndef(~sawBass[\name]).source,
|
||||
0,
|
||||
[\freq, n.midicps, \gate, 1, \amp, 0.25, \release, 0.5, \attack, 0.01]
|
||||
);
|
||||
0.25.wait;
|
||||
});
|
||||
}
|
||||
}).play;
|
||||
)
|
||||
|
||||
(
|
||||
Tdef(\t2, {
|
||||
loop {
|
||||
[55, 61].do({|n|
|
||||
Ndef(~sawBass[\name]).put(
|
||||
n,
|
||||
Ndef(~sawBass[\name]).source,
|
||||
0,
|
||||
[\freq, n.midicps, \gate, 1, \amp, 0.25, \release, 0.1, \attack, 0.01]
|
||||
);
|
||||
(4/7).wait;
|
||||
});
|
||||
}
|
||||
}).play;
|
||||
)
|
||||
|
||||
(
|
||||
Ndef(~sawBass[\name]).put( 159, \filter -> { arg in;
|
||||
d = LPF.ar(in, 1100);
|
||||
d
|
||||
});
|
||||
)
|
||||
|
||||
(
|
||||
Ndef(~sawBass[\name]).put( 160, \filter -> { arg in;
|
||||
var d = in;
|
||||
var diffusion = \diffusion.kr(1);
|
||||
var spacesize = \spacesize.kr(0.1);
|
||||
8.do { |i|
|
||||
d = AllpassC.ar(
|
||||
d,
|
||||
delaytime: LFNoise1.kr(0.01!2).range(0.01, spacesize),
|
||||
decaytime: diffusion
|
||||
)
|
||||
};
|
||||
|
||||
d
|
||||
});
|
||||
)
|
||||
|
||||
Ndef(~sawBass[\name]).set(\diffusion, 0.03);
|
||||
Ndef(~sawBass[\name]).set(\spacesize, 0.1);
|
||||
|
||||
Tdef(\t2).stop;
|
||||
Tdef(\t).stop;
|
||||
@ -1,14 +1,18 @@
|
||||
+ NodeDictionary {
|
||||
makeBufferProcessingNdef {
|
||||
| name, buf, quant = 1.0 |
|
||||
var ndef = Ndef(name);
|
||||
ndef.proxyspace.quant = quant;
|
||||
ndef[0] = SynthDef.wrap(
|
||||
func: this[\func],
|
||||
prependArgs: [buf]
|
||||
);
|
||||
|
||||
ndef.play;
|
||||
^ndef;
|
||||
|
||||
var internalName = if(name.isNil, {this[\name]}, {name});
|
||||
|
||||
Ndef(internalName, {
|
||||
var freq, signal, env, gate;
|
||||
|
||||
signal = SynthDef.wrap(
|
||||
func: this[\func],
|
||||
prependArgs: [buf]
|
||||
);
|
||||
|
||||
signal * \amp.kr(1);
|
||||
});
|
||||
}
|
||||
}
|
||||
Loading…
Reference in new issue