#N struct unit_circle float x float y;
#N canvas 0 19 683 520 10;
#X scalar unit_circle 103 387 \;;
#X obj 310 166 * 6.28;
#X obj 310 212 sin;
#X obj 310 251 * 100;
#X obj 364 212 cos;
#X obj 310 187 t a a;
#X obj 310 146 + 0.25;
#X obj 310 94 line 0 40;
#X obj 310 5 bng 21 250 50 0 empty empty Go! 28 10 0 10 -4034 -1 -1
;
#X obj 52 101 loadbang;
#N canvas 274 34 770 578 (subpatch) 0;
#X obj 117 -58 draw path m -120 0 l 120 0 m 0 120 l 0 -240 0 20 150
0 m -150 100 l 150 0 m -150 100 l 150 0 m 0 20 l 0 -240 0 20 150 0
m -150 100 l 150 0 m -150 100 l 150 0 m 0 20 l 0 -240 0 20 150 0 m
-150 100 l 150 0 m -150 100 l 150 0 m 0 20 l 0 -240 0 20 150 0 m -150
100 l 150 0 m -150 100 l 150 0 m 0 20 l 0 -240 0 20 150 0 m -150 100
l 150 0 m -150 100 l 150 0 m 0 20 l 0 -240 0 20 20 0 m -20 100 l 20
0 m -20 100 l 20 0;
#X obj 117 -140 draw circle 0 0 100;
#X msg 117 -174 fill black \, fill-opacity 0.1 \, stroke blue \, stroke-opacity
0.6 \, stroke-width 4;
#X obj 117 -195 loadbang;
#X obj 117 -100 loadbang;
#X msg 166 154 stroke-width 4 \, stroke blue \, stroke-opacity 0.6
\, stroke-linecap 1;
#X obj 166 133 loadbang;
#X msg 116 92 x2 \$1;
#X msg 174 93 y2 \$1;
#X obj 116 190 draw line 0 0 100 0;
#X obj 116 67 r arc-x;
#X obj 174 67 r arc-y;
#X obj 507 329 draw line 0 0 0 0;
#X msg 586 248 y1 \$1;
#X msg 528 248 x1 \$1;
#X msg 594 297 x2 \$1 \, y2 \$2;
#X obj 586 223 r arc-y;
#X obj 528 223 r arc-x;
#X obj 594 274 r sine-xy;
#X msg 184 258 stroke-width 4 \, stroke blue \, stroke-opacity 0.6
\, stroke-linecap 1;
#X obj 184 237 loadbang;
#X obj 184 292 draw line 150 0 0 0;
#X msg 116 260 x2 \$1;
#X obj 116 237 r sine-xy;
#X obj 504 39 list prepend points;
#X obj 504 17 r sine-points;
#X obj 505 135 draw polyline;
#X obj 525 89 loadbang;
#X obj 507 175 loadbang;
#X msg 507 196 stroke-width 2 \, stroke orange;
#X obj 504 61 list trim;
#X text 511 -41 <- grid;
#X text 602 135 <- sine wave;
#X text 245 189 <- radius line;
#X text 313 292 <- progress line;
#X text 624 329 <- guide line;
#X msg 117 -79 stroke-width 2 \, stroke gray \, stroke-opacity 0.6
\, fill white;
#X msg 525 110 stroke-width 3 \, stroke red \, fill "";
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 36 0;
#X connect 5 0 9 0;
#X connect 6 0 5 0;
#X connect 7 0 9 0;
#X connect 8 0 9 0;
#X connect 10 0 7 0;
#X connect 11 0 8 0;
#X connect 13 0 12 0;
#X connect 14 0 12 0;
#X connect 15 0 12 0;
#X connect 16 0 13 0;
#X connect 17 0 14 0;
#X connect 18 0 15 0;
#X connect 19 0 21 0;
#X connect 20 0 19 0;
#X connect 22 0 21 0;
#X connect 23 0 22 0;
#X connect 24 0 30 0;
#X connect 25 0 24 0;
#X connect 27 0 37 0;
#X connect 28 0 29 0;
#X connect 29 0 12 0;
#X connect 30 0 26 0;
#X connect 36 0 0 0;
#X connect 37 0 26 0;
#X restore 52 247 group;
#X obj 92 5 struct unit_circle float x float y;
#X obj 364 251 * 100;
#X obj 548 243 * 600;
#X obj 548 264 + 150;
#X obj 501 350 list prepend;
#X obj 501 371 t a;
#X obj 310 31 t b b;
#X obj 310 115 t a a;
#X obj 501 297 list prepend;
#X msg 606 171 150 0;
#X obj 310 287 s arc-x;
#X obj 364 287 s arc-y;
#X obj 509 322 s sine-xy;
#X obj 501 402 s sine-points;
#X floatatom 140 122 5 0 0 0 scale - -, f 5;
#X msg 52 122 0.42;
#X text 432 338 + 1;
#X text 432 422 - 1;
#X text 443 382 0;
#X text 161 444 0;
#X text 212 444 1/2*Pi;
#X text 285 444 Pi;
#X text 335 444 3/2*Pi;
#X text 405 444 2*Pi;
#X floatatom 186 122 5 0 0 1 rotate - -, f 5;
#X obj 186 143 t b a;
#X obj 140 143 * 0.01;
#X msg 52 213 transform scale \$1 rotate \$2 150 0;
#X obj 140 183 pack 0.42 0;
#N canvas 0 0 450 300 (subpatch) 0;
#X array csm 62079 float 2 black black;
#X coords 0 1 62079 -1 114 59 1;
#X restore 509 6 graph;
#X obj 422 238 output~;
#X msg 310 73 0 \, 1 4200;
#N canvas 433 184 450 300 array-init 0;
#X obj 86 110 soundfiler;
#X obj 86 65 loadbang;
#X msg 86 88 read -resize voice.wav csm;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X restore 509 73 pd array-init;
#N canvas 433 184 450 300 sfx~ 0;
#X obj 62 18 inlet;
#X obj 62 84 line~;
#X obj 62 105 +~ 31039.5;
#X obj 62 42 * 34039.5;
#X obj 62 63 pack 0 100;
#X obj 62 126 tabread4~ csm;
#X obj 62 147 outlet~;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 2 0 5 0;
#X connect 3 0 4 0;
#X connect 4 0 1 0;
#X connect 5 0 6 0;
#X restore 422 216 pd sfx~;
#X connect 1 0 5 0;
#X connect 2 0 3 0;
#X connect 3 0 21 0;
#X connect 4 0 12 0;
#X connect 4 0 44 0;
#X connect 5 0 2 0;
#X connect 5 1 4 0;
#X connect 6 0 1 0;
#X connect 7 0 18 0;
#X connect 8 0 17 0;
#X connect 9 0 26 0;
#X connect 12 0 19 0;
#X connect 12 0 22 0;
#X connect 13 0 14 0;
#X connect 14 0 19 1;
#X connect 15 0 16 0;
#X connect 16 0 15 1;
#X connect 16 0 24 0;
#X connect 17 0 42 0;
#X connect 17 1 20 0;
#X connect 18 0 6 0;
#X connect 18 1 13 0;
#X connect 19 0 15 0;
#X connect 19 0 23 0;
#X connect 20 0 15 1;
#X connect 25 0 37 0;
#X connect 26 0 38 0;
#X connect 35 0 36 0;
#X connect 36 0 39 0;
#X connect 36 1 39 1;
#X connect 37 0 39 0;
#X connect 38 0 10 0;
#X connect 39 0 38 0;
#X connect 42 0 7 0;
#X connect 44 0 41 0;
