#N canvas 0 0 1024 728 10; #N canvas 0 40 1024 728 wah-wah 0; #X obj -104 418 svf~; #X obj -76 342 *~; #X obj -76 364 +~; #X obj -76 386 mtof~; #X obj 457 138 switch~; #N canvas 0 0 450 300 envelope 0; #X obj 112 108 env~; #X obj 112 193 line~; #X msg 112 170 \$1 \$2; #X obj 112 150 pack; #X obj 112 129 dbtorms; #X obj 166 128 inlet; #X obj 113 85 inlet~; #X obj 113 219 outlet~; #X connect 0 0 4 0; #X connect 1 0 7 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 3 0; #X connect 5 0 3 1; #X connect 6 0 0 0; #X restore -75 202 pd envelope follower; #X obj -75 224 expr~ if($f3==1 \, $v1 \, $v2); #X obj 42 180 r \$0_smooth; #X obj 78 203 r \$0_env_on; #X obj -61 243 r \$0_amt; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -61 321 pd smooth; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore 3 346 pd smooth; #X obj 3 243 r \$0_base; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -37 387 pd smooth; #X obj -37 368 r \$0_reso; #X obj 100 100 cnv 15 320 200 empty empty Wah-Wah 20 12 0 14 -66577 -262144 0; #X obj 118 137 cnv 15 80 150 empty empty env_follower 0 12 0 10 -128992 -262144 0; #X obj 204 174 vsl 20 100 0 500 0 1 \$0_amt empty amt 0 -9 0 10 -162280 -262144 -262144 9900 1; #X obj 233 174 vsl 20 100 0 127 0 1 \$0_base empty base 0 -9 0 10 -162280 -262144 -262144 6100 1; #X obj 262 174 vsl 20 100 0 1 0 1 \$0_reso empty reso 0 -9 0 10 -162280 -262144 -262144 7500 1; #X obj 301 125 tgl 20 1 empty empty ON 0 -7 0 10 -162280 -4034 -262144 1 1; #X obj 132 176 vsl 20 100 0 200 0 1 \$0_smooth empty smooth 0 -9 0 10 -162280 -262144 -262144 6300 1; #X obj 165 260 tgl 20 0 \$0_env_on empty on 0 -7 0 10 -162280 -262144 -262144 0 1; #X obj 291 175 vsl 20 100 0 1 0 1 \$0_motion empty motion 0 -9 0 10 -162280 -262144 -262144 300 1; #X obj -21 151 r \$0_motion; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -21 179 pd smooth; #X obj 217 125 tgl 20 1 \$0_bypass empty BYPASS 0 -7 0 10 -162280 -4034 -262144 0 1; #X obj 50 424 r \$0_bypass; #X obj -103 519 expr~ if($f3==1 \, $v2 \, $v1); #X obj -104 486 *~; #N canvas 495 149 450 300 noise 0; #X obj -7 134 env~; #X obj -6 229 line~; #X msg -7 202 \$1 100; #X obj -7 177 * 0.4; #X obj 100 102 vsl 20 100 0 100 0 1 empty empty gate 0 -9 0 10 -104297 -4032 -4032 1600 1; #X obj -7 156 >; #X obj -8 102 inlet~; #X obj -6 268 outlet~; #X connect 0 0 5 0; #X connect 1 0 7 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 5 1; #X connect 5 0 3 0; #X connect 6 0 0 0; #X coords 0 -1 1 1 20 105 2 100 100; #X restore 385 173 pd noise; #N canvas 0 0 1024 728 limiter 0; #X obj -348 168 inlet~; #X obj -112 323 expr (($f1 - $f3) / $f2) - $f1 + $f3; #X obj -147 224 env~ 1024; #X obj -112 367 dbtorms; #X obj -112 346 expr 100 + $f1; #X obj -348 632 outlet~; #X obj -348 605 *~; #X obj -328 578 line~; #X msg -265 511 \$1 20; #X obj -147 275 moses; #X obj -5 259 loadbang; #X msg -6 284 10; #X obj -147 302 b; #X obj -348 229 delwrite~ \$0_comp 100; #X obj -348 301 delread~ \$0_comp 23.22; #X msg -302 510 1 20; #X obj 100 102 vsl 20 100 50 90 0 1 empty empty in_dyn 0 -9 0 10 -174294 -260097 -262144 8200 1; #X connect 0 0 2 0; #X connect 0 0 13 0; #X connect 1 0 4 0; #X connect 2 0 9 0; #X connect 3 0 8 0; #X connect 4 0 3 0; #X connect 6 0 5 0; #X connect 7 0 6 1; #X connect 8 0 7 0; #X connect 9 0 12 0; #X connect 9 1 1 0; #X connect 10 0 11 0; #X connect 11 0 1 1; #X connect 12 0 15 0; #X connect 14 0 6 0; #X connect 15 0 7 0; #X connect 16 0 1 2; #X connect 16 0 9 1; #X coords 0 -1 1 1 20 105 2 100 100; #X restore 341 174 pd limiter; #X obj -104 99 +~; #X obj -103 555 throw~ out; #X obj -103 72 catch~ wah-wah; #X msg -24 574 set \$1; #X obj -24 551 r wah-wah_throw; #X connect 0 0 29 0; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 3 0 0 1; #X connect 5 0 6 0; #X connect 6 0 1 0; #X connect 7 0 5 1; #X connect 8 0 6 2; #X connect 9 0 10 0; #X connect 10 0 1 1; #X connect 11 0 2 1; #X connect 12 0 11 0; #X connect 13 0 0 2; #X connect 14 0 13 0; #X connect 20 0 4 0; #X connect 24 0 25 0; #X connect 25 0 6 1; #X connect 27 0 28 2; #X connect 28 0 33 0; #X connect 29 0 28 0; #X connect 30 0 29 1; #X connect 31 0 5 0; #X connect 32 0 0 0; #X connect 32 0 28 1; #X connect 32 0 30 0; #X connect 32 0 31 0; #X connect 34 0 32 0; #X connect 35 0 33 0; #X connect 36 0 35 0; #X coords 0 -1 1 1 320 200 2 100 100; #X restore 15 163 pd wah-wah; #N canvas 0 0 1024 715 phaser~ 0; #X obj 393 260 phasor~; #X obj -294 460 +~; #X obj 393 282 expr~ (abs($v1-0.5)*4)-1; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X obj 169 135 ap2~; #X connect 0 0 4 0; #X connect 2 0 4 1; #X connect 3 0 4 2; #X connect 4 0 1 0; #X restore -208 223 pd allp; #X obj 393 305 unsig~ 11; #X obj 413 426 s \$0-f; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -208 243 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -208 263 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -208 283 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -208 303 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -208 323 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -208 343 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -208 363 pd allp; #X obj 436 330 bang; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -208 383 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -208 403 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -208 423 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -208 443 pd allp; #X obj 413 356 expr $f1*($f2)+$f3; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -158 223 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -158 243 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -158 263 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -158 283 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -158 303 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -158 323 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -158 343 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -158 363 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -158 383 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -158 403 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -158 423 pd allp; #N canvas 0 0 450 300 allp 0; #X obj 152 78 inlet~; #X obj 161 194 outlet~; #X obj 169 135 ap2~; #X obj 202 81 r \$0-f; #X obj 248 80 r \$0-q; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 2 1; #X connect 4 0 2 2; #X restore -158 443 pd allp; #X obj 413 405 mtof; #X obj -215 528 r \$0_phaser_on; #X obj -374 550 expr~ if($f3==0 \, $v2 \, $v1) \;; #X obj 393 216 r \$0_phaser_freq; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore 393 237 pd smooth; #X obj 477 242 r \$0_phaser_phase; #X obj -280 165 r \$0_phaser_amt; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -280 247 pd smooth; #X obj 518 128 r \$0_phaser_center; #X obj 435 108 r \$0_phaser_range; #X obj 375 145 switch~; #X obj 100 100 cnv 15 290 200 empty empty Phaser 20 12 0 14 -66577 -262144 0; #X obj 203 125 tgl 20 0 \$0_phaser_on empty Bypass 0 -7 0 10 -162280 -262144 -262144 0 1; #X obj 268 172 vsl 20 100 0.1 1 0 1 \$0_phaser_freq empty freq 0 -9 0 10 -162280 -262144 -262144 1800 1; #X obj 263 125 tgl 20 1 \$0_phaser_phase empty phase 0 -7 0 10 -162280 -262144 -262144 0.5 0.5; #X obj 235 174 vsl 20 100 0 1 0 1 \$0_phaser_amt empty amt 0 -9 0 10 -162280 -262144 -262144 9900 1; #X obj 201 174 vsl 20 100 0.1 0.5 0 1 \$0-q empty q 0 -9 0 10 -162280 -262144 -262144 400 1; #X obj 148 176 vsl 20 100 30 80 0 1 \$0_phaser_center empty center 0 -9 0 10 -162280 -262144 -262144 9900 1; #X obj 115 177 vsl 20 100 0 50 0 1 \$0_phaser_range empty range 0 -9 0 10 -162280 -262144 -262144 4300 1; #X obj 321 125 tgl 20 1 empty empty ON 0 -7 0 10 -162280 -4034 -262144 1 1; #X obj -280 300 *~; #X obj -294 490 *~; #N canvas 495 149 450 300 noise 0; #X obj -7 134 env~; #X obj -6 229 line~; #X msg -7 202 \$1 100; #X obj -7 177 * 0.4; #X obj 100 102 vsl 20 100 0 100 0 1 empty empty gate 0 -9 0 10 -104297 -4032 -4032 6600 1; #X obj -7 156 >; #X obj -8 102 inlet~; #X obj -6 268 outlet~; #X connect 0 0 5 0; #X connect 1 0 7 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 5 1; #X connect 5 0 3 0; #X connect 6 0 0 0; #X coords 0 -1 1 1 20 105 2 100 100; #X restore 360 170 pd noise; #X obj -375 161 catch~ phaser; #X obj -373 573 throw~ out; #X msg -270 619 set \$1; #X obj -269 596 r phaser_throw; #N canvas 0 0 1024 728 limiter 0; #X obj -348 168 inlet~; #X obj -112 323 expr (($f1 - $f3) / $f2) - $f1 + $f3; #X obj -147 224 env~ 1024; #X obj -112 367 dbtorms; #X obj -112 346 expr 100 + $f1; #X obj -348 632 outlet~; #X obj -348 605 *~; #X obj -328 578 line~; #X msg -265 511 \$1 20; #X obj -147 275 moses; #X obj -5 259 loadbang; #X msg -6 284 10; #X obj -147 302 b; #X msg -302 510 1 20; #X obj 100 102 vsl 20 100 50 90 0 1 empty empty limiter 0 -9 0 10 -174294 -260097 -262144 6300 1; #X obj -348 229 delwrite~ \$0_comp2 100; #X obj -348 301 delread~ \$0_comp2 23.22; #X connect 0 0 2 0; #X connect 0 0 15 0; #X connect 1 0 4 0; #X connect 2 0 9 0; #X connect 3 0 8 0; #X connect 4 0 3 0; #X connect 6 0 5 0; #X connect 7 0 6 1; #X connect 8 0 7 0; #X connect 9 0 12 0; #X connect 9 1 1 0; #X connect 10 0 11 0; #X connect 11 0 1 1; #X connect 12 0 13 0; #X connect 13 0 7 0; #X connect 14 0 1 2; #X connect 14 0 9 1; #X connect 16 0 6 0; #X coords 0 -1 1 1 20 105 2 100 100; #X restore 314 171 pd limiter; #X connect 0 0 2 0; #X connect 1 0 52 0; #X connect 2 0 4 0; #X connect 3 0 6 0; #X connect 4 0 18 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 8 0 1 1; #X connect 9 0 10 0; #X connect 10 0 11 0; #X connect 11 0 12 0; #X connect 12 0 14 0; #X connect 12 0 1 1; #X connect 13 0 18 0; #X connect 14 0 15 0; #X connect 15 0 16 0; #X connect 16 0 17 0; #X connect 17 0 19 0; #X connect 17 0 1 1; #X connect 18 0 31 0; #X connect 19 0 20 0; #X connect 20 0 21 0; #X connect 21 0 22 0; #X connect 22 0 23 0; #X connect 22 0 51 1; #X connect 23 0 24 0; #X connect 24 0 25 0; #X connect 25 0 26 0; #X connect 26 0 27 0; #X connect 26 0 51 1; #X connect 27 0 28 0; #X connect 28 0 29 0; #X connect 29 0 30 0; #X connect 30 0 51 1; #X connect 31 0 5 0; #X connect 32 0 33 2; #X connect 33 0 55 0; #X connect 34 0 35 0; #X connect 35 0 0 0; #X connect 36 0 0 1; #X connect 37 0 38 0; #X connect 38 0 51 0; #X connect 39 0 13 0; #X connect 39 0 18 2; #X connect 40 0 13 0; #X connect 40 0 18 1; #X connect 50 0 41 0; #X connect 51 0 1 1; #X connect 52 0 58 0; #X connect 53 0 52 1; #X connect 54 0 3 0; #X connect 54 0 1 0; #X connect 54 0 33 0; #X connect 54 0 53 0; #X connect 56 0 55 0; #X connect 57 0 56 0; #X connect 58 0 33 1; #X coords 0 -1 1 1 290 200 2 100 100; #X restore 345 164 pd phaser~; #N canvas 0 0 1024 728 phaser~ 0; #X obj -374 550 expr~ if($f3==0 \, $v2 \, $v1) \;; #X obj 344 144 switch~; #X obj 100 100 cnv 15 200 200 empty empty Tremolo 20 12 0 14 -66577 -262144 0; #X obj 256 258 tgl 20 0 \$0_vibrato_on empty Bypass 0 -7 0 10 -162280 -262144 -262144 0 1; #X obj 156 174 vsl 20 100 0 15 0 1 \$0_tremolo_freq empty freq 0 -9 0 10 -162280 -262144 -262144 4600 1; #X obj 123 174 vsl 20 100 0.5 3 0 1 \$0_tremolo_amt empty amt 0 -9 0 10 -162280 -262144 -262144 6200 1; #X obj 257 125 tgl 20 1 empty empty ON 0 -7 0 10 -162280 -4034 -262144 1 1; #X obj -215 528 r \$0_vibrato_on; #X obj -294 415 vd~ \$0_tremolo; #X obj -154 178 r \$0_tremolo_amt; #X obj -328 103 r \$0_tremolo_freq; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -185 225 pd smooth; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -329 138 pd smooth; #X obj -329 166 phasor~; #X obj -294 525 *~ 0.5; #X obj -173 454 *~; #X obj -253 362 delwrite~ \$0_tremolo 100; #X obj -293 253 *~; #X obj -329 188 expr~ (abs($v1-0.5)*2)+0.5; #X obj -253 311 +~; #X obj -154 408 r \$0_tremolo_fb; #X obj 190 174 vsl 20 100 0 1 0 1 \$0_tremolo_fb empty fb 0 -9 0 10 -162280 -262144 -262144 6000 1; #X obj -285 483 *~; #N canvas 495 149 450 300 noise 0; #X obj -7 134 env~; #X obj -6 229 line~; #X msg -7 202 \$1 100; #X obj -7 177 * 0.4; #X obj 100 102 vsl 20 100 0 100 0 1 empty empty gate 0 -9 0 10 -104297 -4032 -4032 2000 1; #X obj -7 156 >; #X obj -8 102 inlet~; #X obj -6 268 outlet~; #X connect 0 0 5 0; #X connect 1 0 7 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 5 1; #X connect 5 0 3 0; #X connect 6 0 0 0; #X coords 0 -1 1 1 20 105 2 100 100; #X restore 230 172 pd noise; #X obj -375 206 catch~ tremolo; #X obj -373 574 throw~ out; #X msg -280 609 set \$1; #X obj -279 586 r tremolo_throw; #X connect 0 0 25 0; #X connect 6 0 1 0; #X connect 7 0 0 2; #X connect 8 0 15 0; #X connect 8 0 22 0; #X connect 9 0 11 0; #X connect 10 0 12 0; #X connect 11 0 17 1; #X connect 12 0 13 0; #X connect 13 0 18 0; #X connect 14 0 0 1; #X connect 15 0 19 1; #X connect 17 0 8 0; #X connect 18 0 17 0; #X connect 19 0 16 0; #X connect 20 0 15 1; #X connect 22 0 14 0; #X connect 23 0 22 1; #X connect 24 0 0 0; #X connect 24 0 19 0; #X connect 24 0 23 0; #X connect 26 0 25 0; #X connect 27 0 26 0; #X coords 0 -1 1 1 200 200 2 100 100; #X restore 15 371 pd phaser~; #N canvas 0 0 1024 728 delay 0; #X obj -374 550 expr~ if($f3==0 \, $v2 \, $v1) \;; #X obj 344 144 switch~; #X obj 100 100 cnv 15 200 200 empty empty Delay 20 12 0 14 -66577 -262144 0; #X obj 256 258 tgl 20 0 \$0_delay_on empty Bypass 0 -7 0 10 -162280 -262144 -262144 0 1; #X obj 257 125 tgl 20 1 empty empty ON 0 -7 0 10 -162280 -4034 -262144 1 1; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -325 345 pd smooth; #X obj -216 300 *~; #X obj 114 174 vsl 20 100 0 1 0 1 \$0_delay_fb empty fb 0 -9 0 10 -162280 -262144 -262144 8400 1; #X obj 113 139 nbx 3 14 -1e+037 1e+037 0 1 \$0_delay_time \$0_delay_r delay 0 -8 0 10 -162280 -262144 -262144 553.409 256; #X obj -191 267 r \$0_delay_fb; #X obj -325 322 r \$0_delay_time; #X obj -284 409 vd~ \$0_delay; #X obj -208 390 delwrite~ \$0_delay 2000; #X obj -215 528 r \$0_delay_on; #X obj -88 78 timer; #X obj -91 -51 f; #X obj -60 -51 + 1; #X obj -47 8 sel 3; #X msg -48 -82 0; #X obj -100 8 moses 1; #X obj -100 44 bang; #X obj -61 51 bang; #X obj -94 122 f; #X obj -61 123 +; #X obj -88 100 t b f; #X obj -27 99 == 3; #X obj -93 168 spigot; #X obj -94 147 /; #X obj -91 -30 t f f f; #X obj -93 193 s \$0_delay_r; #X obj -108 -81 r \$0_tap; #X obj 199 122 bng 20 100 50 0 \$0_tap empty tap 0 -7 0 10 -162280 -262144 -262144; #X obj -207 363 svf~; #X obj 144 174 vsl 20 100 0 127 0 1 \$0_delay_pcut empty cut 0 -9 0 10 -162280 -262144 -262144 5500 1; #X obj -169 293 r \$0_delay_pcut; #X obj -169 314 mtof; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -169 334 pd smooth; #X obj 174 174 vsl 20 100 0 0.2 0 1 \$0_delay_res empty res 0 -9 0 10 -162280 -262144 -262144 2900 1; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -109 334 pd smooth; #X obj -67 290 r \$0_delay_res; #X obj -298 443 +~; #X obj -285 483 *~; #X obj -257 174 osc~ 1; #X obj -256 208 *~ 0.01; #N canvas 495 149 450 300 noise 0; #X obj -7 134 env~; #X obj -6 229 line~; #X msg -7 202 \$1 100; #X obj -7 177 * 0.4; #X obj 100 102 vsl 20 100 0 100 0 1 empty empty gate 0 -9 0 10 -104297 -4032 -4032 0 1; #X obj -7 156 >; #X obj -8 102 inlet~; #X obj -6 268 outlet~; #X connect 0 0 5 0; #X connect 1 0 7 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 5 1; #X connect 5 0 3 0; #X connect 6 0 0 0; #X coords 0 -1 1 1 20 105 2 100 100; #X restore 224 172 pd noise; #X obj -375 205 catch~ delay; #X obj -373 573 throw~ out; #X msg -290 599 set \$1; #X obj -289 576 r delay_throw; #X obj -299 522 *~ 0.8; #X connect 0 0 46 0; #X connect 4 0 1 0; #X connect 5 0 11 0; #X connect 6 0 32 0; #X connect 9 0 6 1; #X connect 10 0 5 0; #X connect 11 0 6 0; #X connect 11 0 40 1; #X connect 13 0 0 2; #X connect 14 0 24 0; #X connect 15 0 16 0; #X connect 15 0 28 0; #X connect 16 0 15 1; #X connect 17 0 18 0; #X connect 18 0 15 1; #X connect 18 0 23 1; #X connect 19 0 20 0; #X connect 19 1 21 0; #X connect 20 0 14 0; #X connect 21 0 14 1; #X connect 21 0 14 0; #X connect 22 0 23 1; #X connect 22 0 27 0; #X connect 23 0 22 1; #X connect 24 0 22 0; #X connect 24 1 23 0; #X connect 25 0 26 1; #X connect 26 0 29 0; #X connect 27 0 26 0; #X connect 28 0 17 0; #X connect 28 1 19 0; #X connect 28 2 25 0; #X connect 28 2 27 1; #X connect 30 0 15 0; #X connect 32 0 12 0; #X connect 34 0 35 0; #X connect 35 0 36 0; #X connect 36 0 32 1; #X connect 38 0 32 2; #X connect 39 0 38 0; #X connect 40 0 41 0; #X connect 41 0 49 0; #X connect 42 0 43 0; #X connect 43 0 11 0; #X connect 44 0 41 1; #X connect 45 0 0 0; #X connect 45 0 12 0; #X connect 45 0 40 0; #X connect 45 0 44 0; #X connect 47 0 46 0; #X connect 48 0 47 0; #X connect 49 0 0 1; #X coords 0 -1 1 1 200 200 1 100 100; #X restore 225 372 pd delay; #N canvas 0 0 1024 728 delay 0; #X obj -374 550 expr~ if($f3==0 \, $v2 \, $v1) \;; #X obj 344 144 switch~; #X obj 100 100 cnv 15 200 200 empty empty Chorus 20 12 0 14 -66577 -262144 0; #X obj 256 258 tgl 20 0 \$0_chorus_on empty Bypass 0 -7 0 10 -162280 -262144 -262144 0 1; #X obj 257 125 tgl 20 1 empty empty ON 0 -7 0 10 -162280 -4034 -262144 1 1; #X obj 123 176 vsl 20 100 0 10 0 1 \$0_chorus_speed empty speed 0 -9 0 10 -162280 -262144 -262144 3000 1; #X obj 174 174 vsl 20 100 0 3 0 1 \$0_chorus_depth empty depth 0 -9 0 10 -162280 -262144 -262144 3100 1; #X obj -295 434 +~; #X obj -295 479 *~ 0.5; #N canvas 307 9 450 300 line1 0; #X obj -45 179 vd~ \$0_chorus_1; #X obj -45 95 osc~; #X obj -44 124 *~; #X obj 82 78 r \$0_chorus_depth; #X obj -44 212 outlet~; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -45 63 pd smooth; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -11 95 pd smooth; #X obj -45 26 r \$0_chorus_speed; #X obj -45 148 +~ 5; #X connect 0 0 4 0; #X connect 1 0 2 0; #X connect 2 0 8 0; #X connect 3 0 6 0; #X connect 5 0 1 0; #X connect 6 0 2 1; #X connect 7 0 5 0; #X connect 8 0 0 0; #X restore -280 279 pd line1; #X obj -294 459 *~; #N canvas 307 9 450 300 line2 0; #X obj -45 179 vd~ \$0_chorus_1; #X obj -45 95 osc~; #X obj -44 124 *~; #X obj 82 78 r \$0_chorus_depth; #X obj -44 212 outlet~; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -45 63 pd smooth; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -11 95 pd smooth; #X obj -45 12 r \$0_chorus_speed; #X obj -45 41 * 0.4; #X obj -45 149 +~ 5; #X connect 0 0 4 0; #X connect 1 0 2 0; #X connect 2 0 9 0; #X connect 3 0 6 0; #X connect 5 0 1 0; #X connect 6 0 2 1; #X connect 7 0 8 0; #X connect 8 0 5 0; #X connect 9 0 0 0; #X restore -281 304 pd line2; #N canvas 307 9 450 300 line3 0; #X obj -45 179 vd~ \$0_chorus_1; #X obj -45 95 osc~; #X obj -44 124 *~; #X obj 82 78 r \$0_chorus_depth; #X obj -44 212 outlet~; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -45 63 pd smooth; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -11 95 pd smooth; #X obj -45 12 r \$0_chorus_speed; #X obj -45 41 * 0.6; #X obj -45 148 +~ 5; #X connect 0 0 4 0; #X connect 1 0 2 0; #X connect 2 0 9 0; #X connect 3 0 6 0; #X connect 5 0 1 0; #X connect 6 0 2 1; #X connect 7 0 8 0; #X connect 8 0 5 0; #X connect 9 0 0 0; #X restore -280 333 pd line3; #N canvas 307 9 450 300 line4 0; #X obj -45 179 vd~ \$0_chorus_1; #X obj -45 95 osc~; #X obj -44 124 *~; #X obj 82 78 r \$0_chorus_depth; #X obj -44 212 outlet~; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -45 63 pd smooth; #N canvas 0 0 450 300 smooth 0; #X obj 191 129 inlet; #X obj 190 210 outlet~; #X obj 191 179 line~; #X msg 191 150 \$1 20; #X connect 0 0 3 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X restore -11 95 pd smooth; #X obj -45 12 r \$0_chorus_speed; #X obj -45 41 * 0.8; #X obj -45 148 +~ 5; #X connect 0 0 4 0; #X connect 1 0 2 0; #X connect 2 0 9 0; #X connect 3 0 6 0; #X connect 5 0 1 0; #X connect 6 0 2 1; #X connect 7 0 8 0; #X connect 8 0 5 0; #X connect 9 0 0 0; #X restore -279 359 pd line4; #X obj -215 528 r \$0_chorus_on; #X obj -310 181 delwrite~ \$0_chorus_1 10; #N canvas 495 149 450 300 noise 0; #X obj -7 134 env~; #X obj -6 229 line~; #X msg -7 202 \$1 100; #X obj -7 177 * 0.4; #X obj 100 102 vsl 20 100 0 100 0 1 empty empty gate 0 -9 0 10 -104297 -4032 -4032 2500 1; #X obj -7 156 >; #X obj -8 102 inlet~; #X obj -6 268 outlet~; #X connect 0 0 5 0; #X connect 1 0 7 0; #X connect 2 0 1 0; #X connect 3 0 2 0; #X connect 4 0 5 1; #X connect 5 0 3 0; #X connect 6 0 0 0; #X coords 0 -1 1 1 20 105 2 100 100; #X restore 224 172 pd noise; #X msg -250 639 set \$1; #X obj -249 616 r chorus_throw; #X obj -374 163 catch~ chorus; #X obj -373 573 throw~ out; #X connect 0 0 20 0; #X connect 4 0 1 0; #X connect 7 0 10 0; #X connect 8 0 0 1; #X connect 9 0 7 1; #X connect 10 0 8 0; #X connect 11 0 7 1; #X connect 12 0 7 1; #X connect 13 0 7 1; #X connect 14 0 0 2; #X connect 16 0 10 1; #X connect 17 0 20 0; #X connect 18 0 17 0; #X connect 19 0 0 0; #X connect 19 0 7 0; #X connect 19 0 15 0; #X connect 19 0 16 0; #X coords 0 -1 1 1 200 200 1 100 100; #X restore 435 372 pd delay; #N canvas 0 144 898 624 routing 0; #X obj 100 100 cnv 15 620 80 empty empty empty 20 12 0 14 -66577 -66577 0; #X obj -37 383 dac~; #X obj -37 260 adc~; #X obj -38 347 catch~ out; #X obj -37 319 throw~ out; #X msg 0 282 set \$1; #X obj 0 259 r in_throw; #X symbolatom 100 291 10 0 0 0 - - -; #X symbolatom 178 289 10 0 0 0 - - -; #X obj 100 347 s in_throw; #X obj 189 320 pack s s; #X msg 188 346 \; \$1_throw symbol \$2 \;; #X obj 100 253 unpack s s s s s s; #X symbolatom 308 289 10 0 0 0 - - -; #X obj 319 320 pack s s; #X msg 318 346 \; \$1_throw symbol \$2 \;; #X symbolatom 438 289 10 0 0 0 - - -; #X obj 449 320 pack s s; #X msg 448 346 \; \$1_throw symbol \$2 \;; #X symbolatom 568 289 10 0 0 0 - - -; #X obj 579 320 pack s s; #X msg 578 346 \; \$1_throw symbol \$2 \;; #X obj 321 156 bng 15 250 50 0 empty empty send 0 -7 0 10 -99865 -4032 -262144; #X obj 100 229 list-replace; #X msg 165 201 out out out out out; #X obj 121 197 t l b; #X obj 112 109 entry 200 60 grey black; #X connect 2 0 4 0; #X connect 2 1 4 0; #X connect 3 0 1 0; #X connect 3 0 1 1; #X connect 5 0 4 0; #X connect 6 0 5 0; #X connect 7 0 9 0; #X connect 7 0 10 0; #X connect 8 0 10 1; #X connect 8 0 14 0; #X connect 10 0 11 0; #X connect 12 0 7 0; #X connect 12 1 8 0; #X connect 12 2 13 0; #X connect 12 3 16 0; #X connect 12 4 19 0; #X connect 13 0 14 1; #X connect 13 0 17 0; #X connect 14 0 15 0; #X connect 16 0 17 1; #X connect 16 0 20 0; #X connect 17 0 18 0; #X connect 19 0 20 1; #X connect 20 0 21 0; #X connect 22 0 26 0; #X connect 23 0 12 0; #X connect 24 0 23 2; #X connect 25 0 23 0; #X connect 25 1 24 0; #X connect 26 0 25 0; #X coords 0 -1 1 1 620 80 2 100 100; #X restore 15 75 pd routing; #X text 15 18 1 routing window: type in the fx you want to play in the desired order (small letters only). for example type "wah-wah delay chorus" and hit "send" to make a signal flow from input->wah-wah->delay->chorus->dac~. ; #X text 645 72 some notes:; #X text 642 98 in every fx there is a built in noise gate ("gate" slider) ; #X text 642 129 wah-wah: use "in-dyn" to compress the signal that triggers the effect to get more smooth results.; #X text 639 178 the phaser can create high peaks \, use the "limiter" for dynamic limiting.; #X text 642 279 you can switch off every fx dsp cycle with the "ON" toggle.; #X text 639 216 the "tap" funktion of the delay works with 4 taps. tap it four times \, and it will be set to the average time between the single taps.;