max v2;
#N vpatcher 20 74 941 514;
#P origin -109 0;
#P window setfont "Fixedwidth Serif" 18.;
#P newex 509 48 97 1441810 loadbang;
#P newex 150 146 295 1441810 expr pow(2\\\,($f1-63.)/12.);
#P newex 150 107 337 1441810 stripnote;
#P user kslider 150 47 54 0 36 48 31 12 0 128 128 128 128 128 128 255 255 255 0 0 0 0 0 0;
#P toggle 121 319 15 0;
#P newex 150 365 114 1441810 dac~;
#P message 119 259 19 1441810 0;
#P newex 150 259 75 1441810 sig~ 1;
#P newex 150 314 218 1441810 groove~ thesample 2;
#P message 509 77 394 1441810 replace "./Documentation/Tutorials/MSP Tutorials/eroica.aiff";
#P newex 509 122 196 1441810 buffer~ thesample;
#P comment 191 26 251 1441810 Emulated MIDI keyboard;
#P comment 1 316 119 1441810 DSP on/off;
#P comment 508 149 328 1441810 store a digital sample in RAM;
#P comment 156 171 383 1441810 considering the original pitch of the sample to be E-flat (MIDI 63) \, calculate the ratio of every pitch relative to that original pitch;
#P comment 227 263 405 1441810 signal controls the rate of playback;
#P comment 8 242 111 1441810 leap to beginning of buffer;
#P connect 15 0 10 0;
#P connect 13 0 14 0;
#P connect 14 0 15 0;
#P connect 15 0 9 0;
#P connect 10 0 8 0;
#P connect 9 0 8 0;
#P connect 8 0 11 0;
#P connect 12 0 11 0;
#P connect 8 1 11 1;
#P connect 13 1 14 1;
#P connect 16 0 7 0;
#P connect 7 0 6 0;
#P pop;