circle to ellipse

circle to ellipse


Delta=0.01;

module connector (height,radius,eccentricity)
translate([0,0,0])
{
hull() {
linear_extrude(height=Delta)
circle(r=radius);
translate([0,30,height - Delta])
linear_extrude(height=Delta)
scale([1,eccentricity])
circle(r=radius);
}
}


module tube(height, radius, eccentricity=1, thickness) {
difference() {
minkowski() {
connector(height,radius,eccentricity);
cylinder(height=height,r=thickness);
}
translate([0,0,-(Delta+thickness)])
connector(height + 2* (Delta +thickness) ,radius, eccentricity);
}
}

tube(60,48.5,0.5,1);

tube2(60, 50, 1, center = false);

module tube2(height, radius, wall, center = false)
translate([0,0,-59])
{
difference() {
cylinder(h=height, r=radius, center=center);
cylinder(h=height, r=radius-wall,