#N canvas 267 47 910 668 12;
#N canvas 0 0 450 300 (subpatch) 0;
#X array table20 44103 float 0;
#X coords 0 1.02 44100 -1.02 200 130 1;
#X restore 603 20 graph;
#X obj 474 355 loadbang;
#X obj 165 475 hip~ 5;
#X floatatom 112 65 0 0 0 0 - - -;
#X floatatom 180 128 0 0 0 0 - - -;
#X obj 180 153 * 441;
#X obj 112 298 +~ 1;
#X obj 112 89 phasor~ 0;
#X msg 225 343 bang;
#X obj 444 227 adc~ 1;
#X obj 444 251 hip~ 5;
#X msg 459 279 bang;
#X text 525 382 v-- re-read the original sample;
#N canvas 0 0 450 300 (subpatch) 0;
#X array graph20 44100 float 0;
#X coords 0 44100 44100 0 200 130 1;
#X restore 605 189 graph;
#X obj 165 441 *~;
#X obj 200 283 line~;
#X obj 242 194 * 441;
#X floatatom 242 170 0 0 0 0 - - -;
#X obj 242 220 pack 0 100;
#X obj 183 334 +~;
#X obj 200 307 samphold~;
#X obj 129 245 samphold~;
#X obj 112 271 *~;
#X text 615 325 ----- 1 second ------;
#X text 603 154 ---- 44103 samples ---;
#X obj 486 426 soundfiler;
#X text 44 18 SLIDING STABLE LOOPS WITHOUT DOPPLER SHIFT;
#X msg 474 457 \; graph20 ylabel 48000 0 44100;
#X obj 145 528 output~;
#X obj 49 257 -~ 0.5;
#X obj 49 281 *~ 0.5;
#X obj 49 304 cos~;
#X obj 225 373 tabwrite~ graph20;
#X obj 183 409 tabread4~ table20;
#X obj 444 306 tabwrite~ table20;
#X msg 486 402 read ../sound/voice.wav table20;
#X text 290 520 This example differs from the previous one in having
samphold~ objects which allow the chunk size and especially the read
point to change only at points where the phase wraps around. This removes
signal discontinuities (when the chunk size changes) and doppler shift
when the read point is changing., f 67;
#X text 617 614 updated for Pd version 0.37;
#X text 265 342 <= graph table index;
#X text 499 279 <= record;
#X text 273 169 <= read point in 100ths of a second;
#X text 211 127 <= chunk size (100ths of a second);
#X text 151 64 <= frequency (Hz.);
#X connect 1 0 27 0;
#X connect 1 0 35 0;
#X connect 2 0 28 0;
#X connect 2 0 28 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 21 0;
#X connect 6 0 19 0;
#X connect 7 0 20 1;
#X connect 7 0 21 1;
#X connect 7 0 22 0;
#X connect 7 0 29 0;
#X connect 8 0 32 0;
#X connect 9 0 10 0;
#X connect 10 0 34 0;
#X connect 11 0 34 0;
#X connect 14 0 2 0;
#X connect 15 0 20 0;
#X connect 16 0 18 0;
#X connect 17 0 16 0;
#X connect 18 0 15 0;
#X connect 19 0 32 0;
#X connect 19 0 33 0;
#X connect 20 0 19 1;
#X connect 21 0 22 1;
#X connect 22 0 6 0;
#X connect 29 0 30 0;
#X connect 30 0 31 0;
#X connect 31 0 14 0;
#X connect 33 0 14 1;
#X connect 35 0 25 0;
