Initial commit

METAL BOX/METAL BOX.txt

@@ -0,0 +1,21 @@
+type effect;
+code MTLB;
+midionly false;
+compatibility 1.0.6;
+bus 2 2;
+
+param -name Delay -label ms -min 0.8 -max 50 -default 8;
+param -name Diffusion -min 0.1 -max 2 -default 0.8;
+param -name Feedback -min 0.5 -max 0.99 -default 0.65;
+param -name Stereo -min -1 -max 1 -default 0;
+param -name Damp Freq -min 0 -max 1 -default 0.7;
+param -name Damp Strength -min 0 -max 0.5 -default 0;
+param -name Mod Speed -min 0.1 -max 1 -default 0.2;
+param -name Mod Offset -min 0 -max 1 -default 0.6;
+param -name Mod Amp -min -1 -max 1 -default 0;
+param -name Gain -min 0 -max 4 -default 1;
+param -name Width -min -1 -max 1 -default 0;
+param -name Limiter -min 0 -max 1 -default 1 -nsteps 2;
+param -name Mix -min 0 -max 1 -default 0.7;
+param -name Distortion -min 0 -max 1 -default 0;
+param -name Mod Type -min 0 -max 2 -default 0 -nsteps 3;

METAL BOX/atk_rel.pd

@@ -0,0 +1,44 @@
+#N canvas 830 355 422 505 10;
+#X obj 54 40 inlet;
+#X obj 253 35 inlet;
+#X obj 183 83 float \$1;
+#X obj 54 338 line~;
+#X obj 54 395 outlet~;
+#X obj 183 35 loadbang;
+#X msg 88 300 stop;
+#X obj 305 35 inlet;
+#X obj 265 83 float \$2;
+#X obj 54 215 list prepend;
+#X obj 54 135 >;
+#X obj 54 82 t f f b f;
+#X text 130 83 attack;
+#X text 325 83 decay;
+#X obj 54 169 expr if($f1 == 1 \, \\$f2 \, \\$f3);
+#X floatatom 188 144 5 0 0 0 - - - 0 0 1, f 5;
+#X floatatom 273 144 5 0 0 0 - - - 0 0 1, f 5;
+#X obj 54 255 list trim;
+#X text 166 191 if current value is higher than previous \, use attack
+time else use decay time, f 26;
+#X obj 183 114 max 0;
+#X obj 265 114 max 0;
+#X connect 0 0 11 0;
+#X connect 1 0 2 0;
+#X connect 2 0 19 0;
+#X connect 3 0 4 0;
+#X connect 5 0 2 0;
+#X connect 5 0 8 0;
+#X connect 6 0 3 0;
+#X connect 7 0 8 0;
+#X connect 8 0 20 0;
+#X connect 9 0 17 0;
+#X connect 10 0 14 0;
+#X connect 11 0 10 1;
+#X connect 11 1 10 0;
+#X connect 11 2 6 0;
+#X connect 11 3 9 1;
+#X connect 14 0 9 0;
+#X connect 17 0 3 0;
+#X connect 19 0 14 1;
+#X connect 19 0 15 0;
+#X connect 20 0 14 2;
+#X connect 20 0 16 0;

METAL BOX/delay_a.pd

