(

Hi, I need a Tremolo effect that begin in one determinate frequency and ending in other frequency while increases or decreases for one time specified.

I know programing but not Nyquist.

Someone can help me to merge these two codes to develop my goal?

**Frequency Sweep**

http://www.storm-consultancy.com/blog/development/tutorials/sine-wave-frequency-sweep-with-audacity/

```
;nyquist plug-in
02
;version 1
03
;type generate
04
;name "Frequency Sweep..."
05
;action "Producing frequency sweep..."
06
;info "by Adam Pope and Paul Schimmel"
07
08
;control startf "Start Frequency (Hz)" real "" 20 20 20000
09
;control endf "End Frequency (Hz)" real "" 20000 20 20000
10
;control duration "Duration (secs)" real "" 30 1 300
11
;control level "Level (dBFS)" real " " 0 -40 0
12
;control type "Sweep scale [1=Linear, 2=Exponential]" int "" 2 1 2
13
14
(if (= type 2)
15
(scale-db level (fmosc 0 (pwev startf duration endf))) (scale-db level (fmosc 0 (pwlv startf duration endf))) )
```

**Tremolo**

```
;nyquist plug-in
;version 3
;type process
;categories "http://lv2plug.in/ns/lv2core#ModulatorPlugin"
;name "Tremolo..."
;action "Applying Tremolo..."
;info "by Dominic Mazzoni, modified by David R. SkynReleased under terms of the GNU General Public License Version 2n'Starting phase' sets where to start tremolo in the waveform cycle.n'Wetness level' sets depth of tremolo - 0 percent is no tremolo,n100 percent sweeps between zero and maximum volume.n'Frequency' controls the speed of the oscillation - use highernfrequencies for faster oscillation."
;control wave "Waveform type" choice "sine,triangle,sawtooth,inverse sawtooth,square" 0
;control phase " Starting phase [degrees]" int "" 0 -180 180
;control amount " Wetness level [percent]" int "" 40 0 100
;control lfo " Frequency [Hz]" real "" 4.0 0.1 400.0
; set tremolo *waveform*
(setq *waveform* (cond
((= wave 0) ; sine
*sine-table*)
((= wave 1) ; triangle
*tri-table*)
((= wave 2) ; sawtooth
(abs-env (list (pwl 0 -1 .995 1 1 -1 1) (hz-to-step 1.0) t)))
((= wave 3) ; inverse sawtooth
(abs-env (list (pwl 0 1 .995 -1 1 1 1) (hz-to-step 1.0) t)))
(t ; square
(abs-env (list (pwl 0 1 .495 1 .5 -1 .995 -1 1 1 1) (hz-to-step 1.0) t)))))
; check for negative [invalid] frequency value
(cond ((<= lfo 0)
(format nil
"ErrornnYou have entered an invalid frequency of ~a Hz.
Please enter a frequency above 0 Hz." lfo))
;
(t
; apply tremolo
(mult (sum (const (- 1.0 (/ amount 200.0))) (scale (/ amount 200.0)
(osc (hz-to-step lfo) 1.0 *waveform* phase))) s)))
; from previous commit
; arch-tag: 0ee3925a-8016-44db-91e8-8c4b7a9f3992
```

Many Thanks.

)