iraven_musc-115-thx

I created this track by sequencing 5 different Pbinds together to create a pieces strung together in one cohesive performance from a define SynthDef "plucking".

(
SynthDef("plucking", {arg amp = 0.1, freq = 440, decay = 5, coef = 0.1;

var env, snd;
env = EnvGen.kr(Env.linen(0, decay, 0), doneAction: 2);
snd = Pluck.ar(
        in: WhiteNoise.ar(amp),
        trig: Impulse.kr(0),

        maxdelaytime: 0.1,
        delaytime: freq.reciprocal,
        decaytime: decay,
        coef: coef);
    Out.ar(0, [snd, snd]);
}).add;
)

(
a = Pbind(
    \instrument, "plucking",
	\degree, Pseq([2,[2, 5, 7], 7, 9, 13, 2,[2, 5, 7], 7, 9, 13, 0,[0, 3, 5], 5, 9, 13, 2,[3, 4, 8, 10, 14], 7, 9, 15], 2),
    \amp, Pwhite(0.5, 0.7),
    \decay, 13,
    \coef, Pwhite(0.01, 0.1),
    \dur, Pseq([0.1, 0.8, 2.0, 1.3, 1.2], inf)
);


b = Pbind(
	\instrument, "plucking",
	\degree, Pseq([2, 8, 3, 9, 4, 10, 5, 11], 4),
	\amp, 0.9,
	\decay, 40,
	\dur, Pseq([1, 1, 1, 2, 1, 0.5, 0.5, 1], inf),
);


c = Pbind(
	\instrument, "plucking",
	\degree, Pseq([4, 10, 5, 11, 6, 12, 7, 13], inf),
	\amp, 0.3,
	\decay, 15,
	\dur, Pseq([0.1, 0.1, 0.1, 0.2, 0.1, 0.2, 0.2, 0.1], 2),
);


d = Pbind(
	\instrument, "plucking",
	\degree, Pseq([2, 8, 3, 9, 4, 10, 5, 11], inf),
	\amp, 0.9,
	\decay, 40,
	\dur, Pseq([0.1, 0.1, 0.1, 0.2, 0.1, 0.2, 0.2, 0.1], 5),
);


e = Pbind(
    \instrument, "plucking",
	\degree, Pseq([2, 3, [3, 4, 8, 10], 1, 2, 3, [2, 4, 9], 1, 2, 3, [4, 5, 6, 7], 1, 2, 3, [2, 8, 9, 10], 1, 2, 3, [10, 13, 14], 1], 1),
    \amp, Pwhite(0.3, 0.9),
    \decay, 2,
    \dur, Pseq([1, 1.5, 0.5], inf)
);
)

Pseq([a, b, c, b+c, d, e]).play;

Pluck Composition, musc-115-pluck

Inspiration for this track was from the Berkeley Campanile Sather Tower.  I wanted to mimic bell sounds as if the clock were striking a certain hour.  
I put together a series of FM Pbinds following a FM SynthDef, and then I also added in the "plucking" SynthDef to add more texture.  **NOTE: I did not write a sequence for these sounds.  Instead, I kind of used an improvisational aspect to the piece, where I pick and chose certain Pbinds to play at certain times manually.

Here is the code:


(
SynthDef("FM2", {arg freq = 440, modfreq = 5, modindex = 10, amp = 0.1, pos = 0, gate = 1, attack = 0.01, release = 0.3;
	var carrier, modulator, freqdev, env;
	freqdev = modfreq * modindex;
	modulator = SinOsc.ar(freq: modfreq, mul: freqdev);
	carrier = SinOsc.ar(freq: freq + modulator);
	env = Env.asr(
		attackTime: attack,
		sustainLevel: amp,
		releaseTime: release
	).kr(doneAction: 2, gate: gate);
	carrier = Pan2.ar(in: carrier, pos: pos, level: env);
	Out.ar(0, carrier * 0.4);
}).add;
)




//---------------------

(
SynthDef("plucking", {arg amp = 0.1, freq = 440, decay = 5, coef = 0.1;

var env, snd;
env = EnvGen.kr(Env.linen(0, decay, 0), doneAction: 2);
snd = Pluck.ar(
        in: WhiteNoise.ar(amp),
        trig: Impulse.kr(2),

        maxdelaytime: 1,
        delaytime: freq.reciprocal,
        decaytime: decay,
        coef: coef);
    Out.ar(0, [snd, snd]);
}).add;
)



//----------------------


