-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathaudio_safety~.pd
More file actions
executable file
·102 lines (102 loc) · 2.62 KB
/
audio_safety~.pd
File metadata and controls
executable file
·102 lines (102 loc) · 2.62 KB
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
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
#N canvas 233 152 1024 453 10;
#X text -4 -1 don't send nan or inf to the limiter or filter;
#X obj 339 -48 inlet~;
#X obj 338 251 outlet~;
#X obj 496 26 inlet;
#X obj 495 45 t b;
#X msg 496 70 clear;
#X text 550 26 reset filter;
#X obj 337 -12 expr~ if ($v1 > -3.40282 * pow (10 \, 38) && $v1 < 3.40282 * pow (10 \, 38) \, $v1 \, 0);
#X obj 338 208 expr~ if ($v1 > -3.40282 * pow (10 \, 38) && $v1 < 3.40282 * pow (10 \, 38) \, $v1 \, 0);
#X text 260 130 remove dc;
#X text 9 213 filter nan/inf again in case filter blew up;
#X text 65 82 hard limiter: avoid prolonged hard clipping;
#N canvas 327 60 648 751 limiter 0;
#X obj 25 -192 inlet~;
#X obj -11 496 outlet~;
#X obj 456 -189 samplerate~;
#X obj 437 -225 loadbang;
#X obj 321 -17 * 8;
#X obj 103 331 float;
#X obj 173 333 float;
#X obj 108 289 sel 0 1;
#X obj 35 377 pack 1 0;
#X obj 108 263 < 1;
#X obj 63 220 t f f f;
#X obj 26 304 change 1;
#X obj 65 170 expr 1 / $f1;
#X floatatom 64 194 5 0 0 0 - - - 0;
#X obj 24 439 line~;
#X obj 134 384 loadbang;
#X msg 132 404 1;
#X obj -11 467 *~;
#X obj 69 -33 t f f;
#X obj 138 -7 >= 1;
#X obj 137 18 == 0;
#X obj 31 63 spigot;
#X obj 80 63 spigot;
#X obj 79 89 t b;
#X msg 80 114 1;
#X obj 438 274 block~ 512;
#X obj 123 -182 bang~;
#X msg 122 -160 clear;
#X obj 298 -103 snapshot~;
#X obj 438 -204 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 344 -142 metro 11.8;
#X obj 121 -134 fexpr~ max (abs($x1) \, $y1);
#X obj 450 -167 expr 512000 / $f1;
#X floatatom 492 -110 5 0 0 0 - - - 0;
#X obj 69 -56 / 0.8;
#X connect 0 0 17 0;
#X connect 0 0 31 0;
#X connect 2 0 32 0;
#X connect 3 0 29 0;
#X connect 4 0 5 1;
#X connect 5 0 8 1;
#X connect 6 0 8 1;
#X connect 7 0 5 0;
#X connect 7 1 6 0;
#X connect 8 0 14 0;
#X connect 9 0 7 0;
#X connect 10 0 9 1;
#X connect 10 1 11 0;
#X connect 10 2 9 0;
#X connect 11 0 8 0;
#X connect 12 0 13 0;
#X connect 13 0 10 0;
#X connect 14 0 17 1;
#X connect 15 0 16 0;
#X connect 16 0 14 0;
#X connect 17 0 1 0;
#X connect 18 0 22 0;
#X connect 18 0 21 0;
#X connect 18 1 19 0;
#X connect 19 0 20 0;
#X connect 19 0 21 1;
#X connect 20 0 22 1;
#X connect 21 0 12 0;
#X connect 22 0 23 0;
#X connect 23 0 24 0;
#X connect 24 0 12 0;
#X connect 26 0 27 0;
#X connect 27 0 31 0;
#X connect 28 0 34 0;
#X connect 29 0 30 0;
#X connect 29 0 2 0;
#X connect 30 0 28 0;
#X connect 31 0 28 0;
#X connect 32 0 4 0;
#X connect 32 0 30 1;
#X connect 32 0 33 0;
#X connect 32 0 6 1;
#X connect 34 0 18 0;
#X restore 337 80 pd limiter;
#X obj 337 133 hip~ 10;
#X connect 1 0 7 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 13 1;
#X connect 7 0 12 0;
#X connect 8 0 2 0;
#X connect 12 0 13 0;
#X connect 13 0 8 0;