blob: 8873d0a3a994a1d07e0e0b1176da0e3062a3efdb (
plain)
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
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
|
#N canvas 456 157 568 471 10;
#X text 119 399 IEM KUG;
#X text 93 387 musil;
#X text 131 387 @;
#X text 139 387 iem.at;
#X text 102 409 Graz \, Austria;
#X obj 21 43 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X floatatom 21 111 5 0 0 0 - - -;
#X floatatom 51 91 5 0 0 0 - - -;
#N canvas 0 22 450 300 (subpatch) 0;
#X array array101 100 float 0;
#X coords 0 1.1 99 -0.1 100 50 1;
#X restore 404 223 graph;
#X obj 187 258 tabwrite~ array101;
#N canvas 0 22 450 300 (subpatch) 0;
#X array array100 100 float 0;
#X coords 0 1.1 99 -0.1 100 50 1;
#X restore 404 153 graph;
#X obj 226 192 tabwrite~ array100;
#X text 250 220 no initial arguments;
#X obj 162 220 block_delay~;
#X obj 160 97 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 405 274 hsl 100 15 0 99 0 0 empty empty empty -2 -6 0 8 -262144
-1 -1 6400 1;
#X floatatom 402 295 5 0 0 0 - - -;
#X text 21 11 block_delay~;
#X text 52 376 (c) Thomas Musil 2000 - 2011;
#N canvas 0 22 450 300 dirac 0;
#X obj 103 44 inlet;
#X obj 103 65 t b b;
#X obj 71 100 del 2;
#X msg 126 112 1;
#X msg 70 122 0;
#X obj 92 151 biquad~ 0 0 1 -1 0;
#X obj 92 176 max~ 0;
#X obj 92 197 outlet~;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 4 0;
#X connect 3 0 5 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X restore 161 139 pd dirac;
#N canvas 0 22 528 567 dsp 0;
#X obj 20 65 inlet;
#X obj 20 406 outlet;
#X msg 31 88 \; pd dsp \$1;
#X obj 20 199 cputime;
#X obj 20 178 t b b;
#X text 15 11 dsp;
#X text 59 65 1/0 = ON/OFF;
#X text 97 313 CPU-load;
#X obj 62 126 loadbang;
#X obj 20 126 sel 1;
#X text 64 12 turn dsp-kernel on & off \,;
#X obj 20 240 t f f;
#X obj 211 405 outlet;
#X text 65 408 average;
#X text 177 405 peak;
#X obj 211 154 f;
#X obj 146 179 > -1;
#X obj 169 155 f -1;
#X obj 179 91 t f b f;
#X obj 146 204 sel 1;
#X obj 192 132 f -1;
#X obj 20 154 metro 500;
#X obj 20 220 * 0.2;
#X text 74 37 -dsp-load in %;
#X text 65 24 measure average- and peak-;
#X obj 20 292 1p1z 0.1 0 0.9;
#X obj 20 315 * 100;
#X obj 20 360 int;
#X obj 20 338 + 0.499;
#X obj 20 383 * 0.01;
#X obj 246 207 r pd;
#X obj 246 231 route dsp;
#X text 245 318 to toggle input;
#X msg 246 283 \; dsp_tgl set \$1;
#X obj 247 341 r dsp_tgl;
#X obj 246 257 route float;
#X obj 146 227 del 3990;
#X text 179 455 IEM KUG;
#X text 153 443 musil;
#X text 190 443 @;
#X text 199 443 iem.at;
#X text 162 465 Graz \, Austria;
#X msg 275 108 \; pd audio-dialog 0 0 0 0 64 0 0 0 0 0 0 0 64 0 0 0
44100 \$1;
#X obj 275 81 inlet;
#X text 271 56 system delay time in ms;
#N canvas 0 22 486 468 once 0;
#X obj 89 162 spigot;
#X obj 34 59 inlet;
#X obj 89 111 t a b;
#X obj 126 140 f 1;
#X obj 89 194 t a b;
#X obj 119 216 f 0;
#X obj 89 247 outlet;
#X obj 207 56 inlet;
#X obj 207 79 bang;
#X obj 207 102 f 1;
#X text 8 6 once;
#X text 64 7 only the first message passes through;
#X text 29 37 message in;
#X text 29 289 message out (only once);
#X text 203 36 anything to init once;
#X obj 34 80 route bang;
#X obj 34 110 t b b;
#X obj 34 162 spigot;
#X obj 34 194 t b b;
#X text 98 377 IEM KUG;
#X text 73 363 musil;
#X text 110 365 @;
#X text 118 365 iem.at;
#X text 81 387 Graz \, Austria;
#X text 120 339 @;
#X text 128 339 iem.at;
#X text 33 338 (c) zmoelnig;
#X text 33 352 (c) Thomas Musil 2000 - 2011;
#X connect 0 0 4 0;
#X connect 1 0 15 0;
#X connect 2 0 0 0;
#X connect 2 1 3 0;
#X connect 3 0 0 1;
#X connect 3 0 17 1;
#X connect 4 0 6 0;
#X connect 4 1 5 0;
#X connect 5 0 3 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 3 1;
#X connect 15 0 16 0;
#X connect 15 1 2 0;
#X connect 16 0 17 0;
#X connect 16 1 3 0;
#X connect 17 0 18 0;
#X connect 18 0 6 0;
#X connect 18 1 5 0;
#X restore 69 270 pd once;
#X text 112 430 (c) Thomas Musil 2000 - 2011;
#X connect 0 0 2 0;
#X connect 0 0 9 0;
#X connect 3 0 22 0;
#X connect 4 0 3 0;
#X connect 4 1 3 1;
#X connect 8 0 21 0;
#X connect 9 0 21 0;
#X connect 11 0 25 0;
#X connect 11 1 45 0;
#X connect 15 0 17 1;
#X connect 15 0 12 0;
#X connect 16 0 19 0;
#X connect 17 0 16 1;
#X connect 18 0 16 0;
#X connect 18 1 17 0;
#X connect 18 2 15 1;
#X connect 19 0 15 0;
#X connect 19 0 36 0;
#X connect 20 0 17 1;
#X connect 21 0 4 0;
#X connect 22 0 11 0;
#X connect 22 0 18 0;
#X connect 25 0 26 0;
#X connect 26 0 28 0;
#X connect 27 0 29 0;
#X connect 28 0 27 0;
#X connect 29 0 1 0;
#X connect 30 0 31 0;
#X connect 31 0 35 0;
#X connect 35 0 33 0;
#X connect 36 0 20 0;
#X connect 43 0 42 0;
#X connect 45 0 25 5;
#X connect 45 0 25 4;
#X restore 21 65 pd dsp;
#X obj 21 261 block~ 64 1 1;
#X msg 21 239 set \$1 1 1;
#X floatatom 20 220 5 0 0 0 - - -;
#X msg 20 163 32;
#X msg 20 188 64;
#X text 130 10 Constant signal delay of one blocksize.;
#X connect 5 0 20 0;
#X connect 13 0 9 0;
#X connect 14 0 11 0;
#X connect 14 0 9 0;
#X connect 14 0 19 0;
#X connect 15 0 16 0;
#X connect 19 0 11 0;
#X connect 19 0 13 0;
#X connect 20 0 6 0;
#X connect 20 1 7 0;
#X connect 22 0 21 0;
#X connect 23 0 22 0;
#X connect 24 0 23 0;
#X connect 25 0 23 0;
|
