#N canvas 62 91 617 437 12; #X obj 125 175 phasor~; #X obj 125 292 vcf~; #X floatatom 124 118 4 0 0; #X floatatom 219 148 4 0 0; #X floatatom 199 296 4 0 0; #X floatatom 169 352 0 0 100; #N canvas 647 197 623 502 output 0; #X obj 455 510 t b; #X obj 455 450 f; #X obj 455 390 inlet; #X obj 455 540 f; #X msg 566 532 0; #X msg 455 420 bang; #X obj 455 480 moses 1; #X obj 566 502 t b f; #X obj 521 458 moses 1; #X obj 107 174 dbtorms; #X obj 521 428 r master-lvl; #X obj 107 56 r master-lvl; #X obj 455 570 s master-lvl; #X obj 36 228 inlet~; #X obj 251 229 inlet; #X obj 269 257 s master-lvl; #X msg 119 85 set \$1; #X obj 119 115 outlet; #X msg 251 283 \; pd dsp 1; #X obj 107 236 line~; #X obj 36 258 *~; #X obj 36 290 dac~; #X obj 107 204 pack 0 50; #X text 23 205 audio in; #X text 2 313 out both channels; #X text 246 157 Level input. Send to master-lvl and start DSP (we infer that if you're changing the level you want to hear the network.) If you start DSP when it's already running there's no effect.; #X text 85 544 here is the previous nonzero master-lvl -->; #X text 113 451 recall previous value of master-lvl -->; #X text 251 481 test if less than 1 -->; #X text 218 511 if true convert to bang -->; #X text 218 351 Mute control. If the master level is zero \, restore to the last nonzero one \, otherwise zero it.; #X text 182 114 <-- update the number box to show new level; #X connect 0 0 3 0; #X connect 1 0 6 0; #X connect 2 0 5 0; #X connect 3 0 12 0; #X connect 4 0 12 0; #X connect 5 0 1 0; #X connect 6 0 0 0; #X connect 6 1 7 0; #X connect 7 0 4 0; #X connect 8 1 3 1; #X connect 9 0 22 0; #X connect 10 0 1 1; #X connect 10 0 8 0; #X connect 11 0 9 0; #X connect 11 0 16 0; #X connect 13 0 20 0; #X connect 14 0 15 0; #X connect 14 0 18 0; #X connect 16 0 17 0; #X connect 19 0 20 1; #X connect 20 0 21 0; #X connect 20 0 21 1; #X connect 22 0 19 0; #X restore 131 385 pd output; #X msg 207 353 MUTE; #X obj 219 176 mtof; #X obj 125 149 mtof; #X obj 223 230 line~; #X obj 221 203 pack 0 50; #X obj 49 176 noise~; #X text 176 119 oscillator pitch; #X text 276 146 center frequency (units of pitch); #X text 247 294 q ("quality"); #X text 44 17 BANDPASS FILTERS. You can connect the "noise" generator instead of the phasor~ for the Apostrophe effect.; #X connect 0 0 1 0; #X connect 1 0 6 0; #X connect 2 0 9 0; #X connect 3 0 8 0; #X connect 4 0 1 2; #X connect 5 0 6 1; #X connect 6 0 5 0; #X connect 7 0 6 2; #X connect 8 0 11 0; #X connect 9 0 0 0; #X connect 10 0 1 1; #X connect 11 0 10 0;