#N canvas 306 23 1614 893 10; #X obj 72 68 notein; #X obj 72 110 pack f f f; #X obj 72 131 s \$0-poly; #X obj 72 171 r \$0-poly; #X obj 72 192 route 1; #X obj 57 495 *~ 0.7; #X obj 57 516 clip~ -1 1; #X obj 57 537 hip~ 3; #X obj 57 558 *~ 0.7; #X obj 57 579 dac~ 1 2; #N canvas 0 23 1550 839 voice 0; #X obj 72 173 unpack f f; #X obj 129 194 > 0; #X obj 72 297 mtof; #X msg 117 353 1000 \$1; #X obj 117 374 /; #X obj 72 395 t b b; #X obj 72 437 del 2; #X obj 72 458 pack f f; #X msg 72 479 0 \$2; #X obj 72 500 unpack f f; #X obj 72 556 lop~; #X msg 129 521 1000 \$1; #X obj 129 542 /; #X obj 272 311 phasor~; #X obj 272 332 -~ 0.25; #X obj 272 353 cos~; #X msg 311 290 0; #X obj 257 570 *~; #X obj 117 395 * 2048; #X obj 689 443 t b b; #X msg 689 485 0 1; #X msg 716 485 1 0; #X obj 689 506 line~; #X obj 240 633 *~; #X obj 599 262 t b b; #X obj 599 304 del 2; #X obj 599 325 pack f f; #X msg 599 346 0 \$2; #X obj 599 367 unpack f f; #X obj 599 423 lop~; #X msg 656 388 1000 \$1; #X obj 656 409 /; #X msg 626 283 1 1; #X obj 332 346 -~ 0.25; #X obj 332 367 cos~; #X obj 332 325 *~ 7; #X obj 382 346 -~ 0.25; #X obj 382 367 cos~; #X obj 382 325 *~ 20; #X obj 663 302 * 128; #X obj 382 388 /~ 20; #X msg 520 299 0 50; #X obj 242 689 /~ 2; #X obj 332 388 /~ 7; #X obj 332 409 +~; #X obj 332 430 *~; #X obj 72 276 route 1 0; #X obj 192 297 mtof; #X obj 192 318 t b f b; #X obj 72 318 t b f b; #X msg 150 332 2048; #X obj 311 248 sel 1; #X obj 821 505 *~; #X obj 800 526 sig~ 2; #X obj 800 547 pow~; #X obj 800 589 *~; #X obj 894 512 sig~ 2; #X obj 894 533 pow~; #X obj 879 554 sig~ 1; #X obj 879 575 /~; #X obj 800 568 -~ 1; #X obj 821 365 *~ 0.707946; #N canvas 4 23 162 227 hv.tanh 0; #X obj 12 12 inlet~; #X obj 12 38 clip~ -3 3; #X obj 27 64 *~; #X obj 12 192 outlet~; #X obj 27 140 /~; #X obj 12 166 *~; #X obj 67 90 *~ 9; #X obj 27 90 +~ 27; #X obj 67 116 +~ 27; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 1 0 2 1; #X connect 1 0 5 0; #X connect 2 0 7 0; #X connect 2 0 6 0; #X connect 4 0 5 1; #X connect 5 0 3 0; #X connect 6 0 8 0; #X connect 7 0 4 0; #X connect 8 0 4 1; #X restore 821 484 pd hv.tanh; #X obj 821 443 *~; #X obj 768 648 *~; #X obj 897 655 *~; #X obj 897 603 pow~ 4; #X obj 897 634 *~ -1; #X obj 947 620 r \$0-buz-pha; #X obj 768 669 +~; #X obj 821 463 +~; #X text 915 471 //Pickup Symmetry; #X text 947 580 //Buzz Phase; #X text 947 600 //Buzz Level; #X text 921 409 //Pickup Input; #X text 800 614 //Pickup Level; #X obj 921 429 sig~ 5; #X obj 915 491 sig~ 5; #X obj 947 641 sig~ 0.5; #X obj 800 634 sig~ 1; #N canvas 0 23 450 300 lowpass~ 0; #N canvas 1006 332 706 367 lowpass.coeffs 0; #X obj 12 45 inlet~ freq; #X obj 288 50 inlet~ q; #X obj 12 67 clip~ 20 20000; #X obj 273 94 sig~ 1; #X obj 273 116 /~; #X obj 273 138 *~; #X obj 273 160 *~ 0.5; #X obj 12 261 sig~ 1; #X obj 12 283 /~; #X obj 122 297 *~; #X obj 137 275 *~ 0.5; #X obj 122 319 outlet~ b0; #X obj 192 297 *~; #X obj 192 319 outlet~ b1; #X obj 262 297 *~; #X obj 262 319 outlet~ b2; #X obj 332 297 *~; #X obj 347 253 *~ -2; #X obj 332 319 outlet~ a1; #X obj 417 231 sig~ 1; #X obj 417 253 -~; #X obj 402 297 *~; #X obj 402 319 outlet~ a2; #X obj 57 266 +~ 1; #X text 363 162 w0 = 2*pi*f0*Fs; #X text 363 182 alpha = sin(w0)/(2*Q); #X text 527 237 a2 = 1 - alpha; #X text 527 217 a1 = -2*cos(w0); #X text 392 72 H(z) = -----------------------------------------; #X text 392 32 Audio-Cookbook:; #X text 392 112 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 137 231 sig~ 1; #X obj 137 253 -~; #X obj 207 231 sig~ 1; #X obj 207 253 -~; #X obj 277 275 *~ 0.5; #X obj 277 231 sig~ 1; #X obj 277 253 -~; #X text 434 87 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 434 57 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 527 197 a0 = 1 + alpha; #X text 527 257 b0 = (1 - cos(w0))/2; #X text 527 277 b1 = (1 - cos(w0)); #X text 527 297 b2 = (1 - cos(w0))/2; #X text 517 177 LPF:; #X obj 12 88 /~ 44100; #X obj 105 53 loadbang; #X obj 105 74 samplerate~; #X obj 288 72 max~ 0.1; #X obj 117 103 -~ 0.25; #X obj 117 124 cos~; #X obj 12 239 cos~; #X connect 0 0 2 0; #X connect 1 0 48 0; #X connect 2 0 45 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 20 1; #X connect 6 0 23 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 8 0 12 0; #X connect 8 0 14 0; #X connect 8 0 16 0; #X connect 8 0 21 0; #X connect 9 0 11 0; #X connect 10 0 9 1; #X connect 12 0 13 0; #X connect 14 0 15 0; #X connect 16 0 18 0; #X connect 17 0 16 1; #X connect 19 0 20 0; #X connect 20 0 21 1; #X connect 21 0 22 0; #X connect 23 0 8 1; #X connect 31 0 32 0; #X connect 32 0 10 0; #X connect 33 0 34 0; #X connect 34 0 12 1; #X connect 35 0 14 1; #X connect 36 0 37 0; #X connect 37 0 35 0; #X connect 45 0 51 0; #X connect 45 0 49 0; #X connect 46 0 47 0; #X connect 47 0 45 1; #X connect 48 0 4 1; #X connect 49 0 50 0; #X connect 50 0 5 1; #X connect 51 0 32 1; #X connect 51 0 34 1; #X connect 51 0 37 1; #X connect 51 0 17 0; #X restore 62 52 pd lowpass.coeffs; #X obj 46 120 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 99 pd @hv_obj biquad; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 173 11 q; #X obj 173 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 821 407 pd lowpass~; #X obj 884 386 sig~ 1000; #N canvas 0 23 450 300 highpass~ 0; #N canvas 200 23 682 315 highpass.coeffs 0; #X obj 12 46 clip~ 20 20000; #X obj 283 51 clip~ 0.1 100; #X obj 268 73 sig~ 1; #X obj 268 95 /~; #X obj 268 117 *~; #X obj 268 139 *~ 0.5; #X obj 12 215 sig~ 1; #X obj 12 237 /~; #X obj 122 254 *~; #X obj 137 200 +~ 1; #X obj 137 232 *~ 0.5; #X obj 122 276 outlet~ b0; #X obj 192 254 *~; #X obj 207 200 +~ 1; #X obj 192 276 outlet~ b1; #X obj 207 232 *~ -1; #X obj 262 254 *~; #X obj 277 200 +~ 1; #X obj 277 232 *~ 0.5; #X obj 262 276 outlet~ b2; #X obj 332 254 *~; #X obj 347 200 *~ -2; #X obj 332 276 outlet~ a1; #X obj 417 210 sig~ 1; #X obj 417 232 -~; #X obj 402 254 *~; #X obj 402 276 outlet~ a2; #X obj 57 220 +~ 1; #X text 348 141 w0 = 2*pi*f0*Fs; #X text 348 161 alpha = sin(w0)/(2*Q); #X text 512 176 a0 = 1 + alpha; #X text 512 216 a2 = 1 - alpha; #X text 512 196 a1 = -2*cos(w0); #X text 512 256 b1 = -(1 + cos(w0)); #X text 512 236 b0 = (1 + cos(w0))/2; #X text 502 156 HPF:; #X text 512 276 b2 = (1 + cos(w0))/2; #X text 419 36 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 377 51 H(z) = -----------------------------------------; #X text 419 66 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 377 11 Audio-Cookbook:; #X text 377 91 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 12 24 inlet~; #X obj 283 29 inlet~; #X obj 12 67 /~ 44100; #X obj 105 32 loadbang; #X obj 105 53 samplerate~; #X obj 122 83 -~ 0.25; #X obj 122 103 cos~; #X obj 12 186 cos~; #X connect 0 0 44 0; #X connect 1 0 3 1; #X connect 2 0 3 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 24 1; #X connect 5 0 27 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 7 0 12 0; #X connect 7 0 16 0; #X connect 7 0 20 0; #X connect 7 0 25 0; #X connect 8 0 11 0; #X connect 9 0 10 0; #X connect 10 0 8 1; #X connect 12 0 14 0; #X connect 13 0 15 0; #X connect 15 0 12 1; #X connect 16 0 19 0; #X connect 17 0 18 0; #X connect 18 0 16 1; #X connect 20 0 22 0; #X connect 21 0 20 1; #X connect 23 0 24 0; #X connect 24 0 25 1; #X connect 25 0 26 0; #X connect 27 0 7 1; #X connect 42 0 0 0; #X connect 43 0 1 0; #X connect 44 0 47 0; #X connect 44 0 49 0; #X connect 45 0 46 0; #X connect 46 0 44 1; #X connect 47 0 48 0; #X connect 48 0 4 1; #X connect 49 0 9 0; #X connect 49 0 13 0; #X connect 49 0 17 0; #X connect 49 0 21 0; #X restore 62 52 pd highpass.coeffs; #X obj 46 109 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 88 pd @hv_obj biquad; #X obj 12 20 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 167 11 q; #X obj 167 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 768 690 pd highpass~; #X obj 1214 342 t b b; #X obj 1214 405 line~; #X msg 1261 384 0 0; #X msg 1214 384 20000 0; #X obj 72 194 pipe 3; #X obj 672 600 sig~; #X obj 1214 363 del 2; #X obj 716 464 del 3; #X obj 312 269 del 3; #X obj 1261 363 del 3; #X obj 768 711 *~; #X obj 332 451 /~ 7; #X msg 99 416 1 0.1; #X obj 257 591 *~; #X obj 383 489 pipe 3; #X obj 383 510 - 1; #X obj 383 531 / 126; #X obj 361 473 sel 0; #X msg 383 552 1 \$1; #X obj 383 573 -; #X obj 383 594 * -30; #X obj 383 615 + 100; #X obj 383 636 dbtorms; #X msg 231 339 8; #X obj 94 140 inlet; #X obj 242 710 outlet~; #X obj 72 225 pack f f; #X msg 72 246 \$2 \$1; #X connect 0 0 87 0; #X connect 0 1 1 0; #X connect 0 1 100 0; #X connect 1 0 51 0; #X connect 1 0 109 1; #X connect 2 0 49 0; #X connect 2 0 13 0; #X connect 2 0 88 0; #X connect 3 0 4 0; #X connect 4 0 18 0; #X connect 4 0 39 0; #X connect 5 0 6 0; #X connect 5 1 95 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 9 0 10 0; #X connect 9 1 11 0; #X connect 10 0 17 0; #X connect 11 0 12 0; #X connect 12 0 10 1; #X connect 13 0 14 0; #X connect 13 0 35 0; #X connect 13 0 38 0; #X connect 14 0 15 0; #X connect 15 0 17 1; #X connect 16 0 13 1; #X connect 17 0 96 0; #X connect 18 0 7 1; #X connect 19 0 20 0; #X connect 19 1 90 0; #X connect 20 0 22 0; #X connect 21 0 22 0; #X connect 22 0 23 1; #X connect 22 0 93 1; #X connect 23 0 61 0; #X connect 23 0 42 0; #X connect 24 0 25 0; #X connect 24 1 32 0; #X connect 25 0 26 0; #X connect 26 0 27 0; #X connect 27 0 28 0; #X connect 28 0 29 0; #X connect 28 1 30 0; #X connect 29 0 45 1; #X connect 30 0 31 0; #X connect 31 0 29 1; #X connect 32 0 28 0; #X connect 33 0 34 0; #X connect 34 0 43 0; #X connect 35 0 33 0; #X connect 36 0 37 0; #X connect 37 0 40 0; #X connect 38 0 36 0; #X connect 39 0 26 1; #X connect 40 0 44 1; #X connect 41 0 28 0; #X connect 42 0 108 0; #X connect 43 0 44 0; #X connect 44 0 45 0; #X connect 45 0 94 0; #X connect 46 0 2 0; #X connect 46 1 47 0; #X connect 47 0 48 0; #X connect 48 0 7 0; #X connect 48 1 3 0; #X connect 48 2 106 0; #X connect 49 0 5 0; #X connect 49 0 24 0; #X connect 49 1 3 0; #X connect 49 2 50 0; #X connect 50 0 18 1; #X connect 51 0 19 0; #X connect 51 0 83 0; #X connect 51 0 91 0; #X connect 52 0 54 1; #X connect 53 0 54 0; #X connect 54 0 60 0; #X connect 55 0 64 0; #X connect 55 0 66 0; #X connect 56 0 57 0; #X connect 57 0 59 1; #X connect 58 0 59 0; #X connect 59 0 55 1; #X connect 60 0 55 0; #X connect 61 0 80 0; #X connect 62 0 52 0; #X connect 63 0 70 0; #X connect 64 0 69 0; #X connect 65 0 69 1; #X connect 66 0 67 0; #X connect 67 0 65 0; #X connect 68 0 67 1; #X connect 69 0 82 0; #X connect 70 0 62 0; #X connect 76 0 63 1; #X connect 77 0 52 1; #X connect 77 0 57 1; #X connect 78 0 65 1; #X connect 79 0 64 1; #X connect 80 0 63 0; #X connect 81 0 80 1; #X connect 82 0 93 0; #X connect 83 0 89 0; #X connect 83 1 92 0; #X connect 84 0 80 1; #X connect 84 0 82 1; #X connect 85 0 84 0; #X connect 86 0 84 0; #X connect 87 0 109 0; #X connect 88 0 82 1; #X connect 89 0 86 0; #X connect 90 0 21 0; #X connect 91 0 16 0; #X connect 92 0 85 0; #X connect 93 0 42 0; #X connect 94 0 96 0; #X connect 95 0 9 0; #X connect 96 0 23 0; #X connect 97 0 98 0; #X connect 98 0 99 0; #X connect 99 0 101 0; #X connect 100 1 97 0; #X connect 101 0 102 0; #X connect 102 0 103 0; #X connect 103 0 104 0; #X connect 104 0 105 0; #X connect 105 0 96 1; #X connect 106 0 18 1; #X connect 107 0 0 0; #X connect 109 0 110 0; #X connect 110 0 46 0; #X restore 72 213 pd voice; #X obj 72 89 poly 8 1; #X obj 132 171 r \$0-poly; #N canvas 0 23 1550 839 voice 0; #X obj 72 173 unpack f f; #X obj 129 194 > 0; #X obj 72 297 mtof; #X msg 117 353 1000 \$1; #X obj 117 374 /; #X obj 72 395 t b b; #X obj 72 437 del 2; #X obj 72 458 pack f f; #X msg 72 479 0 \$2; #X obj 72 500 unpack f f; #X obj 72 556 lop~; #X msg 129 521 1000 \$1; #X obj 129 542 /; #X obj 272 311 phasor~; #X obj 272 332 -~ 0.25; #X obj 272 353 cos~; #X msg 311 290 0; #X obj 257 570 *~; #X obj 117 395 * 2048; #X obj 689 443 t b b; #X msg 689 485 0 1; #X msg 716 485 1 0; #X obj 689 506 line~; #X obj 240 633 *~; #X obj 599 262 t b b; #X obj 599 304 del 2; #X obj 599 325 pack f f; #X msg 599 346 0 \$2; #X obj 599 367 unpack f f; #X obj 599 423 lop~; #X msg 656 388 1000 \$1; #X obj 656 409 /; #X msg 626 283 1 1; #X obj 332 346 -~ 0.25; #X obj 332 367 cos~; #X obj 332 325 *~ 7; #X obj 382 346 -~ 0.25; #X obj 382 367 cos~; #X obj 382 325 *~ 20; #X obj 663 302 * 128; #X obj 382 388 /~ 20; #X msg 520 299 0 50; #X obj 242 689 /~ 2; #X obj 332 388 /~ 7; #X obj 332 409 +~; #X obj 332 430 *~; #X obj 72 276 route 1 0; #X obj 192 297 mtof; #X obj 192 318 t b f b; #X obj 72 318 t b f b; #X msg 150 332 2048; #X obj 311 248 sel 1; #X obj 821 505 *~; #X obj 800 526 sig~ 2; #X obj 800 547 pow~; #X obj 800 589 *~; #X obj 894 512 sig~ 2; #X obj 894 533 pow~; #X obj 879 554 sig~ 1; #X obj 879 575 /~; #X obj 800 568 -~ 1; #X obj 821 365 *~ 0.707946; #N canvas 4 23 162 227 hv.tanh 0; #X obj 12 12 inlet~; #X obj 12 38 clip~ -3 3; #X obj 27 64 *~; #X obj 12 192 outlet~; #X obj 27 140 /~; #X obj 12 166 *~; #X obj 67 90 *~ 9; #X obj 27 90 +~ 27; #X obj 67 116 +~ 27; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 1 0 2 1; #X connect 1 0 5 0; #X connect 2 0 7 0; #X connect 2 0 6 0; #X connect 4 0 5 1; #X connect 5 0 3 0; #X connect 6 0 8 0; #X connect 7 0 4 0; #X connect 8 0 4 1; #X restore 821 484 pd hv.tanh; #X obj 821 443 *~; #X obj 768 648 *~; #X obj 897 655 *~; #X obj 897 603 pow~ 4; #X obj 897 634 *~ -1; #X obj 947 620 r \$0-buz-pha; #X obj 768 669 +~; #X obj 821 463 +~; #X text 915 471 //Pickup Symmetry; #X text 947 580 //Buzz Phase; #X text 947 600 //Buzz Level; #X text 921 409 //Pickup Input; #X text 800 614 //Pickup Level; #X obj 921 429 sig~ 5; #X obj 915 491 sig~ 5; #X obj 947 641 sig~ 0.5; #X obj 800 634 sig~ 1; #N canvas 0 23 450 300 lowpass~ 0; #N canvas 1006 332 706 367 lowpass.coeffs 0; #X obj 12 45 inlet~ freq; #X obj 288 50 inlet~ q; #X obj 12 67 clip~ 20 20000; #X obj 273 94 sig~ 1; #X obj 273 116 /~; #X obj 273 138 *~; #X obj 273 160 *~ 0.5; #X obj 12 261 sig~ 1; #X obj 12 283 /~; #X obj 122 297 *~; #X obj 137 275 *~ 0.5; #X obj 122 319 outlet~ b0; #X obj 192 297 *~; #X obj 192 319 outlet~ b1; #X obj 262 297 *~; #X obj 262 319 outlet~ b2; #X obj 332 297 *~; #X obj 347 253 *~ -2; #X obj 332 319 outlet~ a1; #X obj 417 231 sig~ 1; #X obj 417 253 -~; #X obj 402 297 *~; #X obj 402 319 outlet~ a2; #X obj 57 266 +~ 1; #X text 363 162 w0 = 2*pi*f0*Fs; #X text 363 182 alpha = sin(w0)/(2*Q); #X text 527 237 a2 = 1 - alpha; #X text 527 217 a1 = -2*cos(w0); #X text 392 72 H(z) = -----------------------------------------; #X text 392 32 Audio-Cookbook:; #X text 392 112 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 137 231 sig~ 1; #X obj 137 253 -~; #X obj 207 231 sig~ 1; #X obj 207 253 -~; #X obj 277 275 *~ 0.5; #X obj 277 231 sig~ 1; #X obj 277 253 -~; #X text 434 87 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 434 57 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 527 197 a0 = 1 + alpha; #X text 527 257 b0 = (1 - cos(w0))/2; #X text 527 277 b1 = (1 - cos(w0)); #X text 527 297 b2 = (1 - cos(w0))/2; #X text 517 177 LPF:; #X obj 12 88 /~ 44100; #X obj 105 53 loadbang; #X obj 105 74 samplerate~; #X obj 288 72 max~ 0.1; #X obj 117 103 -~ 0.25; #X obj 117 124 cos~; #X obj 12 239 cos~; #X connect 0 0 2 0; #X connect 1 0 48 0; #X connect 2 0 45 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 20 1; #X connect 6 0 23 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 8 0 12 0; #X connect 8 0 14 0; #X connect 8 0 16 0; #X connect 8 0 21 0; #X connect 9 0 11 0; #X connect 10 0 9 1; #X connect 12 0 13 0; #X connect 14 0 15 0; #X connect 16 0 18 0; #X connect 17 0 16 1; #X connect 19 0 20 0; #X connect 20 0 21 1; #X connect 21 0 22 0; #X connect 23 0 8 1; #X connect 31 0 32 0; #X connect 32 0 10 0; #X connect 33 0 34 0; #X connect 34 0 12 1; #X connect 35 0 14 1; #X connect 36 0 37 0; #X connect 37 0 35 0; #X connect 45 0 51 0; #X connect 45 0 49 0; #X connect 46 0 47 0; #X connect 47 0 45 1; #X connect 48 0 4 1; #X connect 49 0 50 0; #X connect 50 0 5 1; #X connect 51 0 32 1; #X connect 51 0 34 1; #X connect 51 0 37 1; #X connect 51 0 17 0; #X restore 62 52 pd lowpass.coeffs; #X obj 46 120 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 99 pd @hv_obj biquad; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 173 11 q; #X obj 173 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 821 407 pd lowpass~; #X obj 884 386 sig~ 1000; #N canvas 0 23 450 300 highpass~ 0; #N canvas 200 23 682 315 highpass.coeffs 0; #X obj 12 46 clip~ 20 20000; #X obj 283 51 clip~ 0.1 100; #X obj 268 73 sig~ 1; #X obj 268 95 /~; #X obj 268 117 *~; #X obj 268 139 *~ 0.5; #X obj 12 215 sig~ 1; #X obj 12 237 /~; #X obj 122 254 *~; #X obj 137 200 +~ 1; #X obj 137 232 *~ 0.5; #X obj 122 276 outlet~ b0; #X obj 192 254 *~; #X obj 207 200 +~ 1; #X obj 192 276 outlet~ b1; #X obj 207 232 *~ -1; #X obj 262 254 *~; #X obj 277 200 +~ 1; #X obj 277 232 *~ 0.5; #X obj 262 276 outlet~ b2; #X obj 332 254 *~; #X obj 347 200 *~ -2; #X obj 332 276 outlet~ a1; #X obj 417 210 sig~ 1; #X obj 417 232 -~; #X obj 402 254 *~; #X obj 402 276 outlet~ a2; #X obj 57 220 +~ 1; #X text 348 141 w0 = 2*pi*f0*Fs; #X text 348 161 alpha = sin(w0)/(2*Q); #X text 512 176 a0 = 1 + alpha; #X text 512 216 a2 = 1 - alpha; #X text 512 196 a1 = -2*cos(w0); #X text 512 256 b1 = -(1 + cos(w0)); #X text 512 236 b0 = (1 + cos(w0))/2; #X text 502 156 HPF:; #X text 512 276 b2 = (1 + cos(w0))/2; #X text 419 36 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 377 51 H(z) = -----------------------------------------; #X text 419 66 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 377 11 Audio-Cookbook:; #X text 377 91 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 12 24 inlet~; #X obj 283 29 inlet~; #X obj 12 67 /~ 44100; #X obj 105 32 loadbang; #X obj 105 53 samplerate~; #X obj 122 83 -~ 0.25; #X obj 122 103 cos~; #X obj 12 186 cos~; #X connect 0 0 44 0; #X connect 1 0 3 1; #X connect 2 0 3 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 24 1; #X connect 5 0 27 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 7 0 12 0; #X connect 7 0 16 0; #X connect 7 0 20 0; #X connect 7 0 25 0; #X connect 8 0 11 0; #X connect 9 0 10 0; #X connect 10 0 8 1; #X connect 12 0 14 0; #X connect 13 0 15 0; #X connect 15 0 12 1; #X connect 16 0 19 0; #X connect 17 0 18 0; #X connect 18 0 16 1; #X connect 20 0 22 0; #X connect 21 0 20 1; #X connect 23 0 24 0; #X connect 24 0 25 1; #X connect 25 0 26 0; #X connect 27 0 7 1; #X connect 42 0 0 0; #X connect 43 0 1 0; #X connect 44 0 47 0; #X connect 44 0 49 0; #X connect 45 0 46 0; #X connect 46 0 44 1; #X connect 47 0 48 0; #X connect 48 0 4 1; #X connect 49 0 9 0; #X connect 49 0 13 0; #X connect 49 0 17 0; #X connect 49 0 21 0; #X restore 62 52 pd highpass.coeffs; #X obj 46 109 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 88 pd @hv_obj biquad; #X obj 12 20 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 167 11 q; #X obj 167 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 768 690 pd highpass~; #X obj 1214 342 t b b; #X obj 1214 405 line~; #X msg 1261 384 0 0; #X msg 1214 384 20000 0; #X obj 72 194 pipe 3; #X obj 672 600 sig~; #X obj 1214 363 del 2; #X obj 716 464 del 3; #X obj 312 269 del 3; #X obj 1261 363 del 3; #X obj 768 711 *~; #X obj 332 451 /~ 7; #X msg 99 416 1 0.1; #X obj 257 591 *~; #X obj 383 489 pipe 3; #X obj 383 510 - 1; #X obj 383 531 / 126; #X obj 361 473 sel 0; #X msg 383 552 1 \$1; #X obj 383 573 -; #X obj 383 594 * -30; #X obj 383 615 + 100; #X obj 383 636 dbtorms; #X msg 231 339 8; #X obj 94 140 inlet; #X obj 242 710 outlet~; #X obj 72 225 pack f f; #X msg 72 246 \$2 \$1; #X connect 0 0 87 0; #X connect 0 1 1 0; #X connect 0 1 100 0; #X connect 1 0 51 0; #X connect 1 0 109 1; #X connect 2 0 49 0; #X connect 2 0 13 0; #X connect 2 0 88 0; #X connect 3 0 4 0; #X connect 4 0 18 0; #X connect 4 0 39 0; #X connect 5 0 6 0; #X connect 5 1 95 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 9 0 10 0; #X connect 9 1 11 0; #X connect 10 0 17 0; #X connect 11 0 12 0; #X connect 12 0 10 1; #X connect 13 0 14 0; #X connect 13 0 35 0; #X connect 13 0 38 0; #X connect 14 0 15 0; #X connect 15 0 17 1; #X connect 16 0 13 1; #X connect 17 0 96 0; #X connect 18 0 7 1; #X connect 19 0 20 0; #X connect 19 1 90 0; #X connect 20 0 22 0; #X connect 21 0 22 0; #X connect 22 0 23 1; #X connect 22 0 93 1; #X connect 23 0 61 0; #X connect 23 0 42 0; #X connect 24 0 25 0; #X connect 24 1 32 0; #X connect 25 0 26 0; #X connect 26 0 27 0; #X connect 27 0 28 0; #X connect 28 0 29 0; #X connect 28 1 30 0; #X connect 29 0 45 1; #X connect 30 0 31 0; #X connect 31 0 29 1; #X connect 32 0 28 0; #X connect 33 0 34 0; #X connect 34 0 43 0; #X connect 35 0 33 0; #X connect 36 0 37 0; #X connect 37 0 40 0; #X connect 38 0 36 0; #X connect 39 0 26 1; #X connect 40 0 44 1; #X connect 41 0 28 0; #X connect 42 0 108 0; #X connect 43 0 44 0; #X connect 44 0 45 0; #X connect 45 0 94 0; #X connect 46 0 2 0; #X connect 46 1 47 0; #X connect 47 0 48 0; #X connect 48 0 7 0; #X connect 48 1 3 0; #X connect 48 2 106 0; #X connect 49 0 5 0; #X connect 49 0 24 0; #X connect 49 1 3 0; #X connect 49 2 50 0; #X connect 50 0 18 1; #X connect 51 0 19 0; #X connect 51 0 83 0; #X connect 51 0 91 0; #X connect 52 0 54 1; #X connect 53 0 54 0; #X connect 54 0 60 0; #X connect 55 0 64 0; #X connect 55 0 66 0; #X connect 56 0 57 0; #X connect 57 0 59 1; #X connect 58 0 59 0; #X connect 59 0 55 1; #X connect 60 0 55 0; #X connect 61 0 80 0; #X connect 62 0 52 0; #X connect 63 0 70 0; #X connect 64 0 69 0; #X connect 65 0 69 1; #X connect 66 0 67 0; #X connect 67 0 65 0; #X connect 68 0 67 1; #X connect 69 0 82 0; #X connect 70 0 62 0; #X connect 76 0 63 1; #X connect 77 0 52 1; #X connect 77 0 57 1; #X connect 78 0 65 1; #X connect 79 0 64 1; #X connect 80 0 63 0; #X connect 81 0 80 1; #X connect 82 0 93 0; #X connect 83 0 89 0; #X connect 83 1 92 0; #X connect 84 0 80 1; #X connect 84 0 82 1; #X connect 85 0 84 0; #X connect 86 0 84 0; #X connect 87 0 109 0; #X connect 88 0 82 1; #X connect 89 0 86 0; #X connect 90 0 21 0; #X connect 91 0 16 0; #X connect 92 0 85 0; #X connect 93 0 42 0; #X connect 94 0 96 0; #X connect 95 0 9 0; #X connect 96 0 23 0; #X connect 97 0 98 0; #X connect 98 0 99 0; #X connect 99 0 101 0; #X connect 100 1 97 0; #X connect 101 0 102 0; #X connect 102 0 103 0; #X connect 103 0 104 0; #X connect 104 0 105 0; #X connect 105 0 96 1; #X connect 106 0 18 1; #X connect 107 0 0 0; #X connect 109 0 110 0; #X connect 110 0 46 0; #X restore 132 213 pd voice; #X obj 192 171 r \$0-poly; #N canvas 0 23 1550 839 voice 0; #X obj 72 173 unpack f f; #X obj 129 194 > 0; #X obj 72 297 mtof; #X msg 117 353 1000 \$1; #X obj 117 374 /; #X obj 72 395 t b b; #X obj 72 437 del 2; #X obj 72 458 pack f f; #X msg 72 479 0 \$2; #X obj 72 500 unpack f f; #X obj 72 556 lop~; #X msg 129 521 1000 \$1; #X obj 129 542 /; #X obj 272 311 phasor~; #X obj 272 332 -~ 0.25; #X obj 272 353 cos~; #X msg 311 290 0; #X obj 257 570 *~; #X obj 117 395 * 2048; #X obj 689 443 t b b; #X msg 689 485 0 1; #X msg 716 485 1 0; #X obj 689 506 line~; #X obj 240 633 *~; #X obj 599 262 t b b; #X obj 599 304 del 2; #X obj 599 325 pack f f; #X msg 599 346 0 \$2; #X obj 599 367 unpack f f; #X obj 599 423 lop~; #X msg 656 388 1000 \$1; #X obj 656 409 /; #X msg 626 283 1 1; #X obj 332 346 -~ 0.25; #X obj 332 367 cos~; #X obj 332 325 *~ 7; #X obj 382 346 -~ 0.25; #X obj 382 367 cos~; #X obj 382 325 *~ 20; #X obj 663 302 * 128; #X obj 382 388 /~ 20; #X msg 520 299 0 50; #X obj 242 689 /~ 2; #X obj 332 388 /~ 7; #X obj 332 409 +~; #X obj 332 430 *~; #X obj 72 276 route 1 0; #X obj 192 297 mtof; #X obj 192 318 t b f b; #X obj 72 318 t b f b; #X msg 150 332 2048; #X obj 311 248 sel 1; #X obj 821 505 *~; #X obj 800 526 sig~ 2; #X obj 800 547 pow~; #X obj 800 589 *~; #X obj 894 512 sig~ 2; #X obj 894 533 pow~; #X obj 879 554 sig~ 1; #X obj 879 575 /~; #X obj 800 568 -~ 1; #X obj 821 365 *~ 0.707946; #N canvas 4 23 162 227 hv.tanh 0; #X obj 12 12 inlet~; #X obj 12 38 clip~ -3 3; #X obj 27 64 *~; #X obj 12 192 outlet~; #X obj 27 140 /~; #X obj 12 166 *~; #X obj 67 90 *~ 9; #X obj 27 90 +~ 27; #X obj 67 116 +~ 27; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 1 0 2 1; #X connect 1 0 5 0; #X connect 2 0 7 0; #X connect 2 0 6 0; #X connect 4 0 5 1; #X connect 5 0 3 0; #X connect 6 0 8 0; #X connect 7 0 4 0; #X connect 8 0 4 1; #X restore 821 484 pd hv.tanh; #X obj 821 443 *~; #X obj 768 648 *~; #X obj 897 655 *~; #X obj 897 603 pow~ 4; #X obj 897 634 *~ -1; #X obj 947 620 r \$0-buz-pha; #X obj 768 669 +~; #X obj 821 463 +~; #X text 915 471 //Pickup Symmetry; #X text 947 580 //Buzz Phase; #X text 947 600 //Buzz Level; #X text 921 409 //Pickup Input; #X text 800 614 //Pickup Level; #X obj 921 429 sig~ 5; #X obj 915 491 sig~ 5; #X obj 947 641 sig~ 0.5; #X obj 800 634 sig~ 1; #N canvas 0 23 450 300 lowpass~ 0; #N canvas 1006 332 706 367 lowpass.coeffs 0; #X obj 12 45 inlet~ freq; #X obj 288 50 inlet~ q; #X obj 12 67 clip~ 20 20000; #X obj 273 94 sig~ 1; #X obj 273 116 /~; #X obj 273 138 *~; #X obj 273 160 *~ 0.5; #X obj 12 261 sig~ 1; #X obj 12 283 /~; #X obj 122 297 *~; #X obj 137 275 *~ 0.5; #X obj 122 319 outlet~ b0; #X obj 192 297 *~; #X obj 192 319 outlet~ b1; #X obj 262 297 *~; #X obj 262 319 outlet~ b2; #X obj 332 297 *~; #X obj 347 253 *~ -2; #X obj 332 319 outlet~ a1; #X obj 417 231 sig~ 1; #X obj 417 253 -~; #X obj 402 297 *~; #X obj 402 319 outlet~ a2; #X obj 57 266 +~ 1; #X text 363 162 w0 = 2*pi*f0*Fs; #X text 363 182 alpha = sin(w0)/(2*Q); #X text 527 237 a2 = 1 - alpha; #X text 527 217 a1 = -2*cos(w0); #X text 392 72 H(z) = -----------------------------------------; #X text 392 32 Audio-Cookbook:; #X text 392 112 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 137 231 sig~ 1; #X obj 137 253 -~; #X obj 207 231 sig~ 1; #X obj 207 253 -~; #X obj 277 275 *~ 0.5; #X obj 277 231 sig~ 1; #X obj 277 253 -~; #X text 434 87 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 434 57 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 527 197 a0 = 1 + alpha; #X text 527 257 b0 = (1 - cos(w0))/2; #X text 527 277 b1 = (1 - cos(w0)); #X text 527 297 b2 = (1 - cos(w0))/2; #X text 517 177 LPF:; #X obj 12 88 /~ 44100; #X obj 105 53 loadbang; #X obj 105 74 samplerate~; #X obj 288 72 max~ 0.1; #X obj 117 103 -~ 0.25; #X obj 117 124 cos~; #X obj 12 239 cos~; #X connect 0 0 2 0; #X connect 1 0 48 0; #X connect 2 0 45 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 20 1; #X connect 6 0 23 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 8 0 12 0; #X connect 8 0 14 0; #X connect 8 0 16 0; #X connect 8 0 21 0; #X connect 9 0 11 0; #X connect 10 0 9 1; #X connect 12 0 13 0; #X connect 14 0 15 0; #X connect 16 0 18 0; #X connect 17 0 16 1; #X connect 19 0 20 0; #X connect 20 0 21 1; #X connect 21 0 22 0; #X connect 23 0 8 1; #X connect 31 0 32 0; #X connect 32 0 10 0; #X connect 33 0 34 0; #X connect 34 0 12 1; #X connect 35 0 14 1; #X connect 36 0 37 0; #X connect 37 0 35 0; #X connect 45 0 51 0; #X connect 45 0 49 0; #X connect 46 0 47 0; #X connect 47 0 45 1; #X connect 48 0 4 1; #X connect 49 0 50 0; #X connect 50 0 5 1; #X connect 51 0 32 1; #X connect 51 0 34 1; #X connect 51 0 37 1; #X connect 51 0 17 0; #X restore 62 52 pd lowpass.coeffs; #X obj 46 120 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 99 pd @hv_obj biquad; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 173 11 q; #X obj 173 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 821 407 pd lowpass~; #X obj 884 386 sig~ 1000; #N canvas 0 23 450 300 highpass~ 0; #N canvas 200 23 682 315 highpass.coeffs 0; #X obj 12 46 clip~ 20 20000; #X obj 283 51 clip~ 0.1 100; #X obj 268 73 sig~ 1; #X obj 268 95 /~; #X obj 268 117 *~; #X obj 268 139 *~ 0.5; #X obj 12 215 sig~ 1; #X obj 12 237 /~; #X obj 122 254 *~; #X obj 137 200 +~ 1; #X obj 137 232 *~ 0.5; #X obj 122 276 outlet~ b0; #X obj 192 254 *~; #X obj 207 200 +~ 1; #X obj 192 276 outlet~ b1; #X obj 207 232 *~ -1; #X obj 262 254 *~; #X obj 277 200 +~ 1; #X obj 277 232 *~ 0.5; #X obj 262 276 outlet~ b2; #X obj 332 254 *~; #X obj 347 200 *~ -2; #X obj 332 276 outlet~ a1; #X obj 417 210 sig~ 1; #X obj 417 232 -~; #X obj 402 254 *~; #X obj 402 276 outlet~ a2; #X obj 57 220 +~ 1; #X text 348 141 w0 = 2*pi*f0*Fs; #X text 348 161 alpha = sin(w0)/(2*Q); #X text 512 176 a0 = 1 + alpha; #X text 512 216 a2 = 1 - alpha; #X text 512 196 a1 = -2*cos(w0); #X text 512 256 b1 = -(1 + cos(w0)); #X text 512 236 b0 = (1 + cos(w0))/2; #X text 502 156 HPF:; #X text 512 276 b2 = (1 + cos(w0))/2; #X text 419 36 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 377 51 H(z) = -----------------------------------------; #X text 419 66 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 377 11 Audio-Cookbook:; #X text 377 91 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 12 24 inlet~; #X obj 283 29 inlet~; #X obj 12 67 /~ 44100; #X obj 105 32 loadbang; #X obj 105 53 samplerate~; #X obj 122 83 -~ 0.25; #X obj 122 103 cos~; #X obj 12 186 cos~; #X connect 0 0 44 0; #X connect 1 0 3 1; #X connect 2 0 3 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 24 1; #X connect 5 0 27 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 7 0 12 0; #X connect 7 0 16 0; #X connect 7 0 20 0; #X connect 7 0 25 0; #X connect 8 0 11 0; #X connect 9 0 10 0; #X connect 10 0 8 1; #X connect 12 0 14 0; #X connect 13 0 15 0; #X connect 15 0 12 1; #X connect 16 0 19 0; #X connect 17 0 18 0; #X connect 18 0 16 1; #X connect 20 0 22 0; #X connect 21 0 20 1; #X connect 23 0 24 0; #X connect 24 0 25 1; #X connect 25 0 26 0; #X connect 27 0 7 1; #X connect 42 0 0 0; #X connect 43 0 1 0; #X connect 44 0 47 0; #X connect 44 0 49 0; #X connect 45 0 46 0; #X connect 46 0 44 1; #X connect 47 0 48 0; #X connect 48 0 4 1; #X connect 49 0 9 0; #X connect 49 0 13 0; #X connect 49 0 17 0; #X connect 49 0 21 0; #X restore 62 52 pd highpass.coeffs; #X obj 46 109 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 88 pd @hv_obj biquad; #X obj 12 20 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 167 11 q; #X obj 167 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 768 690 pd highpass~; #X obj 1214 342 t b b; #X obj 1214 405 line~; #X msg 1261 384 0 0; #X msg 1214 384 20000 0; #X obj 72 194 pipe 3; #X obj 672 600 sig~; #X obj 1214 363 del 2; #X obj 716 464 del 3; #X obj 312 269 del 3; #X obj 1261 363 del 3; #X obj 768 711 *~; #X obj 332 451 /~ 7; #X msg 99 416 1 0.1; #X obj 257 591 *~; #X obj 383 489 pipe 3; #X obj 383 510 - 1; #X obj 383 531 / 126; #X obj 361 473 sel 0; #X msg 383 552 1 \$1; #X obj 383 573 -; #X obj 383 594 * -30; #X obj 383 615 + 100; #X obj 383 636 dbtorms; #X msg 231 339 8; #X obj 94 140 inlet; #X obj 242 710 outlet~; #X obj 72 225 pack f f; #X msg 72 246 \$2 \$1; #X connect 0 0 87 0; #X connect 0 1 1 0; #X connect 0 1 100 0; #X connect 1 0 51 0; #X connect 1 0 109 1; #X connect 2 0 49 0; #X connect 2 0 13 0; #X connect 2 0 88 0; #X connect 3 0 4 0; #X connect 4 0 18 0; #X connect 4 0 39 0; #X connect 5 0 6 0; #X connect 5 1 95 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 9 0 10 0; #X connect 9 1 11 0; #X connect 10 0 17 0; #X connect 11 0 12 0; #X connect 12 0 10 1; #X connect 13 0 14 0; #X connect 13 0 35 0; #X connect 13 0 38 0; #X connect 14 0 15 0; #X connect 15 0 17 1; #X connect 16 0 13 1; #X connect 17 0 96 0; #X connect 18 0 7 1; #X connect 19 0 20 0; #X connect 19 1 90 0; #X connect 20 0 22 0; #X connect 21 0 22 0; #X connect 22 0 23 1; #X connect 22 0 93 1; #X connect 23 0 61 0; #X connect 23 0 42 0; #X connect 24 0 25 0; #X connect 24 1 32 0; #X connect 25 0 26 0; #X connect 26 0 27 0; #X connect 27 0 28 0; #X connect 28 0 29 0; #X connect 28 1 30 0; #X connect 29 0 45 1; #X connect 30 0 31 0; #X connect 31 0 29 1; #X connect 32 0 28 0; #X connect 33 0 34 0; #X connect 34 0 43 0; #X connect 35 0 33 0; #X connect 36 0 37 0; #X connect 37 0 40 0; #X connect 38 0 36 0; #X connect 39 0 26 1; #X connect 40 0 44 1; #X connect 41 0 28 0; #X connect 42 0 108 0; #X connect 43 0 44 0; #X connect 44 0 45 0; #X connect 45 0 94 0; #X connect 46 0 2 0; #X connect 46 1 47 0; #X connect 47 0 48 0; #X connect 48 0 7 0; #X connect 48 1 3 0; #X connect 48 2 106 0; #X connect 49 0 5 0; #X connect 49 0 24 0; #X connect 49 1 3 0; #X connect 49 2 50 0; #X connect 50 0 18 1; #X connect 51 0 19 0; #X connect 51 0 83 0; #X connect 51 0 91 0; #X connect 52 0 54 1; #X connect 53 0 54 0; #X connect 54 0 60 0; #X connect 55 0 64 0; #X connect 55 0 66 0; #X connect 56 0 57 0; #X connect 57 0 59 1; #X connect 58 0 59 0; #X connect 59 0 55 1; #X connect 60 0 55 0; #X connect 61 0 80 0; #X connect 62 0 52 0; #X connect 63 0 70 0; #X connect 64 0 69 0; #X connect 65 0 69 1; #X connect 66 0 67 0; #X connect 67 0 65 0; #X connect 68 0 67 1; #X connect 69 0 82 0; #X connect 70 0 62 0; #X connect 76 0 63 1; #X connect 77 0 52 1; #X connect 77 0 57 1; #X connect 78 0 65 1; #X connect 79 0 64 1; #X connect 80 0 63 0; #X connect 81 0 80 1; #X connect 82 0 93 0; #X connect 83 0 89 0; #X connect 83 1 92 0; #X connect 84 0 80 1; #X connect 84 0 82 1; #X connect 85 0 84 0; #X connect 86 0 84 0; #X connect 87 0 109 0; #X connect 88 0 82 1; #X connect 89 0 86 0; #X connect 90 0 21 0; #X connect 91 0 16 0; #X connect 92 0 85 0; #X connect 93 0 42 0; #X connect 94 0 96 0; #X connect 95 0 9 0; #X connect 96 0 23 0; #X connect 97 0 98 0; #X connect 98 0 99 0; #X connect 99 0 101 0; #X connect 100 1 97 0; #X connect 101 0 102 0; #X connect 102 0 103 0; #X connect 103 0 104 0; #X connect 104 0 105 0; #X connect 105 0 96 1; #X connect 106 0 18 1; #X connect 107 0 0 0; #X connect 109 0 110 0; #X connect 110 0 46 0; #X restore 192 213 pd voice; #X obj 252 171 r \$0-poly; #N canvas 0 23 1550 839 voice 0; #X obj 72 173 unpack f f; #X obj 129 194 > 0; #X obj 72 297 mtof; #X msg 117 353 1000 \$1; #X obj 117 374 /; #X obj 72 395 t b b; #X obj 72 437 del 2; #X obj 72 458 pack f f; #X msg 72 479 0 \$2; #X obj 72 500 unpack f f; #X obj 72 556 lop~; #X msg 129 521 1000 \$1; #X obj 129 542 /; #X obj 272 311 phasor~; #X obj 272 332 -~ 0.25; #X obj 272 353 cos~; #X msg 311 290 0; #X obj 257 570 *~; #X obj 117 395 * 2048; #X obj 689 443 t b b; #X msg 689 485 0 1; #X msg 716 485 1 0; #X obj 689 506 line~; #X obj 240 633 *~; #X obj 599 262 t b b; #X obj 599 304 del 2; #X obj 599 325 pack f f; #X msg 599 346 0 \$2; #X obj 599 367 unpack f f; #X obj 599 423 lop~; #X msg 656 388 1000 \$1; #X obj 656 409 /; #X msg 626 283 1 1; #X obj 332 346 -~ 0.25; #X obj 332 367 cos~; #X obj 332 325 *~ 7; #X obj 382 346 -~ 0.25; #X obj 382 367 cos~; #X obj 382 325 *~ 20; #X obj 663 302 * 128; #X obj 382 388 /~ 20; #X msg 520 299 0 50; #X obj 242 689 /~ 2; #X obj 332 388 /~ 7; #X obj 332 409 +~; #X obj 332 430 *~; #X obj 72 276 route 1 0; #X obj 192 297 mtof; #X obj 192 318 t b f b; #X obj 72 318 t b f b; #X msg 150 332 2048; #X obj 311 248 sel 1; #X obj 821 505 *~; #X obj 800 526 sig~ 2; #X obj 800 547 pow~; #X obj 800 589 *~; #X obj 894 512 sig~ 2; #X obj 894 533 pow~; #X obj 879 554 sig~ 1; #X obj 879 575 /~; #X obj 800 568 -~ 1; #X obj 821 365 *~ 0.707946; #N canvas 4 23 162 227 hv.tanh 0; #X obj 12 12 inlet~; #X obj 12 38 clip~ -3 3; #X obj 27 64 *~; #X obj 12 192 outlet~; #X obj 27 140 /~; #X obj 12 166 *~; #X obj 67 90 *~ 9; #X obj 27 90 +~ 27; #X obj 67 116 +~ 27; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 1 0 2 1; #X connect 1 0 5 0; #X connect 2 0 7 0; #X connect 2 0 6 0; #X connect 4 0 5 1; #X connect 5 0 3 0; #X connect 6 0 8 0; #X connect 7 0 4 0; #X connect 8 0 4 1; #X restore 821 484 pd hv.tanh; #X obj 821 443 *~; #X obj 768 648 *~; #X obj 897 655 *~; #X obj 897 603 pow~ 4; #X obj 897 634 *~ -1; #X obj 947 620 r \$0-buz-pha; #X obj 768 669 +~; #X obj 821 463 +~; #X text 915 471 //Pickup Symmetry; #X text 947 580 //Buzz Phase; #X text 947 600 //Buzz Level; #X text 921 409 //Pickup Input; #X text 800 614 //Pickup Level; #X obj 921 429 sig~ 5; #X obj 915 491 sig~ 5; #X obj 947 641 sig~ 0.5; #X obj 800 634 sig~ 1; #N canvas 0 23 450 300 lowpass~ 0; #N canvas 1006 332 706 367 lowpass.coeffs 0; #X obj 12 45 inlet~ freq; #X obj 288 50 inlet~ q; #X obj 12 67 clip~ 20 20000; #X obj 273 94 sig~ 1; #X obj 273 116 /~; #X obj 273 138 *~; #X obj 273 160 *~ 0.5; #X obj 12 261 sig~ 1; #X obj 12 283 /~; #X obj 122 297 *~; #X obj 137 275 *~ 0.5; #X obj 122 319 outlet~ b0; #X obj 192 297 *~; #X obj 192 319 outlet~ b1; #X obj 262 297 *~; #X obj 262 319 outlet~ b2; #X obj 332 297 *~; #X obj 347 253 *~ -2; #X obj 332 319 outlet~ a1; #X obj 417 231 sig~ 1; #X obj 417 253 -~; #X obj 402 297 *~; #X obj 402 319 outlet~ a2; #X obj 57 266 +~ 1; #X text 363 162 w0 = 2*pi*f0*Fs; #X text 363 182 alpha = sin(w0)/(2*Q); #X text 527 237 a2 = 1 - alpha; #X text 527 217 a1 = -2*cos(w0); #X text 392 72 H(z) = -----------------------------------------; #X text 392 32 Audio-Cookbook:; #X text 392 112 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 137 231 sig~ 1; #X obj 137 253 -~; #X obj 207 231 sig~ 1; #X obj 207 253 -~; #X obj 277 275 *~ 0.5; #X obj 277 231 sig~ 1; #X obj 277 253 -~; #X text 434 87 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 434 57 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 527 197 a0 = 1 + alpha; #X text 527 257 b0 = (1 - cos(w0))/2; #X text 527 277 b1 = (1 - cos(w0)); #X text 527 297 b2 = (1 - cos(w0))/2; #X text 517 177 LPF:; #X obj 12 88 /~ 44100; #X obj 105 53 loadbang; #X obj 105 74 samplerate~; #X obj 288 72 max~ 0.1; #X obj 117 103 -~ 0.25; #X obj 117 124 cos~; #X obj 12 239 cos~; #X connect 0 0 2 0; #X connect 1 0 48 0; #X connect 2 0 45 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 20 1; #X connect 6 0 23 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 8 0 12 0; #X connect 8 0 14 0; #X connect 8 0 16 0; #X connect 8 0 21 0; #X connect 9 0 11 0; #X connect 10 0 9 1; #X connect 12 0 13 0; #X connect 14 0 15 0; #X connect 16 0 18 0; #X connect 17 0 16 1; #X connect 19 0 20 0; #X connect 20 0 21 1; #X connect 21 0 22 0; #X connect 23 0 8 1; #X connect 31 0 32 0; #X connect 32 0 10 0; #X connect 33 0 34 0; #X connect 34 0 12 1; #X connect 35 0 14 1; #X connect 36 0 37 0; #X connect 37 0 35 0; #X connect 45 0 51 0; #X connect 45 0 49 0; #X connect 46 0 47 0; #X connect 47 0 45 1; #X connect 48 0 4 1; #X connect 49 0 50 0; #X connect 50 0 5 1; #X connect 51 0 32 1; #X connect 51 0 34 1; #X connect 51 0 37 1; #X connect 51 0 17 0; #X restore 62 52 pd lowpass.coeffs; #X obj 46 120 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 99 pd @hv_obj biquad; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 173 11 q; #X obj 173 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 821 407 pd lowpass~; #X obj 884 386 sig~ 1000; #N canvas 0 23 450 300 highpass~ 0; #N canvas 200 23 682 315 highpass.coeffs 0; #X obj 12 46 clip~ 20 20000; #X obj 283 51 clip~ 0.1 100; #X obj 268 73 sig~ 1; #X obj 268 95 /~; #X obj 268 117 *~; #X obj 268 139 *~ 0.5; #X obj 12 215 sig~ 1; #X obj 12 237 /~; #X obj 122 254 *~; #X obj 137 200 +~ 1; #X obj 137 232 *~ 0.5; #X obj 122 276 outlet~ b0; #X obj 192 254 *~; #X obj 207 200 +~ 1; #X obj 192 276 outlet~ b1; #X obj 207 232 *~ -1; #X obj 262 254 *~; #X obj 277 200 +~ 1; #X obj 277 232 *~ 0.5; #X obj 262 276 outlet~ b2; #X obj 332 254 *~; #X obj 347 200 *~ -2; #X obj 332 276 outlet~ a1; #X obj 417 210 sig~ 1; #X obj 417 232 -~; #X obj 402 254 *~; #X obj 402 276 outlet~ a2; #X obj 57 220 +~ 1; #X text 348 141 w0 = 2*pi*f0*Fs; #X text 348 161 alpha = sin(w0)/(2*Q); #X text 512 176 a0 = 1 + alpha; #X text 512 216 a2 = 1 - alpha; #X text 512 196 a1 = -2*cos(w0); #X text 512 256 b1 = -(1 + cos(w0)); #X text 512 236 b0 = (1 + cos(w0))/2; #X text 502 156 HPF:; #X text 512 276 b2 = (1 + cos(w0))/2; #X text 419 36 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 377 51 H(z) = -----------------------------------------; #X text 419 66 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 377 11 Audio-Cookbook:; #X text 377 91 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 12 24 inlet~; #X obj 283 29 inlet~; #X obj 12 67 /~ 44100; #X obj 105 32 loadbang; #X obj 105 53 samplerate~; #X obj 122 83 -~ 0.25; #X obj 122 103 cos~; #X obj 12 186 cos~; #X connect 0 0 44 0; #X connect 1 0 3 1; #X connect 2 0 3 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 24 1; #X connect 5 0 27 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 7 0 12 0; #X connect 7 0 16 0; #X connect 7 0 20 0; #X connect 7 0 25 0; #X connect 8 0 11 0; #X connect 9 0 10 0; #X connect 10 0 8 1; #X connect 12 0 14 0; #X connect 13 0 15 0; #X connect 15 0 12 1; #X connect 16 0 19 0; #X connect 17 0 18 0; #X connect 18 0 16 1; #X connect 20 0 22 0; #X connect 21 0 20 1; #X connect 23 0 24 0; #X connect 24 0 25 1; #X connect 25 0 26 0; #X connect 27 0 7 1; #X connect 42 0 0 0; #X connect 43 0 1 0; #X connect 44 0 47 0; #X connect 44 0 49 0; #X connect 45 0 46 0; #X connect 46 0 44 1; #X connect 47 0 48 0; #X connect 48 0 4 1; #X connect 49 0 9 0; #X connect 49 0 13 0; #X connect 49 0 17 0; #X connect 49 0 21 0; #X restore 62 52 pd highpass.coeffs; #X obj 46 109 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 88 pd @hv_obj biquad; #X obj 12 20 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 167 11 q; #X obj 167 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 768 690 pd highpass~; #X obj 1214 342 t b b; #X obj 1214 405 line~; #X msg 1261 384 0 0; #X msg 1214 384 20000 0; #X obj 72 194 pipe 3; #X obj 672 600 sig~; #X obj 1214 363 del 2; #X obj 716 464 del 3; #X obj 312 269 del 3; #X obj 1261 363 del 3; #X obj 768 711 *~; #X obj 332 451 /~ 7; #X msg 99 416 1 0.1; #X obj 257 591 *~; #X obj 383 489 pipe 3; #X obj 383 510 - 1; #X obj 383 531 / 126; #X obj 361 473 sel 0; #X msg 383 552 1 \$1; #X obj 383 573 -; #X obj 383 594 * -30; #X obj 383 615 + 100; #X obj 383 636 dbtorms; #X msg 231 339 8; #X obj 94 140 inlet; #X obj 242 710 outlet~; #X obj 72 225 pack f f; #X msg 72 246 \$2 \$1; #X connect 0 0 87 0; #X connect 0 1 1 0; #X connect 0 1 100 0; #X connect 1 0 51 0; #X connect 1 0 109 1; #X connect 2 0 49 0; #X connect 2 0 13 0; #X connect 2 0 88 0; #X connect 3 0 4 0; #X connect 4 0 18 0; #X connect 4 0 39 0; #X connect 5 0 6 0; #X connect 5 1 95 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 9 0 10 0; #X connect 9 1 11 0; #X connect 10 0 17 0; #X connect 11 0 12 0; #X connect 12 0 10 1; #X connect 13 0 14 0; #X connect 13 0 35 0; #X connect 13 0 38 0; #X connect 14 0 15 0; #X connect 15 0 17 1; #X connect 16 0 13 1; #X connect 17 0 96 0; #X connect 18 0 7 1; #X connect 19 0 20 0; #X connect 19 1 90 0; #X connect 20 0 22 0; #X connect 21 0 22 0; #X connect 22 0 23 1; #X connect 22 0 93 1; #X connect 23 0 61 0; #X connect 23 0 42 0; #X connect 24 0 25 0; #X connect 24 1 32 0; #X connect 25 0 26 0; #X connect 26 0 27 0; #X connect 27 0 28 0; #X connect 28 0 29 0; #X connect 28 1 30 0; #X connect 29 0 45 1; #X connect 30 0 31 0; #X connect 31 0 29 1; #X connect 32 0 28 0; #X connect 33 0 34 0; #X connect 34 0 43 0; #X connect 35 0 33 0; #X connect 36 0 37 0; #X connect 37 0 40 0; #X connect 38 0 36 0; #X connect 39 0 26 1; #X connect 40 0 44 1; #X connect 41 0 28 0; #X connect 42 0 108 0; #X connect 43 0 44 0; #X connect 44 0 45 0; #X connect 45 0 94 0; #X connect 46 0 2 0; #X connect 46 1 47 0; #X connect 47 0 48 0; #X connect 48 0 7 0; #X connect 48 1 3 0; #X connect 48 2 106 0; #X connect 49 0 5 0; #X connect 49 0 24 0; #X connect 49 1 3 0; #X connect 49 2 50 0; #X connect 50 0 18 1; #X connect 51 0 19 0; #X connect 51 0 83 0; #X connect 51 0 91 0; #X connect 52 0 54 1; #X connect 53 0 54 0; #X connect 54 0 60 0; #X connect 55 0 64 0; #X connect 55 0 66 0; #X connect 56 0 57 0; #X connect 57 0 59 1; #X connect 58 0 59 0; #X connect 59 0 55 1; #X connect 60 0 55 0; #X connect 61 0 80 0; #X connect 62 0 52 0; #X connect 63 0 70 0; #X connect 64 0 69 0; #X connect 65 0 69 1; #X connect 66 0 67 0; #X connect 67 0 65 0; #X connect 68 0 67 1; #X connect 69 0 82 0; #X connect 70 0 62 0; #X connect 76 0 63 1; #X connect 77 0 52 1; #X connect 77 0 57 1; #X connect 78 0 65 1; #X connect 79 0 64 1; #X connect 80 0 63 0; #X connect 81 0 80 1; #X connect 82 0 93 0; #X connect 83 0 89 0; #X connect 83 1 92 0; #X connect 84 0 80 1; #X connect 84 0 82 1; #X connect 85 0 84 0; #X connect 86 0 84 0; #X connect 87 0 109 0; #X connect 88 0 82 1; #X connect 89 0 86 0; #X connect 90 0 21 0; #X connect 91 0 16 0; #X connect 92 0 85 0; #X connect 93 0 42 0; #X connect 94 0 96 0; #X connect 95 0 9 0; #X connect 96 0 23 0; #X connect 97 0 98 0; #X connect 98 0 99 0; #X connect 99 0 101 0; #X connect 100 1 97 0; #X connect 101 0 102 0; #X connect 102 0 103 0; #X connect 103 0 104 0; #X connect 104 0 105 0; #X connect 105 0 96 1; #X connect 106 0 18 1; #X connect 107 0 0 0; #X connect 109 0 110 0; #X connect 110 0 46 0; #X restore 252 213 pd voice; #X obj 312 171 r \$0-poly; #N canvas 0 23 1550 839 voice 0; #X obj 72 173 unpack f f; #X obj 129 194 > 0; #X obj 72 297 mtof; #X msg 117 353 1000 \$1; #X obj 117 374 /; #X obj 72 395 t b b; #X obj 72 437 del 2; #X obj 72 458 pack f f; #X msg 72 479 0 \$2; #X obj 72 500 unpack f f; #X obj 72 556 lop~; #X msg 129 521 1000 \$1; #X obj 129 542 /; #X obj 272 311 phasor~; #X obj 272 332 -~ 0.25; #X obj 272 353 cos~; #X msg 311 290 0; #X obj 257 570 *~; #X obj 117 395 * 2048; #X obj 689 443 t b b; #X msg 689 485 0 1; #X msg 716 485 1 0; #X obj 689 506 line~; #X obj 240 633 *~; #X obj 599 262 t b b; #X obj 599 304 del 2; #X obj 599 325 pack f f; #X msg 599 346 0 \$2; #X obj 599 367 unpack f f; #X obj 599 423 lop~; #X msg 656 388 1000 \$1; #X obj 656 409 /; #X msg 626 283 1 1; #X obj 332 346 -~ 0.25; #X obj 332 367 cos~; #X obj 332 325 *~ 7; #X obj 382 346 -~ 0.25; #X obj 382 367 cos~; #X obj 382 325 *~ 20; #X obj 663 302 * 128; #X obj 382 388 /~ 20; #X msg 520 299 0 50; #X obj 242 689 /~ 2; #X obj 332 388 /~ 7; #X obj 332 409 +~; #X obj 332 430 *~; #X obj 72 276 route 1 0; #X obj 192 297 mtof; #X obj 192 318 t b f b; #X obj 72 318 t b f b; #X msg 150 332 2048; #X obj 311 248 sel 1; #X obj 821 505 *~; #X obj 800 526 sig~ 2; #X obj 800 547 pow~; #X obj 800 589 *~; #X obj 894 512 sig~ 2; #X obj 894 533 pow~; #X obj 879 554 sig~ 1; #X obj 879 575 /~; #X obj 800 568 -~ 1; #X obj 821 365 *~ 0.707946; #N canvas 4 23 162 227 hv.tanh 0; #X obj 12 12 inlet~; #X obj 12 38 clip~ -3 3; #X obj 27 64 *~; #X obj 12 192 outlet~; #X obj 27 140 /~; #X obj 12 166 *~; #X obj 67 90 *~ 9; #X obj 27 90 +~ 27; #X obj 67 116 +~ 27; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 1 0 2 1; #X connect 1 0 5 0; #X connect 2 0 7 0; #X connect 2 0 6 0; #X connect 4 0 5 1; #X connect 5 0 3 0; #X connect 6 0 8 0; #X connect 7 0 4 0; #X connect 8 0 4 1; #X restore 821 484 pd hv.tanh; #X obj 821 443 *~; #X obj 768 648 *~; #X obj 897 655 *~; #X obj 897 603 pow~ 4; #X obj 897 634 *~ -1; #X obj 947 620 r \$0-buz-pha; #X obj 768 669 +~; #X obj 821 463 +~; #X text 915 471 //Pickup Symmetry; #X text 947 580 //Buzz Phase; #X text 947 600 //Buzz Level; #X text 921 409 //Pickup Input; #X text 800 614 //Pickup Level; #X obj 921 429 sig~ 5; #X obj 915 491 sig~ 5; #X obj 947 641 sig~ 0.5; #X obj 800 634 sig~ 1; #N canvas 0 23 450 300 lowpass~ 0; #N canvas 1006 332 706 367 lowpass.coeffs 0; #X obj 12 45 inlet~ freq; #X obj 288 50 inlet~ q; #X obj 12 67 clip~ 20 20000; #X obj 273 94 sig~ 1; #X obj 273 116 /~; #X obj 273 138 *~; #X obj 273 160 *~ 0.5; #X obj 12 261 sig~ 1; #X obj 12 283 /~; #X obj 122 297 *~; #X obj 137 275 *~ 0.5; #X obj 122 319 outlet~ b0; #X obj 192 297 *~; #X obj 192 319 outlet~ b1; #X obj 262 297 *~; #X obj 262 319 outlet~ b2; #X obj 332 297 *~; #X obj 347 253 *~ -2; #X obj 332 319 outlet~ a1; #X obj 417 231 sig~ 1; #X obj 417 253 -~; #X obj 402 297 *~; #X obj 402 319 outlet~ a2; #X obj 57 266 +~ 1; #X text 363 162 w0 = 2*pi*f0*Fs; #X text 363 182 alpha = sin(w0)/(2*Q); #X text 527 237 a2 = 1 - alpha; #X text 527 217 a1 = -2*cos(w0); #X text 392 72 H(z) = -----------------------------------------; #X text 392 32 Audio-Cookbook:; #X text 392 112 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 137 231 sig~ 1; #X obj 137 253 -~; #X obj 207 231 sig~ 1; #X obj 207 253 -~; #X obj 277 275 *~ 0.5; #X obj 277 231 sig~ 1; #X obj 277 253 -~; #X text 434 87 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 434 57 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 527 197 a0 = 1 + alpha; #X text 527 257 b0 = (1 - cos(w0))/2; #X text 527 277 b1 = (1 - cos(w0)); #X text 527 297 b2 = (1 - cos(w0))/2; #X text 517 177 LPF:; #X obj 12 88 /~ 44100; #X obj 105 53 loadbang; #X obj 105 74 samplerate~; #X obj 288 72 max~ 0.1; #X obj 117 103 -~ 0.25; #X obj 117 124 cos~; #X obj 12 239 cos~; #X connect 0 0 2 0; #X connect 1 0 48 0; #X connect 2 0 45 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 20 1; #X connect 6 0 23 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 8 0 12 0; #X connect 8 0 14 0; #X connect 8 0 16 0; #X connect 8 0 21 0; #X connect 9 0 11 0; #X connect 10 0 9 1; #X connect 12 0 13 0; #X connect 14 0 15 0; #X connect 16 0 18 0; #X connect 17 0 16 1; #X connect 19 0 20 0; #X connect 20 0 21 1; #X connect 21 0 22 0; #X connect 23 0 8 1; #X connect 31 0 32 0; #X connect 32 0 10 0; #X connect 33 0 34 0; #X connect 34 0 12 1; #X connect 35 0 14 1; #X connect 36 0 37 0; #X connect 37 0 35 0; #X connect 45 0 51 0; #X connect 45 0 49 0; #X connect 46 0 47 0; #X connect 47 0 45 1; #X connect 48 0 4 1; #X connect 49 0 50 0; #X connect 50 0 5 1; #X connect 51 0 32 1; #X connect 51 0 34 1; #X connect 51 0 37 1; #X connect 51 0 17 0; #X restore 62 52 pd lowpass.coeffs; #X obj 46 120 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 99 pd @hv_obj biquad; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 173 11 q; #X obj 173 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 821 407 pd lowpass~; #X obj 884 386 sig~ 1000; #N canvas 0 23 450 300 highpass~ 0; #N canvas 200 23 682 315 highpass.coeffs 0; #X obj 12 46 clip~ 20 20000; #X obj 283 51 clip~ 0.1 100; #X obj 268 73 sig~ 1; #X obj 268 95 /~; #X obj 268 117 *~; #X obj 268 139 *~ 0.5; #X obj 12 215 sig~ 1; #X obj 12 237 /~; #X obj 122 254 *~; #X obj 137 200 +~ 1; #X obj 137 232 *~ 0.5; #X obj 122 276 outlet~ b0; #X obj 192 254 *~; #X obj 207 200 +~ 1; #X obj 192 276 outlet~ b1; #X obj 207 232 *~ -1; #X obj 262 254 *~; #X obj 277 200 +~ 1; #X obj 277 232 *~ 0.5; #X obj 262 276 outlet~ b2; #X obj 332 254 *~; #X obj 347 200 *~ -2; #X obj 332 276 outlet~ a1; #X obj 417 210 sig~ 1; #X obj 417 232 -~; #X obj 402 254 *~; #X obj 402 276 outlet~ a2; #X obj 57 220 +~ 1; #X text 348 141 w0 = 2*pi*f0*Fs; #X text 348 161 alpha = sin(w0)/(2*Q); #X text 512 176 a0 = 1 + alpha; #X text 512 216 a2 = 1 - alpha; #X text 512 196 a1 = -2*cos(w0); #X text 512 256 b1 = -(1 + cos(w0)); #X text 512 236 b0 = (1 + cos(w0))/2; #X text 502 156 HPF:; #X text 512 276 b2 = (1 + cos(w0))/2; #X text 419 36 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 377 51 H(z) = -----------------------------------------; #X text 419 66 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 377 11 Audio-Cookbook:; #X text 377 91 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 12 24 inlet~; #X obj 283 29 inlet~; #X obj 12 67 /~ 44100; #X obj 105 32 loadbang; #X obj 105 53 samplerate~; #X obj 122 83 -~ 0.25; #X obj 122 103 cos~; #X obj 12 186 cos~; #X connect 0 0 44 0; #X connect 1 0 3 1; #X connect 2 0 3 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 24 1; #X connect 5 0 27 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 7 0 12 0; #X connect 7 0 16 0; #X connect 7 0 20 0; #X connect 7 0 25 0; #X connect 8 0 11 0; #X connect 9 0 10 0; #X connect 10 0 8 1; #X connect 12 0 14 0; #X connect 13 0 15 0; #X connect 15 0 12 1; #X connect 16 0 19 0; #X connect 17 0 18 0; #X connect 18 0 16 1; #X connect 20 0 22 0; #X connect 21 0 20 1; #X connect 23 0 24 0; #X connect 24 0 25 1; #X connect 25 0 26 0; #X connect 27 0 7 1; #X connect 42 0 0 0; #X connect 43 0 1 0; #X connect 44 0 47 0; #X connect 44 0 49 0; #X connect 45 0 46 0; #X connect 46 0 44 1; #X connect 47 0 48 0; #X connect 48 0 4 1; #X connect 49 0 9 0; #X connect 49 0 13 0; #X connect 49 0 17 0; #X connect 49 0 21 0; #X restore 62 52 pd highpass.coeffs; #X obj 46 109 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 88 pd @hv_obj biquad; #X obj 12 20 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 167 11 q; #X obj 167 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 768 690 pd highpass~; #X obj 1214 342 t b b; #X obj 1214 405 line~; #X msg 1261 384 0 0; #X msg 1214 384 20000 0; #X obj 72 194 pipe 3; #X obj 672 600 sig~; #X obj 1214 363 del 2; #X obj 716 464 del 3; #X obj 312 269 del 3; #X obj 1261 363 del 3; #X obj 768 711 *~; #X obj 332 451 /~ 7; #X msg 99 416 1 0.1; #X obj 257 591 *~; #X obj 383 489 pipe 3; #X obj 383 510 - 1; #X obj 383 531 / 126; #X obj 361 473 sel 0; #X msg 383 552 1 \$1; #X obj 383 573 -; #X obj 383 594 * -30; #X obj 383 615 + 100; #X obj 383 636 dbtorms; #X msg 231 339 8; #X obj 94 140 inlet; #X obj 242 710 outlet~; #X obj 72 225 pack f f; #X msg 72 246 \$2 \$1; #X connect 0 0 87 0; #X connect 0 1 1 0; #X connect 0 1 100 0; #X connect 1 0 51 0; #X connect 1 0 109 1; #X connect 2 0 49 0; #X connect 2 0 13 0; #X connect 2 0 88 0; #X connect 3 0 4 0; #X connect 4 0 18 0; #X connect 4 0 39 0; #X connect 5 0 6 0; #X connect 5 1 95 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 9 0 10 0; #X connect 9 1 11 0; #X connect 10 0 17 0; #X connect 11 0 12 0; #X connect 12 0 10 1; #X connect 13 0 14 0; #X connect 13 0 35 0; #X connect 13 0 38 0; #X connect 14 0 15 0; #X connect 15 0 17 1; #X connect 16 0 13 1; #X connect 17 0 96 0; #X connect 18 0 7 1; #X connect 19 0 20 0; #X connect 19 1 90 0; #X connect 20 0 22 0; #X connect 21 0 22 0; #X connect 22 0 23 1; #X connect 22 0 93 1; #X connect 23 0 61 0; #X connect 23 0 42 0; #X connect 24 0 25 0; #X connect 24 1 32 0; #X connect 25 0 26 0; #X connect 26 0 27 0; #X connect 27 0 28 0; #X connect 28 0 29 0; #X connect 28 1 30 0; #X connect 29 0 45 1; #X connect 30 0 31 0; #X connect 31 0 29 1; #X connect 32 0 28 0; #X connect 33 0 34 0; #X connect 34 0 43 0; #X connect 35 0 33 0; #X connect 36 0 37 0; #X connect 37 0 40 0; #X connect 38 0 36 0; #X connect 39 0 26 1; #X connect 40 0 44 1; #X connect 41 0 28 0; #X connect 42 0 108 0; #X connect 43 0 44 0; #X connect 44 0 45 0; #X connect 45 0 94 0; #X connect 46 0 2 0; #X connect 46 1 47 0; #X connect 47 0 48 0; #X connect 48 0 7 0; #X connect 48 1 3 0; #X connect 48 2 106 0; #X connect 49 0 5 0; #X connect 49 0 24 0; #X connect 49 1 3 0; #X connect 49 2 50 0; #X connect 50 0 18 1; #X connect 51 0 19 0; #X connect 51 0 83 0; #X connect 51 0 91 0; #X connect 52 0 54 1; #X connect 53 0 54 0; #X connect 54 0 60 0; #X connect 55 0 64 0; #X connect 55 0 66 0; #X connect 56 0 57 0; #X connect 57 0 59 1; #X connect 58 0 59 0; #X connect 59 0 55 1; #X connect 60 0 55 0; #X connect 61 0 80 0; #X connect 62 0 52 0; #X connect 63 0 70 0; #X connect 64 0 69 0; #X connect 65 0 69 1; #X connect 66 0 67 0; #X connect 67 0 65 0; #X connect 68 0 67 1; #X connect 69 0 82 0; #X connect 70 0 62 0; #X connect 76 0 63 1; #X connect 77 0 52 1; #X connect 77 0 57 1; #X connect 78 0 65 1; #X connect 79 0 64 1; #X connect 80 0 63 0; #X connect 81 0 80 1; #X connect 82 0 93 0; #X connect 83 0 89 0; #X connect 83 1 92 0; #X connect 84 0 80 1; #X connect 84 0 82 1; #X connect 85 0 84 0; #X connect 86 0 84 0; #X connect 87 0 109 0; #X connect 88 0 82 1; #X connect 89 0 86 0; #X connect 90 0 21 0; #X connect 91 0 16 0; #X connect 92 0 85 0; #X connect 93 0 42 0; #X connect 94 0 96 0; #X connect 95 0 9 0; #X connect 96 0 23 0; #X connect 97 0 98 0; #X connect 98 0 99 0; #X connect 99 0 101 0; #X connect 100 1 97 0; #X connect 101 0 102 0; #X connect 102 0 103 0; #X connect 103 0 104 0; #X connect 104 0 105 0; #X connect 105 0 96 1; #X connect 106 0 18 1; #X connect 107 0 0 0; #X connect 109 0 110 0; #X connect 110 0 46 0; #X restore 312 213 pd voice; #X obj 372 171 r \$0-poly; #N canvas 0 23 1550 839 voice 0; #X obj 72 173 unpack f f; #X obj 129 194 > 0; #X obj 72 297 mtof; #X msg 117 353 1000 \$1; #X obj 117 374 /; #X obj 72 395 t b b; #X obj 72 437 del 2; #X obj 72 458 pack f f; #X msg 72 479 0 \$2; #X obj 72 500 unpack f f; #X obj 72 556 lop~; #X msg 129 521 1000 \$1; #X obj 129 542 /; #X obj 272 311 phasor~; #X obj 272 332 -~ 0.25; #X obj 272 353 cos~; #X msg 311 290 0; #X obj 257 570 *~; #X obj 117 395 * 2048; #X obj 689 443 t b b; #X msg 689 485 0 1; #X msg 716 485 1 0; #X obj 689 506 line~; #X obj 240 633 *~; #X obj 599 262 t b b; #X obj 599 304 del 2; #X obj 599 325 pack f f; #X msg 599 346 0 \$2; #X obj 599 367 unpack f f; #X obj 599 423 lop~; #X msg 656 388 1000 \$1; #X obj 656 409 /; #X msg 626 283 1 1; #X obj 332 346 -~ 0.25; #X obj 332 367 cos~; #X obj 332 325 *~ 7; #X obj 382 346 -~ 0.25; #X obj 382 367 cos~; #X obj 382 325 *~ 20; #X obj 663 302 * 128; #X obj 382 388 /~ 20; #X msg 520 299 0 50; #X obj 242 689 /~ 2; #X obj 332 388 /~ 7; #X obj 332 409 +~; #X obj 332 430 *~; #X obj 72 276 route 1 0; #X obj 192 297 mtof; #X obj 192 318 t b f b; #X obj 72 318 t b f b; #X msg 150 332 2048; #X obj 311 248 sel 1; #X obj 821 505 *~; #X obj 800 526 sig~ 2; #X obj 800 547 pow~; #X obj 800 589 *~; #X obj 894 512 sig~ 2; #X obj 894 533 pow~; #X obj 879 554 sig~ 1; #X obj 879 575 /~; #X obj 800 568 -~ 1; #X obj 821 365 *~ 0.707946; #N canvas 4 23 162 227 hv.tanh 0; #X obj 12 12 inlet~; #X obj 12 38 clip~ -3 3; #X obj 27 64 *~; #X obj 12 192 outlet~; #X obj 27 140 /~; #X obj 12 166 *~; #X obj 67 90 *~ 9; #X obj 27 90 +~ 27; #X obj 67 116 +~ 27; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 1 0 2 1; #X connect 1 0 5 0; #X connect 2 0 7 0; #X connect 2 0 6 0; #X connect 4 0 5 1; #X connect 5 0 3 0; #X connect 6 0 8 0; #X connect 7 0 4 0; #X connect 8 0 4 1; #X restore 821 484 pd hv.tanh; #X obj 821 443 *~; #X obj 768 648 *~; #X obj 897 655 *~; #X obj 897 603 pow~ 4; #X obj 897 634 *~ -1; #X obj 947 620 r \$0-buz-pha; #X obj 768 669 +~; #X obj 821 463 +~; #X text 915 471 //Pickup Symmetry; #X text 947 580 //Buzz Phase; #X text 947 600 //Buzz Level; #X text 921 409 //Pickup Input; #X text 800 614 //Pickup Level; #X obj 921 429 sig~ 5; #X obj 915 491 sig~ 5; #X obj 947 641 sig~ 0.5; #X obj 800 634 sig~ 1; #N canvas 0 23 450 300 lowpass~ 0; #N canvas 1006 332 706 367 lowpass.coeffs 0; #X obj 12 45 inlet~ freq; #X obj 288 50 inlet~ q; #X obj 12 67 clip~ 20 20000; #X obj 273 94 sig~ 1; #X obj 273 116 /~; #X obj 273 138 *~; #X obj 273 160 *~ 0.5; #X obj 12 261 sig~ 1; #X obj 12 283 /~; #X obj 122 297 *~; #X obj 137 275 *~ 0.5; #X obj 122 319 outlet~ b0; #X obj 192 297 *~; #X obj 192 319 outlet~ b1; #X obj 262 297 *~; #X obj 262 319 outlet~ b2; #X obj 332 297 *~; #X obj 347 253 *~ -2; #X obj 332 319 outlet~ a1; #X obj 417 231 sig~ 1; #X obj 417 253 -~; #X obj 402 297 *~; #X obj 402 319 outlet~ a2; #X obj 57 266 +~ 1; #X text 363 162 w0 = 2*pi*f0*Fs; #X text 363 182 alpha = sin(w0)/(2*Q); #X text 527 237 a2 = 1 - alpha; #X text 527 217 a1 = -2*cos(w0); #X text 392 72 H(z) = -----------------------------------------; #X text 392 32 Audio-Cookbook:; #X text 392 112 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 137 231 sig~ 1; #X obj 137 253 -~; #X obj 207 231 sig~ 1; #X obj 207 253 -~; #X obj 277 275 *~ 0.5; #X obj 277 231 sig~ 1; #X obj 277 253 -~; #X text 434 87 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 434 57 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 527 197 a0 = 1 + alpha; #X text 527 257 b0 = (1 - cos(w0))/2; #X text 527 277 b1 = (1 - cos(w0)); #X text 527 297 b2 = (1 - cos(w0))/2; #X text 517 177 LPF:; #X obj 12 88 /~ 44100; #X obj 105 53 loadbang; #X obj 105 74 samplerate~; #X obj 288 72 max~ 0.1; #X obj 117 103 -~ 0.25; #X obj 117 124 cos~; #X obj 12 239 cos~; #X connect 0 0 2 0; #X connect 1 0 48 0; #X connect 2 0 45 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 20 1; #X connect 6 0 23 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 8 0 12 0; #X connect 8 0 14 0; #X connect 8 0 16 0; #X connect 8 0 21 0; #X connect 9 0 11 0; #X connect 10 0 9 1; #X connect 12 0 13 0; #X connect 14 0 15 0; #X connect 16 0 18 0; #X connect 17 0 16 1; #X connect 19 0 20 0; #X connect 20 0 21 1; #X connect 21 0 22 0; #X connect 23 0 8 1; #X connect 31 0 32 0; #X connect 32 0 10 0; #X connect 33 0 34 0; #X connect 34 0 12 1; #X connect 35 0 14 1; #X connect 36 0 37 0; #X connect 37 0 35 0; #X connect 45 0 51 0; #X connect 45 0 49 0; #X connect 46 0 47 0; #X connect 47 0 45 1; #X connect 48 0 4 1; #X connect 49 0 50 0; #X connect 50 0 5 1; #X connect 51 0 32 1; #X connect 51 0 34 1; #X connect 51 0 37 1; #X connect 51 0 17 0; #X restore 62 52 pd lowpass.coeffs; #X obj 46 120 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 99 pd @hv_obj biquad; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 173 11 q; #X obj 173 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 821 407 pd lowpass~; #X obj 884 386 sig~ 1000; #N canvas 0 23 450 300 highpass~ 0; #N canvas 200 23 682 315 highpass.coeffs 0; #X obj 12 46 clip~ 20 20000; #X obj 283 51 clip~ 0.1 100; #X obj 268 73 sig~ 1; #X obj 268 95 /~; #X obj 268 117 *~; #X obj 268 139 *~ 0.5; #X obj 12 215 sig~ 1; #X obj 12 237 /~; #X obj 122 254 *~; #X obj 137 200 +~ 1; #X obj 137 232 *~ 0.5; #X obj 122 276 outlet~ b0; #X obj 192 254 *~; #X obj 207 200 +~ 1; #X obj 192 276 outlet~ b1; #X obj 207 232 *~ -1; #X obj 262 254 *~; #X obj 277 200 +~ 1; #X obj 277 232 *~ 0.5; #X obj 262 276 outlet~ b2; #X obj 332 254 *~; #X obj 347 200 *~ -2; #X obj 332 276 outlet~ a1; #X obj 417 210 sig~ 1; #X obj 417 232 -~; #X obj 402 254 *~; #X obj 402 276 outlet~ a2; #X obj 57 220 +~ 1; #X text 348 141 w0 = 2*pi*f0*Fs; #X text 348 161 alpha = sin(w0)/(2*Q); #X text 512 176 a0 = 1 + alpha; #X text 512 216 a2 = 1 - alpha; #X text 512 196 a1 = -2*cos(w0); #X text 512 256 b1 = -(1 + cos(w0)); #X text 512 236 b0 = (1 + cos(w0))/2; #X text 502 156 HPF:; #X text 512 276 b2 = (1 + cos(w0))/2; #X text 419 36 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 377 51 H(z) = -----------------------------------------; #X text 419 66 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 377 11 Audio-Cookbook:; #X text 377 91 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 12 24 inlet~; #X obj 283 29 inlet~; #X obj 12 67 /~ 44100; #X obj 105 32 loadbang; #X obj 105 53 samplerate~; #X obj 122 83 -~ 0.25; #X obj 122 103 cos~; #X obj 12 186 cos~; #X connect 0 0 44 0; #X connect 1 0 3 1; #X connect 2 0 3 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 24 1; #X connect 5 0 27 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 7 0 12 0; #X connect 7 0 16 0; #X connect 7 0 20 0; #X connect 7 0 25 0; #X connect 8 0 11 0; #X connect 9 0 10 0; #X connect 10 0 8 1; #X connect 12 0 14 0; #X connect 13 0 15 0; #X connect 15 0 12 1; #X connect 16 0 19 0; #X connect 17 0 18 0; #X connect 18 0 16 1; #X connect 20 0 22 0; #X connect 21 0 20 1; #X connect 23 0 24 0; #X connect 24 0 25 1; #X connect 25 0 26 0; #X connect 27 0 7 1; #X connect 42 0 0 0; #X connect 43 0 1 0; #X connect 44 0 47 0; #X connect 44 0 49 0; #X connect 45 0 46 0; #X connect 46 0 44 1; #X connect 47 0 48 0; #X connect 48 0 4 1; #X connect 49 0 9 0; #X connect 49 0 13 0; #X connect 49 0 17 0; #X connect 49 0 21 0; #X restore 62 52 pd highpass.coeffs; #X obj 46 109 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 88 pd @hv_obj biquad; #X obj 12 20 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 167 11 q; #X obj 167 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 768 690 pd highpass~; #X obj 1214 342 t b b; #X obj 1214 405 line~; #X msg 1261 384 0 0; #X msg 1214 384 20000 0; #X obj 72 194 pipe 3; #X obj 672 600 sig~; #X obj 1214 363 del 2; #X obj 716 464 del 3; #X obj 312 269 del 3; #X obj 1261 363 del 3; #X obj 768 711 *~; #X obj 332 451 /~ 7; #X msg 99 416 1 0.1; #X obj 257 591 *~; #X obj 383 489 pipe 3; #X obj 383 510 - 1; #X obj 383 531 / 126; #X obj 361 473 sel 0; #X msg 383 552 1 \$1; #X obj 383 573 -; #X obj 383 594 * -30; #X obj 383 615 + 100; #X obj 383 636 dbtorms; #X msg 231 339 8; #X obj 94 140 inlet; #X obj 242 710 outlet~; #X obj 72 225 pack f f; #X msg 72 246 \$2 \$1; #X connect 0 0 87 0; #X connect 0 1 1 0; #X connect 0 1 100 0; #X connect 1 0 51 0; #X connect 1 0 109 1; #X connect 2 0 49 0; #X connect 2 0 13 0; #X connect 2 0 88 0; #X connect 3 0 4 0; #X connect 4 0 18 0; #X connect 4 0 39 0; #X connect 5 0 6 0; #X connect 5 1 95 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 9 0 10 0; #X connect 9 1 11 0; #X connect 10 0 17 0; #X connect 11 0 12 0; #X connect 12 0 10 1; #X connect 13 0 14 0; #X connect 13 0 35 0; #X connect 13 0 38 0; #X connect 14 0 15 0; #X connect 15 0 17 1; #X connect 16 0 13 1; #X connect 17 0 96 0; #X connect 18 0 7 1; #X connect 19 0 20 0; #X connect 19 1 90 0; #X connect 20 0 22 0; #X connect 21 0 22 0; #X connect 22 0 23 1; #X connect 22 0 93 1; #X connect 23 0 61 0; #X connect 23 0 42 0; #X connect 24 0 25 0; #X connect 24 1 32 0; #X connect 25 0 26 0; #X connect 26 0 27 0; #X connect 27 0 28 0; #X connect 28 0 29 0; #X connect 28 1 30 0; #X connect 29 0 45 1; #X connect 30 0 31 0; #X connect 31 0 29 1; #X connect 32 0 28 0; #X connect 33 0 34 0; #X connect 34 0 43 0; #X connect 35 0 33 0; #X connect 36 0 37 0; #X connect 37 0 40 0; #X connect 38 0 36 0; #X connect 39 0 26 1; #X connect 40 0 44 1; #X connect 41 0 28 0; #X connect 42 0 108 0; #X connect 43 0 44 0; #X connect 44 0 45 0; #X connect 45 0 94 0; #X connect 46 0 2 0; #X connect 46 1 47 0; #X connect 47 0 48 0; #X connect 48 0 7 0; #X connect 48 1 3 0; #X connect 48 2 106 0; #X connect 49 0 5 0; #X connect 49 0 24 0; #X connect 49 1 3 0; #X connect 49 2 50 0; #X connect 50 0 18 1; #X connect 51 0 19 0; #X connect 51 0 83 0; #X connect 51 0 91 0; #X connect 52 0 54 1; #X connect 53 0 54 0; #X connect 54 0 60 0; #X connect 55 0 64 0; #X connect 55 0 66 0; #X connect 56 0 57 0; #X connect 57 0 59 1; #X connect 58 0 59 0; #X connect 59 0 55 1; #X connect 60 0 55 0; #X connect 61 0 80 0; #X connect 62 0 52 0; #X connect 63 0 70 0; #X connect 64 0 69 0; #X connect 65 0 69 1; #X connect 66 0 67 0; #X connect 67 0 65 0; #X connect 68 0 67 1; #X connect 69 0 82 0; #X connect 70 0 62 0; #X connect 76 0 63 1; #X connect 77 0 52 1; #X connect 77 0 57 1; #X connect 78 0 65 1; #X connect 79 0 64 1; #X connect 80 0 63 0; #X connect 81 0 80 1; #X connect 82 0 93 0; #X connect 83 0 89 0; #X connect 83 1 92 0; #X connect 84 0 80 1; #X connect 84 0 82 1; #X connect 85 0 84 0; #X connect 86 0 84 0; #X connect 87 0 109 0; #X connect 88 0 82 1; #X connect 89 0 86 0; #X connect 90 0 21 0; #X connect 91 0 16 0; #X connect 92 0 85 0; #X connect 93 0 42 0; #X connect 94 0 96 0; #X connect 95 0 9 0; #X connect 96 0 23 0; #X connect 97 0 98 0; #X connect 98 0 99 0; #X connect 99 0 101 0; #X connect 100 1 97 0; #X connect 101 0 102 0; #X connect 102 0 103 0; #X connect 103 0 104 0; #X connect 104 0 105 0; #X connect 105 0 96 1; #X connect 106 0 18 1; #X connect 107 0 0 0; #X connect 109 0 110 0; #X connect 110 0 46 0; #X restore 372 213 pd voice; #X obj 432 171 r \$0-poly; #N canvas 0 23 1550 839 voice 0; #X obj 72 173 unpack f f; #X obj 129 194 > 0; #X obj 72 297 mtof; #X msg 117 353 1000 \$1; #X obj 117 374 /; #X obj 72 395 t b b; #X obj 72 437 del 2; #X obj 72 458 pack f f; #X msg 72 479 0 \$2; #X obj 72 500 unpack f f; #X obj 72 556 lop~; #X msg 129 521 1000 \$1; #X obj 129 542 /; #X obj 272 311 phasor~; #X obj 272 332 -~ 0.25; #X obj 272 353 cos~; #X msg 311 290 0; #X obj 257 570 *~; #X obj 117 395 * 2048; #X obj 689 443 t b b; #X msg 689 485 0 1; #X msg 716 485 1 0; #X obj 689 506 line~; #X obj 240 633 *~; #X obj 599 262 t b b; #X obj 599 304 del 2; #X obj 599 325 pack f f; #X msg 599 346 0 \$2; #X obj 599 367 unpack f f; #X obj 599 423 lop~; #X msg 656 388 1000 \$1; #X obj 656 409 /; #X msg 626 283 1 1; #X obj 332 346 -~ 0.25; #X obj 332 367 cos~; #X obj 332 325 *~ 7; #X obj 382 346 -~ 0.25; #X obj 382 367 cos~; #X obj 382 325 *~ 20; #X obj 663 302 * 128; #X obj 382 388 /~ 20; #X msg 520 299 0 50; #X obj 242 689 /~ 2; #X obj 332 388 /~ 7; #X obj 332 409 +~; #X obj 332 430 *~; #X obj 72 276 route 1 0; #X obj 192 297 mtof; #X obj 192 318 t b f b; #X obj 72 318 t b f b; #X msg 150 332 2048; #X obj 311 248 sel 1; #X obj 821 505 *~; #X obj 800 526 sig~ 2; #X obj 800 547 pow~; #X obj 800 589 *~; #X obj 894 512 sig~ 2; #X obj 894 533 pow~; #X obj 879 554 sig~ 1; #X obj 879 575 /~; #X obj 800 568 -~ 1; #X obj 821 365 *~ 0.707946; #N canvas 4 23 162 227 hv.tanh 0; #X obj 12 12 inlet~; #X obj 12 38 clip~ -3 3; #X obj 27 64 *~; #X obj 12 192 outlet~; #X obj 27 140 /~; #X obj 12 166 *~; #X obj 67 90 *~ 9; #X obj 27 90 +~ 27; #X obj 67 116 +~ 27; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 1 0 2 1; #X connect 1 0 5 0; #X connect 2 0 7 0; #X connect 2 0 6 0; #X connect 4 0 5 1; #X connect 5 0 3 0; #X connect 6 0 8 0; #X connect 7 0 4 0; #X connect 8 0 4 1; #X restore 821 484 pd hv.tanh; #X obj 821 443 *~; #X obj 768 648 *~; #X obj 897 655 *~; #X obj 897 603 pow~ 4; #X obj 897 634 *~ -1; #X obj 947 620 r \$0-buz-pha; #X obj 768 669 +~; #X obj 821 463 +~; #X text 915 471 //Pickup Symmetry; #X text 947 580 //Buzz Phase; #X text 947 600 //Buzz Level; #X text 921 409 //Pickup Input; #X text 800 614 //Pickup Level; #X obj 921 429 sig~ 5; #X obj 915 491 sig~ 5; #X obj 947 641 sig~ 0.5; #X obj 800 634 sig~ 1; #N canvas 0 23 450 300 lowpass~ 0; #N canvas 1006 332 706 367 lowpass.coeffs 0; #X obj 12 45 inlet~ freq; #X obj 288 50 inlet~ q; #X obj 12 67 clip~ 20 20000; #X obj 273 94 sig~ 1; #X obj 273 116 /~; #X obj 273 138 *~; #X obj 273 160 *~ 0.5; #X obj 12 261 sig~ 1; #X obj 12 283 /~; #X obj 122 297 *~; #X obj 137 275 *~ 0.5; #X obj 122 319 outlet~ b0; #X obj 192 297 *~; #X obj 192 319 outlet~ b1; #X obj 262 297 *~; #X obj 262 319 outlet~ b2; #X obj 332 297 *~; #X obj 347 253 *~ -2; #X obj 332 319 outlet~ a1; #X obj 417 231 sig~ 1; #X obj 417 253 -~; #X obj 402 297 *~; #X obj 402 319 outlet~ a2; #X obj 57 266 +~ 1; #X text 363 162 w0 = 2*pi*f0*Fs; #X text 363 182 alpha = sin(w0)/(2*Q); #X text 527 237 a2 = 1 - alpha; #X text 527 217 a1 = -2*cos(w0); #X text 392 72 H(z) = -----------------------------------------; #X text 392 32 Audio-Cookbook:; #X text 392 112 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 137 231 sig~ 1; #X obj 137 253 -~; #X obj 207 231 sig~ 1; #X obj 207 253 -~; #X obj 277 275 *~ 0.5; #X obj 277 231 sig~ 1; #X obj 277 253 -~; #X text 434 87 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 434 57 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 527 197 a0 = 1 + alpha; #X text 527 257 b0 = (1 - cos(w0))/2; #X text 527 277 b1 = (1 - cos(w0)); #X text 527 297 b2 = (1 - cos(w0))/2; #X text 517 177 LPF:; #X obj 12 88 /~ 44100; #X obj 105 53 loadbang; #X obj 105 74 samplerate~; #X obj 288 72 max~ 0.1; #X obj 117 103 -~ 0.25; #X obj 117 124 cos~; #X obj 12 239 cos~; #X connect 0 0 2 0; #X connect 1 0 48 0; #X connect 2 0 45 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 20 1; #X connect 6 0 23 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 8 0 12 0; #X connect 8 0 14 0; #X connect 8 0 16 0; #X connect 8 0 21 0; #X connect 9 0 11 0; #X connect 10 0 9 1; #X connect 12 0 13 0; #X connect 14 0 15 0; #X connect 16 0 18 0; #X connect 17 0 16 1; #X connect 19 0 20 0; #X connect 20 0 21 1; #X connect 21 0 22 0; #X connect 23 0 8 1; #X connect 31 0 32 0; #X connect 32 0 10 0; #X connect 33 0 34 0; #X connect 34 0 12 1; #X connect 35 0 14 1; #X connect 36 0 37 0; #X connect 37 0 35 0; #X connect 45 0 51 0; #X connect 45 0 49 0; #X connect 46 0 47 0; #X connect 47 0 45 1; #X connect 48 0 4 1; #X connect 49 0 50 0; #X connect 50 0 5 1; #X connect 51 0 32 1; #X connect 51 0 34 1; #X connect 51 0 37 1; #X connect 51 0 17 0; #X restore 62 52 pd lowpass.coeffs; #X obj 46 120 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 99 pd @hv_obj biquad; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 173 11 q; #X obj 173 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 821 407 pd lowpass~; #X obj 884 386 sig~ 1000; #N canvas 0 23 450 300 highpass~ 0; #N canvas 200 23 682 315 highpass.coeffs 0; #X obj 12 46 clip~ 20 20000; #X obj 283 51 clip~ 0.1 100; #X obj 268 73 sig~ 1; #X obj 268 95 /~; #X obj 268 117 *~; #X obj 268 139 *~ 0.5; #X obj 12 215 sig~ 1; #X obj 12 237 /~; #X obj 122 254 *~; #X obj 137 200 +~ 1; #X obj 137 232 *~ 0.5; #X obj 122 276 outlet~ b0; #X obj 192 254 *~; #X obj 207 200 +~ 1; #X obj 192 276 outlet~ b1; #X obj 207 232 *~ -1; #X obj 262 254 *~; #X obj 277 200 +~ 1; #X obj 277 232 *~ 0.5; #X obj 262 276 outlet~ b2; #X obj 332 254 *~; #X obj 347 200 *~ -2; #X obj 332 276 outlet~ a1; #X obj 417 210 sig~ 1; #X obj 417 232 -~; #X obj 402 254 *~; #X obj 402 276 outlet~ a2; #X obj 57 220 +~ 1; #X text 348 141 w0 = 2*pi*f0*Fs; #X text 348 161 alpha = sin(w0)/(2*Q); #X text 512 176 a0 = 1 + alpha; #X text 512 216 a2 = 1 - alpha; #X text 512 196 a1 = -2*cos(w0); #X text 512 256 b1 = -(1 + cos(w0)); #X text 512 236 b0 = (1 + cos(w0))/2; #X text 502 156 HPF:; #X text 512 276 b2 = (1 + cos(w0))/2; #X text 419 36 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 377 51 H(z) = -----------------------------------------; #X text 419 66 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 377 11 Audio-Cookbook:; #X text 377 91 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 12 24 inlet~; #X obj 283 29 inlet~; #X obj 12 67 /~ 44100; #X obj 105 32 loadbang; #X obj 105 53 samplerate~; #X obj 122 83 -~ 0.25; #X obj 122 103 cos~; #X obj 12 186 cos~; #X connect 0 0 44 0; #X connect 1 0 3 1; #X connect 2 0 3 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 24 1; #X connect 5 0 27 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 7 0 12 0; #X connect 7 0 16 0; #X connect 7 0 20 0; #X connect 7 0 25 0; #X connect 8 0 11 0; #X connect 9 0 10 0; #X connect 10 0 8 1; #X connect 12 0 14 0; #X connect 13 0 15 0; #X connect 15 0 12 1; #X connect 16 0 19 0; #X connect 17 0 18 0; #X connect 18 0 16 1; #X connect 20 0 22 0; #X connect 21 0 20 1; #X connect 23 0 24 0; #X connect 24 0 25 1; #X connect 25 0 26 0; #X connect 27 0 7 1; #X connect 42 0 0 0; #X connect 43 0 1 0; #X connect 44 0 47 0; #X connect 44 0 49 0; #X connect 45 0 46 0; #X connect 46 0 44 1; #X connect 47 0 48 0; #X connect 48 0 4 1; #X connect 49 0 9 0; #X connect 49 0 13 0; #X connect 49 0 17 0; #X connect 49 0 21 0; #X restore 62 52 pd highpass.coeffs; #X obj 46 109 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 88 pd @hv_obj biquad; #X obj 12 20 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 167 11 q; #X obj 167 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 768 690 pd highpass~; #X obj 1214 342 t b b; #X obj 1214 405 line~; #X msg 1261 384 0 0; #X msg 1214 384 20000 0; #X obj 72 194 pipe 3; #X obj 672 600 sig~; #X obj 1214 363 del 2; #X obj 716 464 del 3; #X obj 312 269 del 3; #X obj 1261 363 del 3; #X obj 768 711 *~; #X obj 332 451 /~ 7; #X msg 99 416 1 0.1; #X obj 257 591 *~; #X obj 383 489 pipe 3; #X obj 383 510 - 1; #X obj 383 531 / 126; #X obj 361 473 sel 0; #X msg 383 552 1 \$1; #X obj 383 573 -; #X obj 383 594 * -30; #X obj 383 615 + 100; #X obj 383 636 dbtorms; #X msg 231 339 8; #X obj 94 140 inlet; #X obj 242 710 outlet~; #X obj 72 225 pack f f; #X msg 72 246 \$2 \$1; #X connect 0 0 87 0; #X connect 0 1 1 0; #X connect 0 1 100 0; #X connect 1 0 51 0; #X connect 1 0 109 1; #X connect 2 0 49 0; #X connect 2 0 13 0; #X connect 2 0 88 0; #X connect 3 0 4 0; #X connect 4 0 18 0; #X connect 4 0 39 0; #X connect 5 0 6 0; #X connect 5 1 95 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 9 0 10 0; #X connect 9 1 11 0; #X connect 10 0 17 0; #X connect 11 0 12 0; #X connect 12 0 10 1; #X connect 13 0 14 0; #X connect 13 0 35 0; #X connect 13 0 38 0; #X connect 14 0 15 0; #X connect 15 0 17 1; #X connect 16 0 13 1; #X connect 17 0 96 0; #X connect 18 0 7 1; #X connect 19 0 20 0; #X connect 19 1 90 0; #X connect 20 0 22 0; #X connect 21 0 22 0; #X connect 22 0 23 1; #X connect 22 0 93 1; #X connect 23 0 61 0; #X connect 23 0 42 0; #X connect 24 0 25 0; #X connect 24 1 32 0; #X connect 25 0 26 0; #X connect 26 0 27 0; #X connect 27 0 28 0; #X connect 28 0 29 0; #X connect 28 1 30 0; #X connect 29 0 45 1; #X connect 30 0 31 0; #X connect 31 0 29 1; #X connect 32 0 28 0; #X connect 33 0 34 0; #X connect 34 0 43 0; #X connect 35 0 33 0; #X connect 36 0 37 0; #X connect 37 0 40 0; #X connect 38 0 36 0; #X connect 39 0 26 1; #X connect 40 0 44 1; #X connect 41 0 28 0; #X connect 42 0 108 0; #X connect 43 0 44 0; #X connect 44 0 45 0; #X connect 45 0 94 0; #X connect 46 0 2 0; #X connect 46 1 47 0; #X connect 47 0 48 0; #X connect 48 0 7 0; #X connect 48 1 3 0; #X connect 48 2 106 0; #X connect 49 0 5 0; #X connect 49 0 24 0; #X connect 49 1 3 0; #X connect 49 2 50 0; #X connect 50 0 18 1; #X connect 51 0 19 0; #X connect 51 0 83 0; #X connect 51 0 91 0; #X connect 52 0 54 1; #X connect 53 0 54 0; #X connect 54 0 60 0; #X connect 55 0 64 0; #X connect 55 0 66 0; #X connect 56 0 57 0; #X connect 57 0 59 1; #X connect 58 0 59 0; #X connect 59 0 55 1; #X connect 60 0 55 0; #X connect 61 0 80 0; #X connect 62 0 52 0; #X connect 63 0 70 0; #X connect 64 0 69 0; #X connect 65 0 69 1; #X connect 66 0 67 0; #X connect 67 0 65 0; #X connect 68 0 67 1; #X connect 69 0 82 0; #X connect 70 0 62 0; #X connect 76 0 63 1; #X connect 77 0 52 1; #X connect 77 0 57 1; #X connect 78 0 65 1; #X connect 79 0 64 1; #X connect 80 0 63 0; #X connect 81 0 80 1; #X connect 82 0 93 0; #X connect 83 0 89 0; #X connect 83 1 92 0; #X connect 84 0 80 1; #X connect 84 0 82 1; #X connect 85 0 84 0; #X connect 86 0 84 0; #X connect 87 0 109 0; #X connect 88 0 82 1; #X connect 89 0 86 0; #X connect 90 0 21 0; #X connect 91 0 16 0; #X connect 92 0 85 0; #X connect 93 0 42 0; #X connect 94 0 96 0; #X connect 95 0 9 0; #X connect 96 0 23 0; #X connect 97 0 98 0; #X connect 98 0 99 0; #X connect 99 0 101 0; #X connect 100 1 97 0; #X connect 101 0 102 0; #X connect 102 0 103 0; #X connect 103 0 104 0; #X connect 104 0 105 0; #X connect 105 0 96 1; #X connect 106 0 18 1; #X connect 107 0 0 0; #X connect 109 0 110 0; #X connect 110 0 46 0; #X restore 432 213 pd voice; #X obj 492 171 r \$0-poly; #N canvas 0 23 1550 839 voice 0; #X obj 72 173 unpack f f; #X obj 129 194 > 0; #X obj 72 297 mtof; #X msg 117 353 1000 \$1; #X obj 117 374 /; #X obj 72 395 t b b; #X obj 72 437 del 2; #X obj 72 458 pack f f; #X msg 72 479 0 \$2; #X obj 72 500 unpack f f; #X obj 72 556 lop~; #X msg 129 521 1000 \$1; #X obj 129 542 /; #X obj 272 311 phasor~; #X obj 272 332 -~ 0.25; #X obj 272 353 cos~; #X msg 311 290 0; #X obj 257 570 *~; #X obj 117 395 * 2048; #X obj 689 443 t b b; #X msg 689 485 0 1; #X msg 716 485 1 0; #X obj 689 506 line~; #X obj 240 633 *~; #X obj 599 262 t b b; #X obj 599 304 del 2; #X obj 599 325 pack f f; #X msg 599 346 0 \$2; #X obj 599 367 unpack f f; #X obj 599 423 lop~; #X msg 656 388 1000 \$1; #X obj 656 409 /; #X msg 626 283 1 1; #X obj 332 346 -~ 0.25; #X obj 332 367 cos~; #X obj 332 325 *~ 7; #X obj 382 346 -~ 0.25; #X obj 382 367 cos~; #X obj 382 325 *~ 20; #X obj 663 302 * 128; #X obj 382 388 /~ 20; #X msg 520 299 0 50; #X obj 242 689 /~ 2; #X obj 332 388 /~ 7; #X obj 332 409 +~; #X obj 332 430 *~; #X obj 72 276 route 1 0; #X obj 192 297 mtof; #X obj 192 318 t b f b; #X obj 72 318 t b f b; #X msg 150 332 2048; #X obj 311 248 sel 1; #X obj 821 505 *~; #X obj 800 526 sig~ 2; #X obj 800 547 pow~; #X obj 800 589 *~; #X obj 894 512 sig~ 2; #X obj 894 533 pow~; #X obj 879 554 sig~ 1; #X obj 879 575 /~; #X obj 800 568 -~ 1; #X obj 821 365 *~ 0.707946; #N canvas 4 23 162 227 hv.tanh 0; #X obj 12 12 inlet~; #X obj 12 38 clip~ -3 3; #X obj 27 64 *~; #X obj 12 192 outlet~; #X obj 27 140 /~; #X obj 12 166 *~; #X obj 67 90 *~ 9; #X obj 27 90 +~ 27; #X obj 67 116 +~ 27; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 1 0 2 1; #X connect 1 0 5 0; #X connect 2 0 7 0; #X connect 2 0 6 0; #X connect 4 0 5 1; #X connect 5 0 3 0; #X connect 6 0 8 0; #X connect 7 0 4 0; #X connect 8 0 4 1; #X restore 821 484 pd hv.tanh; #X obj 821 443 *~; #X obj 768 648 *~; #X obj 897 655 *~; #X obj 897 603 pow~ 4; #X obj 897 634 *~ -1; #X obj 947 620 r \$0-buz-pha; #X obj 768 669 +~; #X obj 821 463 +~; #X text 915 471 //Pickup Symmetry; #X text 947 580 //Buzz Phase; #X text 947 600 //Buzz Level; #X text 921 409 //Pickup Input; #X text 800 614 //Pickup Level; #X obj 921 429 sig~ 5; #X obj 915 491 sig~ 5; #X obj 947 641 sig~ 0.5; #X obj 800 634 sig~ 1; #N canvas 0 23 450 300 lowpass~ 0; #N canvas 1006 332 706 367 lowpass.coeffs 0; #X obj 12 45 inlet~ freq; #X obj 288 50 inlet~ q; #X obj 12 67 clip~ 20 20000; #X obj 273 94 sig~ 1; #X obj 273 116 /~; #X obj 273 138 *~; #X obj 273 160 *~ 0.5; #X obj 12 261 sig~ 1; #X obj 12 283 /~; #X obj 122 297 *~; #X obj 137 275 *~ 0.5; #X obj 122 319 outlet~ b0; #X obj 192 297 *~; #X obj 192 319 outlet~ b1; #X obj 262 297 *~; #X obj 262 319 outlet~ b2; #X obj 332 297 *~; #X obj 347 253 *~ -2; #X obj 332 319 outlet~ a1; #X obj 417 231 sig~ 1; #X obj 417 253 -~; #X obj 402 297 *~; #X obj 402 319 outlet~ a2; #X obj 57 266 +~ 1; #X text 363 162 w0 = 2*pi*f0*Fs; #X text 363 182 alpha = sin(w0)/(2*Q); #X text 527 237 a2 = 1 - alpha; #X text 527 217 a1 = -2*cos(w0); #X text 392 72 H(z) = -----------------------------------------; #X text 392 32 Audio-Cookbook:; #X text 392 112 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 137 231 sig~ 1; #X obj 137 253 -~; #X obj 207 231 sig~ 1; #X obj 207 253 -~; #X obj 277 275 *~ 0.5; #X obj 277 231 sig~ 1; #X obj 277 253 -~; #X text 434 87 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 434 57 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 527 197 a0 = 1 + alpha; #X text 527 257 b0 = (1 - cos(w0))/2; #X text 527 277 b1 = (1 - cos(w0)); #X text 527 297 b2 = (1 - cos(w0))/2; #X text 517 177 LPF:; #X obj 12 88 /~ 44100; #X obj 105 53 loadbang; #X obj 105 74 samplerate~; #X obj 288 72 max~ 0.1; #X obj 117 103 -~ 0.25; #X obj 117 124 cos~; #X obj 12 239 cos~; #X connect 0 0 2 0; #X connect 1 0 48 0; #X connect 2 0 45 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 20 1; #X connect 6 0 23 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 8 0 12 0; #X connect 8 0 14 0; #X connect 8 0 16 0; #X connect 8 0 21 0; #X connect 9 0 11 0; #X connect 10 0 9 1; #X connect 12 0 13 0; #X connect 14 0 15 0; #X connect 16 0 18 0; #X connect 17 0 16 1; #X connect 19 0 20 0; #X connect 20 0 21 1; #X connect 21 0 22 0; #X connect 23 0 8 1; #X connect 31 0 32 0; #X connect 32 0 10 0; #X connect 33 0 34 0; #X connect 34 0 12 1; #X connect 35 0 14 1; #X connect 36 0 37 0; #X connect 37 0 35 0; #X connect 45 0 51 0; #X connect 45 0 49 0; #X connect 46 0 47 0; #X connect 47 0 45 1; #X connect 48 0 4 1; #X connect 49 0 50 0; #X connect 50 0 5 1; #X connect 51 0 32 1; #X connect 51 0 34 1; #X connect 51 0 37 1; #X connect 51 0 17 0; #X restore 62 52 pd lowpass.coeffs; #X obj 46 120 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 99 pd @hv_obj biquad; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 173 11 q; #X obj 173 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 821 407 pd lowpass~; #X obj 884 386 sig~ 1000; #N canvas 0 23 450 300 highpass~ 0; #N canvas 200 23 682 315 highpass.coeffs 0; #X obj 12 46 clip~ 20 20000; #X obj 283 51 clip~ 0.1 100; #X obj 268 73 sig~ 1; #X obj 268 95 /~; #X obj 268 117 *~; #X obj 268 139 *~ 0.5; #X obj 12 215 sig~ 1; #X obj 12 237 /~; #X obj 122 254 *~; #X obj 137 200 +~ 1; #X obj 137 232 *~ 0.5; #X obj 122 276 outlet~ b0; #X obj 192 254 *~; #X obj 207 200 +~ 1; #X obj 192 276 outlet~ b1; #X obj 207 232 *~ -1; #X obj 262 254 *~; #X obj 277 200 +~ 1; #X obj 277 232 *~ 0.5; #X obj 262 276 outlet~ b2; #X obj 332 254 *~; #X obj 347 200 *~ -2; #X obj 332 276 outlet~ a1; #X obj 417 210 sig~ 1; #X obj 417 232 -~; #X obj 402 254 *~; #X obj 402 276 outlet~ a2; #X obj 57 220 +~ 1; #X text 348 141 w0 = 2*pi*f0*Fs; #X text 348 161 alpha = sin(w0)/(2*Q); #X text 512 176 a0 = 1 + alpha; #X text 512 216 a2 = 1 - alpha; #X text 512 196 a1 = -2*cos(w0); #X text 512 256 b1 = -(1 + cos(w0)); #X text 512 236 b0 = (1 + cos(w0))/2; #X text 502 156 HPF:; #X text 512 276 b2 = (1 + cos(w0))/2; #X text 419 36 (b0/a0) + (b1/a0)*z^(-1) + (b2/a0)*z^(-2); #X text 377 51 H(z) = -----------------------------------------; #X text 419 66 1 + (a1/a0)*z^(-1) + (a2/a0)*z^(-2); #X text 377 11 Audio-Cookbook:; #X text 377 91 http://musicdsp.org/files/Audio-EQ-Cookbook.txt; #X obj 12 24 inlet~; #X obj 283 29 inlet~; #X obj 12 67 /~ 44100; #X obj 105 32 loadbang; #X obj 105 53 samplerate~; #X obj 122 83 -~ 0.25; #X obj 122 103 cos~; #X obj 12 186 cos~; #X connect 0 0 44 0; #X connect 1 0 3 1; #X connect 2 0 3 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 24 1; #X connect 5 0 27 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 7 0 12 0; #X connect 7 0 16 0; #X connect 7 0 20 0; #X connect 7 0 25 0; #X connect 8 0 11 0; #X connect 9 0 10 0; #X connect 10 0 8 1; #X connect 12 0 14 0; #X connect 13 0 15 0; #X connect 15 0 12 1; #X connect 16 0 19 0; #X connect 17 0 18 0; #X connect 18 0 16 1; #X connect 20 0 22 0; #X connect 21 0 20 1; #X connect 23 0 24 0; #X connect 24 0 25 1; #X connect 25 0 26 0; #X connect 27 0 7 1; #X connect 42 0 0 0; #X connect 43 0 1 0; #X connect 44 0 47 0; #X connect 44 0 49 0; #X connect 45 0 46 0; #X connect 46 0 44 1; #X connect 47 0 48 0; #X connect 48 0 4 1; #X connect 49 0 9 0; #X connect 49 0 13 0; #X connect 49 0 17 0; #X connect 49 0 21 0; #X restore 62 52 pd highpass.coeffs; #X obj 46 109 outlet~; #N canvas 776 547 365 190 @hv_obj 0; #X obj 12 31 inlet~; #N canvas 1097 522 303 331 zeros 0; #X obj 12 217 czero~; #X obj 12 273 czero~; #X obj 12 299 outlet~; #X obj 75 299 outlet~; #X obj 12 31 inlet~; #X obj 47 122 *~ -1; #X obj 47 143 *~ 0.5; #X obj 132 58 *~; #X obj 132 92 -~; #X obj 187 78 *~ 4; #X obj 187 57 *~; #X obj 132 113 abs~; #X obj 132 155 *~ 0.5; #X obj 132 176 /~; #N canvas 773 235 262 212 location 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 207 12 inlet~; #X obj 12 174 outlet~; #X obj 72 174 outlet~; #X obj 132 174 outlet~; #X obj 192 174 outlet~; #N canvas 725 189 180 137 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 758 270 144 76 @hv_obj 0; #X obj 62 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 945 362 136 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 62 49 pd gte; #N canvas 845 375 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 140 82 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 39 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 137 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 49 pd lte; #X obj 12 152 +~; #X obj 160 22 sig~ 0; #X obj 147 125 *~; #X obj 192 125 *~; #X obj 132 152 -~; #X obj 192 152 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 190 pd location; #X obj 132 134 sqrt~; #X obj 47 164 /~; #X obj 252 203 inlet; #X text 62 11 b0; #X text 132 11 b1; #X text 202 11 b2; #X obj 202 31 inlet~; #X obj 132 31 inlet~; #X obj 62 31 inlet~; #X text 252 183 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 1 1 3 0; #X connect 4 0 0 0; #X connect 5 0 6 0; #X connect 6 0 16 0; #X connect 7 0 8 0; #X connect 8 0 11 0; #X connect 8 0 14 1; #X connect 9 0 8 1; #X connect 10 0 9 0; #X connect 11 0 15 0; #X connect 12 0 13 0; #X connect 13 0 14 2; #X connect 14 0 0 2; #X connect 14 1 0 3; #X connect 14 2 1 2; #X connect 14 3 1 3; #X connect 15 0 12 0; #X connect 16 0 14 0; #X connect 17 0 0 0; #X connect 17 0 1 0; #X connect 21 0 10 1; #X connect 22 0 5 0; #X connect 22 0 7 1; #X connect 22 0 7 0; #X connect 23 0 10 0; #X connect 23 0 13 1; #X connect 23 0 16 1; #X restore 12 89 pd zeros; #X obj 12 52 *~; #N canvas 1083 390 288 282 poles 0; #X obj 12 181 cpole~; #X obj 12 228 cpole~; #X obj 12 249 outlet~; #X obj 12 31 inlet~; #X obj 62 31 inlet~; #N canvas 739 258 279 198 location 0; #X obj 12 12 inlet~; #X obj 127 12 inlet~; #X obj 222 49 inlet~; #X obj 12 155 outlet~; #X obj 62 155 outlet~; #X obj 112 155 outlet~; #X obj 172 155 outlet~; #N canvas 796 341 183 142 gte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 679 326 140 75 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 754 439 132 184 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 3 0 6 1; #X connect 3 0 0 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __gte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 127 39 pd gte; #N canvas 816 493 187 138 lte 0; #X obj 117 12 inlet~; #X obj 12 12 inlet~; #X obj 12 100 outlet~; #N canvas 467 216 142 76 @hv_obj 0; #X obj 72 12 inlet~; #X obj 12 12 inlet~; #X obj 12 34 outlet~; #X connect 1 0 2 0; #X restore 12 78 pd @hv_obj __and~f; #X obj 117 56 sig~ 1; #N canvas 715 101 131 178 @hv_obj 0; #X obj 12 56 -~; #X obj 12 78 clip~ -1e-37 0; #X obj 12 12 inlet~; #X obj 62 12 inlet~; #X obj 12 144 outlet~; #X obj 12 122 *~ 1e+37; #X obj 12 34 min~; #X obj 12 100 +~ 1e-37; #X connect 0 0 1 0; #X connect 1 0 7 0; #X connect 2 0 6 0; #X connect 2 0 0 1; #X connect 3 0 6 1; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 5 0; #X restore 12 34 pd @hv_obj __lte~f; #X connect 0 0 5 1; #X connect 1 0 5 0; #X connect 3 0 2 0; #X connect 4 0 3 1; #X connect 5 0 3 0; #X restore 172 39 pd lte; #X obj 12 83 +~; #X obj 205 12 sig~ 0; #X obj 127 66 *~; #X obj 172 66 *~; #X obj 112 133 -~; #X obj 172 133 *~ -1; #X connect 0 0 9 0; #X connect 0 0 13 0; #X connect 1 0 7 0; #X connect 1 0 8 0; #X connect 2 0 11 1; #X connect 2 0 12 1; #X connect 7 0 11 0; #X connect 8 0 12 0; #X connect 9 0 3 0; #X connect 10 0 7 1; #X connect 10 0 8 1; #X connect 11 0 9 1; #X connect 11 0 13 1; #X connect 12 0 4 0; #X connect 12 0 14 0; #X connect 13 0 5 0; #X connect 14 0 6 0; #X restore 34 155 pd location; #X obj 72 78 *~ 0.5; #X obj 122 57 *~; #X obj 122 78 +~; #X obj 182 64 *~ 4; #X obj 122 99 abs~; #X obj 122 141 *~ 0.5; #X obj 122 120 sqrt~; #X obj 232 167 inlet; #X text 182 11 a2; #X text 122 11 a1; #X obj 122 31 inlet~; #X obj 182 31 inlet~; #X text 232 147 clear; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 2 0; #X connect 3 0 0 0; #X connect 4 0 0 1; #X connect 5 0 0 2; #X connect 5 1 0 3; #X connect 5 2 1 2; #X connect 5 3 1 3; #X connect 6 0 5 0; #X connect 7 0 8 0; #X connect 8 0 5 1; #X connect 8 0 10 0; #X connect 9 0 8 1; #X connect 10 0 12 0; #X connect 11 0 5 2; #X connect 12 0 11 0; #X connect 13 0 0 0; #X connect 13 0 1 0; #X connect 16 0 6 0; #X connect 16 0 7 0; #X connect 16 0 7 1; #X connect 17 0 9 0; #X restore 12 133 pd poles; #X obj 12 159 outlet~; #X obj 212 119 *~ -1; #X obj 262 119 *~ -1; #X obj 312 75 inlet; #X obj 62 31 inlet~; #X obj 112 31 inlet~; #X obj 162 31 inlet~; #X obj 212 31 inlet~; #X obj 262 31 inlet~; #X text 62 11 b0; #X text 112 11 b1; #X text 162 11 b2; #X text 212 11 a1; #X text 262 11 a2; #X text 312 55 clear; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 1 1 3 1; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 5 0 3 2; #X connect 6 0 3 3; #X connect 7 0 1 4; #X connect 7 0 3 4; #X connect 8 0 2 1; #X connect 8 0 1 1; #X connect 9 0 1 2; #X connect 10 0 1 3; #X connect 11 0 5 0; #X connect 12 0 6 0; #X restore 46 88 pd @hv_obj biquad; #X obj 12 20 inlet~; #X obj 62 31 inlet~; #X text 62 11 frequency; #X text 167 11 q; #X obj 167 31 sig~ 0.404061; #X connect 0 0 2 1; #X connect 0 1 2 2; #X connect 0 2 2 3; #X connect 0 3 2 4; #X connect 0 4 2 5; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 7 0 0 1; #X restore 768 690 pd highpass~; #X obj 1214 342 t b b; #X obj 1214 405 line~; #X msg 1261 384 0 0; #X msg 1214 384 20000 0; #X obj 72 194 pipe 3; #X obj 672 600 sig~; #X obj 1214 363 del 2; #X obj 716 464 del 3; #X obj 312 269 del 3; #X obj 1261 363 del 3; #X obj 768 711 *~; #X obj 332 451 /~ 7; #X msg 99 416 1 0.1; #X obj 257 591 *~; #X obj 383 489 pipe 3; #X obj 383 510 - 1; #X obj 383 531 / 126; #X obj 361 473 sel 0; #X msg 383 552 1 \$1; #X obj 383 573 -; #X obj 383 594 * -30; #X obj 383 615 + 100; #X obj 383 636 dbtorms; #X msg 231 339 8; #X obj 94 140 inlet; #X obj 242 710 outlet~; #X obj 72 225 pack f f; #X msg 72 246 \$2 \$1; #X connect 0 0 87 0; #X connect 0 1 1 0; #X connect 0 1 100 0; #X connect 1 0 51 0; #X connect 1 0 109 1; #X connect 2 0 49 0; #X connect 2 0 13 0; #X connect 2 0 88 0; #X connect 3 0 4 0; #X connect 4 0 18 0; #X connect 4 0 39 0; #X connect 5 0 6 0; #X connect 5 1 95 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 9 0 10 0; #X connect 9 1 11 0; #X connect 10 0 17 0; #X connect 11 0 12 0; #X connect 12 0 10 1; #X connect 13 0 14 0; #X connect 13 0 35 0; #X connect 13 0 38 0; #X connect 14 0 15 0; #X connect 15 0 17 1; #X connect 16 0 13 1; #X connect 17 0 96 0; #X connect 18 0 7 1; #X connect 19 0 20 0; #X connect 19 1 90 0; #X connect 20 0 22 0; #X connect 21 0 22 0; #X connect 22 0 23 1; #X connect 22 0 93 1; #X connect 23 0 61 0; #X connect 23 0 42 0; #X connect 24 0 25 0; #X connect 24 1 32 0; #X connect 25 0 26 0; #X connect 26 0 27 0; #X connect 27 0 28 0; #X connect 28 0 29 0; #X connect 28 1 30 0; #X connect 29 0 45 1; #X connect 30 0 31 0; #X connect 31 0 29 1; #X connect 32 0 28 0; #X connect 33 0 34 0; #X connect 34 0 43 0; #X connect 35 0 33 0; #X connect 36 0 37 0; #X connect 37 0 40 0; #X connect 38 0 36 0; #X connect 39 0 26 1; #X connect 40 0 44 1; #X connect 41 0 28 0; #X connect 42 0 108 0; #X connect 43 0 44 0; #X connect 44 0 45 0; #X connect 45 0 94 0; #X connect 46 0 2 0; #X connect 46 1 47 0; #X connect 47 0 48 0; #X connect 48 0 7 0; #X connect 48 1 3 0; #X connect 48 2 106 0; #X connect 49 0 5 0; #X connect 49 0 24 0; #X connect 49 1 3 0; #X connect 49 2 50 0; #X connect 50 0 18 1; #X connect 51 0 19 0; #X connect 51 0 83 0; #X connect 51 0 91 0; #X connect 52 0 54 1; #X connect 53 0 54 0; #X connect 54 0 60 0; #X connect 55 0 64 0; #X connect 55 0 66 0; #X connect 56 0 57 0; #X connect 57 0 59 1; #X connect 58 0 59 0; #X connect 59 0 55 1; #X connect 60 0 55 0; #X connect 61 0 80 0; #X connect 62 0 52 0; #X connect 63 0 70 0; #X connect 64 0 69 0; #X connect 65 0 69 1; #X connect 66 0 67 0; #X connect 67 0 65 0; #X connect 68 0 67 1; #X connect 69 0 82 0; #X connect 70 0 62 0; #X connect 76 0 63 1; #X connect 77 0 52 1; #X connect 77 0 57 1; #X connect 78 0 65 1; #X connect 79 0 64 1; #X connect 80 0 63 0; #X connect 81 0 80 1; #X connect 82 0 93 0; #X connect 83 0 89 0; #X connect 83 1 92 0; #X connect 84 0 80 1; #X connect 84 0 82 1; #X connect 85 0 84 0; #X connect 86 0 84 0; #X connect 87 0 109 0; #X connect 88 0 82 1; #X connect 89 0 86 0; #X connect 90 0 21 0; #X connect 91 0 16 0; #X connect 92 0 85 0; #X connect 93 0 42 0; #X connect 94 0 96 0; #X connect 95 0 9 0; #X connect 96 0 23 0; #X connect 97 0 98 0; #X connect 98 0 99 0; #X connect 99 0 101 0; #X connect 100 1 97 0; #X connect 101 0 102 0; #X connect 102 0 103 0; #X connect 103 0 104 0; #X connect 104 0 105 0; #X connect 105 0 96 1; #X connect 106 0 18 1; #X connect 107 0 0 0; #X connect 109 0 110 0; #X connect 110 0 46 0; #X restore 492 213 pd voice; #X obj 132 192 route 2; #X obj 192 192 route 3; #X obj 252 192 route 4; #X obj 312 192 route 5; #X obj 372 192 route 6; #X obj 432 192 route 7; #X obj 492 192 route 8; #X connect 0 0 11 0; #X connect 0 1 11 1; #X connect 1 0 2 0; #X connect 3 0 4 0; #X connect 4 0 10 0; #X connect 5 0 6 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 8 0 9 1; #X connect 10 0 5 0; #X connect 11 0 1 0; #X connect 11 1 1 1; #X connect 11 2 1 2; #X connect 12 0 26 0; #X connect 13 0 5 0; #X connect 14 0 27 0; #X connect 15 0 5 0; #X connect 16 0 28 0; #X connect 17 0 5 0; #X connect 18 0 29 0; #X connect 19 0 5 0; #X connect 20 0 30 0; #X connect 21 0 5 0; #X connect 22 0 31 0; #X connect 23 0 5 0; #X connect 24 0 32 0; #X connect 25 0 5 0; #X connect 26 0 13 0; #X connect 27 0 15 0; #X connect 28 0 17 0; #X connect 29 0 19 0; #X connect 30 0 21 0; #X connect 31 0 23 0; #X connect 32 0 25 0;