/grandel/winfader-single2.pd

  1#N canvas 0 15 610 716 10;
  2#X text 277 96 this one mixes between 2 windows (from abstraction windowing)
  3\, and even offers smooth fade when changing windows;
  4#X text 288 142 make sure windowing abs is generated before initing
  5tables...;
  6#X obj 114 249 f;
  7#X obj 148 250 + 1;
  8#X obj 180 264 0;
  9#X obj 45 255 sel 1;
 10#X obj 45 234 < 200;
 11#X obj 134 333 until;
 12#X obj 218 352 / 200;
 13#X obj 133 369 f;
 14#X obj 161 370 + 1;
 15#X obj 161 474 tabread goo;
 16#X obj 130 554 *;
 17#X obj 131 582 +;
 18#X obj 162 559 *;
 19#X obj 219 373 t f f;
 20#X obj 133 393 t f f f;
 21#X obj 115 291 t a b a b;
 22#X obj 182 310 0;
 23#X obj 219 399 * -1;
 24#X obj 218 421 + 1;
 25#X obj 115 193 t b b a;
 26#X obj 226 234 symbol;
 27#X msg 248 474 set \$1;
 28#X obj 73 328 outlet;
 29#X obj 72 296 bang;
 30#X obj 115 124 inlet;
 31#X obj 133 418 tabread \$1;
 32#X obj 131 639 tabwrite \$1;
 33#N canvas 0 15 610 716 tabsel 0;
 34#X obj 76 35 inlet;
 35#X obj 76 55 sel 0 1 2 3 4 5 6 7 8 9;
 36#X msg 76 74 hann;
 37#X msg 91 91 fourthrootsine;
 38#X msg 106 108 quarticsine;
 39#X msg 122 125 rpear;
 40#X msg 138 142 pear;
 41#X msg 152 159 triangle;
 42#X msg 169 177 quasigaussian;
 43#X msg 185 194 rexpodec;
 44#X msg 200 211 expodec;
 45#X msg 216 228 sinc;
 46#X obj 71 261 makefilename 512-win.%s;
 47#X obj 71 235 symbol;
 48#X obj 71 283 outlet;
 49#X connect 0 0 1 0;
 50#X connect 1 0 2 0;
 51#X connect 1 1 3 0;
 52#X connect 1 2 4 0;
 53#X connect 1 3 5 0;
 54#X connect 1 4 6 0;
 55#X connect 1 5 7 0;
 56#X connect 1 6 8 0;
 57#X connect 1 7 9 0;
 58#X connect 1 8 10 0;
 59#X connect 1 9 11 0;
 60#X connect 2 0 13 0;
 61#X connect 3 0 13 0;
 62#X connect 4 0 13 0;
 63#X connect 5 0 13 0;
 64#X connect 6 0 13 0;
 65#X connect 7 0 13 0;
 66#X connect 8 0 13 0;
 67#X connect 9 0 13 0;
 68#X connect 10 0 13 0;
 69#X connect 11 0 13 0;
 70#X connect 12 0 14 0;
 71#X connect 13 0 12 0;
 72#X restore 115 157 pd tabsel;
 73#X obj 251 108 0;
 74#X obj 251 86 delay 50;
 75#X obj 251 69 loadbang;
 76#X obj 114 221 delay 11;
 77#X obj 426 79 table \$1 515;
 78#X obj 226 258 t s b s b;
 79#X obj 278 283 symbol \$1;
 80#X msg 278 306 \$1 const;
 81#X msg 134 313 515;
 82#X connect 2 0 3 0;
 83#X connect 2 0 17 0;
 84#X connect 3 0 2 1;
 85#X connect 4 0 2 1;
 86#X connect 4 0 9 1;
 87#X connect 5 0 33 0;
 88#X connect 5 1 25 0;
 89#X connect 6 0 5 0;
 90#X connect 7 0 9 0;
 91#X connect 8 0 15 0;
 92#X connect 9 0 10 0;
 93#X connect 9 0 16 0;
 94#X connect 10 0 9 1;
 95#X connect 11 0 14 0;
 96#X connect 12 0 13 0;
 97#X connect 13 0 28 0;
 98#X connect 14 0 13 1;
 99#X connect 15 0 19 0;
100#X connect 15 1 14 1;
101#X connect 16 0 27 0;
102#X connect 16 1 11 0;
103#X connect 16 2 28 1;
104#X connect 17 0 6 0;
105#X connect 17 1 38 0;
106#X connect 17 2 8 0;
107#X connect 17 3 18 0;
108#X connect 18 0 9 1;
109#X connect 19 0 20 0;
110#X connect 20 0 12 1;
111#X connect 21 0 33 0;
112#X connect 21 1 4 0;
113#X connect 21 2 22 0;
114#X connect 22 0 35 0;
115#X connect 23 0 11 0;
116#X connect 25 0 24 0;
117#X connect 26 0 29 0;
118#X connect 27 0 12 0;
119#X connect 29 0 21 0;
120#X connect 30 0 29 0;
121#X connect 31 0 30 0;
122#X connect 32 0 31 0;
123#X connect 33 0 2 0;
124#X connect 35 2 23 0;
125#X connect 35 3 36 0;
126#X connect 36 0 37 0;
127#X connect 38 0 7 0;
128#X coords 0 0 1 1 85 200 0;