~ubuntu-branches/ubuntu/feisty/faust/feisty

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
declare name 		"vumeter";
declare version 	"1.0";
declare author 		"Grame";
declare license 	"BSD";
declare copyright 	"ยข GRAME 2006";

//-------------------------------------------------
// Simple vumeter
//-------------------------------------------------

import("math.lib");


vmeter(x)		= attach(x, envelop(x) : vbargraph("meter", 0, 1));
hmeter(x)		= attach(x, envelop(x) : hbargraph("meter", 0, 1));

envelop			= abs : min(0.99) : max ~ -(1.0/SR);

process 		= vmeter;