12 lines
207 B
Scheme
12 lines
207 B
Scheme
;; (add a b)
|
|
|
|
;; addition, written '+' in sclang.
|
|
|
|
(audition
|
|
(out 0 (add (mul (f-sin-osc ar 800 0) 0.1)
|
|
(mul (pink-noise ar) 0.1))))
|
|
|
|
;; DC offset.
|
|
|
|
(audition
|
|
(out 0 (add (f-sin-osc ar 440 0) 0.1)))
|