diff options
author | Guenter Geiger <ggeiger@users.sourceforge.net> | 2002-07-29 17:06:19 +0000 |
---|---|---|
committer | Guenter Geiger <ggeiger@users.sourceforge.net> | 2002-07-29 17:06:19 +0000 |
commit | 57045df5fe3ec557e57dc7434ac1a07b5521bffc (patch) | |
tree | 7174058b41b73c808107c7090d9a4e93ee202341 /pd/doc/7.stuff/soundfile-tools/2.bandpass.pd | |
parent | da38b3424229e59f956252c3d89895e43e84e278 (diff) |
This commit was generated by cvs2svn to compensate for changes in r58,
which included commits to RCS files with non-trunk default branches.
svn path=/trunk/; revision=59
Diffstat (limited to 'pd/doc/7.stuff/soundfile-tools/2.bandpass.pd')
-rw-r--r-- | pd/doc/7.stuff/soundfile-tools/2.bandpass.pd | 202 |
1 files changed, 202 insertions, 0 deletions
diff --git a/pd/doc/7.stuff/soundfile-tools/2.bandpass.pd b/pd/doc/7.stuff/soundfile-tools/2.bandpass.pd new file mode 100644 index 00000000..c75335eb --- /dev/null +++ b/pd/doc/7.stuff/soundfile-tools/2.bandpass.pd @@ -0,0 +1,202 @@ +#N canvas 73 28 846 432 12; +#N canvas 213 187 495 352 input-sample 0; +#N canvas 0 0 450 300 graph1 0; +#X array array1 155948 float 0; +#X coords 0 1 155948 -1 400 300 1; +#X restore 55 22 graph; +#X text 149 386 INPUT SAMPLE; +#X restore 238 282 pd input-sample; +#N canvas 192 180 507 343 output-sample 0; +#N canvas 0 0 450 300 graph2 0; +#X array array2 160358 float 0; +#X coords 0 1 160358 -1 400 300 1; +#X restore 59 13 graph; +#X text 158 381 OUTPUT SAMPLE; +#X restore 237 305 pd output-sample; +#N canvas 116 150 735 425 guts 0; +#X msg 25 131 bang; +#X obj 25 354 openpanel; +#X obj 142 31 inlet; +#X obj 458 378 dac~; +#X obj 458 335 *~; +#X obj 473 312 line~; +#X obj 473 290 r master-amp; +#X msg 726 87 bang; +#X obj 726 109 savepanel; +#X obj 275 165 spigot; +#X msg 260 131 0; +#X msg 291 131 1; +#X obj 513 408 outlet; +#X obj 324 131 r frequency; +#X obj 263 320 tabwrite~ array2; +#X msg 263 194 bang; +#X obj 438 283 +~; +#X msg 143 131 \; pd dsp 1; +#X obj 458 356 hip~ 7; +#X obj 275 223 tabplay~ array1; +#X msg 453 127 bang; +#X obj 453 149 tabplay~ array2; +#X msg 726 130 write \$1 array2; +#X obj 726 151 soundfiler; +#X obj 142 52 route read run start hear save; +#N canvas 0 0 368 259 audio-transformation 0; +#X obj 111 70 r frequency; +#X obj 96 21 inlet~; +#X obj 96 178 outlet~; +#X obj 179 123 r q; +#X obj 111 94 pack 0 100; +#X obj 110 119 line~; +#X obj 96 153 vcf~; +#X connect 0 0 4 0; +#X connect 1 0 6 0; +#X connect 3 0 6 2; +#X connect 4 0 5 0; +#X connect 5 0 6 1; +#X connect 6 0 2 0; +#X restore 275 244 pd audio-transformation; +#X obj 513 387 env~ 16384; +#X obj 585 88 route normalized; +#X msg 585 184 write -normalize \$1 array2; +#X msg 585 142 bang; +#X obj 585 163 savepanel; +#X obj 585 209 soundfiler; +#X obj 25 406 soundfiler; +#X msg 25 383 read -resize -maxsize 1e+06 \$1 array1; +#X msg 25 452 \; array2 resize \$1; +#X obj 25 430 + 4410; +#X floatatom 94 428 0 0 0; +#X obj 413 132 r q; +#X connect 0 0 1 0; +#X connect 1 0 33 0; +#X connect 2 0 24 0; +#X connect 4 0 18 0; +#X connect 5 0 4 1; +#X connect 6 0 5 0; +#X connect 7 0 8 0; +#X connect 8 0 22 0; +#X connect 9 0 10 0; +#X connect 9 0 15 0; +#X connect 10 0 9 1; +#X connect 11 0 9 1; +#X connect 13 0 9 0; +#X connect 15 0 14 0; +#X connect 15 0 19 0; +#X connect 16 0 4 0; +#X connect 18 0 3 0; +#X connect 18 0 3 1; +#X connect 18 0 26 0; +#X connect 19 0 25 0; +#X connect 20 0 21 0; +#X connect 21 0 16 1; +#X connect 22 0 23 0; +#X connect 24 0 0 0; +#X connect 24 1 15 0; +#X connect 24 1 10 0; +#X connect 24 1 17 0; +#X connect 24 2 11 0; +#X connect 24 2 17 0; +#X connect 24 3 20 0; +#X connect 24 4 27 0; +#X connect 25 0 14 0; +#X connect 25 0 16 0; +#X connect 26 0 12 0; +#X connect 27 0 29 0; +#X connect 27 1 7 0; +#X connect 28 0 31 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 32 0 35 0; +#X connect 32 0 36 0; +#X connect 33 0 32 0; +#X connect 35 0 34 0; +#X connect 37 0 9 0; +#X restore 34 236 pd guts; +#X msg 34 131 run the transformation; +#X msg 34 173 hear the output buffer again; +#X text 34 91 click below to:; +#X msg 34 194 save the output buffer; +#X floatatom 562 334 0 0 120; +#N canvas 194 37 397 591 output 0; +#X obj 65 199 t b; +#X obj 65 150 f; +#X obj 65 100 inlet; +#X text 70 79 mute; +#X obj 65 224 f; +#X msg 132 240 0; +#X msg 65 125 bang; +#X obj 65 175 moses 1; +#X obj 132 215 t b f; +#X obj 94 434 outlet; +#X msg 94 409 set \$1; +#X obj 183 160 moses 1; +#X obj 221 437 dbtorms; +#X obj 221 461 pack 0 100; +#X obj 183 136 r master-lvl; +#X obj 94 375 r master-lvl; +#X obj 81 281 s master-lvl; +#X obj 221 486 s master-amp; +#X obj 204 240 loadbang; +#X msg 204 264 \; master-lvl 90; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 16 0; +#X connect 5 0 16 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 10 0 9 0; +#X connect 11 1 4 1; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 14 0 1 1; +#X connect 14 0 11 0; +#X connect 15 0 10 0; +#X connect 15 0 12 0; +#X connect 18 0 19 0; +#X restore 562 313 pd output; +#X msg 562 292 mute; +#X obj 562 355 s master-lvl; +#X text 604 291 <-- mute button; +#X floatatom 34 257 0 0 0; +#X text 35 300 100 maximum; +#X text 35 282 output meter; +#X text 600 335 <--set me; +#X msg 34 110 read an input file; +#X msg 34 215 save normalized to max amplitude; +#X msg 34 152 start transformation when I change f or q; +#X floatatom 479 164 0 0 0; +#X obj 479 185 s frequency; +#X text 479 85 center; +#X floatatom 482 229 0 0 10000; +#X text 482 210 "q"; +#X obj 482 252 s q; +#X obj 479 143 mtof; +#X floatatom 479 122 0 0 128; +#X text 536 163 <- set in Hz; +#X text 533 230 <--set selectivity; +#X text 479 103 frequency; +#X text 534 123 <- set in MIDI units; +#X text 31 341 Note -- you can shift-click on the controls to change +them in hundredths. You can also click and type numbers in \, followed +by the "enter" key.; +#X text 16 5 Bandpass filter. Read in a sample first \, then you can +either set a frequency and hit the "run" button or else hit the "start..." +button and start the transformation by dragging on the frequency or +q control.; +#X text 552 377 OUTPUT LEVEL in dB (100 norm); +#X connect 2 0 12 0; +#X connect 3 0 2 0; +#X connect 4 0 2 0; +#X connect 6 0 2 0; +#X connect 7 0 10 0; +#X connect 8 0 7 0; +#X connect 9 0 8 0; +#X connect 16 0 2 0; +#X connect 17 0 2 0; +#X connect 18 0 2 0; +#X connect 19 0 20 0; +#X connect 22 0 24 0; +#X connect 25 0 19 0; +#X connect 26 0 25 0; |