;; min and max in ms
(bind-func set_flanger
(lambda (inst:i8* mix:float min:float max:float rate:float fb:float)
(let ((effect (cref (cast inst [void]*) effect_kernel [void]*)))
(cset! effect flanger_mix mix float)
(cset! effect flanger_low (clamp min 0.05 2000.0) float)
(cset! effect flanger_high (clamp max 0.1 2000.0) float)
(cset! effect flanger_rate rate float)
(cset! effect flanger_fb (clamp fb 0.0 1.0) float)
void)))