Advertisement
rcrt

bounce

Jun 28th, 2020
2,564
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. // Añadir primero el SynthDef y luego ejecutar todo el código.
  2.  
  3. (
  4. SynthDef.new(\rebote, {
  5.     arg pan=0, out=0;
  6.     var sig, env;
  7.     env = EnvGen.ar(Env.new([1, 0], 6, -2), doneAction: 2);
  8.     sig = Impulse.ar(XLine.ar(1, 20, 6)) * env;
  9.     sig = DynKlank.ar(`[{rrand(200, 8000)}!8, {rrand(0.04, 0.20)}!8, {rrand(0.0625, 0.5)}!8], sig);
  10.     sig = Pan2.ar(sig, pan);
  11.     Out.ar(out, sig);
  12. }).add;
  13.  
  14. Synth.new(\rebote);
  15. )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement