[JasonACT]

Download OPENSCAD and generate an .STL file from a .scad file with this in it:


// Defaults for curved surfaces
$fa=0.5; // default minimum facet angle is now 0.5
$fs=0.5; // default minimum facet size is now 0.5 mm

height=23;
middle=81;
drinks=72;
ctrspan=19;
offset=4.5;

module shape (radius1, radius2, height, r2offset, main) {
difference () {
if (main == 1) {
union () {
cylinder (r=radius1-2, r2=radius1,h=2);
translate ([0,0,2]) cylinder (r=radius1, h=height - 4);
translate ([0,0,height - 2]) cylinder (r=radius1, r2=radius1-2,h=2);
}
} else {
cylinder (r=radius1,h=height);
}
if (main == 1) {
translate ([offset, r2offset,-1]) cylinder (r=radius2, h=height + 2);
translate ([offset, -r2offset,-1]) cylinder (r=radius2, h=height + 2);
} else {
translate ([offset, r2offset,-1]) cylinder (r=radius2, h=height + 2);
translate ([offset, -r2offset,-1]) cylinder (r=radius2, h=height + 2);
}
if (main == 1) {
translate ([offset, r2offset,-1]) cylinder (r=radius2 + 3, r2=radius2, h=1 + 2);
translate ([offset, -r2offset,-1]) cylinder (r=radius2 + 3, r2=radius2, h=1 + 2);
translate ([offset, r2offset,height-2]) cylinder (r=radius2, r2=radius2 + 2, h=1 + 2);
translate ([offset, -r2offset,height-2]) cylinder (r=radius2, r2=radius2 + 2, h=1 + 2);
}
}
}

module divider () {
difference () {
shape (middle/2, drinks/2, height, 36+ctrspan/2, 1);
translate ([0,0,2]) shape (middle/2-4, drinks/2+4, height, 36+ctrspan/2, 0);
}
}

divider ();