Advertisement
Guest User

Untitled

a guest
Aug 27th, 2017
154
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. (
  2. //KICK
  3. SynthDef(\kick, {
  4.     arg amp=1, t_gate=0, buffer1;
  5.     var env, sig;
  6.     env = EnvGen.kr(Env.perc(0.01, 1), t_gate, doneAction:2);
  7.     sig = PlayBuf.ar(2, ~kick[1], BufRateScale.kr(buffer1),1);
  8.     Out.ar(~masterOut, sig * amp * env);
  9. }).add;
  10. //SNARE
  11. SynthDef(\snare, {
  12.     arg amp=0.2, t_gate=0, bufnum;
  13.     var env, sig;
  14.     env = EnvGen.kr(Env.perc(0.01, 1), t_gate, doneAction:2);
  15.     sig = PlayBuf.ar(2, ~snare[7], BufRateScale.kr(bufnum),1, startPos: 0);
  16.     Out.ar(~masterOut, sig * amp * env);
  17. }).add;
  18. //HAT
  19. SynthDef(\hat, {
  20.     arg amp=0.2, t_gate=0, sample3=~hat.asMap, sampleSwitch = 0;
  21.     var env, sig;
  22.     env = EnvGen.kr(Env.perc(0.01, 1), t_gate, doneAction:2);
  23.     sig = PlayBuf.ar(2, sample3 + sampleSwitch, BufRateScale.ir(sample3), 0, startPos:
  24. 0);
  25. )
  26.  
  27. //Sequence
  28. Pbind(
  29.     \instrument, \hat,
  30.     \dur, 1/4,
  31.     \sample3, ~hat[9],
  32.     \sampleSwitch, Pseq([1, 2, 1, 4], inf),
  33.     \sample3, ~hat[10],
  34.     \gate, Pseq([1,0, 1], inf),
  35.     \amp, Pseq([0.5, 0.2, 0.5, 0.2, 0.4], inf);
  36. ).play;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement