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;