#N canvas 530 63 741 497 12;
#X declare -stdpath ./;
#X obj 116 338 cos~;
#N canvas 0 22 450 278 (subpatch) 0;
#X array env-output 44100 float 0;
#X coords 0 1.02 44100 -1.02 200 130 1;
#X restore 461 81 graph;
#X obj 59 235 -~ 0.5;
#X obj 116 283 *~;
#X obj 116 310 clip~ -0.5 0.5;
#X obj 116 365 hip~ 5;
#X obj 134 82 *~;
#X floatatom 213 187 4 0 0 0 - - - 0;
#X floatatom 213 213 4 0 0 0 - - - 0;
#X obj 134 44 phasor~ -4;
#X obj 134 240 +~ 0.5;
#X obj 170 143 tabwrite~ env-output;
#X text 460 216 --------- 1 second ---------;
#X floatatom 213 239 4 0 0 0 - - - 0;
#X obj 134 184 lop~ 130;
#N canvas 704 266 342 431 freq 0;
#X obj 180 176 t f f;
#X obj 181 202 *;
#X obj 87 328 line 0 30;
#X obj 90 132 t b b;
#X obj 90 107 metro 100;
#X obj 87 295 pack;
#X obj 87 384 outlet;
#X floatatom 90 82 0 0 0 0 - - - 0;
#X floatatom 72 251 0 0 0 0 - - - 0;
#X floatatom 112 256 0 0 0 0 - - - 0;
#X obj 87 356 pack 0 30;
#X obj 73 210 + 150;
#X obj 90 31 loadbang;
#X msg 90 58 1;
#X obj 74 183 random 300;
#X obj 181 226 + 100;
#X obj 179 152 random 35;
#X connect 0 0 1 0;
#X connect 0 1 1 1;
#X connect 1 0 15 0;
#X connect 2 0 10 0;
#X connect 3 0 14 0;
#X connect 3 1 16 0;
#X connect 4 0 3 0;
#X connect 5 0 2 0;
#X connect 7 0 4 0;
#X connect 8 0 5 0;
#X connect 9 0 5 1;
#X connect 10 0 6 0;
#X connect 11 0 8 0;
#X connect 12 0 13 0;
#X connect 13 0 7 0;
#X connect 14 0 11 0;
#X connect 15 0 4 1;
#X connect 15 0 9 0;
#X connect 16 0 0 0;
#X restore 59 155 pd freq;
#X obj 59 183 line~;
#X obj 59 208 phasor~;
#X text 225 36 negative frequency;
#X text 226 52 makes falling sawtooth;
#X text 163 81 square it to make a curve;
#X text 253 197 you can;
#X text 251 215 adjust these;
#X text 253 235 values;
#X text 269 286 We interrupt this series of patches to bring you an important message from Nancy Reagan. If \, anywhere \, at any time \, someone offers you an illicit drug \, just say one word in reply..., f 61;
#X text 269 354 Now that I'm sure you've heard this important message \, we can return to the essentially frivolous occupation of making turn-of-the-millennium western art music., f 61;
#X obj 134 211 *~ 6;
#X text 443 439 updated for Pd version 0.34;
#X obj 116 407 output~;
#X obj 488 18 declare -stdpath ./;
#X obj 170 112 bng 19 250 50 0 empty empty empty 0 -6 0 8 #dfdfdf #000000 #000000;
#X text 194 112 <-- click to graph;
#X connect 0 0 5 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 0 0;
#X connect 5 0 28 0;
#X connect 6 0 11 0;
#X connect 6 0 14 0;
#X connect 7 0 14 1;
#X connect 8 0 26 1;
#X connect 9 0 6 0;
#X connect 9 0 6 1;
#X connect 10 0 3 1;
#X connect 13 0 10 1;
#X connect 14 0 26 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 17 0 2 0;
#X connect 26 0 10 0;
#X connect 30 0 11 0;
