194a36fd1e7220a48833c025f2eff9d9c5b73413
[Faustine.git] / interpretor / faust-0.9.47mr3 / tools / faust2pd / examples / faust / vumeter.dsp
1 declare name "vumeter";
2 declare version "1.0";
3 declare author "Grame";
4 declare license "BSD";
5 declare copyright "(c)GRAME 2006";
6
7 //-------------------------------------------------
8 // Simple vumeter
9 //-------------------------------------------------
10
11 import("math.lib");
12
13
14 vmeter(x) = attach(x, envelop(x) : vbargraph("meter", 0, 1));
15 hmeter(x) = attach(x, envelop(x) : hbargraph("meter", 0, 1));
16
17 envelop = abs : min(0.99) : max ~ -(1.0/SR);
18
19 process = vgroup("vu meter", vmeter);