(Ndef(\spasm,{
f={CuspL.ar([2,2s1])*64};
m=SinOsc.ar(HenonC.ar(3).exprange*9);
o=SinOsc.ar(f,SinOsc.ar(f*2,0,m*2pi)).sign;
o=o*BPF.ar(o,m.exprange*5500+(m.exprange*20+4),1,0.5);
Out.ar(0,-6.dbamp*Splay.ar(o,f.sin))});

/*

#AlmostLegible
#SuperCollider
#ScToot

*/)