Extend Silences

where silences to insert: at begins, > MIDDLES > or ends of detected silences

To cut them into silence pieces at any % as wanted, I just replaced:

  1. That line:
;control add-snd-pc "Add % of previous sound duration" real "" 0 0 100

by this:

;control add-snd-pc "Add % of previous sound duration" real "" 0 0 100
;control ins-pos-pc "Insert at % of detected silence piece" real "" 100 0 100
  1. That line:
(setq snd-ratio (/ (constrain add-snd-pc 0 1000) 100.0))

by this:

(setq snd-ratio (/ (constrain add-snd-pc 0 1000) 100.0))
(setq pos-ratio (- 1 (/ (constrain ins-pos-pc 0 1000) 100.0)))
  1. And that line:
(push (list (/ count lo-rate) (/ sil-count lo-rate)) sil-list))

by this:

(push (list (- (/ count lo-rate) (* (/ sil-count lo-rate) pos-ratio)) (/ sil-count lo-rate)) sil-list))