#N canvas 511 200 493 531 10;
#X obj 29 49 inlet;
#X obj 113 405 outlet~;
#X obj 113 198 phasor~;
#X obj 280 43 inlet;
#X obj 113 226 >~;
#X text 143 229 zexy object;
#X obj 31 94 t b f;
#X msg 31 114 1;
#X obj 45 135 -;
#X text 77 113 invert so 1 = full power;
#X obj 280 75 purepd/float_argument \$1 60;
#X obj 113 172 sig~;
#X obj 326 43 loadbang;
#X text 43 11 after an idea from Roman Haefeli and Martin Peach;
#X connect 0 0 6 0;
#X connect 2 0 4 0;
#X connect 3 0 10 0;
#X connect 4 0 1 0;
#X connect 6 0 7 0;
#X connect 6 1 8 1;
#X connect 7 0 8 0;
#X connect 8 0 4 1;
#X connect 10 0 11 0;
#X connect 11 0 2 0;
#X connect 12 0 10 0;