#N canvas 374 52 893 649 12;
#X declare -stdpath ./;
#N canvas 0 0 450 300 (subpatch) 0;
#X array table20 44103 float 2;
#X coords 0 1.02 44103 -1.02 200 130 1;
#X restore 581 37 graph;
#X obj 474 355 loadbang;
#X obj 165 475 hip~ 5;
#X floatatom 112 65 5 0 0 0 - - - 0;
#X floatatom 180 128 4 0 0 0 - - - 0;
#X obj 180 153 * 441;
#X obj 112 298 +~ 1;
#X obj 112 89 phasor~ 0;
#X obj 420 228 adc~ 1;
#X obj 420 252 hip~ 5;
#X text 525 382 v-- re-read the original sample;
#N canvas 0 0 450 300 (subpatch) 0;
#X array graph20 44100 float 2;
#X coords 0 44100 44100 0 200 130 1;
#X restore 583 206 graph;
#X obj 165 441 *~;
#X obj 200 283 line~;
#X obj 242 194 * 441;
#X floatatom 242 170 4 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 593 342 ----- 1 second ------;
#X text 581 171 ---- 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 165 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 420 307 tabwrite~ table20;
#X msg 486 402 read ../sound/voice.wav table20;
#X text 310 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 640 606 updated for Pd version 0.37;
#X text 275 169 <= read point in 100ths of a second;
#X text 217 127 <= chunk size (100ths of a second);
#X text 155 64 <= frequency (Hz.);
#X obj 397 58 declare -stdpath ./;
#X text 250 343 <-- graph table index;
#X text 459 279 <-- record;
#X obj 435 280 bng 19 250 50 0 empty empty empty 17 7 0 10 #dfdfdf #000000 #000000;
#X obj 225 343 bng 19 250 50 0 empty empty empty 17 7 0 10 #dfdfdf #000000 #000000;
#X connect 1 0 25 0;
#X connect 1 0 33 0;
#X connect 2 0 26 0;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 19 0;
#X connect 6 0 17 0;
#X connect 7 0 18 1;
#X connect 7 0 19 1;
#X connect 7 0 20 0;
#X connect 7 0 27 0;
#X connect 8 0 9 0;
#X connect 9 0 32 0;
#X connect 12 0 2 0;
#X connect 13 0 18 0;
#X connect 14 0 16 0;
#X connect 15 0 14 0;
#X connect 16 0 13 0;
#X connect 17 0 30 0;
#X connect 17 0 31 0;
#X connect 18 0 17 1;
#X connect 19 0 20 1;
#X connect 20 0 6 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 12 0;
#X connect 31 0 12 1;
#X connect 33 0 23 0;
#X connect 42 0 32 0;
#X connect 43 0 30 0;