//Part A
(
Pbind(
    \instrument, "FM2",
    \dur, 2,
	\degree, Pseq([-5, 0, 4, 8, 11, 24], 6),
    \modfreq, 300, 
    \pmindex, Pwhite(1, 18),
    \amp, 0.3,
	\attack, 0.01,
	\release, 6,
	\pos, Pwhite(-1, 1.0)
).play;
)

//Part B
(
Pbind(
    \instrument, "FM2",
    \dur, 1,
	\degree, Pseq([-5, [2, 5, 9], [0, 3, 7], [-4, 0, 2], 11, 24], 8),
    \modfreq, 900, 
    \pmindex, Pwhite(1, 18),
    \amp, 0.3,
	\attack, 0.01,
	\release, 6,
	\pos, Pwhite(-1, 1.0)
).play;
)

//Part C

(
(
Pbind(
	\instrument, "plucking",
	\degree, Pseq([2, 8, [2, 7, 13], 10, 12], 4),
	\amp, 0.10,
	\decay, 15,
	\dur, Pseq([0.1, 0.2, 0.7, 0.4, 0.9, 0.8], inf),
)
).play;
)

//Part D

(
(
Pbind(
	\instrument, "plucking",
	\degree, Pseq([-1, 5, [-1, 4, 10], 7, 9], 4),
	\amp, 0.10,
	\decay, 15,
	\dur, Pseq([0.1, 0.2, 0.7, 0.4, 0.9, 0.8], inf),
)
).play;
)

//Part E

(
(
Pbind(
	\instrument, "plucking",
	\degree, Pseq([-3, 2, [-3, 1, 7], 4, 6], 4),
	\amp, 0.10,
	\decay, 15,
	\dur, Pseq([0.1, 0.2, 0.7, 0.4, 0.9, 0.8], inf),
)
).play;
)








s.record



Bell Tower Mayhem musc-115-modulations

A little something to get into the Christmas robo mood. :)

Code below:

// Evaluate SynthDef first, then scroll down to play sequence
(
// SynthDef
SynthDef("sillyVoice", { arg
	freq = 220,
	amp = 0.5,
	vibratoSpeed = 6,
	vibratoDepth = 4,
	vowel = 0,
	att = 0.01,
	rel = 0.1,
	pos = 0,
	gate = 1;

	var in, vibrato, above, below, env, va, ve, vi, vo, vu, snd;

	// calculate vibrato 
	// vibratoDepth is number of semitones to go up and down
	above = (freq.cpsmidi + vibratoDepth).midicps - freq;
	below = (freq.cpsmidi - vibratoDepth).midicps - freq;
	vibrato = SinOsc.kr(vibratoSpeed).range(below, above); 
	// this is the basic sound source
	in = Saw.ar(Lag.kr(freq) + vibrato);
	// amplitude envelope
	env = Env.asr(att, amp, rel).kr(doneAction: 2, gate: gate);

	va = BBandPass.ar(
		in: in,
		freq: [ 600, 1040, 2250, 2450, 2750 ],
		bw: [ 0.1, 0.0673, 0.0488, 0.0489, 0.0472 ],
		mul: [ 1, 0.4466, 0.3548, 0.3548, 0.1 ]);

	ve = BBandPass.ar(
		in: in,
		freq: [ 400, 1620, 2400, 2800, 3100 ] ,
		bw: [ 0.1, 0.0494, 0.0417, 0.0429, 0.0387 ],
		mul: [ 1, 0.2512, 0.3548, 0.2512, 0.1259 ]);

	vi = BBandPass.ar(
		in: in,
		freq: [ 250, 1750, 2600, 3050, 3340 ] ,
		bw: [ 0.24, 0.0514, 0.0385, 0.0393, 0.0359 ],
		mul: [ 1, 0.0316, 0.1585, 0.0794, 0.0398 ] );

	vo = BBandPass.ar(
		in: in,
		freq:[ 400, 750, 2400, 2600, 2900 ] ,
		bw: [ 0.1, 0.1067, 0.0417, 0.0462, 0.0414 ],
		mul: [ 1, 0.2818, 0.0891, 0.1, 0.01 ]);

	vu = BBandPass.ar(
		in: in,
		freq: [ 350, 600, 2400, 2675, 2950 ],
		bw: [ 0.1143, 0.1333, 0.0417, 0.0449, 0.0407 ],
		mul: [ 1, 0.1, 0.0251, 0.0398, 0.0158 ]);

	snd = SelectX.ar(Lag.kr(vowel, 0.3), [va, ve, vi, vo, vu]);
	snd = Pan2.ar(Mix(snd), pos);
	Out.ar(0, snd * env * 2);
}).add;
)


// Vowels a e i o u correspond to number 0 1 2 3 4

