1 files changed, 56 insertions, 0 deletions
diff --git a/core/eqpowmix~.pd b/core/eqpowmix~.pd
new file mode 100644
index 0000000..1da8135
--- /dev/null
+++ b/core/eqpowmix~.pd
@@ -0,0 +1,56 @@
+#N canvas 259 345 452 502 10;
+#X obj 308 42 inlet;
+#X obj 57 174 expr cos($f1 * 3.14159 / 2);
+#X obj 247 175 expr sin($f1 * 3.14159 / 2);
+#X obj 308 108 clip 0 1;
+#X obj 42 312 *~;
+#X obj 232 311 *~;
+#X obj 247 287 line~;
+#X obj 57 287 line~;
+#X obj 247 206 t f b;
+#X obj 247 248 pack f f;
+#X msg 247 268 \$1 \$2;
+#X obj 57 206 t f b;
+#X obj 84 227 f;
+#X obj 57 248 pack f f;
+#X msg 57 268 \$1 \$2;
+#X obj 99 206 r \$0block-ms;
+#X obj 274 227 f;
+#X obj 289 206 r \$0block-ms;
+#X obj 42 43 inlet~;
+#X obj 232 41 inlet~;
+#X obj 141 414 outlet~;
+#X text 24 457 equal power 2-channel mixer \, based on HCS's pan_core~/equal_power_pan~
+;
+#X obj 356 42 loadbang;
+#X msg 356 62 0.5;
+#X obj 310 319 loadbang;
+#X obj 310 351 blocksize_in_ms;
+#X obj 310 385 s \$0block-ms;
+#X connect 0 0 3 0;
+#X connect 1 0 11 0;
+#X connect 2 0 8 0;
+#X connect 3 0 1 0;
+#X connect 3 0 2 0;
+#X connect 4 0 20 0;
+#X connect 5 0 20 0;
+#X connect 6 0 5 1;
+#X connect 7 0 4 1;
+#X connect 8 0 9 0;
+#X connect 8 1 16 0;
+#X connect 9 0 10 0;
+#X connect 10 0 6 0;
+#X connect 11 0 13 0;
+#X connect 11 1 12 0;
+#X connect 12 0 13 1;
+#X connect 13 0 14 0;
+#X connect 14 0 7 0;
+#X connect 15 0 12 1;
+#X connect 16 0 9 1;
+#X connect 17 0 16 1;
+#X connect 18 0 4 0;
+#X connect 19 0 5 0;
+#X connect 22 0 23 0;
+#X connect 23 0 3 0;
+#X connect 24 0 25 0;
+#X connect 25 0 26 0;