Forums > MaxMSP

simple synth patches like 909 kicks etc

January 21, 2008 | 7:52 pm

HI

Anyone have some simple synthesis patches like the classic patches Gordon Reid demononstrates in SOS synth secrets, like

http://www.soundonsound.com/sos/Feb02/images/fig01abassdrum.l.gif

http://www.soundonsound.com/sos/Feb02/images/fig11analysis.l.gif

http://www.soundonsound.com/sos/Jun02/images/fig06blockdiagram.gif

etc

This would be great starting point for patches for me and Goa thread OP :)

Thanks


January 21, 2008 | 8:01 pm

http://www.soundonsound.com/sos/Feb02/images/fig13tr909bd.l.gif

the 909 :) anyone made a decent 909 im msp?


January 21, 2008 | 8:17 pm

All of those flow diagrams you’ve posted are realizable using built-in
Max and MSP objects, why not have a go yourself?


Owen

petterdass wrote:
> http://www.soundonsound.com/sos/Feb02/images/fig13tr909bd.l.gif
>
>
> the 909 :) anyone made a decent 909 im msp?


January 22, 2008 | 7:26 am

petterdass schrieb:
> This would be great starting point for patches for me and Goa thread
> OP :)

Just take each block and create a patch for a block. Then connect the
new abstractions according to these pictures…
It almost looks like a max patch already…

And then share it with both communities… Will make you famous… The
guy who recreated the 909….

Good luck, I’m waiting for the results…

Stefan


Stefan Tiedje————x——-
–_____———–|————–
–(_|_ —-|—–|—–()——-
– _|_)—-|—–()————–
———-()——–www.ccmix.com


January 22, 2008 | 5:51 pm

i think this coud be a great project, i will try to do my part building the bd patch.
yust wondering if someone can explain me how to get the ar contur generator.

best

i.te


January 22, 2008 | 6:20 pm

Hi,

Use adsr~ with a decay of 0, triggered by click~.


O

i.te wrote:
> i think this coud be a great project, i will try to do my part building the bd patch.
> yust wondering if someone can explain me how to get the ar contur generator.
>
> best
>
> i.te
>



kjg
January 22, 2008 | 6:30 pm

why not do this stuff in reactor? or just use one of the gazillion 909/808/606/x0x sample banks out there?
also, magazines like computer music and such often come with soundbanks, presets, patches and samples for every imaginable subgenre of of house, trance and techno. why not start there?

but i would like to make my contribution to the classic drum machines project any way:
for the sine tone part of the 808 kick i suggest you take a look at the built-in cycle~ object.. alt-click for help on how to hook it up. you might want to modulate the frequency of this at some point, but i’m not sure if any suitable objects are available.
you might have to code an external yourself ;)

good luck with the project!

ps: don’t forget to use anolog summing emulation! it is the only way to achieve this really _big_ sound


January 22, 2008 | 7:00 pm

hi owen,

ok, and after :)


January 22, 2008 | 7:03 pm

well, this looks like the starter patch..
i include a tap external but this can be replaced by biquad, i think.

max v2;
#N vpatcher 591 55 1291 780;
#P user scope~ 256 484 356 543 256 3 128 -1. 1. 0 0. 0 0. 102 255 51 135 135 135 0;
#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P hidden newex 368 336 60 196617 loadmess 1;
#N vpreset 1;
#X append 1 2 8 335 255 function clear ; 8 335 255 function add 0. 0.574468 0 ; 8 335 255 function add 204.081635 0. 0 ; 8 335 255 function domain 1000. ; 8 335 255 function range 0. 1. ; 12 313 147;
#X append 1 2 number int 110 ; 13 281 202 number int 115 ; 14 281 268 number int 22 ; 15 282 334 number int 19 ; 21 236 186 flonum float 865.15564 ; 23 154 186 flonum float 186. ; 26 133 186;
#X append 1 2 hslider int 186 ; 28 240 403 toggle int 1 ;;
#P preset 368 361 47 27;
#P comment 251 236 39 196617 hz;
#P newex 69 214 66 196617 pvar trigger;
#P toggle 403 240 15 0;
#P newex 403 263 58 196617 metro 500;
#P user hslider 186 133 18 47 256 1 0 0;
#P newex 186 173 63 196617 * 0.052456;
#P newex 186 194 63 196617 t 2. f;
#P flonum 186 154 63 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 186 215 63 196617 pow 2.;
#P flonum 186 236 63 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P user meter~ 227 484 250 542 50 0 168 0 103 103 103 255 153 0 255 0 0 217 217 0 153 186 0 12 3 3 3 3;
#P newex 69 236 37 196617 click~;
#P newex 69 260 72 196617 adsr~ 0 0 0 0;
#P comment 334 265 58 196617 modu index;
#P comment 268 265 55 196617 harm ratio;
#P number 334 282 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 268 281 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 202 281 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 147 313 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 403 289 31 0;
#P objectname trigger;
#P newex 147 524 76 196617 dac~;
#P newex 288 420 32 196617 line~;
#P user function 255 335 365 407 1 1 0 0;
#X frgb 82 82 82;
#X brgb 204 204 204;
#X rgb2 85 85 85;
#X rgb3 255 255 255;
#X rgb4 0 0 0;
#X rgb5 0 0 0;
#X add 0. 0.574468 0;
#X add 204.081635 0. 0;
#X domain 1000.;
#X range 0. 1.;
#X done;
#P newex 147 447 100 196617 *~;
#P newex 147 336 40 196617 cycle~;
#P newex 147 366 49 196617 onepole~;
#P newex 147 395 65 196617 +~;
#P newex 202 336 49 196617 tap.diff~;
#P newex 202 366 49 196617 onepole~;
#P newex 202 304 142 196617 simpleFM~;
#P comment 201 264 39 196617 carrier;
#P connect 29 0 19 0;
#P connect 19 0 18 0;
#P connect 12 0 6 0;
#P connect 6 0 5 0;
#P connect 5 0 4 0;
#P connect 4 0 7 0;
#P connect 7 0 10 0;
#P connect 26 0 23 0;
#P connect 23 0 25 0;
#P connect 25 0 24 0;
#P connect 24 0 22 0;
#P connect 22 0 21 0;
#P connect 21 0 5 1;
#P connect 13 0 1 0;
#P connect 1 0 3 0;
#P connect 3 0 2 0;
#P connect 2 0 4 1;
#P connect 7 0 10 1;
#P fasten 7 0 20 0 152 465 232 465;
#P fasten 9 0 7 1 293 441 242 441;
#P connect 24 1 22 1;
#P fasten 21 0 2 1 191 359 246 359;
#P fasten 11 0 8 0 408 327 260 327;
#P fasten 7 0 33 0 152 465 261 465;
#P connect 14 0 1 1;
#P connect 8 1 9 0;
#P connect 15 0 1 2;
#P hidden connect 32 0 31 0;
#P connect 28 0 27 0;
#P connect 27 0 11 0;
#P pop;


January 22, 2008 | 7:23 pm

Look at the [adsr~], [function], [line~] and [zigzag~] objects for
some starting places.

On Jan 22, 2008, at 10:51 AM, i.te wrote:

>
> i think this coud be a great project, i will try to do my part
> building the bd patch.
> yust wondering if someone can explain me how to get the ar contur
> generator.

—-
Steven M. Miller
Professor, Contemporary Music Program
College of Santa Fe

Home < http://pubweb.csf.edu/~smill>
SFIFEM <
http://sfifem.csf.edu>
Atrium Sound Space <
http://atrium.csf.edu>
OVOS <
http://pubweb.csf.edu/~smill/ovos.html>
CMP <
http://www.csf.edu/academics/contemporary_music/>


January 22, 2008 | 7:43 pm

On Jan 22, 2008, at 11:30 AM, Klaas-Jan Govaart wrote:

