blob: edca78d9a6ee45718f5ca499735a3991d9b15110 (
plain)
1
|
max v2;
#N vpatcher 279 142 977 614;
#P message 477 385 75 196617 vasp bufamax?;
#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 477 405 73 196617 p clear_buffer;
#P hidden newex 554 368 48 196617 r 1148path;
#P user umenu 72 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 631 722;
#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 1148path;
#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 134 127 43 196617 p loader;
#P comment 46 107 26 196617 read;
#P flonum 80 229 68 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 46 61 242 196617 maximum value of the absolute values of a vasp;
#P message 52 197 75 196617 vasp bufamax?;
#P newex 52 262 38 196617 vasp./;
#P newex 52 284 61 196617 vasp.update;
#P newex 52 383 45 196617 vasp.opt;
#P message 52 350 75 196617 vasp bufamax?;
#P newex 52 165 84 196617 vasp.amax?;
#P hidden message 357 142 69 196617 set bufamax?;
#P hidden newex 357 116 45 196617 loadbang;
#P user waveform~ 357 161 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 304 405 27 196617 stop;
#P message 237 405 65 196617 startwindow;
#P newex 357 383 30 196617 line~;
#P message 357 363 72 196617 0 \, 2000 2000;
#P newex 357 431 29 196617 dac~;
#P newex 357 405 80 196617 play~ bufamax?;
#P newex 52 405 61 196617 vasp.update;
#P message 52 144 75 196617 vasp bufamax?;
#P newex 554 405 115 196617 buffer~ bufamax? 2000;
#P comment 128 145 221 196617 find the absolute maximum of this soundfile;
#P comment 150 230 141 196617 -> current absolute maximum;
#P comment 93 264 153 196617 use it to optimize buffer content;
#P comment 46 333 179 196617 or use vasp.opt which does the same;
#P comment 46 37 91 196622 vasp.amax?;
#P comment 46 76 137 196617 right outlet: calculated value;
#P connect 7 0 18 0;
#P fasten 23 0 22 0 57 236 57 236;
#P connect 22 0 21 0;
#P connect 19 0 20 0;
#P connect 20 0 8 0;
#P fasten 18 1 25 0 131 224 85 224;
#P connect 25 0 22 1;
#P hidden connect 28 1 27 0;
#P hidden fasten 6 1 17 0 664 428 675 428 675 138 362 138;
#P hidden connect 16 0 17 0;
#P hidden connect 17 0 15 0;
#P connect 11 0 12 0;
#P connect 12 0 9 0;
#P fasten 13 0 10 0 242 426 362 426;
#P fasten 14 0 10 0 309 426 362 426;
#P connect 9 0 10 0;
#P connect 9 0 10 1;
#P connect 31 0 30 0;
#P hidden connect 29 0 6 0;
#P pop;
|
