s.boot

s.meter

s.plotTree


// allocate new buffer
b.free
b = Buffer.alloc(s, s.sampleRate*3, 1)

// start recording into buffer
Ndef(\recbuf, {RecordBuf.ar(SoundIn.ar(0), b, loop:0, doneAction: Done.freeSelf )})

b.plot
b.normalize
b.plot

(
Ndef(\gran, {
	var snd = GrainBuf.ar(2,
		trigger: Impulse.ar(
			freq: LFNoise1.kr(1/10!3).exprange(1, 2)
			* LFNoise0.ar(100).range(0.7,1.1) ),
		dur: LFNoise1.ar(1).range(0.08,0.1),
		sndbuf: b,
		rate:1,
		//rate: 1,
		//pos:LFNoise1.kr(1/20!3).range(0,1),
		pos: SinOsc.kr(1/10, [0, pi/4*3, pi]).range(0,1),
		pan: LFNoise0.ar(100).range(-1,1)
	);
	snd = LPF.ar(snd, LFNoise1.kr(1/10!3).exprange(500,10000));
	snd = Mix(snd);
	snd = JPverb.ar(snd, LFNoise1.kr(1/10!2).range(1,10)) * 0.2
		+ snd * 0.25;
	Limiter.ar(Mix(snd), 0.9) * 0.5 ;
	//* Env.circle([0.01,0.3,0.01],90,\cub).kr * 0.8;
})
)
Ndef(\gran).fadeTime = 20
Ndef(\gran).play