Skip to content

Instantly share code, notes, and snippets.

@moxuse

moxuse/gist:1239128

Created September 24, 2011 08:47
Show Gist options
  • Save moxuse/1239128 to your computer and use it in GitHub Desktop.
Save moxuse/1239128 to your computer and use it in GitHub Desktop.
Download ZIP
lumin
Raw
gistfile1.sc
(
SynthDef("lumin0",{arg freq=4000,amp=1,gate=1,rate=68;
var src;
src=RHPF.ar(Klank.ar(`[[4105, 128, 123, 8083]*rate, 0.5, [1,1,1,1]], ClipNoise.ar([0.005,0.005]) )*EnvGen.ar(Env.adsr(0.00,0.3,0.1,0.1,0.8,-3),gate,doneAction:2),LFNoise2.ar(2,23,36).midicps,0.4);
Out.ar(0,src*amp);
}).store;
SynthDef("lumin1",{arg freq=4000,amp=1,gate=1,fx=68;
var src;
src=RHPF.ar(Impulse.ar([freq,freq*2.01]*92,SinOsc.ar([freq,freq*1.01]*36*SinOsc.ar(freq*82,0,0.1)),SinOsc.ar([freq/fx,freq/fx*0.99]*102,0,0.3*amp*Decay2.ar(Dust.ar(8),0.0,0.05)))*EnvGen.ar(Env.adsr(0.00,0.2,0.2,0.1,0.8,3),gate,doneAction:2),LFNoise2.ar(2,23,36).midicps,0.4);
Out.ar(0,src);
}).store;
SynthDef("cloce0",{arg amp,rate,gate=1;
var src;
src=Pan2.ar(RLPF.ar(SinOsc.ar(800*rate,SinOsc.ar(400*rate),0.4),LFNoise2.ar(2,23,96).midicps),LFNoise2.ar(2))*EnvGen.ar(Env.adsr(0.6,1,0.05,6,0.5,-4),gate,doneAction:2);
Out.ar(0,src);
}).store;
SynthDef("blip2",{arg amp,rate,gate=1,freq=204;
var src;
src=Pan2.ar(Nes2Square.ar(Impulse.kr( LFNoise0.kr(23, 5.5, 6.5)), 1, 6, LFNoise0.kr(3, 3.5, 3.5),13, 24, 1, LFNoise0.kr(3, 3.5, 3.5), 4.9,freq*rate),LFNoise2.ar(2))*EnvGen.ar(Env.adsr(0.01,0.4,0.1,0.01,0.7,5),gate,doneAction:2);
Out.ar(0,src);
}).store;
)
//Tempo.bpm=117;
//(
//Pdef(\luminas,
//Ppar([
//
//Pbind(\instrument,\cloce0,\dur,Prand([0.5,0.5,0.5,0.25,0.25],inf),\rate,Prand([0.8,1,0.5,0.35,0.666,2.1233,0.333,0.75],inf),\legato,Prand([0.15,0.4,0.95,0.015],inf),\gate,Prand([1,1,0],inf)),
//
//Pbind(\instrument,\lumin0,\dur,1,\midinote,Pseq([92,97],inf),\legato,Pseq([0.03,1,0.23,1.45,0.1,0.23],inf),\amp,Prand([0,1,1,1,0],inf),\fx,Pseq([83,104,67,3],inf)),
//
//Pbind(\instrument,\lumin0,\dur,1,\midinote,Pseq([75,92],inf),\legato,Pseq([0.03,1,0.13,0.15,0.1,0.23],inf),\amp,Prand([0,1,1,1,0],inf),\fx,Pseq([93,24,9,1],inf))
//])
//).play(c);
//)
//Pdef(\luminas).stop
AudioMeter.new
///////////////////////////////nomal
///////////////////////////////
s.sendMsg(\b_allocRead, 10, "sounds/hh4.wav");
s.sendMsg(\b_allocRead, 20, "sounds/snr20.wav");
s.sendMsg(\b_allocRead, 30, "sounds/kick12.wav");
(
SynthDef("snr1",{arg rate=1,amp=0.7,trg=2;
var src,trg1;
trg1=Impulse.kr(trg,0.25);
src=PlayBuf.ar(1, 10, rate*4.2,trg1,0)*EnvGen.ar(Env.perc(0.0,0.5,1,-4),doneAction:2);
Out.ar(0,Pan2.ar((src*200).softclip*0.2*amp,TExpRand.kr(-1,0.75,trg1)));
}).store;
SynthDef("snr1",{arg rate=1,amp=0,legato=1;
var b = 10, dur,out,trate;
trate = MouseY.kr(2,200);
dur = SinOsc.ar(4,0,6) +0.57 / trate;
out=AllpassN.ar(RLPF.ar(TGrains.ar(2, Dust.ar(trate), b,rate, MouseX.kr(360,BufDur.kr(b)), dur/2,LFNoise2.kr(12,-0.3,-0.75), 1, 2),LFNoise1.ar(0.1,22,MouseY.kr(144,84)).midicps,0.4),0.015,0.3,0.6)*amp*
EnvGen.kr(Env.perc(0.0,0.07*legato,1,7), doneAction:2);
Out.ar(0,(out*220).softclip*0.18);
}).store;
SynthDef("clap",{arg rate=1,amp=0.7,trg=1;
var src,trg1;
trg1=Impulse.kr(trg);
src=AllpassN.ar(RHPF.ar(PlayBuf.ar(1, 20, 2,trg1,0),3634,0.8)*SinOsc.ar(XLine.kr(400,2,0.02)),0.0125,0.51,0.3)*EnvGen.ar(Env.perc(0.0,0.5,1,2),doneAction:2);
Out.ar(0,Pan2.ar(src*amp,TExpRand.kr(0.13,0.95,trg1)));
}).store;
SynthDef("kick",{arg rate=1,amp=0.23, trg=1;
var src;
src=PlayBuf.ar(1, 30, [rate,rate*1.101]*0.89,Impulse.kr(trg),0)*EnvGen.ar(Env.perc(0.0,0.4,0.7,-4),doneAction:2);
Out.ar(0,src*amp);
}).store
)
(
var dicArray,d0,d1,d2,d3,d4,d5,d6,d7,d8,d9,e0,e1,e2,e3,e4,e5,e6,e7,e8,e9;
c=TempoClock.new(2);
d0=Dictionary[0 -> Pseq([ "eb", "c", "n", "n" ],inf).asStream, 1 -> 0.25, 2->"a"];
d1=Dictionary[0 -> Pseq([ "n", "eb", "n", "n" ],inf).asStream, 1 -> 0.25, 2->"b"];
d2=Dictionary[0 -> Pseq([ "eb", "eb", "c", "n" ],inf).asStream, 1 -> 0.25, 2->"c"];
d3=Dictionary[0 -> Pseq([ "n", "g", "eb", "k" ],inf).asStream, 1 -> 0.25, 2->"d"];
d4=Dictionary[0 -> Pseq([ "b", "k", "c", "k" ],inf).asStream, 1 -> 0.25, 2->"e"];
d5=Dictionary[0 -> Pseq([ "eb", "n", "n", "c" ],inf).asStream, 1 -> 0.25, 2->"f"];
d6=Dictionary[0 -> Pseq([ "b", "b", "n", "n" ],inf).asStream, 1 -> 0.25, 2->"g"];
d7=Dictionary[0 -> Pseq([ "eb", "n", "n", "c" ],inf).asStream, 1 -> 0.25, 2->"h"];
d8=Dictionary[0 -> Pseq([ "z", "c", "k", "z" ],inf).asStream, 1 -> 0.25, 2->"i"];
d9=Dictionary[0 -> Pseq([ "eb", "k", "n", "n" ],inf).asStream, 1 -> 0.25, 2->"j"];
e0=Dictionary[0 -> Pseq([ "c", "n", "en", "en" ],inf).asStream, 1 -> 0.25, 2->"a"];
e1=Dictionary[0 -> Pseq([ "n", "k", "n", "n" ],inf).asStream, 1 -> 0.25, 2->"b"];
e2=Dictionary[0 -> Pseq([ "z", "ek", "c", "n" ],inf).asStream, 1 -> 0.25, 2->"c"];
e3=Dictionary[0 -> Pseq([ "n", "g", "eb", "k" ],inf).asStream, 1 -> 0.25, 2->"d"];
e4=Dictionary[0 -> Pseq([ "eb", "k", "c", "k" ],inf).asStream, 1 -> 0.25, 2->"e"];
e5=Dictionary[0 -> Pseq([ "ec", "n", "eb", "c" ],inf).asStream, 1 -> 0.25, 2->"f"];
e6=Dictionary[0 -> Pseq([ "n", "b", "n", "n" ],inf).asStream, 1 -> 0.25, 2->"g"];
e7=Dictionary[0 -> Pseq([ "k", "en", "en", "c" ],inf).asStream, 1 -> 0.25, 2->"h"];
e8=Dictionary[0 -> Pseq([ "eb", "c", "en", "c" ],inf).asStream, 1 -> 0.25, 2->"i"];
e9=Dictionary[0 -> Pseq([ "n", "en", "b", "en" ],inf).asStream, 1 -> 0.25, 2->"j"];
dicArray = [d0,d1,d2,d3,d4,d5,d6,d7,d8,d9,e0,e1,e2,e3,e4,e5,e6,e7,e8,e9];
m={arg step=1,dict;
step.do({
switch( dict.at(0).next,
"k", { Synth("snr1",[\amp,0.5]) },
"c", { Synth("clap",[\amp,0.7]) },
"g", { Synth("snr1",[\trg,2,\amp,0.5]) },
"b", { Synth("clap",[\trg,4,\amp,0.8]) },
"z", { Synth("clap",[\trg,16,\amp,0.7]) },
"n", { nil };
"ek", { Synth("kick",[\trg,1,\amp,0.2]) },
"ec", { Synth("snr1",[\amp,0.5]) },
"eg", { Synth("kick",[\amp,0.2]) },
"eb", { Synth("kick",[\trg,4,\amp,0.2]) },
"ez", { Synth("kick",[\amp,0.2]) };
);
(dict.at(1)).wait;
});
};
~binder={arg step=1,sw=0;
1.do({
m.value(step,dicArray.at(sw));
});
};
v=Task({arg q;
loop{
q=[12,9,2,5,6].choose;
~binder.value(1,1);
~binder.value(1,0);
~binder.value(1,3);
~binder.value(1,7);
~binder.value(1,1);
~binder.value(1,0);
~binder.value(1,q);
~binder.value(1,5);
}
};
).play(c);
)
Tempo.bpm=120;
v.stop;
///////////////////////////////add FX
///////////////////////////////
//3, 2
s.sendMsg(\b_allocRead, 10, "sounds/hh7.wav");
s.sendMsg(\b_allocRead, 20, "sounds/hh6.wav");
s.sendMsg(\b_allocRead, 30, "sounds/kick12.wav");
(
//SynthDef("snr1",{arg rate=1,amp=0.7,trg=1;
//var src;
//src=Pan2.ar(PlayBuf.ar(1, 10, rate*1.7,Impulse.kr(trg,0.25),0)*Pulse.ar(8822,0.1,0.8),LFNoise2.ar(4,-0.7))*EnvGen.ar(Env.perc(0.0,0.8,1,-4),doneAction:2);
//Out.ar(0,src*amp);
//}).store;
SynthDef("clap",{arg rate=1,amp=0.7,trg=1;
var src;
src=RHPF.ar(PlayBuf.ar(1, 20, [rate,rate*1.01]*XLine.kr(2,5.13,0.1),Impulse.kr(trg),0),LFNoise1.ar(1,22,94).midicps,0.3)*EnvGen.ar(Env.perc(0.0,0.4,0.82,2),doneAction:2);
Out.ar(0,src*amp.softclip);
}).store;
SynthDef("snr1",{arg rate=1,amp=0,legato=1;
var b = 10, dur,out,trate;
trate = MouseY.kr(2,200);
dur = SinOsc.ar(4,0,6) +0.57 / trate;
out=Resonz.ar(TGrains.ar(2, Dust.ar(trate), b,rate, MouseX.kr(360,BufDur.kr(b)), dur/2,LFNoise2.kr(12), 1, 2),LFNoise1.ar(0.1,22,114).midicps,0.4)*amp*
EnvGen.kr(Env.perc(0.0,0.12*legato,1,7), doneAction:2);
Out.ar(0,(out*220).softclip*0.18);
}).store;
SynthDef("kick",{arg rate=1,amp=0.23, trg=1;
var src;
src=PlayBuf.ar(1, 30, [rate,rate*1.101]*0.9,Impulse.kr(trg),0)*EnvGen.ar(Env.perc(0.0,0.4,0.75,-4),doneAction:2);
Out.ar(0,src*amp);
}).store;
SynthDef("lumin0",{arg freq=4000,amp=1,gate=1,rate=68;
var src;
src=RHPF.ar(Klank.ar(`[[4105, 568, 1212, 8083]*rate, 0.5, [1,1,1,1]], ClipNoise.ar([0.005,0.005]) )*EnvGen.ar(Env.adsr(0.00,0.3,0.02,0.1,0.99,-3),gate,doneAction:2),LFNoise2.ar(2,23,36).midicps,0.4);
Out.ar(0,src*amp);
}).store;
SynthDef("lumin1",{arg freq=4000,amp=1,gate=1,fx=68;
var src;
src=RHPF.ar(Impulse.ar([freq,freq*2.01]*92,SinOsc.ar([freq,freq*1.01]*36*SinOsc.ar(freq*82,0,0.1)),SinOsc.ar([freq/fx,freq/fx*0.99]*102,0,0.4*amp*Decay2.ar(Dust.ar(8),0.0,0.05)))*EnvGen.ar(Env.adsr(0.5,0.8,0.2,0.1,0.9,3),gate,doneAction:2),LFNoise2.ar(2,23,36).midicps,0.4);
Out.ar(0,src);
}).store;
SynthDef("cloce0",{arg amp,rate,gate=1;
var src;
src=Pan2.ar(RLPF.ar(SinOsc.ar(300*rate,Pulse.ar(rate*2,0.5),LFNoise2.ar(6,0.2,0.4)),LFNoise2.ar(0.2,23,76).midicps,0.3),LFNoise2.ar(2))*EnvGen.ar(Env.adsr(0.0,0.1,0.06,1,0.7,2),gate,doneAction:2);
Out.ar(0,src);
}).store;
SynthDef("cloce1",{arg freq=400,amp=1,gate=1;
var src;
src=Pan2.ar(RHPF.ar(SinOsc.ar(freq/2,0,LFNoise2.ar(4,0.4,0.03)*SinOsc.ar(freq/2)),LFNoise2.ar(12,23,66).midicps),LFNoise2.ar(2))*EnvGen.ar(Env.adsr(0.001,0.2,0.05,0.05,0.8,-4),gate,doneAction:2);
Out.ar(0,(src*29*amp).softclip*0.2);
}).store;
SynthDef("lumin2",{arg amp,gate=1,freq;
var src;
src=Pan2.ar(SinOsc.ar(freq*SinOsc.ar(freq*132),SinOsc.ar(freq*2,0,6),LFNoise2.ar(13,0.4,0.2)*SinOsc.ar(freq*8)),LFNoise2.ar(2))*EnvGen.ar(Env.adsr(0.0,0.12,0.1,0.2,0.5,-1),gate,doneAction:2);
Out.ar(0,src);
}).store;
SynthDef("blip2",{arg amp,rate,gate=1,freq=2404;
var src;
src=Pan2.ar(Nes2Triangle.ar(Impulse.kr(14), LFSaw.kr(0.2, 0, 63.5, 63.5), MouseY.kr(0, 25)),LFNoise2.ar(2))*EnvGen.ar(Env.adsr(0.01,0.4,0.1,0.04,0.7,5),gate,doneAction:2);
Out.ar(0,src);
}).store;
)
(
var dicArray,d0,d1,d2,d3,d4,d5,d6,d7,d8,d9,e0,e1,e2,e3,e4,e5,e6,e7,e8,e9;
c=TempoClock.new(2);
d0=Dictionary[0 -> Pseq([ "eb", "c", "n", "n" ],inf).asStream, 1 -> 0.25, 2->"a"];
d1=Dictionary[0 -> Pseq([ "n", "eb", "n", "n" ],inf).asStream, 1 -> 0.25, 2->"b"];
d2=Dictionary[0 -> Pseq([ "eb", "eb", "c", "n" ],inf).asStream, 1 -> 0.25, 2->"c"];
d3=Dictionary[0 -> Pseq([ "n", "g", "eb", "k" ],inf).asStream, 1 -> 0.25, 2->"d"];
d4=Dictionary[0 -> Pseq([ "b", "k", "c", "k" ],inf).asStream, 1 -> 0.25, 2->"e"];
d5=Dictionary[0 -> Pseq([ "eb", "n", "n", "c" ],inf).asStream, 1 -> 0.25, 2->"f"];
d6=Dictionary[0 -> Pseq([ "b", "b", "n", "n" ],inf).asStream, 1 -> 0.25, 2->"g"];
d7=Dictionary[0 -> Pseq([ "eb", "n", "n", "c" ],inf).asStream, 1 -> 0.25, 2->"h"];
d8=Dictionary[0 -> Pseq([ "b", "c", "k", "z" ],inf).asStream, 1 -> 0.25, 2->"i"];
d9=Dictionary[0 -> Pseq([ "eb", "k", "n", "n" ],inf).asStream, 1 -> 0.25, 2->"j"];
e0=Dictionary[0 -> Pseq([ "c", "n", "en", "en" ],inf).asStream, 1 -> 0.25, 2->"a"];
e1=Dictionary[0 -> Pseq([ "n", "k", "n", "n" ],inf).asStream, 1 -> 0.25, 2->"b"];
e2=Dictionary[0 -> Pseq([ "c", "ek", "c", "n" ],inf).asStream, 1 -> 0.25, 2->"c"];
e3=Dictionary[0 -> Pseq([ "n", "g", "eb", "k" ],inf).asStream, 1 -> 0.25, 2->"d"];
e4=Dictionary[0 -> Pseq([ "eb", "k", "c", "k" ],inf).asStream, 1 -> 0.25, 2->"e"];
e5=Dictionary[0 -> Pseq([ "ec", "n", "eb", "c" ],inf).asStream, 1 -> 0.25, 2->"f"];
e6=Dictionary[0 -> Pseq([ "n", "b", "n", "n" ],inf).asStream, 1 -> 0.25, 2->"g"];
e7=Dictionary[0 -> Pseq([ "k", "en", "en", "c" ],inf).asStream, 1 -> 0.25, 2->"h"];
e8=Dictionary[0 -> Pseq([ "eb", "c", "en", "c" ],inf).asStream, 1 -> 0.25, 2->"i"];
e9=Dictionary[0 -> Pseq([ "n", "en", "b", "en" ],inf).asStream, 1 -> 0.25, 2->"j"];
dicArray = [d0,d1,d2,d3,d4,d5,d6,d7,d8,d9,e0,e1,e2,e3,e4,e5,e6,e7,e8,e9];
m={arg step=1,dict;
step.do({
switch( dict.at(0).next,
"k", { Synth("snr1",[\amp,0.5,\legato,1]) },
"c", { Synth("clap",[\amp,0.8]) },
"g", { Synth("snr1",[\trg,1,\amp,0.5,\legato,2]) },
"b", { Synth("clap",[\trg,4,\amp,0.27]) },
"z", { Synth("clap",[\trg,8,\amp,0.4]) },
"n", { nil };
"ek", { Synth("kick",[\trg,4,\amp,0.2]) },
"ec", { Synth("snr1",[\amp,0.5,\legato,0.9]) },
"eg", { Synth("kick",[\amp,0.2]) },
"eb", { Synth("kick",[\trg,2,\amp,0.4]) },
"ez", { Synth("kick",[\amp,0.2]) };
);
(dict.at(1)).wait;
});
};
~binder={arg step=1,sw=0;
1.do({
m.value(step,dicArray.at(sw));
});
};
//
//~patternA={
// q=[0,3,4,5,6,7,8,9].choose;
// ~binder.value(1,10);
// ~binder.value(1,4);
// ~binder.value(1,q);
// ~binder.value(1,5);
//
// ~binder.value(1,2);
// ~binder.value(1,q);
// ~binder.value(1,2);
// ~binder.value(1,5);
//
// };
//
//~patternB={
// q=[0,3,4,5,6,7,8,9].choose;
// ~binder.value(1,12);
// ~binder.value(1,0);
// ~binder.value(1,q);
// ~binder.value(1,1);
//
// ~binder.value(1,0);
// ~binder.value(1,q);
// ~binder.value(1,10);
// ~binder.value(1,5);
// };
c.play;
v=Task({arg q;
loop{
q=[0,3,4,5,6,7,8,9].choose;
~binder.value(1,9);
~binder.value(1,1);
~binder.value(1,8);
~binder.value(1,5);
~binder.value(1,9);
~binder.value(1,1);
~binder.value(1,q);
~binder.value(1,5);
~binder.value(1,3);
~binder.value(1,2);
~binder.value(1,q);
~binder.value(1,8);
~binder.value(1,3);
~binder.value(1,2);
~binder.value(1,q);
~binder.value(1,5);
}
};
).play(c);
)
Tempo.bpm=144;
v.stop;
Pseq([[3,7],[2,10],[6,8]],inf)
(
v.play(c);
Pdef(\luminas,
Ppar([
Pbind(\instrument,\cloce0,\dur,Pseq([12,8,4],inf),\rate,Pseq([1,0.25,2,0.5,0.333,0.666],inf),\legato,Prand([1,0.25,0.6,0.8],inf),\amp,Prand([1,1,1],inf)),
Pbind(\instrument,\cloce0,\dur,Pseq([2,1,0.25,0.75],inf),\rate,Pseq([1,0.25,0.6666,0.33333],inf),\legato,Prand([0.2,1,0.5],inf),\amp,Prand([1,0,1,0,1],inf)),
Pbind(\instrument,\cloce0,\dur,Pseq([2,4,0.25,0.75],inf),\rate,Pseq([1,0.75,0.6666,1,0.5],inf),\legato,Prand([0.2,1,0.5],inf),\amp,Prand([0,0,1,0,1,0,1],inf)),
Pbind(\instrument,\cloce1,\dur,Prand([0.25,0.75],inf),\midinote,Prand([0,4,12,9,7]+67-24.3,inf),\legato,Prand([3.15,0.24,0.95,0.15],inf),\amp,Prand([1,1,1,0,0,0],inf),\ctranspose, Pseq([0,0,0,0,5,-7,0], inf)),
Pbind(\instrument,\cloce1,\dur,Prand([0.25],inf),\midinote,Prand([0,4,12,9]+67.9+12,inf),\legato,Prand([0.15,3.14,2.5,0.15,2],inf),\amp,Prand([1,1,1,0,0],inf),\ctranspose, Pseq([0,0,0,5,-7,12], inf)),
Pbind(\instrument,\lumin0,\dur,0.25,\midinote,Prand([0,3,8,12]+34+36,inf),\legato,Pseq([1.03,0.5,0.13,0.1,0.23],inf),\amp,Prand([0,0,1,1,1,1,0],inf),\rate,Pseq([0.75,0.5,1,0.125],inf)),
Pbind(\instrument,\lumin1,\dur,2,\midinote,Prand([0,3,8,12,6,12]+58+24,inf),\legato,Pseq([0.3,1,0.23,1.45,4.6,0.23],inf),\amp,Prand([0,0,1,1,1,1,0],inf),\fx,Pseq([12,4,7,3,12],inf))
])
).play(c);
)
(
v.stop;
Pdef(\luminas,
Ppar([
Pbind(\instrument,\cloce0,\dur,Prand([8],inf),\rate,Pseq([0.8,0.267,0.5,0.666]*8,inf),\legato,Prand([1],inf),\amp,Prand([1,1,1,0],inf)),
Pbind(\instrument,\cloce0,\dur,Pseq([1,1,0.5,0.5],inf),\rate,Pseq([0.267,0.333,0.6666,0.33333]*8,inf),\legato,Prand([0.2,1,0.5],inf),\amp,Prand([1,0,1,0,1],inf)),
Pbind(\instrument,\cloce0,\dur,Pseq([2,4,0.5,0.5]*8,inf),\rate,Pseq([0.267,0.333,0.6666,1,0.5],inf),\legato,Prand([0.2,1,0.5],inf),\amp,Prand([0,0,1,0,1,0,1],inf)),
Pbind(\instrument,\lumin2,\dur,Pseq([2,1],inf),\midinote,Pseq([[3,6],[2,5,8]]+57.3,inf),\legato,Prand([0.01,0.15,0.01],inf),\amp,Prand([1,1,1,0,0,0,0],inf),\ctranspose, Pseq([2,3,0,0,2,0,-1,3], inf)),
////Pbind(\instrument,\blip2,\dur,Prand([0.75,0.25]*2,inf),\rate,Prand([30,0,30,0,10],inf),\legato,Prand([0.15,0.04,0.35,0.25,0.1,0.03],inf),\gate,Prand([1,1,1,0,0],inf)),
////
////Pbind(\instrument,\lumin0,\dur,0.25,\midinote,Prand([0,3,8,12]+34,inf),\legato,Pseq([0.03,0.5,0.13,0.1,0.23],inf),\amp,Prand([0,0,1,1,1,1,0],inf),\rate,Pseq([0.75,0.5,1,0.125],inf)),
Pbind(\instrument,\lumin1,\dur,2,\midinote,Prand([0,3,8,12,6,12]+58,inf),\legato,Pseq([3],inf),\amp,Prand([0,0,1,1,1,1,0],inf),\fx,Pseq([12,4,67,3,12],inf))
])
).play(c);
)
s.sendMsg(\b_allocRead, 10, "sounds/sona3.wav");
Pdef(\luminas).stop
AudioMeter.new
(
Instr(\highsaw,{ arg freq=57.3, fx = 0.8, revtime=2.0, lpf=700, rq=0.1, gain = 2, amp=0.0,dur=12;
var n, z, w, mix;
n =8;
mix =
Mix.ar(Array.fill(n, {
Pan2.ar(
RLPF.ar
(
SinOsc.ar((freq+[0,3,8].choose).midicps*([1,2.0].choose*[0.6666,1.33333,2.0,0.6666,3,12.0]).choose,0,LFNoise1.ar(dur))
,
lpf,
rq, 0.1
),
LFNoise1.kr(1.0.rand,0.25)
)
}))*4/n;
w = mix;
w = CombN.ar(w, 0.31, 0.31, 2, 1, w);
//5.do({ w = AllpassN.ar(w, 0.050, {0.050.rand}.dup(4), 1) });
3.do({ w = AllpassL.ar(w, 0.1, LFNoise2.kr([rrand(0.01, 0.1),rrand(0.01, 0.1)],0.05,0.15), 2) });
mix = (w * fx) + (mix * (1-fx));
mix = ((mix*gain).softclip) * amp;
},#[
[1,120,\linear,0],
[0,1.0,\linear,0],
[0,8.0,\linear,0],
[50,15000,\exponential,0],
\unipolar,
[1,2048,\exponential,0],
\amp,
[1,24,\exponential,0]
]).test
)
//////////////
//////////////
//////////////molody section
(
Pbind(
\degree,Pseq([0,2,1,2,7,\,0,2,1,2,0],1),
\dur,Pseq([2,1,2,1,1,1]/2,2)
).play;
)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment