ScUsb

ultima fecha de entrega

2009-07-03T14:33:00.001-04:30

Lunes 6 de Julio a la medianoche para la entrega.
Los que les falta por entregar deben hacer directo a mi correo personal.

Tareas jose peña

2009-06-30T21:34:00.001-04:30

Tarea 4
1. Incluye Dust e impulse en dos de tus códigos anteriores, utiliza variables.
2. Realiza un código que tenga Pan2.ar y Mix y el gatillo de Impulse o Dust

(1)
(a)
Mix.fill(2,{Blip.ar(SinOsc.ar(4,0,rrand(500,2000),0,EnvGen.ar(Env.perc,Dust.ar(2))))})}.play
(1)
(b)
{Mix.fill(2,{SinOsc.ar([rrand(150,250),10], 0,EnvGen.ar(Env.perc,Dust.ar(1)))*Saw.ar(rrand(200,250),EnvGen.ar(Env.perc(0.5, 0.7, 0.7, 0.5),Impulse.ar(rrand(3.5,2.0))))})*0.5}.scope

(2)
({Pan2.ar({Mix.fill(3,{SinOsc.ar(rrand(100,200), 0,EnvGen.ar(Env.sine(5,6),Impulse.ar(2)))})},SinOsc.kr(0.5))}.scope)

Tarea 5-partitura
Has una partitura usando "cebolla" y da indicaciones de cómo te moverías en ella, devolviéndote o siguiendo todo el tiempo hacia adelante.

(SynthDef("cebolla",{alt,arm1,arm2,tiempo,vol,pos
var suena,total;
suena =Blip.ar(alt,XLine.kr(arm1,arm2,tiempo),vol);
total =Pan2.ar(suena,SinOsc.kr(pos),vol);Out.ar(0,total)}).send(s))

f=Synth("cebolla",[\alt,rrand(100,1000),\arm1,10,\arm2,70,\tiempo,15,\vol,0.9,\pos,1])
f.set(\alt,rrand(10,20))
f.set(\pos,2)
f.set(\vol,0.5)
f.free
f=Synth("cebolla",[\alt,rrand(100,1000),\arm1,10,\arm2,70,\tiempo,15,\vol,0.9,\pos,1])
f.set(\alt,rrand(50,100))
f.set(\pos,5)
f.set(\vol,0.7)
f.set(\vol,0.6)
f.set(\vol,0.5)
f.set(\vol,0.4)
f.set(\vol,0.3)
f.set(\vol.0.2)
f.free

Este es otro con que practique

(SynthDef("pera",{altura=250var suena;suena=Saw.ar(altura,EnvGen.ar(Env.sine(0.5,1)));Out.ar(0,suena)}).send(s))
(SynthDef("manzana",{altura,armonicos,volumenvar suena;suena=Blip.ar(altura,armonicos,volumen);Out.ar(1,suena)}).send(s))
\*Iniciamos el Synth "manzana "*\
a=Synth("manzana",[\altura,100,\armonicos,3,\volumen,0.1])

b=Synth("pera",[\altura,200])
Synth("pera")
b=Synth("pera",[\altura,200])
b=Synth("pera",[\altura,50])
b=Synth("pera",[\altura,40])
a.set(\altura,200)
Synth("pera")
b=Synth("pera",[\altura,150])
Synth("pera")
b=Synth("pera",[\altura,50])
b=Synth("pera",[\altura,40])
a.set(\altura,100)
b=Synth("pera",[\altura,100])
Synth("pera")
b=Synth("pera",[\altura,50])
a.set(\altura,150)
b=Synth("pera",[\altura,40])
Synth("pera")
a.free

/*Tarea 5-Sinte*/
Has un sintetizador (SynthDef) a partir del siguiente código de Anabel.
(
{var linea,todo, moviendose;
linea = XLine.ar(10,70,7);
todo = SinOsc.ar(Saw.ar(10,100,1000),0,Blip.ar(linea,10,0.2),0.5);
moviendose = Pan2.ar(todo, SinOsc.kr(3))}.scope
)
/*y sugiere diferentes valores para los argumentos*/

(SynthDef("anabel",{distorcion,magico,vol
var linea,todo,moviendose;
linea=XLine.ar(10,70,20);
todo=SinOsc.ar(Saw.ar(0,10,distorcion),0,Blip.ar(linea,magico));
moviendose=Pan2.ar(todo,SinOsc.kr(2),vol);
Out.ar(0,moviendose)}).send(s))

a=Synth("anabel",[\distorcion,1000,\magico,10,\vol,0.5])
a.set(\distorcion,500)
a.set(\magico,5)
a.set(\vol,0.3)
a.free

a=Synth("anabel",[\distorcion,1000,\magico,10,\vol,0.5])
a.set(\distorcion,800)
a.set(\magico,2)
a.set(\vol,0.2)
a.free

a=Synth("anabel",[\distorcion,500,\magico,10,\vol,0.5])
a.set(\distorcion,250)
a.set(\magico,20)
a.set(\vol,0.3)
a.free
Ultima tarea
Hacer dos ejercicios Código-SynthDef-Pbind, donde se utilicen los patrones Pshuf,Prand, Pwhite y Pseq.

Synth Pbin— Original partitura sin azar. Como debe sonar normalmente

(SynthDef("run",{altura=0var suena;suena=Saw.ar(altura,EnvGen.ar(Env.sine(0.5,1)));Out.ar(0,suena)}).store)

Pbind(\instrument,\run,\altura,
Pseq([70,80,90,100,110,120,110,100,90,80,70,190,190,200,200,190,190,
180,180,170,170,160,160,150,150,140,140,150,120,160,110,170,100,180,
90,190,90,200,80,210,70,220,60,230,50,70,60,80,70,90,80,100,90,110,100,
120,110,130,120,140,130,150,140,160,130,150,120,140,110,130,100,120,90,110,80,100,70,90,60,80,50,60,40,50],1),
\dur,0.3).play

Synth Pbin: Aplicando Pwhite, Prand, Pshuf, Pseq.

El Pseq los estoy utilizando en la partitura original y con esto obtengo los dos ejercicios que pidió.

Pbind(\instrument,\run,\altura,
Pshuf([70,80,90,100,110,120,110,100,90,80,70,190,190,200,200,190,190,
180,180,170,170,160,160,150,150,140,140,150,120,160,110,170,100,180,
90,190,90,200,80,210,70,220,60,230,50,70,60,80,70,90,80,100,90,110,100,
120,110,130,120,140,130,150,140,160,130,150,120,140,110,130,100,120,90,110,80,100,70,90,60,80,50,60,40,50],1),
\dur,Pwhite(0.1,0.5)).play

En este ejercicio aplicamos Pshuf y Pwhite.

(Pbind(\midinote,Prand([69,71,72,74,76,74,72,71,69,90,88,86,84,85,83,76,74,72,71,69],inf),\dur, 0.1).play)

Aplique MIDINOTE para hacer el segundo ejercicio con Prand

(Pbind(\midinote,Prand([69,71,72,74,76,74,72,71,69,90,88,86,84,85,83,76,74,72,71,69],inf),\dur, 0.1).play)

Evaluación y cierre de trimestre

2009-06-29T12:57:00.003-04:30

Hola,

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!!

Ultima tarea

2009-06-29T11:03:00.001-04:30

Hacer dos ejercicios Código-SynthDef-Pbind, donde se utilicen los patrones Pshuf,Prand, Pwhite y Pseq.

Patrones para Pbind

2009-06-29T11:02:00.001-04:30

Los ejemplos están hechos con el sinte genérico, pero pueden aplicarse a los que ustedes creen.

/*Los patrones son secuencias de números que van cambiando a cada vuelta del Pbind, de diferentes maneras de acuerdo a cada caracterítica individual.

Pseq es una secuencia que se establece y se le dice cuantas vueltas debe dar, podemos usar "inf" para indicar que es infinito*/

(

Pbind(\midinote, Pseq([69,71,72,74,76],inf),

\dur, 0.1

).play

)

/*Pshuf baraja los números que tiene y escoge una secuencia y la repite, si te detienes y empiezas otra vez escogerá otra secuencia con las mismas notas*/

(

Pbind(\midinote, Pshuf([69,71,72,74,76],inf),

\dur, Pseq([1,0.5,0.5],inf)

).play

)

/*Prand escoge aleatoriamente de su lista a cada vuelta

(

Pbind(\midinote, Prand([69,71,72,74,76],inf),

\dur, Prand([0.1,0.3,0.3],inf)

).play

)

/*Pwhite se parece a rrand, se establece la cota superior y la inferior, si no se pone duración asume el infinito como default*/

(

Pbind(\freq, Pwhite(400,1000),

\dur, Pwhite(0.1,0.3)

).play

)

SIntetizador genérico para Pbind

2009-06-29T10:46:00.001-04:30

Supercollider tiene un sintetizador genérico que responde al Pbind sin tener que hacer código, ni declarar SynthDef

/*\dur,es el tiempo antes de que de la vuelta*/

(

Pbind(\freq, 400,

\dur, 0.1

).play

)

/*En vez de poner frecuencias se puede poner notas midi(que van del 0 a 127)*/

(

Pbind(\midinote, 69,

\dur, 0.5

).play

)

/*Otros parámetros son amp, para amplitud*/

(

Pbind(\midinote, 69,

\dur, 0.5 ,

\amp, 0.01

).play

)

Otro Ejemplo de SInte a Pbind

2009-06-29T10:31:00.002-04:30

(SynthDef("manzana",{|altura,armonicos,volumen,paneo|

var suena,env;

env = EnvGen.ar(Env.perc,doneAction:2);

suena =Blip.ar(altura,armonicos,volumen);

suena =Pan2.ar(suena*env,paneo);

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

)

(Pbind(\instrument,\manzana,

\altura,Prand([500,200,30],inf),

\armonicos, Prand([5,20,3],inf),

\volumen,0.3,

\paneo,Pwhite(-1.0,1.0),

\dur,Prand([0.2,0.3,0.1],inf)).play

)

Otro Código, Mix, SIntetizador y Pbind

2009-06-29T10:28:00.000-04:30

/*Otro ejemplo,1.- hago el código*/

{Saw.ar(SinOsc.ar(100,0,200,2300),0.5)}.scope

/*2.- lo monto en un mix, doneAction:2 es un argumento del EnvGen que hace que una vez que se hizo el sonido todo se apaga y se libera el cpu*/

(

{var env;

env = EnvGen.ar(Env.perc(0.3),doneAction:2);

Mix.fill(15,{Saw.ar(SinOsc.ar(100,0,200,Rand(2300,5000)),0.1*env)})}.scope)

/*3.- hago el sintetizador, atención que en los sintetizadores que usan Mix, evito los rrand y lo cambio por Rand, que es igualito con cota baja y cota alta*/

(

SynthDef(\el,{|freq,bajo,alto|

var todo,env;

env = EnvGen.ar(Env.perc(0.19),doneAction:2);

todo =Mix.fill(15,{Saw.ar(SinOsc.ar(freq,0,200,Rand(bajo,alto)),0.1*env)});

Out.ar(0,todo)}).store)/*ojo que cuando voy a usar Pbind uso store en vez de send(s)*/

/*4.-armo el Pbind*/

Pbind(\instrument,\el,

\freq,100,

\bajo,2300,

\alto,5000,

\dur,0.2).play

Codigo, Sintetizador, Pbind (Ella)

2009-06-29T10:21:00.001-04:30

/*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

semana 10

2009-06-19T16:44:00.001-04:30

Hola, la semana 10 no vengo, estoy en un congreso de musica electroacustica
http://www.ems-network.org/ems09/conference.html

Nos vemos la semana 11

Examen Domllermut Alamo

2009-06-19T14:32:00.000-04:30

(SynthDef("ninja",{|altura,armonicos,volumen|

var teclas;

teclas = SinOsc.ar(altura,armonicos,volumen);

Out.ar(1,teclas)}).send(s)
)

z=Synth("ninja",[\altura,440,\armonicos,9,\volumen,0.5])
z.set(\altura,rrand(650,1023))
z.set(\altura,800)
z.set(\altura,900)
z.set(\altura,1200)
z.set(\altura,1400)
z.set(\altura,1600)
z.set(\altura,900)
z.set(\altura,1200)
z.set(\altura,500)
z.set(\altura,440)
z.set(\altura,300)
z.set(\altura,1200)
z.set(\altura,1400)
z.set(\altura,1600)
z.free

(
{var salir;

salir = EnvGen.ar(Env.new([0.05,0.9,0.5,0.9,0],[10,5,2,10]));

Pan2.ar(Mix.fill(12,{SinOsc.ar(rrand(500,1500)*salir*10)*0.1}),0,EnvGen.ar(Env.perc,Impulse.kr(2)))}.scope
)

Parcial Rafael Palma

2009-06-19T14:31:00.003-04:30

Cornetas en estacionamiento

(

{var ajax;
ajax=SinOsc.ar(5,0,500,XLine.kr(rrand(18000,1000),100,10));

{Pan2.ar(Mix.fill(10,{Blip.ar(rrand(1000,40),5,0.2)}),
SinOsc.kr(ajax,0,rrand(0.01,0.3)))!2}}.play

)

2009-06-19T14:29:00.001-04:30

Examen Israel Di Barros

{Pan2.ar(Mix.fill(50,{SinOsc.ar(rrand(300,80).postln,0.8)}),SinOsc.ar(rrand(20,1000).postln),1)}.scope

({var isr;
isr=SinOsc.ar(rrand(20,1000).postln);
Pan2.ar(Mix.fill(50,{SinOsc.ar(rrand(300,80).postln,0.8)}),isr,1)}.scope
)

Falto el SynthDef, no vine a la clase pasada..

tareas Jose P. (corregir)

2009-06-19T14:28:00.001-04:30

Primera clase

Tarea 1
Hola, debes hacer un pequeño código, usando
SinOsc.ar
Blip.ar
Saw.ar
MouseX.kr y MouseY.kr
y expansión a estereo

{SinOsc.ar(MouseY.kr(200,250,1),0,MouseX.kr(0.1,1.0,1))!2}.play

{SinOsc.ar(MouseY.kr(200,250,1),0,[MouseX.kr(0.7,0.1,1),MouseX.kr(0.1,0.7,1)])}.play

{Blip.ar([50,200],2,(MouseY.kr(0.1,1.0,1)))}.play

{Saw.ar(MouseY.kr(50,100,1),MouseX.kr(0.1,1.0,1))!2}.play

Segunda clase
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

{Saw.ar((EnvGen.ar(Env.new([0,800,400,900,300,700,50,1000,0],[5,1,2,1,4,3,4,2],[-6]))),0.3)!2}.play

{WhiteNoise.ar(0.4)*EnvGen.ar(Env.new([0,1,0.5,0.8,0],[5,3,2,1],[-8]))}.play

Tareas de la tercera clase
clase 3
hacer un código estereo usando EnvGen para dos parámetros metidos en variables.

(
{var frecuencia, volumen;frecuencia = EnvGen.ar(Env.new([1000,600,200],[3,1]));volumen;volumen = EnvGen.ar(Env.new([0.2,1.0,0.2],[3,1]));SinOsc.ar(frecuencia,20,volumen)!2}.play
)

TAREA de la clase 3 – (2/3)
Hacer una modulación de frecuencia, utilizando variables y XLine.

ESOS CORCHETES NO SE USAN PARA ESTE TIPO DE CODIGO, LA MANERA CORRECTA SERIA

({var jose;

jose= SinOsc.ar(XLine.kr(10,500,9),0,300,1200);

Blip.ar(jose,3,0.3)!2}.play)

({var jose;jose= [SinOsc.ar(XLine.kr(10,500,9),0,300,1200),0.3];Blip.ar(jose,3,0.3)!2}.play)
TIENES USO INCORRECTO DE CORCHETES Y PARENTESIS

LO CORRECTO SERIA

({var jose,marrero;

jose=SinOsc.ar(4,0,500,2000);

marrero=XLine.kr(0.1,1.0,10);

Blip.ar(jose,2,marrero)!2}.play)

({Blip.ar(SinOsc.ar(4,0,500,2000),2,XLine.kr(0.1,1.0,10))!2}).play

({var jose,marrero;jose=[SinOsc.ar(4,0,500,2000)];marrero=[XLine.kr(0.1,1.0,10)];Blip.ar(jose,2,marrero)!2}).play
S
Tarea 3/3
Usa uno de tus códigos anteriores para hacer un mix.fill y un mix.new.

{Mix.fill(2,{Blip.ar(SinOsc.ar(4,0,rrand(500,2000).postln),2,XLine.kr(0.1,1.0,10))})}.scope.play
NO USES SCOPE Y PLAY JUNTOS, REDUNDA
Me dio resultados [951,183]

{Mix.new{Blip.ar(SinOsc.ar(4,0,[951,1873]),2,XLine.kr(0.1,1.0,10))}}.play

({var jose;jose= [{Mix.fill(2,{SinOsc.ar(XLine.kr(10,500,9),0,rrand(300,1200).postln)})},0.3];Blip.ar(jose,3,0.3)!2}.play)
Me dio resultados [635,1034]
({var jose;jose= [{Mix.new{SinOsc.ar(XLine.kr(10,500,9),0,[635,1034].postln)}},0.3];Blip.ar(jose,3,0.3)!2}.play)

({var jose;jose= [{Mix.fill(4,{SinOsc.ar(XLine.kr(10,500,9),0,rrand(300,1200).postln)})},0.3];Blip.ar(jose,3,0.3)!2}.play)
Me dio resulatados [575,1165,433,705]
({var jose;jose= [{Mix.new{SinOsc.ar(XLine.kr(10,500,9),0,[575,1165,433,705].postln)}},0.3];Blip.ar(jose,3,0.3)!2}.play)

Panoramicas

TAREA
COn un sonido propio haz que se mueva de diferentes maneras usando un envelope y variables

{Pan2.ar((SinOsc.ar(SinOsc.ar(2,0,rrand(300,5000)),0,0.2)),SinOsc.ar(Line.kr(-1,1)),0.3)}.play

{Pan2.ar((Saw.ar(EnvGen.kr(Env.new([100,500,250,500,100,700,100,1000,50,0],[3,6,3,6,4,6,4,4,4])),XLine.kr(0.1,0.7,40))),SinOsc.kr(Line.kr(-1,1)))}.play

En variables

({var sierra,posicion;sierra=(Saw.ar(EnvGen.kr(Env.new([100,500,250,500,100,700,100,1000,50,0],[3,6,3,6,4,6,4,4,4])),XLine.kr(0.1,0.7,40)));posicion=SinOsc.kr(Line.kr(-1,1));Pan2.ar(sierra,posicion)}.play )

Clase 4 Impulse y Dust como gatillos
Hola profesora.. esta es mi tarea pendiente, de todas las clases. No le agregue tarea de la clase 4, por que todavía no he logrado comprender como funcionan, pero estoy en ello, de todas yo me acercare y le preguntare.

Tareas 5 Creacion de sintes y partituras

2009-06-15T15:13:00.000-04:30

Tenemos el siguiente código que quiero volverlo un sintetizador:

{Blip.ar(400, 10, 0.5)}.scope

/*400, 10 y 0.5 son argumentos respectivamente para freq, numero de armonicos y mul, o sea amplitud*/

(

SynthDef("manzana",/*le doy cualquier nombre al sintetizador*/

{|altura,armonicos,volumen|

var suena;

suena =Blip.ar(altura,armonicos,volumen);

Out.ar(1,suena)}

).send(s)/*0 es a la izquierda y 1 a la derecha*/

)

/*defino argumentos, tambien les pongo cualquier nombre, pero preferiblemente que tengan relacion, si todo está bien te debe decir en el postwindow: a SynthDef */

/*Otro ejemplo, puedo poner valores de una vez a los argumentos que funcionarán como valores default*/

(SynthDef("pera",{|altura=300,volumen= 1|

var suena;

suena =Saw.ar(altura,EnvGen.ar(Env.sine(0.5,1)));

Out.ar(0,suena)}).send(s)

)

/*Así lo hago sonar, dándole valores, si quiero verlo en scope llamo al scope aparte con s.scope*/

Synth("manzana",[\altura,1000,\armonicos,5,\volumen,0.1])

s.scope

/*como "pera" tiene valores default lo puedo llamar sin darle nada*/

Synth("pera")

/*Es importante que los argumentos sólo son números, no Ugens o variables*/

Para manejar los sintes es bueno identificarlos con una variable. (Recuerda evitar la s)

a=Synth("manzana",[\altura,1000,\armonicos,5,\volumen,0.1])

/*Ya luego puedes simplemente cambiarle los valroes al sinte usando .set. Deja el anterior sonando y dale a*/

a.set(\altura,560)

puedes usar variables del ambiente (Importante el tilde)

~manzana=Synth("manzana",[\altura,1000,\armonicos,5,\volumen,0.1])

~manzana.set(\altura,2560)

~manzana.free

Puedo usar en vez de frecuencia en Hertz números midi

~manzana=Synth("manzana",[\altura,99.48.midicps,\armonicos,5,\volumen,0.1])

~manzana.set(\altura,69.midicps)

~manzana.free

~pollitos = Synth("pera",[\altura,60.midicps,\vel,2])

~pollitos = Synth("pera",[\altura,62.midicps])

~pollitos = Synth("pera",[\altura,64.midicps])

~pollitos = Synth("pera",[\altura,65.midicps])

~pollitos = Synth("pera",[\altura,67.midicps])

~pollitos.free

/*si incluimos EnvGen y el sonido se acaba ya no podemos usar el .set y les dirá FAILURE /n_set Node not found*/

(SynthDef("cebolla",{|alt,arm1,arm2,tiempo,vol,pos|

var suena,total;

suena =Blip.ar(alt,XLine.kr(arm1,arm2,tiempo),vol);

total =Pan2.ar(suena,SinOsc.kr(pos),vol);

Out.ar(0,total)}).send(s)

)

/*esto sería como una partitura, a medida que vas bajando vas tocando, tambien puedes devolverte*/

z=Synth("cebolla",[\alt,rrand(100,1000),\arm1,10,\arm2,70,\tiempo,15,\vol,0.9,\pos,1])

z.set(\alt,rrand(30,50))

z.set(\pos,5)

z.set(\pos,1)

z.set(\tiempo,25)

z.free

s.scope

/*Tarea 5-partitura*/

Has una partitura usando "cebolla" y da indicaciones de cómo te moverías en ella, devolviéndote o siguiendo todo el tiempo hacia adelante.

/*Tarea 5-Sinte*/

Has un sintetizador (SynthDef) a partir del siguiente código de Anabel.

(

{var linea,todo, moviendose;

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

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

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

)

/*y sugiere diferentes valores para los argumentos*/

Examen Jose pena

2009-06-12T15:01:00.001-04:30

{Mix.fill(2,{SinOsc.ar(EnvGen.ar(Env.new([100,400,100,600,100,800,100,1000,70],[4,2,4,2,4,2,4,2])),0,0.05)})!2}.play

SI HACES UN MIX.FILL Y NO LE DAS NADA EN RANDOM SE REPITE DOS VECES EL MISMO CODIGO.
{Mix.fill(2,{SinOsc.ar(EnvGen.ar(Env.new([rrand(100,400),rrand(100,600),rrand(100,400),rrand(100,600),100,800,100,1000,70],[4,2,4,2,4,2,4,2])),0,0.05)})!2}.play

({ var jose;jose=EnvGen.ar(Env.new([100,400,100,600,100,800,100,1000,70],[4,2,4,2,4,2,4,2]));SinOsc.ar(jose,0,0.05)!2}.play)

Profesora. Arme la variable. Pero no logre colocarla el mix.fill a la variable.

Exameen pendiente a la 1 pm

2009-06-11T06:42:00.002-04:30

Hola, los que tienen el examen pendiente el viernes a la 1 pm en el salón por favor.

Pregunta

2009-06-09T16:00:00.002-04:30

Profesora, que función cumple el signo de (*) en estos casos: se que se usa para multiplicar algo, pero aqui, es lo mismo.

{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

{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

Notas Parcial de los que presentaron

2009-06-08T19:46:00.004-04:30

Andros 2.7 = 9.7

Alex 2.7 = 6.7

Mario 2 = 9

Johan 3 = 10

Fran 2.7 = 6.7

El resultado es la suma con lo que traían de las tareas. Las correcciones están individuales con cada examen en este blog.

EXAMENES CORREGIDOS

2009-06-08T18:18:00.003-04:30

FranB

/*Habías metido el ENvGEn en la fase!!*/

{Mix.fill(5,{SinOsc.ar([rrand(50,700),30.8], 0,EnvGen.ar(Env.perc,Dust.ar(1)))*

SinOsc.ar(rrand(500,80),0,EnvGen.ar(Env.perc(1.5, 0,2, 1, 0.3),Impulse.ar(rrand(3,3.0))))})*0.5}.scope

({SinOsc.ar(100,SinOsc.kr( XLine.kr(1900,10920,69),0.9,368,900),mul:0.2)}.scope)

{SinOsc.ar(EnvGen.ar(Env.new([500,50,20,50,400],[4, 5, 6, 5])),0,0.7)}.scope; /*Mul en 7 eso es un error*/

ALEX

/*z no es un número, rrand necesita dos números y no un ugen, de hecho lo que estás escuchando es solamente el primer código, no sé si a ti te sonó!!!! porque daba error, si sustituyes la z en el rrand por un valor queda bien, sería mejor meterlo todo en una sola llave y ponerle un solo play o scope*/

(

{

var z;

z = SinOsc.ar(300, 5, MouseX.kr(0.1,8,1));

SinOsc.ar(5, z, 0.2)+

Mix.fill(5,{SinOsc.ar([rrand(100,222),56.1], 0,EnvGen.ar(Env.perc,Dust.ar(9)))*SinOsc.ar(rrand(180,500),EnvGen.ar(Env.perc(0.5, 1, 1, 0.5),Impulse.ar(rrand(3,2.0))))})+

Saw.ar(XLine.kr(20000,200,6),0.2)*0.1 }.scope)

/*Mario*/

prueba 1

/*Las variables se declaran primero y luego se pone el código, preferiblemente todo entre una sola llave. me parece que hay error en la utilización de los valores para la fase, me parece que ubieras querido meterlo en mul,no???*/

({

var rut, pio;

rut = EnvGen.ar(Env.new([9,5,16,5],[8,3,9]));

pio = EnvGen.ar(Env.new([110,13,6,1],[6,8,4]));/*uy! estos valores para mul!!*/

Impulse.ar(5658.rand,SinOsc.kr( Saw.ar(96,16,0.33),0.5,289,86),mul:0.5)+

Mix.fill(5,{SinOsc.ar([rrand(2,50),56.1], 0,EnvGen.ar(Env.perc,Dust.ar(8)))*SinOsc.ar(rrand(190,50),EnvGen.ar(Env.perc(0.5, 1, 1, 0.5),Impulse.ar(rrand(3,2.0))))})+

SinOsc.ar(rut,9,pio)!2*0.01}.scope/* valor equivocado para la fase*/

)

Para Grabar y FOrmato final

2009-06-05T21:10:00.003-04:30

EL programa viene default en formato de 32bits que es full profesional, pero no todos los programas de audio lo abren. Audacity sí, itunes No. protools sí y me dicen que Logic no (pero no tengo Logic)
SI quieren oirlo en itunes denle el siguiente comando
s.recSampleFormat = "int16";
Eso lo pone en formato de disco compacto, si lo queman en cd les debe sonar

SI quieren chequear las características de su archivo sonoro sustituyan a11wlk01.wav por el suyo.
Pueden meter su archivo en la carpeta "sounds" que está en la carpeta del programa o si tienen la última versión de SC con solo arrastrar un sampleo a la ventana del programa les lee la ruta completica, que es lo que van a meter entre comillas.

Yo por ejemplo arrastré un archivo que tenía en el desktop y me escribió esta dirección:
"/Users/imac/Desktop/Ginastera4Brouwer2Bor-IndiaBatuque.aiff"
Eso lo pondría en lugar de

"sounds/a11wlk01.wav"
(

f = SoundFile.new;

f.openRead("sounds/a11wlk01.wav");

f.inspect;

f.close;

)

Esto me abre una ventanita aparte con todas las características del sonido que voy a usar.
Por ahora lo único que les interesa es el número de canales y si es int16, para poder quemarlo.

Examen nro1

2009-06-05T17:40:00.003-04:30

Examen nro1

({var johan, electro ;
johan = EnvGen.ar(Env.new([0,0.8,0.2,0.8],[1,5,9]));
electro = Impulse.ar(Line.kr(rrand(100,400),900,9),0,0.5);
Mix.fill(6,(SinOsc.ar(electro,0,johan)))*900000000}.scope)

Prof el sonido para poderlo percibir lo tuve que multiplicar al final por un número muy alto porque de resto no se ecuchaba!

Examen Andros

2009-06-05T17:39:00.002-04:30

(
{var a,q,w,p,t,e,paneo;
a=rrand(200,300);
q=rrand(30,50);
t=Saw.ar(2,10,q);
w=Saw.ar(1,20,a);
e=EnvGen.kr(Env.perc(0.01,1,1,-4),Impulse.kr(4));
p=EnvGen.kr(Env.perc(0.2,1,1,-8),Impulse.kr(6));
paneo=SinOsc.kr(2);
{Pan2.ar({Mix.fill(2,{SinOsc.ar(t,0,e,0)})},paneo,2)}+
{Pan2.ar({Mix.fill(2,{SinOsc.ar(w,0,p)})},0,0.5)}
}.play
)

Esta fue otra cosa que no me dio tiempo de terminar del todo...

(
{Pan2.ar({Mix.fill(3,{SinOsc.ar((rrand(36,42)),0,(EnvGen.kr(Env.perc(0, 1, 1, -2),Impulse.kr(2))))})},0)}.scope
+
{Pan2.ar(PinkNoise.ar((EnvGen.kr(Env.perc(0, 1, 1, -8),Impulse.kr(4)))),0,0.4)}.play
)

Manejo de sampleos

2009-06-05T16:36:00.002-04:30

/*esto monta el smapleo en el servidor*/
b = Buffer.read(s, "sounds/ferminPasen.aif");/*sonidos dentro de sound*/
b.query// esto te dice sus caracteristicas
/*esto lo toca*/
{PlayBuf.ar(1,b.bufnum,rate:1)}.play;
/*esto lo toca al doble*/
{PlayBuf.ar(1,b.bufnum,rate:2,loop:1)}.play;
/*esto lo toca al reves*/
{PlayBuf.ar(1,b.bufnum,rate:-1,loop:1)}.play;

{Pan2.ar(PlayBuf.ar(1,b.bufnum,rate:1 ),SinOsc.kr(0.2))}.play;
Esto limpia el buffer
b.clear

Esto es para probar si en sus casa les funciona al ser administradores, por favor me informan lo mas pronto posible

respuesta a Mario

2009-06-05T11:22:00.001-04:30

{Pan2.ar(Mix.fill(3,{Blip.ar(rrand(65.9,463.2),rrand(1,15),0.1)}),SinOsc.kr(MouseX.kr(1,9,0),0.3))}.scope/*mapping curve. 0 is linear, 1 is exponential (for freq or times e.g)
alternative: 'linear', 'exponential'*/

{Pan2.ar(Mix.fill(31,{Blip.ar(rrand(50.1,3.2),rrand(96,54),0.1)}),SinOsc.kr(MouseX.kr(5,6),0.3))}.scope

{Mix.fill(5,{SinOsc.ar([rrand(200,550),56.1], 0,EnvGen.ar(Env.perc,Dust.ar(6)))*SinOsc.ar(rrand(190,530),0,EnvGen.ar(Env.perc(0.5, 1, 1, 0.5),Impulse.ar(rrand(3,2.0))))})*0.3}.scope/*pusiste el env en la fase*/

(
{Pan2.ar({Mix.fill(9,{SinOsc.ar(rrand(120,45), 5,EnvGen.ar(Env.sine(6,9),Impulse.ar(2)))})*0.03},SinOsc.kr(0.2))}.scope
)/*sabes por que suena asi??*/

{Mix.fill(2,{SinOsc.ar([rrand(10,900),10.9], 0,EnvGen.ar(Env.perc,Dust.ar(1)))*SinOsc.ar(rrand(900,90),EnvGen.ar(Env.perc(1.2, 0,2, 1, 0.3),Impulse.ar(rrand(2,3.0))))})*0.5}.scope /*sabes por que suena asi??*/

Primera evaluacion

2009-06-04T22:10:00.002-04:30

Hola, mañana es la primera evaluación que vale 3 puntos sobre 10 (50% de la nota del trimestre). Los otros 7 puntos son de las 7 tareas que he enviado que están ubicadas en el blog.
Les anexo mi cuenta de las tareas, como algunos han sido un poco desordenados y no las han montado o las han montado en el lugar equivocado, si tengo error en el gráfico por favor señálenmelo e indíquenme donde pusieron la tarea faltante. el pdf va en un cuadro a sus correos personales
Saludos
AI

Clase 4 Impulse y Dust como gatillos

2009-05-31T23:04:00.004-04:30

{Impulse.ar(1,mul:1)}.scope//clicks regulares

{Dust.ar(800,1)}.scope//clicks irregulares

(
{var env,gatillo;
env=Env.perc;
gatillo =Impulse.kr(Line.kr(0.1,10,5));
SinOsc.ar([4440,4442.1],mul:EnvGen.ar(env,gatillo))
}.play
)

Se le puede poner gatillo a cualquier c[odigo que tenga EnvGen.ar
ConMix
(

{Mix.fill(5,{SinOsc.ar([rrand(1400,5000),1400.1], 0,EnvGen.ar(Env.perc,Dust.ar(2)))*Saw.ar(rrand(1400,5000),EnvGen.ar(Env.perc(0.05, 1, 1, -4),Impulse.ar(rrand(2,3.0))))})*0.5}.scope
)//campanas locas

//conPan2
(
{Pan2.ar(
{Mix.fill(15,{SinOsc.ar(rrand(2240,3350), 0,EnvGen.ar(Env.sine(4,0.5),Impulse.ar(0.1)))})*0.09},SinOsc.kr(0.2))}.scope
)//paso de la noche
Tarea
Incluye Dust e impulse en dos de tus codigos anteriores, utiliza variables.
Realiza un codigo que tenga Pan2.ar y Mix y el gatillo de Impulse o Dust

clase 4 Panoramicas

2009-05-31T22:49:00.003-04:30

Pan2.ar(in, pos, level)//para mover los sonidos entre la derecha y la izquierad
/*in es lo que suena, cualquier sonido que ya hayas hecho,
pos es la posicion entre -1 izq y 1 derecha, 0 es el medio,
level es la amplitud total*/
//tomo
{WhiteNoise.ar(0.3)}.scope
{ Pan2.ar(WhiteNoise.ar(0.3), 1) }.scope

{ Pan2.ar(WhiteNoise.ar(0.3), 0) }.scope

{ Pan2.ar(WhiteNoise.ar(0.3), 1) }.scope
//si uso un oscilador lento, que se mueve entre -1 y 1 a dos segundos por ciclo lo puedo mover continuamente
(
{ Pan2.ar(WhiteNoise.ar(0.3),//lo que suena SinOsc.kr(2)) //lo que lo mueve
}.scope
)
//le pongo una linea a ese Oscilador
(
{ Pan2.ar(WhiteNoise.ar(0.3), SinOsc.kr(Line.kr(0.1,5,10))) //acelera de 0.1 a 5 en 10 segundos
}.scope
)

TAREA
COn un sonido propio haz que se mueva de diferentes maneras usando un envelope y variables

bajotes

2009-05-29T16:38:00.001-04:30

//////////bajotes
(
(
{Pan2.ar(Mix.fill(32,{Saw.ar(rrand(45.0,43.0).postln,0.1)}),SinOsc.kr(rrand(1,7).postln),0.5)
}.scope;

(
{Pan2.ar(Mix.fill(32,{Blip.ar(rrand(45.0,43.0),rrand(10,15),0.1)}),SinOsc.kr(MouseX.kr(1,5,1),0.7))
}.scope)
)

//que es lo mismo que
(
{Pan2.ar(Mix.fill(32,{Saw.ar(rrand(45.0,43.0).postln,0.1)}),SinOsc.kr(rrand(1,7).postln),0.5)
+
Pan2.ar(Mix.fill(32,{Blip.ar(rrand(45.0,43.0),rrand(10,15),0.1)}),SinOsc.kr(MouseX.kr(1,5,1),0.7))
}.scope
)

clase 3 3 de 3 Uso de mix

2009-05-23T10:28:00.003-04:30

//Mix

(

{Mix.fill(7,//haz 7 de lo que sigue

{Blip.ar(rrand(500,1000),10,0.25)}//la frecuencia sale 7 veces, aleatoria

)}.scope

)

/*quiero saber cuales frecuencias me sacó, entonces añado el término .postln justo despues de

rrand(500,1000).postln y me sale en el postwindow*/

(

{Mix.fill(7,//haz 7 de lo que sigue

{Blip.ar(rrand(500,1000).postln,10,0.25)}//la frecuencia saca 7 veces aleatoria

)}.scope

)

/*si quiero reproducir el mismo sonido con las mismas frecuecnias las tengo que escoger del post window, en este caso

989

606

602

834

585

883

528*/

/*cambio el Mix.fill por Mix.new, y las meto una detrás de la otra dentro de un corchete en el freq de blip, que es donde se originaron

(

{Mix.new(

Blip.ar([989,

606,

602,

834,

585,

883,

528].postln,

10,0.25)

)}.scope

)

//usando el código anterior, más complejo

{Mix.fill(12,{Blip.ar(SinOsc.ar( XLine.kr(10,1000,19),0,200,rrand(1800,200)), XLine.kr(10,1,9),0.15)})}.play

aqui mezclé 12 sonidos del código anterior cada uno con un afrecuencia aleatoria rrand(1800,200), si quieren saber qué frecuencias dio incluyan el término postln (que imprime en la ventana postwindow), para ver mejor el codigo lo pueden partir y lo meten entre paréntesis

(

{Mix.fill(12,// mezcla 12 sonidos

{Blip.ar(SinOsc.ar( XLine.kr(10,1000,19),0,200,

rrand(1800,200).postln), // esto me produce 12 frecuencias

XLine.kr(10,1,9),0.15)})}.play

)

//si me encantó el sonido y quiero reproducirlo, toman las 12 frecuencias que se imprimieron, las meten entre corchetes sustituyendo el rrand(1800,200) que las produjo, en este caso [ 1405, 1612, 1622, 1411, 1625, 410, 986, 422, 1763, 1092, 401, 825 ] les tienen que poner comas entre cada una

(

{ Mix.new(Blip.ar(SinOsc.ar( XLine.kr(10,1000,19),0,200,

[1405,

1612,

1622,

1411,

1625,

410,

986,

422,

1763,

1092,

401,

825].postln),

XLine.kr(10,1,9),0.15)) }.play

)

//Tarea, usa uno de tus códigos anteriores para hacer un mix.fill y un mix.new. Publícalo como comentario a este mensaje

clase 3 2 de 3 encapsulando Ugens, modulacion de frecuencia

2009-05-23T10:26:00.002-04:30

//Encapsulando. Modulación de Frecuencias

Código Inicial

{SinOsc.ar(5000, 0, 0.5)}.play;

//sustituyo freq por otro Ugen, en este caso encapsulo un SinOsc.ar en su lugar

{SinOsc.ar(SinOsc.ar(1,0,300,5000), 0, 0.5)}.scope; //aqui comienzo a usar el add, que va a pasar a ser realmente la frecuencias que quiero

// una oscilación de un segundo, con 300 de "ancho" a la altura de 5000

{Saw.ar(SinOsc.ar(0.5,0,100,1000), 0.5)}.scope

//// una oscilación de dos segundos, con 100 de "ancho" a la altura de 1000

{Saw.ar(SinOsc.ar( XLine.kr(10,10000,9),0,200,1800), 0.25)}.play;

//una oscilación que va de 10 veces por segundo a 10000 veces por segundo, con un rango de 200, a la altura de 1800

{Blip.ar(SinOsc.ar( XLine.kr(10,1000,9),0,200,1800), XLine.kr(10,1,9),0.25)}.scope;

//TAREA de la clase 3

Hacer una modulación de frecuencia, utilizando variables y XLine. Publicala como comentario a este mensaje

clase 3, 1 de 3 envolventes, variables, rand y rrand

2009-05-23T10:18:00.001-04:30

Clase 3

//haciendo variables para el envelope

//tengo este envelope, con .plot lo puedo ver

Env.new([2000,300,5000,20],[2,3,8]).plot

//[2000,300,5000,20] estos son rangos para freq

//lo meto en el EnvGen

EnvGen.ar(Env.new([2000,300,5000,20],[2,3,8]))

//lo incluyo en una variable que llamo pepe, dentro de las llaves

//los paréntesis del comienzo y final me sirven para escoger rapidamente todo el código, dale doble click al último

(

{var pepe;

pepe = EnvGen.ar(Env.new([2000,300,5000,20],[2,3,8]));

SinOsc.ar(pepe)}.play

)

(

{var pepe;

pepe = EnvGen.ar(Env.new([2000,300,5000,20],[2,3,8]));

Saw.ar(pepe)}.play

)

(

{var pepe;

pepe = EnvGen.ar(Env.new([2000,300,5000,20],[2,3,8]));

Blip.ar(pepe)}.play

)

//un ejemplo para amplitud

Env.new([0,0.5,0.1,1],[2,3,8]).plot

//[0,0.5,0.1,1] son rangos para amplitud

//lo meto en el EnvGen

EnvGen.ar(Env.new([0,0.5,0.1,1],[2,3,8]))

//lo vuelvo variable dentro de las llaves

//los paréntesis me sirven para escoger rapidamente todo el código

(

{var volumen;//eviten acentos

volumen = EnvGen.ar(Env.new([0,0.5,0.1,1],[2,3,8]));

SinOsc.ar(400,0,volumen)}.play

)

Prueben el .rand, en este caso de 0 a 399

(

{var volumen;//eviten acentos

volumen = EnvGen.ar(Env.new([0,0.5,0.1,1],[2,3,8]));

SinOsc.ar(400.rand,0,volumen)}.play

)

o el rrand, que determina los rangos superior e inferior

rrand(500.0, 900.0)//dale aqui y mira el postwindow

(

{var volumen;

volumen = EnvGen.ar(Env.new([0,0.5,0.1,1],[2,3,8]));

SinOsc.ar(rrand(500.0, 900.0),0,volumen)}.play

)

//dale varias veces al anterior, inclusive sin apagarlo

//ahora las ods variables juntas

(

{var pepe, volumen;

pepe = EnvGen.ar(Env.new([2000,300,5000,20],[2,3,8]));

volumen = EnvGen.ar(Env.new([0,0.5,0.1,1],[2,3,8]));

Blip.ar(pepe,20,volumen)}.play

)

//le pongo !2 para duplicarlo exactamente en los dos canales

(

{var pepe, volumen;

pepe = EnvGen.ar(Env.new([2000,300,5000,20],[2,3,8]));

volumen = EnvGen.ar(Env.new([0,0.5,0.1,1],[2,3,8]));

Blip.ar(pepe,20,volumen)!2}.scope

)

//TAREA de la clase 3

hacer un código estereo usando EnvGen para dos parámetros metidos en variables. Publícala como comentario a este mensaje

2009-05-22T14:39:00.001-04:30

Israel Di Barros

{SinOsc.ar(EnvGen.ar(Env.new([500,500,500,1300,200],[5,5,6,4])),0,EnvGen.ar(Env.new([0.5,0.8,0.3,0.2,0.2],[2,4,2,2])))}.play

las notas musicales en Htz, midi y do,re,mi,fa,sol,la

2009-05-22T09:55:00.000-04:30

2009-05-21T15:06:00.000-04:30

Por Israel Di Barros,
no es muy complejo pero funciona.

{SinOsc.ar(EnvGen.ar(Env.new([100,300,500,800,1300],[2,4,2,2])),0,0.8)}.play

{SinOsc.ar(EnvGen.ar(Env.new([100,300,500,1300,0],[5,5,6,4])),0,EnvGen.ar(Env.new([0.5,0.8,0.3,0.2,0.2],[2,4,2,2])))}.play

Tarea 2

2009-05-15T19:11:00.000-04:30

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

atención código cortado

2009-05-15T19:09:00.000-04:30

Hola a todos, en la clase de hoy, utilizando firefox me dí cuenta que el código aparecía cortado. Luego probamos allí mismo con Explorer y estaba bien, Aquí en mi casa ambos, firefox y safari está completo. Presten entonces atención que cuando usen el blog el código aparezca completo, cualquier cosa se los envío por correo.
Saludos
AI

clase 2

2009-05-15T16:33:00.000-04:30

{SinOsc.ar(640,0,0.3)}.play
{SinOsc.ar(MouseY.kr(100,1000,1),0,0.3)}.play
//se pueden declarar como variables y entonces
//prender y apagar individualmente,pero es muy burdo
a={SinOsc.ar(640,0,0.3)}.play;
b={SinOsc.ar(1640,0,0.3)}.play;
a.free//para apagar a
b.free//para apagar b

//en vez de prender dos .play almismo tiempo se pueden sumar dentro de las llaves
{SinOsc.ar([640,2000],0,[0.1,0.3])+SinOsc.ar([30,0],0,0.4)}.scope(3)

//envolventes
Env hago F1 y me robo un codigo con plot
//probar los de abajo, lo primero son niveles de amplitud
//el segundo array los tiempos
//el tercer arry el tipo deona o linea
Env.new([0,0.3,0.9,0], [0.9,0.5, 1],[-5,0,-5]).plot;
Env.new([0,1, 0.3, 0.8, 0], [2, 3, 1, 4],-3).test.plot;
Env.new([0,1, 0.3, 0.8, 0], [2, 3, 1, 4],-5).test.plot;
//generador de envolventes
//se mete lo anterior dentro de un EnvGen.ar y se puede colocar sustituyendo
//cualquier argumento
EnvGen.ar(Env.new([100,1000, 500, 8000, 40], [2, 3, 1, 4],-3))

//aqui sustituyo la amplitud
{SinOsc.ar(555,0,EnvGen.ar(Env.new([0,1, 0.3, 0.8, 0], [2, 3, 1, 4],-3)))}.play;
//puedo hacerlo asi tambien
(
{SinOsc.ar(555,0,mul:[0.1,0.5])
*EnvGen.ar(Env.new([0,1, 0.3, 0.8, 0], [2, 3, 1, 4],-3))}.play)

//aqui sustituyo la freq

(
{SinOsc.ar(EnvGen.ar(Env.new([100,1000, 500, 8000, 40],
[2, 3, 1, 4])),0,0.3)}.play)
//la linea es un envelope sencillo de una sola rampa
//ponte en 100 y ve a 1000 en 30 segundos
{SinOsc.ar(Line.kr(100,1000,30), mul:0.3)}.play
//lineas para freq y armonicos
{Blip.ar(Line.kr(777,666,4),Line.kr(1,20,4), mul:0.3)}.play
//El ruido
{WhiteNoise.ar}.play
//revisar concepto de armonicos y ruido en los
//sonidosdela naturaleza y los intrumentos musicales acusticos

2009-05-15T14:45:00.001-04:30

prueba

Pruebas

2009-05-13T22:50:00.000-04:30

Aqui les dejo esto, un poco para cumplir con la tarea y algunas notas desde el do al si.

{SinOsc.ar(freq:MouseY.kr(800,200,1),mul:MouseX.kr(0.01,0.9, 1))}.scope; //mouse
{SinOsc.ar([2220,300],0,0.2)}.scope //rana1
{SinOsc.ar([MouseY.kr(800,200,1),MouseX.kr(1800,20,1)],0,0.2)}.scope //rana1
{SinOsc.ar(2520,0,0.2)}.scope //rana2
{SinOsc.ar([MouseY.kr(800,200),MouseX.kr(1800,20)],0,0.5)}.scope;

{SinOsc.ar([MouseY.kr(500,200, 1),MouseX.kr(1000,500, 1)],mul:[0.1,0.5])}.scope; //ranas1

{SinOsc.ar([0,261.626],0,0.5)}.scope //do
{SinOsc.ar([293.665,0],0,0.5)}.scope //re
{SinOsc.ar([0,329.628],0,0.5)}.scope //mi
{SinOsc.ar([349.228,0],0,0.5)}.scope //fa
{SinOsc.ar([0,391.995],0,0.5)}.scope //sol
{SinOsc.ar([440,0],0,0.5)}.scope //la
{SinOsc.ar([0,493.883],0,0.5)}.scope //si

(
{Saw.ar([329,493],mul:0.2)}.scope;
{Blip.ar(493,[440,900],mul:0.2)}.scope
)

Domllermut Alamo

tarea 1

2009-05-08T17:10:00.000-04:30

Hola, debes hacer un pequeno codigo,usando
SinOsc.ar
Blip.ar
Saw.ar
MouseX.kr y MouseY.kr
y expansion a estereo

Puedes usarlo todo junto o en ejercicios individuales.
Debes publicarlo aqui el jueves

primera clase

2009-05-08T16:41:00.001-04:30

//primera clase

{SinOsc.ar(freq:2220,mul:0.1)}.scope; //ranas1
{SinOsc.ar(freq:2520,mul:0.1)}.scope; //ranas2
/*las grabaciones aparecen en
C:\Documents and Settings\Invitado\SuperCollider\Recordings*/

{SinOsc.ar(freq:MouseY.kr(800,200, 1),mul:MouseX.kr(0.01,0.5, 1))}.play;

{SinOsc.ar([MouseY.kr(800,200, 1),MouseX.kr(1800,20, 1)],mul:[0.1,0.5])}.scope(2); //ranas1

si separas las lineas con punto y coma y lo envuelves todo en parentesis loactivas junto
(
{Saw.ar(MouseY.kr(1800,200, 1),0.3)}.play;
{Blip.ar(440,MouseY.kr(1,20, 1),0.3)}.play
)

Links a tutorials en castellano

2009-04-26T13:17:00.001-04:30

Hola,
encontrarán muchos tutorials en internet.
Este es uno en castellano, desde CostaRica por Federico Reuben, freuben@gmail.com
http://www.oscilador.org/descargas/supercollider/

Bienvenidos

2009-04-26T09:11:00.000-04:30

Queridos amigos,
Bienvenidos a introducción a la música electrónica. Comenzaremos trabajando síntesis con el programa Supercollider.
Estamos en el primer piso de Básico 1, Laboratorio Lie.

Cada uno tendrá una PC, pero si quieren traer sus propias laptops, tráiganlas con el programa instalado desde

http://supercollider.sourceforge.net/downloads

para más información sobre los que hacemos con música electrónica en la USB
http://ladim.labf.usb.ve

Mi correo es ladim@usb.ve

Nos vemos el 8 de mayo

Los espero entonces