before re-inventing the wheel, do you have suggestions
for (feedback) delay effects already available in PD like
"ping-pong" delay, multi-tap delay, "cross" delay
etc?
All of these are easily built using [delwrite~], [delread~] and [vd~].
See attached patch from my workshop examples.
d.
--
derek holzer :::
http://www.umatic.nl
---Oblique Strategy # 54:
"Do something sudden, destructive and unpredictable"
#N canvas 117 78 626 459 10;
#X obj 23 36 adc~;
#X obj 96 36 hsl 128 15 0 0.99 0 1 empty empty feedback_(0-.99) -2
-6 0 8 -24198 -1 -1 10600 1;
#X text 445 407 derek@umatic.nl;
#X msg 366 391 ; pd dsp $1;
#X obj 366 368 tgl 20 0 empty empty on/off 25 8 0 8 -258699 -1 -1 0
1;
#X obj 30 349 dac~;
#X obj 60 320
*~;
#X obj 148 280 dbtorms;
#X obj 30 320 *~;
#X obj 22 126 cnv 15 150 120 empty empty TAP_ONE 80 110 0 14 -233017
-66577 0;
#X obj 34 135 hsl 128 15 0 1000 0 1 empty empty delay_time -2 -6 0
8 -24198 -1 -1 2800 1;
#X obj 31 159 vd~ delay_two;
#N canvas 0 0 391 265 panner 0;
#X obj 31 18 inlet~;
#X obj 29 185 outlet~ left;
#X obj 179 185 outlet~ right;
#X obj 30 154
*~;
#X obj 47 110 pack 0 50;
#X obj 47 131 line~;
#X obj 196 19 inlet slider;
#X obj 196 40 * -1;
#X obj 196 60 + 1;
#X obj 179 154
*~;
#X obj 196 110 pack 0 50;
#X obj 196 131 line~;
#X text 252 224 derek@umatic.nl;
#X connect 0 0 3 0;
#X connect 0 0 9 0;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 5 0 3 1;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 10 0;
#X connect 8 0 4 0;
#X connect 9 0 2 0;
#X connect 10 0 11 0;
#X connect 11 0 9 1;
#X restore 31 211 pd panner;
#X obj 60 190 hsl 100 15 0 1 0 1 empty empty panner -2 -6 0 8 -24198
-1 -1 1200 1;
#X obj 177 126 cnv 15 150 120 empty empty TAP_TWO 80 110 0 14 -233017
-66577 0;
#X obj 188 135 hsl 128 15 0 1000 0 1 empty empty delay_time -2 -6 0
8 -24198 -1 -1 6200 1;
#X obj 185 159 vd~ delay_two;
#N canvas 0 0 391 265 panner 0;
#X obj 31 18 inlet~;
#X obj 29 185 outlet~ left;
#X obj 179 185 outlet~ right;
#X obj 30 154 *~;
#X obj 47 110 pack 0 50;
#X obj 47 131 line~;
#X obj 196 19 inlet slider;
#X obj 196 40 * -1;
#X obj 196 60 + 1;
#X obj 179 154
*~;
#X obj 196 110 pack 0 50;
#X obj 196 131 line~;
#X text 252 224 derek@umatic.nl;
#X connect 0 0 3 0;
#X connect 0 0 9 0;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 5 0 3 1;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 10 0;
#X connect 8 0 4 0;
#X connect 9 0 2 0;
#X connect 10 0 11 0;
#X connect 11 0 9 1;
#X restore 185 211 pd panner;
#X obj 214 190 hsl 100 15 0 1 0 1 empty empty panner -2 -6 0 8 -24198
-1 -1 5000 1;
#X obj 332 126 cnv 15 150 120 empty empty TAP_THREE 60 110 0 14 -233017
-66577 0;
#X obj 342 135 hsl 128 15 0 1000 0 1 empty empty delay_time -2 -6 0
8 -24198 -1 -1 12500 1;
#X obj 339 159 vd~ delay_two;
#N canvas 0 0 391 265 panner 0;
#X obj 31 18 inlet~;
#X obj 29 185 outlet~ left;
#X obj 179 185 outlet~ right;
#X obj 30 154 *~;
#X obj 47 110 pack 0 50;
#X obj 47 131 line~;
#X obj 196 19 inlet slider;
#X obj 196 40 * -1;
#X obj 196 60 + 1;
#X obj 179 154
*~;
#X obj 196 110 pack 0 50;
#X obj 196 131 line~;
#X text 252 224 derek@umatic.nl;
#X connect 0 0 3 0;
#X connect 0 0 9 0;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 5 0 3 1;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 10 0;
#X connect 8 0 4 0;
#X connect 9 0 2 0;
#X connect 10 0 11 0;
#X connect 11 0 9 1;
#X restore 338 211 pd panner;
#X obj 367 190 hsl 100 15 0 1 0 1 empty empty panner -2 -6 0 8 -24198
-1 -1 9200 1;
#X obj 216 279 cnv 15 110 20 empty empty empty 20 12 0 14 -24198 -66577
0;
#X floatatom 218 280 0 0 100 1 master_gain - -;
#X obj 93 56 pack 0 50;
#X obj 93 77 line~;
#N canvas 0 0 327 195 feedback 0;
#X obj 14 16 inlet~;
#X obj 66 95 *~;
#X text 179 161 derek@umatic.nl;
#X obj 83 16 inlet~ fader;
#X obj 15 123 delwrite~ delay_two 1000;
#X obj 67 59 delread~ delay_two 1000;
#X connect 0 0 4 0;
#X connect 1 0 4 0;
#X connect 3 0 1 1;
#X connect 5 0 1 0;
#X restore 22 99 pd feedback;
#X text 178 65 Here we have a multi-tap delay , each tap has been
set to a different length in ms , and has also been panned to different
locations in the setreo field. Jah Rastafari!!!;
#X connect 0 0 28 0;
#X connect 1 0 26 0;
#X connect 4 0 3 0;
#X connect 6 0 5 1;
#X connect 7 0 6 1;
#X connect 7 0 8 1;
#X connect 8 0 5 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 12 0 8 0;
#X connect 12 1 6 0;
#X connect 13 0 12 1;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 17 0 8 0;
#X connect 17 1 6 0;
#X connect 18 0 17 1;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 22 0 8 0;
#X connect 22 1 6 0;
#X connect 23 0 22 1;
#X connect 25 0 7 0;
#X connect 26 0 27 0;
#X connect 27 0 28 1;