interpretor/faust-0.9.47mr3/tools/faust2pd/examples/faust/osci.dsp

   1 declare name            "osci";
   2 declare version         "1.0";
   3 declare author          "Grame";
   4 declare license         "BSD";
   5 declare copyright       "(c)GRAME 2006";
   6
   7 //-----------------------------------------------
   8 //                      Sinusoidal Oscillator
   9 //              (with linear interpolation)
  10 //-----------------------------------------------
  11
  12 import("music.lib");
  13
  14 smooth(c)               = *(1-c) : +~*(c);
  15 vol                     = hslider("volume (db)", 0, -96, 0, 0.1) : db2linear : smooth(0.999) ;
  16 freq                    = hslider("freq", 1000, 0, 24000, 0.1);
  17
  18
  19 process                 = vgroup("Oscillator", osci(freq) * vol);