//Voice Parts

(
//Melody
a = Pbind(
	\instrument, "sillyVoice",
	\note, Pseq([0, 12, 11, 9, 7, 5, 4, 7, 4, 0, 9, 7, 5, 4, 2, 0, 0, -1, 0, 2, 0, 2, 4, 7, 9, 11, 12, 9, 7, 0, 9, 7, 5, -1, 0]),
	\ctranspose, -20,
	\dur, Pseq([1, 1, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 3, 1, 1, 0.5, 0.5, 0.5, 0.5, 4, 1, 0.5, 0.5, 1, 0.5, 0.5, 1, 0.5, 0.5, 1, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 1, 1, 2]),
	\amp, 1,
	\vibratoSpeed, 10,
	\vibratoDepth, 0, // in semitones
	\vowel, Pseq([1, 2, 3, 2, 1], inf),
	\legato, 1,
	\att, 3,
	\rel, 1.2,
	\pos, Pwhite(-1, 1.0)
);

//Harmony
b = Pbind(
	\instrument, "sillyVoice",
	\note, Pseq([0, 16, 14, 12, 11, 9, 7, 5, 7, 0, 9, 7, 5, 4, 2, 0, -1, -3, -5, -3, -1, 0, 0, -1, 0, 2, 0, 2, 4, 7, 9, 11, 12, 9, 7, 0, -1, 0, 4, 2, 0]),
	\ctranspose, -8,
	\dur, Pseq([1, 1, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 3, 1, 1, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 1, 1, 0.5, 0.5, 1, 0.5, 0.5, 1, 0.5, 0.5, 1, 0.5, 0.5, 0.5, 0.5, 0.5, 0.5, 1, 1, 2]),
	\amp, 0.5,
	\vibratoSpeed, 10,
	\vibratoDepth, 0, // in semitones
	\vowel, Pseq([1, 2, 3, 2, 1], inf),
	\legato, 1,
	\att, 3,
	\rel, 1.2,
	\pos, Pwhite(-1, 1.0)
);

//Baseline
c = Pbind(
	\instrument, "sillyVoice",
	\note, Pseq([0, -1, 4, 2, 0, -1, -3, -1, 0, -5, -3, -1, 0, -5, -3, -1, 0]),
	\ctranspose, -20,
	\dur, Pseq([2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 1, 1, 2, 2]),
	\amp, 0.5,
	\vibratoSpeed, 10,
	\vibratoDepth, 0, // in semitones
	\vowel, Pseq([1, 2, 3, 2, 1], inf),
	\legato, 1,
	\att, 3,
	\rel, 1.2,
	\pos, Pwhite(-1, 1.0)
);


//Held Dominate

d = Pbind(
	\instrument, "sillyVoice",
	\note, Pseq([0]),
	\ctranspose, -20,
	\dur, Pseq([31]),
	\amp, 0.10,
	\vibratoSpeed, 10,
	\vibratoDepth, 0, // in semitones
	\vowel, Pseq([1, 2, 3, 2, 1], inf),
	\legato, 1,
	\att, 3,
	\rel, 1.2,
	\pos, Pwhite(-1, 1.0)
);
)

//Musical Score Notation

Ppar([a, b, c, d]).play; 


s.record;


[The Christmas Robo Song] musc-115-formant

I mixed the song "Constant Conversations" by Passion Pit in SuperCollider using a QuNeo.  There are a total of 16 Pbinds to correspond with 16 QuNeo tracks.  

Here is the musical score/code below:


//--------------------------------------

~source1 = Buffer.read(s, "/Users/isaacraven/Desktop/01_Constant_Conversations_(Alternate Version)_mono.wav");

// Test it:
~source1.play;


// ===========
// Granny1
// Sampling at slower speeds
// (less than 20 grains per second, with
// grains per second controlled by Pbind dur)
// ===========
(
SynthDef("granny1", {arg bufnum, grainRate, grainPos, grainDur, grainPan, grainAmp, grainAtt, grainDec;
    var snd, env;
    env = Env.linen(0, grainDur, 0).kr(2);
    snd = TGrains2.ar(
        numChannels: 2,
        trigger: Impulse.kr(0),
		bufnum: bufnum,
        rate: grainRate,
        centerPos: grainPos * BufFrames.kr(bufnum) / SampleRate.ir,
        dur: grainDur,
        pan: grainPan,
        amp: grainAmp,
        att: grainAtt,
        dec: grainDec
    );
    Out.ar(0, snd);
}).add;
)

// =========
// Granny 2
// Granulating at much higher speeds
// (much more than 20 grains per second)
// =========

