6 lines
145 B
Scheme
6 lines
145 B
Scheme
;; (midi-cps a)
|
|
|
|
;; Convert MIDI note to cycles per second.
|
|
|
|
(audition
|
|
(out 0 (mul (saw ar (midi-cps (line kr 24 108 10 remove-synth))) 0.2)))
|