From 1e0a6508574162382ed24c8fcab0cd2f6398b4f8 Mon Sep 17 00:00:00 2001 From: musil Date: Fri, 6 May 2011 10:06:45 +0000 Subject: added set message to set internal state of filter, more silent gain svn path=/trunk/externals/iemlib/; revision=15090 --- iemlib1/FIR~-help.pd | 134 +++++++++++++++++++++++++-------------------------- 1 file changed, 67 insertions(+), 67 deletions(-) (limited to 'iemlib1/FIR~-help.pd') diff --git a/iemlib1/FIR~-help.pd b/iemlib1/FIR~-help.pd index 7153aa4..0f1f517 100644 --- a/iemlib1/FIR~-help.pd +++ b/iemlib1/FIR~-help.pd @@ -1,67 +1,67 @@ -#N canvas 345 25 523 623 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 195 graph; -#X obj 109 154 soundfiler; -#X floatatom 4 133 5 0 0 0 - - -; -#X text 32 96 % cpu; -#X obj 4 93 dsp; -#X obj 4 73 tgl 15 0 empty empty dsp_ON/OFF 2 -8 0 10 -225271 -42246 --90881 0 1; -#X floatatom 413 444 7 0 0 0 - - -; -#X obj 342 323 dac~; -#X obj 342 297 gainvu~ 300; -#X obj 404 319 vu 15 120 empty empty 8 -8 0 10 -66577 -1 1 0; -#X obj 471 166 vsl 15 128 0 127 0 1 empty empty gain -7 -8 0 10 -225271 --42246 -90881 6000 1; -#X obj 343 75 noise~; -#X floatatom 403 462 7 0 0 0 - - -; -#X obj 109 71 bng 15 250 50 1 empty empty loadbang 0 -8 0 10 -225271 --24198 -90881; -#X msg 109 91 read -resize lp1.wav fir_coeff; -#X msg 114 112 read -resize lp2.wav fir_coeff; -#X msg 121 132 read -resize lp3.wav fir_coeff; -#X obj 19 406 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 70 452 graph; -#X msg 20 385 read -resize lp3.wav fir_coeff2; -#X obj 20 365 bng 15 250 50 1 empty empty loadbang 0 -8 0 10 -225271 --24198 -90881; -#X msg 359 105 set fir_coeff 256; -#X msg 373 127 set fir_coeff2 256; -#X floatatom 17 113 5 0 0 0 - - -; -#X obj 343 155 FIR~ fir_coeff 256; -#X text 398 517 IEM KUG; -#X text 382 505 musil; -#X text 412 505 @; -#X text 418 505 iem.at; -#X text 333 494 (c) Thomas Musil 2000 - 2005; -#X text 381 527 Graz \, Austria; -#X text 15 13 FIR~; -#X text 50 12 convolve a signal with an array; -#X text 276 5 1.arg: array-name; -#X text 276 15 2.arg: convolution-length; -#X floatatom 372 273 5 0 0 0 - - -; -#X connect 4 0 2 0; -#X connect 4 1 23 0; -#X connect 5 0 4 0; -#X connect 8 0 7 0; -#X connect 8 0 7 1; -#X connect 8 1 35 0; -#X connect 8 2 9 0; -#X connect 9 0 12 0; -#X connect 9 1 6 0; -#X connect 10 0 8 1; -#X connect 11 0 24 0; -#X connect 13 0 14 0; -#X connect 14 0 1 0; -#X connect 15 0 1 0; -#X connect 16 0 1 0; -#X connect 19 0 17 0; -#X connect 20 0 19 0; -#X connect 21 0 24 0; -#X connect 22 0 24 0; -#X connect 24 0 8 0; +#N canvas 345 25 559 627 10; +#N canvas 0 22 450 300 (subpatch) 0; +#X array fir_coeff 256 float 0; +#X coords 0 1 255 -1 256 140 1; +#X restore 63 195 graph; +#X obj 109 154 soundfiler; +#X floatatom 4 133 5 0 0 0 - - -; +#X text 32 96 % cpu; +#X obj 4 93 dsp; +#X obj 4 73 tgl 15 0 empty empty dsp_ON/OFF 2 -8 0 10 -225271 -42246 +-90881 1 1; +#X floatatom 413 444 7 0 0 0 - - -; +#X obj 342 323 dac~; +#X obj 342 297 gainvu~ 300; +#X obj 404 319 vu 15 120 empty empty 8 -8 0 10 -66577 -1 1 0; +#X obj 491 166 vsl 15 128 0 127 0 1 empty empty gain -7 -8 0 10 -225271 +-42246 -90881 4400 1; +#X obj 343 75 noise~; +#X floatatom 403 462 7 0 0 0 - - -; +#X obj 109 71 bng 15 250 50 1 empty empty loadbang 0 -8 0 10 -225271 +-24198 -90881; +#X msg 109 91 read -resize lp1.wav fir_coeff; +#X msg 114 112 read -resize lp2.wav fir_coeff; +#X msg 121 132 read -resize lp3.wav fir_coeff; +#X obj 19 406 soundfiler; +#N canvas 0 22 450 300 (subpatch) 0; +#X array fir_coeff2 256 float 0; +#X coords 0 1 255 -1 256 140 1; +#X restore 70 452 graph; +#X msg 20 385 read -resize lp3.wav fir_coeff2; +#X obj 20 365 bng 15 250 50 1 empty empty loadbang 0 -8 0 10 -225271 +-24198 -90881; +#X msg 359 105 set fir_coeff 256; +#X msg 373 127 set fir_coeff2 256; +#X floatatom 17 113 5 0 0 0 - - -; +#X obj 343 155 FIR~ fir_coeff 256; +#X text 398 517 IEM KUG; +#X text 382 505 musil; +#X text 412 505 @; +#X text 418 505 iem.at; +#X text 333 494 (c) Thomas Musil 2000 - 2005; +#X text 381 527 Graz \, Austria; +#X text 15 13 FIR~; +#X text 50 12 convolve a signal with an array; +#X text 276 5 1.arg: array-name; +#X text 276 15 2.arg: convolution-length; +#X floatatom 376 273 5 0 0 0 - - -; +#X connect 4 0 2 0; +#X connect 4 1 23 0; +#X connect 5 0 4 0; +#X connect 8 0 7 0; +#X connect 8 0 7 1; +#X connect 8 1 35 0; +#X connect 8 2 9 0; +#X connect 9 0 12 0; +#X connect 9 1 6 0; +#X connect 10 0 8 1; +#X connect 11 0 24 0; +#X connect 13 0 14 0; +#X connect 14 0 1 0; +#X connect 15 0 1 0; +#X connect 16 0 1 0; +#X connect 19 0 17 0; +#X connect 20 0 19 0; +#X connect 21 0 24 0; +#X connect 22 0 24 0; +#X connect 24 0 8 0; -- cgit v1.2.1