(
SynthDef("granny2", {arg bufnum, freq, att, rel, amp, grainRate, grainPos, grainDur, grainPan;
    var snd, env;
    // env = Env.asr(att, amp, rel).kr(doneAction: 2, gate: gate);
    env = Env.perc(att, rel, amp).kr(doneAction: 2);
    snd = GrainBuf.ar(
        numChannels: 2,
        trigger: Impulse.kr(freq),
        dur: grainDur,
        sndbuf: bufnum,
        rate: grainRate,
        pos: grainPos,
        pan: grainPan
    );
    Out.ar(0, snd * env);
}).add;
)



(
~dooweevp = Pbind(
    \instrument, "granny1",
    \bufnum, ~source1,
	\grainRate, Pseq([-2], inf),
	\grainPos, Pseq([0.1], inf),
    \grainDur, 1,
    \grainPan, 0,
    \grainAmp, 0.3, //Pwhite(0.1, 0.9),
    \grainAtt, 0.01,
    \grainDec, 0.04,
	\dur, Pseq([1], inf),
).play;
)

(
~robotechno1 = Pbind(
    \instrument, "granny1",
    \bufnum, ~source1,
    \grainRate, Prand([-1, 1], inf),
    // \grainPos, Pwhite(0, 1.0),
    \grainPos, Pseq([0.2, 0.22, 0.24, 0.26, 0.24, 0.22, 0.2], inf),
    \grainDur, 0.3,
    \grainPan, 0,
    \grainAmp, 0.5,
    \grainAtt, 0.02,
    \grainDec, 0.9,
    \dur, Pseq([0.25, 0.25, 0.25, 0.125, 0.125], inf),
).play;
)

(
~robotechno2 = Pbind(
    \instrument, "granny1",
    \bufnum, ~source1,
    \grainRate, Prand([-1, 3], inf),
    // \grainPos, Pwhite(0, 1.0),
    \grainPos, Pseq([0.2, 0.31, 0.59, 0.89, 0.90], inf),
    \grainDur, 0.08,
	\grainPan, 0,
    \grainAmp, 0.8,
    \grainAtt, 0.2,
    \grainDec, 0.9,
    \dur, Pseq([0.25, 0.25, 0.25, 0.125, 0.125], inf),
).play;
)

(
~yobaby = Pbind(
    \instrument, "granny1",
    \bufnum, ~source1,
	\grainRate, Prand([-1, 1], inf),
    // \grainPos, Pwhite(0, 1.0),
    \grainPos, Pseq([0.2], inf),
    \grainDur, 1,
	\grainPan, 0,
    \grainAmp, 0.5,
    \grainAtt, 0.5,
    \grainDec, 0.5,
	\dur, Pseq([1, 1, 1, 1, 1], inf),
).play;
)

// ahh ahh ahh ahh
(
~ahh = Pbind(
    \instrument, "granny1",
    \bufnum, ~source1,
	\grainRate, Prand([-1, 1], inf),
    \grainPos, Pwhite(0, 1.0),
    \grainPos, Pseq([0.271], inf),
    \grainDur, 0.5,
	\grainPan, 0,
    \grainAmp, 0.5,
    \grainAtt, 0.5,
    \grainDec, 0.5,
	\dur, Pseq([0.5], inf),
).play;
)

// verevererzz
(
~squiggle1 = Pbind(
    \instrument, "granny1",
	\bufnum, ~source1,
	\grainRate, 1,
    // \grainPos, Pwhite(0, 1.0),
    \grainPos, Pseq([0.451], inf),
    \grainDur, 1,
	\grainPan, 0,
    \grainAmp, 0.5,
    \grainAtt, 0.5,
    \grainDec, 0.5,
	\dur, Pseq([0.5], inf),
).play;
)

// vereecererre zzzz (higher octave)
(
~squiggle2 = Pbind(
    \instrument, "granny1",
	\bufnum, ~source1,
	\grainRate, 1.5,
    // \grainPos, Pwhite(0, 1.0),
	\grainPos, Pseq([0.451], inf),
    \grainDur, 0.75,
	\grainPan, Pwhite(-1, 1.0),
    \grainAmp, 0.5,
    \grainAtt, 1,
    \grainDec, 1,
	\dur, Pseq([1]/2, inf),
).play;
)

