wave morphing - Pd-list

28 Dec 2006 · *~ 2; #X obj 176 267 +~; #X obj 324 87 fade-morph 0 126; #X obj 334 114 fade-morph -63 126; #X obj 195 173 *


      Hi list,
I am trying to fade beetween waveshapes, doesn't find how to get an 
average of the morphed signal between 0 and 1,
Anyone has an idea?
#N canvas 0 0 454 304 10;
#X obj 117 74 noise~;
#N canvas 454 176 514 430 module 0;
#X obj 139 23 inlet~;
#X obj 176 343 outlet~;
#X obj 233 71 osc~;
#X obj 232 50 / 100;
#X obj 197 94 >~ 0;
#X obj 140 122 samphold~;
#X obj 232 24 inlet;
#X obj 283 23 inlet;
#X obj 318 63 fade-morph 63 128;
#X obj 176 234 +~;
#X obj 195 194 *~ 2;
#X obj 176 267 +~;
#X obj 324 87 fade-morph 0 126;
#X obj 334 114 fade-morph -63 126;
#X obj 195 173 *~ 0;
#X obj 177 151 *~ 0;
#X obj 234 209 *~ 1;
#X obj 176 298 /~ 2;
#X obj 189 213 -~ 2;
#X obj 235 239 +~ 3;
#X connect 0 0 5 0;
#X connect 2 0 4 0;
#X connect 2 0 16 0;
#X connect 3 0 2 0;
#X connect 4 0 5 1;
#X connect 4 0 14 0;
#X connect 5 0 15 0;
#X connect 6 0 3 0;
#X connect 7 0 8 0;
#X connect 7 0 12 0;
#X connect 7 0 13 0;
#X connect 8 0 15 1;
#X connect 9 0 11 0;
#X connect 10 0 18 0;
#X connect 11 0 17 0;
#X connect 12 0 14 1;
#X connect 13 0 16 1;
#X connect 14 0 10 0;
#X connect 15 0 9 0;
#X connect 16 0 19 0;
#X connect 17 0 1 0;
#X connect 18 0 9 1;
#X connect 19 0 11 1;
#X restore 141 137 pd module;
#X obj 243 102 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
-1 -1 0 1;
#X floatatom 235 64 5 0 0 0 - - -;
#X floatatom 132 272 5 0 0 0 - - -;
#X obj 133 178 unsig~ 50;
#X text 121 13 waveshape morphing;
#X connect 0 0 1 0;
#X connect 1 0 5 0;
#X connect 2 0 1 2;
#X connect 3 0 1 1;
#X connect 5 0 4 0;
#N canvas 0 0 339 233 10;
#N canvas 29 318 179 311 fade-morph 0;
#X obj 42 8 inlet;
#X obj 41 267 outlet;
#X obj 42 114 change;
#X obj 41 245 /;
#X obj 42 157 -;
#X obj 109 50 $2;
#X obj 127 118 / 2;
#X obj 42 178 abs;
#X obj 42 200 -;
#X obj 42 222 abs;
#X obj 42 135 - $1;
#X obj 42 30 t a b;
#X obj 80 72 + $1;
#X obj 42 91 clip $1;
#X connect 0 0 11 0;
#X connect 2 0 10 0;
#X connect 3 0 1 0;
#X connect 4 0 7 0;
#X connect 5 0 6 0;
#X connect 5 0 12 0;
#X connect 6 0 4 1;
#X connect 6 0 3 1;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 3 0;
#X connect 10 0 4 0;
#X connect 11 0 13 0;
#X connect 11 1 5 0;
#X connect 12 0 13 2;
#X connect 13 0 2 0;
#X restore 163 121 pd fade-morph;
#X text 161 47 $2 = ending fade out;
#X text 161 26 $1 = begining fade in;
#X text 148 66 $2/2 = top level;
#X text 86 44 inlet;
#X text 72 189 outlet = value between 0 and 1;
#X obj 163 94 inlet;
#X obj 163 145 outlet;
#X connect 0 0 7 0;
#X connect 6 0 0 0;