>
> why not do this stuff in reactor? or just use one of the gazillion
> 909/808/606/x0x sample banks out there?
> also, magazines like computer music and such often come with
> soundbanks, presets, patches and samples for every imaginable
> subgenre of of house, trance and techno. why not start there?

There’s no educational value in just using someone else’s samples,
particularly for something so simple as these sound generator
patches. You’d learn a lot of valuable (and widely applicable)
synthesis and programming knowledge by putting these together in
MaxMSP (or other suitable synthesis/processing language/environment.

>
> but i would like to make my contribution to the classic drum
> machines project any way:
> for the sine tone part of the 808 kick i suggest you take a look
> at the built-in cycle~ object.. alt-click for help on how to hook
> it up. you might want to modulate the frequency of this at some
> point, but i’m not sure if any suitable objects are available.
> you might have to code an external yourself ;)

No externals necessary – all you need is right there in the standard
MaxMSP distribution.

>
> good luck with the project!
>
> ps: don’t forget to use anolog summing emulation! it is the only
> way to achieve this really _big_ sound

Do you have any info or references for coding ‘analog summing
emulation’?

Best,

Steven

—-
Steven M. Miller
Professor, Contemporary Music Program
College of Santa Fe

Home < http://pubweb.csf.edu/~smill>
SFIFEM <
http://sfifem.csf.edu>
Atrium Sound Space <
http://atrium.csf.edu>
OVOS <
http://pubweb.csf.edu/~smill/ovos.html>
CMP <
http://www.csf.edu/academics/contemporary_music/>


January 22, 2008 | 8:05 pm

On Jan 22, 2008, at 10:51 AM, smill wrote:

Look at the [adsr~], [function], [line~] and [zigzag~] objects for
some starting places.

hi steven, i know this objects but i



kjg
January 22, 2008 | 8:29 pm

i didn’t get enough sleep to be so serious about stuff like this steven

and yes, if you want a 909, because of its sound, or better: because you want to actually _produce music_ with this sound, i feel you are waisting your time trying to make it in max msp. better take a good sample and start sequencing your groove.

the thread started with a request for ready made patches to help the production of goa trance, so i thought it was actually about making tracks, not about the educational value of learning to create an exponential curve to create a dropping sine tone.

and excuse my little wink in there, don’t you love the warmth of analog summing when your mixing down your beatz??



kjg
January 22, 2008 | 8:42 pm

the ar contour generator would supplying be an attack release envelope to control the pitch of the vco (cycle~)

a quick rise in the attack phase of the sound followed by a linear or exponential release phase during the decay of the sound taking the pitch of the oscillator back down again. line~ should be able to get you close to where you want to be with a message like
0, 1 5 0 100. play around with the values 5 and 100 to tweak the sound to your liking.



kjg
January 22, 2008 | 9:12 pm

o and by the way, don’t forget to scale (e.g. *~ 80 >> +~20) the output of line to the frequency range you want the "contour generator" to cover. for efficiency reasons, you could also incorporate these freq values in the line message.

20, 100 5 20 100

(from 20 to 100 hz in 5ms and back to 20hz in 100ms)


January 22, 2008 | 10:26 pm

On Jan 22, 2008, at 1:29 PM, Klaas-Jan Govaart wrote:

> and yes, if you want a 909, because of its sound, or better:
> because you want to actually _produce music_ with this sound, i
> feel you are waisting your time trying to make it in max msp.
> better take a good sample and start sequencing your groove.
>
> the thread started with a request for ready made patches to help
> the production of goa trance, so i thought it was actually about
> making tracks, not about the educational value of learning to
> create an exponential curve to create a dropping sine tone.

And here I thought that, given that he posted to the MaxMSP list, he
was interested in building these in MaxMSP, or at least using
abstractions for them in MaxMSP. Since MaxMSP is primarily a
construction kit, rather than a finished sequencing app, it stood to
reason – or so I thought – that he was interested in this aspect at
least as much as the sonic results. Who’ a thunk it!?

>
> and excuse my little wink in there, don’t you love the warmth of
> analog summing when your mixing down your beatz??
Missed the wink, sorry…I prefer my beatz to be ice-cold. ;)

—-
Steven M. Miller
Professor, Contemporary Music Program
College of Santa Fe

Home < http://pubweb.csf.edu/~smill>
SFIFEM <
http://sfifem.csf.edu>
Atrium Sound Space <
http://atrium.csf.edu>
OVOS <
http://pubweb.csf.edu/~smill/ovos.html>
CMP <
http://www.csf.edu/academics/contemporary_music/>


January 22, 2008 | 10:28 pm


January 23, 2008 | 10:46 pm

Klaas-Jan Govaart schrieb:
> why not do this stuff in reactor? or just use one of the gazillion
> 909/808/606/x0x sample banks out there? also, magazines like computer
> music and such often come with soundbanks, presets, patches and
> samples for every imaginable subgenre of of house, trance and techno.
> why not start there?

Because it no fun at all… But if you do it yourself, and start to
understand, you can easily go beyond the prefabricated mediocre sounds
you hear all over the places…
Even if they are not as a high in "standard" as those "professional"
ones, I prefer to hear self grown sounds, its like self grown food, no
comparison to what the famous brands can deliver. But you’ll only know
it if you made your own experience with it. The difference is spirit,
not specs…

Stefan


Stefan Tiedje————x——-
–_____———–|————–
–(_|_ —-|—–|—–()——-
– _|_)—-|—–()————–
———-()——–www.ccmix.com



kjg
January 23, 2008 | 11:11 pm

I prefer to hear self grown sounds, its like self grown food, no
> comparison to what the famous brands can deliver.

I totally agree with that Stefan. I was under the impression that the aim was to write an as close emulation of a 909 in Max as possible, just to use the 909 sounds in goa trance tunes. To me, that is a waste of time. It already exist, so why not just use it to make the music you want to make with it? There is also a lot of synth patches and other stuff available as good starting points. Earlier there was a request for bass sounds for goa. That’s why to me it made sense to start with good patches for the specific style the guy was after, and then tweak it (in Reaktor or whatever program) from there.

On the other hand, if you want to build a 909 and use it as a base patch to then develop further as a very personal drum machine.. Sure. I agree with you. Home grown has more character.

And if you want to build this 909 to just learn max in a fun way than doing tutorials, of course. Like Steven also pointed out, it would probably be a quite educational experience.

But making trying an emulation in max, just because you want that specific sound.. Why not just use that sound then?
I guess I misunderstood.

I’d be curious to see what kind of 909 rolls out eventually :)

How’s the kick coming along guys?

Regards,
kjg


January 24, 2008 | 12:30 pm

It’s always good to hear the ol’ days 909 sound in the goatrance. It’s even
better if you can say that you’ve build it yourself. But the best is to go
beyond the original 909, and add some extra features to the concept!
So in my opinion making an emulation of a long time excisting apparatus
creates more excitement than using samples. (at least for the creator)
Adding extra features will create a piece of art!
This all cannot be said of using samples.
You should follow Stefan’s first post, and try to build all blocks in the
given diagram and finally put them together.
I think it’s an interesting project, I hope to see the result in the end ;)
Happy patching!

Jeroen Groot.

Ps analog summation could be integrated if you use some more vca’s and throw
away your mixer ‘building blocks’. You can route the signals through your
audio outputs of your soundcard and mix them together using analog mixer.
But I think that you won’t hear the difference unless you have a class A
mixing console at your goa party??


January 24, 2008 | 5:54 pm

Klaas-Jan Govaart schrieb:

o and by the way, don’t forget to scale (e.g. *~ 80 >> +~20) the output of line to the frequency range you want the "contour generator" to cover. for efficiency reasons, you could also incorporate these freq values in the line message.

20, 100 5 20 100

(from 20 to 100 hz in 5ms and back to 20hz in 100ms)
Re: simple synth patches like 909 kicks etc

thanks for the hints. actually the patch is working fine and i like to share it sone but is there a way to set the freq values in the line messeage dinamicly?
best,
i.te


January 24, 2008 | 7:14 pm

