max v2;
#N vpatcher 10 59 976 523;
#P origin -207 0;
#P window setfont Times 10.;
#P comment 87 252 208 1310730 see MSP tutorials 14 and 20 for more on groove~;
#P comment 90 220 200 1310730 verstatile sample playback from a RAM buffer~;
#P window setfont Times 14.;
#P comment 99 198 179 1310734 example of the groove~ object;
#P window setfont Times 10.;
#P comment 714 149 189 1310730 signal value determines playback speed factor;
#P comment 771 268 110 1310730 loop start and end points;
#P comment 544 185 110 1310730 loop 1 = on \, loop 0 = off;
#P comment 472 264 122 1310730 int or float in left inlet: send a starting point for playback;
#P comment 440 40 54 1310730 3. audio on;
#P comment 697 67 196 1310730 number of semitones transposition up or down;
#P comment 214 44 201 1310730 2. find the maximum ms location of the buffer~;
#P window setfont "Fixedwidth Serif" 10.;
#P newex 662 85 133 1441802 expr pow(2.\\\,$f1/12.);
#P number 662 66 35 10 0 0 0 22 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 662 130 63 10 0 0 0 22 0 0 0 221 221 221 222 222 222 0 0 0;
#P toggle 528 184 15 0;
#P message 528 202 51 1441802 loop \$1;
#P flonum 842 282 68 10 0. 4000. 3 22 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 752 282 68 10 0. 4000. 3 22 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 292 122 27 1441802 i;
#P message 292 149 43 1441802 max \$1;
#P flonum 292 103 99 10 0 0 0 22 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 290 59 15 0;
#P newex 208 81 108 1441802 info~ sample1;
#P number 504 244 50 10 0 4000 67 22 0 0 0 221 221 221 222 222 222 0 0 0;
#P toggle 458 54 15 0;
#P newex 662 409 100 1441802 dac~;
#P newex 662 148 51 1441802 sig~ 1.;
#P newex 662 300 190 1441802 groove~ sample1 2;
#P message 75 65 51 1441802 replace;
#P newex 75 85 99 1441802 buffer~ sample1;
#P window setfont Times 10.;
#P comment 50 51 140 1310730 1. put some sound in the buffer~;
#P connect 2 0 1 0;
#P fasten 9 0 8 0 295 77 213 77;
#P connect 8 6 10 0;
#P connect 10 0 12 0;
#P connect 12 0 11 0;
#P fasten 11 0 7 0 297 170 509 170;
#P connect 16 0 15 0;
#P connect 18 0 19 0;
#P connect 19 0 17 0;
#P connect 17 0 4 0;
#P fasten 15 0 3 0 533 222 667 222;
#P fasten 7 0 3 0 509 295 667 295;
#P connect 4 0 3 0;
#P fasten 6 0 5 0 463 405 667 405;
#P connect 3 0 5 0;
#P fasten 11 0 13 0 297 170 757 170;
#P connect 13 0 3 1;
#P connect 3 1 5 1;
#P fasten 11 0 14 0 297 170 847 170;
#P connect 14 0 3 2;
#P pop;