#N canvas 265 51 1015 802 12;
#X floatatom 308 374 5 0 0 0 - - -;
#X obj 174 585 *~;
#X floatatom 289 288 5 0 0 0 - - -;
#X obj 256 262 env~ 64;
#X obj 174 140 *~;
#X obj 173 38 osc~ 440;
#X floatatom 246 97 5 0 0 0 - - -;
#X floatatom 308 435 5 0 0 0 - - -;
#X floatatom 235 676 5 0 0 0 - - -;
#X obj 235 647 env~ 64;
#X obj 175 261 z~ 64;
#X text 66 38 test signal;
#X obj 173 736 dac~;
#X obj 173 706 *~;
#X obj 200 681 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1
1;
#X text 298 96 any amplification \, e.g. 4;
#X obj 288 487 pack 0 50;
#X obj 288 519 line~;
#X floatatom 369 257 5 0 0 0 - - -;
#X floatatom 389 374 5 0 0 0 - - -;
#X obj 369 315 dbtorms;
#X obj 288 402 expr $f2/$f1;
#X obj 256 313 dbtorms;
#X obj 256 345 moses;
#X text 465 316 <---convert all dB values (log) to RMS (linear);
#X text 299 677 <---dB value here should be same as threshold above
;
#X msg 369 224 90;
#X msg 246 64 4;
#X text 428 262 <---set limiting threshold in dB here;
#X connect 1 0 9 0;
#X connect 1 0 13 0;
#X connect 3 0 2 0;
#X connect 3 0 22 0;
#X connect 4 0 3 0;
#X connect 4 0 10 0;
#X connect 5 0 4 0;
#X connect 6 0 4 1;
#X connect 9 0 8 0;
#X connect 10 0 1 0;
#X connect 13 0 12 0;
#X connect 13 0 12 1;
#X connect 14 0 13 1;
#X connect 16 0 17 0;
#X connect 17 0 1 1;
#X connect 18 0 20 0;
#X connect 20 0 19 0;
#X connect 20 0 21 1;
#X connect 20 0 23 1;
#X connect 21 0 7 0;
#X connect 21 0 16 0;
#X connect 22 0 23 0;
#X connect 23 1 0 0;
#X connect 23 1 21 0;
#X connect 26 0 18 0;
#X connect 27 0 6 0;