sccode = """
SynthDef.new(\\spacesaw, {
	// Standard Values
	|bus=0, amp=1, gate=1, freq=100, fmod=0, pan=0, atk=0.25, sus=1, rel=0.3, crv= -4,
	filterlow=100, filterhigh=2000, rq=0.3, sidepreamp=2, midpreamp=1,
	lfofreq=0.1, lfodepth=0.015, balance=0.5, monoswitch=0|
	var env, lfo, leftIn, rightIn, mid, side, leftOut, rightOut, osc;
	freq = In.kr(bus, 1);
	freq = [freq, freq+fmod];
	// Envelope and LFO
	env = EnvGen.ar(Env.linen(atk, sus, rel, (sus / 2),curve: crv), doneAction: 0);
	lfo = SinOsc.ar(freq: lfofreq, phase: [0, pi]);
	lfo = lfo.range(1 - lfodepth, 1 + lfodepth);
	//Stereo signal with beatings
	leftIn = LFSaw.ar(freq: freq * lfo[0]);
	rightIn = LFSaw.ar(freq: freq * lfo[1]);
	// L/R to M/S conversion
	mid = (leftIn + rightIn)/2;
	side = (leftIn - rightIn)/2;
	// FX on the M/S signal
	mid = RLPF.ar(in: mid, freq: LinExp.ar( in: env, srclo: 0, srchi: 1, dstlo: filterlow, dsthi: filterhigh),
		rq: rq, mul: midpreamp);
	mid = mid.softclip/midpreamp.softclip;
	mid = mid * (1 - balance).clip(0, 1) * env;
	side = RLPF.ar(in: side, freq: LinExp.ar(in: env, srclo: 0, srchi: 1, dstlo: filterhigh, dsthi: filterlow),
		rq: rq, mul: sidepreamp);
	side = side.softclip/sidepreamp.softclip;
	side = side * balance.clip(0, 1) * env;
	// Output Stuff and Converting Back to L/R
	leftOut = mid + side;
	rightOut = mid - side;
	osc = Select.ar(which: monoswitch, array: [[leftOut, rightOut], Pan2.ar(leftOut, pan)]);
	osc = osc * amp * 0.15;
	osc = Limiter.ar(osc);
	osc = Pan2.ar(osc, pan);
	ReplaceOut.ar(bus, osc)
},
metadata: (
	credit: "Josh Mitchell",
	modified_by: "Jens Meisner",
	description: "",
	category: \\pads,
	tags: [\\pitched, \\midsidesaw]
	)
).add;

"""

synth = SCInstrument(
    shortname="spacesaw",
    fullname="Spacesaw",
    description="Spacesaw synth",
    code=sccode,
    arguments={}
)