#N canvas 300 369 721 432 10;
#N canvas 521 364 759 580 guts 0;
#X obj 286 395 *~;
#X obj 383 272 line~;
#X floatatom 340 86 0 0 0 0 - - -;
#X text 68 9 PITCH SHIFTER;
#X obj 383 246 pack 0 200;
#X obj 223 139 exp;
#X obj 224 238 /;
#X obj 276 183 * 0.001;
#X obj 518 361 line~;
#X obj 518 336 pack 0 200;
#X floatatom 518 285 0 0 0 0 - - -;
#X obj 286 421 +~;
#X obj 223 447 cos~;
#X obj 223 474 *~;
#X obj 291 522 +~;
#X obj 382 367 wrap~;
#X obj 445 400 *~;
#X obj 445 433 +~;
#X obj 382 460 cos~;
#X obj 382 481 *~;
#X obj 423 38 loadbang;
#X obj 277 204 t b f;
#X obj 382 346 +~ 0.5;
#X obj 223 395 -~ 0.5;
#X obj 223 421 *~ 0.5;
#X obj 382 399 -~ 0.5;
#X obj 382 432 *~ 0.5;
#X obj 223 181 - 1;
#X obj 230 115 * 0.05776;
#X obj 224 201 * -1;
#X text 262 141 speed;
#X text 262 148 change;
#X text 377 83 <--window (msec);
#X text 259 231 tape head;
#X obj 223 315 phasor~;
#X obj 518 312 max 1.5;
#X text 521 45 delay;
#X text 518 63 (msec);
#X obj 340 113 max 1;
#X text 260 244 rotation freq;
#X obj 230 59 inlet;
#X text 228 41 transposition;
#X obj 340 60 inlet;
#X text 337 42 windowsize;
#X obj 37 89 delwrite~ \$0-del 5000;
#X obj 286 447 vd~ \$0-del;
#X obj 445 462 vd~ \$0-del;
#X obj 291 546 outlet~;
#X obj 37 58 inlet~;
#X obj 518 86 inlet;
#X msg 423 60 100;
#X msg 554 199 1.5;
#X obj 223 294 line~;
#X msg 224 275 \$1 30;
#X connect 0 0 11 0;
#X connect 1 0 0 1;
#X connect 1 0 16 1;
#X connect 2 0 38 0;
#X connect 4 0 1 0;
#X connect 5 0 27 0;
#X connect 6 0 53 0;
#X connect 7 0 21 0;
#X connect 8 0 11 1;
#X connect 8 0 17 1;
#X connect 9 0 8 0;
#X connect 10 0 35 0;
#X connect 11 0 45 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 47 0;
#X connect 15 0 16 0;
#X connect 15 0 25 0;
#X connect 16 0 17 0;
#X connect 17 0 46 0;
#X connect 18 0 19 0;
#X connect 19 0 14 1;
#X connect 20 0 50 0;
#X connect 20 0 51 0;
#X connect 21 0 6 0;
#X connect 21 1 6 1;
#X connect 22 0 15 0;
#X connect 23 0 24 0;
#X connect 24 0 12 0;
#X connect 25 0 26 0;
#X connect 26 0 18 0;
#X connect 27 0 29 0;
#X connect 28 0 5 0;
#X connect 29 0 6 0;
#X connect 34 0 0 0;
#X connect 34 0 23 0;
#X connect 34 0 22 0;
#X connect 35 0 9 0;
#X connect 38 0 7 0;
#X connect 38 0 4 0;
#X connect 40 0 28 0;
#X connect 42 0 2 0;
#X connect 45 0 13 1;
#X connect 46 0 19 1;
#X connect 48 0 44 0;
#X connect 49 0 10 0;
#X connect 50 0 2 0;
#X connect 51 0 10 0;
#X connect 52 0 34 0;
#X connect 53 0 52 0;
#X restore 78 148 pd guts;
#X obj 78 46 inlet~;
#X obj 79 201 outlet~;
#X obj 230 45 inlet;
#X obj 276 45 u_loader e_pitchshift-\$1 \$0;
#X obj 231 78 u_dispatch \$0 pitch;
#X obj 232 104 u_dispatch \$0 delay;
#X obj 232 129 u_dispatch \$0 size;
#X obj 94 69 r \$0-pitch;
#X obj 124 120 r \$0-delay;
#X obj 108 94 r \$0-size;
#N canvas 228 198 627 317 LICENSE-BSD 0;
#X text 121 56 This software is copyrighted by Miller Puckette \, Reality
Jockey Ltd. and others. The terms (the "Standard Improved BSD License")
apply to all files associated with the software unless explicitly disclaimed
in individual files.;
#X text 123 148 See the file LICENSE.txt for the full license text.
;
#X restore 523 40 pd LICENSE-BSD;
#X connect 0 0 2 0;
#X connect 1 0 0 0;
#X connect 3 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 8 0 0 1;
#X connect 9 0 0 3;
#X connect 10 0 0 2;
