diff options
author | Ed Kelly <edkelly@users.sourceforge.net> | 2006-01-20 13:45:23 +0000 |
---|---|---|
committer | Ed Kelly <edkelly@users.sourceforge.net> | 2006-01-20 13:45:23 +0000 |
commit | f711ffc1cb1e37cd9ff6c94352c5c40c48bdbd2d (patch) | |
tree | 3f9cd3914293f45fa5eb75dea9a7b8a3e361df21 /voicing_detector~/help-voicing_detector~.pd | |
parent | 30f8c5e5a929302b8c99045f53f4c0ef0e32e66d (diff) |
This commit was generated by cvs2svn to compensate for changes in r4455,
which included commits to RCS files with non-trunk default branches.
svn path=/trunk/externals/ekext/; revision=4456
Diffstat (limited to 'voicing_detector~/help-voicing_detector~.pd')
-rw-r--r-- | voicing_detector~/help-voicing_detector~.pd | 188 |
1 files changed, 79 insertions, 109 deletions
diff --git a/voicing_detector~/help-voicing_detector~.pd b/voicing_detector~/help-voicing_detector~.pd index c5028ac..6faed88 100644 --- a/voicing_detector~/help-voicing_detector~.pd +++ b/voicing_detector~/help-voicing_detector~.pd @@ -1,115 +1,85 @@ -#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; +#N canvas 0 0 510 323 10; +#N canvas 119 189 450 300 voxdetect 0; +#X obj 150 156 voicing_detector~; +#X obj 150 99 inlet~; +#X obj 307 124 block~ 1024; +#X obj 264 95 inlet; +#X obj 220 209 outlet~; +#X obj 150 238 outlet; +#X text 81 195 1=voiced; +#X text 81 214 0=unvoiced; +#X text 262 76 threshold (0-100); +#X connect 0 0 5 0; +#X connect 1 0 0 0; +#X connect 1 0 4 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 restore 96 199 pd voxdetect; +#X obj 139 71 bng 15 250 50 0 empty empty load-voice -38 -6 0 8 -262144 +-1 -1; +#N canvas 0 0 450 300 play 0; +#X obj 82 157 tabplay~ voice; +#X obj 190 66 inlet; +#X obj 53 67 inlet; +#X obj 111 66 inlet; +#X obj 48 140 metro; +#X obj 84 196 outlet~; +#X connect 0 0 5 0; +#X connect 1 0 4 1; #X connect 2 0 0 0; #X connect 3 0 4 0; +#X connect 4 0 0 0; +#X restore 95 139 pd play; +#X obj 95 115 bng 15 250 50 0 empty empty play 0 -6 0 8 -262144 -1 +-1; +#X obj 117 102 tgl 15 0 empty empty loop 0 -6 0 8 -262144 -1 -1 0 1 +; +#N canvas 0 0 450 300 load 0; +#X obj 77 135 soundfiler; +#X obj 77 169 outlet; +#X obj 161 101 loadbang; +#X obj 80 84 openpanel; +#X obj 80 27 inlet; +#X msg 8 101 read -resize \$1 voice; +#X obj 77 152 / 44.1; +#X obj 114 47 samplerate~; +#X obj 114 64 / 1000; +#X msg 77 118 read -resize beauty.wav voice; +#X connect 0 0 6 0; +#X connect 2 0 9 0; +#X connect 3 0 5 0; +#X connect 4 0 3 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 5 0 0 0; +#X connect 6 0 1 0; +#X connect 7 0 8 0; +#X connect 8 0 6 1; +#X connect 9 0 0 0; +#X restore 139 86 pd load; +#N canvas 0 0 450 300 graph2 0; +#X array voice 1.31596e+06 float 0; +#X coords 0 1 1.31596e+06 -1 100 70 1; +#X restore 281 55 graph; +#X floatatom 96 234 5 0 0 0 - - -; +#X obj 166 233 dac~; +#X obj 217 44 vsl 15 101 0 100 0 0 empty empty empty 0 -8 0 8 -262144 +-1 -1 3700 1; +#X floatatom 193 168 5 0 0 0 - - -; +#X text 79 253 The voicing detector estimates whether a frame of speech +is voiced (uses the vocal chords) or unvoiced (does not).; +#X text 128 288 (Gnu) Edward Kelly and Nicolas Chetry 2005; +#X msg 15 131 \; pd dsp \$1; +#X obj 15 102 tgl 15 0 empty empty audio_on 0 -6 0 8 -262144 -1 -1 +0 1; +#X obj 124 162 adc~; +#X connect 0 0 7 0; +#X connect 0 1 8 0; +#X connect 0 1 8 1; +#X connect 1 0 5 0; +#X connect 2 0 0 0; +#X connect 3 0 2 0; +#X connect 4 0 2 1; +#X connect 5 0 2 2; +#X connect 9 0 10 0; +#X connect 10 0 0 1; #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; |