$fn=30;

use <Oszi_DS0138.scad>

module boden(len, wid, thi){
 
  color("gold"){
      difference()
{      union(){
    cube([len, wid, thi]);   
          
          difference(){
    translate([0,0,thi])rotate([0,90,0])
       cylinder(r=thi, h=len); 
             
       translate([0,-radius,thi])            cube([len, wid, thi]);   
 
              }}
      translate([0,-radius,0])   cube([thi/2,wid+thi,thi/2]);
    translate([len-thi/2,-radius,0])   cube([thi/2,wid+thi,thi/2]);
              }}

}

radius = 3;
length  = 135;
thick = 22;
width = 90;
//rotate ([45,0,0])
difference(){
color("yellow", 0.05)hull(){
    translate ([radius, radius, radius]) sphere(r=radius);
    translate ([length-radius, radius, radius]) sphere(r=radius);
    translate ([radius, width-radius, radius]) sphere(r=radius);
    translate ([length-radius, width-radius, radius]) sphere(r=radius);
        
        
    translate ([radius, 3*radius-thick, thick-radius]) sphere(r=radius);
    translate ([length-radius, 3*radius-thick, thick-radius]) sphere(r=radius);
    translate ([radius, width-radius, thick-radius]) sphere(r=radius);
    translate ([length-radius, width-radius, thick-radius]) sphere(r=radius);
}
translate([10, 10,3.8])
platine(cutout=true);

#translate([length-radius -1, width-radius,0 ])rotate([0,0,180])
minkowski(){
boden(length-8, width-8, radius);
sphere(d=0.1);
}}