Tenemos como primera parte 7 tareas y un parcial sobre 3 que da 10. Ya todos debn tener sus notas.
COmo segunda parte 4 tareas:
Hacer una partitura para el SynthDef "cebolla" 1pto,
hacer un synth def de un código dado 3 ptos y esto no lo ha hecho nadie
Pbind 1 3pts para este viernes
Pbind 2 3ptos para este viernes
Eso es un gran total de 20 ptos/4 =5
A trabajar!!
Este comentario ha sido eliminado por el autor.
ResponderSuprimirEste comentario ha sido eliminado por el autor.
ResponderSuprimirEste comentario ha sido eliminado por el autor.
ResponderSuprimirIsarela, repitela diferenciandola CONSIEDRABLEMENTE DE LA TAREA DE mireles, posteado anoche
ResponderSuprimirTarea Final Pbind 2
(SynthDef(\piano,{|altos,vol,mover|
var quiero,han;
han = EnvGen.ar(Env.perc,doneAction:2);
quiero =SinOsc.ar(altos,0,vol);
quiero =Pan2.ar(quiero*han,mover);
Out.ar(0,quiero)}).store
)
(Pbind(\instrument,\piano,
\altos,Prand([600,900,400],inf),
\vol,Pshuf([0.9,0.6,0.4],inf),
\mover,Pwhite(-1,1),
\dur,Pseq([1,0.5,0.3],inf)).play
)
Aqui esta profe, la primera parte de la ultima tarea,
ResponderSuprimirIsrael Di Barros.
(
SynthDef(\isr,{|pane,freq,tiem,vol |
var nm,fr,mv,env;
env = EnvGen.ar(Env.sine(vol));
nm = XLine.ar(10,70,tiem);
fr = SinOsc.ar(Blip.ar(freq,150,1200),0,Blip.ar(nm,10,0.2),0.3);
mv =Pan2.ar(fr*env, SinOsc.kr(pane));
Out.ar(0,mv)}).store
)
(
Pbind(\instrument,\isr,
\pane,0.3,
\freq,10,
\tiem,Pseq([7,5,1],inf),
\vol,Pseq([7,5,1],inf),
\dur,Pseq([7,5,1],inf)).play)
2da parte, Israel Di Barros...
ResponderSuprimir(
SynthDef(\isr,{|pane,freq,tiem,vol |
var nm,fr,mv,env;
env = EnvGen.ar(Env.sine(vol));
nm = XLine.ar(10,70,tiem);
fr = SinOsc.ar(Blip.ar(freq,150,1200),0,Blip.ar(nm,10,0.2),0.3);
mv =Pan2.ar(fr*env, SinOsc.kr(pane));
Out.ar(0,mv)}).store
)
(
Pbind(\instrument,\isr,
\pane,Pwhite(-1,1),
\freq,Prand([800,900,300],inf),
\tiem,Pseq([7,5,1],inf),
\vol,Pshuf([0.8,0.6,0.9],inf),
\dur,Pseq([7,5,1],inf)).play)
hola profesora aqui le dejos mis ultimas tareas.. saludos
ResponderSuprimirtarea SynthDef
(
SynthDef(\mt,{|ayer,hoy,tiem,mañana|
var linea,todo,moviendose;
linea =XLine.ar(altura=10,armonicos=70,volumen=7);
todo =SinOsc.ar(Saw.ar(10,100,ayer),0,Blip.ar(linea,mañana));
moviendose =Pan2.ar(todo, SinOsc.kr(3),mañana));
Out.ar(0,moviendose)}).store
)
tarea Synth Pbin
Synth Pbin:
(Pbind(\midinote,Prand([150,165,170,147,166,100,80,40,50],inf),\dur,0.6).play)
{Saw.ar((100,0,200,2300),0.5)}.scope
(Pbind(\instrument,\cool,
\armonicos,Prand([9.2,25,3.9],inf),
\altura,Prand([200,70,130],inf),
\volumen,0.3,
\paneo,Pwhite(-1.0,1.0),
\dur,Prand([1,3,0.5],inf)).play
)
Profe aqui estan las 2 ultimas tareas
ResponderSuprimir*(
Pbind(\instrument,\rise,
\vol,Pshuf([0.7,0.8,0.9],inf),
\pane,Pwhite(-1,1),
\tiem,Pseq([8,4,3],inf),
\freq,Prand([700,850,200],inf),
\dur,Pseq([6,5,3],inf)).play)
*(
Pbind(\instrument,\rise,
\vol,Pshuf([0.5,0.6,0.7],inf),
\pane,Pwhite(-1,1),
\tiem,Pseq([6,3,2],inf),
\freq,Prand([900,750,350],inf),
\dur,Pseq([5,6,5],inf)).play)
hola profe como esta? aqui le dejo mi tarea final de pbind.. gracias
ResponderSuprimir(Pbind(\midinote,Prand([20,35,60,66,70,90,100,110,100,120],inf),
\dur,0.9, Prand([10,20,30],inf)).scope)
(Pbind(\instrument,\rise,
\vol,Pshuf([0.9,0.6,0.9],inf),
\tiem,Pseq([5,4,2],inf),
\pane,Pwhite(-1,1),
\freq,Prand([600,700,500],inf),
\dur,Pseq([6,6,7],inf)).play)