$fn=30;

module half2dp() {
	polygon( points=[[0,-10],[12,-10],[12,40],[25.1,62],[25.1,75],[15,100],[0,100]] );
}
module 2dp() {
	union() {
		half2dp();
		mirror([1,0,0]) half2dp();
	}
}

module control() {
	minkowski()
	{
		difference() {
			linear_extrude(height = 51.2, center = true, convexity = 10, scale = 0.95) {
				translate([0,-70,0])
					2dp();
			}
			translate([0,-4,-32]) {
				rotate([7,0,0])
				scale([0.99,1,1])
				linear_extrude(height = 20, center=true) {
					translate([0,-70,0])
						2dp();
				}
			}
		}
		sphere(r=1);
	}
}

control();