diff options
Diffstat (limited to 'voicing_detector~/help-voicing_detector~.pd')
-rw-r--r-- | voicing_detector~/help-voicing_detector~.pd | 115 |
1 files changed, 115 insertions, 0 deletions
diff --git a/voicing_detector~/help-voicing_detector~.pd b/voicing_detector~/help-voicing_detector~.pd new file mode 100644 index 0000000..c5028ac --- /dev/null +++ b/voicing_detector~/help-voicing_detector~.pd @@ -0,0 +1,115 @@ +#N canvas 0 22 725 399 10; +#N canvas 0 22 462 312 voicing_detect 0; +#X obj 89 148 voicing_detector~; +#X obj 329 147 block~ 1024; +#X obj 89 91 inlet~; +#X obj 203 93 inlet; +#X obj 88 194 outlet; +#X msg 233 120 bound \$1 \$2; +#X msg 341 124 method \$1; +#X obj 273 76 t b f; +#X obj 254 104 pack 60 500; +#X obj 255 45 inlet; +#X obj 297 45 inlet; +#X text 258 12 frequency; +#X text 255 25 constraints; +#X obj 341 93 inlet; +#X obj 341 109 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 +1; +#X text 341 57 0=avg-mag; +#X text 341 70 1=mag-diff; +#X connect 0 0 4 0; +#X connect 2 0 0 0; +#X connect 3 0 0 1; +#X connect 5 0 0 0; +#X connect 6 0 0 0; +#X connect 7 0 8 0; +#X connect 7 1 8 1; +#X connect 8 0 5 0; +#X connect 9 0 8 0; +#X connect 10 0 7 0; +#X connect 13 0 14 0; +#X connect 14 0 6 0; +#X restore 106 203 pd voicing_detect; +#N canvas 0 22 555 302 playload 0; +#X obj 28 132 tabplay~ testinput; +#X obj 28 180 outlet~; +#X obj 27 78 inlet; +#X obj 177 74 inlet; +#X obj 177 105 openpanel; +#X msg 264 150 read -resize ../sound/voice.wav testinput; +#X obj 177 139 soundfiler; +#X msg 177 122 read -resize \$1 testinput; +#X obj 360 134 loadbang; +#X connect 0 0 1 0; +#X connect 2 0 0 0; +#X connect 3 0 4 0; +#X connect 4 0 7 0; +#X connect 5 0 6 0; +#X connect 7 0 6 0; +#X connect 8 0 5 0; +#X restore 106 64 pd playload; +#X msg 178 41 bang; +#X text 210 40 load file; +#N canvas 0 0 450 300 graph1 0; +#X array testinput 1.31596e+06 float 0; +#X coords 0 1 1.31596e+06 -1 300 100 1; +#X restore 402 28 graph; +#N canvas 0 22 454 304 graph1 0; +#X array voicing 300 float 0; +#X coords 0 1.1 299 -0.1 300 50 1; +#X restore 402 130 graph; +#N canvas 0 22 454 304 graphit 1; +#X obj 105 53 inlet; +#X obj 132 153 count 300; +#X obj 104 82 t f b; +#X obj 161 53 inlet; +#X obj 104 187 tabwrite voicing; +#X connect 0 0 2 0; +#X connect 1 0 4 1; +#X connect 2 0 4 0; +#X connect 2 1 1 0; +#X connect 3 0 1 1; +#X restore 107 274 pd graphit; +#X text 133 321 AMDF Voicing Detector - uses the difference between +the average and the magnitude of an autocorrelation function to determine +whether speech is voiced or not.; +#X text 130 367 (C) 2005 Edward Kelly and Nicolas Chetry; +#X msg 105 23 bang; +#X text 141 20 play file; +#X obj 139 91 adc~; +#X floatatom 204 114 5 0 0 1 threshold - -; +#X msg 204 98 20; +#X obj 204 82 loadbang; +#X obj 139 114 *~ 0; +#X obj 179 95 tgl 15 0 empty empty mic 0 -6 0 8 -262144 -1 -1 0 1; +#X floatatom 106 237 5 0 0 0 - - -; +#X text 42 228 voiced/; +#X text 35 241 unvoiced; +#X floatatom 179 163 5 0 0 0 - - -; +#X floatatom 220 163 5 0 0 1 constraints - -; +#X msg 186 139 60; +#X msg 223 139 500; +#X text 273 173 (Hz); +#X obj 250 204 tgl 15 0 empty empty method 0 -6 0 8 -262144 -1 -1 0 +1; +#X obj 262 141 loadbang; +#X connect 0 0 17 0; +#X connect 1 0 0 0; +#X connect 2 0 1 1; +#X connect 9 0 1 0; +#X connect 9 0 6 1; +#X connect 11 0 15 0; +#X connect 12 0 0 1; +#X connect 13 0 12 0; +#X connect 14 0 13 0; +#X connect 15 0 0 0; +#X connect 16 0 15 1; +#X connect 17 0 6 0; +#X connect 20 0 0 2; +#X connect 21 0 0 3; +#X connect 22 0 20 0; +#X connect 23 0 21 0; +#X connect 25 0 0 4; +#X connect 26 0 23 0; +#X connect 26 0 22 0; |