import("stdfaust.lib");
nOsc = 3;
freq = hslider("freq",400,100,2000,0.01) : si.smoo;
gain = hslider("gain",0.5,0,1,0.01) : si.smoo;
trigger = checkbox("gate") : si.smoo;
process = par(i,nOsc,os.osc(freq*(i+1))) :> *(gain*trigger)/nOsc;