s.boot;

{BPF.ar(In.ar(100, 2), 500, 0.01)}.play(s)

{Out.ar(100, WhiteNoise.ar(1).dup(2))}.play(s)

s.sendMsg(\b_allocRead, 0, "sounds/TimeFrames2-1.aif");

{PlayBuf.ar(1, 0)}.play(s);

{

var freq, hasFreq, pitch, noise, voc, play;

play = PlayBuf.ar(1, 0);

#freq, hasFreq = Pitch.kr(play);

pitch = Blip.ar(freq * MouseX.kr(1, 2), 100);

noise = PinkNoise.ar;

voc = Vocode.ar(play, pitch, noise, 0.1) * 400

}.play(s);

/* for looping buffer with arbitrary start and end points */

LoopBuf

s.sendMsg(\b_allocRead, 0, "sounds/a11wlk01-44_1.aiff");

z = CtkNoteObject(

SynthDef(\playme, {arg start = 0, buffer, amp = 1, procenv;

Out.ar(0,

PlayBuf.ar(1, buffer, startPos: start, loop: 1) * In.kr(procenv))

})

);

a = ProcMod.new(Env([0, 1, 0], [2, 10], \lin, 1), 0.25)

.function_({arg group, envbus, server;

z.new(target: group).buffer_(0).procenv_(envbus).start_(0.rrand(44100)).play;

z.new(target: group).buffer_(0).procenv_(envbus).start_(0.rrand(44100)).play;

z.new(target: group).buffer_(0).procenv_(envbus).start_(0.rrand(44100)).play;

z.new(target: group).buffer_(0).procenv_(envbus).start_(0.rrand(44100)).play;

z.new(target: group).buffer_(0).procenv_(envbus).start_(0.rrand(44100)).play;

});

a.play;

a.release;

/* For tonight */

1) load developer tools onto your computer from the install DVD

2) download the SC source for course website