Forums > MaxMSP

Change a samples lenght (stretch) within buffer…

March 17, 2008 | 4:33 pm

dear Reader,

I wonder if it is possible, to stretch a sample’s length (for instance from 3850 to 5000) in the buffer?
I am using the info~ to get the actual length, than scale it, …

so I can use the end result with groove~ in its signal input?

I wonder if there is a better way of changing the length of a buffer… something where I do not need to use groove’s rate?

thank you,
all the best!

tedor

max v2;
#N vpatcher 1 44 1267 785;
#P origin 0 -23;
#P window setfont "Sans Serif" 9.;
#P flonum 830 474 59 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 870 418 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 830 418 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 830 448 50 196617 / 0.1;
#P message 662 367 14 196617 1;
#P flonum 662 456 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 662 422 117 196617 scale 0. 2000. 0. 5000.;
#P message 503 365 98 196617 read ;
#P newex 503 336 83 196617 prepend set read;
#P flonum 435 336 57 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P window linecount 2;
#P comment 435 356 58 196617 total buffer time (ms);
#P window linecount 1;
#P comment 320 468 133 196617 velocity range information;
#P window linecount 2;
#P comment 391 440 58 196617 high vel (MIDI);
#P comment 316 439 58 196617 low vel (MIDI);
#P comment 241 439 58 196617 high freq (MIDI note);
#P number 391 421 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 316 421 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 241 421 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 166 421 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 91 421 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 16 421 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 27 268 15 0;
#P comment 367 356 62 196617 release loop end (ms);
#P comment 299 356 62 196617 release loop start (ms);
#P comment 231 355 62 196617 sustain loop end (ms);
#P window linecount 1;
#P newex 16 399 462 196617 unpack 0 0 0 0 0 0 0;
#P flonum 367 336 54 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 299 336 54 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 231 336 54 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 163 336 54 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 27 337 54 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 27 310 492 196617 info~ seq01;
#B color 5;
#P window linecount 2;
#P comment 26 357 68 196617 sampling rate of the file;
#P comment 163 355 62 196617 sustain loop start (ms);
#P window linecount 1;
#P comment 47 269 100 196617 trigger the output;
#P window linecount 3;
#P comment 104 330 37 196617 pitch info as a list;
#P window linecount 2;
#P comment 16 439 59 196617 base freq (MIDI note);
#P window linecount 1;
#P comment 91 439 38 196617 detune;
#P window linecount 2;
#P comment 166 438 58 196617 low freq (MIDI note);
#P window linecount 1;
#P comment 177 468 116 196617 pitch range information;
#P window linecount 2;
#P comment 503 384 93 196617 name of most recently loaded file;
#P window linecount 1;
#P message 169 41 14 196617 1;
#P hidden message 984 533 26 196617 100;
#P hidden newex 980 506 48 196617 loadbang;
#P user ezdac~ 11 504 55 537 0;
#P button 484 37 15 0;
#P button 195 42 15 0;
#P newex 240 117 95 196617 sprintf set set s%i;
#P message 240 156 58 196617 set s1;
#P number 240 83 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 648 108 83 196617 buffer~ seq01 1;
#P message 553 91 78 196617 copyInto seq01;
#P window setfont "Sans Serif" 18.;
#P newex 389 119 120 196626 mxj buf.Op s;
#P window setfont "Sans Serif" 12.;
#P comment 83 34 72 196620 SOUND 1;
#P window setfont "Sans Serif" 9.;
#P message 27 56 118 196617 read 01_SHOVEL_01.aif;
#P newex 44 116 29 196617 adc~;
#P toggle 12 116 15 0;
#P newex 12 139 60 196617 record~ s1;
#P message 10 37 41 196617 replace;
#P newex 10 78 58 196617 buffer~ s1;
#P user panel 6 31 152 131;
#X brgb 191 191 191;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P user meter~ 866 625 879 683 100 0 168 0 104 104 104 255 153 0 255 0 0 217 217 0 153 186 0 12 3 3 3 3;
#P user gain~ 830 625 37 36 158 0 1.071519 7.94321 10.;
#P newex 900 650 29 196617 dac~;
#P flonum 830 544 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P message 869 566 49 196617 startloop;
#P newex 830 565 35 196617 sig~ 1;
#P newex 830 603 77 196617 groove~ seq01;
#P user panel 813 503 161 209;
#X brgb 237 244 185;
#X frgb 0 0 0;
#X border 1;
#X rounded 13;
#X shadow 0;
#X done;
#P user panel 163 30 589 151;
#X brgb 191 191 191;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P hidden connect 11 0 10 0;
#P hidden connect 15 0 10 0;
#P connect 13 0 12 0;
#P hidden fasten 14 0 12 0 49 135 17 135;
#P fasten 38 1 44 0 100 392 21 392;
#P connect 44 0 49 0;
#P connect 48 0 38 0;
#P connect 38 0 39 0;
#P connect 44 1 50 0;
#P connect 38 2 40 0;
#P connect 44 2 51 0;
#P connect 38 3 41 0;
#P connect 20 0 22 0;
#P connect 28 0 21 0;
#P connect 23 0 21 0;
#P connect 22 0 21 0;
#P connect 44 3 52 0;
#P connect 38 4 42 0;
#P connect 44 4 53 0;
#P connect 38 5 43 0;
#P connect 18 0 17 0;
#P connect 21 0 17 0;
#P connect 44 5 54 0;
#P connect 38 6 60 0;
#P connect 38 7 61 0;
#P connect 61 0 62 0;
#P connect 24 0 18 0;
#P connect 65 0 63 0;
#P connect 63 0 64 0;
#P fasten 60 0 63 2 440 356 709 356;
#P connect 67 0 66 0;
#P connect 66 0 69 0;
#P connect 69 0 5 0;
#P connect 5 0 3 0;
#P hidden connect 4 0 2 0;
#P connect 3 0 2 0;
#P hidden connect 27 0 7 0;
#P connect 2 0 7 0;
#P hidden connect 7 0 8 0;
#P fasten 64 0 68 0 667 485 813 485 813 403 875 403;
#P connect 68 0 66 1;
#P hidden fasten 7 0 6 0 835 688 905 688;
#P hidden fasten 7 0 6 1 835 688 924 688;
#P hidden connect 26 0 27 0;
#P pop;


