From 4d84d14ac1aa13958eaa2971b03f7f929a519105 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?IOhannes=20m=20zm=C3=B6lnig?= Date: Fri, 8 Feb 2008 13:00:32 +0000 Subject: reorganized svn path=/trunk/; revision=9400 --- .../doc/3.audio.examples/B10.sampler.scratch.pd | 83 ++++++++++++++++++++++ 1 file changed, 83 insertions(+) create mode 100644 desiredata/doc/3.audio.examples/B10.sampler.scratch.pd (limited to 'desiredata/doc/3.audio.examples/B10.sampler.scratch.pd') diff --git a/desiredata/doc/3.audio.examples/B10.sampler.scratch.pd b/desiredata/doc/3.audio.examples/B10.sampler.scratch.pd new file mode 100644 index 00000000..38c67b76 --- /dev/null +++ b/desiredata/doc/3.audio.examples/B10.sampler.scratch.pd @@ -0,0 +1,83 @@ +#N canvas 53 232 936 654 12; +#N canvas 0 0 450 300 graph1 0; +#X array table19 44103 float 0; +#X coords 0 1.02 44100 -1.02 200 130 1; +#X restore 680 8 graph; +#X obj 40 382 hip~ 5; +#X floatatom 99 51 0 0 0 0 - - -; +#X text 146 50 <-- frequency (Hz.); +#X floatatom 129 106 0 0 0 0 - - -; +#X obj 129 135 * 441; +#X obj 100 158 *~ 0; +#X obj 100 181 +~ 1; +#X msg 194 281 bang; +#X text 164 106 <-- chunk size (100ths of a second); +#X obj 591 369 adc~ 1; +#X obj 591 395 hip~ 5; +#X msg 609 423 bang; +#N canvas 0 0 450 300 graph2 0; +#X array graph19 44100 float 0; +#X coords 0 44100 44100 0 200 130 1; +#X restore 681 196 graph; +#X obj 40 356 *~; +#X obj 123 276 line~; +#X obj 123 228 * 441; +#X floatatom 123 205 0 0 0 0 - - -; +#X obj 123 252 pack 0 100; +#X obj 101 310 +~; +#X text 34 474 In this patch we can loop in any "window" of the input +sample. The "read point" (0-100) gives the starting point of the window +and "chunk" is its size (both in 100ths of a second.) Try \, for example +\, frequency 4 \, sharpness 10 \, chunk size 25 \, and vary the read +point from -25 to 100 \, listening to the result.; +#X text 242 281 <-- graph table index; +#X text 684 337 ----- 1 second ------; +#X obj 595 490 loadbang; +#X text 631 514 v-- re-read the original sample; +#X obj 605 559 soundfiler; +#X text 678 147 ---- 44103 samples ---; +#X obj 591 455 tabwrite~ table19; +#X msg 605 535 read ../sound/voice.wav table19; +#X text 688 628 updated for Pd version 0.37; +#X msg 595 585 \; graph19 ylabel 48000 0 44100; +#X obj 39 103 -~ 0.5; +#X obj 99 76 phasor~; +#X obj 39 127 *~ 0.5; +#X obj 39 150 cos~; +#X text 157 206 <-- read point (100ths of a second); +#X obj 41 406 output~; +#X text 651 422 <-- record; +#X text 36 13 ENVELOPING THE LOOPING SAMPLER; +#X text 37 574 You should hear some doppler shift as you change the +read point. To see why \, click on "graph table index" and quickly +start changing the read point--- you should see entertaining pictures +in "table-index". The next patch shows how to prevent this if you wish +to.; +#X obj 100 336 tabread4~ table19; +#X obj 194 307 tabwrite~ graph19; +#X connect 1 0 36 0; +#X connect 2 0 32 0; +#X connect 4 0 5 0; +#X connect 5 0 6 1; +#X connect 6 0 7 0; +#X connect 7 0 19 0; +#X connect 8 0 41 0; +#X connect 10 0 11 0; +#X connect 11 0 27 0; +#X connect 12 0 27 0; +#X connect 14 0 1 0; +#X connect 15 0 19 1; +#X connect 16 0 18 0; +#X connect 17 0 16 0; +#X connect 18 0 15 0; +#X connect 19 0 40 0; +#X connect 19 0 41 0; +#X connect 23 0 30 0; +#X connect 23 0 28 0; +#X connect 28 0 25 0; +#X connect 31 0 33 0; +#X connect 32 0 6 0; +#X connect 32 0 31 0; +#X connect 33 0 34 0; +#X connect 34 0 14 0; +#X connect 40 0 14 1; -- cgit v1.2.1