From 57045df5fe3ec557e57dc7434ac1a07b5521bffc Mon Sep 17 00:00:00 2001 From: Guenter Geiger Date: Mon, 29 Jul 2002 17:06:19 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r58, which included commits to RCS files with non-trunk default branches. svn path=/trunk/; revision=59 --- pd/doc/3.audio.examples/sampvoice.pd | 105 +++++++++++++++++++++++++++++++++++ 1 file changed, 105 insertions(+) create mode 100644 pd/doc/3.audio.examples/sampvoice.pd (limited to 'pd/doc/3.audio.examples/sampvoice.pd') diff --git a/pd/doc/3.audio.examples/sampvoice.pd b/pd/doc/3.audio.examples/sampvoice.pd new file mode 100644 index 00000000..dafa3c67 --- /dev/null +++ b/pd/doc/3.audio.examples/sampvoice.pd @@ -0,0 +1,105 @@ +#N canvas 231 67 574 676 12; +#X obj 95 396 line~; +#X obj 301 396 line~; +#X obj 285 476 *~; +#X obj 317 607 outlet~; +#X obj 144 396 makefilename sample%d; +#X msg 144 419 set \$1; +#X obj 144 442 tabread4~ sample1; +#X obj 349 419 dbtorms; +#X obj 349 396 unpack; +#X obj 349 442 sqrt; +#X obj 349 465 sqrt; +#X obj 349 488 line~; +#X obj 333 559 *~; +#X obj 349 511 *~; +#X obj 349 534 *~; +#X msg 201 49 bang; +#X obj 201 72 delay 5; +#X obj 289 95 unpack 0 0 0 0 0 0 0; +#X obj 421 184 f; +#X obj 367 161 f; +#X obj 309 161 f; +#X obj 278 161 f; +#X obj 252 161 f; +#X obj 173 161 f; +#X obj 173 184 mtof; +#X obj 173 207 / 261.62; +#X obj 173 230 * 4.41e+08; +#X obj 173 253 +; +#X obj 394 161 delay; +#X obj 252 303 pack 0 0 0 0 0; +#X obj 201 95 t b b b; +#X obj 309 207 + 1; +#X obj 309 184 * 44.1; +#X msg 85 337 0 5; +#X msg 286 337 1 5; +#X msg 319 337 0 \, \$1 \$2; +#X msg 158 337 \$3 \, \$4 1e+07; +#X msg 253 337 \$5; +#X msg 393 337 0 \$1; +#X obj 289 72 inlet; +#X obj 61 565 inlet~; +#X obj 317 583 +~; +#X text 82 21 This is an abstraction used by a polyphonic sampler (example 24.); +#X connect 0 0 6 0; +#X connect 1 0 2 1; +#X connect 2 0 12 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 2 0; +#X connect 7 0 9 0; +#X connect 8 0 7 0; +#X connect 8 1 11 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 13 0; +#X connect 11 0 13 1; +#X connect 12 0 41 1; +#X connect 13 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 12 1; +#X connect 15 0 16 0; +#X connect 15 0 33 0; +#X connect 16 0 30 0; +#X connect 17 0 23 1; +#X connect 17 0 15 0; +#X connect 17 1 22 1; +#X connect 17 2 28 1; +#X connect 17 3 21 1; +#X connect 17 4 20 1; +#X connect 17 5 19 1; +#X connect 17 6 18 1; +#X connect 18 0 38 0; +#X connect 19 0 29 1; +#X connect 20 0 32 0; +#X connect 21 0 29 4; +#X connect 22 0 29 0; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 26 0 27 0; +#X connect 27 0 29 3; +#X connect 28 0 18 0; +#X connect 29 0 34 0; +#X connect 29 0 35 0; +#X connect 29 0 36 0; +#X connect 29 0 37 0; +#X connect 30 0 22 0; +#X connect 30 1 23 0; +#X connect 30 2 19 0; +#X connect 30 2 20 0; +#X connect 30 2 21 0; +#X connect 30 2 28 0; +#X connect 31 0 29 2; +#X connect 31 0 27 1; +#X connect 32 0 31 0; +#X connect 33 0 1 0; +#X connect 34 0 1 0; +#X connect 35 0 8 0; +#X connect 36 0 0 0; +#X connect 37 0 4 0; +#X connect 38 0 8 0; +#X connect 39 0 17 0; +#X connect 40 0 41 0; +#X connect 41 0 3 0; -- cgit v1.2.1