Merge branch 'master' of https://scm.cri.ensmp.fr/git/Faustine
[Faustine.git] / interpretor / preprocessor / 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