From 99232d72913930a4af23c93f61f214e1e675c3f2 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Wed, 27 Oct 2010 20:06:10 +0000 Subject: added [ggee/getdir] so that voicepoly.pd can find where the abstraction is without having to be in the same folder svn path=/trunk/externals/manypoly/; revision=14244 --- examples/run-voicetest.pd | 22 +++++++++++++ examples/test.wav | Bin 0 -> 645168 bytes examples/voicetest.pd | 39 +++++++++++++++++++++++ test.wav | Bin 645168 -> 0 bytes voicepoly-help.pd | 16 ---------- voicepoly.pd | 78 +++++++++++++++++++++++++++++----------------- voicetest.pd | 39 ----------------------- 7 files changed, 110 insertions(+), 84 deletions(-) create mode 100644 examples/run-voicetest.pd create mode 100644 examples/test.wav create mode 100644 examples/voicetest.pd delete mode 100644 test.wav delete mode 100644 voicepoly-help.pd delete mode 100644 voicetest.pd diff --git a/examples/run-voicetest.pd b/examples/run-voicetest.pd new file mode 100644 index 0000000..199988e --- /dev/null +++ b/examples/run-voicetest.pd @@ -0,0 +1,22 @@ +#N canvas 466 360 450 300 10; +#X declare -path ..; +#X obj 97 147 voicepoly 5 voicetest; +#X obj 109 228 dac~; +#X obj 225 108 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X floatatom 237 130 5 0 0 0 - - -; +#X msg 96 98 bang; +#X obj 337 16 pddp/dsp; +#X obj 220 170 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X text 48 261 three outlets are needed: 2 audio and one message outlet +that is banged when the voice is finished.; +#X text 23 57 two inlets are needed: the first for voice-managed messages +\, and the second for messages that are send to all instances; +#X obj 318 45 declare -path ..; +#X connect 0 0 1 0; +#X connect 0 1 1 1; +#X connect 0 2 6 0; +#X connect 2 0 0 1; +#X connect 2 0 3 0; +#X connect 4 0 0 0; diff --git a/examples/test.wav b/examples/test.wav new file mode 100644 index 0000000..eac1589 Binary files /dev/null and b/examples/test.wav differ diff --git a/examples/voicetest.pd b/examples/voicetest.pd new file mode 100644 index 0000000..d189cef --- /dev/null +++ b/examples/voicetest.pd @@ -0,0 +1,39 @@ +#N canvas 210 166 495 383 10; +#X obj 115 24 inlet; +#X obj 122 353 outlet~; +#X obj 305 24 inlet; +#X obj 202 353 outlet~; +#X obj 250 169 osc~; +#X obj 122 227 *~; +#X obj 202 227 *~; +#X obj 122 170 tabplay~ \$0-sample; +#X obj 323 88 table \$0-sample; +#X obj 171 103 print \$1; +#X obj 51 141 loadbang; +#X msg 61 162 1; +#X obj 137 205 -~; +#X obj -12 322 soundfiler; +#X obj -12 272 symbol \$0-sample; +#X msg -12 297 read -resize test.wav \$1; +#X msg -36 217 bang; +#X msg 143 145 bang; +#X obj 310 352 outlet; +#X text 357 352 bang when done; +#X connect 0 0 7 0; +#X connect 2 0 9 0; +#X connect 2 0 4 0; +#X connect 4 0 12 1; +#X connect 4 0 6 1; +#X connect 5 0 1 0; +#X connect 6 0 3 0; +#X connect 7 0 5 0; +#X connect 7 0 6 0; +#X connect 7 1 18 0; +#X connect 10 0 11 0; +#X connect 10 0 14 0; +#X connect 11 0 12 0; +#X connect 12 0 5 1; +#X connect 14 0 15 0; +#X connect 15 0 13 0; +#X connect 16 0 14 0; +#X connect 17 0 7 0; diff --git a/test.wav b/test.wav deleted file mode 100644 index eac1589..0000000 Binary files a/test.wav and /dev/null differ diff --git a/voicepoly-help.pd b/voicepoly-help.pd deleted file mode 100644 index 84055c9..0000000 --- a/voicepoly-help.pd +++ /dev/null @@ -1,16 +0,0 @@ -#N canvas 522 304 450 300 10; -#X obj 97 97 voicepoly 5 voicetest; -#X obj 109 178 dac~; -#X obj 225 58 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 7500 1; -#X floatatom 237 80 5 0 0 0 - - -; -#X msg 96 48 bang; -#X obj 305 22 pddp/dsp; -#X obj 220 120 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 --1 -1; -#X connect 0 0 1 0; -#X connect 0 1 1 1; -#X connect 0 2 6 0; -#X connect 2 0 0 1; -#X connect 2 0 3 0; -#X connect 4 0 0 0; diff --git a/voicepoly.pd b/voicepoly.pd index ba7276d..49f8241 100644 --- a/voicepoly.pd +++ b/voicepoly.pd @@ -1,4 +1,4 @@ -#N canvas 630 256 761 526 10; +#N canvas 133 84 761 526 10; #X obj 26 8 inlet; #X obj 256 209 outlet; #X obj 175 388 until; @@ -74,7 +74,6 @@ obj 380 560 throw~ \$2-audioR \; \$1 obj 500 560 send \$2-voicemsg #X obj 26 208 outlet~; #N canvas 177 52 366 386 communications 0; #X obj 29 10 inlet; -#X obj 224 59 symbol \$2; #N canvas 0 22 535 282 last-two 0; #X obj 40 92 cnv 15 150 80 empty empty empty 20 12 0 14 -233017 -66577 0; @@ -105,23 +104,39 @@ obj 380 560 throw~ \$2-audioR \; \$1 obj 500 560 send \$2-voicemsg #X obj 29 37 trigger anything anything anything bang bang; #X msg 44 162 \; \$3 obj 150 \$2 voicepolywrap \$4 \$1 \$5 \$6 \$7 \$8 \$9 \;; -#X connect 0 0 13 0; -#X connect 1 0 8 3; -#X connect 2 0 3 0; -#X connect 3 0 12 0; -#X connect 4 0 14 0; -#X connect 5 0 8 4; -#X connect 6 0 8 2; -#X connect 7 0 3 1; -#X connect 8 0 4 0; -#X connect 9 0 10 0; -#X connect 10 0 8 1; -#X connect 11 0 2 0; -#X connect 13 0 11 0; -#X connect 13 1 8 0; -#X connect 13 2 9 0; -#X connect 13 3 1 0; -#X connect 13 4 5 0; +#N canvas 183 272 316 307 expandpath 0; +#X obj 59 16 inlet; +#X obj 55 271 outlet; +#X obj 59 43 trigger bang bang; +#X obj 59 98 list append; +#X obj 58 153 zexy/list2symbol /; +#X obj 158 66 symbol \$2; +#X obj 59 67 ggee/getdir 3; +#X connect 0 0 2 0; +#X connect 2 0 6 0; +#X connect 2 1 5 0; +#X connect 3 0 4 0; +#X connect 4 0 1 0; +#X connect 5 0 3 1; +#X connect 6 0 3 0; +#X restore 194 61 pd expandpath; +#X connect 0 0 12 0; +#X connect 1 0 2 0; +#X connect 2 0 11 0; +#X connect 3 0 13 0; +#X connect 4 0 7 4; +#X connect 5 0 7 2; +#X connect 6 0 2 1; +#X connect 7 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 7 1; +#X connect 10 0 1 0; +#X connect 12 0 10 0; +#X connect 12 1 7 0; +#X connect 12 2 8 0; +#X connect 12 3 14 0; +#X connect 12 4 4 0; +#X connect 14 0 7 3; #X restore 175 482 pd communications connections; #N canvas 875 553 450 300 connect 0; #X obj 89 17 inlet; @@ -142,16 +157,21 @@ obj 380 560 throw~ \$2-audioR \; \$1 obj 500 560 send \$2-voicemsg #X text 122 97 <-- open this subpatch to see the instances; #X obj 48 310 trigger anything anything bang; #N canvas 100 24 601 588 \$0-voicepoly 0; -#X obj 10 10 receive 1014-in1; -#X obj 400 10 receive 1014-in2; -#X obj 10 560 throw~ 1014-audio; -#X obj 380 560 send 1014-message; -#X obj 500 560 send 1014-nqp; -#X obj 150 30 voicepolywrap itest 0 5 0 0 0 0; -#X obj 150 49 voicepolywrap itest 1 5 0 0 0 0; -#X obj 150 68 voicepolywrap itest 2 5 0 0 0 0; -#X obj 150 87 voicepolywrap itest 3 5 0 0 0 0; -#X obj 150 106 voicepolywrap itest 4 5 0 0 0 0; +#X obj 10 10 receive 1081-in1; +#X obj 400 10 receive 1081-in2; +#X obj 10 560 throw~ 1081-audioL; +#X obj 380 560 throw~ 1081-audioR; +#X obj 500 560 send 1081-voicemsg; +#X obj 150 30 voicepolywrap /Users/hans/code/pure-data/trunk/externals/manypoly/examples/../voicetest +0 5 0 0 0 0; +#X obj 150 49 voicepolywrap /Users/hans/code/pure-data/trunk/externals/manypoly/examples/../voicetest +1 5 0 0 0 0; +#X obj 150 68 voicepolywrap /Users/hans/code/pure-data/trunk/externals/manypoly/examples/../voicetest +2 5 0 0 0 0; +#X obj 150 87 voicepolywrap /Users/hans/code/pure-data/trunk/externals/manypoly/examples/../voicetest +3 5 0 0 0 0; +#X obj 150 106 voicepolywrap /Users/hans/code/pure-data/trunk/externals/manypoly/examples/../voicetest +4 5 0 0 0 0; #X connect 0 0 5 0; #X connect 1 0 5 1; #X connect 1 0 6 1; diff --git a/voicetest.pd b/voicetest.pd deleted file mode 100644 index d189cef..0000000 --- a/voicetest.pd +++ /dev/null @@ -1,39 +0,0 @@ -#N canvas 210 166 495 383 10; -#X obj 115 24 inlet; -#X obj 122 353 outlet~; -#X obj 305 24 inlet; -#X obj 202 353 outlet~; -#X obj 250 169 osc~; -#X obj 122 227 *~; -#X obj 202 227 *~; -#X obj 122 170 tabplay~ \$0-sample; -#X obj 323 88 table \$0-sample; -#X obj 171 103 print \$1; -#X obj 51 141 loadbang; -#X msg 61 162 1; -#X obj 137 205 -~; -#X obj -12 322 soundfiler; -#X obj -12 272 symbol \$0-sample; -#X msg -12 297 read -resize test.wav \$1; -#X msg -36 217 bang; -#X msg 143 145 bang; -#X obj 310 352 outlet; -#X text 357 352 bang when done; -#X connect 0 0 7 0; -#X connect 2 0 9 0; -#X connect 2 0 4 0; -#X connect 4 0 12 1; -#X connect 4 0 6 1; -#X connect 5 0 1 0; -#X connect 6 0 3 0; -#X connect 7 0 5 0; -#X connect 7 0 6 0; -#X connect 7 1 18 0; -#X connect 10 0 11 0; -#X connect 10 0 14 0; -#X connect 11 0 12 0; -#X connect 12 0 5 1; -#X connect 14 0 15 0; -#X connect 15 0 13 0; -#X connect 16 0 14 0; -#X connect 17 0 7 0; -- cgit v1.2.1