blip~.pd


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
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;