March 18, 2008 | 3:11 am


March 18, 2008 | 7:15 am

That was I was afraid of…

this means it is not possible to have the stretched version in a buffer without playing the sounds with groove~ (FFT) and recording it?
Maybe I just will have to look into the FFT thing!

Thank you for the help,

krisztian


March 18, 2008 | 1:28 pm


March 18, 2008 | 6:37 pm


March 18, 2008 | 7:05 pm


March 18, 2008 | 7:24 pm

j5!
Yes, I was about to investigate that pack, it looks really advanced, but my teacher suggested me the same a few days ago! Will go and have a look!

Gary Lee Nelson!
Ha, this will take me a while to know what is what!

Thank you all!
All the best,
tEd


March 18, 2008 | 7:28 pm


March 20, 2008 | 11:28 pm

dear Gary Lee Nelson

Is there also a patcher called ‘gizmo_loadme’ I should use to run this patch or should I change this argument in pfft` to something else.
I about to understand how this patch works.. but could not get it run yet, could you tell me please, what to do?

All the best,
Krisztian Hofstadter


March 20, 2008 | 11:50 pm

… in a way I got it working, I made a patch of the recipe in pfft~ (load me)…

I will be continuing…

thx


March 21, 2008 | 4:15 am

#P window setfont "Sans Serif" 9.;
#P flonum 172 158 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P window linecount 1;
#P newex 172 103 72 196617 route int float;
#P newex 92 236 50 196617 fftout~ 1;
#N in 2;
#P newobj 172 70 25 196617 in 2;
#P newex 92 182 90 196617 gizmo~;
#B color 5;
#P newex 92 70 44 196617 fftin~ 1;
#P window linecount 3;
#P comment 246 94 94 196617 other messages get sent to gizmo~’s left inlet;
#P window linecount 2;
#P comment 213 158 110 196617 right inlet (float) is for transposition
factor;
#P connect 7 0 3 2;
#P connect 6 0 7 0;
#P connect 6 1 7 0;
#P connect 4 0 6 0;
#P connect 3 1 5 1;
#P connect 2 1 3 1;
#P connect 3 0 5 0;
#P connect 2 0 3 0;
#P connect 6 2 3 0;
#P window clipboard copycount 8;

Cheers
Gary Lee Nelson
Oberlin College
http://www.timara.oberlin.edu/GaryLeeNelson

> From: tedor
> Organization: Cycling ’74
> Reply-To:
> Date: Fri, 21 Mar 2008 00:28:46 +0100
> To:

> Subject: [maxmsp] Re: Change a samples lenght (stretch) within buffer…
>
>
> dear Gary Lee Nelson
>
> Is there also a patcher called ‘gizmo_loadme’ I should use to run this patch
> or should I change this argument in pfft` to something else.
> I about to understand how this patch works.. but could not get it run yet,
> could you tell me please, what to do?
>
> All the best,
> Krisztian Hofstadter


