Advertisement
Guest User

Untitled

a guest
May 20th, 2019
65
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.45 KB | None | 0 0
  1. (
  2. SynthDef(\tstsSnd, { arg freq=6000, pan=0;
  3. var env = EnvGen.ar(Env.new([0, 1, 0], [0.0001, 0.3], [0, -5]), doneAction: Done.freeSelf);
  4. var snd = (SinOsc.ar(freq + SinOsc.ar(freq*3.345)));
  5. snd = snd + ClipNoise.ar(0.1);
  6. Out.ar(0, Pan2.ar(snd * env, pan));
  7. }).add;
  8. )
  9.  
  10.  
  11. (
  12. Pbind(\instrument, \tstsSnd,
  13. \freq, Pwhite(5000, 18000),
  14. \pan, Pbrown(-0.5, 0.5, 0.3, 5),
  15. \dur, Pwrand([0.125, 0.25, 0.5], [1, 0.3, 0.3].normalizeSum, inf);
  16. ).play;
  17. )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement