Hacer un sonido que dure 20 segs, donde ocurran cambios consistentes en intensidad en los primeros 10 segs y en freq u otro parámetro en los últimos 10.
Prueben incluyendo
WhiteNoise.ar
PinkNoise.ar
BrownNoise.ar
Recuerden que hay una gran diversidad en Envelopes. Pongan Env, lo escogen y le dan F1 y verán, aparte del Env que pueden ustedes crear paso a paso existen una diversidad de Env ya prediseñados
Env.linen(1, 2, 3, 0.6).test.plot;
Env.linen(0.1, 0.2, 0.1, 0.6).test.plot;
Env.linen(1, 2, 3, 0.6, 'sine').test.plot;
Env.linen(1, 2, 3, 0.6, 'welch').test.plot;
Env.linen(1, 2, 3, 0.6, -3).test.plot;
Env.linen(1, 2, 3, 0.6, -3).test.plot;
Env.triangle(1, 1).test.plot;
Env.sine(1,1).test.plot;
Env.perc(0.05, 1, 1, -4).test.plot;
Env.perc(0.001, 1, 1, -4).test.plot; // sharper attack
Env.perc(0.001, 1, 1, -8).test.plot; // change curvature
Env.perc(1, 0.01, 1, 4).test.plot; // reverse envelope
15 mayo, 2009
Suscribirse a:
Enviar comentarios (Atom)
Saludos prof, Aqui dejo la tarea un poco sencilla!!
ResponderSuprimir({SinOsc.ar(EnvGen.ar(Env.new([500,10, 6000,400, 40],[1, 6, 2, 5])),0,EnvGen.ar(Env.new([1,10, 0,500, 100],[1, 0.3, 1, 0.5])))}.play) //Variacion de Frecuencia e intensidad
Envolvente estero para intensidad y frecuencia.
ResponderSuprimir{SinOsc.ar([(EnvGen.ar(Env.
new([100,1000,500,2000,40], [2,3,4,2],'linear'))),
(EnvGen.ar(Env.new([100,1000,500,2000,40], [2,3,4,2],'linear')))],0,
EnvGen.ar(Env.new([0,0.5,0.3,1,0], [4,4,4,4],'sine')))}.scope
Intento de intento de intento de imitacion de cancion =P
{SinOsc.ar([(EnvGen.ar(Env.new([0,145,0,180,0,145,0,180,0,145,0,180,150,0,145,0,180,0],
[0.25,0.12,0.25,0.36,0.24,0.25,0.24,0.23,0.25,0.12,0.24,0.22,0.12,0.25,0.23,0.24],'step'))),
(EnvGen.ar(Env.new([0,145,0,180,0,145,0,180,0,145,0,180,150,0,145,0,180,0],
[0.25,0.12,0.25,0.36,0.24,0.25,0.24,0.23,0.25,0.12,0.24,0.22,0.12,0.25,0.23,0.24],'step')))],
0,1)}.play
Este comentario ha sido eliminado por el autor.
ResponderSuprimirJohan, sigues con los parámetros volteados, 10 no te sirve para intensidad (mul), que llega solo hasta 1.
ResponderSuprimirAndros, ya que tienes un envelope para cada canal podrías probar hacerlos diferentes!!!
ResponderSuprimirUnas cuantas pruebas de la tarea 2
ResponderSuprimir{SinOsc.ar(EnvGen.ar(Env.new([400,900, 200, 250, 40],[9, 1, 7, 3])),0,0.3)}.play //prueba frecuencia
{SinOsc.ar(555,0,mul:[0.1,0.5])*EnvGen.ar(Env.new([0,1, 0.3, 0.8, 0], [5, 6, 4, 5],-3))}.play //prueba intensidad
{SinOsc.ar(EnvGen.ar(Env.new([100,1000, 500, 8000, 40],[10, 5, 2.5, 2.5]),0,mul:[0.1,0.8])*EnvGen.ar(Env.new([0,1, 0.3, 1.5, 0], [5, 5, 6, 4],-3)))}.play //motor
{SinOsc.ar(EnvGen.ar(Env.new([100,1000, 500, 8000, 40],[5, 4, 6, 5])),0,0.3)}.play //pito
{WhiteNoise.ar(555,0,mul:[0.1,0.5])*EnvGen.ar(Env.new([0,1, 0.3, 0.8, 0], [5, 6, 4, 5],-3))}.play //ruido oscilante
{Blip.ar(555,0,mul:[0.1,0.5])*EnvGen.ar(Env.new([0,1, 0.3, 0.8, 0], [5, 6, 4, 5],-3))}.play // blip
{Saw.ar(555,0,mul:[0.1,0.5])*EnvGen.ar(Env.new([0,1, 0.3, 0.8, 0], [5, 6, 4, 5],-3))}.play // sierra
{BrownNoise.ar(EnvGen.ar(Env.new([100,1000, 500, 8000, 40],[10, 5, 2.5, 2.5]),0,mul:[0.1,0.8])*EnvGen.ar(Env.new([0,1, 0.3, 1.5, 0], [5, 5, 6, 4],-3)))}.play
{Saw.ar(EnvGen.ar(Env.new([100,1000, 500, 8000, 40],[10, 5, 2.5, 2.5]),0,mul:[0.1,0.8])*EnvGen.ar(Env.new([0,1, 0.3, 1.5, 0], [5, 5, 6, 4],-3)))}.play //moto
{Blip.ar(EnvGen.ar(Env.new([100,1000, 500, 8000, 40],[10, 5, 2.5, 2.5]),0,mul:[0.1,0.8])*EnvGen.ar(Env.new([0,1, 0.3, 1.5, 0], [5, 5, 6, 4],-3)))}.play //
{PinkNoise.ar(EnvGen.ar(Env.new([100,1000, 500, 8000, 40],[10, 5, 2.5, 2.5]),0,mul:[0.1,0.2])*EnvGen.ar(Env.new([0,0.5, 0.1, 0.5, 0], [5, 5, 6, 4],-3)))}.play //ni lo escuchen
aja prof aqui logré acomodar la tarea! ahora si esta perceft!! gracias!!
ResponderSuprimir({SinOsc.ar(EnvGen.ar(Env.new([500,10, 6000,400, 40],[2, 6, 2])),0,EnvGen.ar(Env.new([0.6,0.6,0.8,0.3,0.4],[10, 2, 5, 3])))}.play) //Variacion de Frecuencia e intensidad
{SinOsc.ar(EnvGen.ar(Env.new([400,600,500,1200
ResponderSuprimir,600,1800,700,2400,800,3000,900,3600,40,1260,
2000,100,200,40],[0.5,0.6,0.5,0.6,0.5,0.6
,0.5,0.6,0.5,0.6,0.5,2,5,5,3,7,2])),0,0.9)}.play
Respuesta para Domller,
ResponderSuprimirtu rollo es que confundes los argumentos de los diferentes Ugens, no todos tienen lo mismo y en el mismo lugar, lo mejor es chequear cada vez escogiéndolo y dándoles F1.
/*Blip.ar(freq, numharm, mul, add), si pones numero de armonicos 0 no camina, minimo 1*/ {Blip.ar(555,1,mul:[0.1,0.5])*EnvGen.ar(Env.new([0,1, 0.3, 0.8, 0], [5, 6, 4, 5],-3))}.scope // blip
/*BrownNoise.ar(mul, add), pusiste valores de freq para amplitud(mul) que es de 0 a 1*/ {BrownNoise.ar(EnvGen.ar(Env.new([100,1000, 500, 8000, 40],[10, 5, 2.5, 2.5]),0,mul:[0.1,0.8])*EnvGen.ar(Env.new([0,1, 0.3, 1.5, 0], [5, 5, 6, 4],-3)))}.play/*lo que está en verde es redundante*/
/*Saw.ar(freq, mul, add), fijate que saw no tiene phase o sea que el cero no hace falta*/ {Saw.ar(EnvGen.ar(Env.new([100,1000, 500, 8000, 40],[10, 5, 2.5, 2.5]),0,mul:[0.1,0.8])*EnvGen.ar(Env.new([0,1, 0.3, 1.5, 0], [5, 5, 6, 4],-3)))}.play //moto
/*Blip.ar(freq, numharm, mul, add). te faltó el paréntesis, te sonó de pura suerte porque te sobraba un paréntesis en otro lugar, recuerda que no tiene phase (
{Blip.ar(EnvGen.ar(Env.new([100,1000, 500, 8000, 40],[10, 5, 2.5, 2.5])),10,mul:[0.1,0.8])*
EnvGen.ar(Env.new([0,1, 0.3, 1.5, 0], [5, 5, 6, 4],-3))}.play
)
/* Claro!!! porque le metiste valores de freq [100,1000, 500, 8000, 40] al mul que es de 0 a 1 PinkNoise.ar(mul, add) {PinkNoise.ar(EnvGen.ar(Env.new([100,1000, 500, 8000, 40],[10, 5, 2.5, 2.5]),//esto es mul
0,//no es nada
mul:[0.1,0.2])*//confundiste a la máquina con mul aquí y al principio
EnvGen.ar(Env.new([0,0.5, 0.1, 0.5, 0], [5, 5, 6, 4],-3)))}.play //ni lo escuchen, uf!!!!
hola profe le dejo mi tarea 2 disculpe la demora..
ResponderSuprimir({SinOsc.ar(EnvGen.ar(Env.new([50,1, 5,50, 0],[1, 6, 2, 5])),0,EnvGen.ar(Env.new([10,200, 300,60, 200],[1, 0.3, 1, 0.5])))}.scope)
({SinOsc.ar(EnvGen.ar(Env.new([200,100, 50,500, 9],[1, 6, 2, 5])),0,EnvGen.ar(Env.new([10,600, 150,60, 200],[1, 6, 3, 7])))}.scope)
{SinOsc.ar(EnvGen.ar(Env.new([200,150, 250, 300, 400],[2, 6, 3, 9])),0,0.6)}.scope;
{BrownNoise.ar(EnvGen.ar(Env.new([50,15, 25, 30, 40],[2, 6, 3, 3])),0,1)}.scope;
profe esta es mi tarea 2
ResponderSuprimir{SinOsc.ar(EnvGen.ar(Env.new([200,50,10,50,300],[5, 6, 5, 4])),0,7)}.scope;
{WhiteNoise.ar(700,0,mul:[0.6,0.5])*EnvGen.ar(Env.new([0,1, 0.3, 0.5, 1], [6, 3, 6, 5],-3))}.play
hola profe aqui dejo mi segunda tarea..
ResponderSuprimir(
{Saw.ar(1000,0,mul:[0.3,0.2])*EnvGen.ar(Env.new([0,3, 0.7, 0.5, 0.4], [4, 2, 6, 4],0.1))}.play
{Blip.ar(EnvGen.ar(Env.new([20,50,100,900,30],[6, 3, 8, ])),0,3)}.scope;
)
Comentario para Alex
ResponderSuprimir(/*No metas en un mismo código .play y .scope*/
{Saw.ar(1000,0,mul:[0.3,0.2])*EnvGen.ar(Env.new([0,3, 0.7, 0.5, 0.4], [4, 2, 6, 4],0.1))}.play;/* en todo caso aquí iría un punto y coma*/
{Blip.ar(EnvGen.ar(Env.new([20,50,100,900,30],[6, 3, 8, ])),0,3)}.scope;
)
{Saw.ar(1000,mul:[0.3,0.2])*EnvGen.ar(Env.new([0,3, 0.7, 0.5, 0.4], [4, 2, 6, 4],0.1))}.play; /*si ocupa su lugar original no hace falta ponerle mul*/
{Blip.ar(EnvGen.ar(Env.new([20,50,100,900,30],[6, 3, 8, ])),0,3)}.scope;/*ojo con el lugar de cada argumento Blip.ar(freq, numharm, mul, add). Yo no sé como te sonó esto, sin armónicos y con 3 de amplitud!!!!*/
Sonido de 20 segundos(stereo) tarea 2
ResponderSuprimir{Saw.ar([(EnvGen.ar(Env.new([440,440,880,830,440,415,560,788,440], [10,1,1,2,1,1,2,2]))),
(EnvGen.ar(Env.new([880,880,440,415,880,415,280,399,440], [10,1,1,2,1,1,2,2])))],
EnvGen.ar(Env.new([0.1,0.01,0.3,0.03,0.4,0.2,0.1,0.7,0.6,0.3], [1,1,1,1,1,1,1,1,1])))}.scope