March 21, 2008 | 9:47 pm

… this is thing I was looking for:)

thank you!
Krisztian


April 2, 2008 | 6:15 am

dear Gary and Reader,

I am trying to sort out how to change the length of the buffer to exact 5 sec (5000 buffers?). In a way I can make the sound longer by stretching, but I am not sure about the exact length of the altered sound.
Is it just an easy math calculation and I am a dummy or is there a deeper secret?

First argument changed from 2000 to 20000 stretches it 5 times longer… which argument do I need to change to get the exact length of 5 sec.? Whenever I lower the 3rd argument, it gets slower…

Please help me out!

All the best,
Krisztian

FILE : play+gizmo~.help

max v2;
#N vpatcher 0 48 1004 695;
#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P newex 337 219 29 196617 * 1.;
#P flonum 356 196 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 356 174 27 196617 + 1.;
#P flonum 356 155 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 356 134 93 196617 scale 0 5000 0. 1.;
#P number 233 322 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 195 304 68 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P hidden button 119 225 15 0;
#P comment 125 250 82 196617 bang the sound;
#P comment 225 342 43 196617 volume;
#P comment 107 323 125 196617 semitones higher or lower;
#P comment 269 306 30 196617 end;
#P comment 231 286 32 196617 start;
#P flonum 271 340 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 100 248 15 0;
#P window linecount 2;
#P message 119 418 62 196617 5000 0 1537 0 0.5;
#P window linecount 1;
#P newex 119 394 62 196617 prepend set;
#P newex 119 371 164 196617 pack 2000 0 2000 0 0.5;
#P number 157 285 72 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 119 266 74 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 195 267 38 196617 lenght;
#P window setfont "Sans Serif" 14.;
#P comment 120 348 53 196622 seq03;
#P window setfont "Sans Serif" 9.;
#P message 823 244 106 196617 2000 0 2000 2.5 0.1;
#P window linecount 2;
#P comment 823 217 109 196617 forward + 2.53 semitones;
#P window linecount 1;
#P message 823 191 144 196617 20000 10000 20000 -12 0.5;
#P comment 823 170 134 196617 stretch x 5 – 12 semitones;
#P comment 823 86 61 196617 backward;
#P message 823 148 106 196617 20000 0 2000 0. 0.1;
#P message 823 105 100 196617 2000 2000 0 0. 0.1;
#P message 602 456 208 196617 note 5000 0 1537 0. 0.5 sample;
#P newex 602 432 62 196617 prepend set;
#P message 823 65 108 196617 2000 0 2000 0. 0.1;
#P newex 493 371 34 196617 t b l;
#P number 195 110 88 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P user ezdac~ 493 471 537 504 0;
#P message 10 28 43 196617 replace;
#P newex 117 83 105 196617 info~ sample;
#P newex 10 55 117 196617 buffer~ sample;
#P newex 493 404 157 196617 pack note 0 0 0 0. 0.25 sample;
#P newex 493 432 104 196617 poly~ play+gizmo~ 8;
#P comment 823 43 61 196617 forward;
#P comment 823 127 100 196617 stretch x 5;
#P connect 6 0 4 0;
#P fasten 36 0 27 0 238 341 82 341 82 239 105 239;
#P connect 4 1 5 0;
#P hidden fasten 28 0 34 0 276 360 310 360 310 203 124 203;
#P hidden fasten 35 0 34 0 200 346 93 346 93 203 124 203;
#P hidden fasten 23 0 34 0 162 346 92 346 92 202 124 202;
#P hidden fasten 36 0 34 0 238 345 93 345 93 202 124 202;
#P hidden connect 34 0 22 0;
#P hidden connect 22 0 24 0;
#P connect 24 0 25 0;
#P fasten 27 0 26 0 105 414 124 414;
#P connect 25 0 26 0;
#P hidden connect 23 0 24 1;
#P connect 5 6 8 0;
#P connect 8 0 35 0;
#P hidden connect 35 0 24 2;
#P hidden connect 36 0 24 3;
#P hidden connect 28 0 24 4;
#P connect 8 0 41 0;
#P connect 8 0 37 0;
#P connect 37 0 38 0;
#P connect 38 0 39 0;
#P connect 39 0 40 0;
#P connect 40 0 41 1;
#P connect 10 0 9 0;
#P connect 13 0 9 0;
#P connect 14 0 9 0;
#P connect 17 0 9 0;
#P connect 19 0 9 0;
#P connect 26 0 9 0;
#P connect 9 0 3 0;
#P connect 3 0 2 0;
#P connect 2 0 7 0;
#P connect 9 1 3 1;
#P connect 2 0 7 1;
#P connect 3 0 11 0;
#P connect 11 0 12 0;
#P pop;

