///////////////////////////////////////////////////
// History, as it was on Sun Aug 27 11:02:12 2006.
///////////////////////////////////////////////////

// - 0:0:0 -  
//in the aeroporto

// - 0:1:37.71 -  
SynthDef(\lcsynth1, {arg out=0, amp=0.1, pan=0.0, freq=440, sustain=0.1, place=0.5,modfreq=7; 
var sound, env;

env=EnvGen.ar(Env([1,1,0],[sustain,0.1],'lin'),doneAction:2);

sound=Pulse.ar(freq, place,LFNoise0.kr(modfreq,0.2,0.8)*amp)*env;

Out.ar(out, Pan2.ar(sound,pan))
}).store;

// - 0:2:51.63 -  
Tdef(\lctask1,{

inf.do {

[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
1.0.wait;
};

}).play;

// - 0:3:22.89 -  
Tdef(\lctask1,{

inf.do {

[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
1.0.wait;
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48.2+note).midicps, \sustain, 1]) });
0.25.wait;
};

}).play;

// - 0:3:50.99 -  
SynthDef(\lcsynth1, {arg out=0, amp=0.1, pan=0.0, freq=440, sustain=0.1, place=0.5,modfreq=7; 
var sound, env;

env=EnvGen.ar(Env([0,1,1,0],[0.1,0.8,0.1]*sustain,'lin'),doneAction:2);

sound=Pulse.ar(freq, place,LFNoise0.kr(modfreq,0.2,0.8)*amp)*env;

Out.ar(out, Pan2.ar(sound,pan))
}).store;

// - 0:4:1.83 -  
Tdef(\lctask1,{

inf.do {

[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
1.0.wait;
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48.4+note).midicps, \sustain, 1]) });
0.25.wait;
};

}).play;

// - 0:4:26.23 -  
Tdef(\lctask1,{

inf.do {

[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
1.0.wait;
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48.4+note).midicps, \sustain, 1]) });
[0.125,0.5,0.25].choose.wait;
};

}).play;

// - 0:4:41.58 -  
Tdef(\lctask1,{

inf.do {

[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 0.8]) });
1.0.wait;
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48.4+note).midicps, \sustain, 0.2]) });
[0.125,0.5,0.25].choose.wait;
};

}).play;

// - 0:4:57.71 -  
Tdef(\lctask1,{

inf.do {

[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
1.0.wait;
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48.4+note).midicps, \sustain, 0.5]) });
[0.125,0.5,0.25].choose.wait;
};

}).play;

// - 0:5:47.91 -  
Tdef(\lctask1,{
var detune;

detune= 0.4;
inf.do {

if(0.4.coin,{detune=rrand(0.1,0.7)});

[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
1.0.wait;
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (36+detune+note).midicps, \sustain, 0.5]) });
[0.125,0.5,0.25].choose.wait;
};

}).play;

// - 0:6:14.32 -  
Tdef(\lctask1,{
var detune;

detune= 0.4;
inf.do {

if(0.4.coin,{detune=rrand(0.1,0.7)});

[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (60-detune+note).midicps, \sustain, 0.5]) });

1.0.wait;
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (36+detune+note).midicps, \sustain, 0.5]) });
[0.125,0.5,0.25].choose.wait;
};

}).play;

// - 0:6:46.35 -  
Tdef(\lctask1,{
var detune;

detune= 0.4;
inf.do {

if(0.4.coin,{detune=rrand(0.1,0.7)});

[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (60-detune+note).midicps, \sustain, 0.5]) });

1.0.wait;

3.do({
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (36+detune+note).midicps, \sustain, 0.5]) });
[0.125,0.5,0.25].choose.wait;
});

};

}).play;

// - 0:7:35.79 -  
Tdef(\lctask1,{
var detune;

detune= 0.4;
inf.do {

if(0.4.coin,{detune=rrand(0.1,0.7)});

[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (60-detune+note).midicps, \sustain, 0.5]) });

1.0.wait;