+1 to Stefan Tiedje – its no fun at all (using
samples), and would not engage me to put me in the
creative buzz, i need to convince myself im doing
somethig interesting if im going to make good music.
Also if I know each sound component to the core, its
easier to diagnoste my mix an add/remove correct
type/amount of processing
Many electronic musicians including me take pride in
using sounds only synthesized or recorded by ourselves.
That is also coming down to kind of music being produced
by me, which often lack the arrangemet, harmony and
melody you hear in other kinds of music. I would not feel
the final musical product was personal enough if the kick
drum was a result of browsing a commercial sound bank.
If i wanted to use 909 samples, i would buy a 909 on
ebay, sample it through my old outboard gear, and then
sell it.
Even then i would probably not use the hat, ride and
crash in my music, even those are the kind of samples i
may make excuse for as these are considered classics,
like amen break
Actually i was bidding on a 909 on ebay when d16 released
drumazon to a fraction of the price of a secondhand real
909, so i saved my money. I think they make the best VA
version of the tb and tr classics.( chris List also made
a good 909 kick in Reaktor, if you know any more VA 909,
please tell me !)
But the D16 recreations also irrtates me with maintaing
the lack of flexibility inherent in building hardware
drummachines, i could use much greater range on all
parameters, and more parameters.
Im looking forward to start tweaking, customizing and
hopefully expanding this patch !! :)


January 24, 2008 | 10:41 pm

When I’m brain storming, I’d rather have a blank canvas
When I’m in a creative situation, I’d rather have units I can rip apart.

my two cents.


January 25, 2008 | 9:18 am

hi list,
for my part i share this little patch i made .
it’s a emulation of the tr808 bd

max v2;
#N vpatcher 536 194 1273 714;
#P hidden outlet -83 364 15 0;
#P window setfont "Sans Serif" 9.;
#P number 1 1 35 9 0 127 259 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P objectname note_trigger;
#P hidden message 2 19 61 196617 set $1 nn 1;
#P hidden newex -49 -46 74 196617 match 36 nn 1;
#P hidden newex -83 332 47 196617 *~ 0.75;
#P hidden newex -69 27 40 196617 / 127.;
#P hidden newex -49 0 32 196617 sel 0;
#P hidden newex -49 -26 67 196617 unpack 0 0 0;
#P button 94 1 15 0;
#P noclick;
#P hidden newex -49 -65 56 196617 r notemidi;
#P hidden newex 239 415 91 196617 autopattr BD_808;
#X prestore click 1 0 0.44;
#X prestore note_trigger 1 0 0;
#X prestore pitch 1 0 0.13;
#X prestore release 1 0 0.44;
#P objectname BD_808[1];
#P comment 145 84 43 196617 release;
#P comment 79 84 43 196617 pitch;
#P hidden newex 144 152 34 196617 + 0.7;
#P hidden newex 140 120 35 196617 * 0.2;
#P hidden newex 17 248 27 196617 *~;
#P hidden newex 116 222 34 196617 + 36.;
#P hidden newex 117 185 35 196617 * 36.;
#P user jsui 1 17 64 64 1 0 0 jsui_3ddial.js;
#P objectname click;
#P user jsui 133 17 64 64 1 0 0 jsui_3ddial.js;
#P objectname release;
#P user jsui 67 17 64 64 1 0 0 jsui_3ddial.js;
#P objectname pitch;
#P hidden message -113 84 59 196617 1. , 0. 200;
#P hidden newex -111 111 44 196617 line~ 1.;
#P hidden newex -29 148 64 196617 svf~ 45 0.8;
#P comment 12 83 43 196617 click;
#P comment 36 2 56 196617 note. trig.;
#P hidden connect 17 0 4 0;
#P hidden connect 4 0 3 0;
#P hidden connect 2 0 21 0;
#P hidden connect 10 0 21 0;
#P hidden connect 21 0 25 0;
#P hidden connect 19 1 20 0;
#P hidden connect 16 0 22 0;
#P hidden connect 23 0 22 0;
#P hidden connect 22 0 18 0;
#P hidden connect 18 1 19 0;
#P hidden connect 20 0 21 1;
#P hidden connect 3 0 2 0;
#P hidden connect 9 0 2 1;
#P hidden connect 24 0 23 0;
#P hidden connect 3 0 10 0;
#P hidden connect 12 0 2 2;
#P hidden connect 7 0 10 1;
#P hidden connect 20 0 17 0;
#P hidden connect 8 0 9 0;
#P hidden connect 5 0 8 0;
#P hidden connect 6 0 11 0;
#P hidden connect 11 0 12 0;
#P pop;



kjg
January 25, 2008 | 7:36 pm

is there a way to set the freq values in the line messeage dinamicly?
> best,
> i.te
>

How about something like this?
Regards,
kjg

#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P newex 93 92 48 196617 loadbang;
#P newex 318 92 48 196617 loadbang;
#P message 370 132 26 196617 100;
#P message 348 132 14 196617 5;
#P message 296 132 20 196617 80;
#P message 274 132 20 196617 30;
#P message 104 131 20 196617 80;
#P message 82 131 20 196617 30;
#P flonum 374 163 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 337 163 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P window setfont "Sans Serif" 10.;
#P comment 301 188 26 196618 high;
#P window setfont "Sans Serif" 9.;
#P flonum 300 163 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 263 163 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 263 212 53 196617 pak f f f f;
#P window setfont "Sans Serif" 10.;
#P comment 268 188 24 196618 low;
#P comment 377 188 36 196618 decay;
#P comment 334 188 38 196618 attack;
#P comment 145 165 53 196618 freq high;
#P window setfont "Sans Serif" 9.;
#P message 263 234 86 196617 $1 , $2 $3 $1 $4;
#P message 70 215 92 196617 $1 , $2 5. $1 100.;
#P flonum 107 165 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 70 165 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 70 190 39 196617 pak f f;
#P window setfont "Sans Serif" 10.;
#P comment 16 165 51 196618 freq low;
#P window setfont "Sans Serif" 12.;
#P comment 216 101 21 196620 or;
#P connect 17 0 3 0;
#P connect 3 0 2 0;
#P connect 2 0 5 0;
#P connect 24 0 17 0;
#P connect 4 0 2 1;
#P connect 24 0 18 0;
#P connect 18 0 4 0;
#P connect 19 0 12 0;
#P connect 12 0 11 0;
#P lcolor 1;
#P connect 11 0 6 0;
#P connect 23 0 19 0;
#P connect 13 0 11 1;
#P lcolor 1;
#P connect 15 0 11 2;
#P lcolor 1;
#P connect 23 0 20 0;
#P connect 20 0 13 0;
#P connect 16 0 11 3;
#P lcolor 1;
#P connect 21 0 15 0;
#P connect 23 0 21 0;
#P connect 23 0 22 0;
#P connect 22 0 16 0;


January 25, 2008 | 8:57 pm

Hi there,

I’m working on a library of ready-made objects that are based on the standard objects supplied by maxmsp. The idea is to have a library of objects that are NOT supplied by cycling’74 but which you use a lot, like LFO’s, bassdrums, filters e.a.. Many of you have probably a whole bunch of such objects (patches) you use all of the time. I’m now making these objects in such a way they are universal for all max users. If other people would like to join you are welcome.

However, one of these objects is a bassdrum object.

Save this patcher as d-filter~

