Advertisement
Guest User

Untitled

a guest
Mar 31st, 2020
87
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.62 KB | None | 0 0
  1. (
  2. SynthDef(\sine, {
  3. arg freq=440, amp=0.1, atk=0.01, dec=0.1, sus=1, rel=1, out=0;
  4. var sig, env;
  5. env = EnvGen.kr(Env.new([0,0.9,0.6,0.6,0],[0.8,0.3,1,0.5]));
  6. sig = SinOsc.ar([freq,freq*1.01]);
  7. sig = sig * env * amp;
  8. Out.ar(out,sig)
  9. }).add;
  10. )
  11.  
  12. Synth(\sine, [\freq, 660]);
  13.  
  14. ().play;
  15.  
  16. (
  17. p = Pbind(
  18. \instrument, \sine,
  19. \freq, Pseq([Prand([100,150,200],inf),Prand([200,250,300],inf),Prand([300,350,400],inf)],inf),
  20. \amp, Pexprand(0.01, 0.15, inf),
  21. \atk, Pseq([0.01, 0.5, 0.1],inf),
  22. \dur, Prand([0.5,1,5],inf),
  23. \midinote, Prand([30,40,50],inf)
  24. );
  25.  
  26. x = p.play;
  27. )
  28.  
  29. x.stop;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement