blob: f078049c3f9a9ac8e173784503079c3d19164467 (
plain)
1
|
max v2;
#N vpatcher 241 84 852 554;
#P message 396 398 52 196617 vasp buf=;
#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 396 419 73 196617 p clear_buffer;
#N vpatcher 113 336 466 586;
#P newex 152 160 27 196617 t b f;
#P newex 67 98 27 196617 - 0.;
#P newex 67 76 27 196617 t b i;
#P comment 226 139 72 196617 msec to samps;
#P comment 107 80 118 196617 <<< end - start = length;
#P newex 152 137 71 196617 * 44.099998;
#P newex 67 137 67 196617 * 44.099998;
#P newex 67 190 50 196617 pack 0 0;
#N comlet endpoint in ms;
#P inlet 152 32 15 0;
#N comlet startpoint in ms;
#P inlet 67 32 15 0;
#N comlet length and offset in samples (list);
#P outlet 67 215 15 0;
#P comment 151 98 75 196617 start = offset;
#P connect 2 0 9 0;
#P connect 3 0 10 0;
#P connect 9 0 10 0;
#P connect 10 0 5 0;
#P fasten 11 0 4 0 157 180 72 180;
#P connect 5 0 4 0;
#P connect 4 0 1 0;
#P connect 9 1 10 1;
#P fasten 11 1 4 1 174 183 112 183;
#P connect 2 0 6 0;
#P connect 6 0 11 0;
#P pop;
#P newobj 362 281 115 196617 p loop_to_length/offset;
#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 261 89 49 196617 p wfkeys;
#P comment 114 298 136 196617 set selected samples to zero;
#P button 95 297 15 0;
#P newex 55 219 61 196617 vasp.update;
#P newex 55 193 55 196617 vasp.* 0.5;
#P message 362 327 99 196617 set vasp \$1 buf= \$2;
#P comment 114 147 70 196617 generate noise;
#N vpatcher 278 163 996 630;
#P user umenu 86 119 72 196647 1 64 135 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 355 682;
#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 1077path;
#P newex 138 102 79 196617 sprintf read %s;
#P user umenu 48 169 100 196647 1 64 185 1;
#X add drums.aif;
#X add voice.aif;
#X add test.aif;
#X add read a soundfile;
#P connect 3 0 4 0;
#P connect 4 0 5 0;
#P connect 5 0 2 0;
#P fasten 1 0 2 0 143 134 64 134;
#P connect 4 1 1 0;
#P pop;
#P hidden newobj 148 140 43 196617 p loader;
#P message 504 394 85 196617 vasp buf=a buf=b;
#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 504 415 78 196617 p clear_buffers;
#P hidden newex 637 374 48 196617 r 1077path;
#P comment 59 121 26 196617 read;
#N vpatcher 113 336 466 586;
#N comlet length in ms out;
#P outlet 11 215 15 0;
#P newex 152 160 27 196617 t b f;
#P newex 67 98 27 196617 - 0.;
#P newex 67 76 27 196617 t b i;
#P comment 226 139 72 196617 msec to samps;
#P comment 107 80 118 196617 <<< end - start = length;
#P newex 152 137 71 196617 * 44.099998;
#P newex 67 137 67 196617 * 44.099998;
#P newex 67 190 50 196617 pack 0 0;
#N comlet endpoint in ms;
#P inlet 152 32 15 0;
#N comlet startpoint in ms;
#P inlet 67 32 15 0;
#N comlet length and offset in samples (list);
#P outlet 67 215 15 0;
#P comment 151 98 75 196617 start = offset;
#P connect 10 0 12 0;
#P connect 2 0 9 0;
#P connect 9 0 10 0;
#P connect 3 0 10 0;
#P connect 10 0 5 0;
#P connect 5 0 4 0;
#P fasten 11 0 4 0 157 180 72 180;
#P connect 4 0 1 0;
#P connect 9 1 10 1;
#P fasten 11 1 4 1 174 183 112 183;
#P connect 2 0 6 0;
#P connect 6 0 11 0;
#P pop;
#P newobj 214 233 115 196617 p loop_to_length/offset;
#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 375 51 49 196617 p wfkeys;
#P newex 73 289 27 196617 t f f;
#P message 593 376 41 196617 size \$1;
#P newex 73 323 74 196617 * 44.099998;
#P newex 73 264 27 196617 f;
#P button 73 200 15 0;
#P message 168 348 85 196617 vasp \$1 buf=a \$2;
#P message 73 349 72 196617 vasp \$1 buf=b;
#P newex 73 378 38 196617 vasp.=;
#P comment 359 235 14 196617 B;
#P newex 73 408 61 196617 vasp.update;
#P hidden message 375 214 50 196617 set buf=b;
#P user waveform~ 375 233 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 hidden message 375 92 50 196617 set buf=a;
#P hidden newex 375 71 45 196617 loadbang;
#P user waveform~ 374 112 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 593 394 95 196617 buffer~ buf=b 2000;
#P newex 593 414 95 196617 buffer~ buf=a 2000;
#P comment 359 114 14 196617 A;
#P comment 90 200 124 196617 copy selection from a to b;
#P comment 73 160 162 196617 choose a selection from buffer a;
#P comment 36 49 326 196622 use vasp.= to copy from buffer a to buffer b;
#P comment 358 363 100 196617 resize the buffer with selectionlength;
#P connect 17 0 18 0;
#P connect 18 0 21 0;
#P connect 21 0 19 0;
#P connect 19 0 15 0;
#P connect 15 0 14 0;
#P connect 14 0 12 0;
#P fasten 23 0 18 1 219 256 95 256;
#P fasten 16 0 14 1 173 371 106 371;
#P hidden connect 29 1 28 0;
#P fasten 23 1 16 0 324 283 173 283;
#P fasten 7 2 23 0 499 219 219 219;
#P fasten 7 3 23 1 559 225 324 225;
#P hidden connect 22 0 7 0;
#P hidden connect 9 0 7 0;
#P hidden fasten 5 1 9 0 683 434 694 434 694 88 380 88;
#P hidden connect 8 0 9 0;
#P hidden connect 8 0 11 0;
#P hidden connect 11 0 10 0;
#P hidden connect 22 0 10 0;
#P connect 27 0 26 0;
#P fasten 21 1 20 0 95 317 357 317 357 362 598 362;
#P fasten 20 0 6 0 598 389 598 389;
#P hidden connect 25 0 5 0;
#P pop;
#P newobj 55 419 85 196617 p more_examples;
#P message 55 146 52 196617 vasp buf=;
#P newex 55 167 55 196617 vasp.noise;
#P newex 55 378 61 196617 vasp.update;
#P message 55 272 52 196617 vasp buf=;
#P newex 55 354 45 196617 vasp.= 0;
#P comment 52 81 195 196617 optional argument/right inlet: value/vasp;
#P comment 52 66 102 196617 set a vasp to a value;
#P comment 52 43 89 196622 vasp.=;
#P hidden message 261 129 45 196617 set buf=;
#P hidden newex 261 109 45 196617 loadbang;
#P user waveform~ 261 148 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 comment 114 273 110 196617 set all samples to zero;
#P newex 481 419 92 196617 buffer~ buf= 2000;
#P comment 55 121 131 196617 use vasp.= to clear a buffer;
#P connect 13 0 12 0;
#P connect 12 0 17 0;
#P connect 17 0 18 0;
#P fasten 16 0 9 0 367 346 60 346;
#P fasten 19 0 9 0 100 346 60 346;
#P connect 10 0 9 0;
#P connect 9 0 11 0;
#P hidden connect 4 0 5 0;
#P hidden connect 21 0 3 0;
#P hidden connect 5 0 3 0;
#P fasten 3 2 22 0 386 264 367 264;
#P connect 22 0 16 0;
#P connect 24 0 23 0;
#P fasten 3 3 22 1 446 264 472 264;
#P pop;
|