FILE : gizmo_loadme

#P window setfont "Sans Serif" 9.;
#P flonum 172 158 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P window linecount 1;
#P newex 172 103 72 196617 route int float;
#P newex 92 236 50 196617 fftout~ 1;
#N in 2;
#P newobj 172 70 25 196617 in 2;
#P newex 92 182 90 196617 gizmo~;
#B color 5;
#P newex 92 70 44 196617 fftin~ 1;
#P window linecount 3;
#P comment 246 94 94 196617 other messages get sent to gizmo~’s left inlet;
#P window linecount 2;
#P comment 213 158 110 196617 right inlet (float) is for transposition
factor;
#P connect 7 0 3 2;
#P connect 6 0 7 0;
#P connect 6 1 7 0;
#P connect 4 0 6 0;
#P connect 3 1 5 1;
#P connect 2 1 3 1;
#P connect 3 0 5 0;
#P connect 2 0 3 0;
#P connect 6 2 3 0;
#P window clipboard copycount 8;

FILE : play+gizmo~

#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P newex 287 342 23 196617 abs;
#P window linecount 4;
#P newex 354 229 85 196617 expr ((440. * exp(.057762265 * $f1))* 0.002273);
#P window linecount 2;
#P comment 235 119 59 196617 end sample in ms;
#P window linecount 1;
#N out~ 1;
#P newobj 63 534 39 196617 out~ 1;
#P newex 23 457 21 196617 t 0;
#P newex 63 497 35 196617 *~ 1.;
#P newex 627 178 22 196617 b 1;
#P newex 504 426 48 196617 loadbang;
#P window setfont "Fixedwidth Serif" 10.;
#P message 560 460 62 1441802 mute 1 , 0;
#P message 627 460 63 1441802 mute 0 , 1;
#P newex 560 491 65 1441802 thispoly~;
#P window setfont "Sans Serif" 9.;
#P newex 63 154 499 196617 unpack 0. 0 0 0. 0. sample;
#N in 1;
#P newobj 63 21 25 196617 in 1;
#P newex 547 246 62 196617 prepend set;
#P newex 266 416 29 196617 * 1.;
#P newex 287 222 48 196617 pack 0 0;
#P newex 63 453 135 196617 pfft~ gizmo_loadme 4096 4;
#P newex 266 377 31 196617 / 1.;
#P message 63 313 56 196617 $2 , $3 $1;
#P newex 63 284 57 196617 pack 0 0 0;
#P newex 287 261 30 196617 !-;
#P newex 63 415 82 196617 play~ $0sample;
#P newex 63 334 32 196617 line~;
#P window linecount 2;
#P comment 74 118 61 196617 play dur in ms;
#P window linecount 3;
#P comment 326 113 67 196617 transposition interval in semitones;
#P window linecount 2;
#P comment 144 119 65 196617 start sample in ms;
#P window linecount 1;
#P comment 430 128 53 196617 amplitude;
#P window linecount 2;
#P comment 542 121 42 196617 buffer name;
#P window linecount 1;
#P comment 116 219 100 196617 convert duration ms;
#P window linecount 2;
#P comment 369 194 50 196617 interval to ratio;
#P window linecount 4;
#P comment 299 286 52 196617 end-start for play sample dur;
#P window linecount 3;
#P comment 302 413 69 196617 final transposition ratio;
#P window linecount 2;
#P comment 497 458 49 196617 mute at birth;
#P connect 26 0 23 0;
#P connect 20 0 21 0;
#P fasten 20 0 26 0 68 104 632 104;
#P fasten 24 0 22 0 565 478 565 478;
#P fasten 23 0 22 0 632 484 565 484;
#P connect 25 0 24 0;
#P fasten 10 1 28 0 90 355 28 355;
#P fasten 10 1 24 0 90 366 565 366;
#P connect 21 5 19 0;
#P fasten 21 3 31 0 359 219 359 219;
#P fasten 21 2 17 1 262 204 330 204;
#P connect 32 0 15 1;
#P connect 12 0 32 0;
#P fasten 17 0 13 1 292 250 91 250;
#P connect 17 0 12 0;
#P fasten 21 1 17 0 165 210 292 210;
#P fasten 31 0 18 1 359 407 290 407;
#P connect 15 0 18 0;
#P connect 21 0 13 0;
#P fasten 21 0 15 0 68 244 271 244;
#P fasten 18 0 16 1 271 442 193 442;
#P fasten 28 0 27 1 28 480 93 480;
#P fasten 21 4 27 1 456 480 93 480;
#P connect 27 0 29 0;
#P connect 16 0 27 0;
#P connect 11 0 16 0;
#P fasten 19 0 11 0 552 400 68 400;
#P connect 10 0 11 0;
#P connect 14 0 10 0;
#P connect 13 0 14 0;
#P window clipboard copycount 33;


