|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 |
///////////////// some easy beats, yo! ( // somekind of highhat - enveloped whitenoise SynthDef(\highhat, { | amp,freq,release | var env, sig; env = Env.perc(0.001,release); sig = WhiteNoise.ar(EnvGen.kr(env, doneAction: 2)); sig = HPF.ar(sig, freq:freq); sig = Splay.ar(sig); sig = sig * amp; Out.ar(0,sig); }).add; // bass kick SynthDef(\kicker, { var sig, env; env = Env.perc(0.01, 2, 1); sig = LFPar.ar( freq:50, mul: EnvGen.kr(env, doneAction: 2) ) * 10; sig = Splay.ar(sig.distort * 0.5); Out.ar(0, sig); }).add; ~oscBridge = NetAddr.new("127.0.0.1", 12000); h = Pbind( \dur, Pseq([ 4, 4, 4, 4, 2, 2, 4, 4, 2, 1, 1 ], inf), \instrument, \highhat, \amp, Pseq([ 1, 0.9, 1, 0.5, 1, 0.9, 0.2, 0.9, 1, 0.6, 1 ], inf), \freq, Pseq([9000,8000,7000,1000], inf), \release, Pseq([0.07, 0.09, 0.06, 0.2, 1], inf), ).play(quant:32); k = Pbind( \instrument, \kicker, \dur, 32 ).play(quant:32); TempoClock.default.tempo = 100/6; ) //////////////////////////////////////////////////////////////////////////// |
