Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Tree: 89fa73f7b5
Fetching contributors…

Cannot retrieve contributors at this time

196 lines (195 sloc) 4.737 kB
#N canvas 196 182 1118 614 10;
#X obj 79 13 inlet~;
#X obj 79 505 outlet~;
#X obj 79 96 hip~ 3;
#X obj 79 144 hip~ 600;
#X obj 79 168 hip~ 3;
#X text 109 73 upsampling factor \, to make up for lost energy;
#X obj 624 30 inlet;
#X obj 624 139 clip 0 100;
#X obj 673 204 clip 0 100;
#X obj 79 481 *~;
#X obj 624 105 route distortion tone gain interp upsample;
#X obj 624 168 s \$0-distortion;
#X obj 673 233 s \$0-tone;
#X obj 94 457 line~;
#X obj 94 432 pack f 10;
#X obj 145 410 r \$0-interp;
#X obj 94 386 r \$0-gain;
#X obj 723 136 s \$0-gain;
#X obj 773 167 max 0;
#X obj 773 193 s \$0-interp;
#X text 948 550 .mmb;
#N canvas 217 22 823 647 distortion 1;
#X obj 137 311 *~;
#X obj 257 95 / 100;
#X obj 152 173 + 100;
#X obj 152 197 dbtorms;
#X obj 301 241 -;
#X msg 301 217 \$2 \$1;
#X obj 301 185 pack f 22050;
#X obj 301 161 * 20550;
#X obj 152 150 * 27;
#X obj 429 43 r \$0-distortion;
#X obj 220 353 lop.mmb~ 22050;
#X obj 372 411 hip.mmb~ 0;
#X obj 429 383 line~;
#X obj 429 358 pack f 10;
#X obj 480 336 r \$0-interp;
#X obj 301 327 line~;
#X obj 301 302 pack f 10;
#X obj 353 280 r \$0-interp;
#X obj 152 260 line~;
#X obj 152 235 pack f 10;
#X obj 204 213 r \$0-interp;
#X obj 38 188 inlet~;
#X obj 372 534 outlet~;
#N canvas 86 22 743 382 waveshape 0;
#X obj 103 38 inlet~;
#N canvas -2 22 815 667 brickwall 0;
#X obj 83 135 inlet~;
#X obj 83 605 outlet~;
#X obj 219 208 * 0.408163;
#X text 290 207 18 kHz at sr=44.1 kHz;
#X obj 329 19 loadbang;
#X obj 329 81 samplerate~;
#X obj 406 10 r pd;
#X obj 406 33 route dsp;
#X obj 406 56 sel 1;
#X obj 220 147 / 16;
#X obj 528 105 / 44100;
#X obj 428 140 t b f;
#X obj 525 71 r \$0-over.cutoff;
#X obj 83 288 lp10_cheb~;
#X connect 0 0 13 0;
#X connect 2 0 13 1;
#X connect 4 0 5 0;
#X connect 5 0 9 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 5 0;
#X connect 9 0 2 0;
#X connect 10 0 11 0;
#X connect 11 0 2 0;
#X connect 11 1 2 1;
#X connect 12 0 10 0;
#X connect 13 0 1 0;
#X restore 103 72 pd brickwall;
#X text 185 71 get rid of periodized spectrum;
#X obj 103 99 tanh~;
#X text 185 131 prevent aliasing;
#X obj 103 165 outlet~;
#X obj 226 194 block~ 1024 1 16;
#X obj 565 86 s \$0-over.cutoff;
#X floatatom 571 41 0 0 0 0 - - -;
#N canvas 0 22 815 667 brickwall 0;
#X obj 83 135 inlet~;
#X obj 83 605 outlet~;
#X obj 219 208 * 0.408163;
#X text 290 207 18 kHz at sr=44.1 kHz;
#X obj 329 19 loadbang;
#X obj 329 81 samplerate~;
#X obj 406 10 r pd;
#X obj 406 33 route dsp;
#X obj 406 56 sel 1;
#X obj 220 147 / 16;
#X obj 528 105 / 44100;
#X obj 428 140 t b f;
#X obj 525 71 r \$0-over.cutoff;
#X obj 83 288 lp10_cheb~;
#X connect 0 0 13 0;
#X connect 2 0 13 1;
#X connect 4 0 5 0;
#X connect 5 0 9 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 5 0;
#X connect 9 0 2 0;
#X connect 10 0 11 0;
#X connect 11 0 2 0;
#X connect 11 1 2 1;
#X connect 12 0 10 0;
#X connect 13 0 1 0;
#X restore 103 132 pd brickwall;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 3 0 9 0;
#X connect 8 0 7 0;
#X connect 9 0 5 0;
#X restore 372 469 pd waveshape;
#X connect 0 0 10 0;
#X connect 1 0 7 0;
#X connect 1 0 8 0;
#X connect 2 0 3 0;
#X connect 3 0 19 0;
#X connect 4 0 16 0;
#X connect 5 0 4 0;
#X connect 6 0 5 0;
#X connect 7 0 6 0;
#X connect 8 0 2 0;
#X connect 9 0 1 0;
#X connect 9 0 13 0;
#X connect 10 0 11 0;
#X connect 11 0 23 0;
#X connect 12 0 11 1;
#X connect 13 0 12 0;
#X connect 14 0 13 1;
#X connect 15 0 10 1;
#X connect 16 0 15 0;
#X connect 17 0 16 1;
#X connect 18 0 0 1;
#X connect 19 0 18 0;
#X connect 20 0 19 1;
#X connect 21 0 0 0;
#X connect 23 0 22 0;
#X restore 79 225 pd distortion;
#N canvas 0 22 527 343 tone 0;
#X obj 102 188 xfade.mmb~;
#X obj 252 112 / 100;
#X obj 45 129 lop~ 320;
#X obj 155 133 hip~ 1160;
#X obj 243 166 line~;
#X obj 243 141 pack f 10;
#X obj 252 83 r \$0-tone;
#X obj 295 119 r \$0-interp;
#X obj 82 61 inlet~;
#X obj 102 247 outlet~;
#X connect 0 0 9 0;
#X connect 1 0 5 0;
#X connect 2 0 0 0;
#X connect 3 0 0 1;
#X connect 4 0 0 2;
#X connect 5 0 4 0;
#X connect 6 0 1 0;
#X connect 7 0 5 1;
#X connect 8 0 2 0;
#X connect 8 0 3 0;
#X restore 79 279 pd tone;
#X obj 716 19 loadbang;
#X msg 703 80 gain 1 \, distortion 0 \, tone 30;
#X text 118 120 about a 35 dB boost;
#X obj 79 120 *~ 70;
#X obj 79 73 *~ 16;
#X connect 0 0 27 0;
#X connect 2 0 26 0;
#X connect 3 0 4 0;
#X connect 4 0 21 0;
#X connect 6 0 10 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 1 0;
#X connect 10 0 7 0;
#X connect 10 1 8 0;
#X connect 10 2 17 0;
#X connect 10 3 18 0;
#X connect 13 0 9 1;
#X connect 14 0 13 0;
#X connect 15 0 14 1;
#X connect 16 0 14 0;
#X connect 18 0 19 0;
#X connect 21 0 22 0;
#X connect 22 0 9 0;
#X connect 23 0 24 0;
#X connect 24 0 10 0;
#X connect 26 0 3 0;
#X connect 27 0 2 0;
Jump to Line
Something went wrong with that request. Please try again.