blob: bce9fe518479f6d98d04a8f2d809cf548c93494f (
plain)
1
|
max v2;
#N vpatcher 213 143 951 665;
#P user umenu 84 105 72 196647 1 64 121 1;
#X add bass.aif;
#X add beat.aif;
#X add fly.aif;
#X add plastic.aif;
#X add your_own...;
#N vpatcher 93 462 347 671;
#P message 59 102 28 196617 read;
#P newex 59 69 89 196617 route your_own...;
#N comlet popup comment in;
#P inlet 59 26 15 0;
#P newex 59 149 54 196617 s 1069path1;
#P newex 138 102 79 196617 sprintf read %s;
#P connect 2 0 3 0;
#P connect 3 0 4 0;
#P fasten 0 0 1 0 143 134 64 134;
#P connect 4 0 1 0;
#P connect 3 1 0 0;
#P pop;
#P hidden newobj 146 127 43 196617 p loader;
#P message 467 441 113 196617 vasp bufrect1 bufrect2;
#N vpatcher 40 55 218 175;
#P newex 45 79 61 196617 vasp.update;
#P newex 45 56 45 196617 vasp.= 0;
#N comlet vasp to clear in;
#P inlet 45 26 15 0;
#P connect 0 0 1 0;
#P connect 1 0 2 0;
#P pop;
#P newobj 467 460 78 196617 p clear_buffers;
#P hidden newex 582 414 54 196617 r 1069path1;
#P comment 57 107 26 196617 read;
#P comment 187 376 179 196617 tranform with invers cfft to original;
#P newex 63 416 61 196617 vasp.update;
#P message 63 375 113 196617 vasp bufrect1 bufrect2;
#P newex 63 395 52 196617 vasp.c!fft;
#P newex 63 186 61 196617 vasp.update;
#P message 63 297 113 196617 vasp bufrect1 bufrect2;
#P newex 63 317 51 196617 vasp.rect;
#P newex 63 339 61 196617 vasp.update;
#P comment 187 221 173 196617 real-> amplitude / imaginary-> phase;
#N vpatcher 148 168 892 640;
#P user umenu 83 67 72 196647 1 64 83 1;
#X add bass.aif;
#X add beat.aif;
#X add fly.aif;
#X add plastic.aif;
#X add your_own...;
#N vpatcher 93 462 347 671;
#P message 59 102 28 196617 read;
#P newex 59 69 89 196617 route your_own...;
#N comlet popup comment in;
#P inlet 59 26 15 0;
#P newex 59 149 48 196617 s 1069path;
#P newex 138 102 79 196617 sprintf read %s;
#P connect 2 0 3 0;
#P connect 3 0 4 0;
#P fasten 0 0 1 0 143 134 64 134;
#P connect 4 0 1 0;
#P connect 3 1 0 0;
#P pop;
#P hidden newobj 145 89 43 196617 p loader;
#P message 591 355 113 196617 vasp bufrect3 bufrect4;
#N vpatcher 40 55 218 175;
#P newex 45 79 61 196617 vasp.update;
#P newex 45 56 45 196617 vasp.= 0;
#N comlet vasp to clear in;
#P inlet 45 26 15 0;
#P connect 0 0 1 0;
#P connect 1 0 2 0;
#P pop;
#P newobj 591 374 78 196617 p clear_buffers;
#P hidden newex 544 395 48 196617 r 1069path;
#P comment 56 68 26 196617 read;
#N vpatcher 40 55 418 371;
#P button 183 82 15 0;
#P newex 129 145 60 196617 prepend set;
#N comlet waveform~ mode messages;
#P inlet 129 121 15 0;
#P newex 259 64 27 196617 << 1;
#P newex 206 121 40 196617 change;
#P newex 206 145 107 196617 select 0 1 2;
#P newex 206 98 27 196617 |;
#P newex 47 121 40 196617 change;
#P outlet 129 252 15 0;
#P message 47 145 65 196617 constrain \$1;
#P newex 129 195 45 196617 loadbang;
#P newex 47 40 222 196617 pushkeys;
#P message 270 169 58 196617 mode move;
#P message 206 213 61 196617 mode select;
#P message 238 191 52 196617 mode loop;
#P connect 3 0 7 0;
#P connect 7 0 5 0;
#P connect 12 0 13 0;
#P fasten 5 0 6 0 52 243 134 243;
#P fasten 0 0 6 0 243 243 134 243;
#P fasten 1 0 6 0 211 243 134 243;
#P fasten 2 0 6 0 275 243 134 243;
#P connect 11 0 14 0;
#P connect 3 3 8 0;
#P connect 14 0 8 0;
#P connect 8 0 10 0;
#P connect 10 0 9 0;
#P connect 4 0 1 0;
#P connect 9 0 1 0;
#P connect 13 0 1 0;
#P connect 11 0 8 1;
#P connect 9 1 0 0;
#P connect 3 4 11 0;
#P connect 9 2 2 0;
#P pop;
#P hidden newobj 394 60 49 196617 p wfkeys;
#P hidden message 394 104 64 196617 set bufrect3;
#P hidden newex 394 80 45 196617 loadbang;
#P user waveform~ 394 122 312 99 3 9;
#W mode select;
#W mouseoutput continuous;
#W unit ms;
#W grid 1000.;
#W ticks 8.;
#W labels 1;
#W vlabels 1;
#W vticks 1;
#W vzoom 1.;
#W voffset 0.;
#W bpm 120. 4.;
#W frgb 0 0 0;
#W brgb 255 255 255;
#W rgb2 132 132 132;
#W rgb3 0 0 0;
#W rgb4 0 0 0;
#W rgb5 255 255 255;
#W rgb6 100 100 100;
#W rgb7 100 100 100;
#P message 394 395 27 196617 stop;
#P message 326 395 65 196617 startwindow;
#P newex 435 421 29 196617 dac~;
#P newex 435 369 30 196617 line~;
#P message 435 346 72 196617 0 \, 4000 4000;
#P newex 435 394 75 196617 play~ bufrect3;
#P newex 61 395 61 196617 vasp.freeze;
#P comment 118 290 190 196617 polar to cartesian coordinate conversion;
#P comment 178 235 81 196617 scale to 0 - 2¹;
#P comment 149 211 68 196617 random phase;
#P comment 128 180 116 196617 split amplitude and phase;
#P comment 123 153 193 196617 cartesian to polar coordinate conversion;
#P newex 591 416 111 196617 buffer~ bufrect4 4000;
#P newex 591 394 111 196617 buffer~ bufrect3 4000;
#P message 61 105 113 196617 vasp bufrect3 bufrect4;
#P newex 61 334 61 196617 vasp.update;
#P newex 61 311 52 196617 vasp.c!fft;
#P newex 61 288 51 196617 vasp.rect;
#P newex 61 265 58 196617 vasp.join 2;
#P newex 86 233 86 196617 vasp.* 3.141593;
#P newex 86 209 55 196617 vasp.noise;
#P newex 61 177 61 196617 vasp.split 2;
#P newex 61 151 55 196617 vasp.polar;
#P newex 61 129 49 196617 vasp.cfft;
#P comment 122 131 151 196617 complex fourier transformation;
#P comment 56 35 177 196622 phase random_example;
#P comment 127 397 170 196617 is an abstraction that does the same;
#P connect 12 0 3 0;
#P connect 3 0 4 0;
#P connect 4 0 5 0;
#P connect 5 0 8 0;
#P connect 8 0 9 0;
#P connect 9 0 10 0;
#P connect 10 0 11 0;
#P connect 5 1 6 0;
#P connect 6 0 7 0;
#P fasten 7 0 8 1 91 257 114 257;
#P hidden connect 36 1 35 0;
#P hidden fasten 13 1 29 0 697 413 713 413 713 99 399 99;
#P hidden connect 28 0 29 0;
#P hidden connect 29 0 27 0;
#P hidden connect 30 0 27 0;
#P connect 22 0 23 0;
#P connect 23 0 21 0;
#P connect 21 0 24 0;
#P fasten 25 0 24 0 331 414 440 414;
#P fasten 26 0 24 0 399 414 440 414;
#P connect 21 0 24 1;
#P connect 34 0 33 0;
#P hidden fasten 32 0 13 0 549 388 596 388;
#P pop;
#P newobj 63 460 115 196617 p phaserandom_example;
#P comment 187 298 180 196617 amplitude-> real / phase-> imaginary;
#P comment 187 146 179 196617 tranform with cfft to real / imaginary;
#P message 63 220 113 196617 vasp bufrect1 bufrect2;
#P message 63 145 113 196617 vasp bufrect1 bufrect2;
#P newex 63 240 55 196617 vasp.polar;
#N vpatcher 40 55 418 371;
#P button 183 82 15 0;
#P newex 129 145 60 196617 prepend set;
#N comlet waveform~ mode messages;
#P inlet 129 121 15 0;
#P newex 259 64 27 196617 << 1;
#P newex 206 121 40 196617 change;
#P newex 206 145 107 196617 select 0 1 2;
#P newex 206 98 27 196617 |;
#P newex 47 121 40 196617 change;
#P outlet 129 252 15 0;
#P message 47 145 65 196617 constrain \$1;
#P newex 129 195 45 196617 loadbang;
#P newex 47 40 222 196617 pushkeys;
#P message 270 169 58 196617 mode move;
#P message 206 213 61 196617 mode select;
#P message 238 191 52 196617 mode loop;
#P connect 3 0 7 0;
#P connect 7 0 5 0;
#P connect 12 0 13 0;
#P fasten 2 0 6 0 275 243 134 243;
#P fasten 1 0 6 0 211 243 134 243;
#P fasten 0 0 6 0 243 243 134 243;
#P fasten 5 0 6 0 52 243 134 243;
#P connect 11 0 14 0;
#P connect 14 0 8 0;
#P connect 3 3 8 0;
#P connect 8 0 10 0;
#P connect 10 0 9 0;
#P connect 13 0 1 0;
#P connect 9 0 1 0;
#P connect 4 0 1 0;
#P connect 11 0 8 1;
#P connect 9 1 0 0;
#P connect 3 4 11 0;
#P connect 9 2 2 0;
#P pop;
#P hidden newobj 385 85 49 196617 p wfkeys;
#P comment 611 257 86 196617 imaginary / phase;
#P hidden message 385 251 64 196617 set bufrect2;
#P user waveform~ 385 272 312 99 3 9;
#W mode select;
#W mouseoutput continuous;
#W unit ms;
#W grid 1000.;
#W ticks 8.;
#W labels 1;
#W vlabels 1;
#W vticks 1;
#W vzoom 1.;
#W voffset 0.;
#W bpm 120. 4.;
#W frgb 0 0 0;
#W brgb 255 255 255;
#W rgb2 132 132 132;
#W rgb3 0 0 0;
#W rgb4 0 0 0;
#W rgb5 255 255 255;
#W rgb6 100 100 100;
#W rgb7 100 100 100;
#P newex 582 460 111 196617 buffer~ bufrect2 2000;
#P hidden message 385 129 64 196617 set bufrect1;
#P hidden newex 385 105 45 196617 loadbang;
#P user waveform~ 385 147 312 99 3 9;
#W mode select;
#W mouseoutput continuous;
#W unit ms;
#W grid 1000.;
#W ticks 8.;
#W labels 1;
#W vlabels 1;
#W vticks 1;
#W vzoom 1.;
#W voffset 0.;
#W bpm 120. 4.;
#W frgb 0 0 0;
#W brgb 255 255 255;
#W rgb2 132 132 132;
#W rgb3 0 0 0;
#W rgb4 0 0 0;
#W rgb5 255 255 255;
#W rgb6 100 100 100;
#W rgb7 100 100 100;
#P newex 63 165 49 196617 vasp.cfft;
#P newex 63 262 61 196617 vasp.update;
#P newex 582 441 111 196617 buffer~ bufrect1 2000;
#P comment 54 71 192 196617 polar to cartesian coordinate conversion;
#P comment 54 48 76 196622 vasp.rect;
#P comment 620 132 83 196617 real / amplitude;
#P connect 15 0 5 0;
#P connect 5 0 24 0;
#P connect 16 0 14 0;
#P connect 14 0 4 0;
#P connect 23 0 22 0;
#P connect 22 0 21 0;
#P connect 26 0 25 0;
#P connect 25 0 27 0;
#P hidden connect 34 1 33 0;
#P hidden connect 7 0 8 0;
#P hidden fasten 3 1 8 0 688 458 702 458 702 74 390 74;
#P hidden connect 13 0 6 0;
#P hidden connect 8 0 6 0;
#P hidden fasten 7 0 11 0 390 110 390 110;
#P hidden connect 11 0 10 0;
#P hidden connect 13 0 10 0;
#P connect 32 0 31 0;
#P hidden connect 30 0 3 0;
#P pop;
|