31 Jul
2006
31 Jul
'06
3:45 p.m.
You can do autocorrelation in pd using internals only. Actually, it will be a circular auto-correlation performed in the frequency domain. Look at the attached [autocorr], maybe you can use it...
BTW, the help file uses [mux~] from zexy but it's just for fun...
br, Piotr
--
Piotr Majdak
Institut für Schallforschung
Ãsterreichische Akademie der Wissenschaften
Reichsratsstr. 17
A-1010 Wien
Tel.: +43-1-4277-29511
Fax: +43-1-4277-9296
E-Mail: piotr@majdak.com
WWW: http://www.kfs.oeaw.ac.at
#N canvas 90 314 799 415 12;
#N canvas 0 0 450 300 graph1 0;
#X array $0_ac 1024 float 2;
#X coords 0 1 1024 -1 400 140 1;
#X restore 316 15 graph;
#X obj 56 267 tabwrite~ $0_ac;
#X obj -1 79 noise~;
#X obj 106 81 osc~ 440;
#X floatatom 166 203 0 0 0 0 - - -;
#X obj 144 177 dbtorms;
#X floatatom 144 145 0 0 0 0 - - -;
#X floatatom 106 58 5 0 0 0 - - -;
#X obj 19 -30 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
;
#X obj 56 142 autocorr;
#X obj 19 -5 switch~ 1024;
#X obj 57 44 hradio 15 1 0 2 empty empty empty 0 -6 0 8 -262144 -1
-1 1;
#X obj 57 108 mux~;
#X obj 56 232 *~ 1;
#X text 310 -34 auto-correlation plot;
#X text 47 -34 switch on here first...;
#X text 185 146 amplitude;
#X text 5 22 then choose between noise and sine;
#X connect 2 0 12 0;
#X connect 3 0 12 1;
#X connect 5 0 4 0;
#X connect 5 0 13 1;
#X connect 6 0 5 0;
#X connect 7 0 3 0;
#X connect 8 0 10 0;
#X connect 9 0 13 0;
#X connect 9 1 1 0;
#X connect 11 0 12 0;
#X connect 12 0 9 0;
#X connect 13 0 1 0;
#N canvas 530 296 671 508 12;
#X obj 73 94 *~;
#X obj 109 323 bang~;
#X obj 33 12 inlet~;
#X obj 35 288 outlet~;
#X obj 109 348 outlet;
#X obj 32 95 *~;
#X obj 33 147 +~;
#X obj 32 38 fft~;
#X obj 34 186 ifft~;
#X obj 173 49 bang~;
#X obj 173 75 t b b;
#X obj 173 101 timer;
#X obj 173 149 samplerate~;
#X obj 208 175 / 1000;
#X floatatom 209 230 7 0 0 0 - - -;
#X obj 173 199 *;
#X obj 173 124 t b f;
#X obj 34 219 /~ 64;
#X obj 34 248 /~ 64;
#X text 280 230 block size;
#X text 105 287 auto-correlation;
#X text 165 325 bang on a new auto-correlation;
#X text 91 14 input signal;
#X text 228 47 get the block size;
#X connect 0 0 6 1;
#X connect 1 0 4 0;
#X connect 2 0 7 0;
#X connect 5 0 6 0;
#X connect 6 0 8 0;
#X connect 7 0 5 1;
#X connect 7 0 5 0;
#X connect 7 1 0 1;
#X connect 7 1 0 0;
#X connect 8 0 17 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 10 1 11 1;
#X connect 11 0 16 0;
#X connect 12 0 15 0;
#X connect 13 0 15 1;
#X connect 15 0 14 0;
#X connect 15 0 17 1;
#X connect 15 0 18 1;
#X connect 16 0 12 0;
#X connect 16 1 13 0;
#X connect 17 0 18 0;
#X connect 18 0 3 0;