感情の深みを表現できなかったカスタムシンセ

SynthDef(\sinebass, {|out=0, freq=55, sustain=1, amp=0.5, pan=0, cutoff=800, res=0.3, crush=0, distort=0|var env, sig, sub, filt, crushed, distorted, crushSwitch;env = EnvGen.kr(Env.perc(0.01, sustain, 1, -4), doneAction:2);sig = SinOsc.ar(freq) * 0.8 + (SinOsc.ar(freq * 2) * 0.1) + (LFPar.ar(freq * 0.5) * 0.05);sub = SinOsc.ar(freq * 0.5, 0, 0.4);sig = sig + sub;filt = RLPF.ar(sig, cutoff.clip(50, 18000), res.linlin(0,1,0.1,0.9));crushed = Decimator.ar(filt, crush.linlin(0,8,44100,2000), 8);crushSwitch = (crush > 0).poll(label:”crush>0?”);filt = Select.ar(crushSwitch, [filt, crushed]);distorted = tanh(filt * (1 + distort * 5));filt = Select.ar(distort > 0, [filt, distorted]);filt = Pan2.ar(filt * env * amp, pan);Out.ar(out, filt);}).add;