3.do({
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (36+detune+note).midicps, \sustain, 0.5,\place,rrand(0.4,0.5),\modfreq, rrand(5.3,11)]) });
[0.125,0.5,0.25].choose.wait;
});

};

}).play;

// - 0:8:9.05 -  
Tdef(\lctask1,{
var detune;

detune= 0.4;
inf.do {

if(0.4.coin,{detune=rrand(0.1,0.7)});

[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
0.125.wait;
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (60-detune+note).midicps, \sustain, 0.5]) });

1.0.wait;

3.do({
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (36+detune+note).midicps, \sustain, 0.5,\place,rrand(0.4,0.5),\modfreq, rrand(5.3,11)]) });
[0.125,0.5,0.25].choose.wait;
});

};

}).play;

// - 0:9:8.49 -  
SynthDef(\lcsynth2, {arg out=0, amp=0.1, pan=0.0, freq=440, sustain=0.1, place=0.01,modfreq=7; 
var sound, env;

env=EnvGen.ar(Env([0,1,1,0],[0.1,0.8,0.1]*sustain,'lin'),doneAction:2);

sound=Decay.ar(Impulse.ar(freq, 0),place)*LFNoise0.kr(modfreq,0.2,0.8)*amp*env;

Out.ar(out, Pan2.ar(sound,pan))
}).store;

// - 0:9:31.93 -  
Tdef(\lctask1,{
var detune;

detune= 0.4;
inf.do {

if(0.4.coin,{detune=rrand(0.1,0.7)});

[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
0.25.wait;
[0,17,7].do({arg note; Synth(\lcsynth1,[\freq, (60-detune+note).midicps, \sustain, 0.5]) });

1.0.wait;

3.do({
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (36+detune+note).midicps, \sustain, 0.5,\place,rrand(0.4,0.5),\modfreq, rrand(5.3,11)]) });
[0.125,0.5,0.25].choose.wait;
});

};

}).play;

// - 0:9:54.31 -  
Tdef(\lctask1,{
var detune;

detune= 0.4;
inf.do {

if(0.4.coin,{detune=rrand(0.1,0.7)});

[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
0.25.wait;
[0,17,7].do({arg note; Synth(\lcsynth1,[\freq, (60-detune+note).midicps, \sustain, 0.5]) });

1.0.wait;

rrand(2,5).do({
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (36+detune+note).midicps, \sustain, 0.5,\place,rrand(0.4,0.5),\modfreq, rrand(5.3,11)]) });
[0.125,0.5,0.25].choose.wait;
});

};

}).play;

// - 0:10:18.08 -  
Tdef(\lctask2,{

inf.do {

Synth(\lcsynth2);
1.0.wait;
};

}).play;

// - 0:10:33.16 -  
Tdef(\lctask2,{

inf.do {

Synth(\lcsynth2,[\freq,1000]);
1.0.wait;
};

}).play;

// - 0:11:3.37 -  
Tdef(\lctask2,{

inf.do {

Synth(\lcsynth2,[\freq,1000]);
1.0.wait;

Synth(\lcsynth2,[\freq,980,\sustain,0.5]);
0.25.wait;
};

}).play;

// - 0:11:25.72 -  
Tdef(\lctask2,{

inf.do {

Synth(\lcsynth2,[\freq,1000,\place,rrand(0.01,0.05)]);
1.0.wait;

Synth(\lcsynth2,[\freq,980,\sustain,0.5]);
0.25.wait;
};

}).play;

// - 0:11:39.56 -  
Tdef(\lctask2,{

inf.do {

Synth(\lcsynth2,[\freq,1000,\place,rrand(0.01,0.05),\sustain, 0.25]);
1.0.wait;

Synth(\lcsynth2,[\freq,980,\sustain,0.5]);
0.25.wait;
};

}).play;

// - 0:11:56.83 -  
Tdef(\lctask2,{

inf.do {

Synth(\lcsynth2,[\freq,10,\place,rrand(0.01,0.05),\sustain, 0.25]);
1.0.wait;

Synth(\lcsynth2,[\freq,9.8,\sustain,0.5]);
0.25.wait;
};

}).play;

