max v2; #N vpatcher 73 92 960 655; #P hidden newex 737 368 48 196617 r 1042path; #P message 633 391 93 196617 vasp buf?? buf??1; #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 633 410 78 196617 p clear_buffers; #P user umenu 59 141 72 196647 1 64 157 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 1042path; #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 fasten 1 0 2 0 143 134 64 134; #P connect 5 0 2 0; #P connect 4 1 1 0; #P pop; #P hidden newobj 121 160 43 196617 p loader; #P hidden message 448 239 22 196617 set; #P comment 133 448 100 196617 sample values; #P message 20 463 794 196617; #P newex 20 434 60 196617 prepend set; #P message 20 399 528 196617; #P comment 52 101 133 196617 right outlet: sample value; #P newex 59 364 60 196617 prepend set; #P newex 59 265 44 196617 vasp.??; #P comment 811 222 44 196617 peaks; #P comment 132 182 148 196617 copy to new buffer \, find peaks; #P hidden message 529 220 55 196617 set buf??1; #P user waveform~ 529 237 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 737 410 104 196617 buffer~ buf??1 1000; #P comment 52 86 134 196617 left outlet: sample index; #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 529 52 49 196617 p wfkeys; #P hidden message 529 98 51 196617 set buf??; #P hidden newex 529 74 45 196617 loadbang; #P user waveform~ 529 118 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 59 227 93 196617 vasp.peaks 0.0004; #P message 59 180 64 196617 vasp buf??1; #P newex 737 391 104 196617 buffer~ buf?? 1000; #P newex 59 201 65 196617 vasp.= buf??; #P comment 52 71 259 196617 outputs all samples of a vasp that are unequal to zero; #P comment 52 48 89 196622 vasp.??; #P comment 806 103 44 196617 source; #P comment 131 382 100 196617 sample index; #P hidden fasten 25 0 21 0 453 390 25 390; #P fasten 19 0 21 0 64 390 25 390; #P fasten 18 1 22 0 98 302 9 302 9 424 25 424; #P hidden fasten 25 0 23 0 453 457 25 457; #P connect 22 0 23 0; #P connect 6 0 4 0; #P connect 4 0 7 0; #P connect 7 0 18 0; #P connect 18 0 19 0; #P hidden connect 27 1 26 0; #P hidden fasten 9 0 25 0 531 91 453 91; #P hidden connect 9 0 10 0; #P hidden fasten 5 1 10 0 836 406 846 406 846 94 534 94; #P hidden connect 11 0 8 0; #P hidden connect 10 0 8 0; #P hidden connect 9 0 15 0; #P hidden connect 15 0 14 0; #P hidden connect 11 0 14 0; #P connect 29 0 28 0; #P hidden connect 30 0 5 0; #P hidden fasten 14 5 8 4 834 340 846 340 846 94 834 94; #P hidden connect 8 5 14 4; #P pop;