// Pew pew pew
(
~pew1 = Pbind(
    \instrument, "granny1",
    \bufnum, ~source1,
    \grainRate, 1,
    //\grainRate, Pseg(Pseq([1, 0.5], inf), Pseq([4, 1], inf), \lin, inf),
    \grainPos, Pwhite(0.45, 0.451),
    \grainDur, 0.1,
    \grainPan, Pwhite(-1, 1.0),
    \grainAmp, 0.5,
    \grainAtt, 0.01,
    \grainDec, 0.1,
    \dur, 1/8, //Pwhite(1/5, 1/20)
).play;
)

//lower pew pew pew
(
~pew2 = Pbind(
    \instrument, "granny1",
    \bufnum, ~source1,
    \grainRate, 0.3,
    //\grainRate, Pseg(Pseq([1, 0.5], inf), Pseq([4, 1], inf), \lin, inf),
    \grainPos, Pwhite(0.45, 0.451),
    \grainDur, 0.1,
    \grainPan, Pwhite(-1, 1.0),
    \grainAmp, 0.5,
    \grainAtt, 0.01,
    \grainDec, 0.1,
    \dur, 1/8, //Pwhite(1/5, 1/20)
).play;
)

// high pitch pew pew pew
(
~pew3 = Pbind(
    \instrument, "granny1",
    \bufnum, ~source1,
    \grainRate, -8,
    //\grainRate, Pseg(Pseq([1, 0.5], inf), Pseq([4, 1], inf), \lin, inf),
    \grainPos, Pwhite(0.45, 0.1),
    \grainDur, 0.3,
    \grainPan, Pwhite(-1, 1.0),
    \grainAmp, 0.5,
    \grainAtt, 0.01,
    \grainDec, 0.5,
    \dur, 1/4, //Pwhite(1/5, 1/20)
).play;
)

// pure tone sound with beat
(
~puretone1 = Pbind(
    \instrument, "granny1",
    \bufnum, ~source1,
	\grainRate, Pseq([0.6, 0.8, 0.7, 0.9], inf),
    //\grainRate, Pseg(Pseq([1, 0.5], inf), Pseq([4, 1], inf), \lin, inf),
	\grainPos, Pseq([0.1], inf),
    \grainDur, 0.2,
    \grainPan, Pwhite(-1, 1.0),
    \grainAmp, 0.4,
    \grainAtt, 0.01,
    \grainDec, 0.04,
    \dur, 1/4, //Pwhite(1/5, 1/20)
).play;
)

(
~puretone2 = Pbind(
    \instrument, "granny1",
    \bufnum, ~source1,
	\grainRate, Pseq([0.4, 0.6, 0.5, 7], inf),
    //\grainRate, Pseg(Pseq([1, 0.5], inf), Pseq([4, 1], inf), \lin, inf),
	\grainPos, Pseq([0.1], inf),
    \grainDur, 0.2,
    \grainPan, Pwhite(-1, 1.0),
    \grainAmp, 0.4,
    \grainAtt, 0.01,
    \grainDec, 0.04,
    \dur, 1/4, //Pwhite(1/5, 1/20)
).play;
)

// you can listen if you want, you love love
(
~listenlove = Pbind(
    \instrument, "granny2",
    \bufnum, ~source1,
    \freq, 2, // low freq (heard as rhythm, this is how many times it can repeat pretty much
	\amp, Pwhite(0.7, 0.8),
    \att, 1,
	\rel, 2,
    \grainRate, 1,
	\grainPos, Pseq([0.3, 0.4], inf),
    \grainDur, 2, //this will play the whole thing as long as you specify the frame
    \grainPan, Pwhite(-1, 1.0),
    \dur, 2
).play;
)

//everybody -rrbody
(
~everybody = Pbind(
    \instrument, "granny2",
    \bufnum, ~source1,
    \freq, 2, // low freq (heard as rhythm, this is how many times it can repeat pretty much
	\amp, Pwhite(0.7, 0.8),
    \att, 1,
	\rel, 2,
    \grainRate, 1,
	\grainPos, Pseq([0.37], inf),
    \grainDur, 2, //this will play the whole thing as long as you specify the frame
    \grainPan, Pwhite(-1, 1.0),
    \dur, 2
).play;
)

//cool surround synth (lower octave)
(
~lowsynth = Pbind(
    \instrument, "granny2",
    \bufnum, ~source1,
    \freq, 2, // low freq (heard as rhythm, this is how many times it can repeat pretty much
	\amp, Pwhite(0.3, 0.6),
    \att, 1,
	\rel, 2,
    \grainRate, 0.6,
	\grainPos, Pseq([0.37], inf),
    \grainDur, 1, //this will play the whole thing as long as you specify the frame
    \grainPan, Pwhite(-1, 1.0),
    \dur, 2
).play;
)

