plugin: add I/O signal level & refactor

- Only pick up the largest one of L/R level
- Add input/output level parameter
- Add compensation for I/O level, to match DAW's VU meter approximately

Author: AnClark

comprez.pd

@@ -1,71 +1,74 @@
-#N canvas 0 0 1920 971 12;
+#N canvas 0 0 1912 963 12;
 #X obj 142 549 dac~;
-#X msg 526 81 threshold \$1;
-#X obj 529 48 hsl 170 20 0 127 0 0 empty empty empty -2 -10 0 12 #fcfcfc #000000 #000000 0 1;
-#X obj 759 113 hsl 170 20 0 127 0 0 empty empty empty -2 -10 0 12 #fcfcfc #000000 #000000 0 1;
+#X msg 503 121 threshold \$1;
+#X obj 506 88 hsl 170 20 0 127 0 0 empty empty empty -2 -10 0 12 #fcfcfc #000000 #000000 0 1;
+#X obj 736 153 hsl 170 20 0 127 0 0 empty empty empty -2 -10 0 12 #fcfcfc #000000 #000000 0 1;
 #X obj 88 24 adc~;
-#X obj 997 144 hsl 170 20 0 127 0 0 empty empty empty -2 -10 0 12 #fcfcfc #000000 #000000 0 1;
-#X msg 995 178 attack_release \$1;
-#X msg 758 168 ratio \$1;
-#X obj 995 112 r Attack_Release @hv_param -1000 1000 40;
+#X obj 974 184 hsl 170 20 0 127 0 0 empty empty empty -2 -10 0 12 #fcfcfc #000000 #000000 0 1;
+#X msg 972 218 attack_release \$1;
+#X msg 735 208 ratio \$1;
+#X obj 972 152 r Attack_Release @hv_param -1000 1000 40;
 #X obj 128 432 hv.comprez2~ 60 2;
 #X text 442 446 // arg \$2: ratio;
 #X text 442 426 // arg \$1: threshold;
 #X text 441 467 // arg \$3: attack/release time (ms);
-#X obj 756 71 r Ratio @hv_param 1 100 1;
-#X obj 526 15 r Threshold @hv_param 0 100 70;
+#X obj 733 111 r Ratio @hv_param 1 100 1;
+#X obj 503 55 r Threshold @hv_param 0 100 70;
 #X obj 173 102 env~;
 #X obj 173 136 - 100;
-#X obj 173 170 s input_level_L;
 #X obj 300 103 env~;
 #X obj 300 137 - 100;
-#X obj 300 170 s input_level_R;
 #X obj 227 554 env~;
 #X obj 227 594 - 100;
-#X obj 227 632 s output_level_L;
 #X obj 362 553 env~;
 #X obj 362 593 - 100;
-#X obj 362 631 s output_level_R;
 #X obj 788 477 -;
-#X obj 771 411 r output_level_L;
-#X obj 906 411 r input_level_L;
 #X obj 788 515 abs;
-#X obj 788 560 s Compressed_Level_L @hv_param 0 100 0;
-#X obj 1113 478 -;
-#X obj 1113 516 abs;
-#X obj 1113 561 s Compressed_Level_R @hv_param 0 100 0;
-#X obj 1096 412 r output_level_R;
-#X obj 1231 412 r input_level_R;
+#X obj 788 557 s Compressed_Level @hv_param 0 100 0;
+#X obj 241 186 max;
+#X obj 297 646 max;
+#X obj 187 234 s input_level_peak;
+#X obj 151 710 s output_level_peak;
+#X obj 771 411 r output_level_peak;
+#X obj 920 409 r input_level_peak;
+#X obj 368 768 s Output_Level @hv_param -100 12 -100;
+#X obj 1090 556 s Input_Level @hv_param -100 12 -100;
+#X obj 1085 482 + 6;
+#X obj 371 712 + 6;
+#X text 1123 482 // compensation: to match DAW's VU meter values \, approximately;
+#X text 409 712 // compensation: to match DAW's VU meter values \, approximately;
 #X connect 1 0 9 2;
 #X connect 2 0 1 0;
 #X connect 3 0 7 0;
 #X connect 4 0 9 0;
 #X connect 4 0 15 0;
 #X connect 4 1 9 1;
-#X connect 4 1 18 0;
+#X connect 4 1 17 0;
 #X connect 5 0 6 0;
 #X connect 6 0 9 2;
 #X connect 7 0 9 2;
 #X connect 8 0 5 0;
 #X connect 9 0 0 0;
-#X connect 9 0 21 0;
+#X connect 9 0 19 0;
 #X connect 9 1 0 1;
-#X connect 9 1 24 0;
+#X connect 9 1 21 0;
 #X connect 13 0 3 0;
 #X connect 14 0 2 0;
 #X connect 15 0 16 0;
-#X connect 16 0 17 0;
-#X connect 18 0 19 0;
+#X connect 16 0 26 0;
+#X connect 17 0 18 0;
+#X connect 18 0 26 1;
 #X connect 19 0 20 0;
+#X connect 20 0 27 0;
 #X connect 21 0 22 0;
-#X connect 22 0 23 0;
+#X connect 22 0 27 1;
+#X connect 23 0 24 0;
 #X connect 24 0 25 0;
-#X connect 25 0 26 0;
-#X connect 27 0 30 0;
-#X connect 28 0 27 0;
-#X connect 29 0 27 1;
-#X connect 30 0 31 0;
-#X connect 32 0 33 0;
-#X connect 33 0 34 0;
+#X connect 26 0 28 0;
+#X connect 27 0 29 0;
+#X connect 27 0 35 0;
+#X connect 30 0 23 0;
+#X connect 31 0 23 1;
+#X connect 31 0 34 0;
+#X connect 34 0 33 0;
 #X connect 35 0 32 0;
-#X connect 36 0 32 1;