11 lines
359 B
Scheme
11 lines
359 B
Scheme
;; (amplitude rate in attackTime releaseTime)
|
|
|
|
;; Amplitude follower. Tracks the peak amplitude of a signal.
|
|
|
|
(audition
|
|
(out 0 (mul (pulse ar 90 0.3)
|
|
(amplitude kr (in 1 ar num-output-buses) 0.01 0.01))))
|
|
|
|
(let* ((a (amplitude kr (in 1 ar num-output-buses) 0.01 0.01))
|
|
(f (mul-add a 1200 400)))
|
|
(audition (out 0 (mul (sin-osc ar f 0) 0.3))))
|