diff options
Diffstat (limited to 'distoAp~-help.pd')
| -rw-r--r-- | distoAp~-help.pd | 65 |
1 files changed, 65 insertions, 0 deletions
diff --git a/distoAp~-help.pd b/distoAp~-help.pd new file mode 100644 index 0000000..47f9428 --- /dev/null +++ b/distoAp~-help.pd @@ -0,0 +1,65 @@ +#N canvas 631 397 563 270 10; +#X text 10 50 See: http://www.acoustics.hut.fi/~jpekonen/Papers/dafx08/ +; +#X text 11 5 Description: "Coefficient Modulated Allpass Filter as +Distortion Effect" as in the DAFx 2008 paper by Jussi Pekonen; +#X obj 15 125 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 +1; +#X obj 15 211 mtl/out~; +#X text 9 68 Author: Frank Barknecht \, 2008; +#X text 10 85 tags: fx~; +#X obj 243 132 hsl 100 15 0 127 0 0 \$0/disAp/lop \$0/disAp/lop_ /disAp/lop +105 7 0 8 -262144 -1 -1 0 1; +#X obj 243 152 hsl 100 15 0 500 0 0 \$0/disAp/drive \$0/disAp/drive_ +/disAp/drive 105 7 0 8 -262144 -1 -1 0 1; +#X obj 243 112 hsl 100 15 0 1 0 0 \$0/disAp/wet \$0/disAp/wet_ /disAp/wet +105 7 0 8 -262144 -1 -1 0 1; +#X text 239 173 presets; +#X msg 252 214 /disAp/lop 30 \, /disAp/drive 110 \, /disAp/wet 1; +#X msg 175 164 /wet \$1; +#X floatatom 175 143 5 0 1 0 - - -; +#X msg 241 194 /disAp/lop 80 \, /disAp/drive 10 \, /disAp/wet 1; +#N canvas 5 185 450 300 generate~ 0; +#X obj 32 213 osc~ 200; +#X obj 32 89 metro 400; +#X obj 32 175 mtof; +#X obj 104 195 mtof; +#X obj 32 132 + 20; +#X obj 32 111 random 70; +#X floatatom 83 69 5 0 0 0 - - -; +#X obj 32 261 outlet~; +#X obj 103 261 outlet~; +#X obj 30 14 inlet; +#X obj 104 175 mtl/closestNote 0 2 4 7 9; +#X obj 104 234 *~; +#X obj 31 234 *~; +#X obj 104 214 osc~ 100; +#X obj 32 155 mtl/closestNote 0 2 4 7 9; +#X connect 0 0 12 0; +#X connect 1 0 5 0; +#X connect 2 0 0 0; +#X connect 3 0 13 0; +#X connect 4 0 10 0; +#X connect 4 0 14 0; +#X connect 5 0 4 0; +#X connect 6 0 1 1; +#X connect 9 0 1 0; +#X connect 9 0 11 1; +#X connect 9 0 12 1; +#X connect 10 0 3 0; +#X connect 11 0 8 0; +#X connect 12 0 7 0; +#X connect 13 0 11 0; +#X connect 14 0 2 0; +#X restore 15 150 pd generate~; +#X obj 16 187 mtl/distoAp~ /id disAp; +#X obj 241 235 tof/param route; +#X connect 2 0 14 0; +#X connect 10 0 16 0; +#X connect 11 0 15 2; +#X connect 12 0 11 0; +#X connect 13 0 16 0; +#X connect 14 0 15 0; +#X connect 14 1 15 1; +#X connect 15 0 3 0; +#X connect 15 1 3 1; |