max v2;
#N vpatcher 333 370 804 669;
#P origin -100 -70;
#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P newex 221 81 126 196617 loadmess $4;
#P newex 221 60 126 196617 loadmess $3;
#P newex 221 39 126 196617 loadmess $2;
#P newex 221 102 127 196617 loadmess $1;
#N comlet d-filter~ (signal/float) Q;
#P inlet 195 79 15 0;
#N comlet d-filter~ (signal/float) Gain;
#P inlet 133 79 15 0;
#P newex 71 127 135 196617 filtercoeff~;
#N comlet d-filter~: (signal) Output;
#P outlet 40 193 15 0;
#N comlet d-filter~ (signal/float) Frequency + Filtertype;
#P inlet 71 79 15 0;
#N comlet d-filter~: (signal) Audio in;
#P inlet 40 79 15 0;
#P newex 40 166 166 196617 biquad~;
#P comment 59 193 120 196617 digital malfunction 2007;
#P connect 2 0 1 0;
#P connect 1 0 4 0;
#P fasten 9 0 5 0 226 112 76 112;
#P connect 3 0 5 0;
#P fasten 8 0 5 0 226 121 76 121;
#P connect 5 0 1 1;
#P connect 5 1 1 2;
#P fasten 10 0 5 1 226 112 138 112;
#P connect 6 0 5 1;
#P connect 5 2 1 3;
#P connect 5 3 1 4;
#P fasten 11 0 5 2 226 112 200 112;
#P connect 7 0 5 2;
#P connect 5 4 1 5;
#P pop;

Save this patcher as d-bd~

max v2;
#N vpatcher 4 44 809 892;
#P origin 0 -88;
#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P hidden newex 284 547 73 196617 slide~ 10. 10.;
#P hidden newex 104 551 73 196617 slide~ 10. 10.;
#P hidden inlet 58 37 15 0;
#P comment 331 149 55 196617 overdrive;
#P number 387 149 35 9 0 100 3 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 380 84 57 196617 master;
#P comment 353 167 32 196617 level;
#P number 387 167 35 9 0 100 3 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P hidden newex 6 615 99 196617 scale 0 100 0. 127.;
#P hidden outlet 103 958 15 0;
#P comment 290 83 57 196617 click;
#P comment 194 81 57 196617 noise;
#P comment 98 79 57 196617 sine;
#P hidden newex 99 54 354 196617 route from to glide decay1 level1 damping decay2 level2 level3 over mlevel;
#P comment 261 167 32 196617 level;
#P hidden newex 6 594 99 196617 scale 0 100 0. 127.;
#P number 295 167 35 9 0 100 3 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 161 167 32 196617 level;
#P hidden newex 6 575 99 196617 scale 0 100 0. 127.;
#P number 195 167 35 9 0 100 3 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 65 167 32 196617 level;
#P hidden newex 6 555 99 196617 scale 0 100 0. 127.;
#P number 99 167 35 9 0 100 3 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 148 132 46 196617 damping;
#P comment 158 149 36 196617 decay;
#P comment 61 149 36 196617 decay;
#P hidden newex 402 387 48 196617 loadbang;
#P hidden message 402 410 139 196617 set 0.25 0.5 0.75 1 0.67 0.3;
#P flonum 195 132 52 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P hidden newex 153 593 134 196617 d-filter~ lowpass 3000 1 1;
#P hidden newex 301 413 49 196617 pv env 3;
#P hidden newex 191 439 46 196617 pv env2;
#P hidden newex 103 399 52 196617 t b b;
#P hidden newex 22 401 46 196617 pv env1;
#P hidden newex 103 795 61 196617 clip~ -1. 1.;
#P number 99 115 35 9 20 19000 3 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 99 99 35 9 20 19000 3 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 99 132 35 9 1 5000 3 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P hidden message 103 430 56 196617 $2 , $3 $1;
#P comment 44 132 54 196617 glide time;
#P comment 54 115 44 196617 to pitch;
#P hidden newex 22 343 52 196617 pak 0 0 0;
#P number 195 149 35 9 1 5000 3 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P hidden newex 191 399 50 196617 line 1 20;
#P number 99 149 35 9 1 5000 3 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P hidden flonum 258 710 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P hidden newex 258 684 32 196617 / 10.;
#P hidden user hslider 258 659 18 128 100 1 10 0;
#P hidden newex 103 771 61 196617 overdrive~;
#P hidden user gain~ 203 630 24 100 158 0 1.071519 7.94321 10.;
#P hidden newex 404 447 37 196617 click~;
#P hidden newex 103 451 32 196617 line~;
#P hidden user gain~ 103 824 24 100 158 0 1.071519 7.94321 10.;
#P hidden user gain~ 153 631 24 100 158 0 1.071519 7.94321 10.;
#P hidden message 301 472 62 196617 0 , 1 5 0 $1;
#P hidden newex 301 492 32 196617 line~;
#P hidden newex 284 518 27 196617 *~;
#P hidden newex 284 446 39 196617 noise~;
#P hidden message 191 477 68 196617 0 , 1 15 0 $1;
#P hidden user gain~ 103 633 24 100 158 0 1.071519 7.94321 10.;
#P hidden newex 120 505 32 196617 line~;
#P hidden newex 103 531 27 196617 *~;
#P hidden newex 103 478 40 196617 cycle~;
#P comment 41 99 57 196617 from pitch;
#P hidden inlet 99 30 15 0;
#P comment 430 200 134 196617 by digital malfunction 2007;
#P hidden connect 43 0 44 0;
#P hidden connect 46 0 47 0;
#P hidden connect 49 0 50 0;
#P hidden connect 58 0 57 0;
#P hidden fasten 28 0 24 0 104 333 27 333;
#P hidden fasten 33 1 32 0 150 370 27 370;
#P hidden connect 24 0 32 0;
#P hidden fasten 29 0 24 1 104 333 48 333;
#P hidden fasten 30 0 24 2 104 333 69 333;
#P hidden connect 1 0 52 0;
#P hidden connect 52 0 29 0;
#P hidden connect 52 1 30 0;
#P hidden connect 52 2 28 0;
#P hidden connect 52 3 21 0;
#P hidden connect 52 4 43 0;
#P hidden connect 63 0 33 0;
#P hidden connect 33 0 27 0;
#P hidden fasten 32 0 27 0 27 426 108 426;
#P hidden connect 27 0 14 0;
#P hidden connect 14 0 3 0;
#P hidden connect 3 0 4 0;
#P connect 64 0 6 0;
#P hidden fasten 44 0 6 0 11 620 108 620;
#P hidden connect 6 0 17 0;
#P hidden fasten 12 0 17 0 158 762 108 762;
#P hidden fasten 16 0 17 0 208 761 108 761;
#P hidden connect 17 0 31 0;
#P hidden fasten 57 0 13 0 11 817 108 817;
#P hidden connect 31 0 13 0;
#P hidden connect 13 0 56 0;
#P connect 4 0 64 0;
#P hidden fasten 7 0 5 0 196 501 125 501;
#P hidden connect 5 0 4 1;
#P connect 65 0 36 0;
#P hidden fasten 47 0 12 0 11 620 158 620;
#P hidden connect 36 0 12 0;
#P hidden fasten 20 0 17 1 263 770 159 770;
#P hidden fasten 21 0 22 0 104 302 196 302;
#P hidden fasten 33 0 34 0 108 426 196 426;
#P hidden connect 22 0 34 0;
#P hidden fasten 33 1 7 0 150 469 196 469;
#P hidden connect 34 0 7 0;
#P hidden connect 37 0 36 1;
#P hidden connect 52 5 37 0;
#P hidden connect 52 6 23 0;
#P hidden connect 52 7 46 0;
#P hidden fasten 50 0 16 0 11 620 208 620;
#P hidden fasten 15 0 16 0 409 617 208 617;
#P hidden connect 61 0 18 0;
#P hidden connect 18 0 19 0;
#P hidden connect 19 0 20 0;
#P hidden connect 8 0 9 0;
#P connect 9 0 65 0;
#P hidden connect 52 8 49 0;
#P hidden fasten 33 1 35 0 150 368 306 368;
#P hidden connect 23 0 35 0;
#P hidden connect 35 0 11 0;
#P hidden connect 11 0 10 0;
#P hidden connect 10 0 9 1;
#P hidden connect 52 9 61 0;
#P hidden connect 52 10 58 0;
#P hidden connect 39 0 38 0;
#P hidden connect 63 0 15 0;
#P hidden connect 38 0 15 0;
#P pop;

