iemhelp/help-FIR~.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

#N canvas 345 25 511 611 10;

#N canvas 0 0 450 300 graph1 0;

#X array fir_coeff 256 float 0;

#X coords 0 1 255 -1 256 140 1;

#X restore 63 135 graph;

#X obj 109 104 soundfiler;

#X floatatom 4 113 5 0 0 0 - - -;

#X text 47 64 % cpu;

#X obj 4 43 dsp;

#X obj 4 23 tgl 15 0 empty empty dsp_ON/OFF 2 -8 0 10 -225271 -42246

-90881 1 1;

#X text 9 512 (c) musil@iem.kug.ac.at;

#X text 51 525 IEM KUG;

#X floatatom 407 286 7 0 0 0 - - -;

#X obj 325 165 dac~;

#X obj 325 139 gainvu~ 300;

#X obj 398 161 vu 15 120 empty empty 8 -8 0 10 -66577 -1 1 0;

#X text 26 537 graz \, austria 2001;

#X obj 458 8 vsl 15 128 0 127 0 1 empty empty gain -29 5 0 10 -225271

-42246 -90881 9200 1;

#X obj 325 12 noise~;

#X floatatom 348 286 7 0 0 0 - - -;

#X obj 109 21 bng 15 250 50 1 empty empty loadbang 8 -8 0 10 -225271

-24198 -90881;

#X msg 109 41 read -resize lp1.wav fir_coeff;

#X msg 114 62 read -resize lp2.wav fir_coeff;

#X msg 121 82 read -resize lp3.wav fir_coeff;

#X obj 207 384 soundfiler;

#N canvas 0 0 450 300 graph1 0;

#X array fir_coeff2 256 float 0;

#X coords 0 1 255 -1 256 140 1;

#X restore 207 408 graph;

#X msg 208 363 read -resize lp3.wav fir_coeff2;

#X obj 208 343 bng 15 250 50 1 empty empty loadbang 8 -8 0 10 -225271

-24198 -90881;

#X msg 338 69 set fir_coeff 256;

#X msg 334 96 set fir_coeff2 256;

#X floatatom 19 90 5 0 0 0 - - -;

#X text 4 130 20 .. 30;

#X obj 325 36 FIR~ fir_coeff 256;

#X connect 4 0 2 0;

#X connect 4 1 26 0;

#X connect 5 0 4 0;

#X connect 10 0 9 0;

#X connect 10 0 9 1;

#X connect 10 2 11 0;

#X connect 11 0 15 0;

#X connect 11 1 8 0;

#X connect 13 0 10 1;

#X connect 14 0 28 0;

#X connect 16 0 17 0;

#X connect 17 0 1 0;

#X connect 18 0 1 0;

#X connect 19 0 1 0;

#X connect 22 0 20 0;

#X connect 23 0 22 0;

#X connect 24 0 28 0;

#X connect 25 0 28 0;

#X connect 28 0 10 0;