Advertisement
Guest User

Untitled

a guest
Feb 27th, 2017
70
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.33 KB | None | 0 0
  1. use_random_seed 2468 #try different values
  2. n= (sample_names :tabla).length
  3. n2=(sample_names :ambi).length
  4. #ramped volume change
  5. vmap=[0,0.01,0.02,0.03,0.04,0.05,0.06,0.07,0.08,0.09,0.1,0.2,0.3,0.4,0.5,0.6,0.7,0.8,0.9,1]
  6. killit=0 #flag to kill live loops
  7. with_fx :gverb,room: 25 do
  8. with_fx :level do |v| #fade volume in and out
  9. control v,amp: 0
  10. sleep 0.05 #settle time to prevent any initial click
  11. in_thread do
  12. 20.times do |i| #increase volume phase
  13. puts i
  14. control v,amp: 4*vmap[i]
  15. sleep 1
  16. end
  17. sleep 40 #full volume phase
  18. 20.times do |i| #decrease volume phase
  19. puts i
  20. control v,amp: 4*vmap[19-i]
  21. sleep 1
  22. end
  23. killit=1 #flag to stop live loops
  24. end
  25.  
  26. live_loop :q do
  27. stop if killit==1
  28. k=rrand(1,5)
  29. sample "tabla_",range(0,n).choose.to_i,rate: -k,start: 0.1,sustain: 0.5/k,release: 0.3,pan: 1
  30. sleep 0.2+rrand(0,2)
  31. end
  32. live_loop :q2 do
  33. stop if killit==1
  34. k=rrand(1,5)
  35. sample "tabla_",tick,rate: -k,start: 0.1,sustain: 0.5/k,release: 0.3,pan: -1
  36. sleep 0.2+rrand(0,1)
  37. end
  38. live_loop :q3 do
  39. stop if killit==1
  40. k=rrand(1,5)
  41. sample "ambi_",range(0,n2).choose.to_i,rate: -k,start: 0.1,sustain: 0.5/k,release: 0.3,pan: [-1,0,1].choose
  42. sleep 0.2+rrand(0,1)
  43. end
  44. end
  45. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement