Author |
Message |
gusjdt
Joined: Apr 12, 2006 Posts: 55 Location: San Juan
G2 patch files: 1
|
Posted: Sun Jul 22, 2007 6:34 pm Post subject:
Multislider sequencer question |
|
|
I'm trying to make a sequencer like the one shown in the patch "phasor step sequencer" under examples>sequencing/looping>audiorate sequencing looping.
I want to change it so that the sequencer is driven by a tempo metronome so I can adjust the BPM and turn it off/on without having to change the dac~ status. I also want it to retain the 2 reference sliders along the multislider but I noticed that they are being driven by the phasor~ object.
Anyone here know how to go about doing such a task? _________________ A new disturbing study has been found that proves that studies are disturbing... |
|
Back to top
|
|
|
cbm
Joined: Oct 25, 2005 Posts: 381 Location: San Francisco
|
Posted: Sun Jul 22, 2007 10:02 pm Post subject:
|
|
|
The phasor-based seq was mostly illustrating how to get the most accurate timing by using phasor~
Here's a simple step sequencer that uses metro instead:
#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P hidden message 292 330 26 196617 100;
#P hidden message 130 61 26 196617 170;
#P hidden newex 210 108 48 196617 loadbang;
#P newex 61 108 32 196617 sel 0;
#P message 62 127 14 196617 1;
#P hidden message 182 240 247 196617 67 55 59 66 54 69 59 64 69 64 73 69 62 72 67 63;
#P hidden newex 34 486 62 196617 prepend set;
#P window linecount 2;
#P hidden message 34 506 123 196617 67 55 59 66 54 69 59 64 69 64 73 69 62 72 67 63;
#P window linecount 1;
#P hidden newex 5 427 27 196617 - 1;
#P user hslider 34 424 10 190 16 1 0 0;
#P user uslider 22 282 13 127 128 1 0 0;
#P user multiSlider 34 282 206 143 0. 127. 16 2665 15 0 0 2 0 0 1;
#M frgb 0 0 0;
#M brgb 255 255 255;
#M rgb2 127 127 127;
#M rgb3 0 0 0;
#M rgb4 37 52 91;
#M rgb5 74 105 182;
#M rgb6 112 158 18;
#M rgb7 149 211 110;
#M rgb8 187 9 201;
#M rgb9 224 62 37;
#M rgb10 7 114 128;
#P user ezdac~ 229 548 273 581 0;
#P user gain~ 229 477 40 33 158 0 1.071519 7.94321 10.;
#N vpatcher 10 59 601 706;
#P window setfont "Sans Serif" 9.;
#P hidden newex 175 301 72 196617 loadmess 100;
#P window linecount 1;
#P comment 169 48 30 196617 Velo;
#N comlet Velo;
#P inlet 153 47 15 0;
#N comlet Out;
#P outlet 97 533 15 0;
#N comlet Note;
#P inlet 97 47 15 0;
#P window setfont "Sans Serif" 14.;
#P comment 165 399 197 196622 Apply velocity to envelope;
#P comment 17 463 78 196622 Our "VCA";
#P flonum 97 216 44 14 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 10 241 84 196622 Simple Osc;
#P flonum 142 428 35 14 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P window setfont "Sans Serif" 12.;
#P newex 97 107 34 196620 t i b;
#P window setfont "Sans Serif" 14.;
#P flonum 153 362 35 14 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 153 336 128 196622 scale 0 127 0. 1.;
#P newex 128 398 35 196622 * 1.;
#P newex 97 188 41 196622 mtof;
#P message 341 207 55 196622 0. 350;
#P newex 341 180 45 196622 del 5;
#P flonum 319 270 35 14 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 319 140 25 0;
#P message 319 207 21 196622 1.;
#P newex 319 241 65 196622 line 0. 5;
#P newex 97 461 41 196622 *~;
#P newex 97 241 56 196622 cycle~;
#P comment 202 241 122 196622 Simple envelope;
#P window setfont "Sans Serif" 9.;
#P window linecount 0;
#P comment 112 48 30 196617 Note;
#P connect 20 0 14 0;
#P connect 14 0 10 0;
#P connect 10 0 17 0;
#P connect 17 0 2 0;
#P connect 2 0 3 0;
#P connect 3 0 21 0;
#P fasten 7 0 11 0 324 389 133 389;
#P connect 11 0 3 1;
#P connect 11 0 15 0;
#P hidden connect 24 0 12 0;
#P connect 22 0 12 0;
#P connect 12 0 13 0;
#P connect 13 0 11 1;
#P fasten 14 1 6 0 126 132 324 132;
#P connect 6 0 5 0;
#P connect 5 0 4 0;
#P connect 9 0 4 0;
#P connect 4 0 7 0;
#P connect 6 0 8 0;
#P connect 8 0 9 0;
#P pop;
#P newobj 229 456 44 196617 p Synth;
#P comment 124 40 39 196617 Tempo;
#P flonum 88 39 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 274 439 101 196617 Current step value;
#P button 91 164 15 0;
#P toggle 34 42 15 0;
#P newex 34 76 64 196617 metro;
#P number 229 439 35 9 0 0 256 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 34 186 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 34 127 15 0;
#N counter 1 16;
#X flags 0 0;
#P newobj 34 145 68 196617 counter 1 16;
#P newex 34 206 71 196617 prepend fetch;
#P comment 51 42 19 196617 Go;
#P comment 69 187 116 196617 Current slider number;
#P window setfont "Sans Serif" 14.;
#P window linecount 2;
#P comment 184 46 230 196622 The bare bones of a multislider-based sequencer.;
#P hidden connect 4 0 20 0;
#P hidden connect 17 1 18 0;
#P connect 9 0 8 0;
#P connect 8 0 5 0;
#P connect 5 0 4 0;
#P connect 4 0 6 0;
#P connect 6 0 3 0;
#P hidden connect 23 0 17 0;
#P connect 3 0 17 0;
#P hidden connect 20 0 19 0;
#P hidden connect 17 0 22 0;
#P hidden connect 22 0 21 0;
#P fasten 9 0 25 0 39 64 25 64 25 100 66 100;
#P connect 25 0 24 0;
#P connect 24 0 4 2;
#P hidden connect 27 0 12 0;
#P connect 12 0 8 1;
#P connect 4 3 10 0;
#P hidden connect 26 0 27 0;
#P hidden connect 26 0 23 0;
#P connect 17 1 7 0;
#P connect 7 0 14 0;
#P hidden connect 28 0 15 0;
#P connect 14 0 15 0;
#P connect 15 0 16 0;
#P connect 15 0 16 1;
#P hidden connect 26 0 28 0;
#P window clipboard copycount 29; |
|
Back to top
|
|
|
gusjdt
Joined: Apr 12, 2006 Posts: 55 Location: San Juan
G2 patch files: 1
|
Posted: Sun Jul 22, 2007 10:09 pm Post subject:
|
|
|
Thanks! That helps a bunch. Is this patch somewhere around the tutorials?
Another quick question. Would it be possible to have a number box indicate the note name (C-1, C#-1, etc) as I move one of the sliders around? The multislider outputs a list of numbers so the number box doesnt understand it. _________________ A new disturbing study has been found that proves that studies are disturbing... |
|
Back to top
|
|
|
cbm
Joined: Oct 25, 2005 Posts: 381 Location: San Francisco
|
Posted: Sun Jul 22, 2007 11:12 pm Post subject:
|
|
|
That example is a combination of a couple of patches from the Max section of my website - http://www.xfade.com
Here is the same example with the addition of a number box that shows the last tweaked slider, per your request:
#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P comment 282 347 75 196617 Last slider val;
#P number 246 346 35 9 0 0 256 3 0 0 0 221 221 221 222 222 222 0 0 0;
#N vpatcher 37 44 637 444;
#P window setfont "Sans Serif" 9.;
#P window linecount 2;
#P comment 219 338 78 196617 Position of last changed slider;
#N comlet Position of last changed slider;
#P outlet 202 345 15 0;
#N comlet Value of last changed slider;
#P outlet 79 345 15 0;
#N comlet Sliders In;
#P inlet 79 61 15 0;
#P comment 96 338 71 196617 Value of last changed slider;
#P window linecount 1;
#P newex 79 277 30 196617 Llist;
#P newex 79 300 38 196617 zl mth;
#P newex 107 181 30 196617 Labs;
#P newex 108 126 27 196617 t l l;
#P newex 107 161 38 196617 Lcomp;
#P newex 107 205 44 196617 Lpeak 0;
#P window linecount 2;
#P comment 153 207 100 196617 Find position of the latest changed value;
#P window linecount 1;
#P comment 95 61 100 196617 Sliders In;
#P connect 9 0 7 0;
#P connect 7 0 6 0;
#P connect 6 0 10 0;
#P connect 4 1 3 0;
#P connect 3 0 5 0;
#P connect 5 0 2 0;
#P connect 2 0 6 1;
#P connect 9 0 4 0;
#P connect 4 0 3 1;
#P connect 2 0 11 0;
#P pop;
#P hidden newobj 246 319 62 196617 p lastSlider;
#P hidden message 279 470 26 196617 100;
#P hidden message 130 61 26 196617 170;
#P hidden newex 210 108 48 196617 loadbang;
#P newex 61 108 32 196617 sel 0;
#P message 62 127 14 196617 1;
#P hidden message 182 240 247 196617 67 55 59 66 54 69 59 64 69 64 73 69 62 72 67 63;
#P hidden newex 34 486 62 196617 prepend set;
#P window linecount 2;
#P hidden message 34 506 137 196617 67 71 77 66 54 69 59 64 69 64 73 69 62 72 67 63;
#P window linecount 1;
#P hidden newex 5 427 27 196617 - 1;
#P user hslider 34 424 10 190 16 1 0 0;
#P user uslider 22 282 13 127 128 1 0 0;
#P user multiSlider 34 282 206 143 0. 127. 16 2665 47 0 0 2 0 0 1;
#M frgb 0 0 0;
#M brgb 255 255 255;
#M rgb2 127 127 127;
#M rgb3 0 0 0;
#M rgb4 37 52 91;
#M rgb5 74 105 182;
#M rgb6 112 158 18;
#M rgb7 149 211 110;
#M rgb8 187 9 201;
#M rgb9 224 62 37;
#M rgb10 7 114 128;
#P user ezdac~ 229 548 273 581 0;
#P user gain~ 229 477 40 33 158 0 1.071519 7.94321 10.;
#N vpatcher 10 59 601 706;
#P window setfont "Sans Serif" 9.;
#P hidden newex 175 301 72 196617 loadmess 100;
#P window linecount 1;
#P comment 169 48 30 196617 Velo;
#N comlet Velo;
#P inlet 153 47 15 0;
#N comlet Out;
#P outlet 97 533 15 0;
#N comlet Note;
#P inlet 97 47 15 0;
#P window setfont "Sans Serif" 14.;
#P comment 165 399 197 196622 Apply velocity to envelope;
#P comment 17 463 78 196622 Our "VCA";
#P flonum 97 216 44 14 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 10 241 84 196622 Simple Osc;
#P flonum 142 428 35 14 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P window setfont "Sans Serif" 12.;
#P newex 97 107 34 196620 t i b;
#P window setfont "Sans Serif" 14.;
#P flonum 153 362 35 14 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 153 336 128 196622 scale 0 127 0. 1.;
#P newex 128 398 35 196622 * 1.;
#P newex 97 188 41 196622 mtof;
#P message 341 207 55 196622 0. 350;
#P newex 341 180 45 196622 del 5;
#P flonum 319 270 35 14 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 319 140 25 0;
#P message 319 207 21 196622 1.;
#P newex 319 241 65 196622 line 0. 5;
#P newex 97 461 41 196622 *~;
#P newex 97 241 56 196622 cycle~;
#P comment 202 241 122 196622 Simple envelope;
#P window setfont "Sans Serif" 9.;
#P window linecount 0;
#P comment 112 48 30 196617 Note;
#P connect 20 0 14 0;
#P connect 14 0 10 0;
#P connect 10 0 17 0;
#P connect 17 0 2 0;
#P connect 2 0 3 0;
#P connect 3 0 21 0;
#P fasten 7 0 11 0 324 389 133 389;
#P connect 11 0 3 1;
#P connect 11 0 15 0;
#P connect 22 0 12 0;
#P hidden connect 24 0 12 0;
#P connect 12 0 13 0;
#P connect 13 0 11 1;
#P fasten 14 1 6 0 126 132 324 132;
#P connect 6 0 5 0;
#P connect 9 0 4 0;
#P connect 5 0 4 0;
#P connect 4 0 7 0;
#P connect 6 0 8 0;
#P connect 8 0 9 0;
#P pop;
#P newobj 229 456 44 196617 p Synth;
#P comment 124 40 39 196617 Tempo;
#P flonum 88 39 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 274 439 101 196617 Current step value;
#P button 91 164 15 0;
#P toggle 34 42 15 0;
#P newex 34 76 64 196617 metro;
#P number 229 439 35 9 0 0 256 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 34 186 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 34 127 15 0;
#N counter 1 16;
#X flags 0 0;
#P newobj 34 145 68 196617 counter 1 16;
#P newex 34 206 71 196617 prepend fetch;
#P comment 51 42 19 196617 Go;
#P comment 69 187 116 196617 Current slider number;
#P window setfont "Sans Serif" 14.;
#P window linecount 2;
#P comment 184 46 230 196622 The bare bones of a multislider-based sequencer.;
#P hidden connect 17 0 22 0;
#P hidden connect 17 0 29 0;
#P hidden connect 26 0 27 0;
#P hidden connect 26 0 23 0;
#P hidden connect 26 0 28 0;
#P hidden connect 29 0 30 0;
#P connect 15 0 16 1;
#P connect 15 0 16 0;
#P connect 14 0 15 0;
#P hidden connect 28 0 15 0;
#P connect 7 0 14 0;
#P hidden connect 17 1 18 0;
#P connect 17 1 7 0;
#P connect 4 3 10 0;
#P connect 12 0 8 1;
#P hidden connect 27 0 12 0;
#P connect 24 0 4 2;
#P connect 25 0 24 0;
#P connect 9 0 8 0;
#P fasten 9 0 25 0 39 64 25 64 25 100 66 100;
#P hidden connect 22 0 21 0;
#P hidden connect 20 0 19 0;
#P connect 3 0 17 0;
#P hidden connect 23 0 17 0;
#P connect 6 0 3 0;
#P hidden connect 4 0 20 0;
#P connect 4 0 6 0;
#P connect 5 0 4 0;
#P connect 8 0 5 0;
#P window clipboard copycount 32; |
|
Back to top
|
|
|
gusjdt
Joined: Apr 12, 2006 Posts: 55 Location: San Juan
G2 patch files: 1
|
Posted: Mon Jul 23, 2007 4:58 am Post subject:
|
|
|
Thanks very much! At first it didn't work because of the external objects being used, but a quick search in the Max Objects Database fixed it. Works fine now. _________________ A new disturbing study has been found that proves that studies are disturbing... |
|
Back to top
|
|
|
cbm
Joined: Oct 25, 2005 Posts: 381 Location: San Francisco
|
Posted: Mon Jul 23, 2007 10:10 am Post subject:
|
|
|
Oh... right...
Sorry about that. I don't even think of the Lobjects as being externals any more. I'm sure there is a solution in native Max, but the Lobjects are so useful that you'll be glad you installed them anyway. |
|
Back to top
|
|
|
|