#N canvas 208 229 1248 716 10;
#X obj 255 335 dac~;
#X obj 744 26 tgl 14 0 empty empty Sound\ On 17 7 0 10 -262144 -1 -1
0 1;
#X msg 744 63 \; pd dsp \$1;
#X obj 37 29 hsl 128 15 425 4680 0 0 empty empty Carrier\ Frequency
-2 -8 0 10 -262144 -1 -1 10600 1;
#X floatatom 38 59 12 0 0 0 - - -, f 12;
#X obj 289 136 noise~;
#X obj 335 192 *~;
#X obj 350 25 vsl 15 128 0 127 0 0 empty empty Noise\ Level 0 -9 0
10 -262144 -1 -1 2200 1;
#X obj 350 167 / 127;
#X obj 199 30 vsl 15 128 0 127 0 0 empty empty Carrier\ Level 0 -9
0 10 -262144 -1 -1 1400 1;
#X obj 199 172 / 127;
#X obj 184 198 *~;
#X obj 255 271 +~;
#X obj 14 231 tgl 15 0 empty empty Enable\ Chart 17 7 0 10 -262144
-1 -1 1 1;
#N canvas 0 22 450 300 (subpatch) 0;
#X array output 1024 float 0 black black;
#X coords 0 1 1023 -1 540 300 1;
#X restore 475 165 graph;
#X obj 84 263 metro;
#X obj 87 318 tabwrite~ output;
#X obj 93 105 phasor~;
#X obj 95 147 expr~ $v1 > 0.5;
#X connect 1 0 2 0;
#X connect 3 0 4 0;
#X connect 4 0 15 1;
#X connect 4 0 17 0;
#X connect 5 0 6 0;
#X connect 6 0 12 1;
#X connect 7 0 8 0;
#X connect 8 0 6 1;
#X connect 9 0 10 0;
#X connect 10 0 11 1;
#X connect 11 0 12 0;
#X connect 12 0 0 0;
#X connect 12 0 0 1;
#X connect 12 0 16 0;
#X connect 13 0 15 0;
#X connect 15 0 16 0;
#X connect 17 0 18 0;
#X connect 18 0 11 0;
