patches/lib/noise/walk.pd

#N canvas 0 30 1022 568 12;
#X obj 83 31 inlet;
#X obj 99 336 outlet;
#X text 210 11 bounded random walk;
#X obj 92 239 expr if(abs($f1+$f2)>1 \, $f1-$f2 \, $f1+$f2);
#X obj 78 139 random 1000;
#X obj 85 166 / 1000;
#X obj 90 203 * 1;
#X obj 141 279 clip -1 1;
#X obj 87 69 route bang;
#X text 127 205 max step size (if given a float in the inlet);
#X text 441 241 bounds for the walk;
#X connect 0 0 8 0;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 3 0;
#X connect 7 0 1 0;
#X connect 7 0 3 1;
#X connect 8 0 4 0;
#X connect 8 1 6 1;