Save this patcher as d-bd~.help

max v2;
#N vpatcher 0 44 698 465;
#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P comment 613 100 64 196617 masterlevel;
#P comment 556 100 55 196617 overdrive;
#P comment 509 100 31 196617 click;
#P comment 332 100 168 196617 ————-noise————–;
#P button 82 179 24 0;
#P user gain~ 9 216 24 100 158 0 1.071519 7.94321 10.;
#P user ubutton 304 76 138 11 0 0;
#P window linecount 3;
#P hidden message 446 9 140 196617 ; max launchbrowser "http://
http://www.digitalmalfunction.com";
#P window linecount 1;
#P comment 304 75 135 196617 by Digital Malfunction 2007;
#B frgb 59 90 255;
#P window linecount 2;
#P comment 13 46 202 196617 d-bd~ is a synthetic bassdrum with overdrive;
#P window setfont "Sans Serif" 20.;
#P window linecount 1;
#P comment 13 12 100 196628 d-bd~;
#P window setfont "Sans Serif" 9.;
#P hidden newex 82 214 60 196617 loadmess 1;
#N vpreset 10;
#X append 1 2 7 116 9 toggle int 1 ; 9 116 80 number int 147 ; 20 116 129 number int 18 ; 21 116 166 number int 80 ; 22 116 215 number int 258 ; 23 116 276 number int;
#X append 1 2 100 ; 24 116 395 number int 293 ; 25 116 455 number int 14 ; 26 116 511 number int 79 ; 27 116 567 number int 2 ; 28 116 616 number int 100 ; 29 116 332;
#X append 1 2 flonum float 3652. ; 37 216 9 gain~ list 132 10. ;;
#X append 2 2 7 116 9 toggle int 1 ; 9 116 80 number int 147 ; 20 116 129 number int 37 ; 21 116 166 number int 90 ; 22 116 215 number int 289 ; 23 116 276 number int;
#X append 2 2 100 ; 24 116 395 number int 80 ; 25 116 455 number int 32 ; 26 116 511 number int 70 ; 27 116 567 number int 29 ; 28 116 616 number int 89 ; 29 116 332;
#X append 2 2 flonum float 2020. ;;
#X append 3 2 7 116 9 toggle int 1 ; 9 116 80 number int 104 ; 20 116 129 number int 43 ; 21 116 166 number int 80 ; 22 116 215 number int 258 ; 23 116 276 number int;
#X append 3 2 100 ; 24 116 395 number int 320 ; 25 116 455 number int 41 ; 26 116 511 number int 61 ; 27 116 567 number int 3 ; 28 116 616 number int 89 ; 29 116 332;
#X append 3 2 flonum float 3290. ;;
#X append 4 2 7 116 9 toggle int 1 ; 9 116 80 number int 104 ; 20 116 129 number int 2 ; 21 116 166 number int 80 ; 22 116 215 number int 258 ; 23 116 276 number int;
#X append 4 2 100 ; 24 116 395 number int 663 ; 25 116 455 number int 28 ; 26 116 511 number int 71 ; 27 116 567 number int 26 ; 28 116 616 number int 89 ; 29 116 332;
#X append 4 2 flonum float 4419. ;;
#X append 5 2 7 116 9 toggle int 1 ; 9 116 80 number int 92 ; 20 116 129 number int 51 ; 21 116 166 number int 0 ; 22 116 215 number int 258 ; 23 116 276 number int;
#X append 5 2 100 ; 24 116 395 number int 237 ; 25 116 455 number int 28 ; 26 116 511 number int 71 ; 27 116 567 number int 0 ; 28 116 616 number int 89 ; 29 116 332;
#X append 5 2 flonum float 2515. ;;
#X append 6 2 7 116 9 toggle int 1 ; 9 116 80 number int 358 ; 20 116 129 number int 51 ; 21 116 166 number int 83 ; 22 116 215 number int 258 ; 23 116 276 number int;
#X append 6 2 100 ; 24 116 395 number int 237 ; 25 116 455 number int 16 ; 26 116 511 number int 83 ; 27 116 567 number int 0 ; 28 116 616 number int 89 ; 29 116 332;
#X append 6 2 flonum float 2515. ;;
#X append 7 2 7 116 9 toggle int 1 ; 9 116 80 number int 558 ; 20 116 129 number int 17 ; 21 116 166 number int 304 ; 22 116 215 number int 723 ; 23 116 276 number int;
#X append 7 2 100 ; 24 116 395 number int 237 ; 25 116 455 number int 16 ; 26 116 511 number int 83 ; 27 116 567 number int 0 ; 28 116 616 number int 89 ; 29 116 332;
#X append 7 2 flonum float 2515. ;;
#X append 8 2 7 116 9 toggle int 1 ; 9 116 80 number int 133 ; 20 116 129 number int 133 ; 21 116 166 number int 0 ; 22 116 215 number int 699 ; 23 116 276 number int;
#X append 8 2 100 ; 24 116 395 number int 237 ; 25 116 455 number int 48 ; 26 116 511 number int 54 ; 27 116 567 number int 0 ; 28 116 616 number int 89 ; 29 116 332;
#X append 8 2 flonum float 1546. ;;
#X append 9 2 7 116 9 toggle int 1 ; 9 116 80 number int 133 ; 20 116 129 number int 133 ; 21 116 166 number int 0 ; 22 116 215 number int 800 ; 23 116 276 number int;
#X append 9 2 100 ; 24 116 395 number int 396 ; 25 116 455 number int 82 ; 26 116 511 number int 32 ; 27 116 567 number int 99 ; 28 116 616 number int 71 ; 29 116 332;
#X append 9 2 flonum float 1473. ;;
#X append 10 2 7 116 9 toggle int 1 ; 9 116 80 number int 92 ; 20 116 129 number int 26 ; 21 116 166 number int 71 ; 22 116 215 number int 841 ; 23 116 276 number int;
#X append 10 2 100 ; 24 116 395 number int 237 ; 25 116 455 number int 85 ; 26 116 511 number int 100 ; 27 116 567 number int 100 ; 28 116 616 number int 79 ; 29 116 332;
#X append 10 2 flonum float 3061. ;;
#P preset 82 244 57 29;
#P flonum 332 116 44 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 616 116 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 567 116 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 511 116 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 455 116 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 395 116 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 276 116 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 215 116 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 166 116 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 129 116 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P message 616 144 55 196617 mlevel $1;
#P message 567 144 46 196617 over $1;
#P message 511 144 53 196617 level3 $1;
#P message 455 144 53 196617 level2 $1;
#P message 395 144 57 196617 decay2 $1;
#P message 332 144 61 196617 damping $1;
#P message 276 144 53 196617 level1 $1;
#P message 215 144 57 196617 decay1 $1;
#P message 166 144 46 196617 glide $1;
#P message 129 144 34 196617 to $1;
#P number 80 116 35 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P message 80 144 47 196617 from $1;
#P toggle 9 116 15 0;
#P newex 9 144 58 196617 metro 450;
#P user ezdac~ 9 346 53 379 0;
#P newex 9 194 36 196617 d-bd~;
#P comment 77 100 250 196617 ——————–sinewave——————-;
#P comment 110 181 100 196617 bang triggers d-bd~;
#P comment 140 245 130 196617 < -- checkout some presets;
#P user panel 9 8 434 83;
#X brgb 205 218 194;
#X frgb 0 0 0;
#X border 0;
#X rounded 0;
#X shadow 0;
#X done;
#P background;
#P connect 7 0 6 0;
#P fasten 38 0 4 0 87 206 76 206 76 165 14 165;
#P connect 6 0 4 0;
#P connect 4 0 37 0;
#P connect 37 0 5 0;
#P fasten 19 0 4 1 621 176 40 176;
#P fasten 18 0 4 1 572 176 40 176;
#P fasten 17 0 4 1 516 176 40 176;
#P fasten 16 0 4 1 460 176 40 176;
#P fasten 15 0 4 1 400 176 40 176;
#P fasten 14 0 4 1 337 176 40 176;
#P fasten 13 0 4 1 281 176 40 176;
#P fasten 12 0 4 1 220 176 40 176;
#P fasten 11 0 4 1 171 176 40 176;
#P fasten 10 0 4 1 134 176 40 176;
#P fasten 8 0 4 1 85 176 40 176;
#P fasten 37 0 5 1 14 341 48 341;
#P connect 9 0 8 0;
#P hidden connect 31 0 30 0;
#P connect 20 0 10 0;
#P connect 21 0 11 0;
#P connect 22 0 12 0;
#P connect 23 0 13 0;
#P connect 29 0 14 0;
#P connect 24 0 15 0;
#P hidden connect 36 1 35 0;
#P connect 25 0 16 0;
#P connect 26 0 17 0;
#P connect 27 0 18 0;
#P connect 28 0 19 0;
#P pop;


