interpretor/faust-0.9.47mr3/examples/mixer.dsp

   1 declare name            "mixer";
   2 declare version         "1.0";
   3 declare author          "Grame";
   4 declare license         "BSD";
   5 declare copyright       "(c)GRAME 2006";
   6
   7 //-------------------------------------------------
   8 // Simple 8x2 mixer
   9 //-------------------------------------------------
  10
  11 vol             = component("volume.dsp");
  12 pan             = component("panpot.dsp");
  13 vumeter         = component("vumeter.dsp").vmeter;
  14 mute            = *(1 - checkbox("mute"));
  15
  16 voice(v)        = vgroup("Ch %v",  mute : hgroup("[2]", vol : vumeter) : pan);
  17 stereo          = hgroup("stereo out", (vol, vol : vgroup("L", vumeter), vgroup("R", vumeter)));
  18
  19 process         = hgroup("mixer", par(i, 8, voice(i)) :> stereo );
  20
  21