/* simple amplitude and frequency experiments */
/////////////////////////////////////

// simple amplitude modulation
// lp
(

{
s = SinOsc.ar(10.1.rand, 0, 1.0);

SinOsc.ar(200, 0, s)

}.scope;
)

/////////////////////////////////////

// simple frequency modulation
// lp
(

{
s = SinOsc.ar(5, 0, 0.5);

 SinOsc.ar(200 + (200 * s), 0, 1.0)

}.play;

)
/////////////////////////////////////
// simple frequency modulation, now add mod index and mod freq variables, ramp modindex, envgen, etc.
// play with this with lots of setting of different values
// lp
(
	var modfreq = 267, modindex = 0.8;
	var carrfreq = 500;
	var dur = 5;
	var smoda, smod;
	var e, eamp;
	e = Env.linen(0.1 * dur, 0.7 * dur, 0.5, 0.2 * dur);

{

	smoda =   XLine.ar(modindex, 0.0001, dur);
	smod = SinOsc.ar(modfreq, 0, smoda);

	SinOsc.ar(200 + (200 * smod), 0, EnvGen.ar(e))

}.scope;

)