disarrain~-help.pd 3.12 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109
#N canvas 717 430 516 403 10;
#N canvas 1009 566 462 312 disarrain-block 0;
#X obj 137 111 disarrain~ 4000;
#X obj 137 177 outlet~;
#X obj 237 173 outlet;
#X obj 137 66 inlet~;
#X obj 53 247 block~ 256;
#X obj 205 217 snapshot~;
#X obj 324 189 metro 100;
#X msg 325 162 1;
#X obj 327 125 loadbang;
#X obj 205 242 outlet;
#X obj 316 74 inlet;
#X connect 0 0 1 0;
#X connect 0 1 5 0;
#X connect 0 2 2 0;
#X connect 3 0 0 0;
#X connect 5 0 9 0;
#X connect 6 0 5 0;
#X connect 7 0 6 0;
#X connect 8 0 7 0;
#X connect 10 0 0 0;
#X restore 63 80 pd disarrain-block;
#X obj 63 11 phasor~ 174;
#X obj 63 241 *~ 0.05;
#X floatatom 123 132 5 0 0 0 - - -;
#X obj 63 286 dac~;
#X obj 110 199 hsl 128 15 0 0.5 0 0 empty empty empty -2 -6 0 8 -258444
-1 -1 3000 1;
#X floatatom 107 220 5 0 0 0 - - -;
#X msg 285 258 \; pd dsp \$1;
#X obj 285 237 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1
1;
#X text 51 333 disarrain~ is a modified version of disarray~ that interpolates
between different spectral reorderings.;
#N canvas 476 454 458 308 messages 0;
#X obj 209 234 outlet;
#X obj 303 202 fftease-system;
#N canvas 904 74 603 462 main-messages 0;
#X obj 8 407 outlet;
#X floatatom 38 65 5 0 0 0 - - -;
#X msg 77 148 forcefade \$1;
#X obj 78 122 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
;
#X floatatom 99 216 5 0 0 0 - - -;
#X msg 99 242 fadetime \$1;
#X floatatom 218 283 5 0 0 0 - - -;
#X msg 218 309 topfreq \$1;
#X msg 195 391 killfade;
#X msg 38 91 switch_count \$1;
#X msg 8 28 reset_shuffle;
#X text 123 29 make new reordering;
#X text 153 93 number of bins to reorder (at 0 there is no bin swapping)
;
#X text 167 151 permit override of current fade for instantaneous changes
;
#X text 297 312 top frequency to be shuffled;
#X text 270 391 immediately end current crossfade;
#X text 195 241 crossfade interpolation time;
#X msg 99 194 3000;
#X obj 99 172 loadbang;
#X connect 1 0 9 0;
#X connect 2 0 0 0;
#X connect 3 0 2 0;
#X connect 4 0 5 0;
#X connect 5 0 0 0;
#X connect 6 0 7 0;
#X connect 7 0 0 0;
#X connect 8 0 0 0;
#X connect 9 0 0 0;
#X connect 10 0 0 0;
#X connect 17 0 4 0;
#X connect 18 0 17 0;
#X restore 31 31 pd main-messages;
#N canvas 752 371 590 315 data 0;
#X obj 89 237 outlet;
#X msg 48 83 isetstate 73 109 187 113 3 2 1 30 96 4 7;
#X msg 105 119 setstate 0 20 23 42 2 18 6 7 38 14 10 27 12 8 4 19 16
5 36 9 15 40 39 45 24 25 28 17 33 13 43 29 34 21 32 35 22 37 46 1 26
3 41 44 11 31 30 47 48 49;
#X text 138 160 instant recall;
#X text 51 67 recall a mapping you like;
#X msg 194 188 showstate;
#X text 269 189 output current remapping as a list;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 5 0 0 0;
#X restore 5 145 pd data;
#X text 151 32 <- now go here;
#X text 58 144 <- if you find a setting you like and wish to store
it;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 3 0 0 0;
#X restore 184 53 pd messages;
#X obj 184 111 print;
#X text 229 113 prints current reordering;
#X text 124 146 crossfade sync;
#X text 277 56 <- start here;
#X connect 0 0 2 0;
#X connect 0 1 3 0;
#X connect 0 2 11 0;
#X connect 1 0 0 0;
#X connect 2 0 4 0;
#X connect 2 0 4 1;
#X connect 5 0 6 0;
#X connect 6 0 2 1;
#X connect 8 0 7 0;
#X connect 10 0 0 1;