10 lines
270 B
Scheme
10 lines
270 B
Scheme
|
;; (toggle-ff trig)
|
||
|
|
|
||
|
|
;; Toggle flip flop. Toggles between zero and one upon receiving a trigger.
|
||
|
|
|
||
|
|
;; trig - trigger input
|
||
|
|
|
||
|
|
(let* ((t (dust ar (x-line kr 1 1000 60 do-nothing)))
|
||
|
|
(s (sin-osc ar (mul-add (toggle-ff t) 400 800) 0)))
|
||
|
|
(audition (out 0 (mul s 0.1))))
|