[ _ rrr ]

(
SynthDef(\nois4,{|gate=1|
   var sen,env;
     sen=Pan2.ar(Latoocarfian2DL.ar(SampleRate.ir/4,SampleRate.ir/13,TRand.ar(0.13,5.45,Impulse.ar(10)),1.3,0.5)*0.04)*1.2;
         env=EnvGen.kr(Env.asr(0,1,0),gate,doneAction:2);
              Out.ar(0,sen*env)
              }).send(s)
              );
            
              
              
              
(
SynthDef(\nois5,{|gate=1|
   var sen,env;
     sen=Pan2.ar(Gbman2DC.ar(1670, 2160,1,2.002, 0.2)*0.44)*1.8;
         env=EnvGen.kr(Env.asr(0,1,0),gate,doneAction:2);
              Out.ar(0,sen*env)
              }).send(s)
              );
         
              
              
(
SynthDef(\nois5a,{|gate=1|
   var sen,env;
     sen=Pan2.ar(Gbman2DN.ar(20, 168,5,2.0002, 0.2),0,0.4)*1.8;
         env=EnvGen.kr(Env.asr(0,1,0),gate,doneAction:2);
              Out.ar(0,sen*env)
              }).send(s)
              );
              
      
              
              
              
(
SynthDef(\nois6,{|gate=1|
   var sen,env;
     sen=Pan2.ar(Fhn2DN.ar(110, 22050, TExpRand.kr(0.001, 0.2, Dust.kr(5)), TExpRand.kr(0.001, 0.2, Dust.kr(13)), TRand.kr(0.1, 0.4, Dust.kr(5)),TRand.kr(0.1, 1.9, Dust.kr(3)), 0.4),LFNoise2.kr(2),0.19)*1.4;
         env=EnvGen.kr(Env.asr(0,1,0),gate,doneAction:2);
              Out.ar(0,sen*env)
              }).send(s)
              );

(
SynthDef(\nois7,{|gate=1|
   var sen,env;
     sen=Pan2.ar(Standard2DN.ar(25, 7200, MouseX.kr(0.1,4), mul:0.01) )*2.8;
         env=EnvGen.kr(Env.asr(0,1,0),gate,doneAction:2);
              Out.ar(0,sen*env)
              }).send(s)
              )

////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

(
SynthDef(\bass,{|noiseDur=0.0008,sineDur=0.1,mul=0.3803|
           var noise, sine;
           noise=WhiteNoise.ar;
           noise=LPF.ar(noise,XLine.ar(1000,0.6,noiseDur),0.011);
           sine=SinOsc.ar(XLine.ar(LFNoise2.kr(10,60,200),20,sineDur),0,0.15);
           Out.ar(0,(sine+noise*4).distort!2*EnvGen.ar(Env.perc(0,0.3),doneAction:2)*mul)
           }).send(s)
           );

(
SynthDef(\tarola,{ |mul=0.53|
    var env,noise,osc,i=0.008,f=0.94,out,freqs;
		env=Env([ 1, 0, 1, 0, 0.9,0.36, 0 ], [  i, i, i, i, 0.25, 1 ], 
				  [ 0, 0, 0, 0, 0, 0, -2.79 ], nil, nil);
					osc=LFTri.ar(734*f)+LFTri.ar(817*f) /2 * 0.22;
		     freqs={exprand(230,5200)}.dup(50);
		 out = BPF.ar(WhiteNoise.ar(5),freqs,0.3).mean + LPF.ar(WhiteNoise.ar(0.2),XLine.kr(22000,1))+osc* 
		EnvGen.ar(env,timeScale:0.24,doneAction:2) * 0.4 *mul;
		  Out.ar(0,out!2)}).send(s);
		);

