Wet/Dry Modification Please?

Programming and Development Nyquist
1

(setq wet 75) ; 75% wet
(setq wet (/ wet 100.0)) (setq dry (- 1 wet))
(defun modulate (sig)
(mult sig 0.5 (sum 1 (hzosc 50))))
(sum
(mult wet (modulate s))
(mult dry s))

I was using this code a fellow Audacity Forum user gave me. It created a wet/dry signal, which is pretty easy to manipulate. The effect put into motion i think is modulate and hzosc.

However, I am new at Nyquist, figuring it out on my own. I am wondering how (and if its possible) to change this so that instead the wet/dry signal can be applyed when adding white noise to audio, i.e. instead of the default 50% noise and 50% audio, i want to change it so the white noise is only at, say, 15%.

2

I figured out a slight modification but it seems I cannot truly manipulate the audio’s wet/dry signal i.e. no matter what percent i set it at it seems to not get quieter.

(setq wet 1) ; 1% wet

(setq wet (/ wet 0.01)) ; convert to a ratio
(setq dry (- 99.99 wet))

(mult s (sum 1 (noise)))

3

To “add” white noise we can just use (sim s (noise)), which is the same as (sum s )noise))

For a mono track, this will work:

(setq wet 15) ; "wet" as a %

(setq wet (/ wet 100.0)) ; convert to ratio - a scale of 0 to 1
(setq dry (- 1 wet)) ; "dry" is "1 - wet"

(sim 
  (mult dry s)
  (mult wet (noise)))

For a stereo track we can wrap the effect in a function and then use “multichan-expand” which applies the same function to each channel of the sound:

(setq wet 15) ; "wet" as a %

(setq wet (/ wet 100.0)) ; convert to ratio - a scale of 0 to 1
(setq dry (- 1 wet)) ; "dry" is "1 - wet"

(defun addnoise (sig wet dry)
  (sim 
    (mult dry sig)
    (mult wet (noise))))

(multichan-expand #'addnoise s wet dry)
4

Thanks a bunch!