Forums > MaxMSP

Searching for a specific patch

June 23, 2008 | 1:16 am

Hello,

Maybe a year ago now, I found a wonderful little patch on these forums. I believe it was created by Darwin Grosse, perhaps to explain something. It used jit.cellblock and some delays to produce a kind of randomly generated melody. It was great, and I had lots of fun adding to it, but sadly I don’t have access to that computer at the moment. I’m recreating the patch, but I’d rather start off with Mr.Grosses version, if it is still available online.
Can anyone help?


June 24, 2008 | 12:21 am

Apologies for shameless bump. I have attempted to recreate the patch I am looking for, in the hopes it will trigger someones memory of it, and perhaps even help me find the link to it on these forums, as I have had no luck in my search so far.
Thanks for taking a look.

max v2;
#N vpatcher 25 70 1355 809;
#P origin 0 30;
#P window setfont "Sans Serif" 12.;
#P window linecount 4;
#P comment 733 431 100 9109516 The cycle~ object is then sent to a delay line for sweetness.;
#P window linecount 7;
#P comment 579 153 299 9109516 The patch I am hoping to find was a much more refined example of this type of sequence generation. From memory , this was the basic structure of the patch. The values used in the original , and specifically how they were repeated within the jit.cellblock objects to allow for interesting sequences was inspiring.;
#P window linecount 5;
#P comment 460 317 149 9109516 These jit.cellblock objects contain the values , that when triggered by the metro object , "randomly" generate a melody;
#P window setfont "Arial Black" 14.;
#P window linecount 1;
#P comment 134 28 49 9306126 Start;
#P window setfont "Sans Serif" 14.;
#P comment 339 305 100 9109518 Velocity Values;
#P window setfont "Sans Serif" 9.;
#P hidden newex 336 574 41 9109513 r wetInit;
#P hidden newex 392 544 43 9109513 r fbRInit;
#P hidden newex 392 513 41 9109513 r fbLInit;
#P hidden newex 679 455 40 9109513 r volInit;
#P hidden newex 446 474 57 9109513 r delayRInit;
#P hidden newex 446 443 55 9109513 r delayLInit;
#P newex 139 411 29 9109513 mtof;
#P newex 216 252 28 9109513 pack;
#P newex 272 226 47 9109513 random 2;
#P newex 216 226 47 9109513 random 2;
#P window setfont "Fixedwidth Serif" 10.;
#P newex 481 685 32 9240586 *~ 1;
#P newex 537 685 32 9240586 *~ 1;
#P newex 676 685 36 9240586 *~;
#P newex 596 685 36 9240586 *~;
#P user hslider 391 602 12 76 101 1 0 0;
#P newex 391 617 43 9240586 * 0.01;
#P window setfont "Proportional Serif" 10.;
#P comment 391 588 23 9175050 Dry;
#P comment 462 588 22 9175050 Wet;
#P window setfont "Fixedwidth Serif" 10.;
#P newex 391 642 68 9240586 expr 1-$f1;
#P flonum 622 667 35 10 0. 1. 3 141 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 702 667 35 10 0. 1. 3 141 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 559 667 35 10 0. 1. 3 141 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 503 667 35 10 0. 1. 3 141 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 688 613 33 9240586 *~;
#P window setfont "Proportional Serif" 10.;
#P comment 699 581 75 9175050 Right Feedback;
#P window setfont "Fixedwidth Serif" 10.;
#P flonum 711 595 35 10 0. 1. 3 141 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 521 595 35 10 0. 1. 3 141 0 0 0 221 221 221 222 222 222 0 0 0;
#P window setfont "Proportional Serif" 10.;
#P comment 509 581 62 9175050 Left Feedback;
#P window setfont "Fixedwidth Serif" 10.;
#P newex 497 613 34 9240586 *~;
#P flonum 602 482 60 10 1. 1000. 3 141 0 0 0 221 221 221 222 222 222 0 0 0;
#P window setfont "Proportional Serif" 10.;
#P comment 593 468 80 9175050 Right Delay Time;
#P window setfont "Fixedwidth Serif" 10.;
#P flonum 522 482 60 10 1. 1000. 3 141 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 667 557 74 9240586 tapout~ 1.;
#P newex 585 557 74 9240586 tapout~ 1.;
#P newex 667 532 73 9240586 tapin~ 1000;
#P newex 585 532 73 9240586 tapin~ 1000;
#P window setfont "Proportional Serif" 10.;
#P comment 517 468 73 9175050 Left Delay Time;
#P window setfont "Sans Serif" 9.;
#P newex 87 252 28 9109513 pack;
#P newex 143 226 47 9109513 random 3;
#P newex 87 226 47 9109513 random 3;
#P user gain~ 810 529 21 37 158 0 1.071519 7.94321 10.;
#P newex 340 371 71 9109513 unpack 0. 0. 0.;
#P user jit.cellblock 340 331 432 367 139 9 2 2 45 17 0 1 1 1 0 0 0 0 1 0 0 0 255 255 255 0 0 0 0 0 0 191 191 191 0 0 0 215 215 240 1 1 1 0 8 0 0 0;
#X set 0 0 1.;
#X set 0 1 0.41;
#X set 1 0 0.6;
#X set 1 1 0.73;
#P window setfont "Fixedwidth Serif" 10.;
#P newex 400 405 74 9240586 pack 0. 100;
#P newex 400 426 38 9240586 line~;
#B color 5;
#P newex 139 484 135 9240586 *~;
#B color 5;
#P window setfont "Sans Serif" 9.;
#P newex 87 388 62 9109513 unpack 0 0 0;
#P user jit.cellblock 87 331 224 384 139 9 3 3 45 17 0 1 1 1 0 0 0 0 1 0 0 0 255 255 255 0 0 0 0 0 0 191 191 191 0 0 0 215 215 240 1 1 1 0 4 0 0 0;
#X set 0 0 48;
#X set 0 1 52;
#X set 0 2 55;
#X set 1 0 52;
#X set 1 1 57;
#X set 1 2 52;
#X set 2 0 48;
#X set 2 1 52;
#X set 2 2 57;
#P newex 139 437 36 9109513 cycle~;
#P hidden newex 845 526 45 9109513 loadbang;
#P newex 162 123 51 9109513 r metroInit;
#P window linecount 9;
#P hidden message 845 548 72 9109513 ; metroInit 300 ; delayLInit 500 ; delayRInit 333 ; fbLInit 0.7 ; fbRInit 0.7 ; volInit 127 ; wetInit 25 ;;
#P button 121 188 15 0;
#P flonum 162 148 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P toggle 121 53 67 0;
#P window linecount 1;
#P newex 121 165 32 9109513 metro;
#P user gain~ 783 529 21 37 158 0 1.071519 7.94321 10.;
#P newex 783 598 28 9109513 dac~;
#P window setfont "Sans Serif" 14.;
#P comment 103 305 100 9109518 Note Values;
#P window setfont "Sans Serif" 12.;
#P window linecount 2;
#P comment 197 53 100 9109516 Hit the toggle on to begin.;
#P user panel 53 300 571 161;
#X brgb 255 255 255;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P user panel 544 138 364 150;
#X brgb 255 255 255;
#X frgb 0 150 62;
#X border 4;
#X rounded 0;
#X shadow 0;
#X done;
#P user panel 192 47 110 45;
#X brgb 255 255 255;
#X frgb 0 0 0;
#X border 1;
#X rounded 0;
#X shadow 0;
#X done;
#P fasten 10 0 23 0 126 214 92 214;
#P connect 23 0 25 0;
#P connect 25 0 15 0;
#P connect 15 0 16 0;
#P connect 24 0 25 1;
#P connect 8 0 7 0;
#P connect 7 0 10 0;
#P connect 16 2 56 0;
#P connect 56 0 14 0;
#P connect 14 0 17 0;
#P connect 9 0 7 1;
#P fasten 10 0 24 0 126 214 148 214;
#P connect 12 0 9 0;
#P fasten 10 0 53 0 126 214 221 214;
#P connect 53 0 55 0;
#P connect 54 0 55 1;
#P fasten 18 0 17 1 405 476 269 476;
#P fasten 10 0 54 0 126 214 277 214;
#P fasten 55 0 20 0 221 326 345 326;
#P connect 20 0 21 0;
#P hidden connect 62 0 48 0;
#P connect 48 0 47 0;
#P connect 47 0 44 0;
#P connect 21 2 19 0;
#P connect 19 0 18 0;
#P fasten 17 0 52 0 144 674 486 674;
#P fasten 29 0 34 0 590 578 502 578;
#P fasten 44 0 40 0 396 663 508 663;
#P connect 40 0 52 1;
#P hidden connect 60 0 36 0;
#P connect 36 0 34 1;
#P hidden connect 57 0 31 0;
#P fasten 17 0 51 0 144 681 542 681;
#P fasten 44 0 41 0 396 663 564 663;
#P connect 41 0 51 1;
#P fasten 17 0 27 0 144 507 590 507;
#P fasten 34 0 27 0 502 634 492 634 492 527 590 527;
#P connect 27 0 29 0;
#P fasten 31 0 29 0 527 523 581 523 581 553 590 553;
#P fasten 29 0 49 0 590 577 601 577;
#P hidden connect 58 0 33 0;
#P fasten 47 0 43 0 396 638 640 638 640 663 627 663;
#P connect 43 0 49 1;
#P fasten 17 0 28 0 144 507 672 507;
#P fasten 39 0 28 0 693 634 769 634 769 527 672 527;
#P connect 28 0 30 0;
#P fasten 33 0 30 0 607 523 661 523 661 553 672 553;
#P fasten 30 0 50 0 672 577 681 577;
#P fasten 30 0 39 0 672 578 693 578;
#P fasten 47 0 42 0 396 638 640 638 640 663 707 663;
#P connect 42 0 50 1;
#P hidden connect 61 0 37 0;
#P connect 37 0 39 1;
#P hidden connect 59 0 6 0;
#P hidden connect 52 0 6 0;
#P hidden connect 49 0 6 0;
#P hidden fasten 8 0 5 0 126 250 788 250;
#P hidden connect 6 0 5 0;
#P hidden connect 22 0 5 1;
#P hidden connect 59 0 22 0;
#P hidden connect 6 1 22 0;
#P hidden connect 51 0 22 0;
#P hidden connect 50 0 22 0;
#P hidden connect 13 0 11 0;
#P pop;



grg
June 24, 2008 | 12:16 pm

I guess its idm-5?

Can be found here:

http://www.cycling74.com/pipermail/maxmsp/2007-August/034233.html

(attachment at bottom, rename .obj to .pat)

cheers,
g.


June 25, 2008 | 8:17 am

Thank you very much, this is precisely the patch I was looking for!
Compare that to my attempt and know that I can continue my work from a significantly more refined starting point.

Thank you again grg, and of course, thank you Darwin Grosse ;)


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