Hackpact.Mx

//código SuperCollider

///Este es el Mero por favor... escuchen esta maravilla no es que sea mio pero esta muy canijo...


{SinOsc.ar}.play



s.record;
s.stoprRecording;

reproducir muestra

descargar código

ElUtlimoElMas ErguitasDe TodosLosHPdeTodos

//código SuperCollider

s.boot;

Tdef(\add).stop;Ndef.clear(7);
(
Tdef(\add,{
inf.do{
(
Ndef('z',{a=Array;b=LFDNoise3;l=Crackle;Limiter.ar(CombN.ar(Decay.ar( {Klank.ar(`[a.rand(12,130,170).postln+450,a.rand(5,0.05,0.1)],l.kr(0.5) ,freqscale:l.kr([1, 0.1])*b.kr(2.1))}*b.kr([1.1, 1.2]/l.ar.abs), b.kr(0.1).range(1e-3,2e-2)),b.kr.abs/l.kr, TExpRand.kr(1e-3, 0.4, Impulse.kr([3, 7]*l.kr+b.kr))), 0.9, 0.03)}/3).play;
);
[4, 5.3, 0.5, 3.86].choose.wait
}
}).play;
Ndef('z').fadeTime=12.0;
)

s.record;
s.stopRecording;

reproducir muestra

descargar código

29.YaNoSeQuePonerle

//código SuperCollider

play{a=Crackle;a.ar((2)*5e-4*a.kr(Impulse.kr([7.1,4.3]/LFNoise2.kr(12.3),0.0002,1/4)))}

//código SuperCollider

s.reboot;

a = NodeProxy(s, \audio, 2).ajuits;
a.fadeTime=12;
(
x=Pxrand([4, 8, 0.7, 2, 1], inf).asStream;
Tdef('alo',{
loop{
(
a[0]={|a1= 1, b1=1, freq1=1400, freq2=250 |
b=Ringz.ar(
PMOsc.ar(
Array.fill(a1, {|i|FSinOsc.ar((i + 1) * freq1 + 40.rand, i * 2/pi, 0.1)} * 7 ),
Array.fill(b1, {|i|VarSaw.ar((i + 1) * freq2 + 50.rand, 0.1, 1)} * 5),
LFDNoise0.kr(10.2, 2, 5).range(0.0001, 0.7)),
LFPulse.kr(0.1, 0.1, 3, 3)*[0.1, 0.2],
LFNoise0.kr([14.3, 8.1], 0.1, 3),
1.5/pi, 0.7).atan.distort;
FreeVerb.ar(
Compander.ar(b, b, 1, 1, 1/2, 0.1, 0.4),
0.3, 0.7, 0.01)
} *1;
);
x.next.wait;
}
}).play
)

a.play;
a.clear(5);

s.record;
s.stopRecording;

reproducir muestra

descargar código

27.NodeProxy.ajuits

//código SuperCollider

p=ProxySpace.push(s.boot; s.latency=0.01)

p.fadeTime=3.4;

~sale.play;
NodeProxy.audio(s, 2)

(
a=Pxrand([4, 8, 0.7, 2, 1], inf).asStream;
Tdef(\reload,{

inf.do{
(
~entre={
//también => AllpassL.ar()
CombL.ar(
VarSaw.kr([0.2, 0.8]/LFNoise0.kr(17), LFTri.kr(0.1).range(0.1, 1), LFNoise2.kr(0.01).range(0.1, 1)) *
Mix(
Array.fill(
7,
{|i|FSinOsc.ar((i+3 * 50.rand).postln + 100, i * pi/2, i * TExpRand.kr(2e-4, 0.01, SinOsc.kr([8, 12])) * LFDNoise0.kr(12.7.rand).range(2, 5)) * 2}
)) *
Gendy3.kr(
5,
0.020,
TRand.ar(1e-3, 0.1, Impulse.kr(12.4),
TRand.ar(1e-2, 0.1, Impulse.kr(18.4)),
200 * 3/4),
300,
0.3,
LFNoise1.kr(1.3).range(0, 1),
LFNoise1.kr(0.3).range(0, 1)),
0.7,
TExpRand.kr(1e-4, 0.1, SinOsc.kr([4, 12]) * LFDNoise0.kr(12.7.rand)),
2).distort
}/2
);
a.next.wait;
};
}
).play.quant_(0);
);
Tdef(\reload).stop;

~sale=~entre;

p.clear(8);

s.record;
s.stopRecording;

reproducir muestras

26.pue'ahi

//código SuperCollider

/////Ascii= [ ; , l, k, j, h, g, f]

p=ProxySpace.push(s.boot;s.latency=0.01;)

p.fadeTime=1.2;

~mc.play;
NodeProxy.audio(s, 2);

a=Buffer.alloc(s, s.sampleRate * 2, 1);
b=Buffer.alloc(s, s.sampleRate * 1, 1);
c=Buffer.alloc(s, s.sampleRate * 3, 1);
d=Buffer.alloc(s, s.sampleRate * 8, 1);
f=Buffer.alloc(s, s.sampleRate * 27, 1);
g=Buffer.alloc(s, s.sampleRate * 3, 1);
h=Buffer.alloc(s, s.sampleRate * 5, 1);

a.free;
b.free;
c.free;
d.free;
f.free;
g.free;

~rec1={RecordBuf.ar(SoundIn.ar(1), h.bufnum, loop: 0, doneAction:2)};

 

(
w=SCWindow("paQUEescribas", Rect(400,200,300,500)).front;
w.view.keyDownAction={|view, char, modifiers, unicode, keycode|
                            [char, keycode].postln;
                            };

~env1={Pan2.ar(SinOsc.ar([80, 120]) * PlayBuf.ar(1, a.bufnum, trigger: KeyState.kr(38, 0, 1, 0.001), loop: 1), -0.3) * 0.4};

~env2={Pan2.ar(PlayBuf.ar(1, b.bufnum, trigger: KeyState.kr(40, 0, 1, 0.001), startPos:0, loop: 1), 0)};

~env3={Pan2.ar(PlayBuf.ar(1, c.bufnum, trigger: KeyState.kr(37, 0, 1, 0.001), startPos:5000, loop: 1), 0)};

~env2={Splay.ar(FreeVerb.ar(PitchShift.ar(PlayBuf.ar(1, c.bufnum, trigger: KeyState.kr(37, 0, 1, 0.001), startPos: 5000, loop: 1), 1, Demand.kr(Impulse.kr(2), 0, Dseq([ 0.3, 0.5], inf)), 0, 1), 0.3, 0.9, 0.01), 0.8)};

~env4={Splay.ar(FreeVerb.ar(VarSaw.ar(Demand.kr(Impulse.kr(TRand.kr(4, 12, Impulse.kr(8))), 0, Dxrand([550/3, 0, 150/2, 0, 350 * 16, 0, 550], inf))) * PitchShift.ar(PlayBuf.ar(1, d.bufnum, trigger: KeyState.kr(41, 0, 1, 0.001), startPos: 5000, loop: 1), 1, 0.5, 0, 0.1), 0.3, 0.5, 0.1), 1) * 2};

~env5={Pan2.ar(PlayBuf.ar(1, f.bufnum, trigger: KeyState.kr(4, 0, 1, 0.001),startPos: d.numFrames.rand), 0) * 2};
,
~env6={Pan2.ar(PlayBuf.ar(1, g.bufnum, trigger: KeyState.kr(5, 0, 1, 0.001)),[-1, -0.5, 0, 0.5].choose) * 2};

~env7={Pan2.ar(PlayBuf.ar(1, h.bufnum, trigger: KeyState.kr(3, 0, 1, 0.001)),[1, 0.5].choose) *1.5};
ffffffggh
)

~mc= ~env2 + ~env6 + ~env5 + ~env7 + ~env3

p.clear(10);

 

s.record;
s.stopRecording;

reproducir muestra

descargar código

25.ViajarAlMundo

//código SuperCollider

////inspirado en Bathaun Bozkurt tweet, con audio de http://webhamster.com/

p=ProxySpace.push(s.boot;)
p.fadeTime=4.5;

~ipa.play;

(
b=Buffer.read(s, "sounds/theHamsterDance.aiff");
b.query;
b.numFrames;

~ueuu={Limiter.ar(
Splay.ar(
AllpassC.ar(
PitchShift.ar(
LFPulse.ar([5, 2, 3]).cosh *
PlayBuf.ar(2,
b.bufnum,
TRand.ar(0.27, 0.3, Impulse.ar(0.7)).round(0.2, 0.5),
startPos:BufFrames.kr(b.bufnum + TDuty.ar(TRand.ar(0.002, 1, LFPulse.ar(0.4)))),
loop:1),
1,
2,
0,
0.3),
TRand.ar(1e-3, 1.2, SinOsc.ar(0.1)),
TRand.ar(1e-6, 0.1, LFPulse.ar([0.3, 2])),
2),
0.8),
0.7, 0.01)};
)
~ipa=~ueuu;

p.clear(3);

s.record;
s.stopRecording

reproducir muestra

descargar código

24.El DiabloContenton...

//código SuperCollider

s.reboot;

p=ProxySpace.push(s.boot;)

p.fadeTime=10;

s.record;

~aun.play;

(
~tal={Limiter.ar(
FreeVerb.ar(
Splay.ar(Array.fill(
1,
{|i| i=(i+1);
BPF.ar(
SyncSaw.ar(Demand.kr(Dust2.kr(TRand.kr( 0.1, 1, Impulse.kr(2))),
0,
Dswitch1([
Dseq((63..72).midicps* [1.2, 0.5, 1.03, 1].scramble, 3),
Dseq((63..72).midicps*0.2, 4),
Dseq((63..72).midicps * 1.2, 2),
Dseq((63..72).midicps/2.2, 2)], Dxrand((0..3), inf))
), Demand.kr(Dust2.kr(TRand.kr( 0.1, 1, Impulse.kr(2))),
0,
Dseq((63..72).midicps* [2.2, 2.5, 2.03, 2].scramble, 3))),
i + LFPulse.kr([15.2 + LFNoise2.kr(0.2, 5), 5.7, 24 + LFDNoise3.kr(2.2), 2, 0.1]**LFNoise1.kr(0.4)).range(i*2, 70) +
Demand.kr(Dust2.kr(TRand.kr( 4, 14, LFNoise2.kr(22))),
0,
Dser([Dseq((63..72).midicps * [1.2, 0.5, 1.03, 1].scramble, 3),
Dseq((63..72).midicps*0.2, 4),
Dseq((63..72).midicps * 1.2, 2),
Dseq((63..72).midicps/1.2, 2)], inf)
),
i * LFNoise1.kr([0.2, 2.7, 1, 2, 1]*LFNoise2.kr(3.3)).range(0.1, 0.00001),
i * LFNoise1.kr(1.4).range(0.05, 1))})
, 0.8, 1, 0),
0.5, 0.9, 0.1),
0.1, 0.03)
};
)

~aun= ~tal;
NodeProxy.audio(s, 2)

p.clear(4);

s.stopRecording;

reproducir muestra

descargar código

23.MelodISsSTE

//código SuperCollider

s.reboot;

p=ProxySpace.push(s.boot;)

p.fadeTime=7;

~carn.play;

(
~al={Limiter.ar(
FreeVerb.ar(
Splay.ar(Array.fill(
2,
{|i| i=(i+1);
BPF.ar(
BrownNoise.ar(0.6, 1/3),
i * LFNoise0.kr([15.2 * LFDNoise0.kr(0.2, 5), 5.7, 24 * LFDNoise3.kr(2.2), 2, 0.1]**LFNoise1.kr(0.4)).range(i*20, 70) +
Demand.kr(Impulse.kr(TRand.kr( 2, 14, Dust2.kr(2))),0, Dxrand([Dseq("J.S.Bach".ascii.midicps/[1.2, 2.5, 1.03, 1].scramble, 3), Dseq("Haydn".ascii/1.2, 4), Dseq("lachenmaNn".scramble.ascii(2/6), 2), Dseq("Heachamelatamala".scramble.ascii.midicps/1.3)].scramble)),
i * LFNoise1.kr([5.2, 2.7, 13, 2, 1]**LFPulse.kr(0.3)).range(0.001, 0.00001),
i * LFNoise1.kr(1.4).range(0.001, 3))})
, 0.8, 1, 0),
0.3, 0.7, 0.1),
0.5, 0.1)
};
)

(

~carn= ~al;
p.clear(6)

s.record;
s.stopRecording;

reproducir muestra

descargar código

22.PrestameTuPeine

//código SuperCollider

/////No sono así pero asi me gustaría que hubiera sonado....Pa la próxima... se pone bueno /////////eso...ajuits

p=ProxySpace.push(s.boot;)

p.fadeTime=5.3;

~ele.play;

~sele1={Limiter.ar(BPF.ar(WhiteNoise.ar([0.1, 0.2]/LFDNoise0.kr(0.02)* 5), FSinOsc.kr(3.1 **LFPulse.kr([0.1, 0.2]) ), [11.15, 0.01]**LFPulse.kr([0.02, 12, 23, 21]), 1), 0.1, 0.1)}

~sele2={Limiter.ar(PF.ar(WhiteNoise.ar([0.2, 0.1]/LFDNoise0.kr(0.02) * 11), FSinOsc.kr(3.1 ), [11.15, 0.01]**LFPulse.kr([0.02, 12, 23, 21]), 1), 0.1, 0.001)* 4}

~ele=~sele2//+~sele2

p.clear(5);

s.record;
s.stopRecording;

reproducir muestra

descargar código

21.LiveCoding

//código SuperCollider

p=ProxySpace.push(s.boot; s.latency= 0.01;)

p.fadeTime= 4.2;

~alele.play;

~entrele1={Limiter.ar(FreeVerb.ar(BRF.ar(WhiteNoise.ar([0.2, 0.3]/LFDNoise0.kr(0.02) * 2) ,FSinOsc.ar(3.1), 0.02**LFTri.kr([1, 0.1]), 0.2), 0.3, 0.5, 0.001), 0.5, 0.5)};

~entrele2={Limiter.ar(BPF.ar(PinkNoise.ar(0.2**LFDNoise0.kr(12.02) + 500), FSinOsc.ar(3.1)+ LFPulse.kr([3,1.2]/LFNoise0.kr(12.3)).range(150, 2500/2), 0.0002**LFSaw.kr([0.1, 0.2]), 0.2), 0.1, 0.001)};

~entrele3={Limiter.ar(RLPF.ar(GrayNoise.ar([0.2, 0.3]/LFDNoise0.kr(0.02) * 3), FSinOsc.ar(1.1**LFNoise0.kr(12.3, 1/4)).range(47, 80), 0.2, 0.2), 0.2, 0.001)};

~alele= ~entrele2 + ~entrele1 + ~entrele3;

~alele.stop;

p.clear(6);

s.record;
s.stopRecording;

reproducir muestra

descargar código

20.Improv2

//código SuperCollider

s.reboot;

p=ProxySpace.push(s.boot; s.latency=0.01;)

p.fadeTime=13.2;

~salele.play;

~jalele3={Limiter.ar(FreeVerb.ar(RLPF.ar(GrayNoise.ar([0.7, 0.6]**LFTri.kr(12.02) * 500), Dust2.kr(20.1) + LFPulse.kr(23.23/LFDNoise3.kr(13.4)).range(700, 2752), [0.0001, 0.0001]**LFPulse.kr([21.2, 34.1, 0.2]), 1), 0.3, 0.7, 0.01), 0.3, 0.01)};

~salele=~jalele3;

p.clear(4);

s.record;
s.stopRecording;

reproducir muestra

descargar código

19.Impro20

//código SuperCollider

p=ProxySpace.push(s.boot;)

p.fadeTime=13.3;

~salele.play;

~heli={BPF.ar(FreeVerb.ar(FreqShift.ar(BrownNoise.ar([0.1, 0.3]/LFNoise0.kr(4.03/LFDNoise0.kr(4.3)).range(0.3, 1)**LFTri.kr([7.3, 9.1], 0.7/pi, 2, 3/4)), LFPulse.ar(12.43, 0.7/pi* LFNoise0.kr(1), 2, 3/4), 0.4, 0.2), 0.3, 0.7, 0.001), LFDNoise0.kr(4.3/LFTri.kr([3/4, 2/3 ], 1/2)).range(90, 1050), 1.9**SinOsc.kr([0.1, 0.5]), 0.2) * 0.7}

~salele=~heli;

s.record;
s.stopRecording;

reproducir muestra

descargar código

18.ElicopterMan

//código SuperCollider

s.reboot;

(
{var q = {LFNoise0.kr(0.66)**66.6},
freq = {[
LFNoise1.kr(0.666)/66,
LFNoise0.kr(6.66)**16.66,
LFDNoise0.kr(0.0666) + Demand.kr(Impulse.kr(7), 0, Dxrand([100, 66, 170, 180, 90], inf)),
LFDNoise1.kr(66.66)+Demand.kr(Impulse.kr(14), 0, Dxrand([6e2, 5e2, 3e2], inf)),
]};
Limiter.ar(
Compander.ar(
Resonz.ar(
LFSaw.ar([6.6/3, 6.66].midicps)/BrownNoise.kr(4.6)/LFTri.kr([1.4, 1.31]), freq, q + 0.0666, 1/4, 2), q, 0.8, 0.9, 1/5, 0.002, 0.02)
, 0.7, 0.1)/5
!2}.play
)
s.queryAllNodes;
s.sendMsg("/n_free", 1)

s.record;
s.stopRecording;

reproducir muestra

descargar código

17.ElDemonioDelLatas

//código SuperCollider

s.reboot;

(
play{LocalOut.ar(a=
//FreeVerb.ar(
Resonz.ar(
LocalIn.ar(2)
*
0.7
+
LFTri.ar(
[12.02, 6]
+
LFSaw.kr(
5.20
**
FSinOsc.kr(1.4)/4)/130)
**
SyncSaw.kr(
[20.02, 40],
0.8, 1.5
**
LFNoise0.kr(12.3) * 1
/12,
LFSaw.kr([1.2, 2])
),
Demand.kr(Impulse.kr(TRand.kr(0.2, 8, Dust.kr(11.3))), 0, Dxrand([43, 56, 78, 34, 65, 52, 32].scramble.midicps, inf))
, 0.02, 1/2, 1/16)
//, 0.2, 0.5, 1)
);
[a+a].mean/14
}
)


s.record;
s.stopRecording;

s.queryAllNodes;
s.sendMsg("/n_free", 1001);

reproducir muestra

descargar código

16.AúnC

//código SuperCollider

p=ProxySpace.push(s.boot;s.latency=0.01);

p.fadeTime=7.2;

~entrale1={Pluck.ar(Saw.ar([4.3, 5.2]), Dust.kr(TExpRand.ar(4, 8, Impulse.kr(0.1))),20.reciprocal,Demand.kr(Impulse.kr([8.1, 3]), 0, Dxrand([130, 200, 500, 1500, 100], inf)).reciprocal, coef: 0.70343)* 0.01 }

~entrale3={MoogFF.ar(LFSaw.ar([179, 160]*LFNoise0.kr(0.03).range(1, 6), Impulse.kr(8)/LFNoise1.kr(32.2)), Demand.kr(Impulse.kr(8)/LFNoise0.kr(15.2) * 2, 0, Dwhite(80, 500, 500, inf)), 3.9) * 0.1};

~entrale2={Blip.ar([1.07, 1.05] + Demand.kr(Impulse.kr([4.5,4.1]), 0, Dxrand([0.5, 0.02, 0.05, 0.02, 0.5], inf), 15 )) * 0.1}

/LFNoise0.kr(3.2).range(0.0001, 0.5)...Solo pal final...ajuits

~entrale3.free;
~salele.play;
~salele= ~entrale2 + ~entrale3
~salele.clear(5);

s.record;
s.stopRecording;

reproducir muestra

descargar código

15.prepareC

//código SuperCollider

s.boot;
(
~a = NodeProxy(s);
~b = NodeProxy(s);

~out=Ptpar([0.0, Pbind(\type,\set, \id, ~a={|freq=200, dur1=2|x=Pluck.ar(LFTri.ar(1) * LFNoise1.kr(2), Impulse.kr(dur1), freq.reciprocal, freq.reciprocal, 10, coef: LFGauss.kr(3.02, 0.479, 0.879)); FreeVerb.ar(x, LFNoise1.ar(3.3).range(0.3, 0.5), 0.7, 0.01, 25)!2}.play, \freq, Pseq([Pseq("Holaslo".scramble.ascii,2), Pseq("VatoLoco".scramble.ascii * 2,4), Pseq("LaOnda".scramble.ascii * 3,2)], inf), \dur,Prand([1/4, 1/5, 1/2, 1/6, 1/6]/2, inf)),

1.7,

Pbind(\type,\set, \id, ~b={|freq=100|Pan2.ar(VarSaw.kr(LFDNoise1.ar(4).range(0.2, 0.6))*Pluck.ar(GrayNoise.ar(0.1), Dust.kr(3.2), freq.reciprocal, freq.reciprocal, 10, coef: LFGauss.kr(2.02, 0.79, 0.879)),SinOsc.kr(0.02, pi/2, 1, 0.5)) }.play, \freq, Pxrand([Pseq("PAPAYOIS".scramble.ascii,2), Pseq("VatoLoco".scramble.ascii *1.5,4), Pseq("LaOnda".scramble.ascii, 2)], inf), \dur,Prand([1/14, 1/15, 1/12, 1/16, 1/16], inf))

]).play;
)
~out.stop;

~a.free;
~b.free;

 

s.record;
s.stopRecording;

reproducir muestra

descargar código

14.TaBajotuBajo

//código SuperCollider

s.reboot;

Pbind(\type, \set, \id, {|freq, gate |n=FreeVerb.ar(LFTri.kr([2 + LFNoise0.kr(0.2), 1.01]) +VarSaw.ar(freq+[0,1], 0.2, 0.5, 0.1), 0.7, 1, 2) }.play.nodeID ,\midinote, Pxrand([Pseq("J.S.Bach".ascii/[1.2, 2.5, 1.03, 1].scramble, 3), Pseq("Haydn".ascii/1.2, 4), Pseq("lachenmaNn".scramble.ascii(2/6), 2), Pseq("Heachamelatamala".scramble.ascii/1.3)].scramble),\dur,Prand([1/4, 1/5, 1/2, 1/6, 1/6]/2, inf) ).play

s.prepareForRecord;
s.record;
s.stopRecording;

reproducir muestras

descargar código

13.TresEstatements

//código SuperCollider

s.reboot;
(
Ndef('a',{a=SinOsc.ar(Latch.ar(
VarSaw.ar((113)!2),
Impulse.ar([8,12, 1]))+0.1*1e2, PMOsc.ar(LFTri.kr((5)!2) * 2, 100, 2.2*pi, LFNoise1.kr(0.2) ), SinOsc.kr(0.02).range(0.01, 1.5))/7;a= GVerb.ar(a, 1, 0.2)/5; a+a.mean}).play
)

Ndef('a').fadeTime=7.2;
Ndef()

{SinOsc.ar}.play

s.prepareForRecord;
s.record;
s.stopRecording;

reproducir muestra

descargar código

12.Fagyruchis

//código SuperCollider

s.reboot;

Ndef('x').fadeTime=5;
(
Ndef('x',{
x=Ndef('x').ar * 1;
a= x + 0.3 + SinOsc.kr(2.1);
b=VarSaw.kr(12.2, LFNoise0.kr(4.1).range(0.1, 1));
a=HenonL.ar(
Duty.ar(
//SinOsc.kr(14) +
//LFTri.kr(6.1) +
Dseq([14.1, 12.44, 12.7, 14.35], inf),
0,
Dseq([150.01, 600, 750.01, 900], inf)+ x + a + b) + 1e2,
LFNoise0.kr([8.1, 4.01]).range([[0.35, 4],[0.35, 3.25]]),
LFNoise1.kr(0.1).range(0.01,0.34));
a=Splay.ar(a, 1, 0.5, 0.1);
a/a.mean(3.3)}).play
)

Ndef('x').clear;

Para que aloquea otro nodo si es que se pedorrea!!
//{SinOsc.ar *0.2!2}.play//

reproducir muestra

descargar código

11.KaosVs86

//código SuperCollider

s.reboot;

(
Ndef('x',{x=Ndef('x').ar ;a=FreeVerb.ar(Formant.ar(
Saw.ar([1.5, 2.01 ], 0.2, 0.9) +2x+ LFNoise0.ar([2.02, 1.03]).range([120, 1575], [160, 200]) + SinOsc.ar(Demand.kr(Impulse.kr(4), 0, Dseq([1200, 1400, 1400, 1800], inf), 0.5, 5)),
VarSaw.ar([0.2, 0.4, 0.5], Pulse.kr(0.1, 0.3).range(0.1, 4), 1, 4.9),
Duty.ar(
Impulse.kr(3.0/LFNoise0.kr(1.1)), 0, Dseq([0.1, 0.5, 0.7, 0.5], 13))), 0.1, 0.5, 0.1);a/a.mean(-120.9)}).play;
)

s.prepareForRecord;
s.record;
s.stopRecording;

reproducir muestra

descargar código

10.TechnoSoundNdef

//código SuperCollider

s.reboot;

//////////
(
SynthDef(\nathaniel,{|gate 1, out 0, mit 20, groom 10, fNum1 1e3, fNum2 1e3 , blip #[0.1, 0.2], harm 110|
var sig1, sig2, env;

c=LocalBuf(1e2, 2).clear;
b=LocalBuf(1e3, 2).clear;
x= BufDelayN.ar(GVerb.ar(BufRd.ar(2, c, Phasor.ar(0,1, LFTri.ar(12.5).range(0.1, 1), 1e3)) * 0.8, 20, 10), 2.5,1.5, 0.1);
env=EnvGen.kr(Env.asr(0.3, 0.8, 18), gate, doneAction:2);
y=BufWr.ar(Blip.ar([0.1, 0.2], 110)/4 + 2x , c , LFNoise1.ar(0.1) + 5 * MouseX.kr(1e2,1e10, 1));
sig2= BufWr.ar(Blip.ar(blip, harm)/3 + 2x , b , LFNoise1.ar(12.7) + 5 * MouseX.kr(1e2,1e7, 1));
sig1 = GVerb.ar(BufRd.ar(2, b, Phasor.ar(0,1, LFTri.ar(12.5).range(0.1, 1), fNum2)) * 0.8, mit, groom);
Out.ar(out, env * [sig1+sig1].mean);
Out.ar(out, env * [x+x].mean)

}).send(s);
)

x=Synth(\nathaniel);
(
x.set(\gate,0);
b.free;
c.free;
)
x.set(\fNum2, 1e3);
x.set(\blip, [5.2, 7.1]);
x.set(\harm, 10);
x.set(\mit, 0);
x.set(\groom, 0.0);
x.free;

s.queryAllNodes;
s.sendMsg("/n_free", 1002);

reproducir muestra

descargar código

9.GraciasNathaniel

//código SuperCollider

p=ProxySpace.push(s.boot; s.latency=0.01;)

p.fadeTime=5.3;

b=Buffer.read(s, "sounds/Iscream-IceCream.aiff");
b.query;
b.numFrames;

(

~trig1={|frec=1|Dust.kr(frec)};
~trig2={|frec=1|GrayNoise.kr(frec)};
~trig3={|frec=1|LFNoise0.kr(frec)};
~trig4={|frec=1|Impulse.kr(frec)};
~trig5={|frec=1|LFPulse.kr(frec)};

(
~buf1={|rate=0.90|

PlayBuf.ar(1,
b.bufnum,
rate,
[~trig1, ~trig2, ~trig3, ~trig4, ~trig5].scramble.choose,
MouseButton.kr( b.numFrames.rand, b.numFrames.rand),
loop:1) *
LFGauss.kr(0.01, 0.3).range(0.01, 0.8)
// Spring.ar()
// LFNoise1.kr(20.02).range(0.005, 0.5)

};
);
(
~buf2={|rate= 0.93|

PlayBuf.ar(1,
b.bufnum,
LFGauss.kr(31.1, 0.9).range(-0.7, 1),
//rate,
[~trig1, ~trig2, ~trig3, ~trig4, ~trig5].scramble.choose,
MouseButton.kr( b.numFrames.rand, b.numFrames.rand),
loop:1) *
LFGauss.kr(100.05, 10.3).range(0.01, 0.8)
//LFNoise1.kr(18.2).range(0.01, 1)
}
);
(
~buf3={|rate= -0.85|
PlayBuf.ar(1,
b.bufnum,
LFGauss.kr(31.1, 0.9).range(-0.05, 0.8),
//rate,
[~trig1, ~trig2, ~trig3, ~trig4, ~trig5].scramble.choose,
MouseButton.kr( b.numFrames.rand, b.numFrames.rand),
loop:1) *
LFGauss.kr(10.1, 0.3).range(0.001, 0.8)
//LFNoise1.kr(17.2).range(0.01, 0.5)
};
);
(
~buf4={|rate= -0.87|
PlayBuf.ar(1,
b.bufnum,
LFGauss.kr(31.1, 0.3).range(-0.05, 0.8),
// rate,
[~trig1, ~trig2, ~trig3, ~trig4, ~trig5].scramble.choose,
MouseButton.kr( b.numFrames.rand, b.numFrames.rand),
loop:1) *
LFGauss.kr(21.1, 0.3).range(0.05, 0.8)
//LFNoise1.kr(22.7).range(0.01, 0.5)
};
);
(
~buf5={|rate= -0.92|

PlayBuf.ar(1,
b.bufnum,
LFGauss.kr(10.1, 0.3).range(1, 0.8),
//rate,
[~trig1, ~trig2, ~trig3, ~trig4, ~trig5].scramble.choose,
b.numFrames.rand,
loop:1) *
LFGauss.kr(100.1, 10.3).range(0.5, 1)
// LFNoise1.kr(23.01).range(0.01, 0.5)
};
);

~trig1.set(\frec, 13.1);
~trig2.set(\frec,4.08);
~trig3.set(\frec,110.1);
~trig4.set(\frec,40.71);
~trig5.set(\frec, 10.51);
(
~pan={Splay.ar([
~buf1.ar,
~buf2.ar,
~buf3.ar,
~buf4.ar,
// ~buf5.ar
].scramble,
0.8,
1.0.rand,
0.0.rand)}
)
)

~salida.play;
~salida=~pan;
~salida=0;

s.prepareForRecord;
s.record;
s.stopRecording;

reproducir muestra

descargar buffer

Iscream-IceCream

descargar código

8.UnAjuitsForMartina

/código SuperCollider

s.reboot;
p=ProxySpace.push(s.boot; s.latency= 0.01;)

p.fadeTime= 2.5;

~salida.play

b=Buffer.read(s,"sounds/Iscream-IceCream.aiff");
(
Tdef(\pos,{
inf.do{
~entr1= {Rotate2.ar(
PlayBuf.ar(
1, b.bufnum,
BPF.kr(
BrownNoise.kr(0.1).range(0.7, 1.2),
LFPulse.kr(0.01, 0, 0.7, 0.01).range(5000, 12000) * 0.1,
LFGauss.kr(0.01, 0.9, 0.1)).range(0.001, 0.05) +
LFPulse.kr(Demand.kr(Pulse.kr(0.1),
0,
Dxrand([11, 5, 7], inf)),
0.1),
0,
BufFrames.kr(b.bufnum) * rrand(0.0, 1.0),
loop:1) *
LFNoise1.kr(0.2).range(0.05, 0.5),
PlayBuf.ar(
1, b.bufnum,
RHPF.kr(
PinkNoise.kr(0.1).range(0.7, 1),
LFPulse.kr(1.1, 0, 0.7, 0.01).range(5000, 12000) * 0.1,
LFGauss.kr(0.01, 0.9, 0.9)).range(0.001, 0.002) +
LFPulse.kr(Demand.kr(Impulse.kr(0.3),
0,
Dxrand([11, 31, 7], inf)),
0.1),
//0,
//BufFrames.kr(b.bufnum).postln * rrand(0.0, 1.0),
loop:1) *
LFNoise1.kr(0.3).range(0.05, 0.5),
SinOsc.kr(LFPulse.kr([0.05, 0.01])).range([-1, 0.8],[ -0.2, 1]))
};
12.wait;
}
}
)
)
Tdef(\pos).play;

~salida=~entr1;

b.query

~p.clear(3);
b.free;

s.queryAllNodes;
s.sendMsg("/n_free", 1);

reproducir muestra

descargar código

7.I_Scream

//código SuperCollider

p=ProxySpace.push(s.boot; s.latency=0.01;);
p.fadeTime=17.2;

~sale.play;

(
(
a= Array.geom(125, 11.15, 0.21).sin.stutter.abs.scramble.normalizeSum;
b= Array.series(14, 12.3, 0.41).stutter.abs.scramble.normalizeSum;
c= Array.series(27, 11.4, 0.1).reverse.sin.abs.scramble.normalizeSum;
);
(
~salio1={|frec|Demand.ar(
SinOsc.ar(
LFPulse.kr(3.2).range(1.1, 2))
* LFTri.ar(LFNoise0.kr(0.1).range(2480, 4170), SinOsc.kr(10.1).range(0.2, 4), SinOsc.kr(3.7).range(0.6, 1), 0.1),
0,
Dseq( [Drand(a, 1), Dseq(b, 1), Dseq(c, 1)].scramble, inf)
+ Resonz.ar(LFNoise2.ar(5150), BrownNoise.kr(2, LFNoise0.kr(24).range(0, 12.5)).range(5000, 10000), 0.0005, 1)
* SinOsc.kr([0.1, 0.3])
) * LFNoise1.kr(1.7).range(1, 7)};
);

~salio2={|frec= 13545, choos= 4|Demand.ar(SinOsc.ar(frec * 2+ 147.rand) + LFTri.ar(frec/2, SinOsc.kr(0.1).range(0.1, 1), 0.1 , 0.1), 0, Dseq( [Dseq(a, 1), Drand(b, 1), Dseq(c, 1)].scramble, inf)) * 0.2!2};

~salio3={ Compander.ar(Ringz.ar(LFNoise0.ar(10.1, SinOsc.kr([21200, 2130])), SinOsc.kr([LFGauss.kr(50, 10, 2000), FSinOsc.kr(1700)], 0.1, 0.1)), 0.7, 0.07, 0.02, 0.01)!2};

~salio4={ Limiter.ar(Ringz.ar(LFNoise0.ar(1.2, Pulse.kr(11.1) * PinkNoise.kr([7.4, 1.3])), SinOsc.kr([MouseX.kr(130, 5100), FSinOsc.kr(600)], 0.5, 0.1)), 0.3, 0.0001)!2};

~salio={PMOsc.ar( Mix( Array.fill(14,{SinOsc.ar(MouseX.kr(1120, 1500), 2pi.rand, 1)})),~salio2 /*(~salio1 * 22)*/ , MouseY.kr(0, 20), pi, 0.1) }

)

~sale= ~salio2 * ~salio3 //+ ~salio4//~salio1 + ~salio3 + ~salio4 + ~salio2// * (~salio2 + ~salio4) //+ ((~salio3 + ~salio4) * 0.1)//~salio2.set(\frec, 0.011)//
~sale=0;
~p.stop
p.clear(7);

s.queryAllNodes;
s.sendMsg("/n_free", 1);

s.prepareForRecord;
s.record;
s.stopRecording;

reproducir muestra

descargar código

6.ContraDemandandando_ar

//código SuperCollider

p=ProxySpace.push(s.boot; s.latency=0.01);
p.fadeTime=5.5;

~uta.play;

(
~uto={Pan2.ar(BPF.ar(Limiter.ar(Compander.ar(BLowPass4.ar(GrayNoise.ar(0.7), Demand.kr(Dust.kr(2), 0, Dxrand([100, 22, Dseq([200, 1185, 195], 1), 90, 155] + 200,inf)), Demand.kr(Dust.kr(3),0, Dseq([0.0, 0.02], inf))), SinOsc.ar(2300, 0, BLowPass4.ar(GrayNoise.ar(0.7), Demand.kr(Dust.kr(7), 0, Dxrand([100, 22, Dseq([101, 145, 95], 2), 90, 55],inf)), Demand.kr(Dust.kr(3),0, Dseq([0.0, 0.02], inf))), 0.3, 0.1), 0.4, 0.7, 0.5, 0.1), 0.5, 0.01), XLine.kr(20, 1000, 9 ), 0.03, 1 ),SinOsc.kr(3/4).range(0, 1), 1 )};
)

(
~uto2={Pan2.ar(Limiter.ar(Compander.ar(SinOsc.ar(0.1, 0, BLowPass4.ar(GrayNoise.ar(2), Demand.kr(Dust.kr(2), 0, Dxrand([100, 22, Dseq([200, 185, 195], 1), 90, 55] * 200,inf)), Demand.kr(Dust.kr(3),0, Dseq([0.0, 0.02], inf))), 0.3, 0.1), SinOsc.ar(2300, 0, BLowPass4.ar(GrayNoise.ar(0.7), Demand.kr(Dust.kr(7), 0, Dxrand([100, 22, Dseq([101, 145, 95], 2), 90, 55],inf)), Demand.kr(Dust.kr(3),0, Dseq([0.0, 0.02], inf))), 0.3, 0.1), 0.1, MouseY.kr(0.01,1), 0.7, 0.1), 0.1, 0.01), LFNoise0.kr(3/4).range(-0.3, -1), 1)};
)
~verb={FreeVerb.ar(Compander.ar(SinOsc.ar(LFGauss.kr(2).range(2, 9), ~uto, BLowPass4.ar(GrayNoise.ar(0.7), 2000, LFNoise2.kr(2/4).range(0.0, 0.0002)).clip(0.3), 0.1, 0.2, 0.9)), 0.7, 0.6, 0.01)};
)
~p={Pan2.ar(Formant.ar(BrownNoise.kr(17). range(118, 378 * 2), FSinOsc.kr(130, 120), 4, 7), LFNoise2.kr(2))};

~uta= ~uto2 ;

p.clear(8)

s.prepareForRecord;
s.record;
s.stopRecording;

reproducir muestra

descargar código

5.FiltratePorLaBandita

//código SuperCollider

p=ProxySpace.push(s.boot);
p.fadeTime=7;
~sale.play
b = Buffer.alloc(s, 256, 1, { |buf| buf.chebyMsg([1, 0.2, 0.9, 0.7, 1])});

(
~senal={Limiter.ar(Pan2.ar(
Decay.ar(
SinOsc.ar(
RHPF.ar(
LFSaw.ar(123, 1),
LFNoise0.kr(15).range(0.1, 0.15),
0.1),
0.9, 0.9),
0.01, 0.5),
FSinOsc.ar(13))
,0.4, 0.7)

+
( SinOsc.kr(
LFNoise0.kr(14).range(160, 1150),
pi/2,
SinOsc.kr(14)).clip(0.9)

*
FreeVerb.ar(
Shaper.ar(
b,
[
LFSaw.ar(LFNoise2.kr(23).range(12, 245)).distort(0.4),
LFSaw.ar(LFNoise2.kr(17).range(12, 145/2)).distort(0.2)],
0.1),
0.5, 0.1, 0.01))};
)

~sale= ~senal;
~sale=0;

s.queryAllNodes;
s.sendMsg("/n_free", 1016)

 

p.free;
p.clear;
p.pop;

s.prepareForRecord;
s.record;
s.stopRecording;

reproducir muestra

descargar código

HackPact.4

//Sobre un ejemplo del PMOsc [ungen]...

//Utilizo el ProxySpace para jugar con mas libertad pero en realidad no es LiveCoding//
//Aguas por que si pika derrepente gacho...

p=ProxySpace.push(s.boot);

p.fadeTime=4;
~out.play;

~pulso={LFPulse.ar(190.0.rand + 1110.rand, Array.fill(2, Rand(0, 1.0), LFNoise0.kr(5).range(0,1)), 0.01)}
(e = Env.linen(2, [5, 10, 8].choose, [1, 2, 3].choose, 0.1.rand);
~carrier={Mix(
Array.fill(
6,
~pulso
)) * EnvGen.kr(e)
!2}
);
~out=~carrier;
~out=~modula;
~out=~array + ~carrier;
~array={Mix(Array.fill( 20,~modula))}

(e = Env.linen(2, [5, 10, 8].choose, [1, 2, 3].choose, 0.2.rand);

~modula={|t_trig, frec = 1200.0, rand =50, frec1 = 1000.0, rand1 = 20|

EnvGen.ar(e) *
PMOsc.ar(Mix(
Array.fill(
6,
{LFPulse.ar(frec + rand.rand, Array.fill(2, Rand(0, 1.0),
LFNoise0.kr(0.7).range(0,1)), 0.1)}
)
),
Mix(Array.fill(6, frec1 + rand1.rand)),
Line.kr(0.0, 10.0.rand, FSinOsc.kr(0.1)),0 , 0.1)}
);

~modula.xset(\frec,1130.0);
~modula.xset(\rand, 11.0);
~modula.xset(\frec1, 100.0);
~modula.xset(\rand1, 1350.0);

s.prepareForRecord;
s.record;
s.stopRecording;

reproducir muestra

descargar código

Arrayllalos

...comentario del artista:

Esa gente bonita del hackpackt ruego de la manera mas atenta que no escuhen mi segunda participación, digo si les daba la gana escucharla, con audifonos por que si esta medio machinas las alturas de las Frecuentes...

///Sobre una abtracsción de Pd...

Lo Initutolo... "No me salio el ShepardTony...jijuau"

//código SuperCollider

///Counter modulo 10000///

(~counter= 10000;

Tdef(\counter1,{
inf.do{ ~counter % 10000;
~counter = ~counter -2;
if (~counter < 0, {~counter = 10000});
1.do{~counter;
0.03.wait
}
}

})
)
Tdef(\counter1).play;

s.reboot;
(
SynthDef(\shepard1,{|gate 1, out 0 amp 0.5 freq pan 0|
var env, senal, senal2;

senal= SinOsc.ar(freq, 0, amp);
env= EnvGen.kr(Env.asr(0.1, 1, 1), gate, doneAction:2);

Out.ar(out, Pan2.ar(senal2 * env, pan))
}).send(s);
)
x=Synth(\shepard1, addAction:\addToHead);

)
(
Tdef(\bajale,{ Tdef(\counter1).play;

inf.do{
1.do{x.set(\freq, (((~counter.postln % 10000 * 0.0002 -1) * 120) + 60).midicps.postln);
//if()
0.001.wait;};

1.do{x.set(\freq, (((~counter % 10000 + 500 * 0.0002 -1) * 120) + 60).midicps);
0.002.wait;};

1.do{x.set(\freq, (((~counter % 10000 + 1000 * 0.0002 -1) * 120) + 60).midicps);
0.003.wait;};

1.do{x.set(\freq, (((~counter % 10000 + 1500 * 0.0002 -1) * 120) + 60).midicps);
0.004.wait;};

1.do{x.set(\freq, (((~counter % 10000 + 2000 * 0.0002 -1) * 120) + 60).midicps);
0.005.wait;};

1.do{x.set(\freq, (((~counter % 10000 + 2500 * 0.0002 -1) * 120) + 60).midicps);
0.006.wait;};

1.do{x.set(\freq, (((~counter % 10000 + 3000 * 0.0002 -1) * 120) + 60).midicps);
0.007.wait;};

1.do{x.set(\freq, (((~counter % 10000 + 3500 * 0.0002 -1) * 120) + 60).midicps);
0.008.wait;};

1.do{x.set(\freq, (((~counter % 10000 + 4000 * 0.0002 -1) * 120) + 60).midicps);
0.009.wait;};

1.do{x.set(\freq, (((~counter % 10000 + 4500 * 0.0002 -1) * 120) + 60).midicps);
0.001.wait;};

1.do{x.set(\freq, (((~counter % 10000 + 5000 * 0.0002 -1) * 120) + 60).midicps);
0.0011.wait;};

1.do{x.set(\freq, (((~counter % 10000 + 5500 * 0.0002 -1) * 120) + 60).midicps);
0.0012.wait;};
}
})
)
Tdef(\bajale).play
Tdef(\bajale).stop

(((~counter + 1000 * 0.0002) -1 * 120) + 60).midicps

s.prepareForRecord;
s.record;
s.stop;

reproducir muestra

descargar código

MiSherpardDistone

//código SuperCollider

s.boot
(
(
SynthDef(\unoS, { |gate=1, impulso=5, suma=200 amp=0.6, soide=200, indice=4|

var sin, env1, env2, env, pan;

sin= Saw.ar( impulso, 0.1);
//sin= LFSaw.ar( 5, 0.1);
sin= RHPF.ar( sin, MouseX.kr(2, 200, 1), MouseY.kr(0.01, 0.5, 1));
env1= EnvGen.kr( Env.perc( MouseY.kr( 0.01, 0.5), 1), Impulse.kr(5));
sin= SinOsc.ar(sin * soide + MouseX.kr(399, 402, 1), env1);
env2= EnvGen.kr( Env.perc( Impulse.kr( MouseX.kr( 0.1, 10, 1))));
pan= /*LFNoise2.kr( MouseX.kr( 0.5, 7, 1), 0.3);*/
SinOsc.kr(0.1, SinOsc.kr(indice, LFTri.kr(0.5)));
env= EnvGen.kr( Env.asr( 0.3, 1, 2), gate, doneAction:2);

Out.ar( 0, Pan2.ar( sin * env, pan, amp))
}).send(s)
);
(
SynthDef(\dosS, { |gate=1, impulso=5, q=0.01, amp=0.3, cOff=200|

var sin, env1, env2, env, lfn;

sin= Saw.ar(impulso, 0.1);
//sin= LFSaw.ar( 5, 0.1);
sin= RHPF.ar( sin, MouseX.kr(2, cOff, 1), q);
env1= EnvGen.kr( Env.perc( MouseY.kr( 0.01, 0.5), 1), Impulse.kr(5));
sin= SinOsc.ar(sin * MouseX.kr(200, 10000) + MouseY.kr(2, 1000), env1);
env2= EnvGen.kr( Env.perc( Impulse.kr( MouseX.kr( 0.1, 10, 1))));
lfn= LFNoise2.kr( MouseX.kr( 0.5, 7, 1), amp);
env= EnvGen.kr( Env.asr( 0.3, 1, 0.7), gate, doneAction:2);

Out.ar( 0, Pan2.ar( sin * env, env2, lfn))
}).send(s)
);
(
SynthDef(\tresS, { |gate=1, impulso=15, suma=200, amp=0.3, freq=0.5, cOff=220|

var sin, env1, env2, env, lfn;

sin= Saw.ar( impulso, 0.1);
//sin= LFSaw.ar( 5, 0.1);
sin= RHPF.ar( sin, MouseX.kr(2, cOff, 1), MouseY.kr(0.01, 0.5, 1));
env1= EnvGen.kr( Env.perc( MouseY.kr( 0.01, 0.5), 1), Impulse.kr(5));
sin= SinOsc.ar(sin * 10000, env1, SinOsc.kr(MouseY.kr(2, 200)));
env2= EnvGen.kr( Env.perc( Impulse.kr( MouseX.kr( 0.1, 10, 1))));
lfn= LFNoise2.kr( MouseX.kr( freq, 7, 1), amp);
env= EnvGen.kr( Env.asr( 0.3, 1, 2), gate, doneAction:2);

Out.ar( 0, Pan2.ar( sin * env, env2, lfn))
}).send(s)
);
(
SynthDef(\cuatroS, { |gate=1, impulso2=5 impulso=5, suma=200, q=0.1, amp=0.3|

var sin, env1, env2, env, lfn;

//sin= Saw.ar( impulso, 0.1);
sin= LFSaw.ar( impulso, 0.1);
sin= RHPF.ar( sin, MouseX.kr(2, suma, 1), q);
env1= EnvGen.kr( Env.perc( MouseY.kr( 0.01, 0.5), 1), Impulse.kr(impulso2));
sin= SinOsc.ar(sin * 2000, env1);
env2= EnvGen.kr( Env.perc( Impulse.kr( MouseX.kr( 0.1, 10, 1))));
lfn= LFNoise2.kr( MouseX.kr( 0.5, 7, 1), amp);
env= EnvGen.kr( Env.asr( 0.3, 1, 2), gate, doneAction:2);

Out.ar( 0, Pan2.ar( sin * env, env2, lfn, lfn))
}).send(s)
);

(
SynthDef(\cincoS, { |gate=1, impulso=20 cOff= 2, q= 0.01, amp= 0.3, impulso2=100|

var sin, env1, env2, env, lfn;

sin= Saw.ar( impulso, 0.1);
//sin= LFSaw.ar( 5, 0.1);
sin= RHPF.ar( sin, cOff, q);
sin= SinOsc.ar(sin * MouseX.kr(0.5, 10000) + 1000, SinOsc.kr(impulso2));
lfn= LFNoise2.kr( MouseX.kr( 0.5, 7, 1), amp);
env= EnvGen.kr( Env.asr( 0.3, 1, 2), gate, doneAction:2);

Out.ar( 0, Pan2.ar( sin * env, lfn, lfn))
}).send(s)
);

(
SynthDef(\seisS, { |gate=1, impulso=5, suma=200, q=0.1, amp=0.3, impulso2=5, indice=4|

var sin, env1, env2, env, lfn;

sin= Saw.ar( impulso, 0.1);
//sin= LFSaw.ar( 5, 0.1);
sin= RHPF.ar( sin, MouseX.kr(2, suma, 1), MouseY.kr(0.01, 0.5, 1));
env1= EnvGen.kr( Env.perc( MouseY.kr( 0.01, 0.5), 1), Impulse.kr(impulso2));
sin= SinOsc.ar(sin * 1000, env1);
env2=LFTri.kr(0.1, SinOsc.kr(indice, LFTri.kr(indice)));
lfn= LFNoise2.kr( MouseX.kr( 0.5, 7, 1), amp);
env= EnvGen.kr( Env.asr( 0.3, 1, 2), gate, doneAction:2);
Out.ar( 0, Pan2.ar( sin * env, env2, lfn))
}).send(s)
)
)
t=Synth(\unoS);
t.set(\impulso, 1.1, \amp, 0.1, \soide, 1450, \indice, 10)
t.set(\gate, 0);

u=Synth(\dosS);
u.set(\impulso, 0.3, \amp, 0.09, \cOff, 50, \q, 0.005);
u.set(\gate, 0);

v=Synth(\tresS);
v.set(\impulso, 0.2, \amp, 0.6, \freq, 110, \cOff, 50000);
v.set(\gate, 0);

x=Synth(\cuatroS);
x.set(\impulso,1114, \amp, 0.09, \impulso2, 3, \q, 0.5, \suma, 1140);
x.set(\gate, 0);

y=Synth(\cincoS);
y.set(\impulso, 3, \amp, 0.1, \impulso2, 0.03, \cOff, 0.0001);
y.set(\gate, 0);

z=Synth(\seisS);
z.set(\impulso, 0.5, \amp, 0.70, \suma, 1730, \impulso2, 3, \indice, 0.5 );
z.set(\gate, 0);

s.prepareForRecord;
s.record;
s.stop;

reproducir muestra 01

reproducir muestra 02

descargar código

Sodi_Hackpact01