February 1, 2008 | 11:59 am

Hi,
I’ve given this topic a thought in a sleepless night because I always wanted
to build a drum machine myself. after some reading (indeed SOS articles are
pretty damn convenient..) I’ve build a few patches. hihats snare and bd. I’m
willing to share some on the board for everyone who’s interrested.
They’re still a bit sloppy but simple. The pulsgen’s of the hihats need some
more tuning. Also the snare is likely to be modified a bit for a better
sound. The bassdrum is still a mess so i won’t share this one, unless
someone is in need for it…
cheers,
Jeroen.

snare:

max v2;
#N vpatcher 420 203 1125 833;
#P origin 0 -104;
#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P newex 266 43 144 9109513 unpack f f f f f f f f f f f;
#P newex 266 22 205 9109513 loadmess 0.3 0.65 5 81 2 39 0 172 0.9 4700 0;
#P newex 112 560 46 9109513 clip~ -1 1;
#P user scope~ 361 569 491 699 256 3 128 -1. 1. 0 0. 0 0. 102 255 51 135 135
135 0;
#P newex 112 534 33 9109513 *~ 0.6;
#P newex 475 404 25 9109513 sig~;
#P flonum 475 385 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 64 326 25 9109513 sig~;
#P newex 27 325 25 9109513 sig~;
#P flonum 64 307 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 27 307 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P user ezdac~ 105 655 149 688 0;
#P flonum 611 364 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 574 364 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 528 151 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 492 151 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 451 151 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 415 151 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 374 151 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P number 338 151 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P message 149 82 23 9109513 127;
#P message 274 194 34 9109513 set $1;
#P message 216 233 14 9109513 0;
#P newex 244 170 40 9109513 t b b f;
#P newex 244 146 83 9109513 scale 0 127 0.5 1.;
#P inlet 244 127 15 0;
#P newex 112 508 27 9109513 +~;
#P newex 112 439 27 9109513 +~;
#P newex 531 454 27 9109513 *~;
#P newex 172 391 27 9109513 *~;
#P newex 112 391 27 9109513 *~;
#P newex 531 423 53 9109513 svf~;
#P newex 531 398 53 9109513 svf~;
#P newex 531 356 27 9109513 *~;
#P newex 548 304 35 9109513 noise~;
#P newex 376 210 45 9109513 loadbang;
#P newex 415 307 66 9109513 adsr~;
#P message 281 233 14 9109513 1.;
#P message 376 267 14 9109513 0;
#P message 376 249 64 9109513 maxsustain 0;
#P message 376 231 55 9109513 retrigger 10;
#P newex 348 307 66 9109513 adsr~;
#P newex 281 307 66 9109513 adsr~;
#P newex 172 356 27 9109513 *~;
#P newex 172 268 54 9109513 cycle~ 320;
#P newex 112 356 27 9109513 *~;
#P newex 112 268 54 9109513 cycle~ 154;
#P comment 92 83 49 9109513 trigger ->>;
#P comment 426 383 44 9109513 "snappy";
#P comment 496 117 100 9109513 envelope values…;
#P connect 49 0 39 0;
#P connect 39 0 41 0;
#P connect 49 1 40 0;
#P connect 40 0 42 0;
#P connect 47 0 38 0;
#P connect 3 0 4 0;
#P connect 4 0 19 0;
#P connect 19 0 22 0;
#P connect 22 0 23 0;
#P connect 23 0 45 0;
#P connect 45 0 47 0;
#P fasten 7 0 4 1 286 339 134 339;
#P connect 41 0 19 1;
#P fasten 20 0 22 1 177 425 134 425;
#P fasten 21 0 23 1 536 490 134 490;
#P connect 47 0 38 1;
#P fasten 27 0 3 1 221 259 161 259;
#P connect 5 0 6 0;
#P connect 6 0 20 0;
#P fasten 8 0 6 1 353 344 194 344;
#P connect 42 0 20 1;
#P fasten 26 1 27 0 264 202 221 202;
#P connect 27 0 5 1;
#P connect 29 0 25 0;
#P connect 24 0 25 0;
#P connect 25 0 26 0;
#P connect 48 0 49 0;
#P connect 26 2 28 0;
#P fasten 26 0 12 0 249 226 286 226;
#P fasten 28 0 12 0 279 222 286 222;
#P connect 12 0 7 0;
#P connect 10 0 7 0;
#P connect 9 0 7 0;
#P connect 30 0 7 1;
#P connect 31 0 7 2;
#P fasten 11 0 7 3 381 302 328 302;
#P fasten 11 0 7 4 381 302 342 302;
#P connect 49 2 30 0;
#P fasten 12 0 8 0 286 295 353 295;
#P connect 10 0 8 0;
#P connect 9 0 8 0;
#P connect 47 0 46 0;
#P connect 32 0 8 1;
#P connect 49 3 31 0;
#P connect 14 0 9 0;
#P connect 14 0 10 0;
#P connect 14 0 11 0;
#P connect 33 0 8 2;
#P fasten 11 0 8 3 381 302 395 302;
#P fasten 11 0 8 4 381 302 409 302;
#P connect 49 4 32 0;
#P fasten 12 0 13 0 286 295 420 295;
#P connect 10 0 13 0;
#P connect 9 0 13 0;
#P connect 34 0 13 1;
#P connect 35 0 13 2;
#P connect 49 5 33 0;
#P fasten 11 0 13 3 381 302 462 302;
#P fasten 11 0 13 4 381 302 476 302;
#P connect 49 8 43 0;
#P connect 43 0 44 0;
#P connect 49 6 34 0;
#P connect 49 7 35 0;
#P fasten 13 0 16 0 420 337 536 337;
#P connect 16 0 17 0;
#P connect 17 1 18 0;
#P connect 18 0 21 0;
#P connect 15 0 16 1;
#P connect 44 0 21 1;
#P connect 36 0 17 1;
#P connect 36 0 18 1;
#P connect 37 0 17 2;
#P connect 37 0 18 2;
#P connect 49 9 36 0;
#P connect 49 10 37 0;
#P pop;

hihats:

max v2;
#N vpatcher 406 179 1006 827;
#P origin 0 -40;
#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#P newex 310 400 46 9109513 clip~ -1 1;
#P newex 53 237 27 9109513 *~;
#P newex 99 237 27 9109513 *~;
#P newex 70 211 27 9109513 +~ 1;
#P flonum 116 123 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 70 190 27 9109513 !-~;
#P newex 116 164 25 9109513 sig~;
#P newex 116 143 27 9109513 * 0.;
#P newex 447 202 45 9109513 loadbang;
#P newex 277 70 73 9109513 unpack f f f f f;
#P newex 277 47 142 9109513 loadmess 0.75 10000 0.27 2. 90;
#N vpatcher 15 55 615 455;
#P origin 0 -3;
#P window setfont "Sans Serif" 9.;
#P newex 124 42 64 9109513 loadmess 0.1;
#P flonum 194 89 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 194 250 52 9109513 rect~ 1742;
#P newex 181 228 52 9109513 rect~ 1347;
#P newex 163 206 52 9109513 rect~ 2498;
#P newex 141 183 52 9109513 rect~ 1184;
#P newex 117 163 52 9109513 rect~ 1425;
#P newex 148 301 37 9109513 +~ -0.5;
#P newex 94 142 52 9109513 rect~ 1040;
#P outlet 148 325 15 0;
#P connect 8 0 1 1;
#P connect 8 0 3 1;
#P connect 1 0 2 0;
#P connect 3 0 2 0;
#P connect 4 0 2 0;
#P connect 5 0 2 0;
#P connect 6 0 2 0;
#P connect 7 0 2 0;
#P connect 2 0 0 0;
#P connect 8 0 4 1;
#P connect 8 0 5 1;
#P connect 9 0 8 0;
#P connect 8 0 6 1;
#P connect 8 0 7 1;
#P pop;
#P newobj 53 56 58 9109513 p pulsebank;
#P message 460 236 14 9109513 0;
#P user scope~ 406 440 536 570 256 3 128 -1. 1. 0 0. 0 0. 102 255 51 135 135
135 0;
#P newex 310 350 27 9109513 *~;
#P message 223 129 14 9109513 1;
#P flonum 372 157 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 334 158 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P message 371 291 64 9109513 maxsustain 0;
#P message 357 273 55 9109513 retrigger 10;
#P newex 336 322 66 9109513 adsr~;
#P newex 229 309 53 9109513 svf~;
#P newex 100 76 35 9109513 noise~;
#P user ezdac~ 269 501 313 534 0;
#P newex 310 374 33 9109513 *~ 0.3;
#P flonum 249 237 42 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 277 256 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 228 279 53 9109513 svf~;
#P comment 178 130 44 9109513 trigger ->;
#P comment 347 135 100 9109513 attack / decay;
#P comment 247 217 120 9109513 bandpass freq / resonance;
#P window linecount 2;
#P comment 136 61 122 9109513 < <--tweak freqs in pulsebank for better sound;
#P connect 20 0 30 0;
#P fasten 25 0 26 0 121 187 75 187;
#P connect 26 0 28 0;
#P connect 28 0 30 1;
#P connect 9 0 29 0;
#P connect 22 0 27 0;
#P connect 27 0 24 0;
#P connect 24 0 25 0;
#P connect 25 0 29 1;
#P connect 27 0 24 1;
#P fasten 30 0 4 0 58 267 233 267;
#P fasten 29 0 4 0 104 267 233 267;
#P connect 4 2 10 0;
#P connect 22 1 6 0;
#P connect 6 0 4 1;
#P connect 6 0 10 1;
#P connect 31 0 8 0;
#P connect 5 0 4 2;
#P connect 5 0 10 2;
#P connect 21 0 22 0;
#P connect 22 2 5 0;
#P connect 31 0 8 1;
#P connect 10 2 17 0;
#P connect 17 0 7 0;
#P connect 7 0 31 0;
#P connect 11 0 17 1;
#P connect 22 3 14 0;
#P connect 16 0 11 0;
#P connect 13 0 11 0;
#P connect 12 0 11 0;
#P connect 14 0 11 1;
#P connect 23 0 12 0;
#P connect 15 0 11 2;
#P connect 23 0 13 0;
#P connect 22 4 15 0;
#P connect 19 0 11 3;
#P connect 19 0 11 4;
#P connect 31 0 18 0;
#P connect 23 0 19 0;
#P pop;


February 4, 2008 | 9:39 am

Hi JAHroen!

Thanks for the patches!
I would much like to look at your kick drum also!

Cheers


February 7, 2008 | 6:14 pm

sorry for the late reaction, i was away for a few days. I’ve made a
simplyfied version of my bd patch. you could add some kind of overdrive or
something, that adds more functions. In my own version I implemented some
noise multiplied by another adsr~, which adds some more nice (james holden)
sounds. Do you have some more idea’s or patches regarding drumcomputers?
anyway here’s my patch:

max v2;
#N vpatcher 368 34 1218 914;
#P origin 95 21;
#P window setfont "Sans Serif" 9.;
#P comment 359 117 13 9109513 d;
#P newex 218 722 25 9109513 sig~;
#P newex 608 631 45 9109513 loadbang;
#P flonum 572 134 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P message 608 673 14 9109513 0;
#P message 566 657 14 9109513 1;
#P message 608 653 64 9109513 maxsustain 0;
#P newex 566 701 66 9109513 adsr~;
#P newex 415 209 27 9109513 t b f;
#P newex 415 247 27 9109513 * 0.;
#P flonum 415 272 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 143 830 33 9109513 *~ 0.8;
#P newex 305 45 144 9109513 unpack f f f f f f f f f f f;
#P newex 305 22 179 9109513 loadmess 33 2 8 240 5 450 1 30 50 0.7 1;
#P flonum 514 134 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 190 771 27 9109513 *~;
#P flonum 127 134 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P toggle 404 134 15 0;
#P newex 394 437 31 9109513 gate~;
#P message 127 190 34 9109513 set $1;
#P newex 144 516 68 9109513 clip~ 20 20000;
#P newex 144 491 27 9109513 +~;
#P flonum 465 134 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 415 411 27 9109513 *~;
#P flonum 424 134 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 415 386 36 9109513 cycle~;
#P message 316 535 14 9109513 0;
#P message 110 358 14 9109513 0;
#P newex 336 494 45 9109513 loadbang;
#P message 336 535 64 9109513 maxsustain 0;
#P message 336 516 50 9109513 retrigger 5;
#P message 267 541 14 9109513 1;
#P newex 267 569 66 9109513 adsr~;
#P newex 144 804 46 9109513 clip~ -1 1;
#P user ezdac~ 132 855 176 888 0;
#P newex 144 360 52 9109513 pv fsweep;
#P newex 127 247 27 9109513 t b f;
#P flonum 350 134 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 144 611 27 9109513 *~;
#P flonum 310 134 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P button 73 100 15 0;
#P flonum 257 134 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 220 134 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 257 115 33 9109513 f down;
#P comment 174 116 21 9109513 f hi;
#P flonum 164 302 35 9 20. 20000. 3 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 174 134 35 9 0 0 0 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 164 280 27 9109513 * 0.;
#P newex 144 324 72 9109513 pack 0. 0. 0. 0.;
#P message 144 407 73 9109513 $1 , $2 $3 $1 $4;
#P newex 144 429 27 9109513 line~;
#P newex 144 580 36 9109513 cycle~;
#P flonum 127 216 35 9 20. 20000. 3 139 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 127 167 28 9109513 mtof;
#P comment 127 116 20 9109513 f lo;
#P comment 221 115 27 9109513 f up;
#P comment 330 100 37 9109513 bd env;
#P comment 405 114 82 9109513 some kind of FM;
#P comment 514 110 61 9109513 click volume;
#P comment 317 117 13 9109513 a;
#P comment 62 80 37 9109513 trigger;
#P fasten 24 0 33 0 132 306 115 306;
#P lcolor 7;
#P connect 48 0 44 0;
#P connect 44 0 7 0;
#P connect 7 0 41 0;
#P fasten 20 0 8 0 78 211 132 211;
#P connect 41 0 8 0;
#P connect 8 0 24 0;
#P connect 49 0 26 0;
#P connect 27 0 49 0;
#P connect 24 1 12 0;
#P fasten 24 0 25 0 132 354 149 354;
#P lcolor 7;
#P connect 12 0 25 0;
#P connect 25 0 11 0;
#P connect 11 0 10 0;
#P connect 10 0 39 0;
#P connect 39 0 40 0;
#P connect 40 0 9 0;
#P connect 9 0 22 0;
#P fasten 45 0 27 0 195 796 149 796;
#P connect 22 0 27 0;
#P fasten 42 0 39 1 399 483 166 483;
#P fasten 28 0 22 1 272 604 166 604;
#P fasten 24 1 13 0 149 273 169 273;
#P connect 13 0 15 0;
#P connect 15 0 12 1;
#P connect 49 0 26 1;
#P fasten 33 0 9 1 115 575 175 575;
#P connect 48 1 14 0;
#P connect 14 0 13 1;
#P connect 18 0 12 2;
#P fasten 53 0 45 0 571 753 195 753;
#P connect 19 0 12 3;
#P connect 59 0 45 1;
#P fasten 46 0 59 0 519 658 223 658;
#P connect 48 2 18 0;
#P connect 48 3 19 0;
#P fasten 24 0 29 0 132 354 272 354;
#P lcolor 7;
#P fasten 31 0 28 0 341 563 272 563;
#P fasten 30 0 28 0 341 563 272 563;
#P connect 29 0 28 0;
#P connect 21 0 28 1;
#P connect 23 0 28 2;
#P connect 47 0 48 0;
#P connect 34 0 28 3;
#P connect 48 4 21 0;
#P connect 32 0 34 0;
#P connect 34 0 28 4;
#P connect 32 0 30 0;
#P connect 32 0 31 0;
#P connect 48 5 23 0;
#P connect 43 0 42 0;
#P connect 48 6 43 0;
#P connect 36 0 52 0;
#P connect 52 0 51 0;
#P fasten 8 0 51 0 132 239 420 239;
#P connect 51 0 50 0;
#P connect 50 0 35 0;
#P connect 35 0 37 0;
#P connect 37 0 42 1;
#P connect 48 7 36 0;
#P connect 52 1 51 1;
#P connect 38 0 37 1;
#P fasten 33 0 35 1 115 382 446 382;
#P connect 48 8 38 0;
#P connect 48 9 46 0;
#P fasten 24 0 55 0 132 354 571 354;
#P lcolor 7;
#P fasten 54 0 53 0 613 684 571 684;
#P connect 55 0 53 0;
#P connect 48 10 57 0;
#P connect 57 0 53 1;
#P connect 57 0 53 2;
#P connect 58 0 54 0;
#P connect 58 0 56 0;
#P connect 56 0 53 3;
#P fasten 56 0 53 4 613 695 627 695;
#P pop;