//yeah the trees, yeah the trees
(
~yeahthetrees = Pbind(
    \instrument, "granny2",
    \bufnum, ~source1,
    \freq, -10, // low freq (heard as rhythm, this is how many times it can repeat pretty much
	\amp, Pwhite(0.7, 0.8),
    \att, 2,
	\rel, 0,
    \grainRate, 0.7,
	\grainPos, Pseq([0.36], inf),
    \grainDur, 2, //this will play the whole thing as long as you specify the frame
    \grainPan, Pwhite(-1, 1.0),
    \dur, 1
).play;
)

//nrrrrnrrccrrchhkkkkk (low octave singing)
(
~nrrrk = Pbind(
    \instrument, "granny2",
    \bufnum, ~source1,
    \freq, -10, // low freq (heard as rhythm, this is how many times it can repeat pretty much
	\amp, Pwhite(0.7, 0.8),
    \att, 2,
	\rel, 0,
    \grainRate, 0.2,
	\grainPos, Pseq([0.29, 0.63], inf),
    \grainDur, 2, //this will play the whole thing as long as you specify the frame
    \grainPan, Pwhite(-1, 1.0),
    \dur, 1
).play;
)




// ===================
// Connecting to QuNeo
// ===================



MIDIIn.connectAll;

// test connection
MIDIdef.noteOn(\pad, {arg vel, note; [vel, note].postln});

// TWO WAYS OF ORGANIZING PBINDS:
// a) Pbinds that loop forever
// b) Pbinds that terminate automatically



(
MIDIdef.noteOn(\on, {arg vel, note;

    case
    {note==36} {~robotechno2.reset.play}
	{note==37} {~robotechno1.reset.play}
	{note==38} {~pew1.reset.play}
	{note==39} {~pew2.reset.play}
	{note==40} {~pew3.reset.play}
	{note==41} {~dooweevp.reset.play}
	{note==42} {~yobaby.reset.play}
	{note==43} {~ahh.reset.play}
	{note==44} {~squiggle1.reset.play}
	{note==45} {~puretone2.reset.play}
	{note==46} {~puretone1.reset.play}
	{note==47} {~lowsynth.reset.play}
	{note==48} {~nrrrk.reset.play}
	{note==49} {~yeahthetrees.reset.play}
	{note==50} {~everybody.reset.play}
	{note==51} {~listenlove.reset.play}

    [vel, note].postln
});


MIDIdef.noteOff(\off, {arg vel, note;

    case
    {note==36} {~robotechno2}
	{note==37} {~robotechno1.stop}
	{note==38} {~pew1.stop}
	{note==39} {~pew2.stop}
	{note==40} {~pew3.stop}
	{note==41} {~dooweevp.stop}
	{note==42} {~yobaby.stop}
	{note==43} {~ahh.stop}
	{note==44} {~squiggle1.stop}
	{note==45} {~puretone2.stop}
	{note==46} {~puretone1.stop}
	{note==47} {~lowsynth.stop}
	{note==48} {~nrrrk.stop}
	{note==49} {~yeahthetrees.stop}
	{note==50} {~everybody.stop}
	{note==51} {~listenlove.stop}
});
)

s.record

s.volume.gui

[Constant Conversations] musc-115-granular

For this track I wanted to combine natural and artificial sounds together and have them react at the same time at a single moment.  So, I took a saxophone's sound and inserted it into a Supercollider code that records the amplitude from the saxophone and makes a Pbind react to it, increasing or decreasing the amplitude from the actual Pbind track.  
Please excuse the cuts and sound overloading "fuzz", this is just a prototype, the first recording ever done on this particular piece.  I am looking forward to improving this piece in the future to present it at my senior recital possibly.

SuperCollider Code below:

//==========================================