// - 0:12:28.81 -  
Tdef(\lctask2,{

inf.do {

Synth(\lcsynth2,[\freq,10,\place,rrand(0.01,0.05),\sustain, 0.25, \amp, 0.5]);
1.0.wait;

Synth(\lcsynth2,[\freq,9.8,\sustain,0.5,\modfreq, 10, \amp, 0.5]);
0.25.wait;
};

}).play;

// - 0:12:50.05 -  
Tdef(\lctask2,{

inf.do {

Synth(\lcsynth2,[\freq,10,\place,exprand(0.01,0.2),\sustain, 0.25, \amp, 0.5]);
1.0.wait;

Synth(\lcsynth2,[\freq,9.8,\sustain,0.5,\modfreq, 10, \amp, 0.5]);
0.25.wait;
};

}).play;

// - 0:13:54.5 -  
Tdef(\lctask1,{
var detune;

detune= 0.4;
inf.do {

rrand(1,3).do({
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
exprand(0.01,0.25).wait;
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (60-detune+note).midicps, \sustain, 0.5]) });

if(0.7.coin,{detune=rrand(0.1,0.7)});

});

1.0.wait;

rrand(2,5).do({
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (36+detune+note).midicps, \sustain, 0.5,\place,rrand(0.4,0.5),\modfreq, rrand(5.3,11)]) });
[0.125,0.5,0.25].choose.wait;
});

};

}).play;

// - 0:14:16.94 -  
Tdef(\lctask1,{
var detune;

detune= 0.4;
inf.do {

rrand(1,3).do({
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
exprand(0.01,0.25).wait;
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (60-detune+note).midicps, \sustain, 0.5]) });

if(0.7.coin,{detune=rrand(0.1,0.7)});

});

[1,2,3].choose.wait;

rrand(2,5).do({
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (36+detune+note).midicps, \sustain, 0.5,\place,rrand(0.4,0.5),\modfreq, rrand(5.3,11)]) });
[0.125,0.5,0.25].choose.wait;
});

};

}).play;

// - 0:14:36.35 -  
Tdef(\lctask1,{
var detune;

detune= 0.4;
inf.do {

rrand(1,3).do({
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
exprand(0.01,0.25).wait;
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (60-detune+note).midicps, \sustain, 0.5]) });

if(0.7.coin,{detune=rrand(0.1,0.7)});

});

[1,0.5,2].wchoose([0.5,0.3,0.2]).wait;

rrand(2,5).do({
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (36+detune+note).midicps, \sustain, 0.5,\place,rrand(0.4,0.5),\modfreq, rrand(5.3,11)]) });
[0.125,0.5,0.25].choose.wait;
});

};

}).play;

// - 0:14:56.28 -  
Synth(\lcsynth2,[\freq,[].choose,\sustain,0.5,\modfreq, 10, \amp, 0.5]);

// - 0:15:8.39 -  
Tdef(\lctask2,{

inf.do {

Synth(\lcsynth2,[\freq,10,\place,exprand(0.01,0.2),\sustain, 0.25, \amp, 0.5]);
1.0.wait;

Synth(\lcsynth2,[\freq,[9.8,98,980,9800].choose,\sustain,0.5,\modfreq, 10, \amp, 0.5]);
0.25.wait;
};

}).play;

// - 0:16:0.97 -  
SynthDef(\lcsynth1, {arg out=0, amp=0.1, pan=0.0, freq=440, sustain=0.1, place=0.5,modfreq=7; 
var sound, env;

env=EnvGen.ar(Env([0,1,1,0],[0.3,0.6,0.1]*sustain,'lin'),doneAction:2);

sound=Pulse.ar(freq, place,LFNoise0.kr(modfreq,0.2,0.8)*amp)*env;

Out.ar(out, Pan2.ar(sound,pan))
}).store;

