1 files changed, 63 insertions, 0 deletions
diff --git a/blip~.pd b/blip~.pd
new file mode 100644
index 0000000..5ef8850
--- /dev/null
+++ b/blip~.pd
@@ -0,0 +1,63 @@
+#N canvas 646 109 794 607 10;
+#N canvas 0 0 528 439 blip 0;
+#X obj 153 236 osc~;
+#X obj 190 236 vline~;
+#X obj 189 262 *~;
+#X obj 172 285 *~;
+#X obj 153 26 inlet;
+#X obj 172 331 outlet~;
+#X msg 190 202 1 2 0 \, 0 \$1 3;
+#X obj 190 108 log;
+#X obj 190 85 pow 4;
+#X obj 190 151 * 1e+06;
+#X obj 190 130 pow -3;
+#X obj 190 174 * 2;
+#X obj 259 25 inlet;
+#X obj 265 87 pow -1;
+#X obj 265 112 * 1000;
+#X obj 153 56 t f f f;
+#X obj 265 136 log;
+#X obj 265 159 min 3;
+#X obj 173 307 *~;
+#X connect 0 0 3 0;
+#X connect 1 0 2 0;
+#X connect 1 0 2 1;
+#X connect 2 0 3 1;
+#X connect 3 0 18 0;
+#X connect 4 0 15 0;
+#X connect 6 0 1 0;
+#X connect 7 0 10 0;
+#X connect 8 0 7 0;
+#X connect 9 0 11 0;
+#X connect 10 0 9 0;
+#X connect 11 0 6 0;
+#X connect 12 0 11 1;
+#X connect 13 0 14 0;
+#X connect 14 0 16 0;
+#X connect 15 0 0 0;
+#X connect 15 1 8 0;
+#X connect 15 2 13 0;
+#X connect 16 0 17 0;
+#X connect 17 0 18 1;
+#X connect 18 0 5 0;
+#X restore 122 217 pd blip;
+#X obj 124 277 outlet~;
+#X text 388 306 Self scaling time/amplitude blips;
+#X text 388 324 without redundancy \, ajf2006;
+#X text 387 341 Useful for percussion;
+#X obj 122 136 mtof;
+#X obj 164 151 inlet decay;
+#X obj 164 173 clip 5 1000;
+#X obj 122 42 inlet note;
+#X obj 123 250 *~ 0;
+#X obj 122 64 unpack f f;
+#X obj 178 94 / 127;
+#X connect 0 0 9 0;
+#X connect 5 0 0 0;
+#X connect 6 0 7 0;
+#X connect 7 0 0 1;
+#X connect 8 0 10 0;
+#X connect 9 0 1 0;
+#X connect 10 0 5 0;
+#X connect 10 1 11 0;
+#X connect 11 0 9 1;