From cee98b59f1adf987b6dcbc771299bb9d6d75b843 Mon Sep 17 00:00:00 2001 From: Guenter Geiger Date: Thu, 8 Aug 2002 16:42:32 +0000 Subject: added missing tildes svn path=/trunk/; revision=81 --- pd/extra/loop~/test-loop~.pd | 56 ++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 56 insertions(+) create mode 100644 pd/extra/loop~/test-loop~.pd (limited to 'pd/extra/loop~/test-loop~.pd') diff --git a/pd/extra/loop~/test-loop~.pd b/pd/extra/loop~/test-loop~.pd new file mode 100644 index 00000000..9f454109 --- /dev/null +++ b/pd/extra/loop~/test-loop~.pd @@ -0,0 +1,56 @@ +#N canvas 33 0 498 586 12; +#X floatatom 52 262; +#X obj 261 346 print~; +#X msg 57 370 bang; +#X msg 274 313 bang; +#X obj 52 306 loop~; +#X floatatom 102 245; +#X graph graph1 0 0 44100 10 120 186 320 36; +#X array array1 44100 float; +#X pop; +#X msg 43 204 \; array1 resize 44100; +#X obj 25 401 tabwrite~ array1; +#X msg 180 376 bang; +#X obj 148 407 tabwrite~ array1; +#X msg 194 261 bang; +#X obj 204 347 print~; +#X msg 217 314 bang; +#X graph graph1 0 -1 150000 1 273 543 473 393; +#X array array2 150000 float; +#X pop; +#X msg 326 274 \; array2 resize 150000; +#X obj 235 234 soundfiler; +#X msg 215 199 read ../../../ham/Hamburger.wav array2; +#X obj 103 529 tabread4~ array2; +#X obj 64 496 *~; +#X obj 107 581 dac~; +#X obj 105 552 hip~ 5; +#X obj 123 482 samphold~; +#X obj 102 506 +~; +#X floatatom 106 430; +#X obj 108 453 *~ 1000; +#X msg 222 169 read ../../../ham/Wrong.wav array2; +#X connect 0 0 4 0; +#X connect 2 0 8 0; +#X connect 3 0 1 0; +#X connect 4 0 12 0; +#X connect 4 0 19 0; +#X connect 4 0 8 0; +#X connect 4 0 22 1; +#X connect 4 1 10 0; +#X connect 4 1 1 0; +#X connect 4 1 19 1; +#X connect 5 0 4 1; +#X connect 9 0 10 0; +#X connect 11 0 4 0; +#X connect 13 0 12 0; +#X connect 17 0 16 0; +#X connect 18 0 21 0; +#X connect 19 0 23 0; +#X connect 21 0 20 0; +#X connect 21 0 20 1; +#X connect 22 0 23 1; +#X connect 23 0 18 0; +#X connect 24 0 25 0; +#X connect 25 0 22 0; +#X connect 26 0 16 0; -- cgit v1.2.1