// - 0:16:49.33 -  
SynthDef(\lcsynth2, {arg out=0, amp=0.1, pan=0.0, freq=440, sustain=0.1, place=0.01,modfreq=7; 
var sound, env;

env=EnvGen.ar(Env([0,1,1,0],[0.1,0.8,0.1]*sustain,'lin'),doneAction:2);

sound=Impulse.ar([freq,modfreq])*amp*env;

Out.ar(out, sound)
}).store;

// - 0:17:10.56 -  
Tdef(\lctask1,{
var detune;

detune= 0.4;
inf.do {

rrand(1,3).do({
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (48+note).midicps, \sustain, 1]) });
exprand(0.01,0.25).wait;
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (60-detune+note).midicps, \sustain, 0.5]) });

if(0.7.coin,{detune=rrand(0.1,1.7)});

});

[1,0.5,2].wchoose([0.5,0.3,0.2]).wait;

rrand(2,5).do({
[0,5,7].do({arg note; Synth(\lcsynth1,[\freq, (36+detune+note).midicps, \sustain, 0.5,\place,rrand(0.4,0.5),\modfreq, rrand(5.3,11)]) });
[0.125,0.5,0.25].choose.wait;
});

};

}).play;

// - 0:17:32.39 -  
Tdef(\lctask2,{

inf.do {

Synth(\lcsynth2,[\freq,10,\place,exprand(0.01,0.2),\sustain, 0.25, \amp, 0.5]);
1.0.wait;

Synth(\lcsynth2,[\freq,[9.8,98,980].choose,\sustain,0.5,\modfreq, 10, \amp, 0.5]);
0.25.wait;
};

}).play;

// - 0:17:52.36 -  
Tdef(\lctask2,{

inf.do {

Synth(\lcsynth2,[\freq,10,\place,exprand(0.01,0.2),\sustain, 0.25, \amp, 0.5]);
1.0.wait;

Synth(\lcsynth2,[\freq,[9.8,98,980].choose,\sustain,0.5,\modfreq, [10,100,1].choose, \amp, 0.5]);
0.25.wait;
};

}).play;

// - 0:18:29.85 -  
SynthDef(\lcsynth3, {arg out=0, amp=0.1, pan=0.0, freq=440, sustain=0.1; 
var sound, env;

env=EnvGen.ar(Env([1,0],[sustain],'lin'),doneAction:2);

Out.ar(out, Pan2.ar(AudioIn.ar(1)*env*amp,pan))
}).store;

// - 0:19:29.93 -  
Tdef(\lctask3,{

inf.do {

Synth(\lcsynth3,[\sustain, [1.25,1,0.75].choose, \amp, 0.5]);
1.0.wait;

Synth(\lcsynth3,[\sustain,0.5,\amp, 0.5]);
0.25.wait;
};

}).play;

// - 0:20:2.72 -  
TempoClock.default.tempo_(0.5)

// - 0:20:38.1 -  
Tdef(\lctask3,{

inf.do {

Synth(\lcsynth3,[\sustain, [1.25,1,0.75].choose, \amp, 5]);
1.0.wait;

Synth(\lcsynth3,[\sustain,0.5,\amp, 5]);
0.25.wait;
};

}).play;

// - 0:20:49.01 -  
TempoClock.default.tempo_(2)

// - 0:21:4.43 -  
Tdef(\lctask3,{

inf.do {

Synth(\lcsynth3,[\sustain, [1.25,1,0.75].choose, \amp, 50]);
1.0.wait;

Synth(\lcsynth3,[\sustain,0.5,\amp, 50]);
0.25.wait;
};

}).play;

// - 0:21:32.05 -  
Tdef(\lctask3,{

inf.do {

Synth(\lcsynth3,[\sustain, [1.25,1,0.75].choose, \amp, 50]);
3.0.wait;

Synth(\lcsynth3,[\sustain,0.5,\amp, 50]);
1.25.wait;
};

}).play;

// - 0:22:45.16 -  
a={Out.ar(0,CombN.ar(In.ar(0,2),0.1,0.1,5))}.play(addAction:\addToTail)