SynthDef(\mudsynt, { |out=0, freq=60, amp=0.7, pan=0, atk=0.2, rel=4.0,drive=2.5, cutoff=800, room=0.5, lfoRate=0.2, lfoDepth=0.4|var base, lfo, osc, noise, filt, dist, env, sig;lfo = SinOsc.kr(lfoRate, 0, lfoDepth, 1);base = Saw.ar(freq * lfo, 0.6) + SinOsc.ar(freq * 0.5, 0, 0.4);noise = BrownNoise.ar(0.3) * EnvGen.kr(Env.perc(0.01, rel * 0.8));osc = (base + noise) * 0.6;filt = RLPF.ar(osc, cutoff, 0.3);dist = tanh(filt * drive);env = EnvGen.kr(Env.asr(atk, 1, rel, curve: -4), doneAction:2);sig = FreeVerb.ar(dist, mix: room, room: room, damp: 0.6);Out.ar(out, Pan2.ar(sig * env * amp, pan));}).add;
泥濘(ぬかるみらしい)のようなうねったシンセ
雑記