include <Round-Anything/polyround.scad>

module jar() {
    cylinder(100, 40, 40);
}

module cup() {
    cylinder(155, 31, 42);
}

module arm() {
    translate([-40, -200, -200])
    cube([80, 400, 200]);
}

color("#999999")
arm();

module shelf() {
    translate([0, 0, -6])
    linear_extrude(15) {
        polygon(polyRound([
            [-90, -40, 10],
            [ 90, -40, 10],
            [ 90,  40, 10],
            [-90,  40, 10],
        ]));
    }
}

translate([0, 0, 6]) {
    difference() {
        shelf();
        cylinder(100, 35, 35);
    }

    color("#7777ff") {
        *jar();
        cup();
    }
}