#N canvas 652 23 489 841 12;
#X declare -stdpath ./;
#X floatatom 185 527 0 0 0 0 - - - 0;
#X floatatom 185 453 0 0 0 0 - - - 0;
#X text 347 210 START;
#X floatatom 202 310 0 0 0 0 - - - 0;
#X obj 202 287 r incr;
#X obj 184 262 metro 50;
#X floatatom 184 380 5 0 0 0 - - - 0;
#X obj 184 401 s phase;
#X obj 184 357 +;
#X obj 185 476 s dropoff+;
#X obj 185 629 s interval+;
#X floatatom 185 606 0 0 0 0 - - - 0;
#X obj 185 550 s pitch+;
#X obj 185 430 r dropoff;
#X obj 185 504 r pitch;
#X obj 185 583 r interval;
#X obj 184 219 r metro;
#X obj 241 352 f;
#X obj 24 213 shepvoice 0;
#X floatatom 93 708 0 0 0 0 - - - 0;
#X obj 93 685 r rev;
#X obj 148 685 r revtime;
#X floatatom 148 708 0 0 0 0 - - - 0;
#X obj 241 375 mod 10000;
#X obj 184 334 f;
#X obj 85 736 rev2~;
#X obj 24 764 output~;
#X obj 184 242 tgl 15 0 empty empty empty 0 -6 0 8 #fcfcfc #000000
#000000 0 1;
#X msg 331 227 \; dropoff 10 \; pitch 60 \; interval 120 \; metro 1
\; rev 84 \; revtime 87 \; incr -2 \; pd dsp 1;
#X text 28 7 SHEPARD TONE;
#X text 250 789 updated for Pd version 0.37;
#X obj 24 235 shepvoice 500;
#X obj 24 259 shepvoice 1000;
#X obj 24 282 shepvoice 1500;
#X obj 24 305 shepvoice 2000;
#X obj 24 328 shepvoice 2500;
#X obj 24 351 shepvoice 3000;
#X obj 24 374 shepvoice 3500;
#X obj 24 397 shepvoice 4000;
#X obj 24 420 shepvoice 4500;
#X obj 24 443 shepvoice 5000;
#X obj 24 466 shepvoice 5500;
#X obj 24 489 shepvoice 6000;
#X obj 24 512 shepvoice 6500;
#X obj 24 535 shepvoice 7000;
#X obj 24 558 shepvoice 7500;
#X obj 24 581 shepvoice 8000;
#X obj 24 604 shepvoice 8500;
#X obj 24 627 shepvoice 9000;
#X obj 24 650 shepvoice 9500;
#X text 26 31 This patch is a bank of 20 sinusoids \, arranged so that
their frequencies sweep upward or downward in parallel \, and their
amplitudes fade in and out so that each one is quiet when it wraps
around from one end to the other. The overall "phase" computed here
is added to each voice's relative phase (its creation argument). The
"incr" parameter controls how fast the phase changes \, "dropoff" the
slope at which the amplitudes fall off at the ends \, "pitch" the center
pitch of the cluster \, "interval" the number of (tenths of halftones)
between successive voices \, and "rev" and "revtime" the reverberator
at bottom.;
#X obj 316 7 declare -stdpath ./;
#X connect 0 0 12 0;
#X connect 1 0 9 0;
#X connect 3 0 24 1;
#X connect 4 0 3 0;
#X connect 5 0 24 0;
#X connect 6 0 7 0;
#X connect 8 0 17 0;
#X connect 8 0 6 0;
#X connect 11 0 10 0;
#X connect 13 0 1 0;
#X connect 14 0 0 0;
#X connect 15 0 11 0;
#X connect 16 0 27 0;
#X connect 17 0 23 0;
#X connect 18 0 31 0;
#X connect 19 0 25 1;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 22 0 25 2;
#X connect 23 0 8 1;
#X connect 24 0 8 0;
#X connect 25 0 26 0;
#X connect 25 1 26 1;
#X connect 27 0 5 0;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 37 0;
#X connect 37 0 38 0;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 42 0;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 44 0 45 0;
#X connect 45 0 46 0;
#X connect 46 0 47 0;
#X connect 47 0 48 0;
#X connect 48 0 49 0;
#X connect 49 0 25 0;
#X connect 49 0 26 0;
#X connect 49 0 26 1;