2008/2/4, petterdass :
>
>
> Hi JAHroen!
>
> Thanks for the patches!
> I would much like to look at your kick drum also!
>
> Cheers
>
>


February 7, 2008 | 7:15 pm

See also this thread: http://tinyurl.com/2yqlqv
Cheers
Roger

On 07/02/2008 18:14, "Jeroen Groot" wrote:

> Do you have some more idea’s or patches regarding drumcomputers?


February 7, 2008 | 7:24 pm

james holden… I forgot this guy for a while, the only guy from my
progressive period thats worth following, i like his melancholic take on minimal, the nice minor pads with intelligent rythmic odd beat gating.. thanks Jahroen


February 7, 2008 | 8:59 pm

Thanks Roger! looks nice, I’ll try to get this working!

2008/2/7, Roger Carruthers :
>
> See also this thread: http://tinyurl.com/2yqlqv
> Cheers
> Roger
>

PS. Petterdass, if you lost track of Holden, try to get your hands on his
recent artworks like 10101, his remake of Depeche Mode’s Darkest Star and
Idiot. It’s worth listening.


April 11, 2008 | 12:41 pm

Hi Jahroen,

is this snare imitating a 909 ?


April 11, 2008 | 12:43 pm

One problem is that this patch loads with all parameters initialized


April 17, 2008 | 7:19 pm

Quote: camille bodart wrote on Fri, 25 January 2008 02:18
—————————————————-
> hi list,
> for my part i share this little patch i made .
> it’s a emulation of the tr808 bd
>
>
> max v2;
> #N vpatcher 536 194 1273 714;
> #P hidden outlet -83 364 15 0;
> #P window setfont "Sans Serif" 9.;
> #P number 1 1 35 9 0 127 259 3 0 0 0 221 221 221 222 222 222 0 0 0;
> #P objectname note_trigger;
> #P hidden message 2 19 61 196617 set $1 nn 1;
> #P hidden newex -49 -46 74 196617 match 36 nn 1;
> #P hidden newex -83 332 47 196617 *~ 0.75;
> #P hidden newex -69 27 40 196617 / 127.;
> #P hidden newex -49 0 32 196617 sel 0;
> #P hidden newex -49 -26 67 196617 unpack 0 0 0;
> #P button 94 1 15 0;
> #P noclick;
> #P hidden newex -49 -65 56 196617 r notemidi;
> #P hidden newex 239 415 91 196617 autopattr BD_808;
> #X prestore click 1 0 0.44;
> #X prestore note_trigger 1 0 0;
> #X prestore pitch 1 0 0.13;
> #X prestore release 1 0 0.44;
> #P objectname BD_808[1];
> #P comment 145 84 43 196617 release;
> #P comment 79 84 43 196617 pitch;
> #P hidden newex 144 152 34 196617 + 0.7;
> #P hidden newex 140 120 35 196617 * 0.2;
> #P hidden newex 17 248 27 196617 *~;
> #P hidden newex 116 222 34 196617 + 36.;
> #P hidden newex 117 185 35 196617 * 36.;
> #P user jsui 1 17 64 64 1 0 0 jsui_3ddial.js;
> #P objectname click;
> #P user jsui 133 17 64 64 1 0 0 jsui_3ddial.js;
> #P objectname release;
> #P user jsui 67 17 64 64 1 0 0 jsui_3ddial.js;
> #P objectname pitch;
> #P hidden message -113 84 59 196617 1. , 0. 200;
> #P hidden newex -111 111 44 196617 line~ 1.;
> #P hidden newex -29 148 64 196617 svf~ 45 0.8;
> #P comment 12 83 43 196617 click;
> #P comment 36 2 56 196617 note. trig.;
> #P hidden connect 17 0 4 0;
> #P hidden connect 4 0 3 0;
> #P hidden connect 2 0 21 0;
> #P hidden connect 10 0 21 0;
> #P hidden connect 21 0 25 0;
> #P hidden connect 19 1 20 0;
> #P hidden connect 16 0 22 0;
> #P hidden connect 23 0 22 0;
> #P hidden connect 22 0 18 0;
> #P hidden connect 18 1 19 0;
> #P hidden connect 20 0 21 1;
> #P hidden connect 3 0 2 0;
> #P hidden connect 9 0 2 1;
> #P hidden connect 24 0 23 0;
> #P hidden connect 3 0 10 0;
> #P hidden connect 12 0 2 2;
> #P hidden connect 7 0 10 1;
> #P hidden connect 20 0 17 0;
> #P hidden connect 8 0 9 0;
> #P hidden connect 5 0 8 0;
> #P hidden connect 6 0 11 0;
> #P hidden connect 11 0 12 0;
> #P pop;
>
>

—————————————————-

This patch sounds very nice, but doesnt the real 808 use a sine oscillator with a decay envelope?

Why did you use a statevariable filter as oscillator?


April 17, 2008 | 7:25 pm

and why do you multiply and add the pitch with 36?


April 18, 2008 | 10:37 am

I will have a look this evening. It’s probably some 909-like imitation or
some sort off
J.


April 19, 2008 | 3:12 pm

This patch sound pretty good. Thanks Jahoren for sharing.
I was wondering if someone out there has a tb 303 diagram.
best

Emil



kjg
April 20, 2008 | 2:27 pm

Quote: emil wrote on Sat, 19 April 2008 17:12
—————————————————-
> This patch sound pretty good. Thanks Jahoren for sharing.
> I was wondering if someone out there has a tb 303 diagram.
> best
>
> Emil
—————————————————-

I think a 303 is something like this. Google it to be sure, it shouldn’t be hard to find some more detailed info.

Oscillator with square/sawtooth wave option >> 18 or 24 db/oct LP filter >> VCA.

regards,
kjg


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