(
SynthDef("plucking", {arg amp = 0.1, freq = 440, decay = 5, coef = 0.1;
    var env, snd, snd2;
    env = EnvGen.kr(Env.linen(0.8, decay, 1), doneAction: 2);
    snd = Pluck.ar(
        in: WhiteNoise.ar(amp),
        trig: Impulse.kr(0),
        maxdelaytime: 0.1,
        delaytime: freq.reciprocal,
        decaytime: decay,
        coef: coef);
    snd2 = LFSaw.ar(freq) * env * 0.1;
    snd = snd + snd2 * env;
    snd = LPF.ar(snd, snd) * Lag.ar(snd, 22, add: 0.5);
    Out.ar(0, [snd, snd]);
}).add;

SynthDef("plucking2", {arg amp = 0.1, freq = 440, decay = 5, coef = 0.1;
    var env, snd, snd2;
    var sax = Amplitude.kr(SoundIn.ar(0));
    var ffreq = Lag.kr(
        in: LinLin.kr(
            in: sax,
            srclo: 0,
            srchi: 1,
            dstlo: 100,
            dsthi: 1000
        ).poll,
        lagTime: 0.5
);
    env = EnvGen.kr(Env.linen(0.8, decay, 1), doneAction: 2);
    snd = Pluck.ar(
        in: WhiteNoise.ar(amp),
        trig: Impulse.kr(0),
        maxdelaytime: 0.1,
        delaytime: freq.reciprocal,
        decaytime: decay,
        coef: coef);
    snd2 = LFSaw.ar(freq) * env * 0.1;
    snd = snd + snd2 * env;
    snd = LPF.ar(snd, ffreq) * Lag.kr(sax, 50, add: 0.5);
    Out.ar(0, [snd, snd]);
}).add;
)
(
SynthDef("plucking3", {arg amp = 0.01, freq = 440, decay = 5, coef = 0.1;
var env, snd;
env = EnvGen.kr(Env.linen(0, decay, 1), doneAction: 2);
snd = Pluck.ar(
        in: WhiteNoise.ar(amp),
        trig: Impulse.kr(8),
        maxdelaytime: 0.1,
        delaytime: freq.reciprocal,
        decaytime: decay,
        coef: coef);
    Out.ar(0, [snd, snd]);
}).add;
)
// 1. eval synthdef (only once if no changes)
// 2. run Pbind
// 3. run the line below
{ ReplaceOut.ar(0, In.ar(0) + FreeVerb.ar(In.ar(0) + SoundIn.ar(0, 0.8), mix: 0.6, room: 0.7)) }.play
// Exhibit 1
(
a = Pbind(
    \instrument, "plucking3",
        \degree, Pseq([2,[2, 5, 7], 7, 9, 13, 15, 17, 2,[2, 5, 7], 7, 9, 13, 15, 17, 2,[2, 5, 7], 7, 9, 13, 15, 17, 0,[0, 3, 5], 5, 9, 13, 0,[0, 3, 5], 5, 9, 13, 0,[0, 3, 5], 5, 9, 13, 0,[0, 3, 5], 5, 9, 13, 2,[3, 4, 8, 10, 14], 7, 9, 15, 2,[3, 4, 8, 10, 14], 7, 9, 15, 2,[3, 4, 8, 10, 14], 7, 9, 15, 2,[3, 4, 8, 10, 14], 7, 9, 15, -5, [-2, 0, 1], 2, 5, 7, -5, [-2, 0, 1], 2, 5, 7, -5, [-2, 0, 1], 2, 5, 7, -5, [-2, 0, 1], 2, 5, 7, -10, [-7, -5, -3], -1, 0, 3, -10, [-7, -5, -3], -1, 0, 3, -10, [-7, -5, -3], -1, 0, 3, -10, [-7, -5, -3], -1, 0, 3, -15, [-12, -9, -7], -6, -3, -1, 0, 1, 4, -15, [-12, -9, -7], -6, -3, -1, 0, 1, 4, -15, [-12, -9, -7], -6, -3, -1, 0, 1, 4, -15, [-12, -9, -7], -6, -3, -1, 0, 1, 4, -20, [-13, -7, -3], -4, -2, 0, 2, 4, -20, [-13, -7, -3], -4, -2, 0, 2, 4, -20, [-13, -7, -3], -4, -2, 0, 2, 4, -20, [-13, -7, -3], -4, -2, 0, 2, 4], 1),
    \amp, Pseq([0.005, 0.005], inf),
    \decay, 4,
    \coef, Pwhite(0.01, 0.1),
    \dur, Pseq([0.4], inf)
);
//Exhibit 2
b = Pbind(
        \instrument, "plucking3",
        \degree, Pseq([4, 10, 5, 11, 6, 12, 7, 13], inf),
        \amp, 0.01,
        \decay, 15,
        \dur, Pseq([0.1, 0.1, 0.1, 0.2, 0.1, 0.2, 0.2, 0.1], 2),
);
//Exhibit 3
c = Pbind(
    \instrument, "plucking3",
    \degree, Pseq([0, 1, 3, 4, 6, Pseq([7, 8, 9], 1), 9], 6),
        \mtranspose, 7,
    \amp, Pwhite(0.009, 0.009),
    \decay, Pwhite(6, 10),
    \coef, Pseq([0.05, 0.1, 0.15], inf),
    \dur, Prand([0.1, 0.2, 0.4, Rest(0.3)], inf)
);
//Exhibit 4
d = Pbind(
    \instrument, "plucking2",
    \degree, Pseq([2,[2, 5, 7], 7, 9, 13, 15, 17, 2,[2, 5, 7], 7, 9, 13, 15, 17, 2,[2, 5, 7], 7, 9, 13, 15, 17, 0,[0, 3, 5], 5, 9, 13, 0,[0, 3, 5], 5, 9, 13, 0,[0, 3, 5], 5, 9, 13, 0,[0, 3, 5], 5, 9, 13, 2,[3, 4, 8, 10, 14], 7, 9, 15, 2,[3, 4, 8, 10, 14], 7, 9, 15, 2,[3, 4, 8, 10, 14], 7, 9, 15, 2,[3, 4, 8, 10, 14], 7, 9, 15, -5, [-2, 0, 1], 2, 5, 7, -5, [-2, 0, 1], 2, 5, 7, -5, [-2, 0, 1], 2, 5, 7, -5, [-2, 0, 1], 2, 5, 7, -10, [-7, -5, -3], -1, 0, 3, -10, [-7, -5, -3], -1, 0, 3, -10, [-7, -5, -3], -1, 0, 3, -10, [-7, -5, -3], -1, 0, 3, -15, [-12, -9, -7], -6, -3, -1, 0, 1, 4, -15, [-12, -9, -7], -6, -3, -1, 0, 1, 4, -15, [-12, -9, -7], -6, -3, -1, 0, 1, 4, -15, [-12, -9, -7], -6, -3, -1, 0, 1, 4, -20, [-13, -7, -3], -4, -2, 0, 2, 4, -20, [-13, -7, -3], -4, -2, 0, 2, 4, -20, [-13, -7, -3], -4, -2, 0, 2, 4, -20, [-13, -7, -3], -4, -2, 0, 2, 4, -21, [-13, -7, -3], -3, -2, -1, 1, 2, 4, -25, [-17, -16, -4], -6, -4, -1, 0, 2, 5, 7, -25, -25, -25, -25, -25, -25, -25, -24, -24, -21, -20, -18, -18, -17, -17, -13, -10, -9, -9, -5, -5, -4, -3, -2, -2, -2, 0, 0, 0, 2, 2], 1),
    \amp, Pwhite(0.3, 0.5),
    \ctranspose, [-12, 0],
    \decay, 3,
    \attack, 0.01,
    \coef, Pwhite(0.01, 0.1),
    \dur, Pseq([0.5], inf)
);
//Exhibit 5
e = Pbind(
    \instrument, "plucking2",
    \degree, Pseq([-6, -2, 1, [-1, 3, 7], 6],12),
    \amp, Pwhite(4),
    \ctranspose, [-12, 0],
    \decay, 1.5,
    \attack, 0.01,
    \coef, Pwhite(0.01, 0.1),
    \dur, Pseq([1], inf)
);
//Exhibit 6
f = Pbind(
    \instrument, "plucking2",
    \degree, Pseq([-7, -3, 0, [-1, 3, 7], 8],4),
    \amp, Pwhite(2),
    \ctranspose, [-12, 0],
    \decay, 1.5,
    \attack, 0.01,
    \coef, Pwhite(0.01, 0.1),
    \dur, Pseq([1], inf)
);
//Exhibit 7
g = Pbind(
    \instrument, "plucking2",
    \degree, Pseq([-10, -2, 5, [-1, 6, 11], 15],4),
    \amp, Pwhite(2),
    \ctranspose, [-12, 0],
    \decay,1.5,
    \attack, 0.01,
    \coef, Pwhite(0.01, 0.1),
    \dur, Pseq([1], inf)
);
//Exhibit 8
h = Pbind(
    \instrument, "plucking2",
    \degree, Pseq([-11, -2, 5, [-1, 6, 11], 15],4),
    \amp, Pwhite(2),
    \ctranspose, [-12, 0],
    \decay,1.5,
    \attack, 0.01,
    \coef, Pwhite(0.01, 0.1),
    \dur, Pseq([1], inf)
);
//Exhibit 9
i = Pbind(
    \instrument, "plucking2",
    \degree, Pseq([-6, -2, 1, [-1, 3, 7], 6],6),
    \amp, Pwhite(4),
    \ctranspose, [-12, 0],
    \decay, 1.5,
    \attack, 0.01,
    \coef, Pwhite(0.01, 0.1),
    \dur, Pseq([1], inf)
);
)
Pseq([c, Ppar([c, g, h]), Ppar([b, c, g, h]), Ppar([a, e]), Ppar([d, c]), Ppar([e]), Ppar([f, c]), Pseq([g, h], 2), i], 1).play;
