29 junio, 2009

Codigo, Sintetizador, Pbind (Ella)

/*Paso 1, hacer el código*/

(

{var linea,todo;

linea = XLine.ar(10,70,1);

todo = SinOsc.ar(Saw.ar(10,100,1000),0,Blip.ar(linea,10,0.2),0.5);

 Pan2.ar(todo, SinOsc.kr(3))}.scope

    )


/*Paso 2, hacer el Sintetizador, lo central es sustituir numeros, que son los argumentos, por nombres. Estos numeors los vamos a mover desde el Pbind, compara el codigo original con el sinte de abajo, si está bien te debe decir: "a SynthDef" */

(

SynthDef(\ella,{|paneo,freqS,tiem,vol |

var linea,todo,mov,env;

env = EnvGen.ar(Env.sine(vol));

linea = XLine.ar(10,70,tiem);

todo = SinOsc.ar(Saw.ar(freqS,100,1000),0,Blip.ar(linea,10,0.2),0.5);

 mov =Pan2.ar(todo*env, SinOsc.kr(paneo));

 Out.ar(0,mov)}).store

 )

/* Paso 3, montarlo en un Pbind, donde le mueves los argumentos, aquí lo mejor es sustituir los rrand y .rand por Prand, o cualquiera de sus equivalentes. Pseq es una secuencia de números por los que va desfilando en el caso inferior infinitamente*/

 

 (

 Pbind(\instrument,\ella,

  \paneo,0.3,

  \freqS,10,

  \tiem,Pseq([7,5,1],inf),

  \vol,Pseq([7,5,1],inf),

  \dur,Pseq([7,5,1],inf)).play)

 

/* Para ver los diferentes tipos de Patrones (P) ve otra entrada del blog

*/ 

 

 


 

 

 

 

0 comentarios:

Publicar un comentario en la entrada

Nota: solo los miembros de este blog pueden publicar comentarios.