// title: change stuff in running Pbind with patternproxies
// author: alln4tural
// description:

// code:
(
SynthDef(\clusterboom, {| out = 0, freq=55, dur=1, amp=1|
	Out.ar(
		out,
		Splay.ar({SinOsc.ar(exprand(freq-(freq/128),freq+(freq/128)),0,0.1)}!33)
			* EnvGen.kr(Env.perc,1,1,0,dur,2)
			* amp
		)		
}).add;
);


(
~notes = [	21, 	21, 	9, 	19, 	19, 	9	];
~durs  = [	1/4,	1/4,	1/2,	1/8,	1/8,	14/8	];
~amps  = [	4,	4,	0,	3,	3,	0	];

~notespatternproxy = PatternProxy(Pxrand(~notes,inf)); 
~durspatternproxy  = PatternProxy(Pxrand(~durs, inf));
~ampspatternproxy  = PatternProxy(Pxrand(~amps, inf)); 

p = Pbind(
	\instrument, \clusterboom,
	\midinote,	~notespatternproxy,
	\dur, 	~durspatternproxy,
	'amp',	~ampspatternproxy, 
);
);
p.play;

// eval while running:

~notespatternproxy.source  = Pxrand(~notes + 7,inf); 
~notespatternproxy.source  = Pxrand(union(~notes, ~notes + 7),inf); 
~notespatternproxy.source  = Pxrand(~notes,inf);