April 2, 2008 | 8:06 am

… I think I have got an idea, no worries:)
all the best!


April 4, 2008 | 6:13 am

ok…
I could not sort it out, if there is still someone who could give me a tip.
I am still not sure how to stretch it to an exact length?

All the best,

Krisztian

max v2;
#N vpatcher 4 44 1280 800;
#P button 965 96 15 0;
#P window setfont "Sans Serif" 24.;
#P number 94 64 51 24 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P user panel 83 48 72 71;
#X brgb 255 207 107;
#X frgb 0 0 0;
#X border 1;
#X rounded 30;
#X shadow 0;
#X done;
#P window setfont "Fixedwidth Serif" 10.;
#P window linecount 1;
#P hidden newex 15 28 29 1441802 key;
#P hidden toggle 15 88 15 0;
#P hidden newex 15 53 64 1441802 select 32;
#P hidden button 68 84 15 0;
#P window setfont "Sans Serif" 9.;
#N vpatcher 231 74 1508 680;
#P origin 1 0;
#P window setfont "Sans Serif" 9.;
#P message 126 423 14 196617 1;
#P button 37 116 15 0;
#P window linecount 1;
#P comment 151 264 129 196617 restart the clock outside;
#P window linecount 0;
#P newex 64 449 41 196617 s clock;
#P window linecount 1;
#P newex 35 362 48 196617 loadbang;
#P message 35 384 14 196617 0;
#P user gswitch2 35 404 39 32 0 0;
#P button 429 287 15 0;
#P button 266 160 15 0;
#P message 287 139 18 196617 0;
#N comlet numbers;
#P outlet 35 448 15 0;
#N comlet start;
#P inlet 37 78 15 0;
#N comlet stop at 47;
#P outlet 171 450 15 0;
#P window linecount 0;
#N counter 0 0 47;
#X flags 0 0;
#P newobj 126 337 293 196617 counter 0 0 47;
#B color 5;
#P window setfont "Sans Serif" 14.;
#P number 126 362 53 14 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P window setfont "Sans Serif" 9.;
#P newex 37 133 64 196617 metro 1000;
#P button 37 153 25 0;
#P newex 126 395 67 196617 select 46 47;
#B color 5;
#P button 171 429 15 0;
#P window setfont "Sans Serif" 36.;
#P comment 425 38 100 196644 clock;
#P window setfont "Sans Serif" 9.;
#P comment 293 159 100 196617 restart the clock;
#P comment 35 478 100 196617 stops showing the clock outside (it stops at 45) but I use select 47 to stop all the sound , there might be some starting at 45. Later I will try to fade them out.;
#P fasten 10 0 16 0 221 180;
#P connect 17 0 16 0;
#P connect 16 0 15 0;
#P connect 21 0 15 0;
#P connect 15 0 11 0;
#P connect 10 0 20 0;
#P fasten 14 0 20 0 434 314 450 314 450 102 42 102;
#P connect 20 0 6 0;
#P connect 6 0 5 0;
#P connect 7 0 15 1;
#P connect 15 0 18 0;
#P fasten 5 0 8 0 42 342 131 342;
#P connect 8 0 7 0;
#P connect 7 0 4 0;
#P connect 4 0 21 0;
#P connect 4 1 3 0;
#P connect 3 0 9 0;
#P connect 10 0 13 0;
#P connect 13 0 8 2;
#P connect 12 0 8 2;
#P connect 10 0 12 0;
#P pop;
#P hidden newobj 90 30 135 196617 p clock;
#P message 985 152 40 196617 15000;
#P message 943 151 34 196617 5000;
#P flonum 894 195 52 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 891 393 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 893 322 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 857 343 46 196617 / 6500.;
#P flonum 857 296 56 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 857 270 46 196617 / 6500.;
#P flonum 857 164 44 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 857 142 35 196617 * 10.;
#P newex 857 219 47 196617 * 5000.;
#P flonum 857 245 86 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 816 430 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 797 455 29 196617 * 0.;
#P number 697 601 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 659 583 68 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P hidden button 583 504 15 0;
#P comment 589 529 82 196617 bang the sound;
#P comment 689 621 43 196617 volume;
#P comment 571 602 125 196617 semitones higher or lower;
#P comment 733 585 30 196617 end;
#P comment 695 565 32 196617 start;
#P flonum 735 619 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 564 527 15 0;
#P message 583 697 129 196617 10715 0 1393 0 0.5;
#P newex 583 673 62 196617 prepend set;
#P newex 583 650 164 196617 pack 2000 0 2000 0 0.5;
#P number 621 564 72 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 583 545 74 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 659 546 38 196617 lenght;
#P window setfont "Sans Serif" 14.;
#P comment 584 627 53 196622 seq03;
#P window setfont "Sans Serif" 9.;
#P number 656 115 88 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P message 471 33 43 196617 replace;
#P newex 578 88 105 196617 info~ sample;
#P newex 471 60 117 196617 buffer~ sample;
#P toggle 455 164 15 0;
#P newex 455 183 29 196617 gate;
#P button 455 202 15 0;
#P number 54 244 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#N vpatcher 10 59 610 459;
#P outlet 132 211 15 0;
#P window setfont "Sans Serif" 9.;
#P window linecount 0;
#P newex 131 183 55 196617 delay 100;
#P button 131 165 15 0;
#P outlet 52 213 15 0;
#P inlet 89 55 15 0;
#P inlet 53 55 15 0;
#P window linecount 1;
#P newex 53 150 62 196617 prepend set;
#P number 89 110 51 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 53 90 43 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 53 129 82 196617 pak 0 0 0 0. 0.1;
#P connect 3 0 6 0;
#P connect 1 0 0 0;
#P connect 4 0 0 0;
#P connect 0 0 3 0;
#P connect 2 0 0 2;
#P connect 5 0 0 2;
#P connect 0 0 7 0;
#P connect 7 0 8 0;
#P connect 8 0 9 0;
#P pop;
#P newobj 346 178 55 196617 p forward;
#P number 391 158 51 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 346 158 43 9 0 0 64 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P message 346 217 95 196617 651 0 2000 0. 0.1;
#P number 108 275 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P toggle 1195 646 15 0;
#P message 1195 668 58 196617 append $1;
#P toggle 1141 646 15 0;
#P message 1141 668 41 196617 loop $1;
#P toggle 1106 646 15 0;
#P newex 1121 711 80 196617 record~ sample;
#B color 5;
#P user ezadc~ 1122 588 1166 621 0;
#P newex 53 344 27 196617 * 6;
#P newex 80 296 38 196617 * 500;
#P newex 53 320 37 196617 pipe 0;
#P message 53 370 103 196617 2000 0 2000 $1 0.1;
#P button 17 244 15 0;
#P newex 17 268 47 196617 uzi 10 0;
#P message 333 413 106 196617 2000 0 2000 2.5 0.1;
#P window linecount 2;
#P comment 333 386 109 196617 forward + 2.53 semitones;
#P window linecount 1;
#P message 333 360 114 196617 20000 0 2000 -12 0.1;
#P comment 333 339 134 196617 stretch x 5 – 12 semitones;
#P comment 333 255 61 196617 backward;
#P message 333 317 97 196617 20000 0 2000 0. 1;
#P message 333 274 100 196617 2000 2000 0 0. 0.1;
#P message 225 553 179 196617 note 1393 1393 0 0. 0.8 sample;
#P newex 225 527 62 196617 prepend set;
#P message 334 136 108 196617 2000 0 2000 0. 0.1;
#P newex 204 450 27 196617 t b l;
#P user ezdac~ 204 651 248 684 0;
#P newex 204 495 157 196617 pack note 0 0 0 0. 0.25 sample;
#P newex 204 590 104 196617 poly~ play+gizmo~ 8;
#P comment 334 114 61 196617 forward;
#P comment 333 296 100 196617 stretch x 5;
#P window linecount 2;
#P comment 93 241 65 196617 < - This many versions;
#P window linecount 1;
#P comment 150 276 53 196617 < - delay;
#P window linecount 16;
#P comment 1104 238 43 196617 5000 Stretch it to 5 sec 15000 Stretch it to 15 sec If I need to multiply 2000 by 10 (20000) to get to stretch it x5…;
#P window linecount 3;
#P comment 932 394 100 196617 How many times I need to multiply the first argument;
#P window linecount 1;
#P comment 1032 152 100 196617 Duble click!!!;
#P hidden connect 82 0 80 0;
#P hidden connect 80 0 81 0;
#P connect 22 0 21 0;
#P connect 21 2 24 0;
#P connect 24 0 26 0;
#P connect 26 0 23 0;
#P connect 39 0 21 1;
#P hidden connect 81 0 79 0;
#P fasten 21 2 25 0 58 290 85 290;
#P connect 25 0 24 1;
#P hidden connect 79 0 78 0;
#P hidden connect 78 0 84 0;
#P connect 34 0 25 1;
#P fasten 35 0 10 0 351 252 209 252;
#P fasten 23 0 10 0 58 404 209 404;
#P fasten 20 0 10 0 338 434 209 434;
#P fasten 18 0 10 0 338 379 209 379;
#P fasten 15 0 10 0 338 335 209 335;
#P fasten 14 0 10 0 338 292 209 292;
#P fasten 11 0 10 0 339 252 209 252;
#P connect 53 0 10 0;
#P connect 10 0 8 0;
#P connect 8 0 7 0;
#P connect 7 0 9 0;
#P connect 8 0 12 0;
#P connect 12 0 13 0;
#P fasten 10 1 8 1 226 481 233 481;
#P connect 7 0 9 1;
#P connect 36 0 38 0;
#P connect 38 0 35 0;
#P fasten 40 0 35 0 460 214 351 214;
#P connect 37 0 38 1;
#P connect 42 0 41 0;
#P fasten 41 0 40 0 460 213 460 213;
#P connect 45 0 43 0;
#P fasten 38 0 41 1 351 201 479 201;
#P fasten 63 0 54 0 702 620 546 620 546 518 569 518;
#P connect 79 0 54 0;
#P lcolor 3;
#P connect 43 1 44 0;
#P hidden fasten 55 0 61 0 740 639 774 639 774 482 588 482;
#P hidden fasten 62 0 61 0 664 625 557 625 557 482 588 482;
#P hidden fasten 50 0 61 0 626 625 556 625 556 481 588 481;
#P hidden fasten 63 0 61 0 702 624 557 624 557 481 588 481;
#P hidden connect 61 0 49 0;
#P connect 64 0 49 0;
#P hidden connect 49 0 51 0;
#P connect 51 0 52 0;
#P connect 52 0 53 0;
#P fasten 54 0 53 0 569 693 588 693;
#P hidden connect 50 0 51 1;
#P connect 44 6 46 0;
#P connect 85 0 46 0;
#P connect 46 0 62 0;
#P hidden connect 62 0 51 2;
#P hidden connect 63 0 51 3;
#P hidden connect 55 0 51 4;
#P connect 46 0 64 0;
#P connect 72 0 65 0;
#P connect 65 0 64 1;
#P connect 46 0 68 0;
#P connect 68 0 69 0;
#P connect 69 0 67 0;
#P connect 67 0 66 0;
#P connect 66 0 70 0;
#P connect 70 0 71 0;
#P connect 71 0 72 0;
#P connect 72 0 74 0;
#P connect 46 0 73 0;
#P connect 73 0 72 1;
#P connect 77 0 75 0;
#P connect 76 0 75 0;
#P connect 75 0 67 1;
#P connect 76 0 85 0;
#P connect 77 0 85 0;
#P fasten 30 0 28 0 1146 697 1126 697;
#P fasten 32 0 28 0 1200 697 1126 697;
#P fasten 29 0 28 0 1111 686 1126 686;
#P connect 27 0 28 0;
#P connect 31 0 30 0;
#P connect 33 0 32 0;
#P pop;


Viewing 15 posts - 1 through 15 (of 15 total)