Searching for a specific patch

Jun 23, 2008 at 1:16am

Searching for a specific patch

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?

#38540
Jun 24, 2008 at 12:21am

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;

#134529
Jun 24, 2008 at 12:16pm

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.

#134530
Jun 25, 2008 at 8:17am

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 ;)

#134531

You must be logged in to reply to this topic.