1 files changed, 81 insertions, 0 deletions
diff --git a/clap808~.pd b/clap808~.pd
new file mode 100644
index 0000000..c369b8d
--- /dev/null
+++ b/clap808~.pd
@@ -0,0 +1,81 @@
+#N canvas 582 246 724 451 10;
+#X obj 222 259 vline~;
+#X obj 222 281 dbtorms~;
+#X obj 31 255 noise~;
+#X obj 32 329 *~;
+#X obj 160 201 t b b;
+#X obj 103 195 t b b;
+#X obj 103 175 del 30;
+#X obj 33 352 hip~ 800;
+#X obj 103 218 1.5;
+#X obj 128 219 50;
+#X obj 160 223 0.7;
+#X obj 185 223 0;
+#X obj 103 152 t b b f;
+#X obj 119 82 t f f;
+#X obj 119 103 *;
+#X obj 103 125 f;
+#X obj 222 201 rmstodb;
+#X msg 222 223 \$1 \, 0 34 \, \$1 0.5 10.5 \, 0 34 11 \, \$1 0 23 \,
+0 34 23 \, \$1 0 31 \, 0 34 31 \, \$1 0 36 \, 0 230 36.5 \, 0 500 65
+\, 0 2000 120;
+#X obj 34 381 outlet~;
+#X text 459 368 Author: Roman Haefeli;
+#X obj 17 3 inlet;
+#X obj 17 52 b;
+#X obj 339 300 del 2122;
+#X obj 309 278 t b b;
+#X obj 339 322 0;
+#X obj 309 320 1;
+#X obj 309 356 t a;
+#X obj 324 383 switch~;
+#X obj 309 404 outlet;
+#X text 328 80 externals:;
+#X text 326 98 [bpq2~] from the iemabs (uses [filter~] from iemlib1)
+;
+#X text 457 389 Version: 2007-09-13;
+#X obj 17 31 route bang trigger gain;
+#X obj 119 61 / 127;
+#X obj 175 31 loadbang;
+#X obj 178 59 tof/argument 1 100;
+#X obj 31 279 iemlib/bpq2~ 1000 1 3000;
+#X connect 0 0 1 0;
+#X connect 1 0 3 1;
+#X connect 2 0 36 0;
+#X connect 3 0 7 0;
+#X connect 4 0 10 0;
+#X connect 4 1 11 0;
+#X connect 5 0 8 0;
+#X connect 5 1 9 0;
+#X connect 6 0 5 0;
+#X connect 7 0 18 0;
+#X connect 8 0 36 2;
+#X connect 9 0 36 3;
+#X connect 10 0 36 2;
+#X connect 11 0 36 3;
+#X connect 12 0 6 0;
+#X connect 12 1 4 0;
+#X connect 12 2 16 0;
+#X connect 13 0 14 0;
+#X connect 13 1 14 1;
+#X connect 14 0 15 1;
+#X connect 15 0 12 0;
+#X connect 16 0 17 0;
+#X connect 17 0 0 0;
+#X connect 20 0 32 0;
+#X connect 21 0 15 0;
+#X connect 21 0 23 0;
+#X connect 22 0 24 0;
+#X connect 23 0 25 0;
+#X connect 23 1 22 0;
+#X connect 24 0 26 0;
+#X connect 25 0 26 0;
+#X connect 26 0 27 0;
+#X connect 26 0 28 0;
+#X connect 32 0 21 0;
+#X connect 32 1 21 0;
+#X connect 32 2 33 0;
+#X connect 33 0 13 0;
+#X connect 34 0 35 0;
+#X connect 35 0 33 0;
+#X connect 36 0 3 0;