@@ -0,0 +1,89 @@
+#N canvas 438 70 929 813 10;
+#X obj 28 237 inlet~;
+#X obj 78 237 inlet~;
+#X obj 195 85 inlet~;
+#X obj 346 320 vd~ \$0-1-l;
+#X obj 193 320 vd~ \$0-1-r;
+#X obj 346 449 *~;
+#X obj 193 449 *~;
+#X obj 362 570 outlet~;
+#X obj 446 240 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 #fcfcfc
+#000000 #000000 0 1;
+#X obj 359 236 inlet;
+#X obj 216 575 outlet~;
+#X obj 446 174 inlet;
+#X obj 531 247 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 #fcfcfc
+#000000 #000000 0 1;
+#X obj 531 222 inlet;
+#X obj 631 295 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 #fcfcfc
+#000000 #000000 0 1;
+#X obj 631 243 inlet;
+#X obj 531 391 easeout 2;
+#X obj 631 269 * 0.07;
+#X obj 42 359 stereopan;
+#X obj 193 640 lowpass;
+#X obj 548 714 outlet;
+#X obj 619 714 outlet;
+#X obj 346 640 lowpass;
+#X text 531 196 Filter freq;
+#X text 631 217 Filter Q;
+#X text 446 151 feedback;
+#X text 201 506 delay lines are crossed;
+#X text 538 736 output calculated filter values for display purposes
+, f 29;
+#X text 116 85 delay time;
+#X obj 138 251 loadbang;
+#X msg 122 282 0;
+#X obj 446 209 clip 0 0.99;
+#X obj 194 152 max~ 0;
+#X obj 194 716 width;
+#X obj 221 667 loadbang;
+#X msg 221 688 0.01;
+#X obj 57 487 lowpass;
+#X obj 135 481 lowpass;
+#X obj 193 750 delwrite~ \$0-1-l 500;
+#X obj 346 749 delwrite~ \$0-1-r 500;
+#X connect 0 0 18 0;
+#X connect 1 0 18 1;
+#X connect 2 0 32 0;
+#X connect 3 0 5 0;
+#X connect 3 0 7 0;
+#X connect 4 0 6 0;
+#X connect 4 0 10 0;
+#X connect 5 0 22 0;
+#X connect 6 0 19 0;
+#X connect 8 0 6 1;
+#X connect 8 0 5 1;
+#X connect 9 0 18 2;
+#X connect 11 0 31 0;
+#X connect 12 0 16 0;
+#X connect 13 0 12 0;
+#X connect 14 0 22 2;
+#X connect 14 0 19 2;
+#X connect 14 0 37 2;
+#X connect 14 0 36 2;
+#X connect 15 0 17 0;
+#X connect 16 0 22 1;
+#X connect 16 0 19 1;
+#X connect 16 0 36 1;
+#X connect 16 0 37 1;
+#X connect 17 0 14 0;
+#X connect 18 0 19 0;
+#X connect 18 0 36 0;
+#X connect 18 1 22 0;
+#X connect 18 1 37 0;
+#X connect 19 0 33 0;
+#X connect 22 0 33 1;
+#X connect 22 1 20 0;
+#X connect 22 2 21 0;
+#X connect 29 0 30 0;
+#X connect 30 0 18 2;
+#X connect 31 0 8 0;
+#X connect 32 0 4 0;
+#X connect 32 0 3 0;
+#X connect 33 0 38 0;
+#X connect 33 1 39 0;
+#X connect 34 0 35 0;
+#X connect 35 0 33 2;
+#X connect 36 0 10 0;
+#X connect 37 0 7 0;

METAL BOX/easein.pd

@@ -0,0 +1,14 @@
+#N canvas 308 395 450 300 10;
+#X obj 55 24 inlet;
+#X obj 124 20 inlet;
+#X obj 124 78 float \$1;
+#X obj 55 193 outlet;
+#X obj 55 162 clip 0 1;
+#X obj 55 128 expr pow($f1 \, \\$f2);
+#X obj 219 85 loadbang;
+#X connect 0 0 5 0;
+#X connect 1 0 2 0;
+#X connect 2 0 5 1;
+#X connect 4 0 3 0;
+#X connect 5 0 4 0;
+#X connect 6 0 2 0;

METAL BOX/easeout.pd

@@ -0,0 +1,17 @@
+#N canvas 189 454 450 300 10;
+#X obj 56 64 inlet;
+#X obj 177 39 inlet;
+#X obj 173 118 float \$1;
+#X obj 56 223 outlet;
+#X obj 185 84 t b f;
+#X obj 118 79 loadbang;
+#X obj 56 168 expr 1.0-pow(1-$f1 \, \\$f2);
+#X obj 56 196 clip 0 1;
+#X connect 0 0 6 0;
+#X connect 1 0 4 0;
+#X connect 2 0 6 1;
+#X connect 4 0 2 0;
+#X connect 4 1 2 1;
+#X connect 5 0 2 0;
+#X connect 6 0 7 0;
+#X connect 7 0 3 0;

METAL BOX/f2sig.pd

@@ -0,0 +1,23 @@
+#N canvas 598 318 450 300 10;
+#X obj 46 41 inlet;
+#X obj 174 36 inlet;
+#X obj 166 69 float \$1;
+#X obj 71 208 line~;
+#X obj 65 265 outlet~;
+#X obj 86 135 pack;
+#X msg 87 168 \$1 \$2;
+#X obj 104 22 loadbang;
+#X obj 70 92 t f b;
+#X msg 139 178 stop;
+#X obj 143 101 max 25;
+#X connect 0 0 8 0;
+#X connect 1 0 2 0;
+#X connect 2 0 10 0;
+#X connect 3 0 4 0;
+#X connect 5 0 6 0;
+#X connect 6 0 3 0;
+#X connect 7 0 2 0;
+#X connect 8 0 5 0;
+#X connect 8 1 9 0;
+#X connect 9 0 3 0;
+#X connect 10 0 5 1;