#N canvas 108 60 727 447 12;
#X obj 125 175 phasor~;
#X obj 125 292 vcf~;
#X floatatom 124 118 4 0 0;
#X floatatom 222 173 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 222 201 mtof;
#X obj 125 149 mtof;
#X obj 49 176 noise~;
#X text 176 119 oscillator pitch;
#X text 247 294 q ("quality");
#X graph graph1 0 0 66 5000 472 415 672 275;
#X array array1 67 float 1;
#A 0 3357.14 3310.52 3263.89 3217.26 3170.64 3124.01 3077.38 3030.75
2984.13 2937.5 2890.87 2844.25 2797.62 2750.99 2704.36 2657.74 2611.11
2564.48 2517.86 2471.23 2424.6 2377.98 2331.35 2284.72 2238.1 2191.47
2144.84 2098.21 2051.59 2004.96 1958.33 1911.71 1865.08 1818.45 1771.83
1725.2 1678.57 1635.09 1591.61 1548.14 1504.66 1461.18 1417.7 1374.22
1330.75 1287.27 1243.79 1200.31 1156.83 1113.35 1069.88 1026.4 982.919
939.441 895.963 852.484 809.006 765.528 722.05 678.571 642.857 619.048
595.238 571.429 547.619 523.81 500;
#X pop;
#X obj 220 233 tabosc4~ array1;
#X text 44 17 BANDPASS FILTERS 2 A waveform to control center frequency
;
#X text 272 174 "sweep" frequency;
#X text 474 209 note the y range of this;
#X text 475 229 table is from 0 to 5000;
#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 14 0;
#X connect 9 0 0 0;
#X connect 14 0 1 1;