(
SynthDef(\hihat, {
arg freq=440, gate=1, amp=0.0613, source, pan = 0.0,dec=0.1 ;
source = Pan2.ar(BPF.ar(LFPulse.ar(BPF.ar(WhiteNoise.ar(5),1200,0.1).distort * 8000 + 6600, 0.2),7000,1) * EnvGen.kr(Env.perc(0.01, dec, 1, -6), doneAction:2),0)*amp;
Out.ar(0, source);

}).send(s)
);

(
SynthDef(\tambor,{|gate=1, rel1=0.12, rel2=0.183, amp=0.7|
var filtWhite = LPF.ar(WhiteNoise.ar(1), 7040, 1),sen;
sen=((SinOsc.ar(330,0,0.25) * EnvGen.ar(Env.perc(0.0005,0.055), gate))
			+(SinOsc.ar(185,0,0.25) * EnvGen.ar(Env.perc(0.0005,0.075), gate))
			+(filtWhite * EnvGen.ar(Env.perc(0.0005,rel1), gate) * 0.2)
			+(HPF.ar(filtWhite, 523, 1) * EnvGen.ar(Env.perc(0.0005,rel2), gate) * 0.2)
			) * amp;
			DetectSilence.ar(sen,doneAction:2);
			//sen=Pan2.ar(sen.wrap2(0.6701234),0);
			sen=Pan2.ar(sen,0);
			Out.ar(0,sen)
			}).send(s)

(
t.run(false);
Pdef(\ko).quant_(0).play;
v=1;
m=1;
c=1;
p=1;
u=1
)
(
Tdef(\fhjd).stop;t.run(false);
~out=0;
Pdef(\ko).stop 
)

0.58*~amplitud	
(
Tdef(\fhjd,{var reloj=0;
      inf.do{
        switch(reloj%4,0,{Synth(\bass,[\mul,0.58*v]);Synth(\hihat,[\dec,0.1.rand,\amp,0.063*m])},
         1,{Synth(\bass,[\mul,0.2*v]);Synth(\hihat,[\dec,0.1.rand,\amp,0.063*m]);Synth(\tambor,[\amp,0.7*c])},
         2,{Synth(\tarola,[\mul,0.53*p]);Synth(\hihat,[\dec,0.1.rand,\amp,0.063*m])},
         3,{Synth(\hihat,[\dec,0.2,\amp,0.063*m]);Synth(\tambor,[\amp,0.7*c])}
           	    );
           		 reloj=reloj+1;
            				0.132.wait
            				}}
            				)
            				 ) 
            				            				
            Synth(\chiubaca, [\dur, 0.132*16]); 
            Tdef(\fhjd).quant_(0).play				
          Pdef(\ko).quant_(0).play;

x={ReplaceOut.ar(0,Resonz.ar(In.ar(0,2),MouseX.kr(100,10000),MouseY.kr(0.1,1.0))*2.5)}.play
x={ReplaceOut.ar(0,CombN.ar(In.ar(0,2),0.2,MouseX.kr(0.015,0.05),0.9)*0.9)}.play
x.run(false) 
x={ReplaceOut.ar(0,In.ar(0,2).round(MouseX.kr(0.01,0.1)))}.play
   </strong></font> </center> </marquee></div>

( k=Buffer.read(s,"sounds/queja Concentrado.wav"); z=Buffer.read(s,"sounds/tecno8.wav"); l=Buffer.read(s,"sounds/concentrado B voz.wav") ) ( ( SynthDef("perc1",{arg amp,frec; Out.ar(0,(HenonL.ar(frec*[0.99,1.01],TRand.ar(0.09,0.8,Impulse.ar(30)),LFNoise2.kr(0.25, 0.15, 0.15),mul:0.082) excess: SinOsc.ar(5,0.06,0.7))*EnvGen.ar(Env.perc(0.0,0.8,1,6),doneAction:2)*amp)}).store; ); ( SynthDef("perc2",{arg amp; Out.ar(0,(Blip.ar(Lag.ar(TExpRand.ar(30,12023,Impulse.ar([20,18])),0.02),4,mul:0.095)excess: SinOsc.ar(XLine.kr(24,LFNoise2.ar(4,16,6),0.4),0,0.6))*EnvGen.ar(Env.perc(0.0,0.1,1,6),doneAction:2)*amp)}).store; ); ( Pdef(\rtrttrrr, Pbind(\instrument,\perc1, \dur,Prand([3,0.4,2,1.2],inf), \frec,Pseq([130,12032,18293,15000,10230,9032,13023],inf), \amp,Pwhite(0,0.98)*1.9)

boton5=SCButton(ventana,Rect(370,30,80,30)); boton5.states=[["crak",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton5.action={|n| if(n.value==1,{d=Synth(\crack)});if(n.value==0,{d.set(\gate,0)})}; boton6=SCButton(ventana,Rect(465,30,80,30)); boton6.states=[["sen",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton6.action={|n| if(n.value==1,{Tdef(\bajo).play;i=Synth(\senoide)}); if(n.value==0,{Tdef(\bajo). boton8=SCButton(ventana,Rect(665,30,80,30)); boton8.states=[["band pass",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton8.action={|n| if(n.value==1,{x={ReplaceOut.ar(0,Resonz.ar(In.ar(0,2), MouseX.kr(100,10000),MouseY.kr(0.1,1.0))*2.5)}.play}); if(n.value==0,{x.run(false) })};

align="centre"> stop;i.set(\gate,0)})}; boton7=SCButton(ventana,Rect(565,30,80,30)); boton7.states=[["atari",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton7.action={|n| if(n.value==1,{Pdef(\ko).play}); if(n.value==0,{Pdef(\ko).stop})}; align="left"> rr s.latency=0.05 s.boot //// )); ( Pdef(\4444444444444444, Pbind(\instrument,\perc2, \dur,Prand([1,5,0.2,0.1,0.7,3],inf), \amp,Pwhite(0,0.8)*1.8)) ); ( SynthDef(\atari,{|out=0,ton1=3,ton2=10,frec1=3,frec2=23,rate=1,amp=0.4,gate=1| var sen, env; env=EnvGen.kr(Env.asr(0.01,amp,0.02),gate,doneAction:2); sen=Atari2600.ar(ton1,ton2,frec1,frec2,14,14,rate); sen=sen+LPF.ar(sen,1000,0.9); Out.ar(out,Pan2.ar(sen*env,0,0.9)) }).store ); SynthDef(\del, { arg freq=1990, gate=1, amp=0.20, source, osc, env1, pan = 0.0, fmratio = 1.5 ; env1 = EnvGen.kr(Env.perc(0.0001, 0.1, 1, -6), gate, 1, 0); osc = Pan2.ar( SinOsc.ar(SinOsc.ar(freq*2, 0, env1*9000+2000, freq), 0.51, amp), pan ) * env1; source = osc + AllpassN.ar(AllpassN.ar(osc, 1, ExpRand(0.02,0.3), 2), 1, ExpRand(0.02,0.3), 2) * Line.kr(1,0,1.5, doneAction:2); Out.ar(0, source); }).store ); ( Pdef(\yu, Pbind(\instrument,\del, \dur,Prand([3,5,2,0.2,0.5,0.3],inf), \freq,Prand([1200,4000,6200,7500,16540,10032,9430,400],inf) )) ); ( SynthDef(\clock, { arg freq=7440, gate=1, amp=0.03, source, env1, pan = 0.0, fmratio = 0.5 ; env1 = EnvGen.kr(Env.perc(0.0001, 0.018, 1, 10), gate, 1, 0, doneAction:2); source = Pan2.ar( HPF.ar(SinOsc.ar(SinOsc.ar(freq*fmratio, 0, env1*2000 + 5000, freq), 0.51, amp), 3000), pan ) * env1; Out.ar(0, source); }).store ); boton9=SCButton(ventana,Rect(765,30,80,30)); boton9.states=[["comb",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton9.action={|n| if(n.value==1,{x={ReplaceOut.ar(0,CombN.ar(In.ar(0,2),0.2,MouseX.kr(0.015,0.05),0.9)*0.9)}.play}); if(n.value==0,{x.run(false) })}; boton9=SCButton(ventana,Rect(10,80,80,30)); boton9.states=[["sample",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton9.action={|n| if(n.value==1,{r=Synth(\sample)}); if(n.value==0,{r.set(\gate,0)}); boton10.valueAction=0; boton11.valueAction=0; boton12.valueAction=0}; boton10=SCButton(ventana,Rect(100,80,80,30)); boton10.states=[["voz/bat",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton10.action={|n| if(n.value==1,{x=Synth(\sample2);Tdef(\rrr).play}); if(n.value==0,{x.set(\gate,0);Tdef(\rrr).stop}); boton9.valueAction=0; boton11.valueAction=0; boton12.valueAction=0}; ------.-.--.-...-.-.- boton5=SCButton(ventana,Rect(370,30,80,30)); boton5.states=[["crak",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton5.action={|n| if(n.value==1,{d=Synth(\crack)}); if(n.value==0,{d.set(\gate,0)})}; boton6=SCButton(ventana,Rect(465,30,80,30)); boton6.states=[["sen",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton6.action={|n| if(n.value==1,{Tdef(\bajo).play;i=Synth(\senoide)}); if(n.value==0,{Tdef(\bajo).stop;i.set(\gate,0)})}; boton7=SCButton(ventana,Rect(565,30,80,30)); boton7.states=[["atari",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton7.action={|n| if(n.value==1,{Pdef(\ko).play}); if(n.value==0,{Pdef(\ko).stop})}; boton8=SCButton(ventana,Rect(665,30,80,30)); boton8.states=[["band pass",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton8.action={|n| if(n.value==1,{x={ReplaceOut.ar(0,Resonz.ar(In.ar(0,2), MouseX.kr(100,10000),MouseY.kr(0.1,1.0))*2.5)}.play}); if(n.value==0,{x.run(false) })}; ( Pdef(\go, Pbind(\instrument,\clock, \dur,Pwrand([0.02,0.03,2.818,0.2],[0.4,0.4,0.1,0.1],inf), \freq,Pseq([140,150,120,6075,3400],inf), \amp,Prand([0,0.128,0],inf) )) ) ( var ventana,boton,boton2,boton3,boton4,boton5,boton6,boton7,boton8,boton9; var boton10,boton11,boton12,boton13; var boton14,boton15,boton16,boton17; ventana=SCWindow("--------", Rect(40,700,900,200)); boton=SCButton(ventana,Rect(10,30,80,30)); boton.states=[["hennon",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton.action={|n| if(n.value==1,{Pdef(\rrrrrrrr).play}); if(n.value==0,{Pdef(\rrrr).stop})}; boton2=SCButton(ventana,Rect(100,30,80,30)); boton2.states=[["blip",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton2.action={|n| if(n.value==1,{Pdef(\rrrrrr).play}); if(n.value==0,{Pdef(\rrr).stop})}; boton3=SCButton(ventana,Rect(190,30,80,30)); boton3.states=[["del",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton3.action={|n| if(n.value==1,{Pdef(\yu).play}); if(n.value==0,{Pdef(\yu).stop})}; boton4=SCButton(ventana,Rect(280,30,80,30)); boton4.states=[["micro",Color.yellow,Color.black],["@@@@@@",Color.white,Color.black]]; boton4.action={|n| if(n.value==1,{Pdef(\go).play}); if(n.value==0,{Pdef(\go).stop})};
[/_rrr]

rrr_/ rr.r_ /rrr -rrr] .find _rr/

01010100000011010101010100011111110101010101 1010101010101 10010101010100000001101001010101010011