3 declare author "Grame";
5 declare copyright "(c)GRAME 2009";
7 //-----------------------------------------------
8 // Sinusoidal Oscillator
9 // (with linear interpolation)
10 //-----------------------------------------------
14 smooth(c) = *(1-c) : +~*(c);
15 vol = hslider("volume [unit:dB]", 0, -96, 0, 0.1) : db2linear : smooth(0.999) ;
16 freq = hslider("freq [unit:Hz]", 1000, 20, 24000, 1);
19 process = vgroup("Oscillator", osci(freq) * vol);