// http://sccode.org/1-4Q6 (f0)
SynthDef(\risset,
{arg out = 0,pan = 0,freq = 400,amp = 0.1,dur = 2,t_trig = 1
;var amps = #[1,0.67,1,1.8,2.67,1.67,1.46,1.33,1.33,1,1.33]
;var durs = #[1,0.9,0.65,0.55,0.325,0.35,0.25,0.2,0.15,0.1,0.075]
;var frqs = #[0.56,0.56,0.92,0.92,1.19,1.7,2,2.74,3,3.76,4.07]
;var dets = #[0,1,0,1.7,0,0,0,0,0,0,0]
;var fn =
{arg i
;var env = EnvGen.ar(Env.perc(0.005,dur*durs[i],amps[i],-4.5),t_trig)
;SinOsc.ar(freq*frqs[i]+dets[i],0,amp*env)}
;var src = Mix.fill(11,fn)
;Out.ar(out,Pan2.ar(src,pan));
}).add;
a = Synth(\risset,[\freq,72.midicps,\dur,4])
a.set(\t_trig,1)
a.set(\freq,100.midicps,\dur,3,\t_trig,1)
a.set(\freq,60.midicps,\dur,9,\t_trig,1)
a.set(\freq,90.midicps,\dur,16.5,\t_trig,1)
a.free