Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (
- //KICK
- SynthDef(\kick, {
- arg amp=1, t_gate=0, buffer1;
- var env, sig;
- env = EnvGen.kr(Env.perc(0.01, 1), t_gate, doneAction:2);
- sig = PlayBuf.ar(2, ~kick[1], BufRateScale.kr(buffer1),1);
- Out.ar(~masterOut, sig * amp * env);
- }).add;
- //SNARE
- SynthDef(\snare, {
- arg amp=0.2, t_gate=0, bufnum;
- var env, sig;
- env = EnvGen.kr(Env.perc(0.01, 1), t_gate, doneAction:2);
- sig = PlayBuf.ar(2, ~snare[7], BufRateScale.kr(bufnum),1, startPos: 0);
- Out.ar(~masterOut, sig * amp * env);
- }).add;
- //HAT
- SynthDef(\hat, {
- arg amp=0.2, t_gate=0, sample3=~hat.asMap, sampleSwitch = 0;
- var env, sig;
- env = EnvGen.kr(Env.perc(0.01, 1), t_gate, doneAction:2);
- sig = PlayBuf.ar(2, sample3 + sampleSwitch, BufRateScale.ir(sample3), 0, startPos:
- 0);
- )
- //Sequence
- Pbind(
- \instrument, \hat,
- \dur, 1/4,
- \sample3, ~hat[9],
- \sampleSwitch, Pseq([1, 2, 1, 4], inf),
- \sample3, ~hat[10],
- \gate, Pseq([1,0, 1], inf),
- \amp, Pseq([0.5, 0.2, 0.5, 0.2, 0.4], inf);
- ).play;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement